Routine: XOBVRPC

Information

XOBVRPC ;; mjk/alb - VistaLink RPC Server Listener Code ; 07/27/2002 13:00

Package	Total	Call Graph
Kernel	4	(LOGRSRC,T0,T1)^%ZOSV APPERROR^%ZTER $$UP^XLFSTR $$RPC^XUSAP
VistALink	3	($$ENVFTR,$$GETTO,$$TOCHK,$$VLHDR,ERROR)^XOBVLIB $$GETVER^XOBVRPCX (POST,PRE,WRITE)^XOBVSKT
VistALink Security	2	($$CHKCTXT,$$CRCONTXT)^XOBSCAV $$SETUPDUZ^XOBSRA
VA FileMan	1	$$EZBLD^DIALOG

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
VistALink	1	XOBVRPCI

Entry Points

Name	Comments	DBIA/ICR reference
EN(XOBDATA)	; -- handle parsed messages request
ENQ	; -- end message handler
CALLRPC(XWBPTYPE,XWBWRAP,XWBAPVER,METHSIG)	;-- execute RPC (use Broker RPC return type & wrap flag if there)
CLEAN	; -- clean up message handler environment
SEND(XOBR)	; -- stream rpc data to client
DOCTYPE	;
GETFMT()	; -- determine response format type
PROCESS	; -- send the real results
ERROR(CODE,RPCNAME,PARAMS)	; -- send rpc application error
VER()	; -- check version and if re-authentication check is needed ; -- IMPORTANT: This tag needs updating for version numbers for each target release. ; -- This call needs only be called once per connection. ;
VERQ	;

External References

