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 |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables  | All
Print Page as PDF
Routine: VAQ2

Package: Patient Data Exchange

Routine: VAQ2


Information

VAQ2 ;ALB/CMM,JRP - PDX PATCH 15 DRIVER ;01-FEB-95

Source Information

Source file <VAQ2.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Patient Data Exchange 4 (FIX1,FIX2)^VAQ2A  ^VAQ2INIT  ($$INSERT,$$REPEAT)^VAQUTL1  $$NOW^VAQUTL99  
VA FileMan 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
PATCH15 ;Entry point for patch 15 installation
; Refer to VAQ*1.5*15 in National Patch Module for further details
SKIP1 ;Allow user to skip updating of file 394.82
SKIP2 ;Allow user to skip updating of file 394.83
EXIT ;Print footer and quit

External References

Name Field # of Occurrence
^DIR PATCH15+32, SKIP1+12, SKIP2+12
FIX1^VAQ2A SKIP1+15
FIX2^VAQ2A SKIP2+15
^VAQ2INIT PATCH15+36
$$INSERT^VAQUTL1 PATCH15+12, PATCH15+13, PATCH15+15, PATCH15+17, EXIT+3, EXIT+6, EXIT+9, EXIT+14, EXIT+15
$$REPEAT^VAQUTL1 PATCH15+6
$$NOW^VAQUTL99 PATCH15+8, EXIT+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$$INSERT^VAQUTL1("VAQ*1.5*15 ",TMP,1)
  • Line Location: PATCH15+13
Function Call: WRITE
  • Prompt: !!,$$INSERT^VAQUTL1(TMP,"",(40-($L(TMP)\2)))
  • Line Location: PATCH15+15
Function Call: WRITE
  • Prompt: !,$$INSERT^VAQUTL1(TMP,"",(40-($L(TMP)\2)))
  • Line Location: PATCH15+17
Function Call: WRITE
  • Prompt: !!,DASHES,!!
  • Line Location: PATCH15+18
Function Call: WRITE
  • Prompt: !!
  • Line Location: PATCH15+35
Function Call: WRITE
  • Prompt: !!
  • Line Location: SKIP1+11
Function Call: WRITE
  • Prompt: !!
  • Line Location: SKIP2+11
Function Call: WRITE
  • Prompt: !!,DASHES
  • Line Location: EXIT+1
Function Call: WRITE
  • Prompt: !!,$$INSERT^VAQUTL1(TMP,"",(40-($L(TMP)\2)))
  • Line Location: EXIT+3
Function Call: WRITE
  • Prompt: !!,$$INSERT^VAQUTL1("VAQ*1.5*15 ",TMP,1)
  • Line Location: EXIT+15
Routine Call
  • DIR
  • Line Location:
    • PATCH15+32
    • SKIP1+12
    • SKIP2+12

Label References

Name Line Occurrences
EXIT PATCH15+33, SKIP1+13, SKIP2+13, SKIP2+14
SKIP1 PATCH15+34
SKIP2 SKIP1+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABORT PATCH15+4~, PATCH15+5*, PATCH15+33*, SKIP1+13*, SKIP2+13*, EXIT+2
DASHES PATCH15+3~, PATCH15+6*, PATCH15+12, PATCH15+18, EXIT+1, EXIT+14
DIR PATCH15+3~, PATCH15+32!, SKIP1+12!, SKIP2+12!
DIR("?" PATCH15+23*, PATCH15+24*, PATCH15+25*, PATCH15+26*, PATCH15+27*, PATCH15+28*, PATCH15+29*, PATCH15+30*, PATCH15+31*, SKIP1+4*
, SKIP1+5*, SKIP1+6*, SKIP1+7*, SKIP1+8*, SKIP1+9*, SKIP1+10*, SKIP2+4*, SKIP2+5*, SKIP2+6*, SKIP2+7*
, SKIP2+8*, SKIP2+9*, SKIP2+10*
DIR("A" PATCH15+21*, SKIP1+2*, SKIP2+2*
DIR("B" PATCH15+22*, SKIP1+3*, SKIP2+3*
DIR(0 PATCH15+20*, SKIP1+1*, SKIP2+1*
DIRUT PATCH15+3~
DTOUT PATCH15+3~, PATCH15+33, SKIP1+13, SKIP2+13
DUOUT PATCH15+3~, PATCH15+33, SKIP1+13, SKIP2+13
MDY PATCH15+3~, PATCH15+9*, PATCH15+11, EXIT+11*, EXIT+13
TIME PATCH15+3~, PATCH15+10*, PATCH15+11, EXIT+12*, EXIT+13
TMP PATCH15+3~, PATCH15+8*, PATCH15+9, PATCH15+10, PATCH15+11*, PATCH15+12*, PATCH15+13, PATCH15+14*, PATCH15+15, PATCH15+16*
, PATCH15+17, EXIT+2*, EXIT+3, EXIT+5*, EXIT+6, EXIT+8*, EXIT+9, EXIT+10*, EXIT+11, EXIT+12
, EXIT+13*, EXIT+14*, EXIT+15
UPDATE82 PATCH15+4~, PATCH15+5*, SKIP1+16*, EXIT+4
UPDATE83 PATCH15+4~, PATCH15+5*, SKIP2+16*, EXIT+7
X PATCH15+4~
Y PATCH15+4~, PATCH15+34, SKIP1+14, SKIP2+14
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables  | All