Routine: ORPRPM1

Package	Total	Call Graph
Kernel	2	($$DT,$$FMTE)^XLFDT $$REPEAT^XLFSTR
VA Fileman	1	^DIR

Package	Total	Caller Graph
Order Entry Results Reporting	1	ORPRPM

Entry Points

Name	Comments	DBIA/ICR reference
PRINT	;Print out report
SUBTOT	;Print individual sub totals
HDR(TYPE)	;Print appropriate header

External References

Name	Field # of Occurrence
^DIR	HDR+1
$$DT^XLFDT	PRINT+1
$$FMTE^XLFDT	PRINT+1, PRINT+6, HDR+4
$$REPEAT^XLFSTR	PRINT+29, HDR+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"There is no data for the criteria you selected." Line Location: PRINT+4
Function Call: WRITE	Prompt: !,"PROVIDER: ",ORI,!! Line Location: PRINT+5
Function Call: WRITE	Prompt: ?20,$S(ORPAT["DPT":$E($P(^DPT(+ORPAT,0),"^"),1)_$E($P(^(0),"^",9),6,9),1:"Refrl") Line Location: PRINT+7
Function Call: WRITE	Prompt: !,"There is no data for the criteria you selected." Line Location: PRINT+16
Function Call: WRITE	Prompt: ?1,$S(ORP="I":" Inpt",1:"Outpt")," Tot" Line Location: PRINT+20
Function Call: WRITE	Prompt: ?19,$J(+$P(^(ORP),"^",10)_"/"_+$P(^(ORP),"^",9)_"/"_+$P(^(ORP),"^",8),15) Line Location: PRINT+21
Function Call: WRITE	Prompt: ?58,+$P(^(ORP),"^",4),"/",+$P(^(ORP),"^",5),"/",+$P(^(ORP),"^",6),"/",+$P(^(ORP),"^",7) Line Location: PRINT+23
Function Call: WRITE	Prompt: $$REPEAT^XLFSTR("-",78) Line Location: PRINT+29
Function Call: WRITE	Prompt: ?1," Sub-tot",?12,$J($G(ORSTOT(1)),6),?34,$J($G(ORSTOT(2)),8),?44,$J($G(ORSTOT(3)),8) Line Location: SUBTOT+1
Function Call: WRITE	Prompt: @IOF Line Location: HDR+2
Function Call: WRITE	Prompt: !,"CPRS Performance Monitor ",$S(TYPE="D":"- Detailed",ORFS:"- Summary Totals",1:"- Summary")," Report",?52,REPDT,?72,"PAGE ",$G(PG),!,"Selected Date Range: ",$$FMTE^XLFDT(ORSD+.1,2)," to ",$$FMTE^XLFDT(ORED\1,2),! Line Location: HDR+4
Function Call: WRITE	Prompt: "Sort criteria: ",$S(ORPT="I":"IN",ORPT="O":"OUT",1:"ALL "),"PATIENTS/",$S(ORTYPE="P":"PHARMACY",1:"ALL")," ORDERS" Line Location: HDR+5
Function Call: WRITE	Prompt: ?72,"ENTERED",!,"ORDER",?41,"ORD",?47,"PATIENT",?73,"BY HAS",!,"DATE",?11,"ORDER #",?19,"PAT ID",?27,"1st ORD ITEM",?41,"TYPE",?47,"LOCATION",?61,"PACKAGE",?74,"ORES?",! Line Location: HDR+6
Function Call: WRITE	Prompt: ?10,"UNIVERSE",?23,"DEA/STU/POL",?36,"ORDERS",?45,"ENTERED",?56,"%",?58,"WR/VE/TE/EL",! Line Location: HDR+7
Function Call: WRITE	Prompt: $$REPEAT^XLFSTR("-",IOM),! Line Location: HDR+8
Routine Call	DIR Line Location: HDR+1

Name	Line Occurrences (* Changed, ! Killed)
^DIC(9.4 - [#9.4]	PRINT+11
^DPT - [#2]	PRINT+7
^OR(100 - [#100]	PRINT+6, PRINT+7, PRINT+8, PRINT+9, PRINT+10, PRINT+11
^ORD(100.02 - [#100.02]	PRINT+9
^ORD(101.43 - [#101.43]	PRINT+8
^SC - [#44]	PRINT+10
^TMP($J	PRINT+4, PRINT+5, PRINT+12, PRINT+16, PRINT+17, PRINT+18, PRINT+21, PRINT+22

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DIR	HDR+1!
DIR(0	HDR+1*
IOF	HDR+2
IOM	HDR+8
IOSL	PRINT+12, PRINT+27
IOST	HDR+1, HDR+2
>> ORED	HDR+4
>> ORFS	PRINT+17, PRINT+19, PRINT+29, HDR+4, HDR+7
>> ORI	PRINT+5, PRINT+12, PRINT+17, PRINT+18, PRINT+20, PRINT+21, PRINT+22
>> ORJ	PRINT+5, PRINT+6, PRINT+7, PRINT+8, PRINT+9, PRINT+10, PRINT+11, PRINT+12, PRINT+25
>> ORP	PRINT+18, PRINT+20, PRINT+21, PRINT+22, PRINT+23, PRINT+25, PRINT+26, PRINT+30, PRINT+31, PRINT+32 , PRINT+33
>> ORPAT	PRINT+7*
>> ORPT	HDR+5
>> ORREP	PRINT+3, PRINT+15
>> ORSD	HDR+4
>> ORSTOP	PRINT+3, PRINT+4, PRINT+5, PRINT+13, PRINT+15, PRINT+16, PRINT+17, PRINT+18, PRINT+28, HDR+1*
ORSTOT	PRINT+18!
ORSTOT(1	PRINT+26*, SUBTOT+1
ORSTOT(2	PRINT+26*, SUBTOT+1, SUBTOT+2
ORSTOT(3	PRINT+26*, SUBTOT+1, SUBTOT+2
>> ORTOT(	PRINT+25*
>> ORTOT(1	PRINT+30, PRINT+31, PRINT+34
>> ORTOT(10	PRINT+31, PRINT+34
>> ORTOT(2	PRINT+32, PRINT+35
>> ORTOT(3	PRINT+32, PRINT+35
>> ORTOT(4	PRINT+33, PRINT+35
>> ORTOT(5	PRINT+33, PRINT+35
>> ORTOT(6	PRINT+33, PRINT+35
>> ORTOT(7	PRINT+33, PRINT+35
>> ORTOT(8	PRINT+31, PRINT+34
>> ORTOT(9	PRINT+31, PRINT+34
>> ORTYPE	HDR+5
>> ORWROTE	PRINT+18, PRINT+20
>> PG	HDR+1, HDR+2, HDR+3*, HDR+4
>> REPDT	PRINT+1*, HDR+4
TYPE	HDR~, HDR+4, HDR+6, HDR+7
>> Y	HDR+1

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORPRPM1

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Field # of Occurrence
^(	PRINT+21, PRINT+22, PRINT+23, PRINT+25, PRINT+26
^(0	PRINT+7, PRINT+8, PRINT+9, PRINT+10, PRINT+11