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

Package: Patient Data Exchange

Routine: VAQPST03


Information

VAQPST03 ;ALB/JFP - PDX, POST INIT ROUTINE ;01JUN93

Source Information

Source file <VAQPST03.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 2 ^DIC  ^DIE  
Patient Data Exchange 1 (ALL,COP)^VAQPST04  

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 VAQPST01  

Entry Points

Name Comments DBIA/ICR reference
SEG ; -- Initialization of VAQ - Segment Group file 394.84
S1 ; -- Prompt entry
OUT ; -- Initialization of VAQ - Outgoing Group file 394.83
O1 ; -- Prompt entry
REL ; -- Initialization of VAQ - Release Group file 394.82
R1 ; -- Prompt entry
ENCR ; -- Initialization of VAQ - Encrypted Fields File 394.73
E1 ; -- Prompt entry
COPV1 ; -- Copies multiple in V1.0 PDX parameter file to release group file
V2 ; --
END ; -- End of code

External References

Name Field # of Occurrence
^DIC S1+4, O1+4, R1+4, E1+4, V2+12
^DIE S1+10, O1+10, R1+10, E1+10
ALL^VAQPST04 SEG+3
COP^VAQPST04 SEG+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Initialization of VAQ - Segment Group File...",!
  • Line Location: SEG+1
Function Call: WRITE
  • Prompt: !,"Error...VAQ - Segment Group file missing, post init halted"
  • Line Location: SEG+2
Function Call: WRITE
  • Prompt: !!,"Add/Edit/Delete entries in VAQ - Segment Group File",!
  • Line Location: SEG+5
Function Call: WRITE
  • Prompt: !!," ** Initialization of VAQ - Segment Group File complete"
  • Line Location: SEG+7
Function Call: WRITE
  • Prompt: !
  • Line Location: S1+1
Function Call: WRITE
  • Prompt: !!,"Initialization of VAQ - Outgoing Group File... (add/edit/delete) ",!
  • Line Location: OUT+1
Function Call: WRITE
  • Prompt: !,"Error...VAQ - Outgoing Group file missing, post init halted"
  • Line Location: OUT+2
Function Call: WRITE
  • Prompt: !!," ** Initialization of VAQ - Outgoing Group File complete"
  • Line Location: OUT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: O1+1
Function Call: WRITE
  • Prompt: !!,"Initialization of VAQ - Release Group File... ",!
  • Line Location: REL+1
Function Call: WRITE
  • Prompt: !,"Error...VAQ -Release Group file missing, post init halted"
  • Line Location: REL+2
Function Call: WRITE
  • Prompt: !,"Add/Edit/Delete entries in VAQ - Release Group"
  • Line Location: REL+4
Function Call: WRITE
  • Prompt: !!," ** Initialization of VAQ - Release Group File complete"
  • Line Location: REL+6
Function Call: WRITE
  • Prompt: !
  • Line Location: R1+1
Function Call: WRITE
  • Prompt: !!,"Initialization of VAQ - Encrypted Fields File... (add/edit/delete) ",!
  • Line Location: ENCR+1
Function Call: WRITE
  • Prompt: !,"Error...VAQ - Encrypted fields file missing, post init halted"
  • Line Location: ENCR+2
Function Call: WRITE
  • Prompt: !!," ** Initialization of VAQ - Encrypted Fields File complete"
  • Line Location: ENCR+4
Function Call: WRITE
  • Prompt: !
  • Line Location: E1+1
Function Call: WRITE
  • Prompt: !," Updating VAQ - Release Group file from version 1.0",!
  • Line Location: COPV1+1
Function Call: WRITE
  • Prompt: !," ** Unable to update...version 1.0 file missing. Requires Manual entry"
  • Line Location: COPV1+2
Function Call: WRITE
  • Prompt: !!,"Update from version 1 completed",!
  • Line Location: COPV1+6
Function Call: WRITE
  • Prompt: !," * Unable to add ",INST," to VAQ - Release Group File"
  • Line Location: V2+13
Function Call: WRITE
  • Prompt: !," ",INST," added"
  • Line Location: V2+14
Routine Call
  • DIC
  • Line Location:
    • S1+4
    • O1+4
    • R1+4
    • E1+4
    • V2+12
Routine Call
  • DIE
  • Line Location:
    • S1+10
    • O1+10
    • R1+10
    • E1+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VAT(394.73 - [#394.73] Classic Fileman Calls
^VAT(394.82 - [#394.82] Classic Fileman Calls
^VAT(394.83 - [#394.83] Classic Fileman Calls
^VAT(394.84 - [#394.84] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] V2+5, V2+6
^DIC(4.2 - [#4.2] V2+7, V2+8
^VAT(394.2 - [#394.2] COPV1+2, COPV1+5, V2+1
^VAT(394.73 - [#394.73] ENCR+2
^VAT(394.82 - [#394.82] REL+2
^VAT(394.83 - [#394.83] OUT+2
^VAT(394.84 - [#394.84] SEG+2

Label References

Name Line Occurrences
COPV1 REL+3
E1 ENCR+3
O1 OUT+3
R1 REL+5
S1 SEG+6
V2 COPV1+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA S1+9*, S1+10!, O1+9*, O1+10!, R1+9*, R1+10!, E1+9*, E1+10!
DIC S1+2*, S1+4!, O1+2*, O1+4!, R1+2*, R1+4!, E1+2*, E1+4!, V2+10*, V2+12!
DIC("DR" S1+2*, O1+2*, R1+2*, E1+2*, V2+11*
DIC(0 S1+2*, O1+2*, R1+2*, E1+2*, V2+10*
DIE S1+9*, S1+10!, O1+9*, O1+10!, R1+9*, R1+10!, E1+9*, E1+10!
DLAYGO S1+3*, S1+4!, O1+3*, O1+4!, R1+3*, R1+4!, E1+3*, E1+4!, V2+10*, V2+12!
DOM COPV1+3~, V2+8*, V2+11
DOMPT COPV1+3~, V2+2*, V2+4, V2+7, V2+8
DR S1+9*, S1+10!, O1+9*, O1+10!, R1+9*, R1+10!, E1+9*, E1+10!
ENTRY COPV1+3~, COPV1+4*, COPV1+5*, V2+1
EXIT SEG+6, SEG+8!, S1+5*, S1+11*, OUT+3, OUT+5!, O1+5*, O1+11*, REL+5, REL+7!
, R1+5*, R1+11*, ENCR+3, ENCR+5!, E1+5*, E1+11*
INST COPV1+3~, V2+6*, V2+10, V2+13, V2+14
INSTPT COPV1+3~, V2+2*, V2+3, V2+5, V2+6
ND COPV1+3~, V2+1*, V2+2
>> POP SEG+2*, OUT+2*, REL+2*, ENCR+2*
U S1+5, S1+7, S1+9, O1+5, O1+7, O1+9, R1+5, R1+7, R1+9, E1+5
, E1+7, E1+9, V2+2, V2+6, V2+8
X V2+10*, V2+12!
Y SEG+8!, S1+5, S1+6, S1+7, S1+9, S1+11, OUT+5!, O1+5, O1+6, O1+7
, O1+9, O1+11, REL+7!, R1+5, R1+6, R1+7, R1+9, R1+11, ENCR+5!, E1+5
, E1+6, E1+7, E1+9, E1+11, V2+13
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