VAQREQ01 ;ALB/JFP - PDX, REQUEST PATIENT DATA, STATUS SCREEN;01MAR93
Source file <VAQREQ01.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 |
---|---|---|
Patient Data Exchange | 3 | VAQ DISPLAY PDX VAQ STATUS PDX1 VAQREQ10 |
Registration | 2 | VAQ DISPLAY PDX VAQ STATUS PDX1 |
Kernel | 1 | ^ORD(101 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EP | ; -- Main entry point for the list processor
|
|
INIT | ; -- Builds array of PDX transactions for the patient entered (SSN) or name
|
|
SETD | ; -- Set data for display in list processor
|
|
TMP | ; -- Set the array used by list processor
|
|
HD | ; -- Make header line for list processor
|
|
DIS | ; -- Display PDX data
|
|
EXIT | ; -- Note: The list processor cleans up its own variables.
; All other variables cleaned up here. |
|
END | ; -- End of code
|
Name | Field # of Occurrence |
---|---|
EN^VALM | EP+2 |
$$SETSTR^VALM1 | INIT+4, INIT+5, INIT+8, INIT+9, SETD+20, SETD+21, SETD+22, SETD+23, SETD+24, SETD+27 , SETD+28, SETD+29 |
EN^VALM2 | DIS+4 |
WORKLD^VAQDIS11 | DIS+11 |
EP^VAQDIS15 | DIS+16 |
SEG^VAQEXT06 | SETD+18 |
$$DOMKEY^VAQUTL94 | SETD+13 |
PAUSE^VAQUTL95 | DIS+14 |
STATPTR^VAQUTL95 | DIS+2 |
$$EXPTRN^VAQUTL97 | SETD+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DATETIME | SETD+10*, SETD+11*, SETD+22, EXIT+5! |
>> DFN | DIS+9*, DIS+10*, DIS+11, DIS+12 |
DIC | EXIT+4! |
DIR | EXIT+4! |
DOMAIN | SETD+14*, SETD+15*, SETD+16*, SETD+23, EXIT+4! |
DOMKEY | SETD+13*, SETD+14, SETD+15, SETD+16, EXIT+6! |
J | EXIT+5! |
K | SETD+25*, SETD+26, SETD+27, SETD+28, EXIT+5! |
ND | SETD+1*, EXIT+5! |
NODE | EXIT+4! |
NODE( | SETD+1* |
NODE("ATHR1" | SETD+9 |
NODE("ATHR2" | SETD+16 |
NODE("RQST1" | SETD+11 |
NODE("RQST2" | SETD+15 |
NODE(0 | SETD+6, SETD+7 |
SDAT | DIS+1~, DIS+8*, DIS+9 |
SDI | DIS+1~, DIS+6*, DIS+7*, DIS+8 |
SEG | EXIT+5! |
SEGDE | EXIT+5! |
SEGMENT | SETD+26*, SETD+27, SETD+28, EXIT+4! |
SEGMENT( | SETD+25, SETD+26, EXIT+4! |
SP50 | HD+1*, HD+2, HD+3, EXIT+5! |
STATUS | SETD+8*, SETD+24, EXIT+5! |
STDE | SETD+7*, SETD+8, SETD+13, EXIT+5! |
TRDE | INIT+2*, INIT+6*, SETD+1, SETD+3, SETD+18, EXIT+5! |
TRNO | INIT+4*, INIT+8*, SETD+6*, SETD+21, TMP+4, EXIT+5! |
U | SETD+6, SETD+7, SETD+8, SETD+9, SETD+11, SETD+15, SETD+16, DIS+9, DIS+11, DIS+12 |
VALMBCK | DIS+15*, DIS+17!, DIS+19* |
>> VALMCNT | INIT+2*, TMP+1*, TMP+2, TMP+3, TMP+4 |
VALMEVL | EP+1! |
>> VALMHDR(1 | HD+2* |
>> VALMHDR(2 | HD+3* |
VALMY | DIS+1~, DIS+5 |
VALMY( | DIS+7 |
VAQBCK | DIS+1~, DIS+3*, DIS+17 |
>> VAQDFN | DIS+10* |
VAQECNT | INIT+2*, INIT+7, SETD+17*, SETD+20, TMP+3, TMP+4, EXIT+5! |
>> VAQEDOB | HD+3 |
>> VAQEELG | HD+2 |
>> VAQESSN | HD+3 |
VAQFLAG | SETD+3*, SETD+4, EXIT+6! |
>> VAQISSN | INIT+3, INIT+6 |
>> VAQNM | INIT+3, INIT+6, HD+2 |
VAQRSLT | DIS+1~, DIS+12 |
VAQTDTE | SETD+9*, SETD+10, SETD+11*, EXIT+6! |
VAQTRN | DIS+1~, DIS+9*, DIS+10 |
VAQUNSOL | DIS+1~, DIS+12 |
X | INIT+4*, INIT+5*, INIT+8*, INIT+9*, SETD+20*, SETD+21*, SETD+22*, SETD+23*, SETD+24*, SETD+27* , SETD+28*, SETD+29*, TMP+2, EXIT+5! |
>> XQORNOD(0 | DIS+4 |
XQORS | EP+1! |
>> Y | SETD+10*, SETD+11* |