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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: XWBTCP

Package: RPC Broker

Routine: XWBTCP


Information

XWBTCP ;ISF/EG,ISD/HGW - Control TCP listener ;10/22/14 11:32

Source Information

Source file <XWBTCP.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Kernel 5 HOME^%ZIS  (CALL,CLOSE)^%ZISTCP  GETENV^%ZOSV  ^%ZTLOAD  $$CONVERT^XLFIPV  
VA FileMan 5 EN^DDIOL  LIST^DIC  FILE^DIE  FDA^DILF  $$GET1^DIQ  
RPC Broker 3 EN^XWBTCPC  $$SEMAPHOR^XWBTCPL  $$NODE^XWBTCPM1  
Toolkit 1 EDITPAR^XPAREDIT  

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

Package Total Caller Graph
RPC Broker 6 PORT  XWB DEBUG EDIT  XWB LISTENER STARTER  XWB LISTENER STOP ALL  XWBTCPL  XWBTCPM1  
National VistA Support 1 NVSSTB  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- entry point for interactive use
STATSCRN(XWBNEW) ;Port STATUS field screen
STATCHG(DA,ACTION) ;STATUS field X-ref SET logic
STRT(XWBTSKT) ;start TCP Listener. Interactive entry point
MARKER(PORT,MODE) ;Set/Test/Clear Problem Marker, Mode=0 is a function
STRTALL ;XWB LISTENER STARTER option entry point
STOPALL ;XWB LISTENER STOP ALL entry point
  • ICR #4645
    • Status: Active
    • Usage: Private
    RESTART ;Stop and then Start all listeners.
  • ICR #4645
    • Status: Active
    • Usage: Private
    STOP(XWBTSKT) ;stop TCP Listener. Interactive and TaskMan entry point
    DEBUG ;Edit the debug parameter

    External References

    Name Field # of Occurrence
    HOME^%ZIS STRT+2, STOP+2
    CALL^%ZISTCP STOP+22
    CLOSE^%ZISTCP STOP+32
    GETENV^%ZOSV STATCHG+19, STOP+2
    ^%ZTLOAD STATCHG+28
    EN^DDIOL STATCHG+27, STATCHG+29, STOP+3, STOP+13, STOP+17, STOP+24, STOP+33, STOP+34
    LIST^DIC STRTALL+13, STRTALL+18, STOPALL+13, STOPALL+18
    FILE^DIE STATCHG+32
    FDA^DILF STATCHG+31
    $$GET1^DIQ STATSCRN+8, STATCHG+12, STATCHG+13
    $$CONVERT^XLFIPV STRT+5, MARKER+1, STOP+5, STOP+21
    EDITPAR^XPAREDIT DEBUG+2
    EN^XWBTCPC EN+8
    $$SEMAPHOR^XWBTCPL STRT+9, STRT+10, STOP+11, STOP+12, STOP+23
    $$NODE^XWBTCPM1 STOP+15

    Interaction Calls

    Name Line Occurrences
    Function Call: READ
    • Variable: X1
    • Timeout: 300
    • Line Location: EN+4
    Function Call: READ
    • Variable: X2
    • Timeout: 300
    • Line Location: EN+5
    Function Call: WRITE
    • Prompt: !
    • Line Location: EN+6
    Function Call: WRITE
    • Prompt: "Start TCP Listener...",!
    • Line Location: STRT+3
    Function Call: WRITE
    • Prompt: "TCP Listener on port "_XWBTSKT_" appears to be running already.",!
    • Line Location: STRT+9
    Function Call: WRITE
    • Prompt: "Unable to run TCP Listener in background.",!
    • Line Location: STRT+15
    Function Call: WRITE
    • Prompt: "Checking if TCP Listener has started...",!
    • Line Location: STRT+17
    Function Call: WRITE
    • Prompt: !,"TCP Listener could not be started!",!
    • Line Location: STRT+21
    Function Call: WRITE
    • Prompt: "Check if port "_XWBTSKT_" is busy on this CPU.",!
    • Line Location: STRT+22
    Function Call: WRITE
    • Prompt: "TCP Listener started successfully."
    • Line Location: STRT+24
    Function Call: WRITE
    • Prompt: "{XWB}00020|"_X_"00011TCPshutdown",!
    • Line Location: STOP+30
    Function Call: WRITE
    • Prompt: !!
    • Line Location: DEBUG+1
    Function Call: WRITE
    • Prompt: !!
    • Line Location: DEBUG+3
    Routine Call
    • %ZIS
    • Line Location:
      • STRT+2
      • STOP+2
    Routine Call
    • DIC
    • Line Location:
      • STRTALL+13
      • STRTALL+18
      • STOPALL+13
      • STOPALL+18
    Routine Call
    • DIE
    • Line Location:
      • STATCHG+32

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    8994.17 GET1^DIQ,  LIST^DIC
    8994.171 FDA^DILF,  GET1^DIQ,  LIST^DIC

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^%ZOSF("OS" STOP+8
    ^%ZOSF("UCI" STRT+4, MARKER+1, STOP+4
    ^XWB( MARKER+2, MARKER+3*, MARKER+4, MARKER+5!, MARKER+6

    Label References

    Name Line Occurrences
    $$MARKER STRT+19, STRT+20
    MARKER STRT+12, STRT+23
    STATCHG STRTALL+22, STOPALL+22
    STOPALL RESTART+1
    STRTALL RESTART+1

    Naked Globals

    Name Field # of Occurrence
    ^("OS" STOP+8

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % STRT+1~, STRT+10*, STRT+16*, STRT+19*, MARKER+1~*, MARKER+4*, MARKER+7, STOP+12*, STOP+23*
    ACTION STATCHG~, STATCHG+11, STATCHG+21, STATCHG+31
    C STATSCRN+6~, STATSCRN+7*, STATSCRN+8, STATCHG+8~, STATCHG+9*, STATCHG+12, STATCHG+13, STATCHG+31
    DA STATSCRN+8, STATCHG~, STATCHG+13, STATCHG+31
    DA(1 STATSCRN+8, STATCHG+12, STATCHG+13, STATCHG+31
    DA(2 STATSCRN+8, STATCHG+12, STATCHG+13, STATCHG+31
    DEV STOP+1~
    E STRTALL+3~, STRTALL+8*, STRTALL+13, STRTALL+18, STOPALL+3~, STOPALL+8*, STOPALL+13, STOPALL+18
    IO STOP+25
    IO("IP" EN+3
    IP STRT+1~, STRT+5*, MARKER+1~*, MARKER+2, MARKER+3, MARKER+4, MARKER+5, MARKER+6, STOP+1~, STOP+5*
    LSTN STRTALL+3~, STOPALL+3~
    LSTN("LSTNR" STRTALL+13, STRTALL+15, STRTALL+16, STOPALL+13, STOPALL+15, STOPALL+16
    LSTN("PORT" STRTALL+18, STRTALL+20, STRTALL+21, STOPALL+18, STOPALL+20, STOPALL+21
    LSTNID STRTALL+3~, STRTALL+14*, STRTALL+15*, STRTALL+16, STOPALL+3~, STOPALL+14*, STOPALL+15*, STOPALL+16
    LSTNIENS STRTALL+3~, STRTALL+17*, STRTALL+18, STOPALL+3~, STOPALL+17*, STOPALL+18
    MODE MARKER~, MARKER+3, MARKER+4, MARKER+5, MARKER+7
    >> POP STOP+22
    PORT MARKER~
    PORTID STRTALL+3~, STRTALL+19*, STRTALL+20*, STRTALL+21, STOPALL+3~, STOPALL+19*, STOPALL+20*, STOPALL+21
    REF STRT+1~, STRT+4*, MARKER+1~*, MARKER+2, MARKER+3, MARKER+4, MARKER+5, MARKER+6, STOP+1~, STOP+4*
    RESULT STATSCRN+6~, STATSCRN+9*, STATSCRN+10*, STATSCRN+11*, STATSCRN+14*, STATSCRN+15*, STATSCRN+16
    TYPE STATCHG+8~, STATCHG+15*, STATCHG+23
    U STATCHG+20, STRT+2*, STRTALL+21, STOPALL+21, STOP+2*
    X STOP+1~, STOP+15*, STOP+16, STOP+27*, STOP+28*, STOP+29*, STOP+30, STOP+31*, STOP+33
    X1 EN+1~, EN+4*, EN+7*, EN+8
    X2 EN+1~, EN+5*, EN+8
    XWBCUR STATSCRN+6~, STATSCRN+8*, STATSCRN+10, STATSCRN+11, STATSCRN+14, STATSCRN+15
    XWBDA STRTALL+3~, STRTALL+21*, STRTALL+22, STOPALL+3~, STOPALL+21*, STOPALL+22
    XWBDA(1 STRTALL+16*, STRTALL+17, STOPALL+16*, STOPALL+17
    XWBDA(2 STRTALL+9*, STRTALL+17, STOPALL+9*, STOPALL+17
    XWBENV STOP+1~, STOP+2*
    XWBFDA STATCHG+8~
    XWBIP EN+1~, EN+2*, EN+3*, EN+4, EN+7, STOP+1~, STOP+21*, STOP+22
    XWBNEW STATSCRN~, STATSCRN+10, STATSCRN+11, STATSCRN+14, STATSCRN+15
    XWBOS STOP+1~, STOP+8*
    XWBPORT STATCHG+8~, STATCHG+13*, STATCHG+22, STATCHG+23, STATCHG+25, STATCHG+26
    XWBSCR STRTALL+3~, STRTALL+11*, STRTALL+18, STOPALL+3~, STOPALL+11*, STOPALL+18
    XWBTDBG EN+1~, EN+6*
    XWBTSKT STRT~, STRT+6*, STRT+9, STRT+10, STRT+12, STRT+19, STRT+20, STRT+22, STRT+23, MARKER+2
    , MARKER+3, MARKER+4, MARKER+5, MARKER+6, STOP~, STOP+6*, STOP+11, STOP+12, STOP+15, STOP+22
    , STOP+23
    Y STATCHG+20, STRT+1~, STRT+4, MARKER+1~, STOP+2, STOP+4
    ZTCPU STATCHG+8~, STATCHG+12*, STATCHG+22, STATCHG+25
    >> ZTDESC STATCHG+22*, STATCHG+25*, STATCHG+27
    >> ZTDTH STATCHG+20*
    >> ZTIO STATCHG+20*
    >> ZTREQ STATCHG+20*
    >> ZTRTN STATCHG+23*, STATCHG+26*
    >> ZTSK STATCHG+29
    >> ZTUCI STATCHG+20*, STATCHG+22, STATCHG+25

    Marked Items

    Name Field # of Occurrence
    $T( STOP+27
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All