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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: VAQREQ05

Package: Patient Data Exchange

Routine: VAQREQ05


Information

VAQREQ05 ;ALB/JFP - REQUEST PDX RECORD, COPY DOMAIN;01MAR93

Source Information

Source file <VAQREQ05.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 2 ^DIC  ^DIR  
Patient Data Exchange 1 $$OKDOM^VAQREQ03  

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 VAQREQ02  

Entry Points

Name Comments DBIA/ICR reference
EP ; -- Main entry point for the list processor
; - Called from VAQREQ02
REQ ; -- Request domain
ASKDOM ; -- Call to Dir to request domain
DOM ; -- Dic lookup to verify domain in file 4.2
GDOM ; -- Dic lookup to verify domain group name in file 394.83
G1
G2
SETG ; --
DELDOM ; -- Deletes domain & segments associated with domain
COPY ; -- Copies segments to new domain(s)
C1
C2
LISTD ; -- Displays a list domains selected
END ; -- End of code

External References

Name Field # of Occurrence
^DIC DOM+3, GDOM+4
^DIR ASKDOM+7
$$OKDOM^VAQREQ03 SETG+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKDOM+7
Function Call: WRITE
  • Prompt: $C(7)," ...Domain is closed"
  • Line Location: DOM+6
Function Call: WRITE
  • Prompt: " ...Domain entered does not have a station number"
  • Line Location: DOM+9
Function Call: WRITE
  • Prompt: " ...Domain does not have a valid station number"
  • Line Location: DOM+11
Function Call: WRITE
  • Prompt: !!,"** NO ENTRIES SELECTED"
  • Line Location: DELDOM+2
Function Call: WRITE
  • Prompt: " ... ",X," Not Selected"
  • Line Location: DELDOM+3
Function Call: WRITE
  • Prompt: !!,"** NO DOMAIN(S) SELECTED"
  • Line Location: LISTD+2
Function Call: WRITE
  • Prompt: !!,"------------------------------ Domains Selected ------------------------------"
  • Line Location: LISTD+3
Function Call: WRITE
  • Prompt: ?L#8*40
  • Line Location: LISTD+4
Function Call: WRITE
  • Prompt: N
  • Line Location: LISTD+4
Function Call: WRITE
  • Prompt: !,"-------------------------------------------------------------------------------"
  • Line Location: LISTD+5
Function Call: WRITE
  • Prompt: !
  • Line Location: LISTD+6
Routine Call
  • DIC
  • Line Location:
    • DOM+3
    • GDOM+4
Routine Call
  • DIR
  • Line Location:
    • ASKDOM+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VAT(394.83 - [#394.83] Classic Fileman Calls
^DIC(4.2 - [#4.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] DOM+10, DOM+12, SETG+2
^DIC(4.2 - [#4.2] SETG+3
^TMP("VAQCOPY" REQ+8, REQ+11!, ASKDOM+1, DOM+12*, SETG+4*, DELDOM+3, DELDOM+4!, COPY+2, C1, LISTD+2
, LISTD+4
^TMP("VAQIDX" REQ+5
^TMP("VAQSEG" C1*, C1+1, C2*
^VAT(394.83 - [#394.83] GDOM+5, G1+1, G2

Label References

Name Line Occurrences
ASKDOM REQ+7
C1 COPY+2
C2 C1+1
COPY REQ+8
DELDOM ASKDOM+10
DOM ASKDOM+11
G1 GDOM+6
G2 G1+1
GDOM ASKDOM+12
LISTD ASKDOM+1, ASKDOM+9
SETG G2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIC DOM+2*, DOM+3!, GDOM+2*, GDOM+4!
DIC(0 DOM+2*, GDOM+3*
DIR ASKDOM+7!
DIR("?" ASKDOM+5*
DIR("??" ASKDOM+6*
DIR("A" ASKDOM+3*
DIR(0 ASKDOM+4*
DIRUT REQ+1~, REQ+7, REQ+9!, ASKDOM+7
DOM REQ+2~, REQ+10!, COPY+1*, COPY+2*, C1, C2
DOMAIN REQ+2~, REQ+10!, DOM+8*, DOM+12, SETG+3*, SETG+4
DOMDA REQ+2~, REQ+10!, G1*, G2*, SETG+1, SETG+3
DOMNODE REQ+2~, REQ+10!, C1*
DTOUT REQ+1~, REQ+9!, DOM+3, GDOM+4
DUOUT REQ+1~, REQ+9!, DOM+3, GDOM+4
FLAGS DOM+1~, DOM+5*, DOM+6
GRP REQ+2~, REQ+10!, GDOM+5*
GRPDA REQ+2~, REQ+10!, GDOM+5*, G1+1, G2, SETG+1
INST REQ+2~, REQ+10!, DOM+12*, SETG+2*, SETG+4
INSTDA REQ+2~, REQ+10!, DOM+8*, DOM+9, DOM+10, DOM+12, G1*, G1+1*, G2, SETG+1
, SETG+2, SETG+4
L REQ+1~, REQ+9!, LISTD+4*
N REQ+1~, REQ+9!, LISTD+4*
POP REQ+1~, REQ+9!, ASKDOM+2*, ASKDOM+9, ASKDOM+10, ASKDOM+11, ASKDOM+12, DOM+3*, DOM+6*, DOM+9*
, DOM+11*, GDOM+4*, DELDOM+1*, LISTD+1*
SDAT REQ+1~, REQ+5*, REQ+9!, C1+1, C2
SDI REQ+1~, REQ+3*, REQ+4*, REQ+5, REQ+9!
>> SEG C1*, C1+1*, C2
SEGNODE REQ+11!, C2*
STNO REQ+2~, REQ+10!, DOM+10*, DOM+11, DOM+12
U DOM+5, DOM+8, DOM+12, GDOM+5, SETG+2, SETG+3
VALMY REQ+9!
VALMY( REQ+4
X REQ+1~, REQ+9!, ASKDOM+8*, ASKDOM+9, ASKDOM+10, ASKDOM+11, ASKDOM+12, GDOM+1*, DELDOM+1*, DELDOM+2
, DELDOM+3, DELDOM+4
Y REQ+1~, REQ+9!, ASKDOM+8, DOM+3, DOM+8, GDOM+4, GDOM+5
Y(0 DOM+5, DOM+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All