Routine: ORKLR

Package	Total	Call Graph
Order Entry Results Reporting	7	$$TERMLKUP^ORB31 $$VALUE^ORCSAVE2 $$TEXT^ORKOR EN^ORQ1 ($$DUPRANGE,$$OI,$$STATUS)^ORQOR2 ORDER^ORQQLR ($$LOCL,$$LOCLFORM)^ORQQLR1
Kernel	1	($$FMADD,$$FMTE,$$NOW)^XLFDT
Outpatient Pharmacy	1	EN^PSODRG
VA Fileman	1	NOW^%DTC

Package	Total	Caller Graph
Order Entry Results Reporting	4	OCXOZ0C OCXOZ0D OCXOZ0F ORKCHK5

Entry Points

Name	Comments	DBIA/ICR reference
DUP2(ORKLR,ORN,ODT,ORL,ORPANEL)	;second part of dup lab order check
DUP(ORKLR,OI,ORDFN,NEWORDT,SPECIMEN)	; return duplicate lab order info
CLOZLABS(ORDFN,ORDAYS,ORCLOZ)	;extrinsic function rtns "1" if clozapine ordered and WBC labs results within past ORDAYS, "0" if not
RECNTWBC(ORDFN,ORDAYS)	;extrinsic function to return most recent WBC within <ORDAYS> in format:

External References

