Routine: ORKPS

Package	Total	Call Graph
Order Entry Results Reporting	6	$$TERMLKUP^ORB31 $$VALUE^ORCSAVE2 PROCESS^ORKPS1 ($$DGRX,$$OI)^ORQOR2 $$LOCL^ORQQLR1 LIST^ORQQPS
Kernel	2	($$FMADD,$$FMTE)^XLFDT $$UP^XLFSTR
Outpatient Pharmacy	2	(DRGCHK,EN)^PSOORDRG OCL^PSOORRL
Registration	2	OERR^VADPT ADM^VADPT2
Pharmacy Data Management	1	DRG^PSSUTIL1
Toolkit	1	$$GET^XPAR
VA Fileman	1	NOW^%DTC

Package	Total	Caller Graph
Order Entry Results Reporting	8	OCXOZ08 OCXOZ0B OCXOZ10 OCXOZ11 ORKCHK4 ORKCHK6 ORKCHKM ORKPS1

Entry Points

Name	Comments	DBIA/ICR reference
SOLUT(OI)	;extrinsic function returns 1 (true) if the orderable item is ; a solution (IV Base)
POLYRX(DFN)	;extrins funct rtns 1 if patient exceeds polypharmacy, 0 if not
SUPPLY(OI)	;extrinsic function returns 1 (true) if the orderable item is ; a supply
CHECK(YY,DFN,MED,OI,ORKDG)	; return drug order checks
OI2DD(ORPSA,OROI,ORPSPKG)	;rtn dispense drugs for a PS OI
CHKSESS(YY,DFN,MED,OI,ORKPDATA,ORKDG)	; return drug order checks for session
GCDAYS(DFN)	;extrinsic function to return number of days to look for ; glucophage serum creatinine result
GLCREAT(DFN)	;extrinsic function returns patient's (DFN) most recent serum ; creatinine within # of days from parameter ORK GLUCOPHAGE CREATININE ; results format: test id^result units flag ref range collect d/t^result ; used by order check GLUCOPHAGE-LAB RESULTS
TAKEMED(ORKDFN,ORKMED)	;extrinsic function returns med orderable item if any
NUMRX(DFN)	;extrinsic funct returns number of active meds patient is taking

Name	Field # of Occurrence
NOW^%DTC	GLCREAT+9
$$TERMLKUP^ORB31	GLCREAT+13, GLCREAT+16
$$VALUE^ORCSAVE2	CHKSESS+43
PROCESS^ORKPS1	CHECK+18, CHECK+23, CHKSESS+56
$$DGRX^ORQOR2	CHKSESS+46
$$OI^ORQOR2	NUMRX+26
$$LOCL^ORQQLR1	GLCREAT+25
LIST^ORQQPS	TAKEMED+7
DRGCHK^PSOORDRG	CHKSESS+54
EN^PSOORDRG	CHECK+17, CHECK+22
OCL^PSOORRL	NUMRX+10
DRG^PSSUTIL1	OI2DD+6
OERR^VADPT	POLYRX+4, GCDAYS+6
ADM^VADPT2	NUMRX+6
$$FMADD^XLFDT	GLCREAT+10
$$FMTE^XLFDT	GLCREAT+30
$$UP^XLFSTR	TAKEMED+14
$$GET^XPAR	POLYRX+8, GCDAYS+10

