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

Package: GUI Generic Tools

Routine: BGUTCPH


Information

BGUTCPH ; IHS/OIT/MJL - Service TCP Messages ; [ 04/14/2008 4:48 PM ]

Source Information

Source file <BGUTCPH.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Kernel 7 ^%ZIS  CALL^%ZISTCP  (CLOSE,USE)^%ZISUTL  ($$EC,$$LGR)^%ZOSV  (,$$NEWERR)^%ZTER  $$NOW^XLFDT  LOGOUT^XUSRB  
GUI Generic Tools 2 $$LOG^BGUGUTL  ^BGUTRACE  
VA Fileman 1 DT^DICRW  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
GUI Generic Tools 1 BGUTCP  

Entry Points

Name Comments DBIA/ICR reference
PGFTR ;
WEB ;
EN(BGUIP,BGUSKT) ; EP-- MAIN entry point (usually jobbed)
; params: BGUIP := address of client requiring connection
; BGUSKT := client socket to call
IP ;
PGHDR ;
ETRAP ; -- on trapped error, send error info to client
TCP ; -- TCP PROCESSING LOOP
WRITE(BGUX) ;
INIT ;
SNDERR ;send error information
RESULT ;
; -- write returned data (in BGUDATA) to client
; BGUTYPE =
; 1 -- single value
; 2 -- table delimited by RS
; 3 -- word processing
; 4 -- global array type
; 5 -- raw buffer string
OLDETRAP ; -- on trapped error, send error info to client
LOGOUT ;
MAIN ;
RESTART ;IF ERROR OCCURRED CAPTURE ERROR AND COME BACK TO HERE

External References

Name Field # of Occurrence
^%ZIS IP+24
CALL^%ZISTCP IP+16
CLOSE^%ZISUTL RESTART+11
USE^%ZISUTL RESTART+11
$$EC^%ZOSV ETRAP+5
$$LGR^%ZOSV ETRAP+5
^%ZTER ETRAP+7
$$NEWERR^%ZTER RESTART+1, RESTART+6
$$LOG^BGUGUTL MAIN+23
^BGUTRACE MAIN+19
DT^DICRW RESTART+3
$$NOW^XLFDT LOGOUT+2
LOGOUT^XUSRB RESTART+8, ETRAP+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: /SOCKET(XWBTIP,XWBTSKT)
  • Line Location: IP+12
Function Call: WRITE
  • Prompt: "#BYE#",$C(4,13,10)
  • Line Location: TCP+12
Function Call: WRITE
  • Prompt: "#BYE#",$C(4,13,10)
  • Line Location: TCP+13
Function Call: WRITE
  • Prompt: BGUX,BGURS
  • Line Location: WRITE+1
Function Call: WRITE
  • Prompt: BGUX1
  • Line Location: WRITE+2
Function Call: WRITE
  • Prompt: "<HTML><HEAD>"
  • Line Location: PGHDR+1
Function Call: WRITE
  • Prompt: "<SCRIPT LANGUAGE=""VBScript"">"
  • Line Location: PGHDR+2
Function Call: WRITE
  • Prompt: "<!--",!
  • Line Location: PGHDR+3
Function Call: WRITE
  • Prompt: "Sub Window_OnLoad()",!
  • Line Location: PGHDR+4
Function Call: WRITE
  • Prompt: "document.frmInfo.submit",!
  • Line Location: PGHDR+5
Function Call: WRITE
  • Prompt: "End Sub",!
  • Line Location: PGHDR+6
Function Call: WRITE
  • Prompt: "-->"
  • Line Location: PGHDR+7
Function Call: WRITE
  • Prompt: "</SCRIPT>"
  • Line Location: PGHDR+8
Function Call: WRITE
  • Prompt: "<TITLE>LOGIN RESULTS</TITLE></HEAD>"
  • Line Location: PGHDR+9
Function Call: WRITE
  • Prompt: ">"
  • Line Location: PGHDR+10
