PXQUTL1 ;ISL/JVS - DEBUGGING UTILITIES ;5/1/97 08:30
Source file <PXQUTL1.m>
Package | Total | Call Graph |
---|---|---|
PCE Patient Care Encounter | 2 | $$RE^PXQUTL EN1^PXQUTL2 |
VA Fileman | 2 | FIELD^DID GETS^DIQ |
Package | Total | Caller Graph |
---|---|---|
PCE Patient Care Encounter | 2 | PXQMAIN4 PXQUTL2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ADD2 | ;--ADDITIONAL FIELDS IN A FILE TO BE DIAPLAYED
|
|
ADD1 | ;--GET FIELD VALUES FOR UPFILE
|
|
DEC(VISIT,FLENUM,VISUAL,PXQFORM) | ;Test looking through DD to find fields pointing to the visit entries.
|
|
ADD | ;--GET FIELD VALUES FOR FILE
|
|
EXIT | ;---CLEAN UP AND QUIT DOESN'T QUIT THE ROUTINE
|
|
;--PRINT TO SCREEN
|
||
QUE | ;CHECK OUT CROSS REFERENCE
|
|
MUST | ;--MUST ADDITIONAL ENTRIES TO MAKE SENSE
|
|
REF | ;Look for all of the regular cross references and other
|
|
REG | ;Look for regular cross references
|
|
DIS | ;--DISPLAY
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PXD(812 - [#812] | ADD2+9, ADD2+11, ADD2+12, ADD2+13 |
^TMP("PXQADDITIONAL" | DEC+24!, ADD+1, ADD+2, ADD1+1, ADD1+2, ADD2+14*, MUST+1*, MUST+2*, MUST+3*, MUST+4* , MUST+5*, MUST+6*, MUST+7*, MUST+8*, MUST+9*, MUST+10*, MUST+11*, MUST+12*, MUST+13*, MUST+14* , MUST+15*, MUST+16*, MUST+17*, MUST+18* |
^TMP("PXQDATA" | DIS+6!, PRINT+4, PRINT+8, PRINT+13, PRINT+17!, PRINT+18*, PRINT+19, PRINT+21*, PRINT+25 |
Name | Line Occurrences |
---|---|
ADD | DIS+18 |
ADD1 | DIS+26 |
ADD2 | DEC+14 |
DIS | QUE+14, QUE+16, QUE+18, QUE+20 |
MUST | DEC+14 |
DIS+30 | |
QUE | DEC+22 |
REF | DEC+22 |
REG | REF+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
COUNT | DEC+10~, DEC+26, QUE+2*, QUE+13* |
DD | DEC+10~, DEC+15*, DEC+17, DEC+19, REG+3, REG+4, REG+5, QUE+5, DIS+22, PRINT+5 , PRINT+25 |
DUZ | DEC+2, ADD2+9 |
FIELD | DEC+10~, DEC+18*, DEC+19*, DEC+20, REF+3*, REG+3, REG+4, REG+5, REG+6, REG+7 , QUE+2* |
FILE | DEC+10~, DEC+16*, DEC+17*, DEC+19, DEC+20, REF+2*, REF+3, REG+3, REG+4, REG+5 , REG+6, REG+7, QUE+2*, QUE+3*, QUE+4, QUE+13, DIS+16, DIS+17, DIS+21, DIS+24 , ADD+1, ADD+2, ADD+3 |
FLENUM | DEC~, DEC+17, DEC+19 |
GET | DEC+10~, REG+5*, REG+6, QUE+4*, QUE+5 |
PIECE | DEC+10~, QUE+7*, QUE+8, QUE+9 |
PX | DEC+10~, QUE+11*, QUE+12, QUE+13, QUE+14*, QUE+15, QUE+16*, QUE+17, QUE+18*, QUE+19 , QUE+20*, DIS+1 |
PXB | QUE+13*, DIS+2, EXIT+1! |
PXB1 | QUE+15*, DIS+3, EXIT+1! |
PXB2 | QUE+17*, DIS+4, EXIT+1! |
PXB3 | QUE+19*, DIS+5, EXIT+1! |
PXBIEN | DIS+2*, DIS+3*, DIS+4*, DIS+5*, DIS+10, DIS+12! |
PXQDATA | DEC+10~ |
>> PXQENC( | QUE+13* |
PXQENTR | PRINT+1~, PRINT+11*, PRINT+12 |
PXQENTRY | PRINT+1~, PRINT+10*, PRINT+11 |
PXQFIELD | PRINT+1~, PRINT+13*, PRINT+15, PRINT+17, PRINT+18, PRINT+19, PRINT+21, PRINT+25 |
PXQFILE | PRINT+1~, PRINT+4*, PRINT+5, PRINT+7, PRINT+8, PRINT+13, PRINT+15, PRINT+17, PRINT+18, PRINT+19 , PRINT+21, PRINT+25 |
PXQFLD | DEC+11~, ADD2+8~, ADD2+13*, ADD2+14 |
PXQFLE | ADD2+8~, ADD2+11*, ADD2+12, ADD2+14 |
PXQFLEIE | ADD2+8~, ADD2+12*, ADD2+13 |
PXQFORM | DEC~, DEC+3, DEC+14*, DIS+15, DIS+16*, DIS+17, DIS+24*, DIS+25, DIS+27* |
>> PXQFORM2 | DIS+15*, DIS+27 |
PXQI | DIS+10*, EXIT+1! |
PXQIENS | DIS+10*, DIS+11*, DIS+17, DIS+23*, DIS+25, EXIT+2!, PRINT+1~, PRINT+8*, PRINT+9, PRINT+10 , PRINT+13, PRINT+17, PRINT+18, PRINT+19, PRINT+21, PRINT+25, ADD+3, ADD1+3 |
PXQJ | DIS+10*, DIS+11, EXIT+1! |
PXQKY | DEC+10~, DEC+11~, QUE+13*, QUE+14, QUE+15, QUE+16, QUE+17, QUE+18, QUE+19, QUE+20 |
PXQKY1 | DEC+11~, QUE+15*, QUE+16, QUE+17, QUE+18, QUE+19, QUE+20 |
PXQKY2 | DEC+11~, QUE+17*, QUE+18, QUE+19, QUE+20 |
PXQKY3 | DEC+11~, QUE+19*, QUE+20 |
PXQLEIN | PRINT+1~ |
PXQLIEN | DEC+11~, PRINT+3*, PRINT+6, PRINT+9*, PRINT+26 |
PXQMOV | PRINT+23~, PRINT+24*, PRINT+25 |
PXQNAME | PRINT+1~, PRINT+5*, PRINT+7 |
PXQNF | PRINT+23~, PRINT+25*, PRINT+26 |
PXQNFLD | DEC+12~, ADD+2*, ADD+3, ADD1+2*, ADD1+3 |
PXQSPAC | PRINT+1~, PRINT+6*, PRINT+7 |
PXQTEST | EXIT+2!, PRINT+7*, PRINT+12 |
PXQTYPE | DEC+11~, DEC+14* |
PXQUSER | ADD2+8~, ADD2+9*, ADD2+11, ADD2+12, ADD2+13 |
PXQVGHN | DEC+11~, QUE+9*, QUE+10 |
PXQWORD | EXIT+2!, PRINT+17! |
PXQWORD("TYPE" | PRINT+16 |
PXQX | PRINT+2~, PRINT+19*, PRINT+20*, PRINT+21 |
PXX | DEC+12~, QUE+14, QUE+16, QUE+18, QUE+20, DIS+1* |
REF | DEC+10~, QUE+5*, QUE+6, QUE+7 |
SNDPIECE | DEC+10~, QUE+8*, QUE+11, DIS+2 |
STOP | DEC+10~, REG+2*, REG+6*, QUE+2*, QUE+4*, QUE+10* |
SUB | DEC+10~, REG+4*, REG+5, REG+6, QUE+4* |
UPFILE | DEC+11~, DIS+21*, DIS+22*, DIS+25, ADD1+1, ADD1+2, ADD1+3 |
VAR | DEC+11~, QUE+14*, QUE+16*, QUE+18*, QUE+20*, EXIT+3* |
VDD | REF+5! |
VDD( | DEC+20*, REF+2, REF+3 |
VDDN | DEC+23! |
VDDN( | REG+3*, REG+7* |
VDDR | DEC+23! |
VDDR( | REG+6*, QUE+3, QUE+4 |
VISIT | DEC~, DIS+2 |
VISUAL | DEC~, DEC+25, DIS+2, DIS+3, DIS+4, DIS+5 |