Name	Field # of Occurrence
LOGRSRC^%ZOSV	EN+78, EN+84
T0^%ZOSV	EN+72
T1^%ZOSV	EN+87
APPERROR^%ZTER	ERROR+19
$$EZBLD^DIALOG	ERROR+15
$$UP^XLFSTR	EN+43, VER+24, VER+31
$$CHKCTXT^XOBSCAV	EN+53
$$CRCONTXT^XOBSCAV	EN+48
$$SETUPDUZ^XOBSRA	EN+39
$$ENVFTR^XOBVLIB	SEND+13
$$GETTO^XOBVLIB	EN+97
$$TOCHK^XOBVLIB	EN+96
$$VLHDR^XOBVLIB	SEND+7
ERROR^XOBVLIB	ERROR+16
$$GETVER^XOBVRPCX	EN+66
POST^XOBVSKT	SEND+15
PRE^XOBVSKT	SEND+5
WRITE^XOBVSKT	SEND+7, SEND+9, SEND+13, DOCTYPE+1, PROCESS+3, PROCESS+6, PROCESS+9, PROCESS+15, PROCESS+16, PROCESS+21 , PROCESS+24
$$RPC^XUSAP	EN+43

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("XY"	EN+90
^XWB(8994 - [#8994]	EN+8, EN+11, EN+14

Label References

Name	Line Occurrences
$$GETFMT	SEND+3
$$VER	EN+30
@(	CALLRPC+1
CALLRPC	EN+81
CLEAN	ENQ+1
ENQ	EN+3, EN+8, EN+17, EN+21, EN+26, EN+31, EN+36, EN+49, EN+54, EN+96
ERROR	EN+4, EN+9, EN+18, EN+23, EN+27, EN+32, EN+40, EN+45, EN+50, EN+55 , EN+98
PROCESS	SEND+11
SEND	EN+101
VERQ	VER+19, VER+23, VER+27, VER+30

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CODE	ERROR~, ERROR+4, ERROR+7*, ERROR+12, ERROR+15, ERROR+19
CV	VER+4~, VER+12*, VER+19, VER+20, VER+24, VER+30, VER+31
D	PROCESS+1~, PROCESS+15, PROCESS+16
DX	EN+1~, EN+90*
DY	EN+1~, EN+90*
ENV	VER+4~, VER+16*, VER+23, VER+24, VER+27, VER+30, VER+31
I	PROCESS+1~, PROCESS+6, PROCESS+9, PROCESS+13, PROCESS+15, PROCESS+16, PROCESS+24*
METHSIG	EN+1~, EN+69*, EN+81, CALLRPC~, CALLRPC+1
PARAMS	EN+22~, EN+23, EN+97~, EN+98, ERROR~, ERROR+4, ERROR+5!, ERROR+15
PARAMS(	ERROR+6*
PARAMS(1	EN+22, EN+97
PARAMS(2	EN+22, EN+97
POS	CLEAN+1~, CLEAN+3, CLEAN+4
ROU	EN+1~, EN+63*, EN+69
RPC0	EN+1~, EN+14*, EN+17, EN+21, EN+22, EN+26, EN+62, EN+63, EN+64, EN+65
RPCIEN	EN+1~, EN+11*, EN+14, EN+43
RPCNAME	EN+1~, EN+6*, EN+8, EN+9, EN+11, EN+18, EN+21, EN+22, EN+23, EN+27 , EN+32, EN+40, EN+45, EN+50, EN+53, EN+55, EN+78, EN+87, EN+97, EN+98 , ERROR~, ERROR+11, ERROR+13
SV	VER+4~, VER+14*, VER+20, VER+24, VER+31
T	PROCESS+1~, PROCESS+13*, PROCESS+16
TAG	EN+1~, EN+62*, EN+69
U	EN+21, EN+22, EN+26, EN+62, EN+63, EN+64, EN+65, ERROR+4, ERROR+6, VER+19 , VER+20, VER+23, VER+24, VER+27, VER+31
XOBDAT	ERROR+1~, ERROR+16
XOBDAT("ERRORS"	ERROR+10, ERROR+11, ERROR+12, ERROR+13, ERROR+14, ERROR+15
XOBDAT("MESSA	GE TYPE" , ERROR+9*
XOBDATA	EN~
XOBDATA("XOB	RPC" , EN+3, EN+6, EN+43, EN+48, EN+58, EN+59, EN+69, CLEAN+4, VER+12
XOBERR	EN+1~, EN+30, EN+31, EN+32, EN+35, EN+36, EN+39, EN+40, EN+44, EN+45 , ERROR+6, VER+4~, VER+8, VER+20, VER+24, VER+31, VERQ+1, VERQ+2
XOBFILL	SEND+1~
XOBFMT	SEND+1~, SEND+3*, SEND+9
XOBI	ERROR+1~, ERROR+6*
>> XOBNULL	EN+75, EN+90
>> XOBPORT	EN+93
XOBPTYPE	EN+1~, EN+64*, EN+81, GETFMT+1, GETFMT+2, PROCESS+3, PROCESS+5, PROCESS+8, PROCESS+11, PROCESS+19 , PROCESS+23
XOBR	EN+1~, EN+101, SEND~, PROCESS+3, PROCESS+12, PROCESS+13, PROCESS+17, PROCESS+20, PROCESS+21
XOBR(	PROCESS+6, PROCESS+9, PROCESS+24
XOBRA	EN+1~, VER+10, VER+27, VERQ+1
XOBSEC	EN+1~, EN+48, EN+49, EN+50, EN+53, EN+54, EN+55
>> XOBSYS("ENV"	VER+16
>> XOBSYS("RPC R	EAUTH" , EN+30, EN+36, VER+6!, VERQ+1*
XOBVER	EN+1~, EN+66*, EN+81
XOBWRAP	EN+1~, EN+65*, EN+81, GETFMT+4, PROCESS+9, PROCESS+15, PROCESS+16
>> XRT0	EN+87
>> XRTL	EN+72
XRTN	EN+1~, EN+87*
XWBAPVER	CALLRPC~
XWBPTYPE	CALLRPC~
XWBWRAP	CALLRPC~

Customize PDF page

Package: VistALink