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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: VAQDIS15

Package: Patient Data Exchange

Routine: VAQDIS15


Information

VAQDIS15 ;ALB/JFP - PDX,DISPLAY SEGMENTS FOR DISPLAY;01MAR93

Source Information

Source file <VAQDIS15.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Patient Data Exchange 6 EP^VAQDIS16  $$DEVICE^VAQDIS17  ($$CENTER,$$ROOT)^VAQDIS20  $$BLDDSP^VAQUPD2  $$REPEAT^VAQUTL1  ($$TRNDATA,KILLTRN)^VAQUTL92  
List Manager 3 EN^VALM  ($$SETFLD,$$SETSTR,CLEAR,PAUSE)^VALM1  SEL^VALM2  
Kernel 1 (T0,T1)^%ZOSV  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 12

Package Total Caller Graph
Patient Data Exchange 8 VAQ DIS ALL SEGMENT  VAQ DIS SELECTED SEGMENT  VAQ DISPLAY SEGMENT PDX11  VAQDIS11  VAQDIS12  VAQDIS16  VAQDIS17  VAQREQ01  
Registration 3 VAQ DIS ALL SEGMENT  VAQ DIS SELECTED SEGMENT  VAQ DISPLAY SEGMENT PDX11  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
TMP ; -- Set the array used by list processor
ENDLN ; -- End of display
ALL ; -- Selects all segments for display
END ; -- End of code
TRANEX
ERRMSG ; -- Displays a message if segment could be extracted
BLDDIS ; -- Builds display
INIT ; -- Initializes variables and defines screen
EXIT ; -- Note: The list processor cleans up its own variables.
; All other variables cleaned up here.
HD ; -- Make header line for list processor
ETMP ; -- Display for error message
SEL ; -- Selected segment(s) for display
EP ; -- Main entry point for the list processor
; -- K XQORS,VALMEVL (only kill on the first screen in)
SEL2

External References

Name Field # of Occurrence
T0^%ZOSV BLDDIS+1
T1^%ZOSV BLDDIS+8
EN^VALM EP+2
$$SETFLD^VALM1 INIT+13, INIT+14, INIT+15
$$SETSTR^VALM1 INIT+5, INIT+6, HD+3, HD+4, HD+5, HD+6, HD+7, ERRMSG+7, ERRMSG+8, ERRMSG+9
, ERRMSG+10, ENDLN+2, ENDLN+3
CLEAR^VALM1 SEL+5, ALL+4
PAUSE^VALM1 TRANEX
SEL^VALM2 SEL+1
EP^VAQDIS16 SEL+13, ALL+11
$$DEVICE^VAQDIS17 SEL+6, ALL+5
$$CENTER^VAQDIS20 ERRMSG+6
$$ROOT^VAQDIS20 ERRMSG+1, ENDLN+1
$$BLDDSP^VAQUPD2 BLDDIS+4
$$REPEAT^VAQUTL1 ERRMSG+4
$$TRNDATA^VAQUTL92 HD+2
KILLTRN^VAQUTL92 HD+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Error in getting device"
  • Line Location: SEL+8
Function Call: WRITE
  • Prompt: !,"Error in getting device"
  • Line Location: ALL+6
Routine Call
  • VALM
  • Line Location:
    • EP+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("VAQD2" INIT+1!, TMP+2*, TMP+3*, EXIT+3!
^TMP("VAQIDXSG" TMP+4*, ALL+1, ALL+9, BLDDIS+2, EXIT+3!
^VAT(394.61 - [#394.61] INIT+4, INIT+9
^VAT(394.71 - [#394.71] INIT+10, INIT+11, ERRMSG+3

Label References

Name Line Occurrences
BLDDIS SEL+11, ALL+9
ENDLN SEL+12, ALL+10
ERRMSG BLDDIS+6
ETMP ERRMSG+6, ERRMSG+7, ERRMSG+8, ERRMSG+9, ERRMSG+10, ENDLN+2, ENDLN+3
INIT SEL+8, SEL2, ALL+6
SEL2 SEL+9
TMP INIT+5, INIT+7, INIT+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN INIT+4, INIT+9, BLDDIS+4
>> ENTRY SEL+10*, SEL+11*, ALL+8*, ALL+9*, BLDDIS+2
EROOT ERRMSG+1*, ERRMSG+12!, ENDLN+1*, ENDLN+4!, ETMP+2
>> ERRMSG BLDDIS+6*, ERRMSG+8
OFFSET BLDDIS+4*, BLDDIS+5, BLDDIS+6, ERRMSG+11*, EXIT+5!
ROOT SEL+4*, ALL+3*, BLDDIS+4, ERRMSG+1, ENDLN+1, EXIT+5!
>> SDAT BLDDIS+2*, BLDDIS+3
SEGDE INIT+2*, INIT+9*, INIT+10, INIT+11, TMP+4, BLDDIS+3*, BLDDIS+4, ERRMSG+3, EXIT+4!
SEGMNU INIT+10*, INIT+14, TMP+4, EXIT+4!
SEGNM INIT+11*, INIT+15, EXIT+4!
U INIT+10, INIT+11, BLDDIS+3, BLDDIS+6
VALMBCK SEL+8*, SEL+9*, SEL2+1*, ALL+1*, ALL+6*, ALL+7!, ALL+12!, TRANEX+1*
>> VALMCNT INIT+2*, TMP+1*, TMP+2, TMP+3, SEL+3*, ALL+2*, BLDDIS+4, BLDDIS+5*, ERRMSG+11, ETMP+1*
, ETMP+2
>> VALMHDR(1 HD+9*
>> VALMHDR(2 HD+10*
>> VALMHDR(3 HD+11*
>> VALMY SEL+2
>> VALMY( SEL+11
>> VAQADOM HD+4
>> VAQADT HD+7
VAQCTR ERRMSG+5*, ERRMSG+6, ERRMSG+12!
>> VAQDFN HD+2
>> VAQECNT INIT+2*, INIT+12*, INIT+13, TMP+3, TMP+4
>> VAQESSN HD+5
>> VAQFLAG TRANEX+1
VAQLN ERRMSG+4*, ERRMSG+6, ERRMSG+12!
>> VAQPTID HD+5, HD+6
>> VAQPTNM HD+3
VAQSEGND ERRMSG+2*, ERRMSG+3*, ERRMSG+5, ERRMSG+12!
X INIT+5*, INIT+6*, INIT+13*, INIT+14*, INIT+15*, TMP+2, SEL+6*, SEL+8, SEL+9, ALL+5*
, ALL+6, ALL+7, ERRMSG+6*, ERRMSG+7*, ERRMSG+8*, ERRMSG+9*, ERRMSG+10*, ERRMSG+12!, ENDLN+2*, ENDLN+3*
, ETMP+2
X0 HD+1~, HD+2*, HD+14!
X1 HD+1~, HD+3*, HD+4*, HD+10, HD+14!
X2 HD+1~, HD+5*, HD+6*, HD+7*, HD+11, HD+14!
>> XRT0 BLDDIS+8
>> XRTL BLDDIS+1
>> XRTN BLDDIS+8*

Marked Items

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