PXBGSTP2 ;ISL/JVS - DOUBLE ?? GATHERING OF STOP CODES ;1/24/97 14:14
Source file <PXBGSTP2.m>
Package | Total | Call Graph |
---|---|---|
PCE Patient Care Encounter | 2 | (LOC,WIN17)^PXBCC HELP^PXBUTL0 |
VA Fileman | 2 | LIST^DIC ^DIR |
Package | Total | Caller Graph |
---|---|---|
PCE Patient Care Encounter | 2 | PXBHLP1 PXBPSTP |
Name | Comments | DBIA/ICR reference |
---|---|---|
LOC | ;--LOCATE CURSOR
|
|
PRMPT | ;---WRITE PROMPT HERE
|
|
FINISH | ;--FINISH
|
|
PROMPT | ;--PROMPT
|
|
SUB | ;--DISPLAY LIST TO THE SCREEN
|
|
VAL | ;-----Set the VAL equal to the value
|
|
PRMPT2 | ;-----Yes and No prompt if onlyi choice
|
|
DOUBLE1(FROM) | ;--Entry point
|
|
SETUP | ;-SETP VARIABLES
|
|
START1 | ;--RECYCLE POINT
|
|
LIST | ;-DISPLAY LIST TO THE SCREEN
|
|
EXITNEW | ;--EXIT
|
|
BACK | ;
|
|
HEAD | ;--HEAD
|
|
START | ;--RECYCLE
|
|
EXIT | ;--EXIT
|
|
DOUBLE(FROM) | ;--Entry point
|
|
FORWARD | ;
|
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 |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(40.7 - [#40.7] | START1+7 |
^TMP("PXBTANA" | FINISH+2, EXIT+1!, EXITNEW+1!, BACK+1, BACK+2, FORWARD+1, FORWARD+2, SUB+1, SUB+3, SUB+4 , SUB+5 |
^TMP("PXBTOTAL" | EXIT+1!, START1+12, LIST+5, LIST+6, LIST+7, VAL+1, EXITNEW+1! |
Name | Line Occurrences |
---|---|
BACK | PROMPT+7 |
EXIT | PROMPT+9 |
FORWARD | PROMPT+8 |
HEAD | START+7 |
LIST | PRMPT+11 |
LOC | DOUBLE+5, START+7, LIST+2 |
PRMPT2 | LIST+11 |
SETUP | START+4 |
START | PROMPT+7, PROMPT+8 |
SUB | START+7 |
VAL | LIST+1, PRMPT2+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
BACK | DOUBLE+2~, DOUBLE+4*, START+5, PROMPT+7*, PROMPT+8*, DOUBLE1+5*, START1+10 |
CNT | DOUBLE1+2~, SUB+3* |
CODE | DOUBLE+2~, DOUBLE1+2~, LIST+6*, LIST+8, SUB+4*, SUB+6 |
>> CYCL | START1+18* |
CYCLE | DOUBLE1+2~ |
>> DATA | DOUBLE1+6, START1+4, START1+5, START1+6, START1+7, START1+8*, START1+10, START1+16, START1+17 |
>> DIC("S" | DOUBLE+6, START1+10 |
DIR | EXIT+1!, EXITNEW+1! |
DIR("?" | PROMPT+4*, PRMPT+8* |
DIR("A" | PROMPT+3*, PRMPT+6*, PRMPT+7*, PRMPT2+3* |
DIR("B" | PRMPT2+4* |
DIR(0 | PROMPT+5*, PRMPT+9*, PRMPT2+5* |
DIRUT | PROMPT+9! |
>> ERROR | START1+18* |
FIELD | DOUBLE+2~, START+5, DOUBLE1+2~, START1+3*, START1+10, SETUP+2* |
FILE | DOUBLE+2~, START+5, DOUBLE1+2~, START1+2*, START1+10, SETUP+1* |
>> FIRST | FINISH+2, SUB+4, SETUP+1*, SETUP+2 |
FROM | DOUBLE~, DOUBLE1~ |
HEADING | DOUBLE+2~, DOUBLE1+2~, START1+23*, LIST+3, SUB+2, SETUP+3* |
INDEX | DOUBLE1+2~, DOUBLE1+5*, START1+4*, START1+5*, START1+6*, START1+10 |
>> IOBON | HEAD+1 |
>> IOCUU | HEAD+1 |
>> IOEDEOP | LOC+2 |
>> IOELEOL | HEAD+1 |
>> IOINHI | HEAD+1 |
>> IOINLOW | HEAD+1 |
IOM | HEAD+1 |
>> IOSGR0 | HEAD+1 |
NAME | DOUBLE+2~, DOUBLE1+2~, LIST+7*, LIST+8, SUB+5*, SUB+6 |
NRD | DOUBLE+3~ |
NUM | DOUBLE+2~, DOUBLE+4*, LIST+5* |
OK | DOUBLE1+2~ |
>> PXBCNT | PROMPT+1, PRMPT+1, PRMPT2+1 |
SCREEN | DOUBLE+2~, DOUBLE+3~, DOUBLE+4*, DOUBLE+6*, START+5, DOUBLE1+2~ |
>> SECOND | FINISH+2, SUB+5, SETUP+1*, SETUP+2 |
START | DOUBLE+2~, START+5, DOUBLE1+2~, DOUBLE1+6*, START1+4*, START1+5*, START1+6*, START1+7*, START1+10, BACK+1* , FORWARD+1* |
START("IEN" | BACK+2*, FORWARD+2* |
SUB | DOUBLE+2~, DOUBLE1+2~, DOUBLE1+6*, LIST+4*, LIST+5*, LIST+6, LIST+7, LIST+8, PRMPT+4, PRMPT+6 , PRMPT+11, PRMPT+12, SUB+3*, SUB+4, SUB+5, SUB+6 |
SUB2 | DOUBLE+3~, DOUBLE1+3~, DOUBLE1+6*, LIST+5*, PRMPT+9 |
TANA | EXITNEW+2! |
TEMP | DOUBLE+3~, DOUBLE1+3~ |
TITLE | DOUBLE+2~, START+2*, DOUBLE1+2~, START1+1*, HEAD+1 |
TOTAL | DOUBLE1+3~, START1+12*, START1+15, START1+19, LIST+1, LIST+11, PRMPT+5, EXITNEW+2! |
>> VAL | PROMPT+9*, FINISH+2*, EXIT+2, VAL+1*, EXITNEW+3 |
>> X | PROMPT+7, PROMPT+8, FINISH+2, LIST+1*, PRMPT+11, PRMPT+12*, VAL+1, PRMPT2+7*, PRMPT2+8* |
>> Y | PRMPT2+7, PRMPT2+8 |