Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ORPRPM1

Package: Order Entry Results Reporting

Routine: ORPRPM1


Information

ORPRPM1 ;DAN/SLC Performance Measure Print; ;10/4/01 10:45

Source Information

Source file <ORPRPM1.m>

Call Graph

Call Graph

Call Graph Total: 3

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

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

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

Global Variables Directly Accessed

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

Label References

Name Line Occurrences
HDR PRINT+4, PRINT+12, PRINT+16, PRINT+27
SUBTOT PRINT+17

Naked Globals

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

Local Variables

Legend:

>> 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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All