Routine: ORWLR1

Package	Total	Call Graph
VBECS	7	($$ABORH,ABID,TRRX)^VBECA1 PAT^VBECA1A OEAPI^VBECA3 DFN^VBECA3A CPRS^VBECA3B TRAN^VBECA4 ^VBECRPT
Order Entry Results Reporting	6	EN2^ORUDPA ERROR^ORWDXVB2 GETPAT^ORWLR1 EN^ORWLR2 BLR^ORWRP1 (LRHEAD,LRHURL)^ORWRPP1
Kernel	1	$$FMTE^XLFDT
Registration	1	$$SITE^VASITE

Package	Total	Caller Graph
Order Entry Results Reporting	5	ORCXPND1 ORCXPND3 ORS BLOOD BANK ORWLR1 ORWLR2
Kernel	1	METHOD
Lab Service	1	LR7OSBR

Entry Points

Name	Comments	DBIA/ICR reference
EN(DFN)	;Get Blood Bank Report
REPORT	;Blood Bank Report for M reports menu
GETPAT(ERR)	;Setup Patient Variables
TEST	;Test calls
OEAPI	;Test call to OEAPI^VBECA3
ABORH	;Test call to ABORH^VBECA1 for ABO/Rh - DBIA 3181
ABID	;Test call to ABID^VBECA1 for Antibodies Identified - DBIA 3181, 3184
DFN	;Test call to DFN^VBECA3A - DBIA 3879
CPRS	;Test call to CPRS^VBECA3B - DBIA 3880
TRAN	;Test call to TRAN^VBECA4 for Tranfused Units - DBIA 3176
TRRX	;Test call to TRRX^VBECA1 for Transfusion Reactions - DBIA 3181, 3187
PARSE	;Parse Record
WRT	; Writes the Transfusion Record for each day

External References

