PXBGPRV3 ;ISL/JVS - DOUBLE ?? GATHERING OF CLINIC PROVIDER ;11/5/96 14:23
Source file <PXBGPRV3.m>
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
|
|
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~, START1+7*, START1+8, START1+9, START1+10, SUB+3* |
CODE | NEW+2~ |
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* |
DTIME | START1+15 |
FIELD | NEW+2~, SETUP+1* |
FILE | NEW+2~, SETUP+1* |
FROM | DOUBLE1~ |
HEADING | NEW+2~, START1+20*, LIST+2, SUB+2, SETUP+2* |
INDEX | NEW+2~, NEW+5* |
>> IOBON | HEAD+1 |
>> IOCUU | START1+13, HEAD+1 |
>> IOEDEOP | LOC+2 |
>> IOELEOL | START1+13, HEAD+1 |
>> IOINHI | HEAD+1 |
>> IOINLOW | HEAD+1 |
IOM | START1+15, HEAD+1 |
>> IOSGR0 | HEAD+1 |
NAME | NEW+2~, LIST+5*, LIST+11, SUB+4*, SUB+5 |
>> NUM | LIST+4* |
OK | NEW+2~, START1+15* |
PRV | NEW+3~, START1+7*, START1+8, START1+9 |
>> PXBCNT | PRMPT+1, PRMPT2+1 |
PXBPMT | NEW+3~, START1+5, START1+6 |
PXBPMT("PRV" | START1+7, START1+9 |
>> PXBVST | LIST+6, LIST+8 |
>> RESULTS | START1+15* |
SCREEN | NEW+2~ |
START | NEW+2~, NEW+6*, BACK+1*, FORWARD+1* |
START("IEN" | BACK+2*, FORWARD+2* |
SUB | NEW+2~, NEW+6*, 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~, START1+5*, START1+10*, START1+13, START1+16, LIST+14, PRMPT+5, EXITNEW+2! |
>> TYPE | LIST+6*, LIST+9*, LIST+10*, LIST+11 |
>> VAL | VAL+1*, EXITNEW+3 |
>> X | PRMPT+11, PRMPT+12*, VAL+1, PRMPT2+7*, PRMPT2+8* |
Y | LIST+7~, LIST+8*, PRMPT2+7, PRMPT2+8 |