MAGQBUT4 ;WOIFO/RMP,DAC,JSJ - BP Utilities ; Jun 16, 2022@14:42:24
Source file <MAGQBUT4.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 6 | (,$$FIND1,LIST)^DIC (FIELD,FIELDLST)^DID ($$KEYVAL,FILE,UPDATE,VAL)^DIE ^DIK FDA^DILF $$GET1^DIQ |
Imaging | 5 | $$DIRHASH^MAGFILEB $$INIS^MAGQBPG2 QCNT^MAGQBUT4 ADDMG^MAGQBUT5 $$UPPER^MAGQE4 |
Kernel | 5 | GETENV^%ZOSV ($$FMDIFF,$$FMTE,$$NOW)^XLFDT ($$VER,MES)^XPDUTL $$KSP^XUPARAM $$PROD^XUPROD |
MailMan | 1 | SENDMSG^XMXAPI |
Name | Comments | DBIA/ICR reference |
---|---|---|
VOKR(RESULT,VER) | ; RPC for VOK [MAGQ VOK]
; P196 changed the way version checking works. ; we now allow older versions of the BP to run. |
|
OLD | ;
|
|
CONV(ARR,ICT) | ;Convert any single node array to FM Style multiple
; The node subscripts of ARR are ignored, and not retained ; i.e. ARR(34)=8 ; ARR("BLUE")=9 ; ARR("D")=10 ; converts to ; ARR(1,0)=8 ; ARR(2,0)=9 ; ARR(3,0)=10 |
|
MRGMULT(ARR,RT,RTDSC,CT) | ;Merge the FM formatted array into a FM File
; multiple field. ; This isn't for general consumption. ; RT = FILE ROOT, RECORD NUMBER, NODE ; i.e. "^MAG(2006.034,44,1," -> 44 is the IEN of MAG(2006.34 ; RTDSC is the 2nd piece of the 0 node of the multiple field. |
|
DDLF(RESULTS,FILE,FIELD,FLAGS,ATTR) | ;[MAG FLD ATT]
|
|
DDFA(RESULTS) | ;[MAG ATT LST]
|
|
DVAL(RESULTS,FILE,IENS,FIELD,FLAGS,VALUE) | ;[MAG FIELD VALIDATE]
|
|
KVAL(RESULTS,FLAGS,FDA) | ;[MAG KEY VALIDATE]
|
|
FDASET(DDRROOT,DDRFDA) | ;
|
|
DHRPC(RESULTS,FNAME,FLOC) | ;[MAG DIRHASH]
|
|
GPACHX(PV) | ; Get Package File Install History of Imaging
|
|
TRIM(X) | ; remove both leading and trailing blanks
|
|
QCNT(RESULT,PLC,QUE) | ; [MAGQ QCNT] Called from MagQueManSet.pas and MagSiteParameters.pas
|
|
QPUP(PLC,QUE,CNT,CQ,IA,QP) | ;
|
|
CPUD | ;
|
|
CNL(GL,IEN,NLC) | ; Check Network Location
|
|
CNSP(GL,IEN,NMSP,NSC) | ; Check NameSPace
|
|
NMSP(TMPA) | ;
|
|
CLRQ | ; Clears the Queue file and Queue Pointer files
|
|
ADDRPC(RPCNAME,OPTNAME) | ;
|
|
INS(XP,DUZ,DATE,IDA) | ;
|
|
TEST | ;
|
Name | Field # of Occurrence |
---|---|
GETENV^%ZOSV | INS+3 |
^DIC | ADDRPC+2, ADDRPC+19 |
$$FIND1^DIC | QPUP+4 |
LIST^DIC | GPACHX+10 |
FIELD^DID | DDLF+4 |
FIELDLST^DID | DDFA+3 |
$$KEYVAL^DIE | KVAL+5 |
FILE^DIE | QPUP+23 |
UPDATE^DIE | QPUP+14 |
VAL^DIE | DVAL+4 |
^DIK | CLRQ+5 |
FDA^DILF | FDASET+8 |
$$GET1^DIQ | INS+10, INS+12, INS+16, INS+19, INS+20, INS+21 |
$$DIRHASH^MAGFILEB | DHRPC+4 |
$$INIS^MAGQBPG2 | NMSP+4 |
QCNT^MAGQBUT4 | CPUD+6 |
ADDMG^MAGQBUT5 | INS+28 |
$$UPPER^MAGQE4 | NMSP+4 |
$$FMDIFF^XLFDT | INS+14 |
$$FMTE^XLFDT | INS+11, INS+13, INS+22 |
$$NOW^XLFDT | INS+12 |
SENDMSG^XMXAPI | INS+29 |
$$VER^XPDUTL | INS+9 |
MES^XPDUTL | ADDRPC+4, ADDRPC+5, ADDRPC+8, ADDRPC+9, ADDRPC+13, ADDRPC+14, ADDRPC+22, ADDRPC+23 |
$$KSP^XUPARAM | INS+2, INS+6 |
$$PROD^XUPROD | INS+7, INS+28 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
RPC Name | Call Tags |
---|---|
MAG DIRHASH | DHRPC |
MAGG INSTALL | GPACHX |
MAG FLD ATT | DDLF |
MAGQ VOK | VOKR |
MAG FIELD VALIDATE | DVAL |
MAG KEY VALIDATE | KVAL |
MAGQ QCNT | QCNT |
FileNo | Call Tags |
---|---|
^DIC(19 - [#19] | Classic Fileman Calls |
^MAGQUEUE(2006.031 - [#2006.031] | FIND1^DIC |
9.4901 | LIST^DIC |
^XPD(9.7 - [#9.7] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("TRAP" | OLD+2, DDLF+1, DDFA+1, DVAL+1, KVAL+2, DHRPC+2, QCNT+2 |
^DIC(19 - [#19] | ADDRPC+12 |
^DIC(9.4 - [#9.4] | GPACHX+6, GPACHX+7, GPACHX+9 |
^MAG(2005.2 - [#2005.2] | CNL+8, CNL+9 |
^MAG(2006.1 - [#2006.1] | CPUD+3, CPUD+4, CNL+11, NMSP+2, NMSP+3, INS+2 |
^MAGQUEUE( | CLRQ+3 |
^MAGQUEUE(2006.03 - [#2006.03] | QCNT+10, QCNT+11! |
^MAGQUEUE(2006.031 - [#2006.031] | QCNT+8, QCNT+9, CPUD+5 |
^TMP("XMERR" | INS+30 |
^XWB(8994 - [#8994] | ADDRPC+7, ADDRPC+12 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARO | CONV+9~, CONV+15 |
ARO( | CONV+13* |
ARR | CONV~, CONV+14!, CONV+15*, MRGMULT~, MRGMULT+8 |
ARR( | CONV+11, CONV+13 |
ATTR | DDLF~, DDLF+4, DDLF+5 |
CLPATCH | VOKR+3~, VOKR+5*, VOKR+9 |
CNT | QCNT+1~, QCNT+7*, QCNT+12*, QCNT+15, QPUP~, QPUP+13, QPUP+22, INS+1~, INS+4*, INS+5* , INS+6*, INS+7*, INS+8*, INS+9*, INS+11*, INS+13*, INS+14*, INS+15*, INS+17*, INS+18* , INS+19*, INS+20*, INS+22* |
COM | INS+1~, INS+16*, INS+17 |
CQ | QCNT+1~, QCNT+9*, QCNT+13, QCNT+15, QPUP~, QPUP+11, QPUP+20 |
CT | MRGMULT~, MRGMULT+7, INS+1~, INS+12*, INS+13, INS+14 |
>> CVERS | OLD+5*, OLD+6 |
D | INS+1~ |
D0 | ADDRPC+20!, INS+1~ |
D1 | INS+1~ |
D2 | INS+1~ |
DA | QCNT+1~, QCNT+7*, QCNT+10*, QCNT+11, QCNT+13, CLRQ+1~, CLRQ+5*, CLRQ+6!, ADDRPC+1~ |
DA(1 | CLRQ+5*, ADDRPC+11*, ADDRPC+16 |
DATE | GPACHX+5~, INS~, INS+18 |
DDATE | INS+1~, INS+21*, INS+22 |
DDRERR | FDASET+1~ |
DDRFDA | KVAL+1~, KVAL+4, KVAL+7!, FDASET~ |
DDRFIELD | FDASET+1~, FDASET+5*, FDASET+8 |
DDRFILE | FDASET+1~, FDASET+4*, FDASET+8 |
DDRIEN | FDASET+1~, FDASET+6*, FDASET+8 |
DDRROOT | FDASET~ |
DDRROOT( | FDASET+3 |
DDRVAL | FDASET+1~, FDASET+7*, FDASET+8 |
DG | INS+1~ |
DIC | QPUP+1~, ADDRPC+1~, ADDRPC+2*, ADDRPC+16*, ADDRPC+20!, INS+1~ |
DIC(0 | ADDRPC+2*, ADDRPC+17* |
DICR | INS+1~ |
DIE | QPUP+8!, QPUP+15!, QPUP+17!, QPUP+24! |
DIK | CLRQ+1~, CLRQ+4*, CLRQ+6! |
DIW | INS+1~ |
DLAYGO | ADDRPC+17*, ADDRPC+20! |
DUZ | INS~, INS+24 |
FDA | KVAL~, KVAL+4, QPUP+8!, QPUP+15!, QPUP+17!, QPUP+24!, TEST+1~, TEST+6 |
FDA( | QPUP+9*, QPUP+10*, QPUP+11*, QPUP+12*, QPUP+13*, QPUP+18*, QPUP+19*, QPUP+20*, QPUP+21*, QPUP+22* |
FDA(1 | TEST+3* |
FDA(2 | TEST+5* |
FDA(3 | TEST+4* |
FDA(4 | TEST+2* |
FIELD | DDLF~, DDLF+4, DVAL~, DVAL+4 |
FILE | DDLF~, DDLF+4, DVAL~, DVAL+4, CLRQ+1~, CLRQ+2*, CLRQ+3, CLRQ+4, CLRQ+5 |
FLAGS | DDLF~, DDLF+4, DVAL~, DVAL+3*, DVAL+4, KVAL~, KVAL+5 |
FLOC | DHRPC~, DHRPC+4 |
FNAM | CNSP+1~, CNSP+4*, CNSP+5 |
FNAME | DHRPC~, DHRPC+4 |
GL | CNL~, CNL+4, CNSP~, CNSP+3 |
I | CONV+9~, CONV+10*, CONV+11*, CONV+13, DDLF+3~, DDLF+5*, FDASET+1~, FDASET+2*, FDASET+3*, GPACHX+1~ , TRIM+1~, TRIM+2*, TRIM+3, TRIM+4, NMSP+1~, NMSP+5* |
IA | QCNT+1~, QCNT+6*, QCNT+7*, QCNT+13*, QCNT+15, QPUP~, QPUP+12, QPUP+21 |
ICT | CONV~, CONV+10*, CONV+12*, CONV+13 |
IDA | INS~, INS+10, INS+12, INS+16, INS+19, INS+20, INS+21 |
IEN | QPUP+1~, CNL~, CNL+3, CNL+4, CNSP~, CNSP+3, NMSP+1~, NMSP+2*, NMSP+3*, NMSP+4 , CLRQ+1~, CLRQ+3*, CLRQ+5 |
IENS | DVAL~, DVAL+4 |
INS | CPUD+1~, CPUD+2*, CPUD+3*, CPUD+4, NMSP+1~, NMSP+2*, NMSP+3, NMSP+5, NMSP+7* |
INSTIEN | CNSP+1~, CNSP+7*, CNSP+8 |
J | GPACHX+5~, GPACHX+6*, GPACHX+7, GPACHX+9, GPACHX+10, TRIM+1~, TRIM+3*, TRIM+4, NMSP+1~, NMSP+5* , NMSP+7* |
K | GPACHX+5~, GPACHX+9*, GPACHX+10 |
L | GPACHX+5~, GPACHX+12*, GPACHX+14, GPACHX+15 |
LCNT | GPACHX+1~, GPACHX+2*, GPACHX+13*, GPACHX+14, GPACHX+16 |
MAG0 | CNL+1~, CNL+4*, CNL+5, CNL+6, CNSP+1~, CNSP+3*, CNSP+4 |
MAG1 | CNL+1~ |
>> MAGDUZ | INS+26 |
MAGMSG | INS+1~, INS+31! |
MAGMSG( | INS+5*, INS+6*, INS+7*, INS+8*, INS+9*, INS+11*, INS+13*, INS+14*, INS+15*, INS+17* , INS+18*, INS+19*, INS+20*, INS+22* |
MAGREF | CNL+1~, CNL+5*, CNL+6*, CNL+7, CNL+8, CNL+9 |
MSG | KVAL+7!, GPACHX+1~, GPACHX+8~ |
MSG("DIERR" | DVAL+5, KVAL+6, GPACHX+11 |
NLC | CNL~, CNL+2* |
NMSP | CNSP~ |
NMSP( | CNSP+7 |
NMSPC | CNSP+1~, CNSP+5*, CNSP+6, CNSP+7 |
NSC | CNSP~, CNSP+2* |
OPTNAME | ADDRPC~, ADDRPC+2, ADDRPC+4, ADDRPC+5, ADDRPC+8, ADDRPC+13, ADDRPC+14, ADDRPC+22 |
PKG | GPACHX+1~, GPACHX+4*, GPACHX+6 |
PLACE | INS+1~, INS+2*, INS+28 |
PLC | QCNT~, QCNT+8, QCNT+10, QCNT+11, QCNT+15, QPUP~, QPUP+3, QPUP+10, QPUP+19, CPUD+1~ , CPUD+2*, CPUD+4*, CPUD+5, CPUD+6, CNL+1~, CNL+9*, CNL+10, CNL+11*, CNL+12 |
>> PNUM | OLD+4*, OLD+5 |
PV | GPACHX~ |
PV( | GPACHX+14*, GPACHX+16* |
PV(0 | GPACHX+3* |
QP | QCNT+8*, QCNT+9, QCNT+15, QPUP~, QPUP+4*, QPUP+7, QPUP+18, QPUP+19, QPUP+20, QPUP+21 , QPUP+22 |
QUE | QCNT~, QCNT+8, QCNT+10, QCNT+11, QCNT+15, QPUP~, QPUP+3, QPUP+9, QPUP+18, CPUD+1~ , CPUD+5*, CPUD+6 |
RESULT | VOKR~, VOKR+9*, VOKR+10*, OLD+6*, DVAL+4, DVAL+5, DVAL+6, QCNT~, QCNT+6* |
RESULT(0 | DVAL+6 |
RESULTS | DDLF~, DDFA~, DDFA+3, DVAL~, DVAL+5*, DVAL+6*, KVAL~, KVAL+6*, DHRPC~, DHRPC+5* , TEST+6, TEST+7 |
RESULTS( | DDLF+5* |
RPCNAME | ADDRPC~, ADDRPC+4, ADDRPC+7, ADDRPC+8, ADDRPC+9, ADDRPC+12, ADDRPC+13, ADDRPC+14, ADDRPC+18, ADDRPC+22 , ADDRPC+23 |
RT | MRGMULT~, MRGMULT+6*, MRGMULT+7, MRGMULT+8 |
RTDSC | MRGMULT~, MRGMULT+7 |
>> SLINE | OLD+3*, OLD+4, OLD+5 |
ST | INS+1~, INS+10*, INS+11, INS+14 |
SVRPATCH | VOKR+3~, VOKR+7*, VOKR+9 |
TAR | GPACHX+8~ |
TAR("DILIST" | GPACHX+12, GPACHX+14, GPACHX+15 |
TMP | KVAL+1~, KVAL+5*, KVAL+6, DHRPC+1~, DHRPC+4*, DHRPC+5, NMSP+1~, NMSP+4*, NMSP+5 |
TMPA | NMSP~ |
TMPA( | NMSP+5*, NMSP+7! |
U | OLD+6, MRGMULT+7, DVAL+5, DVAL+6, FDASET+4, FDASET+5, FDASET+6, FDASET+7, DHRPC+5, QCNT+9 , CNL+9, CNL+11, CNSP+4 |
VAL | QPUP+1~, QPUP+2!, QPUP+4 |
VAL(1 | QPUP+3* |
VAL(2 | QPUP+3* |
VALUE | DVAL~, DVAL+4 |
VER | VOKR~, VOKR+5, OLD+1*, OLD+6 |
VERS | GPACHX+5~, GPACHX+7*, GPACHX+9, GPACHX+14 |
X | OLD+2*, DDLF+1*, DDLF+2!, DDFA+1*, DDFA+2!, DVAL+1*, DVAL+2!, KVAL+2*, KVAL+3!, FDASET+3* , FDASET+4, FDASET+5, FDASET+6, FDASET+7, DHRPC+2*, DHRPC+3!, GPACHX+5~, GPACHX+15*, GPACHX+16, TRIM~ , TRIM+2, TRIM+3, TRIM+4, QCNT+1~, QCNT+2*, ADDRPC+2*, ADDRPC+18* |
XMERR | INS+30*! |
XMID | INS+1~, INS+24*, INS+25, INS+29 |
XMSUB | INS+1~, INS+23*, INS+27*, INS+28, INS+29 |
XMY | INS+1~, INS+28, INS+29 |
XMY( | INS+25*, INS+26* |
XMZ | INS+1~, INS+29 |
XP | INS~, INS+8, INS+9, INS+23 |
Y | GPACHX+5~, ADDRPC+3, ADDRPC+11, ADDRPC+12, ADDRPC+21, INS+15 |
Name | Field # of Occurrence |
---|---|
$T( | OLD+3 |