Name	Field # of Occurrence
NOW^%DTC	RECNTWBC+4
$$TERMLKUP^ORB31	RECNTWBC+8, RECNTWBC+11
$$VALUE^ORCSAVE2	DUP2+7
$$TEXT^ORKOR	DUP2+26, DUP2+42
EN^ORQ1	DUP+14
$$DUPRANGE^ORQOR2	DUP+8
$$OI^ORQOR2	DUP2+10
$$STATUS^ORQOR2	DUP2+2
ORDER^ORQQLR	DUP2+17, DUP2+33
$$LOCL^ORQQLR1	RECNTWBC+20
$$LOCLFORM^ORQQLR1	DUP2+24, DUP2+40
EN^PSODRG	CLOZLABS+10
$$FMADD^XLFDT	RECNTWBC+5, CLOZLABS+6
$$FMTE^XLFDT	DUP2+22, DUP2+38, RECNTWBC+25, CLOZLABS+29, CLOZLABS+30
$$NOW^XLFDT	CLOZLABS+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^OR(100 - [#100]	DUP+21, DUP+22, DUP+25
^ORD(100.98 - [#100.98]	DUP+12
^ORD(101.43 - [#101.43]	DUP+3, DUP+6, DUP2+13, DUP2+29
^TMP("ORR"	DUP+13!, DUP+16, DUP+17, DUP+18, DUP+26!
^TMP($J	CLOZLABS+16!, CLOZLABS+19, CLOZLABS+21, CLOZLABS+23, CLOZLABS+24

Label References

Name	Line Occurrences
DUP2	DUP+24, DUP+25

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	RECNTWBC+5, RECNTWBC+6!
ANC	CLOZLABS+4~, CLOZLABS+24, CLOZLABS+26, CLOZLABS+28, CLOZLABS+30, CLOZLABS+33
ANCCDT	CLOZLABS+4~
ANCF	CLOZLABS+4~, CLOZLABS+26*, CLOZLABS+33
ANCRSLT	CLOZLABS+4~, CLOZLABS+30*, CLOZLABS+33
ANCSPEC	CLOZLABS+4~
BDT	RECNTWBC+2~, RECNTWBC+5, RECNTWBC+7, RECNTWBC+23, CLOZLABS+4~, CLOZLABS+6, CLOZLABS+7
CDT	RECNTWBC+2~, RECNTWBC+22*, RECNTWBC+23, RECNTWBC+25
DDT	DUP+1~, DUP+8*, DUP+9, DUP+14
DGIEN	DUP+1~, DUP+12*, DUP+14
EXDT	DUP2+1~, DUP2+22, DUP2+26, DUP2+38, DUP2+42
HOR	DUP+15~, DUP+16, DUP+17, DUP+18
INVDT	DUP2+1~, DUP2+22, DUP2+26, DUP2+27, DUP2+38, DUP2+42, DUP2+43, CLOZLABS+20~, CLOZLABS+21*, CLOZLABS+22 , CLOZLABS+23, CLOZLABS+24, CLOZLABS+29, CLOZLABS+30
J	DUP+15~*
LAB	CLOZLABS+9!, CLOZLABS+32!
LAB("NOT"	CLOZLABS+11
LABFILE	RECNTWBC+2~, RECNTWBC+8*, RECNTWBC+10
LRID	DUP+1~, DUP+3, DUP+6, DUP2+1~, DUP2+14, DUP2+19, DUP2+24, DUP2+31, DUP2+35, DUP2+40
LRIDX	DUP2+1~, DUP2+13, DUP2+14, DUP2+29, DUP2+30
LRIDXC	DUP2+1~, DUP2+30*, DUP2+31
NEWORDT	DUP~, DUP+8, DUP+14
ODT	DUP+1~, DUP+18*, DUP+24, DUP+25, DUP2~, DUP2+22, DUP2+38
OI	DUP~, DUP+3, DUP+6, DUP+8
ORCLOZ	CLOZLABS~, CLOZLABS+10
ORDAYS	RECNTWBC~, RECNTWBC+5, CLOZLABS~, CLOZLABS+6
ORDFN	DUP~, DUP+8, DUP+14, DUP2+17, DUP2+24, DUP2+33, DUP2+40, RECNTWBC~, RECNTWBC+3, RECNTWBC+20 , CLOZLABS~, CLOZLABS+5
ORI	RECNTWBC+2~, RECNTWBC+14*, RECNTWBC+15
>> ORIFN	DUP+19, DUP+23
ORJ	RECNTWBC+2~, RECNTWBC+17*, RECNTWBC+18
ORKLR	DUP~, DUP+24, DUP+25, DUP2~
ORKLR(	DUP2+26, DUP2+27, DUP2+42, DUP2+43
ORL	DUP+1~, DUP+24, DUP+25, DUP2~
ORL(	DUP+3, DUP+6, DUP2+14, DUP2+31
ORN	DUP+1~, DUP+18*, DUP+19, DUP+21, DUP+22, DUP+25, DUP2~, DUP2+2, DUP2+7, DUP2+10 , DUP2+17, DUP2+26, DUP2+33, DUP2+42
ORNC	DUP+1~, DUP+22*, DUP+23, DUP+24
OROI	DUP2+1~, DUP2+10*, DUP2+11, DUP2+13, DUP2+29
ORPANEL	DUP+1~, DUP+6*, DUP+24, DUP+25, DUP2~, DUP2+40
ORQ	DUP2+1~, DUP2+19, DUP2+20, DUP2+35, DUP2+36
ORS	DUP2+1~, DUP2+2*
ORSI	DUP2+1~, DUP2+2*, DUP2+4
ORSP	DUP2+1~, DUP2+7*, DUP2+8, DUP2+13, DUP2+24, DUP2+30, DUP2+40
ORST	DUP2+1~, DUP2+2*, DUP2+26, DUP2+42
ORX	DUP2+1~, DUP2+18, DUP2+19, DUP2+34, DUP2+35, RECNTWBC+2~, RECNTWBC+11, RECNTWBC+12, RECNTWBC+17
ORX(	RECNTWBC+18
ORY	DUP2+1~, DUP2+17, DUP2+33, RECNTWBC+2~, RECNTWBC+8, RECNTWBC+9, RECNTWBC+14
ORY(	DUP2+18, DUP2+19, DUP2+34, DUP2+35, RECNTWBC+15
ORZ	RECNTWBC+2~, RECNTWBC+20*, RECNTWBC+21, RECNTWBC+22, RECNTWBC+25
RCNT	DUP2+1~, DUP2+24, DUP2+27, DUP2+40, DUP2+43
SEQ	DUP+15~, DUP+17, DUP+18
SPECFILE	RECNTWBC+2~, RECNTWBC+11*, RECNTWBC+13
SPECIMEN	DUP~, DUP+3, DUP+6, RECNTWBC+18*, RECNTWBC+19, RECNTWBC+20
TEST	RECNTWBC+2~, RECNTWBC+15*, RECNTWBC+16, RECNTWBC+20
U	DUP+3, DUP+8, DUP+18, DUP2+2, DUP2+13, DUP2+19, DUP2+26, DUP2+27, DUP2+35, DUP2+42 , DUP2+43, RECNTWBC+15, RECNTWBC+18, RECNTWBC+22, RECNTWBC+25, CLOZLABS+23, CLOZLABS+24
WBC	CLOZLABS+4~, CLOZLABS+23, CLOZLABS+25, CLOZLABS+27, CLOZLABS+29, CLOZLABS+33
WBCCDT	CLOZLABS+4~
WBCF	CLOZLABS+4~, CLOZLABS+25*, CLOZLABS+33
WBCRSLT	RECNTWBC+2~, RECNTWBC+14, RECNTWBC+17, RECNTWBC+23, RECNTWBC+24, CLOZLABS+4~, CLOZLABS+29, CLOZLABS+33
WBCSPEC	CLOZLABS+4~
X	DUP+15~, DUP+18*, RECNTWBC+2~

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORKLR

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: