PXBGPRV4 ;ISL/JVS - DOUBLE ?? GATHERING OF FORM PROVIDERS ; 5/7/03 3:36pm
Source file <PXBGPRV4.m>
Package | Total | Call Graph |
---|---|---|
PCE Patient Care Encounter | 4 | PRV^PXBAICS (LOC,WIN17)^PXBCC $$OCCUP^PXBGPRV HELP1^PXBUTL1 |
Automated Information Collection System | 1 | GETLST^IBDF18A |
VA FileMan | 1 | ^DIR |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
PCE Patient Care Encounter | 1 | PXBHLP2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
DOUBLE1(FROM) | ;--Entry point
|
|
NEW | ;
|
|
START1 | ;--RECYCLE POINT
|
|
TEST | ;
|
|
LIST | ;-DISPLAY LIST TO THE SCREEN
|
|
PRMPT | ;---WRITE PROMPT HERE
|
|
VAL | ;-----Set the VAL equal to the value
|
|
EXITNEW | ;--EXIT
|
|
BACK | ;
|
|
FORWARD | ;
|
|
LOC | ;--LOCATE CURSOR
|
|
HEAD | ;--HEAD
|
|
SUB | ;--DISPLAY LIST TO THE SCREEN
|
|
SETUP | ;-SETP VARIABLES
|
|
PRMPT2 | ;-----Yes and No prompt if onlyi choice
|
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 |
|
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> BACK | NEW+5* |
>> CLINIC | START1+3 |
CNT | NEW+2~, NEW+3~, TEST+3*, TEST+5*, TEST+6, TEST+7, TEST+8, SUB+3* |
CODE | NEW+2~, NEW+3~ |
CYCLE | NEW+2~ |
>> DATA | NEW+6 |
DATE | LIST+7~, LIST+8*, LIST+9 |
DIR | EXITNEW+1! |
DIR("?" | PRMPT+8* |
DIR("A" | PRMPT+6*, PRMPT+7*, PRMPT2+3* |
DIR("B" | PRMPT2+4* |
DIR(0 | PRMPT+9*, PRMPT2+5* |
DIRUT | PRMPT+13! |
DTIME | TEST+13 |
FIELD | NEW+2~, SETUP+1* |
FILE | NEW+2~, SETUP+1* |
FROM | DOUBLE1~ |
HEADING | NEW+2~, TEST+18*, LIST+2, SUB+2, SETUP+2* |
>> IDATE | START1+3 |
INDEX | NEW+2~, NEW+5* |
>> IOBON | HEAD+1 |
>> IOCUU | TEST+11, HEAD+1 |
>> IOEDEOP | LOC+2 |
>> IOELEOL | TEST+11, HEAD+1 |
>> IOINHI | HEAD+1 |
>> IOINLOW | HEAD+1 |
IOM | TEST+13, HEAD+1 |
>> IOSGR0 | HEAD+1 |
NAME | NEW+2~, TEST+4*, TEST+6, LIST+5*, LIST+11, SUB+4*, SUB+5 |
>> NUM | LIST+4* |
OK | NEW+2~, TEST+13* |
PRV | NEW+3~ |
>> PXBCNT | PRMPT+1, PRMPT2+1 |
PXBPMT | NEW+3~ |
PXBPMT( | TEST+3, TEST+4, TEST+7 |
PXBPMT(0 | TEST+1, TEST+2 |
>> PXBVST | LIST+6, LIST+8 |
>> RESULTS | TEST+13* |
SCREEN | NEW+2~ |
START | NEW+2~, NEW+6*, BACK+1*, FORWARD+1* |
START("IEN" | BACK+2*, FORWARD+2* |
SUB | NEW+2~, NEW+6*, TEST+3*, TEST+4, TEST+7, LIST+3*, LIST+4*, LIST+5, LIST+6, LIST+11 , PRMPT+4, PRMPT+6, PRMPT+11, PRMPT+12, SUB+3*, SUB+4, SUB+5 |
SUB2 | NEW+3~, NEW+6*, LIST+4*, PRMPT+9 |
TANA | EXITNEW+2! |
TITLE | NEW+2~, START1+1*, HEAD+1 |
TOTAL | NEW+3~, TEST+1*, TEST+8*, TEST+11, TEST+14, LIST+14, PRMPT+5, EXITNEW+2! |
>> TYPE | LIST+6*, LIST+9*, LIST+10*, LIST+11 |
>> VAL | PRMPT+13*, VAL+1*, EXITNEW+3 |
>> X | PRMPT+11, PRMPT+12*, VAL+1, PRMPT2+7*, PRMPT2+8* |
Y | LIST+7~, LIST+8*, PRMPT2+7, PRMPT2+8 |
Name | Field # of Occurrence |
---|---|
$T(PRV^PXBAICS | START1+3 |