Function Call: WRITE
  • Prompt: "<FORM NAME=""frmInfo"" METHOD=""POST"" ACTION="""_BGUASP_""">"
  • Line Location: PGHDR+11
Function Call: WRITE
  • Prompt: "</FORM></BODY></HTML>"
  • Line Location: PGFTR+1
Function Call: WRITE
  • Prompt: "-1",$C(30),"SERVER ERROR=",$$EC^%ZOSV_" LAST REF="_$$LGR^%ZOSV,$C(4,13,10)
  • Line Location: OLDETRAP+1
Function Call: WRITE
  • Prompt: XWBERR,!
  • Line Location: OLDETRAP+19
Function Call: WRITE
  • Prompt: XWBERR,!
  • Line Location: OLDETRAP+21
Function Call: WRITE
  • Prompt: XWBERR,!
  • Line Location: OLDETRAP+23
Function Call: WRITE
  • Prompt: $C($L(X))_X
  • Line Location: SNDERR+4
Function Call: WRITE
  • Prompt: !
  • Condition for execution: ($X+$L(X)+1)>512
  • Line Location: SNDERR+4
Function Call: WRITE
  • Prompt: $C($L(X))_X
  • Line Location: SNDERR+6
Function Call: WRITE
  • Prompt: !
  • Condition for execution: ($X+$L(X)+1)>512
  • Line Location: SNDERR+6
Routine Call
  • %ZIS
  • Line Location:
    • IP+24

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("OS" IP+4, ETRAP+6
^%ZOSF("TRAP" RESTART+2, RESTART+7
^BGUSEC - [#90062.1] LOGOUT+2*, LOGOUT+4, LOGOUT+5, LOGOUT+6*, LOGOUT+7*
^BGUSEC("CUR" LOGOUT+2!
^BGUSP(1 INIT+1, MAIN+19, MAIN+23, MAIN+24, LOGOUT+3
^XWB(8994 - [#8994] MAIN+4, MAIN+8, MAIN+9

Label References

Name Line Occurrences
@( MAIN+18
INIT IP+27, WEB+3
LOGOUT TCP+12
MAIN TCP+17, WEB+3
PGFTR MAIN+7, MAIN+25
PGHDR MAIN+7, MAIN+25
RESTART ETRAP+16
RESULT MAIN+7, MAIN+25
SNDERR OLDETRAP+21, ETRAP+11, ETRAP+13
TCP RESTART+4
WRITE RESULT+9, RESULT+11, RESULT+13, RESULT+14, ETRAP+11, ETRAP+13

Naked Globals

Name Field # of Occurrence
^("OS" IP+4, ETRAP+6
^(0 LOGOUT+5*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BGUAPP MAIN+23*
>> BGUASP PGHDR+11
>> BGUBGRND PGHDR+10
>> BGUCK RESULT+13*, RESULT+14
>> BGUCKL RESULT+13*, RESULT+14
BGUDATA TCP+1~, MAIN+3!, RESULT+9, RESULT+12, RESULT+13, RESULT+15
BGUDATA( RESULT+11
BGUDATA(1 MAIN+6*
BGUDATA(2 MAIN+6*
>> BGUDTIME TCP+6, TCP+7, TCP+11, INIT+1*
>> BGUERR WEB+1*
>> BGUETH MAIN+23*
BGUGUI MAIN+3~, MAIN+18*
>> BGUHTMLS WEB+2*, WRITE+2
>> BGUI RESULT+13*, RESULT+14*
BGUIP EN~, IP+1, IP+15, WEB+1*, MAIN+23, RESULT+16
>> BGUITYPE MAIN+8*, MAIN+15
BGUMSG MAIN+13*, MAIN+19, MAIN+23, MAIN+24, MAIN+26!
BGUMSM IP+5~*, TCP+1, TCP+3, RESULT+16
>> BGUPRM MAIN+23*
>> BGURS RESULT+11*, WRITE+1
>> BGUSEC MAIN+23*, LOGOUT+1, LOGOUT+2, LOGOUT+4, LOGOUT+5, LOGOUT+6, LOGOUT+7
BGUSKT EN~, IP+1*, IP+15, MAIN+23
>> BGUSTAT( MAIN+24*, LOGOUT+6
BGUTBUF TCP+1~, TCP+2, TCP+6*, TCP+7*, TCP+10*, TCP+11*, TCP+12, TCP+13*, MAIN+4, MAIN+6
, MAIN+13*, MAIN+14, MAIN+16, MAIN+17*
BGUTLEN TCP+1~, TCP+9*, TCP+10, TCP+11
BGUTLEN1 TCP+1~, TCP+6*, TCP+9
BGUTLEN2 TCP+1~, TCP+7*, TCP+9
>> BGUTRACE MAIN+19
BGUTREF TCP+1~, MAIN+4*, MAIN+5, MAIN+8, MAIN+9*, MAIN+10, MAIN+11
BGUTRTN TCP+1~, MAIN+10*, MAIN+15*, MAIN+16*, MAIN+18*
BGUTYPE TCP+1~, MAIN+6*, MAIN+11*, RESULT+9, RESULT+10, RESULT+11
BGUWEB TCP+1~*, WEB+1*, INIT+2*, MAIN+7, MAIN+25, WRITE+1
BGUX WRITE~, WRITE+1, WRITE+2
>> BGUX1 WRITE+2*
DIQUIET RESTART+3*, MAIN+3~, MAIN+18*
DUZ RESTART+8, TCP+13, MAIN+23, ETRAP+8, LOGOUT+2
>> I MAIN+16*, RESULT+11*, LOGOUT+6*, LOGOUT+7
IO IP+16, IP+23*, IP+24
IO(0 IP+16*, IP+23*
>> IOP IP+24*
IOST IP+23*
IOST(0 IP+23*
>> IOT IP+23*
>> POP IP+16
U RESTART+3*, INIT+1*, MAIN+23, LOGOUT+6
X RESTART+2*, RESTART+7*, TCP+1~, MAIN+3!, SNDERR+2~, SNDERR+3*, SNDERR+4, SNDERR+5*, SNDERR+6, LOGOUT+6*
X( MAIN+16*
XRTL IP+8!*
XWBARY RESTART+9!
>> XWBCLMAN IP+3*
XWBERC ETRAP+1~, ETRAP+5*, ETRAP+8
XWBERR OLDETRAP+21, ETRAP+1~, ETRAP+5*, ETRAP+11, ETRAP+13
>> XWBERROR SNDERR+5, SNDERR+7*
>> XWBNULL IP+23*, IP+24*
>> XWBOS IP+4*, IP+5, IP+8, IP+16, IP+17, IP+23, ETRAP+6*, ETRAP+10, ETRAP+12
XWBR RESTART+9!
>> XWBSEC SNDERR+3
>> XWBTDEV IP+16*, IP+17*, RESTART+4, RESTART+10, TCP+3, ETRAP+9
>> XWBTIME IP+9*
>> XWBTIP IP+15*, IP+16
>> XWBTLEN OLDETRAP+21, ETRAP+11
>> XWBTSKT IP+15*, IP+16
>> Y LOGOUT+6*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All