XWBPRS ;ISF/STAFF - VISTA BROKER MSG PARSER ;11/15/11 12:39
Source file <XWBPRS.m>
| Package | Total | Call Graph |
|---|---|---|
| RPC Broker | 4 | LOG^XWBDLOG $$BREAD^XWBRW CHKPRMIT^XWBSEC LOG^XWBTCPM |
| IHS User Security Audit | 1 | $$XWB^BUSARPC |
| Kernel | 1 | LOGRSRC^%ZOSV |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PRS3() | ;Parse the Security chunk
|
|
| PRS1() | ;Parse the HEADER chunk
|
|
| SREAD() | ;Read a S_PACK
|
|
| PRS4() | ;Parse the Command chunk
|
|
| SETCSID(XWBCSID) | ; Obtain and setup selected coversheet ids for foreground processing
|
|
| PARAM(NA) | ;Add a new parameter to the list
|
|
| RPC() | ;Check the rpc information.
|
|
| STRTCVR1 | ; JLI 110606
; SET UP DATA FOR OBTAINING FOREGROUND PROCESSING TIMES FOR COVERSHEET LOADS ; REQUESTED FOR TIMING ON COMMODITY SERVERS, ETC. |
|
| LREAD(ROOT) | ;Read a L_PACK
|
|
| ZZZ(X) | ;Convert
|
|
| LINST(A,X,XWBY) | ;instantiate local array
|
|
| GINST(R,S,V) | ;instantiate global
|
|
| CAPI(XWBY,PAR) | ;make API call
|
|
| CLRBUF | ;Empties Input buffer
|
|
| STRTCVR2(RETRNVAL) | ; JLI 110606 - setup after coming back from initial start for coversheets
|
|
| OARY() | ;create storage array
|
|
| GETV(V) | ;get value of V - reference parameter
|
|
| ENDCOVER | ; no more cover sheets to process, so set final values, clean up
|
|
| CREF(R,P) | ;Convert array contained in P to reference A
|
|
| VCHK(S) | ;Parse string for first argument
|
|
| PRS2() | ;Parse the RPC chunk
|
|
| VCHKQ | ;Find closing quote
|
|
| VCHKP | ||
| PRS5() | ;Parse Data Parameter chunk
|
|
| CALLP(XWBP,XWBDEBUG) | ;make API call using Protocol string
|
|
| PRSP(P) | ;ef, Parse Protocol
|
|
| PRSM() | ;ef, Parse message
|
|
| ONECOVER | ; called after data is returned to client
|
| Name | Line Occurrences |
|---|---|
| Function Call: READ |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | CAPI+16 |
| ^KMPTMP("KMPD-CPRS" | CAPI+5 |
| ^KMPTMP("KMPDT" | STRTCVR1+10*, ENDCOVER+3* |
| ^ORD(101.24 - [#101.24] | SETCSID+4 |
| ^TMP("XWBA" | PRS5+27 |
| ^TMP("XWBFGP" | CAPI+6, STRTCVR1+6!, STRTCVR1+9*, SETCSID+4*, SETCSID+5, SETCSID+6, SETCSID+7*, SETCSID+8*, SETCSID+9*, ONECOVER+1! , ONECOVER+3!, ONECOVER+4!, ONECOVER+5!, ONECOVER+8!, ONECOVER+9, ENDCOVER+2, ENDCOVER+4! |
| ^XWB(8994 - [#8994] | RPC+8, RPC+10, SETCSID+4 |
| Name | Line Occurrences |
|---|---|
| $$GETV | PRS5+16 |
| $$OARY | PRS5+20 |
| $$PRSM | CALLP+4 |
| $$PRSP | CALLP+3 |
| $$RPC | CALLP+6 |
| $$SREAD | PRS1+3, PRS1+4, PRS2+3, PRS2+4, PRS4+2 |
| $$VCHK | GETV+4 |
| @( | CAPI+15 |
| CAPI | CALLP+11 |
| CLRBUF | CALLP+12 |
| ENDCOVER | ONECOVER+9 |
| GINST | PRS5+31 |
| LINST | PRS5+23 |
| LREAD | PRS5+11, PRS5+15, PRS5+22, PRS5+30 |
| ONECOVER | CAPI+19 |
| PARAM | PRS5+12, PRS5+16, PRS5+21, PRS5+29 |
| SETCSID | STRTCVR2+3 |
| STRTCVR1 | CAPI+5 |
| STRTCVR2 | CAPI+18 |
| VCHKP | VCHK+2 |
| VCHKQ | VCHK+2, VCHKP+1 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | SETCSID+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | PRS1+1~, CLRBUF+1~, CLRBUF+2* |
| A | PARAM+1~, PARAM+2*, PARAM+3*, PARAM+4, LINST~, LINST+2, OARY+1~, OARY+3*, OARY+4, OARY+5 , OARY+6 |
| C | PRSP+5~, PRSP+6*, PRSM+5~, PRSM+6*, RPC+5~, RPC+6*, VCHK+1~, VCHK+2*, VCHKP+1*, VCHKQ+1* |
| CNK | PRSM+5~, PRSM+6*, PRSM+8*, PRSM+9 |
| CONT | PRS5+5~, PRS5+6*, PRS5+7*, PRS5+19, PRS5+26 |
| DFN | STRTCVR1+3~, STRTCVR1+7*, STRTCVR1+8 |
| DONE | PRS5+5~, PRS5+6*, PRS5+7, PRS5+9*, OARY+1~, CREF+1~, CREF+2*, CREF+4, CREF+5* |
| DR | RPC+5~ |
| DUZ | STRTCVR1+10 |
| DX | CAPI+1~ |
| DY | CAPI+1~ |
| ERR | CALLP+1~, CALLP+2*, CALLP+3*, CALLP+4*, CALLP+6*, CALLP+7, CALLP+8, CALLP+9*, CALLP+10, CALLP+12 , PRSP+5~, PRSP+6*, PRSP+8*, PRSP+9, PRSP+15, PRSM+5~, PRSM+7*, PRSM+10, PRS5+5~, PRS5+6* , PRS5+39, RPC+5~, RPC+6*, RPC+16 |
| EX1 | PRSM+5~, PRSM+6*, PRSM+8, PRSM+9* |
| F | PRS5+5~, PRS5+6* |
| F1 | CREF+1~, CREF+8* |
| FL | PRS5+5~ |
| HWND | STRTCVR1+3~, STRTCVR1+7*, STRTCVR1+8 |
| I | LREAD+1~, LREAD+2*, LREAD+4*, VCHK+1~, VCHK+2*, VCHK+3, VCHKP+1*, VCHKQ+1*, ZZZ+1~, ZZZ+2* , OARY+1~, OARY+2*, OARY+3, CREF+1~, CREF+4*, CREF+5, CREF+6, CREF+7, CREF+8, CREF+9 , CREF+10, STRTCVR2+1~, STRTCVR2+3*, SETCSID+1~, SETCSID+4*, ENDCOVER+1~ |
| IO("CLNM" | STRTCVR1+10 |
| IP | STRTCVR1+3~, STRTCVR1+7*, STRTCVR1+8 |
| IX | PRS5+5~, PRS5+6*, PRS5+7*, PRS5+12, PRS5+16, PRS5+20, PRS5+21, PRS5+27, PRS5+34 |
| J | ZZZ+1~, ZZZ+2* |
| K | PRS5+5~ |
| L | PRS1+1~, PRS2+1~, PRS3+1~, PRS5+5~, SREAD+1~, SREAD+2*, SREAD+3, LREAD+1~, LREAD+3*, LREAD+4 |
| M | PRSP+5~, RPC+5~, RPC+6* |
| MAXP | PRS5+5~ |
| N | GINST+1~, GINST+3*, GINST+4 |
| NA | PARAM~, PARAM+2*, PARAM+3 |
| NODE | STRTCVR1+3~, STRTCVR1+8*, STRTCVR1+9, STRTCVR1+10, ENDCOVER+1~, ENDCOVER+2*, ENDCOVER+3 |
| P | PRSP~, PRSP+7*, PRSP+8, PRSP+10, PRSP+11, PRSP+12, PRSP+13, VCHK+1~, VCHKP*, VCHKP+1* , CREF~, CREF+5, CREF+6 |
| P1 | PRS5+5~, PRS5+8! |
| P1(1 | PRS5+22, PRS5+23, PRS5+30, PRS5+31 |
| P2 | PRS5+5~ |
| P3 | PRS5+5~ |
| P4 | PRS5+5~ |
| P5 | PRS5+5~ |
| PAR | CAPI~, CAPI+7, CAPI+8! |
| R | PRSP+5~, PRSP+6*, PRSP+10, PRSP+11, PRSP+12, PRSP+13, PRSP+14, PRSM+5~, PRSM+6*, PRS1+1~ , PRS1+2*, PRS1+3, PRS1+4, PRS2+1~, PRS2+2*, PRS2+3, PRS2+4, PRS2+5, PRS3+1~, PRS3+2* , PRS4+1~, PRS4+2*, PRS5+5~, PRS5+6*, PRS5+12, PRS5+16, PRS5+20, PRS5+21, PRS5+27, PRS5+34 , RPC+5~, RPC+6*, RPC+7, RPC+12, RPC+13, GINST~, GINST+3, CREF~, CREF+9 |
| RETRNVAL | STRTCVR2~, STRTCVR2+3 |
| ROOT | LREAD~, LREAD+2, LREAD+4 |
| RPC | RPC+5~, RPC+7*, RPC+8, RPC+9, RPC+11, SETCSID+1~, SETCSID+4* |
| S | CALLP+1~, GINST~, GINST+3, VCHK~, VCHK+2, VCHK+3, VCHKP+1, VCHKQ+1, CREF+1~, CREF+3* , CREF+10*, CREF+11 |
| STS | CAPI+16~*! |
| T | RPC+5~, RPC+8*, RPC+9, RPC+10, CAPI+1~ |
| T(0 | RPC+10*, RPC+11, RPC+12, RPC+13, RPC+14, RPC+15 |
| TY | PRS5+5~, PRS5+7*, PRS5+9, PRS5+10, PRS5+14, PRS5+18, PRS5+25, PRS5+33, PRS5+36, PARAM+3 |
| U | CALLP+7, RPC+11, SETCSID+4, ONECOVER+1, ENDCOVER+3 |
| V | GINST~, GINST+2*, GINST+4, GETV~, GETV+2, GETV+4, GETV+5*, GETV+6 |
| V7 | SREAD+1~, SREAD+3*, SREAD+4, LREAD+1~, LREAD+4* |
| VA | PRS5+5~, PRS5+8! |
| VA(1 | PRS5+12, PRS5+16, PRS5+23, PRS5+31 |
| X | PRSP+5~, PRSM+5~, RPC+5~, LINST~, LINST+2*, LINST+3, GETV+1~, GETV+2*, GETV+3, ZZZ~ , ZZZ+2*, ZZZ+3, CAPI+16~*!, CREF+1~, ENDCOVER+1~ |
| X( | CREF+6*, CREF+7, CREF+8, CREF+9*, CREF+10 |
| XWB | CALLP+1!, CALLP+13!, CAPI+16 |
| XWB( | PRSP+10*, PRSP+11*, PRSP+12*, PRSP+13*, PRSP+14*, PRS1+3*, PRS1+4*, PRS2+3*, PRS2+4*, PRS2+5 , PRS4+2*, PRS5+12*, PRS5+16*, PRS5+20*, PRS5+21, PRS5+27*, PRS5+34*, RPC+7, RPC+12*, RPC+13* |
| XWB("ARRAY" | OARY+2* |
| XWB("PARAM" | CALLP+11, PRS5+6*, PARAM+2, PARAM+4* |
| XWB(2 | CALLP+5, CALLP+8, CAPI+5, CAPI+6, CAPI+7, CAPI+13, CAPI+18 |
| XWB(5 | STRTCVR1+7 |
| >> XWBAPVER | PRS2+3* |
| XWBARY | CALLP+1~, CALLP+14!, PRS5+20*, PRS5+23, PRS5+27*, PRS5+28, PRS5+29, PRS5+31 |
| XWBCALL | CAPI+1~, CAPI+7*, CAPI+11, CAPI+15 |
| >> XWBCALL2 | CAPI+7*, CAPI+15* |
| XWBCOVER | CAPI+6, CAPI+18, CAPI+19, STRTCVR1+5*, ENDCOVER+4! |
| XWBCSID | STRTCVR2+3*, SETCSID~, SETCSID+4 |
| XWBCSIEN | SETCSID+6~*, SETCSID+7, SETCSID+8, SETCSID+9 |
| XWBCSRPC | CAPI+6*, CAPI+19, ONECOVER+1, ONECOVER+2, ONECOVER+8! |
| XWBDEBUG | CALLP~, CALLP+13, PRS2+5, PRS4+3, CAPI+11 |
| >> XWBENVL | PRSP+12*, PRSP+14*, LREAD+3 |
| XWBFGDIF | STRTCVR2+1~ |
| XWBFGTIM | CAPI+5*, CAPI+6*, STRTCVR1+10, STRTCVR2+4!, ONECOVER+8! |
| >> XWBNULL | CAPI+9 |
| XWBP | CALLP~, CALLP+11 |
| >> XWBPRT | PRSP+13* |
| >> XWBPTYPE | RPC+14* |
| >> XWBSEC | CALLP+7*, CALLP+9 |
| >> XWBSHARE | CALLP+5* |
| >> XWBTCMD | CALLP+12, PRS4+2*, PRS4+3, PRS4+4 |
| >> XWBTDEV | CAPI+24 |
| >> XWBWRAP | RPC+15* |
| XWBY | LINST~, LINST+1*, LINST+3, CAPI~, CAPI+18 |