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

Package: Surgery

Routine: SRHLUO1


Information

SRHLUO1 ;BIR/DLR - Surgery Interface (Cont.) Utilities for building Outgoing HL7 Segments ; [ 05/20/99 7:14 AM ]

Source Information

Source file <SRHLUO1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
CPT HCPCS Codes 2 $$CPT^ICPTCOD  $$MOD^ICPTMOD  
Health Level Seven 1 $$HLDATE^HLFNC  
Surgery 1 $$HNAME^SRHLU  
VA FileMan 1 (C,NOW)^%DTC  

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

Package Total Caller Graph
Surgery 2 SRHLZIU  SRHLZQR  

Entry Points

Name Comments DBIA/ICR reference
ZCH(SRI,SREVENT,SRSTATUS,SRENT) ;sets ^TMP(SRENT,$J global for sending ZCH Scheduling Appointment Information segment(s)
  • ICR #6783
    • Status: Pending
    • Usage: Private
    ZIG(SRI,SRENT) ;sets ^TMP(SRENT,$J global for sending ZIG Appointment Information - General Resource Segment(s)
  • ICR #6783
    • Status: Pending
    • Usage: Private
    ZIL(SRI,SRENT) ;sets ^TMP(SRENT,$J global for sending ZIL Appointment Information - Location Resource Segment(s)
  • ICR #6783
    • Status: Pending
    • Usage: Private
    ZIP(SRI,SRENT) ;sets ^TMP(SRENT,$J,I) global for sending ZIP Appointment Information - Personnel Segment(s)
  • ICR #6783
    • Status: Pending
    • Usage: Private
    SZIP ;set the ZIP segment
    STAT ;check scheduled cases to scheduled close time

    External References

    Name Field # of Occurrence
    C^%DTC STAT+4
    NOW^%DTC STAT+4
    $$HLDATE^HLFNC ZCH+13, ZCH+14
    $$CPT^ICPTCOD ZCH+7
    $$MOD^ICPTMOD ZCH+8
    $$HNAME^SRHLU ZCH+15, ZIP+3, ZIP+4, ZIP+6, ZIP+9

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^SC - [#44] ZIL+3, ZIL+4
    ^SRF - [#130] ZCH+6, ZCH+7, ZCH+8, ZCH+10, ZCH+11, ZCH+13, ZCH+14, ZCH+15, ZCH+16, ZIG+1
    , ZIG+3, ZIL+2, ZIL+3, ZIL+4, ZIL+6, ZIL+8, ZIP+2, ZIP+3, ZIP+4, ZIP+5
    , ZIP+8, SZIP+2, STAT+2, STAT+3, STAT+4
    ^SRO(133 - [#133] STAT+3
    ^SRO(133.4 - [#133.4] ZIG+4
    ^SRS - [#131.7] ZIL+3
    ^TMP( ZCH+17*, ZIG+6*, ZIL+10*, SZIP+4*

    Label References

    Name Line Occurrences
    STAT ZIL+9, SZIP+3
    SZIP ZIP+3, ZIP+4, ZIP+7, ZIP+10

    Naked Globals

    Name Field # of Occurrence
    ^( ZCH+11
    ^("1.0" ZCH+15
    ^("CON" ZCH+16
    ^("NON" ZIL+4, ZIP+3, ZIP+4
    ^("OP" ZCH+6
    ^(0 ZIL+3, ZIL+4
    ^(31 ZCH+13

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> % STAT+4
    ADD ZCH+1~
    ADD1 ZCH+1~
    ADDR ZCH+1~
    >> CASE ZCH+3, ZCH+6, ZCH+7, ZCH+8, ZCH+10, ZCH+11, ZCH+13, ZCH+14, ZCH+15, ZCH+16
    , ZIG+1, ZIG+3, ZIL+2, ZIL+3, ZIL+4, ZIL+6, ZIL+8, ZIP+2, ZIP+3, ZIP+4
    , ZIP+5, ZIP+8, SZIP+2, STAT+2, STAT+3, STAT+4
    DT STAT+4, STAT+5, STAT+6
    FAC ZIL+1~, ZIL+3*, ZIL+4*, ZIL+5
    >> HL("FS" ZCH+17, ZIG+6, ZIL+10, SZIP+4
    >> HL("Q" ZCH+2
    >> HLCOMP ZCH+5, ZCH+7, ZCH+9, ZCH+10, ZCH+11, ZCH+13, ZCH+14, ZIG+4, ZIG+5, ZIL+5
    , ZIL+6, ZIP+3, ZIP+4, ZIP+6, ZIP+9
    >> HLREP ZCH+9
    LOC ZIL+1~, ZIL+3*, ZIL+4*, ZIL+5
    MON ZIG+2~, ZIG+3*
    PHONE ZCH+1~
    SRC ZIL+1~, ZIL+7*, ZIL+8*, ZIP+1~, SZIP+1*, SZIP+2*, STAT+4*, STAT+5*, STAT+6*
    SRENT ZCH~, ZCH+17, ZIG~, ZIG+6, ZIL~, ZIL+10, ZIP~, SZIP+4
    SREVENT ZCH~, ZCH+5
    SRI ZCH~, ZCH+17, ZCH+18*, ZIG~, ZIG+6, ZIG+7*, ZIL~, ZIL+10, ZIL+11*, ZIP~
    SZIP+4, SZIP+5*, STAT+1~, STAT+3*
    SRJ ZCH+1~, ZCH+8*
    SRM ZCH+1~, ZCH+8*, ZCH+9
    SROERR ZCH+1~
    SRP ZCH+1~, ZCH+8*
    SRREP ZCH+1~, ZCH+8*, ZCH+9*
    SRS STAT+1~, STAT+3*
    SRSTATUS ZCH~, ZCH+5, ZCH+12, ZCH+14, ZIL+8, ZIL+9, SZIP+2, SZIP+3
    SRTIME STAT+1~, STAT+3*, STAT+4*
    SRX ZCH+1~, ZCH+7*
    >> SRYN STAT+4*
    U ZCH+6, ZCH+7, ZCH+8, ZCH+9, ZCH+10, ZCH+11, ZCH+13, ZCH+14, ZCH+15, ZCH+16
    , ZIG+4, ZIL+2, ZIL+3, ZIL+4, ZIL+6, ZIL+8, ZIP+3, ZIP+4, ZIP+5, ZIP+8
    SZIP+2, STAT+3, STAT+4
    X ZIL+1~, ZIL+10*, ZIP+1~, ZIP+5*, ZIP+6, ZIP+8*, ZIP+9, STAT+4, STAT+5, STAT+6
    X1 STAT+1~, STAT+4*
    X2 STAT+1~, STAT+4*
    XX ZCH+1~, ZCH+17*, ZIG+6*, ZIP+1~, SZIP+4*
    ZCH ZCH+1~
    ZCH( ZCH+17
    ZCH(1 ZCH+2*
    ZCH(12 ZCH+15*
    ZCH(17 ZCH+16*
    ZCH(18 ZCH+9*
    ZCH(2 ZCH+3*
    ZCH(3 ZCH+2*
    ZCH(4 ZCH+5*
    ZCH(5 ZCH+6*, ZCH+7*, ZCH+10*
    ZCH(6 ZCH+11*
    ZCH(7 ZCH+13*, ZCH+14*
    ZIG ZIG+2~, ZIG+3*, ZIG+4
    ZIG( ZIG+6*
    ZIG(1 ZIG+4*
    ZIG(2 ZIG+5*
    ZIL ZIL+1~
    ZIL( ZIL+10*
    ZIL(1 ZIL+5*
    ZIL(2 ZIL+6*
    ZIL(6 ZIL+7*
    ZIP ZIP+1~
    ZIP( SZIP+4*
    ZIP(1 ZIP+3*, ZIP+4*, ZIP+5*, ZIP+6*, ZIP+8*, ZIP+9*
    ZIP(2 ZIP+3*, ZIP+4*, ZIP+6*, ZIP+9*
    ZIP(6 SZIP+1*
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All