Routine: LRBEBA3

Call Graph

Call Graph Total: 11

Package	Total	Call Graph
Lab Service	7	(BLDAR,SACC)^LRBEBA2 ($$FINAL,SLROT)^LRBEBA3 $$SBA^LRBEBA31 ($$GEPRO,$$GOPRO)^LRBEBA4 $$PCETM^LRBEBAO $$NLT^LRVER1 DT^LRX
IHS Changes To Lab	1	$$MODEXIST^BLRUTIL4
Integrated Billing	1	$$CIDC^IBBAPI
Registration	1	ELIG^VADPT
VA Fileman	1	$$GET1^DIQ

Package	Total	Caller Graph
Lab Service	10	LRBEBA LRBEBA2 LRBEBA3 LRBEBA31 LRBEBAO LRCAPPH1 LRFAST LRORD1 LROW LROW2A

Package

Total

Caller Graph

Lab Service

LRBEBA LRBEBA2 LRBEBA3 LRBEBA31 LRBEBAO LRCAPPH1 LRFAST LRORD1
LROW LROW2A

Entry Points

Name	Comments	DBIA/ICR reference
BALROW(LRODT,LRSN,LRTEST)	; CIDC LROW
BLDAR(LRBEDFN,LRODT,LRSN,LRBEAR,LRBEY,LRBETEST,LRBEPAN,LRBEDEL)	; Build LRBEAR array with
AQ1	; Ask question from LRORD1
AQ2	; from LROW2A
FINAL(LRODT,LRSN,LRTST)	;is microbiology test complete/final?
MICRO1(LRODT,LRSN,LRTST,LRCNT)	;get CIDC data for microbiology
PARRAY(XTEST,PTEST,P)	;
BALROR(LRORD)	; CIDC LRORD
SLROT(LRXST,LRTEST,LRBEOT)	;LROT array
ELIG(DFN)	; Display eligibility and disabilities
MICRO2(LRODT,LRSN)	;setup more CIDC data for microbiology
QRYADD(LRODT,LRSN,LRTS,LRBEDFN,LRBESMP,LRBESPC,LRBETS,LRBEX,LRBEXD)	; Query #69 for
SVST(ENUM,ETYP,LRODT,LRSN)	; Set the Encounter # in #69

External References

Name	Field # of Occurrence
$$MODEXIST^BLRUTIL4	BLDAR+1, QRYADD+1, ELIG+1, BALROW+1, AQ1+1, AQ2+1, BALROR+1
$$GET1^DIQ	BLDAR+13, BLDAR+14, BALROW+6, BALROR+7
$$CIDC^IBBAPI	BALROW+5, AQ1+5, AQ2+4, BALROR+6
BLDAR^LRBEBA2	BLDAR+42
SACC^LRBEBA2	AQ2+5
$$FINAL^LRBEBA3	MICRO1+4
SLROT^LRBEBA3	BALROW+8
$$SBA^LRBEBA31	BALROW+9, AQ1+8, BALROR+8
$$GEPRO^LRBEBA4	MICRO1+13
$$GOPRO^LRBEBA4	MICRO1+12
$$PCETM^LRBEBAO	MICRO1+9
$$NLT^LRVER1	BLDAR+22
DT^LRX	AQ1+6
ELIG^VADPT	ELIG+3

Name	Line Occurrences
Function Call: WRITE	Prompt: !," Eligibility: "_$P(VAEL(1),"^",2)_$S(+VAEL(3):" SC%: "_$P(VAEL(3),"^",2),1:"") Line Location: ELIG+3
Function Call: WRITE	Prompt: ?15,LRDIS_" - "_LRCNT_"%("_$S($P(I1,"^",3):"SC",1:"NSC")_")",! Line Location: ELIG+7

FileNo	Call Tags
^LR - [#63]	GET1^DIQ
69.01	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(31 - [#31]	ELIG+5
^DPT - [#2]	ELIG+4
^LAB(60 - [#60]	BLDAR+20, BLDAR+22, BLDAR+23, BLDAR+24, BLDAR+25, PARRAY+2, PARRAY+3, PARRAY+4
^LRO(68 - [#68]	BLDAR+34, FINAL+8, FINAL+16
^LRO(69 - [#69]	BLDAR+16, BLDAR+17, BLDAR+18, BLDAR+19, QRYADD+6, QRYADD+8, SVST+1, MICRO1+8, MICRO1+21, MICRO1+22 , FINAL+6, FINAL+12, FINAL+14, FINAL+15, FINAL+17*
^TMP("LRBEDX"	MICRO1+7, MICRO1+20, MICRO1+23, MICRO2+3, MICRO2+5, MICRO2+7, MICRO2+8
^TMP("LRPXAPI"	MICRO1+5!, MICRO1+10, MICRO1+14, MICRO1+15, MICRO1+16, MICRO1+17, MICRO1+19, MICRO1+24, MICRO1+25, MICRO2+9* , MICRO2+10, MICRO2+11, MICRO2+12, MICRO2+13, MICRO2+14, MICRO2+15, MICRO2+16, MICRO2+17, MICRO2+18, MICRO2+21
^XUSEC("PROVIDER"	BALROW+4, AQ1+4, BALROR+5

Name	Line Occurrences
PARRAY	BLDAR+29

Name	Field # of Occurrence
^(0	BLDAR+25, PARRAY+4, ELIG+4, ELIG+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	AQ1+6
AA	MICRO1+3~, MICRO1+11, MICRO1+13, FINAL+4~, FINAL+7, FINAL+8, FINAL+15*, FINAL+16
AI	FINAL+4~, FINAL+7*, FINAL+8
AY	FINAL+4~, FINAL+7*, FINAL+8
DFN	ELIG~, ELIG+4, BALROW+5, BALROW+6, AQ1+5, AQ2+4, BALROR+6, BALROR+7
DUZ	BLDAR+11, BALROW+4, AQ1+4, BALROR+5
DX	MICRO1+3~
DXCNT	MICRO1+3~, MICRO1+7, MICRO1+23, MICRO2+2~, MICRO2+5, MICRO2+6, MICRO2+7, MICRO2+8, MICRO2+9, MICRO2+10 , MICRO2+11, MICRO2+12, MICRO2+13, MICRO2+14, MICRO2+15, MICRO2+16, MICRO2+17, MICRO2+18
EI	MICRO2+2~, MICRO2+19*, MICRO2+20, MICRO2+21
EIX	MICRO2+2~
EIX(	MICRO2+20*, MICRO2+21
EIX("AO"	MICRO2+12*
EIX("CV"	MICRO2+11*
EIX("EC"	MICRO2+14*
EIX("HNC"	MICRO2+16*
EIX("IR"	MICRO2+13*
EIX("MST"	MICRO2+15*
EIX("SC"	MICRO2+10*
EIX("SHAD"	MICRO2+17*
ENUM	SVST~, SVST+1
ETYP	SVST~, SVST+1
FINAL	MICRO1+3~, MICRO1+4*, MICRO1+5, MICRO1+11, MICRO1+18
GEPRO	MICRO1+3~, MICRO1+13*, MICRO1+17
GOPRO	MICRO1+3~, MICRO1+12*, MICRO1+14, MICRO1+16
I	ELIG+4*, ELIG+8!
I1	ELIG+4*, ELIG+5, ELIG+7, ELIG+8!
>> LRAA	BLDAR+34
>> LRAD	BLDAR+34
>> LRAN	BLDAR+34
LRBEA	QRYADD+4~, QRYADD+9, QRYADD+10, QRYADD+11, QRYADD+12, QRYADD+13, QRYADD+14, BALROW+3~, BALROR+3~, SLROT+1~ , SLROT+3*, SLROT+4, SLROT+5
LRBEAR	BLDAR~, BLDAR+42
LRBEAR(	BLDAR+5, BLDAR+6, BLDAR+7, BLDAR+8, BLDAR+9, BLDAR+10, BLDAR+11, BLDAR+13
LRBEAT	BALROW+3~, BALROW+9, AQ1+8, BALROR+3~, BALROR+8*
LRBEB	BALROW+3~, BALROR+3~
>> LRBECDT	BLDAR+7
LRBEDEL	BLDAR~, BLDAR+10
LRBEDFN	BLDAR~, BLDAR+5, BLDAR+6, BLDAR+7, BLDAR+8, BLDAR+9, BLDAR+10, BLDAR+11, BLDAR+13, BLDAR+42 , QRYADD~, QRYADD+13, QRYADD+14, BALROW+6, BALROR+7
LRBEIEN	BLDAR+4~, BLDAR+12*, BLDAR+13, BLDAR+14
LRBEODT	BLDAR+4~, AQ1+6!*, BALROR+3~
LRBEOT	BALROW+3~, BALROW+8, BALROW+9, BALROR+4~, SLROT~
LRBEOT(	SLROT+5*
LRBEPAN	BLDAR~
LRBEPAN(	BLDAR+20*, BLDAR+27, PARRAY+6
>> LRBEPTDT	QRYADD+8*, QRYADD+9, QRYADD+10, QRYADD+11, QRYADD+12
LRBEQT	BALROW+3~, BALROW+9, AQ1+8, BALROR+3~, BALROR+8
>> LRBESB(	BLDAR+26, PARRAY+5
LRBESMP	QRYADD~, QRYADD+13, QRYADD+14, SLROT+1~, SLROT+2*, SLROT+3, SLROT+4, SLROT+5
LRBESN	BALROW+3~, BALROR+3~
LRBESPC	QRYADD~, QRYADD+13, QRYADD+14, SLROT+1~, SLROT+4*, SLROT+5
LRBET	BALROW+3~, BALROR+3~
LRBETEST	BLDAR~
LRBETEST(	BLDAR+21, BLDAR+22*, BLDAR+40, BLDAR+41
LRBETEST(""	BLDAR+22
LRBETM	MICRO1+2~, MICRO1+8, MICRO1+9, MICRO1+10
LRBETN	BALROR+4~
LRBETS	BLDAR+4~, BLDAR+16, BLDAR+17, BLDAR+20, BLDAR+21, BLDAR+22, BLDAR+23, BLDAR+24, BLDAR+26, BLDAR+27 , BLDAR+29, BLDAR+32, BLDAR+34, BLDAR+35, BLDAR+36, BLDAR+37, BLDAR+38, BLDAR+40, BLDAR+41, BLDAR+42 , QRYADD~, QRYADD+13, QRYADD+14, BALROW+3~, BALROR+3~
LRBETST	BLDAR+4~, BLDAR+41*, BLDAR+42, BALROW+3~, BALROR+3~
LRBEVAL	BALROW+3~, BALROW+4, BALROW+5, AQ1+3~, AQ1+4, AQ1+5, AQ2+3~, AQ2+4, BALROR+4~, BALROR+5 , BALROR+6*
LRBEX	QRYADD~, BALROW+9, AQ1+8, AQ2+5, BALROR+8
LRBEX(	QRYADD+13*
LRBEXD	QRYADD~
LRBEXD(	QRYADD+14*
LRBEY	BLDAR~, BALROW+9, AQ1+8, BALROR+8*
LRBEY(	BLDAR+34!, BLDAR+36, BLDAR+38
LRBEZ	BALROR+4~
>> LRCEX	FINAL+17
LRCNT	ELIG+5*, ELIG+7, ELIG+8!, MICRO1~, MICRO1+5, MICRO1+10, MICRO1+16, MICRO1+17, MICRO1+19, MICRO1+24 , MICRO1+25
>> LRDFN	BALROW+6, BALROW+9, AQ1+8, BALROR+7, BALROR+8
LRDGX	QRYADD+4~, QRYADD+5, QRYADD+6, QRYADD+8
LRDGXD	QRYADD+4~, QRYADD+7, QRYADD+12, QRYADD+14
LRDIS	ELIG+5, ELIG+6, ELIG+7, ELIG+8!
LRDX	QRYADD+4~
>> LRI	AQ2+5
LRJ	BLDAR+4~, BLDAR+17*, BLDAR+18, BLDAR+19
>> LROA	FINAL+17
LRODT	BLDAR~, BLDAR+12, BLDAR+16, BLDAR+17, BLDAR+18, BLDAR+19, BLDAR+42, QRYADD~, QRYADD+6, QRYADD+8 , BALROW~, AQ2+5, SVST~, SVST+1, MICRO1~, MICRO1+4, MICRO1+8, MICRO1+12, MICRO1+20, MICRO1+21 , MICRO1+22, MICRO2~, MICRO2+4, FINAL~, FINAL+6, FINAL+12, FINAL+14, FINAL+15
>> LROOS	BLDAR+5, BLDAR+9
LRORD	BALROR~
>> LROT	AQ1+8, BALROR+8
>> LRSAMP	BLDAR+14*, BLDAR+42
LRSN	BLDAR~, BLDAR+12, BLDAR+16, BLDAR+17, BLDAR+18, BLDAR+19, BLDAR+42, QRYADD~, QRYADD+6, QRYADD+8 , BALROW~, BALROW+7*, AQ2+5, SVST~, SVST+1, MICRO1~, MICRO1+4, MICRO1+8, MICRO1+12, MICRO1+20 , MICRO1+21, MICRO1+22, MICRO2~, MICRO2+4, FINAL~, FINAL+6, FINAL+12, FINAL+14, FINAL+15
>> LRSPEC	BLDAR+42, AQ2+5
>> LRSS	BALROW+8, AQ1+7
>> LRSSP	AQ2+5
LRTEST	BALROW~, BALROW+8, SLROT~
LRTEST(	AQ2+5, SLROT+5
>> LRTN	AQ2+5
LRTS	QRYADD~, QRYADD+6, QRYADD+8
LRTST	MICRO1~, MICRO1+4, MICRO1+21, MICRO1+22, FINAL~, FINAL+6, FINAL+12
LRXST	BALROW+8, SLROT~
LRXST(	SLROT+2, SLROT+3, SLROT+4
MOD	MICRO1+3~
N	BLDAR+4~, BLDAR+21, BLDAR+22, MICRO1+3~, MICRO1+21*, MICRO1+22, MICRO1+24, MICRO1+25
NODEA	FINAL+4~, FINAL+5, FINAL+8, FINAL+10
NODEO	FINAL+4~, FINAL+6, FINAL+7, FINAL+10, FINAL+15, FINAL+16
NOKILL	FINAL+4~, FINAL+13, FINAL+16, FINAL+17
NX	BLDAR+4~, BLDAR+23, BLDAR+24, PARRAY+1~, PARRAY+2, PARRAY+3
OK	BLDAR+4~, BLDAR+21*, BLDAR+22
ORD	MICRO1+3~, MICRO1+18*, MICRO1+19
>> ORIEN	BLDAR+19
P	BLDAR+4~, BLDAR+29, PARRAY~
P(	BLDAR+26, BLDAR+27, BLDAR+32, BLDAR+35, BLDAR+37, BLDAR+38, PARRAY+5, PARRAY+6
PTEST	PARRAY~, PARRAY+5, PARRAY+6
REQX	BLDAR+4~, BLDAR+25, BLDAR+27, PARRAY+1~, PARRAY+4, PARRAY+6
RETURN	FINAL+4~, FINAL+5, FINAL+10, FINAL+11, FINAL+18
TST	FINAL+4~, FINAL+7*, FINAL+8
TT	FINAL+4~, FINAL+14*, FINAL+15
U	BLDAR+18, BLDAR+19, BLDAR+20, BLDAR+22, BLDAR+25, BLDAR+41, PARRAY+4, QRYADD+9, QRYADD+10, QRYADD+11 , QRYADD+12, QRYADD+13, QRYADD+14, AQ2+5, SLROT+4, SLROT+5, MICRO1+5, MICRO1+8, MICRO1+11, MICRO1+18 , MICRO1+20, MICRO1+24, MICRO1+25, MICRO2+4, MICRO2+9, MICRO2+10, MICRO2+11, MICRO2+12, MICRO2+13, MICRO2+14 , MICRO2+15, MICRO2+16, MICRO2+17, MICRO2+18, FINAL+7, FINAL+10, FINAL+12, FINAL+15, FINAL+16
VAEL	ELIG+8!
VAEL(1	ELIG+3
VAEL(3	ELIG+3
X	BLDAR+4~, BLDAR+24, BLDAR+25, BLDAR+26, BLDAR+27, BLDAR+29, BLDAR+37, BLDAR+38, PARRAY+1~, PARRAY+3* , PARRAY+4, PARRAY+5, PARRAY+6, MICRO1+3~, MICRO1+22, MICRO1+23, MICRO1+24, MICRO1+25, MICRO2+2~, MICRO2+3 , MICRO2+4, MICRO2+8*, MICRO2+9, MICRO2+10, MICRO2+11, MICRO2+12, MICRO2+13, MICRO2+14, MICRO2+15, MICRO2+16 , MICRO2+17, MICRO2+18, FINAL+4~
XTEST	PARRAY~, PARRAY+2, PARRAY+3
XX	BLDAR+4~, BLDAR+25, BLDAR+26, BLDAR+27, BLDAR+29, BLDAR+35, BLDAR+36, BLDAR+37, BLDAR+38, PARRAY+1~ , PARRAY+4*, PARRAY+5, PARRAY+6

Customize PDF page

Package: Lab Service

Routine: LRBEBA3

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 10

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: