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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSXCSHI1

Package: CMOP

Routine: PSXCSHI1


Information

PSXCSHI1 ;BIR/JMB-High Cost Rx Report-CONTINUED ;[ 04/08/97 2:06 PM ]

Source Information

Source file <PSXCSHI1.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 $$GET1^DIQ  ^DIR  
Kernel 1 $$IEN^XUMF  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
CMOP 1 PSXCSHI  

Entry Points

Name Comments DBIA/ICR reference
PRINT ;Loops thru ^TMP global
HD

External References

Name Field # of Occurrence
$$GET1^DIQ HD+3
^DIR HD
$$IEN^XUMF HD+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No. of Fills="_PSXCNT,?20,"'*' indicates a refill"
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: PSXPG>1!($E(IOST)="C")
  • Line Location: HD+4
Function Call: WRITE
  • Prompt: !,"PRINTED: ",PSXPDT,?(72-$L(PSXPG)),"PAGE ",PSXPG
  • Line Location: HD+4
Function Call: WRITE
  • Prompt: !!?(60-$L(PSXFACR)/2),"HIGH COST REPORT FOR ",PSXFACR
  • Line Location: HD+5
Function Call: WRITE
  • Prompt: !?8,"FILLS THAT COST AT LEAST $",PSXMAX," -- FROM ",PSXBDTR," TO ",PSXEDTR
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: !!," RX #",?15,"DRUG",?51,"QTY",?59,"COST",?67,"TOTAL COST"
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: !
  • Line Location: HD+8
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HD+8
Routine Call
  • DIR
  • Line Location:
    • HD

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSX(552 HD+3
^TMP($J PRINT+1, PRINT+2, PRINT+3, PRINT+5

Label References

Name Line Occurrences
HD PRINT+1, PRINT+2, PRINT+4

Naked Globals

Name Field # of Occurrence
^( PRINT+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AGNCY HD+3*
DIR HD!
DIR("A" HD*
DIR(0 HD*
>> DTOUT HD
>> DUOUT HD
IOF HD+4
IOSL PRINT+1, PRINT+4
IOST HD, HD+4
>> PSXBDTR HD+6
>> PSXCNT PRINT+1, PRINT+2*, PRINT+4*
>> PSXDG PRINT+2*, PRINT+3, PRINT+5
>> PSXEDTR HD+6
>> PSXEXIT PRINT+1, PRINT+2, PRINT+3, PRINT+4, HD*
>> PSXFAC PRINT+1*, PRINT+2, PRINT+3, PRINT+5, HD+3
>> PSXFACR HD+1*, HD+3*, HD+5
>> PSXI HD+8*
>> PSXIEN PRINT+3*, PRINT+5
>> PSXMAX HD+6
>> PSXPDT HD+4
>> PSXPG HD, HD+4*
>> PSXRXN PRINT+2*, PRINT+3, PRINT+5
X HD+3~*
Y HD+3~*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All