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

Package: Automated Lab Instruments

Routine: LA7VLL


Information

LA7VLL ;VA/DALOI/JMC - Setup HL7 v1.6 Logical Link for Consolidation ;JUL 06, 2010 3:14 PM

Source Information

Source file <LA7VLL.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA Fileman 5 (,$$FIND1)^DIC  (,FILE)^DIE  CLEAN^DILF  $$GET1^DIQ  ^DIR  
Health Level Seven 1 LINK^HLUTIL3  
MailMan 1 $$MG^XMBGRP  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Automated Lab Instruments 2 LA7VSET  LA7VSET1  

Entry Points

Name Comments DBIA/ICR reference
TCP(LRI,PRIMARY) ;
LL ;
SETPRO(LA7X,LA7FLDS) ;
MAILGRP ; Create mail group for HL7 protocol logical link
ERROR ; Error creating domain
MAIL(LRI) ;

External References

Name Field # of Occurrence
^DIC MAIL+18, MAILGRP+20, TCP+19, TCP+40, SETPRO+5
$$FIND1^DIC MAIL+9, MAIL+13, TCP+10, TCP+14, TCP+32, TCP+35
^DIE SETPRO+9
FILE^DIE MAIL+25, TCP+26, TCP+48
CLEAN^DILF MAIL+26, TCP+27, TCP+49
$$GET1^DIQ MAILGRP+14
^DIR LL+17
LINK^HLUTIL3 TCP+7, TCP+30
$$MG^XMBGRP MAILGRP+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Updating HL LOGICAL LINK file (#870)."
  • Line Location: MAIL+8
Function Call: WRITE
  • Prompt: !,?5,"Adding LA7V"_$P(LRI,"^")
  • Line Location: MAIL+16
Function Call: WRITE
  • Prompt: !!,"Failure LA7V"_$P(LRI,"^")_" was not created in file #870."
  • Line Location: MAIL+21
Function Call: WRITE
  • Prompt: !!,"Creating mail group "_LA7VMGP_" for use by the"
  • Line Location: MAILGRP+4
Function Call: WRITE
  • Prompt: !,"HL7 v1.6 Logical Link "_LA7VMGP_"."
  • Line Location: MAILGRP+5
Function Call: WRITE
  • Prompt: !!,"Failure: mail group ",LA7VMGP," was not created in file #3.8."
  • Line Location: MAILGRP+12
Function Call: WRITE
  • Prompt: !!,"The INSTITUTION file (#4) entry for "_$P(LRI,"^",2)_" does not contain a domain."
  • Line Location: ERROR+2
Function Call: WRITE
  • Prompt: !,"Unable to create the COLLECTION system link for mail group ",$G(LA7VMGP),"."
  • Line Location: ERROR+3
Function Call: WRITE
  • Prompt: !,"The REMOTE MEMBER, S.HL V16 SERVER@domain name will need to be manually"
  • Line Location: ERROR+4
Function Call: WRITE
  • Prompt: !,"added to the mail group "_$G(LA7VMGP),"."
  • Line Location: ERROR+5
Function Call: WRITE
  • Prompt: !!,"Updating HL LOGICAL LINK file (#870)."
  • Line Location: TCP+9
Function Call: WRITE
  • Prompt: !,?5,"Adding "_LA7X
  • Line Location: TCP+17
Function Call: WRITE
  • Prompt: !!,"Failure "_LA7X_" was not created in file #870."
  • Line Location: TCP+22
Function Call: WRITE
  • Prompt: !,?5,"Adding "_LA7X
  • Line Location: TCP+38
Function Call: WRITE
  • Prompt: !!,"Failure "_LA7X_" was not created in file #870."
  • Line Location: TCP+43
Function Call: WRITE
  • Prompt: !,"Updating the PROTOCOL file (#101)."
  • Line Location: LL+2
Routine Call
  • DIC
  • Line Location:
    • MAIL+18
    • MAILGRP+20
    • TCP+19
    • TCP+40
    • SETPRO+5
Routine Call
  • DIE
  • Line Location:
    • SETPRO+9
Routine Call
  • DIC
  • Line Location:
    • MAIL+9
    • MAIL+13
    • TCP+10
    • TCP+14
    • TCP+32
    • TCP+35
Routine Call
  • DIE
  • Line Location:
    • MAIL+25
    • TCP+26
    • TCP+48
Routine Call
  • DIR
  • Line Location:
    • LL+17

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(101 - [#101] Classic Fileman Calls
^DIC(4 - [#4] GET1^DIQ
^HLCS(870 - [#870] Classic Fileman Calls,  FIND1^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(3.8 MAILGRP+18

Label References

Name Line Occurrences
ERROR MAILGRP+15
LL MAIL+27, TCP+51
MAILGRP MAIL+6
SETPRO LL+7, LL+9, LL+13, LL+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D0 SETPRO+2~
DA MAIL+4~, MAILGRP+2~, TCP+2~, SETPRO+2~, SETPRO+8*
DA(1 MAILGRP+18*
DIC MAIL+4~, MAIL+17*, MAILGRP+2~, MAILGRP+18*, TCP+2~, TCP+18*, TCP+39*, SETPRO+2~, SETPRO+4*, SETPRO+8
DIC("P" MAILGRP+18*
DIC(0 MAIL+17*, MAILGRP+18*, TCP+18*, TCP+39*, SETPRO+4*
DIE MAIL+4~, TCP+2~, SETPRO+2~, SETPRO+8*
DIR LL+1~
DIR(0 LL+17*
DIROUT LL+1~
DIRUT LL+1~
DLAYGO MAIL+4~, MAIL+17*, MAILGRP+2~, MAILGRP+18*, TCP+2~, TCP+18*, TCP+39*, SETPRO+2~, SETPRO+4*
DOMAIN MAILGRP+2~, MAILGRP+14*, MAILGRP+15, MAILGRP+19
DR MAIL+4~, TCP+2~, SETPRO+2~, SETPRO+8*
DTOUT LL+1~
DUOUT LL+1~
DUZ MAILGRP+10
FDA MAIL+4~, TCP+2~
FDA(1 MAIL+14*, MAIL+23*, MAIL+24*, TCP+15*, TCP+24*, TCP+25*
FDA(2 TCP+36*, TCP+46*, TCP+47*
>> HOST(0 LL+5
LA738 MAILGRP+2~, MAILGRP+10*, MAILGRP+11, MAILGRP+18
LA7DIE MAIL+4~, TCP+2~
LA7FLDS SETPRO~, SETPRO+8
LA7IENS MAIL+4~, MAIL+22*, MAIL+23, MAIL+24, TCP+2~, TCP+23*, TCP+24, TCP+25, TCP+44!, TCP+45*
, TCP+46, TCP+47
LA7LINK MAIL+4~, TCP+2~, TCP+7
LA7LINK( MAIL+10*, MAIL+14*, MAIL+19*, TCP+11*, TCP+15*, TCP+20*, LL+4
LA7LINK(0 TCP+8, LL+4
LA7P TCP+2~, TCP+30
LA7P(0 TCP+31
LA7VDESC MAILGRP+2~, MAILGRP+10
LA7VDESC(1 MAILGRP+8*
LA7VDESC(2 MAILGRP+9*
LA7VMGP MAIL+4~, MAIL+6*, MAIL+24, MAILGRP+4, MAILGRP+5, MAILGRP+10, MAILGRP+12, ERROR+3, ERROR+5
LA7VX MAIL+4~, TCP+2~
LA7VXMY MAILGRP+2~, MAILGRP+7*, MAILGRP+10
LA7X MAIL+4~, MAIL+9*, MAIL+10, MAIL+14, TCP+2~, TCP+10*, TCP+11, TCP+15, TCP+17, TCP+18
, TCP+22, TCP+32*, TCP+36, TCP+38, TCP+39, TCP+43, LL+1~, LL+6*, LL+7, LL+8*
, LL+9, LL+12*, LL+13, LL+14*, LL+15, SETPRO~, SETPRO+4
LA7Y MAIL+4~, MAIL+9*, MAIL+10, MAIL+12, MAIL+13*, MAIL+14, MAIL+15, MAIL+19*, MAIL+20, MAIL+22
, TCP+2~, TCP+10*, TCP+11, TCP+13, TCP+14*, TCP+15, TCP+16, TCP+20*, TCP+21, TCP+23
, TCP+32*, TCP+34, TCP+35*, TCP+36, TCP+37, TCP+41*, TCP+42, TCP+45
LINK LL+1~, LL+4*, LL+7, LL+9, LL+13, LL+15
LRI MAIL~, MAIL+2, MAIL+6, MAIL+9, MAIL+13, MAIL+16, MAIL+17, MAIL+21, MAILGRP+9, MAILGRP+14
, ERROR+2, TCP~, TCP+4, TCP+7, TCP+10, TCP+14, LL+6, LL+8, LL+12, LL+14
PRIMARY TCP~, TCP+4, TCP+30, TCP+32, TCP+35
>> REMOTE(0 LL+11
U MAIL+13, MAIL+19, MAILGRP+18, TCP+10, TCP+14, TCP+20, TCP+32, TCP+35
X MAIL+4~, MAIL+17*, MAILGRP+19*, TCP+2~, TCP+18*, TCP+39*, LL+1~, LL+4*, SETPRO+2~, SETPRO+4*
Y MAIL+19, TCP+20, TCP+41, SETPRO+2~, SETPRO+6, SETPRO+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