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: VAQLED04

Package: Patient Data Exchange

Routine: VAQLED04


Information

VAQLED04 ;ALB/JFP - CREATES COMPARE ARRAYS FOR LOAD EDIT;01APR93

Source Information

Source file <VAQLED04.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Patient Data Exchange 2 $$SEGXTRCT^VAQDBI  $$SEGEXT^VAQUPD1  
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: 1

Package Total Caller Graph
Patient Data Exchange 1 VAQLED02  

Entry Points

Name Comments DBIA/ICR reference
MAIN ;-- Main entry point
EXTR ; -- loads extraction arrays
EXIT ; -- Cleans up variables
END ; -- End of code

External References

Name Field # of Occurrence
T0^%ZOSV MAIN+2
T1^%ZOSV MAIN+9
$$SEGXTRCT^VAQDBI EXTR+8
$$SEGEXT^VAQUPD1 EXTR+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Please wait while MAS information is collected..."
  • Line Location: MAIN+3
Function Call: WRITE
  • Prompt: !," Error extracting ",$P($G(^VAT(394.71,SEGPTR,0)),U,2)," segment"
  • Line Location: EXTR+4
Function Call: WRITE
  • Prompt: !," Error extracting ",$P($G(^VAT(394.71,SEGPTR,0)),U,2)," MAS data patient file"
  • Line Location: EXTR+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^VAT(394.61 - [#394.61] MAIN+6
^VAT(394.71 - [#394.71] MAIN+5, MAIN+7, EXTR+4, EXTR+9

Label References

Name Line Occurrences
EXIT MAIN+6, MAIN+8
EXTR MAIN+6, MAIN+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFNPT EXTR+8
>> DFNTR MAIN+6, EXTR+3
ROOT MAIN+1~, EXTR+1*, EXTR+2, EXTR+3, EXTR+6*, EXTR+7, EXTR+8, EXIT+1!
SEGPTR MAIN+1~, MAIN+5*, MAIN+6, MAIN+7*, EXTR+3, EXTR+4, EXTR+8, EXTR+9, EXIT+1!
U EXTR+4, EXTR+9
VAQIGNC MAIN+1~, MAIN+4*, EXIT+1!
X EXTR+3*, EXTR+4, EXTR+8*, EXTR+9, EXIT+1!
>> XRT0 MAIN+9
>> XRTL MAIN+2
>> XRTN MAIN+9*

Marked Items

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