VBECRPCA ;DALOI/RLM - VBECS Lab Services Lookups ;10 April 2003
Source file <VBECRPCA.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
VBECS | 2 | VBECS LAB TEST RESULTS LOOKUP VBECS LABORATORY TEST LOOKUP |
Name | Comments | DBIA/ICR reference |
---|---|---|
LOOK60 | ;
|
|
L60 | ||
KILL | ;
|
|
WSTEST(VBWST) | ;White space test
|
|
WSTRIP(VBDATA) | ;Strip White Space
|
|
WSCONV(VBDATA) | ;Convert White Space
|
|
LABTEST(RESULTS,DATA) | ; Main entry for VBECS LABORATORY TEST LOOKUP RPC
|
|
TSTRSLT(RESULTS,SDATE,EDATE,DIV,TESTS,PATS) | ;
; Main entry for VBECS LAB TEST RESULTS LOOKUP RPC |
|
RESXML(DFN) | ; Subroutine to extract Lab Test result and build return XML
|
Name | Field # of Occurrence |
---|---|
FIND^DIC | L60+3, LABTEST+11 |
$$GET1^DIQ | L60+17, L60+18, L60+33, L60+39 |
GETS^DIQ | L60+6, L60+10, L60+23, L60+25 |
$$CPT^ICPTCOD | L60+31, L60+37 |
$$LRDFN^LR7OR1 | RESXML+18 |
RR^LR7OR1 | TSTRSLT+15, TSTRSLT+20 |
ADD^VBECRPC | L60+2, L60+43, L60+44, L60+45, L60+48, L60+49, L60+51, L60+52, L60+53, L60+54 , L60+55, L60+56, L60+57, L60+58, L60+59, L60+60, L60+61, LABTEST+8, LABTEST+13, LABTEST+25 , LABTEST+27, LABTEST+28, RESXML+20, RESXML+21, RESXML+22, RESXML+23, RESXML+24 |
BEGROOT^VBECRPC | LOOK60+2, LABTEST+6, TSTRSLT+9, RESXML+19 |
ENDROOT^VBECRPC | LOOK60+5, LABTEST+9, LABTEST+14, LABTEST+32, TSTRSLT+23, RESXML+25 |
$$FMTHL7^XLFDT | RESXML+18 |
$$HL7TFM^XLFDT | TSTRSLT+7, TSTRSLT+8 |
$$CHARCHK^XOBVLIB | L60+2, L60+43, L60+45, L60+48, L60+49, L60+51, L60+52, L60+53, L60+54, L60+56 , L60+57, LABTEST+13, LABTEST+25, LABTEST+27, LABTEST+28, RESXML+20, RESXML+21, RESXML+22, RESXML+23, RESXML+24 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
RPC Name | Call Tags |
---|---|
VBECS LABORATORY TEST LOOKUP | LABTEST |
VBECS LAB TEST RESULTS LOOKUP | TSTRSLT |
FileNo | Call Tags |
---|---|
^LAB(60 - [#60] | FIND^DIC, GETS^DIQ |
60.01 | GETS^DIQ |
^LAM - [#64] | GET1^DIQ |
64.018 | GETS^DIQ |
^ICPT - [#81] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LAB(60 - [#60] | LOOK60+3, L60+7, L60+8, LABTEST+21 |
^LAB(61 - [#61] | LABTEST+23 |
^LAM - [#64] | L60+22, L60+24 |
^LR - [#63] | RESXML+18 |
^TMP("LRRR" | TSTRSLT+16, TSTRSLT+21, RESXML+1, RESXML+4, RESXML+6, RESXML+8, RESXML+9 |
^TMP("VBEC_LABRES" | TSTRSLT+5 |
^TMP("VBEC_LABTEST_LOOKUP" | LABTEST+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARR60 | LABTEST+2~ |
ARR60("DILIST" | LABTEST+12, LABTEST+17, LABTEST+18, LABTEST+19 |
BDT | TSTRSLT+3~, TSTRSLT+4*, TSTRSLT+7*, TSTRSLT+15, TSTRSLT+20 |
CNT | LABTEST+2~, LABTEST+20*, LABTEST+22*, LABTEST+23 |
>> COMPDATE | RESXML+18*, RESXML+24 |
CPT | L60+29*, L60+31, L60+32, L60+33, L60+35*, L60+37, L60+38, L60+39, KILL+1! |
CPTA | L60+22*, L60+23, L60+24*, L60+25, L60+28*, L60+29, L60+33, L60+34*, L60+35, L60+39 , KILL+1! |
CPTB | L60+28*, L60+29, L60+33, L60+34*, L60+35, L60+39, KILL+1! |
DATA | LOOK60+3*, LOOK60+4, L60+2, L60+3, L60+43, LABTEST~, LABTEST+7, LABTEST+11, LABTEST+13 |
DFN | TSTRSLT+3~, TSTRSLT+12*, TSTRSLT+15, TSTRSLT+16, TSTRSLT+20, TSTRSLT+21, RESXML~, RESXML+1, RESXML+4, RESXML+6 , RESXML+8, RESXML+9, RESXML+18, RESXML+20 |
DIV | TSTRSLT~ |
EDATE | TSTRSLT~, TSTRSLT+8 |
EDT | TSTRSLT+3~, TSTRSLT+4*, TSTRSLT+8*, TSTRSLT+15, TSTRSLT+20 |
ERR | LABTEST+2~, LABTEST+12 |
IEN | LABTEST+2~, LABTEST+18*, LABTEST+21, LABTEST+25, LABTEST+27, LABTEST+30 |
INVDT | RESXML+2~, RESXML+5*, RESXML+6*, RESXML+8, RESXML+9, RESXML+18 |
LIST | LABTEST+2~, LABTEST+20*, LABTEST+26*, LABTEST+28, LABTEST+29, LABTEST+30 |
NAME | LABTEST+2~, LABTEST+19*, LABTEST+25, LABTEST+27, LABTEST+30 |
NLT1 | L60+17*, L60+20, KILL+1! |
NLT2 | L60+18*, L60+20, KILL+1! |
OUTPUT | RESXML+2~, RESXML+9*, RESXML+10, RESXML+12, RESXML+14, RESXML+16 |
PATS | TSTRSLT~ |
PATS( | TSTRSLT+11, TSTRSLT+12 |
RES | RESXML+2~, RESXML+14*, RESXML+23 |
RESULTS | LABTEST~, LABTEST+4*, LABTEST+5, TSTRSLT~, TSTRSLT+5*, TSTRSLT+6 |
SDATE | TSTRSLT~, TSTRSLT+7 |
SEQ | RESXML+2~, RESXML+7*, RESXML+8*, RESXML+9 |
SITE | LABTEST+2~, LABTEST+20*, LABTEST+21*, LABTEST+23 |
SPEC | LABTEST+2~, LABTEST+20*, LABTEST+22*, LABTEST+24 |
SPEC( | LABTEST+23*, LABTEST+26, LABTEST+28, LABTEST+29, LABTEST+30 |
SUB | RESXML+2~, RESXML+3*, RESXML+4*, RESXML+6, RESXML+8, RESXML+9, RESXML+18 |
TEST | TSTRSLT+3~, TSTRSLT+19*, TSTRSLT+20 |
TESTCODE | RESXML+2~, RESXML+12*, RESXML+21 |
TESTNAME | TSTRSLT+3~, RESXML+2~, RESXML+16*, RESXML+22 |
TESTS | TSTRSLT~, TSTRSLT+14 |
TESTS( | TSTRSLT+18, TSTRSLT+19 |
TSTRES | TSTRSLT+3~ |
VBA | L60+4*, L60+13*, L60+14, L60+16*, L60+17, L60+18, L60+20, L60+22, L60+23, L60+24 , L60+25, KILL+1! |
VBAC | L60+14*, KILL+1! |
VBB | L60+4*, L60+6, L60+7, L60+8, L60+10, L60+14*, KILL+1! |
VBC | L60+8*, L60+10, KILL+1! |
VBDATA | WSTRIP~, WSTRIP+1*, WSTRIP+2*, WSTRIP+3, WSCONV~, WSCONV+1*, WSCONV+2*, WSCONV+3 |
VBECCNT | LOOK60+1*, LABTEST+3*, LABTEST+33!, TSTRSLT+4* |
>> VBECTST | LABTEST+30 |
VBOUT | L60+12!, KILL+1! |
VBOUT("DILIST" | L60+4 |
VBOUT2 | L60+26!, KILL+1! |
VBOUT2(60 | L60+16, L60+17, L60+18, L60+20, L60+22, L60+23, L60+24, L60+25 |
VBOUT3 | L60+15!, KILL+1! |
VBOUT3( | L60+13, L60+14 |
VBOUT4 | KILL+1! |
VBOUT4( | L60+14*, L60+46, L60+48, L60+49, L60+51, L60+52, L60+59, L60+60 |
VBOUT5 | KILL+1! |
VBOUT5( | L60+20*, L60+44, L60+45, L60+53, L60+55, L60+56, L60+58 |
VBOUT6 | L60+40!, KILL+1! |
VBOUT6( | L60+28, L60+29 |
VBOUT7 | L60+40!, KILL+1! |
VBOUT7( | L60+34, L60+35 |
VBOUT8 | KILL+1! |
VBOUT8( | L60+33*, L60+54 |
VBOUT9 | KILL+1! |
VBOUT9( | L60+39*, L60+57 |
VBRSX | TSTRSLT+3~, TSTRSLT+10*, TSTRSLT+11*, TSTRSLT+12 |
VBWST | WSTEST~, WSTEST+1 |
VBXA | L60+42*, L60+44*, L60+45, L60+46, L60+48, L60+49, L60+51, L60+52, L60+53, L60+54 , L60+55, L60+56, L60+57, L60+58, L60+59, L60+60, KILL+1! |
VBXI | L60+46*, L60+48, L60+49, L60+51, L60+52, L60+59, L60+60, KILL+1! |
VBXJ | L60+54*, L60+57*, KILL+1! |
X | LABTEST+2~, LABTEST+16*, LABTEST+17*, LABTEST+18, LABTEST+19, TSTRSLT+3~ |
Y | TSTRSLT+3~, TSTRSLT+18*, TSTRSLT+19 |