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

Package: Automated Lab Instruments

Routine: LA7VSTP


Information

LA7VSTP ;VA/DALOI/JMC - HL7 environment setup routine ;JUL 06, 2010 3:14 PM

Source Information

Source file <LA7VSTP.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 4 ^DIC  (,FILE)^DIE  CLEAN^DILF  ^DIR  
Automated Lab Instruments 1 (HOST,REMOTE)^LA7VSTP1  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Automated Lab Instruments 2 LA7VSET  LA7VSET1  

Entry Points

Name Comments DBIA/ICR reference
HOST(PRIMARY,PRSITE,LRI,SITE,LA7VER) ;
SETPRO(FIELDS) ;sets up the PROTOCOL file #101
; Call with LA7X = Protocol name
; FIELDS = FileMan fields array
ADDSUB(LA7EVNT,LA7SUB) ; Add subscriber to event protocol
; Call with LA7EVNT = name of event protocol
; LA7SUB = name of subscriber protocol
SETAPP(LA7X,LA7FAC) ;sets up the HL7 APPLICATION PARAMETER file #771
EXIT ; Exit with message
REMOTE(PRIMARY,PRSITE,LRI,SITE,LA7VER) ;

External References

Name Field # of Occurrence
^DIC SETAPP+9, SETPRO+7, ADDSUB+18
^DIE SETAPP+15
FILE^DIE SETPRO+15, SETPRO+17
CLEAN^DILF SETPRO+18
^DIR EXIT+4
HOST^LA7VSTP1 HOST+72
REMOTE^LA7VSTP1 REMOTE+71

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Setting up the following Host Labs for "_PRSITE
  • Line Location: HOST+6
Function Call: WRITE
  • Prompt: !," Updating HL7 APPLICATION PARAMETER file (#771)."
  • Line Location: HOST+7
Function Call: WRITE
  • Prompt: !," Updating PROTOCOL file (#101)."
  • Line Location: HOST+16
Function Call: WRITE
  • Prompt: !,"Setting up the REMOTE Lab, "_SITE_" and HOST Lab "_PRSITE
  • Line Location: REMOTE+5
Function Call: WRITE
  • Prompt: !," Updating HL7 APPLICATION PARAMETER file (#771)."
  • Line Location: REMOTE+6
Function Call: WRITE
  • Prompt: !," Updating PROTOCOL file (#101)."
  • Line Location: REMOTE+15
Function Call: WRITE
  • Prompt: !!,"HL7 v1.6 Environment setup is complete!!"
  • Line Location: EXIT+1
Function Call: WRITE
  • Prompt: !,FIELDS
  • Line Location: SETPRO+8
Function Call: WRITE
  • Prompt: !," Adding "_X
  • Condition for execution: $P(Y,U,3)
  • Line Location: SETPRO+8
Routine Call
  • DIC
  • Line Location:
    • SETAPP+9
    • SETPRO+7
    • ADDSUB+18
Routine Call
  • DIE
  • Line Location:
    • SETAPP+15
Routine Call
  • DIE
  • Line Location:
    • SETPRO+15
    • SETPRO+17
Routine Call
  • DIR
  • Line Location:
    • EXIT+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(101 - [#101] Classic Fileman Calls
^HL(771 - [#771] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(101 ADDSUB+17
^ORD(101 - [#101] ADDSUB+6, ADDSUB+7, ADDSUB+10, ADDSUB+11, ADDSUB+14

Label References

Name Line Occurrences
$$SETAPP HOST+11, HOST+14, REMOTE+10, REMOTE+13
ADDSUB HOST+42, HOST+70, REMOTE+42, REMOTE+69
EXIT HOST+4, HOST+73, REMOTE+3, REMOTE+72
SETPRO HOST+27, HOST+39, HOST+56, HOST+67, REMOTE+28, REMOTE+39, REMOTE+54, REMOTE+66

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D0 ADDSUB+4~
DA SETAPP+14*, SETPRO+4~, SETPRO+9*, SETPRO+10, SETPRO+12, ADDSUB+4~
DA(1 ADDSUB+16*
DIC SETAPP+5~, SETAPP+8*, SETPRO+4~, SETPRO+6*, ADDSUB+4~, ADDSUB+16*
DIC("P" ADDSUB+17*
DIC(0 SETAPP+8*, SETPRO+6*, ADDSUB+17*
DIE SETAPP+5~, SETAPP+14*
DIR EXIT+3!
DIR(0 EXIT+4*
DLAYGO SETAPP+5~, SETAPP+8*, SETPRO+6*, ADDSUB+4~, ADDSUB+17*
DR SETAPP+5~, SETAPP+14*, ADDSUB+4~
DUZ SETPRO+16
FDA SETPRO+4~
FDA(1 SETPRO+13*, SETPRO+14*
FDA(2 SETPRO+16*
FIELDS SETPRO~, SETPRO+6, SETPRO+8
FIELDS( SETPRO+13
I HOST+38*, HOST+52*, HOST+53*, HOST+65*, HOST+66*, REMOTE+26*, REMOTE+38*, REMOTE+53*, REMOTE+62*, REMOTE+63*
, SETPRO+4~, SETPRO+12*, SETPRO+13*
LA7101E ADDSUB+4~, ADDSUB+10*, ADDSUB+14, ADDSUB+16
LA7101S ADDSUB+4~, ADDSUB+11*, ADDSUB+14
LA7DIE SETPRO+4~
LA7EVNT ADDSUB~, ADDSUB+7, ADDSUB+10
LA7FAC SETAPP~, SETAPP+14
LA7IENS SETPRO+4~, SETPRO+12*, SETPRO+13, SETPRO+14, SETPRO+16
>> LA7QUIET SETPRO+8
LA7SUB ADDSUB~, ADDSUB+6, ADDSUB+11, ADDSUB+16
LA7VER HOST~, HOST+9*, HOST+26, HOST+36, HOST+54, HOST+64, REMOTE~, REMOTE+8*, REMOTE+25, REMOTE+37
, REMOTE+52, REMOTE+64, EXIT+2
LA7X SETAPP~, SETAPP+7, SETAPP+11
LA7Y HOST+2~, REMOTE+1~, SETAPP+5~, SETAPP+10*, SETAPP+11, SETAPP+12, SETAPP+14, SETAPP+16
LACLNT HOST+2~, HOST+29!, HOST+30*, HOST+39, HOST+42, HOST+58!, HOST+59*, HOST+67, HOST+70, REMOTE+1~
, REMOTE+30!, REMOTE+31*, REMOTE+39, REMOTE+42, REMOTE+56!, REMOTE+57*, REMOTE+66, REMOTE+69
LACLNT( HOST+32*, HOST+33*, HOST+34*, HOST+35*, HOST+36*, HOST+38*, HOST+61*, HOST+62*, HOST+63*, HOST+64*
, HOST+65*, HOST+66*, REMOTE+33*, REMOTE+34*, REMOTE+35*, REMOTE+36*, REMOTE+37*, REMOTE+38*, REMOTE+59*, REMOTE+60*
, REMOTE+61*, REMOTE+62*, REMOTE+63*, REMOTE+64*
LACLNT(4 HOST+31*, HOST+60*, REMOTE+32*, REMOTE+58*
LACLNT(771 HOST+37*, REMOTE+65*
LAHOST HOST+2~, HOST+13*, HOST+14*, HOST+23, HOST+61, REMOTE+1~, REMOTE+9*, REMOTE+10*, REMOTE+22, REMOTE+59
LAREMOTE HOST+2~, HOST+10*, HOST+11*, HOST+32, HOST+49, REMOTE+1~, REMOTE+12*, REMOTE+13*, REMOTE+33, REMOTE+49
LASERV HOST+2~, HOST+20!, HOST+21*, HOST+27, HOST+42, HOST+46!, HOST+47*, HOST+56, HOST+70, REMOTE+1~
, REMOTE+19!, REMOTE+20*, REMOTE+28, REMOTE+42, REMOTE+46!, REMOTE+47*, REMOTE+54, REMOTE+69
LASERV( HOST+23*, HOST+24*, HOST+25*, HOST+26*, HOST+49*, HOST+50*, HOST+51*, HOST+52*, HOST+53*, HOST+54*
, REMOTE+22*, REMOTE+23*, REMOTE+24*, REMOTE+25*, REMOTE+26*, REMOTE+49*, REMOTE+50*, REMOTE+51*, REMOTE+52*, REMOTE+53*
, EXIT+2*
LASERV(4 HOST+22*, HOST+48*, REMOTE+21*, REMOTE+48*
LASERV(772 HOST+55*, REMOTE+27*
LRI HOST~, HOST+4, HOST+13, HOST+14, HOST+21, HOST+30, HOST+47, HOST+59, REMOTE~, REMOTE+3
, REMOTE+12, REMOTE+13, REMOTE+20, REMOTE+31, REMOTE+47, REMOTE+57
LRS HOST+2~, REMOTE+1~
ORU HOST+2~, REMOTE+1~
PRIMARY HOST~, HOST+10, HOST+11, REMOTE~, REMOTE+9, REMOTE+10
PROT HOST+2~, REMOTE+1~
PRSITE HOST~, HOST+6, REMOTE~, REMOTE+5
SITE HOST~, REMOTE~, REMOTE+5
U SETPRO+8, ADDSUB+17
X SETAPP+7*, SETPRO+6*, SETPRO+8, ADDSUB+4~, ADDSUB+16*
Y SETAPP+10, SETPRO+8, SETPRO+9, ADDSUB+4~
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