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 ;02/29/2012

Source Information

Source file <HLOCLNT.m>

Call Graph

Call Graph

Call Graph Total: 9

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

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

Package Total Caller Graph
Health Level Seven 4 HLOCLNT1  HLOPING  HLOTRACE  ^HLD(779.3  

Entry Points

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

    External References

    Name Field # of Occurrence
    UNWIND^%ZTER ZB3+8
    $$TIMEOUT^HLOAPP ZB22+10
    $$CONNECT^HLOCLNT1 ZB0+7
    $$READACK^HLOCLNT1 RETRY+11
    $$WRITEMSG^HLOCLNT1 RETRY+7
    $$GETMSG^HLOCLNT2 TRANSMIT+16
    $$GETSAP^HLOCLNT2 ZB22+10
    $$GETPRTY^HLOQUE TRY+18, ZB0+9
    $$STOPPED^HLOQUE TRY+4, TRY+9, TRY+14, ZB0+10
    DEQUE^HLOQUE ZB25+6
    COUNT^HLOSTAT ZB23+15
    SAVECNTS^HLOSTAT ZB4+9, END+6
    CLOSE^HLOT TRY+22, LINKDOWN+2, END+2
    OPEN^HLOT RETRY+2
    $$IFSHUT^HLOTLNK TRY+2, TRY+7, TRY+12, ZB0+10, ZB4+12
    $$FMADD^XLFDT ZB22+10
    $$HDIFF^XLFDT FAILING+9
    $$NOW^XLFDT ZB20+7

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^HLB - [#778] ZB4+3*, ZB20+4
    ^HLB("QUEUE" TRY+1, TRY+4, TRY+6, TRY+9, TRY+11, TRY+14, FAILING+6, FAILING+9*, LINKDOWN+5*, ZB0+10
    , ZB4+12*, ZB22+7, ZB22+8, ZB22+10*, ZB23+2*, ZB23+3
    ^HLTMP("CLIENT UPDATES" ZB25+10*, ZB25+11*, ZB25+12*
    ^HLTMP("FAILING LINKS" FAILING+10, LINKDOWN+6*, ZB4+12!

    Label References

    Name Line Occurrences
    $$CNNCTD TRY+3, TRY+8, TRY+13, ZB0+7
    $$FAILING TRY+3, TRY+8, TRY+13, ZB4+12
    $$TRANSMIT ZB4+5
    DEQUE ZB4+7, END+5
    END ZB3+4
    LINKDOWN ZB3+5, ZB23+18
    RETRY ZB23+13
    TRY TRY+18

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    ACKCODE ZB21+1~, ZB21+2*, ZB21+7, ZB22+2, ZB22+9
    ACKID ZB21+1~, ZB21+3*, ZB21+5
    DEQUE ZB0+2~, ZB0+3*, ZB25+1*, ZB25+2, ZB25+13!*
    DEQUE( ZB25+1*, ZB25+4, ZB25+7, ZB25+9, ZB25+11, ZB25+12
    FS RETRY+10~, RETRY+13*, RETRY+14, ZB21+2, ZB21+3, ZB22+3
    HDR TRANSMIT+9~, RETRY+11
    HDR(1 RETRY+13, ZB21+3
    HDR(2 ZB21+3
    HLCSTATE TRY+22, LINKDOWN~, LINKDOWN+2, ZB3+5, ZB0+7, ZB4+5, ZB4+9, END+2, END+6, TRANSMIT~
    , RETRY+2, RETRY+7, RETRY+11, ZB23+15, ZB23+18
    HLCSTATE("ATTEMPT" TRANSMIT+12*, RETRY+1*, ZB23+13
    HLCSTATE("CONNECTED" TRY+22, LINKDOWN+2, END+2, CNNCTD+3, RETRY+2, ZB23+13, ZB23+18
    HLCSTATE("COUNTS" ZB4+9
    HLCSTATE("LINK" LINKDOWN+3, LINKDOWN+4, END+2, CNNCTD+3
    HLMSTATE TRANSMIT+9~, TRANSMIT+16, RETRY+7
    HLMSTATE("ACC EPT ACK RESPONSE" , ZB23+6
    HLMSTATE("ACK BY" , ZB20+4,  TO IEN" , ZB23+17
    HLMSTATE("BATCH" ZB23+15
    HLMSTATE("DT/TM" TRANSMIT+17
    HLMSTATE("HDR" TRANSMIT+17, RETRY+9, ZB22+2, ZB22+3, ZB23+11, ZB23+15
    HLMSTATE("ID" RETRY+14
    HLMSTATE("STATUS" TRANSMIT+17, ZB20+4, ZB22+6, ZB22+7, ZB22+8, ZB22+10, ZB23+2, ZB23+3
    LASTTIME FAILING+4~, FAILING+6*, FAILING+7, FAILING+9
    LINK GETWORK+12~, GETWORK+13*, TRY, TRY+1, TRY+2, TRY+3, TRY+4, TRY+5, TRY+6*, TRY+7
    , TRY+8, TRY+9, TRY+10, TRY+11*, TRY+12, TRY+13, TRY+14, TRY+15, FAILING~, FAILING+6
    , FAILING+9, FAILING+10, CNNCTD~, CNNCTD+3
    LINK("DOWN" TRY+15, FAILING+5*, FAILING+9*, FAILING+10*
    MAXIMUM ZB0+2~, ZB0+9*, ZB0+10
    MSA TRANSMIT+9~, RETRY+11, RETRY+14, ZB21+2, ZB21+5
    MSGCOUNT ZB0+2~, ZB0+8*, ZB0+10, ZB4+8*
    MSGIEN ZB0+2~, ZB0+8*, ZB0+10*, ZB0+11, ZB4+3, ZB4+5, ZB25+3~*, ZB25+4*, ZB25+6, ZB25+7
    , ZB25+9, ZB25+10, ZB25+11, ZB25+12, TRANSMIT~, TRANSMIT+15, TRANSMIT+16, ZB20+4, ZB22+8, ZB22+10
    NODE ZB25+5~, ZB25+9*, ZB25+10
    QUE GETWORK~
    QUE("DOWN" TRY+15*
    QUE("LINK" GETWORK+13, TRY+15*, TRY+18
    QUE("QUEUE" GETWORK+13, TRY+15*, TRY+18
    QUEUE GETWORK+12~, GETWORK+13*, TRY, TRY+1, TRY+2*, TRY+3*, TRY+4*, TRY+5, TRY+6, TRY+9*
    , TRY+11, TRY+14*, TRY+15, TRY+18, TRY+21, DOWORK~
    QUEUE("DOWN" ZB4+12*
    QUEUE("LINK" ZB0+7, ZB0+9, ZB0+10, ZB4+12, ZB25+6, ZB25+9
    QUEUE("QUEUE" ZB0+9, ZB0+10, ZB25+6, ZB25+9
    SET FAILING+4~, FAILING+7*, FAILING+8, FAILING+9*, FAILING+11
    SUCCESS ZB0+2~, ZB0+4*, ZB0+10, ZB0+11*, ZB4+1, ZB4+4*, ZB4+5*, ZB4+6, TRANSMIT+9~, TRANSMIT+11*
    , ZB23+8*, ZB23+10*, ZB23+13, ZB23+14, ZB23+18, ZB23+19
    TIME ZB25+5~, ZB25+7*, ZB25+8, ZB25+10, ZB25+11, ZB25+12
    TO LINKDOWN+1~, LINKDOWN+4*, LINKDOWN+5, LINKDOWN+6
    UPDATE ZB4+2~, ZB4+5, ZB4+6, ZB4+7, DEQUE~, ZB25+1, ZB25+2, TRANSMIT~, TRANSMIT+15*, ZB20+7*
    , ZB21+4*, ZB21+8*, ZB22+2*, ZB22+3*, ZB22+10, ZB23+2, ZB23+11*, ZB23+17*
    UPDATE("ACTION" ZB25+1, ZB23+6*
    UPDATE("MSA" ZB25+1, ZB21+5*
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All