Name	Field # of Occurrence
EN2^ORUDPA	GETPAT+3
ERROR^ORWDXVB2	EN+13
GETPAT^ORWLR1	OEAPI+2
EN^ORWLR2	EN+16
BLR^ORWRP1	REPORT+4
LRHEAD^ORWRPP1	REPORT+10
LRHURL^ORWRPP1	REPORT+11
$$SITE^VASITE	OEAPI+4
$$ABORH^VBECA1	EN+8, ABORH+4
ABID^VBECA1	ABID+4
TRRX^VBECA1	TRRX+4
PAT^VBECA1A	GETPAT+6
OEAPI^VBECA3	OEAPI+5
DFN^VBECA3A	DFN+5
CPRS^VBECA3B	CPRS+5
TRAN^VBECA4	TRAN+5
^VBECRPT	EN+2
$$FMTE^XLFDT	PARSE+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,LRDFN Line Location: GETPAT+7
Function Call: WRITE	Prompt: !?5," ERR:"_VBECERR(1) Line Location: GETPAT+9
Function Call: WRITE	Prompt: !,"Error on Patient lookup" Line Location: TEST+3
Function Call: WRITE	Prompt: !?2,^(ID) Line Location: TEST+6
Function Call: WRITE	Prompt: !,"Error on Patient lookup" Line Location: OEAPI+3
Function Call: WRITE	Prompt: !,"Array returned from OEAPI^VBECA3 API in ORVB():",! Line Location: OEAPI+7
Function Call: WRITE	Prompt: !,"Error on Patient lookup" Line Location: ABORH+3
Function Call: WRITE	Prompt: !,"ABO/RH: "_ABORH Line Location: ABORH+4
Function Call: WRITE	Prompt: !,"Error on Patient lookup" Line Location: ABID+3
Function Call: WRITE	Prompt: !?2,ARR("ABID",ID) Line Location: ABID+5
Function Call: WRITE	Prompt: !,"Error on Patient lookup" Line Location: DFN+4
Function Call: WRITE	Prompt: !?2,^(ID) Line Location: DFN+7
Function Call: WRITE	Prompt: !,"."_^(ID1) Line Location: DFN+8
Function Call: WRITE	Prompt: !?2,^(ID) Line Location: DFN+10
Function Call: WRITE	Prompt: !,"Available Units: " Line Location: DFN+14
Function Call: WRITE	Prompt: !?2,^(ID) Line Location: DFN+15
Function Call: WRITE	Prompt: !,"Error on Patient lookup" Line Location: CPRS+4
Function Call: WRITE	Prompt: !?2,^(ID) Line Location: CPRS+7
Function Call: WRITE	Prompt: !,"Error on Patient lookup" Line Location: TRAN+4
Function Call: WRITE	Prompt: !,"Sorted/grouped Transfused Units: ",! Line Location: TRAN+13
Function Call: WRITE	Prompt: !,"Transfused Units (from VBECS API): ",! Line Location: TRAN+18
Function Call: WRITE	Prompt: !," Blood Product Key: " Line Location: TRAN+22
Function Call: WRITE	Prompt: ?22,GMI," = ",$G(^TMP("TRAN",$J,GMI)),! Line Location: TRAN+24
Function Call: WRITE	Prompt: !,"Error on Patient lookup" Line Location: TRRX+3
Function Call: WRITE	Prompt: !?2,ARR("TRRX",ID) Line Location: TRRX+5
Function Call: WRITE	Prompt: TD Line Location: WRT+3
Function Call: WRITE	Prompt: ?(((GMI2-1)*15)+13),GMA(GMJ) Line Location: WRT+7
Function Call: WRITE	Prompt: ! Line Location: WRT+8

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	EN+5, GETPAT+5
^SC - [#44]	OEAPI+4
^TMP("BBD"	CPRS+2!, CPRS+6, CPRS+7, CPRS+8, CPRS+9
^TMP("OR"	OEAPI+9!
^TMP("ORLRC"	EN+6!
^TMP("TRAN"	TEST+7!, TRAN+2!, TRAN+9, TRAN+17, TRAN+19, TRAN+21, TRAN+23, TRAN+24
^TMP("TRRX"	TEST+7!
^TMP("VBDATA"	TEST+5, TEST+6, TEST+7!, DFN+2!, DFN+6, DFN+7, DFN+8, DFN+9, DFN+10, DFN+11 , DFN+12, DFN+13, DFN+15
^TMP("VBECRPC"	OEAPI+9!
^TMP("VBECS_XML_RES"	OEAPI+9!
^TMP("VBEC_OE_DATA"	OEAPI+9!
^TMP("ZTRAN"	TRAN+2!, TRAN+10*, TRAN+11, TRAN+12, TRAN+14

Label References

Name	Line Occurrences
ABID	TEST+4
ABORH	TEST+4
CPRS	TEST+4
DFN	TEST+4
GETPAT	TEST+2, ABORH+2, ABID+2, DFN+3, CPRS+3, TRAN+3, TRRX+2
PARSE	TRAN+16, TRAN+20
TRAN	TEST+4
TRRX	TEST+4
WRT	TRAN+16, TRAN+20

Naked Globals

Name	Field # of Occurrence
^(	TEST+6, DFN+7, DFN+8, DFN+10, DFN+11, DFN+12, DFN+15, CPRS+7, CPRS+8, CPRS+9 , TRAN+9, TRAN+11*, TRAN+14, TRAN+19
^(0	EN+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABFND	EN+10~
ABORH	TEST+1~, ABORH+4*
ARR	TEST+1~, TRRX+1~
ARR("ABID"	ABID+4, ABID+5
ARR("TRRX"	TRRX+4, TRRX+5
BPN	TEST+1~, TRAN+1~, PARSE+3, PARSE+4, PARSE+5, WRT+2, WRT+5, WRT+8
CCNT	EN+4~, EN+7, EN+10~, EN+11
CNT	TRAN+1~, TRAN+8, TRAN+11
COMP	TRAN+1~, TRAN+9, TRAN+14
COMPSEQ	TRAN+1~, TRAN+9*, TRAN+10, TRAN+11
DFN	EN~, EN+1, EN+5, REPORT+1, REPORT+3, DFN+5
DI2	TEST+1~
DIC	REPORT+2~
DIV	OEAPI+1~, OEAPI+4*
DT	OEAPI+4
ERR	GETPAT~, GETPAT+2, GETPAT+4, GETPAT+8, GETPAT+9, TEST+1~
ERROR	TEST+1~, TEST+2, TEST+3, OEAPI+1~, OEAPI+2, OEAPI+3, ABORH+1~, ABORH+2, ABORH+3, ABID+1~ , ABID+2, ABID+3, DFN+1~, DFN+3, DFN+4, CPRS+1~, CPRS+3, CPRS+4, TRAN+1~, TRAN+3 , TRAN+4, TRRX+1~, TRRX+2, TRRX+3
GCNT	EN+4~, EN+7, EN+10~, EN+11
GIOM	EN+4~, EN+7, EN+10~, EN+11
GIOSL	EN+4~, EN+7, EN+10~, EN+11
>> GMA(	PARSE+5*, WRT+7
>> GMA(1	PARSE+3, PARSE+4, PARSE+5, PARSE+6
GMI	TEST+1~, TRAN+1~, TRAN+23, TRAN+24, PARSE+1~, PARSE+5
GMI1	WRT+1~, WRT+4*, WRT+5, WRT+6, WRT+8
GMI2	WRT+1~, WRT+5*, WRT+6, WRT+7, WRT+8
GMJ	WRT+1~, WRT+6*, WRT+7
GML	WRT+1~, WRT+2*, WRT+4, WRT+5
GMM	WRT+1~, WRT+2*
GMR	TRAN+1~, TRAN+9, TRAN+10, TRAN+14, TRAN+15, TRAN+19, PARSE+2, PARSE+3
I	EN+10~
ID	REPORT+2~, REPORT+3, REPORT+4, TEST+1~, TEST+6, ABID+1~, ABID+5, DFN+1~, DFN+7, DFN+8 , DFN+10, DFN+11, DFN+12, DFN+15, CPRS+1~, CPRS+7, CPRS+8, CPRS+9, TRAN+1~, TRAN+8 , TRAN+9, TRAN+10, TRAN+11, TRAN+13, TRAN+14, TRAN+18, TRAN+19, TRRX+1~, TRRX+5
ID1	TEST+1~, DFN+1~, DFN+8, DFN+11, DFN+12, CPRS+1~, CPRS+8*, CPRS+9
ID2	TEST+1~, DFN+1~, DFN+12, CPRS+1~, CPRS+9
LINE1	EN+10~
LINE2	EN+10~
LRDFN	GETPAT+7, TEST+1~
NOABO	EN+10~, EN+11*
NOPAT	EN+10~, EN+11*
ORABORH	EN+4~, EN+8*, EN+9
>> ORALPHA	REPORT+4
>> ORARR	ABID+4, TRRX+4
ORAY	TRAN+1~
ORAY(	TRAN+8*, TRAN+9
ORDAYSBK	REPORT+2~, REPORT+4
ORDFN	REPORT+2~, REPORT+3*, REPORT+4, REPORT+10, REPORT+11
>> ORL	OEAPI+4
ORN	EN+4~
ORN(	EN+14, EN+15
ORN(8	EN+14*
>> OROMEGA	REPORT+4
ORPARNT	ABID+1~, ABID+4, TRRX+1~, TRRX+4
ORPNM	GETPAT+1~, GETPAT+5
ORSTN	OEAPI+1~, OEAPI+4*, OEAPI+5
ORUA	EN+10~
ORVB	OEAPI+1~, OEAPI+5
ORVB(0	OEAPI+6
ORVP	GETPAT+4, GETPAT+5, TEST+1~, OEAPI+5, ABORH+2, ABID+2, DFN+3, CPRS+3, TRAN+3, TRAN+5 , TRRX+2
>> ORX("ERROR"	EN+9*
ORY	REPORT+2~, REPORT+4, REPORT+5, REPORT+11
PAGE	REPORT+2~, REPORT+6*, REPORT+10
PATDOB	EN+4~, EN+5, EN+8, GETPAT+5, TEST+1~, ABORH+4, ABID+4, TRRX+4
PATID	EN+4~, EN+5, EN+8, GETPAT+5, TEST+1~, ABORH+4, ABID+4, TRRX+4
PATNAM	EN+4~, EN+5, EN+8, GETPAT+5, TEST+1~, ABORH+4, ABID+4, TRRX+4
>> REMOTE	REPORT+4
>> STATION	REPORT+10
TD	TRAN+1~, PARSE+2*, WRT+3
TREQFND	EN+10~
TYPE	EN+10~
U	OEAPI+4, PARSE+3
VBECERR	TEST+1~
VBECERR(	GETPAT+9
VBECERR(0	GETPAT+8
VBECERR(1	GETPAT+9
VBERROR	EN+10~
X	TRAN+1~, PARSE+1~
XQORNOD	REPORT+2~

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORWLR1

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 7

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: