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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: %ZISTCPS

Package: Kernel

Routine: %ZISTCPS


Information

%ZISTCPS ;ISF/RWF - DEVICE HANDLER TCP/IP SERVER CALLS ;06/20/2005 09:11

Source Information

Source file <ZISTCPS.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 4 ($$FLUSHCHR,CLOSE)^%ZISTCP  ($$AVJ,GETENV)^%ZOSV  $$S^%ZTLOAD  $$DT^XLFDT  

Caller Graph

Caller Graph Total: 8

Package Total Caller Graph
Health Level Seven 3 HLCSAS  HLCSTCP  HLOSRVR  
MailMan 2 XMRONT  XMRUCX  
RPC Broker 2 XWBTCPM1  XWBVLL  
Kernel 1 XUSC1S  

Entry Points

Name Comments DBIA/ICR reference
EXIT() ;See if time to exit
OPNERR ;
LISTEN(SOCK,RTN,ZRULE) ;Listen on socket, start routine
  • ICR #5776
    • Status: Active
    • Usage: Controlled Subscription
    CHILDONT(IO,RTN) ;Child process for OpenM
    LG2
    GTMLNCH(IO,RTN) ;Run gt.m job for this conncetion.
    LGTM ;GT.M multi thread server
    VAR ;Setup IO variables
    CLOSE ;Close and reset
    LOG(MSG) ;LOG STATUS
    LONT2
    LONT ;Open port in Accept mode with standard terminators.
    NEWOK() ;Is it OK to start a new process

    External References

    Name Field # of Occurrence
    $$FLUSHCHR^%ZISTCP VAR+3
    CLOSE^%ZISTCP CLOSE+1
    $$AVJ^%ZOSV NEWOK+2
    GETENV^%ZOSV LISTEN+5
    $$S^%ZTLOAD EXIT+1
    $$DT^XLFDT VAR+4

    Interaction Calls

    Name Line Occurrences
    Function Call: READ
    • Timeout: 30
    • Variable: *NEWCHAR
    • Line Location: LONT2+0
    Function Call: WRITE
    • Prompt: *-2
    • Line Location: LONT2+4
    Function Call: WRITE
    • Prompt: "421 Service temporarily down.",$C(13,10),!
    • Line Location: CHILDONT+4
    Function Call: WRITE
    • Prompt: /LISTEN(1)
    • Line Location: LGTM+10
    Function Call: WRITE
    • Prompt: /WAIT(30)
    • Line Location: LG2+1
    Function Call: WRITE
    • Prompt: "421 Service temporarily down.",$C(13,10),#
    • Line Location: LG2+10

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^%ZIS(14.5 - [#14.5] NEWOK+1
    ^%ZOSF("OS" LISTEN+3
    ^%ZOSF("VOL" NEWOK+1
    ^TMP("ZISTCP" LGTM+1!, LOG+2*
    ^XUTL("XQ" VAR+4*

    Label References

    Name Line Occurrences
    $$EXIT LONT2, LG2+3
    $$NEWOK CHILDONT+3, LG2+9
    @( CHILDONT+5, GTMLNCH+4
    GTMLNCH LG2+21
    LG2 LG2+9
    LGTM LISTEN+6
    LOG LGTM+4, LGTM+7, LGTM+8, LGTM+10, LG2+8
    LONT LISTEN+6
    LONT2 LONT2+5
    VAR CHILDONT+5, GTMLNCH+4

    Naked Globals

    Name Field # of Occurrence
    ^($J LOG+2*

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    %A LISTEN+1~, LGTM+1~, LG2*, LG2+2*
    %ZA LONT+1~, LONT2+3*, LONT2+4
    CNT LOG+1~, LOG+2*
    EXIT LISTEN+1~, LONT+2*, LONT2*, LONT2+1, OPNERR+1*, LG2*, LG2+3*, LG2+5, GTMLNCH+1~
    IO CHILDONT~, CHILDONT+1*, CHILDONT+2, VAR+1, GTMLNCH~, GTMLNCH+3
    IO("C" GTMLNCH+5
    IO("ERROR" OPNERR+1*
    IO(0 VAR+1*, GTMLNCH+3*
    IO(1 VAR+1*, GTMLNCH+3*
    IOF VAR+3*
    IOST VAR+2*
    IOST(0 VAR+2*
    >> IOT VAR+2*
    >> LISTEN(1 LGTM+10
    MSG LOG~, LOG+2
    NEWCHAR LONT+1~, LONT2*
    NEWJOB CHILDONT+3*, CHILDONT+4, CHILDONT+5!
    NIO LISTEN+1~, LISTEN+7, LONT+2*, LONT+4, LONT2, LONT2+1, LGTM+3*, LGTM+4, LGTM+6, LGTM+8
    , LG2+5, LG2+10, LG2+11, LG2+14, LG2+19, LG2+21, GTMLNCH+1~
    NIO("SOCK" LG2+7*, LG2+8, LG2+11
    NIO("ZISTCP" LGTM+8*, LGTM+10*, LG2+2*, LG2+7, LG2+11!
    >> POP LISTEN+4*, LISTEN+6*, LISTEN+7, LONT+4*, VAR+1*, OPNERR+1*, LG2+22*
    RTN LISTEN~, CHILDONT~, CHILDONT+5, LG2+21, GTMLNCH~, GTMLNCH+4
    SOCK LISTEN~, LONT+2, LGTM+7, GTMLNCH+1~
    >> SOCKET LG2+11, LG2+14
    U LISTEN+5*, GTMLNCH+2*
    >> WAIT(30 LG2+1
    X LISTEN+1~
    XQVOL LISTEN+5*, GTMLNCH+1~
    >> XUENV LISTEN+5*
    >> Y LISTEN+5
    ZISOS LISTEN+1~, LISTEN+3*, LISTEN+6, GTMLNCH+1~
    ZISQUIT EXIT+2~*, EXIT+3
    ZRULE LISTEN~, LISTEN+3*, EXIT+3
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All