Name	Line Occurrences (* Changed, ! Killed)
^DIC(42 - [#42]	POLYRX+5, GCDAYS+7
^OR(100 - [#100]	CHKSESS+41, CHKSESS+42
^ORD(100.01 - [#100.01]	CHKSESS+42
^ORD(101.43 - [#101.43]	SOLUT+4, SOLUT+7, SUPPLY+4, SUPPLY+7, OI2DD+2, OI2DD+3
^PSDRUG - [#50]	CHECK+11, CHECK+14, CHECK+15
^TMP("ORKA"	CHKSESS+8, CHKSESS+9, CHKSESS+10
^TMP("ORR"	CHKSESS+36, CHKSESS+37, CHKSESS+38
^TMP("PS"	NUMRX+9!, NUMRX+13, NUMRX+14, NUMRX+28!
^TMP($J	CHECK+8!, CHECK+24!, CHKSESS+53!, CHKSESS+57!

Name	Line Occurrences
$$GCDAYS	GLCREAT+7
$$NUMRX	POLYRX+9
$$SUPPLY	NUMRX+26
OI2DD	CHKSESS+24

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	GLCREAT+10, GLCREAT+11!
BDT	GLCREAT+5~, GLCREAT+10*, GLCREAT+12, GLCREAT+28
CDRG	CHECK+7~, CHECK+15*, CHECK+17
CDT	GLCREAT+5~, GLCREAT+27*, GLCREAT+28, GLCREAT+30
CMP	CHECK+7~, CHECK+11*, CHECK+12
CMPDR	CHECK+7~, CHECK+13, CHECK+14, CHECK+15
CNT	CHKSESS+1~, CHKSESS+9*
CNTX	CHKSESS+1~, CHKSESS+9*, CHKSESS+10
CREARSLT	GLCREAT+5~, GLCREAT+19, GLCREAT+22, GLCREAT+28*, GLCREAT+29
DFN	CHECK~, CHECK+9, CHECK+16, CHECK+17, CHECK+19*, CHECK+22, CHKSESS~, CHKSESS+3, CHKSESS+54, POLYRX~ , POLYRX+3, POLYRX+9, GLCREAT~, GLCREAT+6, GLCREAT+7, GLCREAT+25, GCDAYS~, GCDAYS+2, NUMRX~, NUMRX+3 , NUMRX+10
DUPORN	CHKSESS+2~, CHKSESS+38, CHKSESS+48, CHKSESS+49, CHKSESS+50
DUPX	CHKSESS+2~, CHKSESS+48*, CHKSESS+49
HOR	CHKSESS+1~, CHKSESS+35, CHKSESS+36, CHKSESS+37, CHKSESS+38
LABFILE	GLCREAT+5~, GLCREAT+13*, GLCREAT+15
MED	CHECK~, CHECK+11, CHECK+14, CHECK+15, CHECK+22, CHKSESS~, CHKSESS+54
NUMRX	NUMRX+1~, NUMRX+2, NUMRX+3, NUMRX+27, NUMRX+29
OI	CHECK~, CHECK+18, CHECK+23, CHKSESS~, CHKSESS+18, CHKSESS+56, SOLUT~, SOLUT+2, SOLUT+4, SUPPLY~ , SUPPLY+2, SUPPLY+4
OITEXT	SOLUT+3~, SOLUT+4, SOLUT+5, SOLUT+6, SOLUT+7, SUPPLY+3~, SUPPLY+4, SUPPLY+5, SUPPLY+6, SUPPLY+7
ORCNT	TAKEMED+6~, TAKEMED+10*, TAKEMED+15
ORDAYS	GLCREAT+4~, GLCREAT+7, GLCREAT+8, GLCREAT+10, GCDAYS+3~, GCDAYS+10, GCDAYS+11
ORDFN	CHECK+9~, CHECK+18, CHECK+23, CHKSESS+3~, CHKSESS+56
ORENT	POLYRX+1~, POLYRX+7, POLYRX+8, GCDAYS+3~, GCDAYS+9, GCDAYS+10
ORI	TAKEMED+6~, TAKEMED+11, TAKEMED+12, GLCREAT+5~, GLCREAT+19, GLCREAT+20
ORJ	TAKEMED+6~, TAKEMED+15, GLCREAT+5~, GLCREAT+22, GLCREAT+23
>> ORKA	CHKSESS+5
ORKARX	TAKEMED+6~, TAKEMED+12, TAKEMED+14, TAKEMED+16
ORKDD	CHKSESS+2~, CHKSESS+25*, CHKSESS+26
ORKDFN	TAKEMED~, TAKEMED+4, TAKEMED+7
ORKDG	CHECK~, CHECK+18, CHECK+23, CHKSESS~, CHKSESS+56
ORKDGI	CHKSESS+1~
ORKDRUG	CHKSESS+1~, CHKSESS+20, CHKSESS+23, CHKSESS+26, CHKSESS+27, CHKSESS+30, CHKSESS+32, CHKSESS+43*, CHKSESS+45, CHKSESS+51
ORKDRUGA	CHKSESS+1~, CHKSESS+54
ORKDRUGA(	CHKSESS+27, CHKSESS+32, CHKSESS+48, CHKSESS+49, CHKSESS+51*
ORKFLG	CHKSESS+2~, CHKSESS+4*
ORKMED	TAKEMED~, TAKEMED+5, TAKEMED+10, TAKEMED+15
ORKMEDP	TAKEMED+6~, TAKEMED+15*, TAKEMED+16
ORKOI	CHKSESS+1~, CHKSESS+16*, CHKSESS+18, CHKSESS+23, CHKSESS+24
ORKORN	CHKSESS+1~, CHKSESS+38*, CHKSESS+39, CHKSESS+40, CHKSESS+41, CHKSESS+42, CHKSESS+43, CHKSESS+46, CHKSESS+49, CHKSESS+51
ORKPDATA	CHKSESS~
ORKRSLT	TAKEMED+6~, TAKEMED+9, TAKEMED+16, TAKEMED+17
ORKY	TAKEMED+6~, TAKEMED+7
ORKY(	TAKEMED+11, TAKEMED+12
ORKY(1	TAKEMED+8
ORLOC	POLYRX+1~, POLYRX+5, POLYRX+7, GLCREAT+4~, GCDAYS+3~, GCDAYS+7, GCDAYS+9
ORMEDS	POLYRX+1~, POLYRX+9*, POLYRX+10
ORNUM	CHKSESS+2~, CHKSESS+5, CHKSESS+18, CHKSESS+40, NUMRX+1~, NUMRX+16, NUMRX+26
OROI	OI2DD~, OI2DD+2, OI2DD+3
ORPAR	POLYRX+1~, POLYRX+8*, POLYRX+10, GLCREAT+4~
ORPRENEW	NUMRX+1~, NUMRX+18*, NUMRX+25
ORPSA	CHKSESS+2~, CHKSESS+24, CHKSESS+28!, OI2DD~, OI2DD+6
ORPSA(	CHKSESS+25
ORPSPKG	CHKSESS+2~, CHKSESS+12, CHKSESS+13, CHKSESS+14, CHKSESS+19, CHKSESS+24, CHKSESS+27, CHKSESS+32, CHKSESS+46, CHKSESS+47 , CHKSESS+51, OI2DD~, OI2DD+5*, OI2DD+6
ORPTYPE	NUMRX+1~, NUMRX+7*, NUMRX+20
ORS	NUMRX+1~, NUMRX+17*, NUMRX+22, NUMRX+23, NUMRX+24
ORSESS	CHKSESS+2~, CHKSESS+10*, CHKSESS+11, CHKSESS+12, CHKSESS+15, CHKSESS+16, CHKSESS+20
ORSLT	POLYRX+1~, POLYRX+2, POLYRX+3, POLYRX+10, POLYRX+11
ORSNUM	CHKSESS+2~, CHKSESS+15*, CHKSESS+18, CHKSESS+27, CHKSESS+32
ORX	GLCREAT+5~, GLCREAT+16, GLCREAT+17, GLCREAT+22, NUMRX+1~, NUMRX+14*, NUMRX+15, NUMRX+16, NUMRX+17, NUMRX+18 , NUMRX+19
ORX(	GLCREAT+23
ORY	GLCREAT+5~, GLCREAT+13, GLCREAT+14, GLCREAT+19, NUMRX+1~, NUMRX+15*, NUMRX+20
ORY(	GLCREAT+20
ORZ	GLCREAT+5~, GLCREAT+25*, GLCREAT+26, GLCREAT+27, GLCREAT+30
PSOI	OI2DD+1~, OI2DD+3*, OI2DD+4, OI2DD+6
SAVEDFN	CHECK+7~, CHECK+16*, CHECK+19
SEQ	CHKSESS+1~, CHKSESS+35, CHKSESS+37, CHKSESS+38
SPECFILE	GLCREAT+5~, GLCREAT+16*, GLCREAT+18
SPECIMEN	GLCREAT+5~, GLCREAT+23*, GLCREAT+24, GLCREAT+25
TEST	GLCREAT+5~, GLCREAT+20*, GLCREAT+21, GLCREAT+25
U	CHECK+11, CHECK+15, CHKSESS+20, CHKSESS+38, CHKSESS+41, CHKSESS+42, TAKEMED+8, TAKEMED+10, TAKEMED+12, TAKEMED+15 , SOLUT+6, GLCREAT+20, GLCREAT+23, GLCREAT+27, GLCREAT+30, SUPPLY+6, NUMRX+15, NUMRX+16, NUMRX+17, NUMRX+18 , OI2DD+3
VA200	POLYRX+4, POLYRX+6!, GCDAYS+6, GCDAYS+8!
>> VADMVT	NUMRX+7
VAIN	POLYRX+6!, GCDAYS+8!
VAIN(4	POLYRX+5, GCDAYS+7
X	NUMRX+11~, NUMRX+12, NUMRX+13, NUMRX+14
YY	CHECK~, CHKSESS~

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORKPS

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 8

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: