PXQMAIN3 ;ISL/JVS - MAIN MENU ROUTINE #4 ;8/29/96 10:33
Source file <PXQMAIN3.m>
Package | Total | Call Graph |
---|---|---|
PCE Patient Care Encounter | 4 | $$DEC^PXQFE $$DEC^PXQFV ($$ASKENC,$$RE,$$SOR,READ,SDV)^PXQUTL ZIS^PXQZIS |
Kernel | 1 | ^%ZISC |
VA Fileman | 1 | ^DIR |
Name | Comments | DBIA/ICR reference |
---|---|---|
EXP6E | ;--TITLE OF PRINT OUT
|
|
AUDENC | ;--AUDIT TRAIL AND SOURCE
|
|
EXPENC | ;--EXPANDED VIEW
|
|
ALL6A | ;--TITLE OF PRINT OUT
|
|
AUD6A | ;--TITLE OF PRINT OUT
|
|
CLOSENC | ;--CLOSE DEVICE
|
|
MENENC | ;--MENU FOR WHAT TO DISPLAY FOR VISIT
|
|
ALLENC | ;--ALL OF THE ABOVE
|
|
ASKENC | ;--6TH OPTION
|
|
EXIT | ;--EXIT
|
|
CLOSE | ;--CLOSE DEVICE
|
|
DEC6D | ;--TITLE OF PRINT OUT
|
|
DECENC | ;--ENTRIES POINTING TO ENCOUNTER
|
Name | Field # of Occurrence |
---|---|
^%ZISC | DEC6D+9, EXP6E+10, AUD6A+7, ALL6A+12, CLOSENC+1, CLOSE+1 |
^DIR | MENENC+3 |
$$DEC^PXQFE | DEC6D+4, EXP6E+4, ALL6A+5 |
$$DEC^PXQFV | DEC6D+7, EXP6E+7, AUD6A+5, ALL6A+10 |
$$ASKENC^PXQUTL | ASKENC+3 |
$$RE^PXQUTL | ASKENC+7, DEC6D+1, DEC6D+3, DEC6D+6, EXP6E+1, EXP6E+3, EXP6E+6, AUD6A+1, AUD6A+4, ALL6A+1 , ALL6A+4, ALL6A+9 |
$$SOR^PXQUTL | AUD6A+3, ALL6A+8 |
READ^PXQUTL | ASKENC+8, DEC6D+8, EXP6E+9, AUD6A+6, ALL6A+11 |
SDV^PXQUTL | EXP6E+5, ALL6A+6 |
ZIS^PXQZIS | DECENC+3, EXPENC+3, AUDENC+5, ALLENC+5 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("XY" | DECENC+5, EXPENC+5, AUDENC+7, ALLENC+7 |
^SCE - [#409.68] | ASKENC+5 |
^SCE("AVSIT" | DEC6D+2, EXP6E+2, ALL6A+3 |
Name | Line Occurrences |
---|---|
ALLENC | MENENC+7 |
AUDENC | MENENC+6 |
CLOSE | DEC6D+10, EXP6E+11, AUD6A+8, ALL6A+13 |
CLOSENC | MENENC+3, MENENC+8 |
DECENC | MENENC+4 |
EXIT | DECENC+3, EXPENC+3, AUDENC+5, ALLENC+5 |
EXPENC | MENENC+5 |
MENENC | MENENC+4, MENENC+5, MENENC+6, MENENC+7 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ANS | ASKENC+1~ |
DFN | ASKENC+1~ |
>> DIR("A" | MENENC+1* |
>> DIR(0 | MENENC+2* |
DX | DECENC+5~*, EXPENC+5~*, AUDENC+7~*, ALLENC+7~* |
DY | DECENC+5~*, EXPENC+5~*, AUDENC+7~*, ALLENC+7~* |
I | ASKENC+1~, DEC6D+2~*, DEC6D+3, DEC6D+4, EXP6E+2~*, EXP6E+3, EXP6E+4, ALL6A+3~*, ALL6A+4, ALL6A+5 |
IEN | ASKENC+1~, ASKENC+3*, ASKENC+5*, ASKENC+6, ASKENC+9, DEC6D+2, DEC6D+6, DEC6D+7, EXP6E+2, EXP6E+6 , EXP6E+7, AUD6A+4, AUD6A+5, ALL6A+3, ALL6A+9, ALL6A+10 |
OPTION | DECENC+2*, EXPENC+2*, AUDENC+4*, ALLENC+4*, CLOSENC+3!, CLOSE+3!, EXIT+1! |
>> POP | DECENC+3, EXPENC+3, AUDENC+5, ALLENC+5 |
PXQAUDIT | AUDENC+1~, AUDENC+2*, ALLENC+1~, ALLENC+2* |
PXQSOR | AUDENC+1~, AUDENC+2*, ALLENC+1~, ALLENC+2* |
VISIT | ASKENC+1~, ASKENC+5*, AUD6A+3, ALL6A+8 |
>> Y | MENENC+3, MENENC+4, MENENC+5, MENENC+6, MENENC+7 |
>> ZTSK | DEC6D+10, EXP6E+11, AUD6A+8, ALL6A+13 |