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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: SRHLU

Package: Surgery

Routine: SRHLU


Information

SRHLU ;B'HAM ISC/DLR - Surgery HL7 Utility routine ; [ 05/06/98 7:14 AM ]

Source Information

Source file <SRHLU.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Health Level Seven 1 $$FMNAME^HLFNC  
Kernel 1 $$FMADD^XLFDT  
MailMan 1 ^XMD  
VA FileMan 1 ^DIE  

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

Package Total Caller Graph
Surgery 9 SRHL PARAMETER  SRHLOORU  SRHLORU  SRHLUI  SRHLUO  SRHLUO1  SRHLUO3  SRHLUO4C  
SRHLZIU  

Entry Points

Name Comments DBIA/ICR reference
DNAME(NAME) ;identifies an incoming CN data type to a record in file 200
HNAME(IEN) ;converts an file 200 internal entry number into an HL7 CN data type
  • ICR #6835
    • Status: Pending
    • Usage: Private
    SETDSC(HL,DSC,SRHL) ;Create discrepancy ^XTMP global
    DSCPANCY(HL) ;Discrepancy message builder
    DIV() ; return division associated with default institution
    V() ;check HL7 package compatibility level
  • ICR #6780
    • Status: Pending
    • Usage: Private
    CHNG ; entry to update VisA HL7 compatibility level

    External References

    Name Field # of Occurrence
    ^DIE CHNG+6
    $$FMNAME^HLFNC DNAME+5
    $$FMADD^XLFDT SETDSC+2
    ^XMD DSCPANCY+5

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"Not a valid entry in file 200."
    • Line Location: HNAME+2
    Function Call: WRITE
    • Prompt: !!,?5,"Default institution must be defined as a Surgery site in the SURGERY",!,?5,"SITE PARAMETERS file (#133) before this parameter can be updated.",!!
    • Line Location: CHNG+2
    Function Call: WRITE
    • Prompt: !!,"This option may be used to edit the site parameter that determines which",!,"Surgery HL7 interface will be used, the interface compatible with VISTA HL7",!,"V. 1.6 or the older one compatible with VISTA HL7 V. 1.5."
    • Line Location: CHNG+4
    Function Call: WRITE
    • Prompt: !!,"If applications communicating with the Surgery HL7 interface must use the",!,"interface designed for HL7 V. 1.5, enter YES. Otherwise, enter NO or leave",!,"this field blank.",!
    • Line Location: CHNG+5
    Routine Call
    • DIE
    • Line Location:
      • CHNG+6

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^SRO(133 - [#133] DIV+1, V+1, CHNG+3
    ^VA(200 - [#200] DNAME+4, DNAME+5, HNAME+2, HNAME+3
    ^XMB(1 - [#4.3] DIV+1
    ^XTMP("SRHLERR^" SETDSC+2*, SETDSC+3*

    Label References

    Name Line Occurrences
    $$DIV V+1, CHNG+2

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    CNT DNAME+1~, DNAME+5*
    DA CHNG+6!*
    DIE CHNG+6!*
    DR CHNG+6!*
    DSC SETDSC~, SETDSC+3
    DT SETDSC+2
    HL SETDSC~, DSCPANCY~
    HL("DTM" SETDSC+2, SETDSC+3
    HL("MID" SETDSC+1, DSCPANCY+1
    >> HLCOMP DNAME+2, DNAME+4, DNAME+5, HNAME+3
    >> HLERR DNAME+2*
    IEN HNAME~, HNAME+1, HNAME+2, HNAME+3
    NAME DNAME~, DNAME+2, DNAME+3, DNAME+4*, DNAME+5*, DNAME+6
    SITE DIV+1~*
    SR15 V+1~*, V+2, CHNG+1~, CHNG+3*
    SRDIV DIV+1~*, DIV+2, V+1~*, CHNG+1~, CHNG+2*, CHNG+3, CHNG+6
    SRHL SETDSC~
    SRHL("E" SETDSC+3, SETDSC+4*
    SRMID SETDSC+1~*, SETDSC+2, SETDSC+3, DSCPANCY+1~*, DSCPANCY+2
    SRY CHNG+1~
    U HNAME+3
    X DNAME+1~, DNAME+5*
    XMSUB DSCPANCY+2*, DSCPANCY+5!
    XMTEXT DSCPANCY+4*, DSCPANCY+5!
    XMY DSCPANCY+5!
    XMY("G.SRHL D ISCREPANCY" , DSCPANCY+3*
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All