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 |  Local Variables |  All
Print Page as PDF
Routine: HLOCLNT

Package: Health Level Seven

Routine: HLOCLNT


Information

HLOCLNT ;ALB/CJM- Client for sending messages - 10/4/94 1pm

Source Information

Source file <HLOCLNT.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Health Level Seven 7 ($$CONNECT,$$READACK,$$WRITEMSG)^HLOCLNT1  $$GETMSG^HLOCLNT2  ($$STOPPED,DEQUE)^HLOQUE  $$INC^HLOSITE  (COUNT,SAVECNTS)^HLOSTAT  (CLOSE,OPEN)^HLOT  $$IFSHUT^HLOTLNK  
Kernel 2 (,UNWIND)^%ZTER  ($$HDIFF,$$NOW)^XLFDT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Health Level Seven 1 HLOCLNT1  

Entry Points

Name Comments DBIA/ICR reference
TRANSMIT(HLCSTATE,MSGIEN,UPDATE) ;
END
LINKDOWN(HLCSTATE) ;
DEQUE(UPDATE) ;
CNNCTD(LINK) ;
FAILING(LINK) ;
GETWORK(QUE) ;
RETRY
ERROR ;error trap
DOWORK(QUEUE) ;sends the messages on the queue
  • ICR #6123
    • Status: Withdrawn
    • Usage: Controlled Subscription

    External References

    Name Field # of Occurrence
    ^%ZTER ERROR+12
    UNWIND^%ZTER ERROR+18
    $$CONNECT^HLOCLNT1 DOWORK+5
    $$READACK^HLOCLNT1 RETRY+9
    $$WRITEMSG^HLOCLNT1 RETRY+5
    $$GETMSG^HLOCLNT2 TRANSMIT+14
    $$STOPPED^HLOQUE GETWORK+17, GETWORK+21, GETWORK+25
    DEQUE^HLOQUE DEQUE+6
    $$INC^HLOSITE DOWORK+10
    COUNT^HLOSTAT RETRY+31
    SAVECNTS^HLOSTAT DOWORK+15, END+1
    CLOSE^HLOT GETWORK+28, LINKDOWN+1
    OPEN^HLOT RETRY+2
    $$IFSHUT^HLOTLNK DOWORK+18
    $$HDIFF^XLFDT FAILING+9
    $$NOW^XLFDT TRANSMIT+18

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^HLB - [#778] DOWORK+10
    ^HLB("QUEUE" GETWORK+15, GETWORK+17, GETWORK+19, GETWORK+21, GETWORK+23, GETWORK+25, FAILING+6, FAILING+9*, LINKDOWN+4*, DOWORK+8
    , DOWORK+18*
    ^HLTMP("CLIENT UPDATES" DEQUE+9*, DEQUE+10*, DEQUE+11*
    ^HLTMP("FAILING LINKS" FAILING+10, LINKDOWN+5*, DOWORK+18!
    ^HLTMP("LOG ALL ERRORS" ERROR+6
    ^TMP("HL7 ERRORS" ERROR+15*, ERROR+17

    Label References

    Name Line Occurrences
    $$CNNCTD GETWORK+16, GETWORK+20, GETWORK+24, DOWORK+5
    $$FAILING GETWORK+16, GETWORK+20, GETWORK+24, DOWORK+18
    $$TRANSMIT DOWORK+11
    DEQUE DOWORK+13, END
    END ERROR+2
    LINKDOWN ERROR+3, RETRY+34
    RETRY RETRY+29

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    ACKCODE RETRY+13~, RETRY+14*, RETRY+18, RETRY+19
    ACKID RETRY+13~, RETRY+15*, RETRY+17
    DEQUE DOWORK+2~, DOWORK+3*, DEQUE+1*, DEQUE+2, DEQUE+12!*
    DEQUE( DEQUE+1*, DEQUE+4, DEQUE+7, DEQUE+8, DEQUE+10, DEQUE+11
    FS RETRY+8~, RETRY+11*, RETRY+12, RETRY+14, RETRY+15, RETRY+20
    HDR TRANSMIT+9~, RETRY+9
    HDR(1 RETRY+11, RETRY+15
    HDR(2 RETRY+15
    HLCSTATE GETWORK+28, LINKDOWN~, LINKDOWN+1, ERROR+3, DOWORK+5, DOWORK+11, DOWORK+15, END+1, TRANSMIT~, RETRY+2
    , RETRY+5, RETRY+9, RETRY+31, RETRY+34
    HLCSTATE("ATTEMPT" TRANSMIT+12*, RETRY+1*, RETRY+29
    HLCSTATE("CONNECTED" GETWORK+28, LINKDOWN+1, CNNCTD+3, RETRY+2, RETRY+29, RETRY+34
    HLCSTATE("COUNTS" DOWORK+15
    HLCSTATE("LINK" LINKDOWN+2, LINKDOWN+3, CNNCTD+3
    HLMSTATE TRANSMIT+9~, TRANSMIT+14, RETRY+5
    HLMSTATE("ACC EPT ACK RESPONSE" , RETRY+23
    HLMSTATE("ACK TO IEN" , RETRY+33
    HLMSTATE("BATCH" RETRY+19, RETRY+27, RETRY+31
    HLMSTATE("DT/TM" TRANSMIT+15
    HLMSTATE("HDR" TRANSMIT+15, RETRY+7, RETRY+19, RETRY+20, RETRY+27, RETRY+31
    HLMSTATE("ID" RETRY+12
    HLMSTATE("STATUS" TRANSMIT+15
    LASTTIME FAILING+4~, FAILING+6*, FAILING+7, FAILING+9
    LINK GETWORK+12~, GETWORK+13*, GETWORK+14, GETWORK+15, GETWORK+16, GETWORK+17, GETWORK+18, GETWORK+19*, GETWORK+20, GETWORK+21
    , GETWORK+22, GETWORK+23*, GETWORK+24, GETWORK+25, GETWORK+26, FAILING~, FAILING+6, FAILING+9, FAILING+10, CNNCTD~
    , CNNCTD+3
    LINK("DOWN" GETWORK+26, FAILING+5*, FAILING+9*, FAILING+10*
    MSA TRANSMIT+9~, RETRY+9, RETRY+12, RETRY+14, RETRY+17
    MSGCOUNT DOWORK+2~, DOWORK+7*, DOWORK+8, DOWORK+14*
    MSGIEN DOWORK+2~, DOWORK+7*, DOWORK+8*, DOWORK+10, DOWORK+11, DEQUE+3~*, DEQUE+4*, DEQUE+6, DEQUE+7, DEQUE+8
    , DEQUE+9, DEQUE+10, DEQUE+11, TRANSMIT~, TRANSMIT+14, TRANSMIT+18
    NODE DEQUE+5~, DEQUE+8*, DEQUE+9
    QUE GETWORK~
    QUE("DOWN" GETWORK+26*
    QUE("LINK" GETWORK+13, GETWORK+26*
    QUE("QUEUE" GETWORK+13, GETWORK+26*
    QUEUE GETWORK+12~, GETWORK+13*, GETWORK+14, GETWORK+15, GETWORK+16*, GETWORK+17*, GETWORK+18, GETWORK+19, GETWORK+21*, GETWORK+23
    , GETWORK+25*, GETWORK+26, GETWORK+27, DOWORK~
    QUEUE("DOWN" DOWORK+18*
    QUEUE("LINK" DOWORK+5, DOWORK+8, DOWORK+18, DEQUE+6, DEQUE+8
    QUEUE("QUEUE" DOWORK+8, DEQUE+6, DEQUE+8
    SET FAILING+4~, FAILING+7*, FAILING+8, FAILING+9*, FAILING+11
    SUCCESS DOWORK+2~, DOWORK+4*, DOWORK+8, DOWORK+10*, DOWORK+11*, DOWORK+12, TRANSMIT+9~, TRANSMIT+11*, RETRY+24*, RETRY+26*
    , RETRY+29, RETRY+30, RETRY+34, RETRY+35
    TIME DEQUE+5~, DEQUE+7*, DEQUE+9, DEQUE+10, DEQUE+11
    >> TO LINKDOWN+3*, LINKDOWN+4, LINKDOWN+5
    UPDATE DOWORK+9~, DOWORK+11, DOWORK+12, DOWORK+13, DEQUE~, DEQUE+1, DEQUE+2, TRANSMIT~, TRANSMIT+18*, RETRY+16*
    , RETRY+18*, RETRY+19*, RETRY+20*, RETRY+27*, RETRY+33*
    UPDATE("ACTION" DEQUE+1, RETRY+23*
    UPDATE("MSA" DEQUE+1, RETRY+17*
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All