Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: VAQLED01

Package: Patient Data Exchange

Routine: VAQLED01


Information

VAQLED01 ;ALB/JFP,JRP - PDX LOAD/EDIT, STATUS SCREEN;01MAR93

Source Information

Source file <VAQLED01.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Patient Data Exchange 9 $$VRFYUSER^VAQAUT  TR^VAQDIS01  EP^VAQLED03  EP^VAQLED07  $$INSERT^VAQUTL1  $$RLSEPAT^VAQUTL92  (PAUSE,STATPTR)^VAQUTL95  $$EXPTRN^VAQUTL97  
($$DASHSSN,$$DOBFMT)^VAQUTL99  
List Manager 3 EN^VALM  ($$SETFLD,$$SETSTR,CLEAR)^VALM1  EN^VALM2  
Kernel 1 (T0,T1)^%ZOSV  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Patient Data Exchange 3 VAQ LED STATUS PDX5  VAQ LOAD EDIT  VAQLED10  
Registration 2 VAQ LED STATUS PDX5  VAQ LOAD EDIT  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EP ; -- Main entry point for the list processor
INIT ; -- Build array of PDX transactions for entered patient
SETD ; -- Set data for display in list processor
TMP ; -- Set the array used by list processor
HD ; -- Make header line for list processor
LED ; -- load/edit
EXPAND ; -- Displays MAS minimal information from PDX data file (394.62)
CREATE ; -- Creates new patient
SIGNA ; -- Signature
EXIT ; -- Note: The list processor cleans up its own variables.
; All other variables cleaned up here.

External References

