Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: MAGQBUT4

Package: Imaging

Routine: MAGQBUT4


Information

MAGQBUT4 ;WOIFO/RMP,DAC,JSJ - BP Utilities ; Jun 16, 2022@14:42:24

Source Information

Source file <MAGQBUT4.m>

Call Graph

Call Graph

Call Graph Total: 17

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  

Caller Graph

Caller Graph Total: 174

Package Total Caller Graph
Imaging 174 MAG DIRHASH  MAG FIELD VALIDATE  MAG FLD ATT  MAG KEY VALIDATE  MAGBAPI  MAGG INSTALL  MAGIP079  MAGIP105  
MAGIP110  MAGIP111  MAGIP116  MAGIP118  MAGIP122  MAGIP123  MAGIP124  MAGIP127  
MAGIP129  MAGIP130  MAGIP131  MAGIP135  MAGIP136  MAGIP137  MAGIP138  MAGIP140  
MAGIP141  MAGIP142  MAGIP143  MAGIP144  MAGIP145  MAGIP147  MAGIP149  MAGIP150  
MAGIP151  MAGIP154  MAGIP155  MAGIP156  MAGIP157  MAGIP158  MAGIP160  MAGIP161  
MAGIP162  MAGIP163  MAGIP164  MAGIP166  MAGIP167  MAGIP168  MAGIP170  MAGIP172  
MAGIP173  MAGIP174  MAGIP177  MAGIP178  MAGIP180  MAGIP181  MAGIP182  MAGIP183  
MAGIP185  MAGIP186  MAGIP188  MAGIP189  MAGIP190  MAGIP191  MAGIP192  MAGIP194  
MAGIP196  MAGIP197  MAGIP198  MAGIP201  MAGIP202  MAGIP203  MAGIP204  MAGIP206  
MAGIP208  MAGIP210  MAGIP211  MAGIP214  MAGIP215  MAGIP216  MAGIP217  MAGIP218  
MAGIP219  MAGIP220  MAGIP221  MAGIP222  MAGIP223  MAGIP225  MAGIP226  MAGIP230  
MAGIP231  MAGIP233  MAGIP234  MAGIP235  MAGIP237  MAGIP238  MAGIP239  MAGIP242  
MAGIP243  MAGIP248  MAGIP249  MAGIP250  MAGIP252  MAGIP254  MAGIP256  MAGIP257  
MAGIP258  MAGIP262  MAGIP263  MAGIP264  MAGIP267  MAGIP269  MAGIP271  MAGIP273  
MAGIP274  MAGIP278  MAGIP280  MAGIP281  MAGIP282  MAGIP283  MAGIP284  MAGIP289  
MAGIP290  MAGIP291  MAGIP292  MAGIP293  MAGIP301  MAGIP302  MAGIP303  MAGIP305  
MAGIP306  MAGIP307  MAGIP314  MAGIP315  MAGIP316  MAGIP318  MAGIP319  MAGIP320  
MAGIP321  MAGIP323  MAGIP324  MAGIP325  MAGIP328  MAGIP331  MAGIP332  MAGIP333  
MAGIP334  MAGIP335  MAGIP343  MAGIP345  MAGIP346  MAGIP347  MAGIP350  MAGIP351  
MAGIP352  MAGIP353  MAGIP354  MAGIP356  MAGIP357  MAGIP370  MAGIP375  MAGIP379  
MAGIP382  MAGIP384  MAGIP385  MAGIP39B  MAGIP81  MAGIPS34  MAGIPS96  MAGIPS98  
MAGIPT20  MAGJMN1  MAGQ QCNT  MAGQ VOK  MAGQBTM  MAGQBUT4  

Entry Points

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 ;

External References

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"RESULTS: "_RESULTS
  • Line Location: TEST+7
Routine Call
  • DIC
  • Line Location:
    • ADDRPC+2
    • ADDRPC+19
Routine Call
  • DIC
  • Line Location:
    • QPUP+4
Routine Call
  • DIC
  • Line Location:
    • GPACHX+10
Routine Call
  • DIE
  • Line Location:
    • KVAL+5
Routine Call
  • DIE
  • Line Location:
    • QPUP+23
Routine Call
  • DIE
  • Line Location:
    • QPUP+14
Routine Call
  • DIE
  • Line Location:
    • DVAL+4

Used in RPC

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

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

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

Label References

Name Line Occurrences
$$TRIM VOKR+5, OLD+1, OLD+4, OLD+5
FDASET KVAL+4
KVAL TEST+6
QPUP QCNT+15

Local Variables

Legend:

>> 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

Marked Items

Name Field # of Occurrence
$T( OLD+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All