Name Field # of Occurrence
T0^%ZOSV INIT+9
T1^%ZOSV INIT+14
EN^VALM EP+2
$$SETFLD^VALM1 SETD+21, SETD+22, SETD+23, SETD+24
$$SETSTR^VALM1 INIT+7, INIT+8, INIT+12, INIT+13
CLEAR^VALM1 LED+5
EN^VALM2 LED+3, EXPAND+1
$$VRFYUSER^VAQAUT SIGNA+1
TR^VAQDIS01 EXPAND+8
EP^VAQLED03 LED+19
EP^VAQLED07 CREATE+1
$$INSERT^VAQUTL1 HD+4
$$RLSEPAT^VAQUTL92 SETD+34, LED+12
PAUSE^VAQUTL95 LED+7
STATPTR^VAQUTL95 INIT+4
$$EXPTRN^VAQUTL97 SETD+8
$$DASHSSN^VAQUTL99 SETD+28, SETD+36, LED+15
$$DOBFMT^VAQUTL99 SETD+14, LED+17

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("VAQIDX" INIT+3!, TMP+4*, LED+9, EXPAND+5, EXIT+6!
^TMP("VAQL1" INIT+3!, TMP+2*, TMP+3*, LED+1*, LED+20, EXIT+6!
^VAT(394.61 - [#394.61] INIT+10, SETD+3, SETD+11, LED+11, EXPAND+7

Label References

Name Line Occurrences
INIT LED+23
SETD INIT+10
SIGNA LED+6
TMP INIT+7, INIT+8, INIT+12, INIT+13, SETD+25, SETD+32, SETD+40, SETD+42

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DATETIME INIT+1!, SETD+14*, SETD+16*, SETD+17*, SETD+23, EXIT+2!
DFN INIT+2!, LED+10*, EXPAND+6*, EXPAND+7*, EXIT+3!
DFNPT INIT+2!, EXIT+3!
DFNTR INIT+2!, LED+11*, LED+12, EXIT+3!
DOMAIN INIT+1!, SETD+19*, SETD+22, EXIT+2!
DUZ SIGNA+1
NAME SETD+1~, SETD+27*, SETD+29, SETD+35*, SETD+37
ND INIT+1!, SETD+11*, EXIT+2!
NODE INIT+1!, EXIT+2!
NODE( SETD+11*
NODE("ATHR1" SETD+13
NODE("ATHR2" SETD+19
NODE("QRY" SETD+27, SETD+28
NODE("RQST1" SETD+13
NODE(0 SETD+12
SDAT INIT+2!, LED+9*, LED+10, EXPAND+5*, EXPAND+6, EXIT+3!
SDI INIT+1!, LED+8*, LED+9, LED+20*, LED+22, EXPAND+3*, EXPAND+4*, EXPAND+5, EXIT+3!
SFLAG INIT+1!, SETD+2*, SETD+4*, SETD+5*, SETD+6, EXIT+2!
SSN SETD+1~, SETD+28*, SETD+29, SETD+36*, SETD+37
STATPTR INIT+1!, SETD+3*, SETD+4, SETD+5, SETD+13, SETD+17, SETD+30, SETD+38, EXIT+2!
TMP SETD+1~, SETD+15*, SETD+16, SETD+29*, SETD+30*, SETD+31, SETD+34*, SETD+35, SETD+36, SETD+37*
, SETD+38*, SETD+39, HD+1~, HD+3*, HD+4
TRDE INIT+1!, INIT+5*, INIT+10*, SETD+3, SETD+8, SETD+11, SETD+34, EXIT+2!
TRNO INIT+1!, INIT+7*, INIT+12*, SETD+12*, SETD+24, TMP+4, EXIT+2!
U SETD+3, SETD+19, LED+10, EXPAND+6
VALMBCK LED+7*, LED+21!, LED+24*, EXPAND+9*
>> VALMCNT INIT+5*, TMP+1*, TMP+2, TMP+3, TMP+4
VALMEVL EP+1!
>> VALMHDR(1 HD+2*
>> VALMHDR(2 HD+4*
>> VALMHDR(3 HD+5*
VALMY INIT+2!, LED+4, EXPAND+2, EXIT+3!
VALMY( EXPAND+4
VALMY(0 LED+8
VAQADFL EXIT+7!
VAQBCK LED+2*, LED+21, EXIT+5!
VAQCDTE EXIT+5!
VAQDFN INIT+2!, EXIT+4!
VAQECNT INIT+2!, INIT+5*, INIT+11, SETD+20*, SETD+21, TMP+3, TMP+4, EXIT+3!
VAQEDOB LED+17*, EXIT+4!
>> VAQESSN HD+3, LED+15*
VAQFLAG SETD+8*, SETD+9, EXIT+5!
VAQIDOB LED+16*, LED+17, EXIT+4!
VAQISSN INIT+6, INIT+10, LED+1, LED+14*, LED+15, LED+22*, EXIT+4!
VAQPTID LED+12*, LED+13, LED+14, LED+16, LED+18*, EXIT+4!
VAQPTNM INIT+6, INIT+10, HD+3, LED+1, LED+13*, LED+22*, EXIT+4!
VAQRSLT INIT+2!, SETD+4, SETD+13, SETD+17, SETD+38, EXIT+3!
VAQSIG LED+7!, SIGNA+1*, EXIT+4!
VAQTDTE SETD+13*, SETD+14, SETD+15, EXIT+5!
VAQTRNO INIT+2!, LED+10*, LED+11, EXPAND+6*, EXPAND+7, EXIT+4!
VAQUNSOL INIT+2!, SETD+5, SETD+13, SETD+17, SETD+30, SETD+38, EXIT+3!
X INIT+1!, INIT+7*, INIT+8*, INIT+12*, INIT+13*, SETD+21*, SETD+22*, SETD+23*, SETD+24*, SETD+31*
, SETD+39*, SETD+42*, TMP+2, EXIT+2!
>> XQORNOD(0 LED+3, EXPAND+1
XQORS EP+1!
>> XRT0 INIT+14
>> XRTL INIT+9
>> XRTN INIT+14*
Y INIT+1!, EXIT+2!

Marked Items

Name Field # of Occurrence
$T( INIT+14
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All