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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSXCSMON

Package: CMOP

Routine: PSXCSMON


Information

PSXCSMON ;BIR/SAB-Drug Cost by Drug for One Month ;[ 04/08/97 2:06 PM ]

Source Information

Source file <PSXCSMON.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
CMOP 2 (,EX)^PSXCSMN1  (END,MN,NAME)^PSXCSUTL  
Kernel 2 ^%ZIS  ^%ZTLOAD  
VA Fileman 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
ALL ;Loops thru all facilities
EN ;Get month, specific drug (if desired), facility, & div
ALLDV ;Loops thru all divs
MIN ;If user selected specific drug, get minimum # of refills to print
DEV ;Device handling
START ;Queued entry point
DRUG ;Gets drug data & sets ^TMP nodes
DATE ;Entry point if specific fac & div OR this is called by ALL & ALLDV

External References

Name Field # of Occurrence
^%ZIS DEV+1
^%ZTLOAD DEV+4
^DIR MIN+2, MIN+5
^PSXCSMN1 START+4
EX^PSXCSMN1 MIN+2, MIN+5, DEV+4
END^PSXCSUTL EN+1, DEV+1
MN^PSXCSUTL EN+1
NAME^PSXCSUTL DRUG+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !
  • Line Location: MIN+1
Function Call: WRITE
  • Prompt: !
  • Line Location: MIN+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !!,"Printout must be sent to a 132-column printer!",!!
  • Line Location: DEV+2
Routine Call
  • DIR
  • Line Location:
    • MIN+2
    • MIN+5
Routine Call
  • %ZIS
  • Line Location:
    • DEV+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSDRUG - [#50] DRUG+5, DRUG+7
^PSDRUG("AQ1" DRUG+3
^PSX(552.5 ALL+1, ALLDV+1, DATE+1, DATE+2, DATE+3, DRUG+1, DRUG+2, DRUG+4
^TMP($J START+1!, DRUG+5*, DRUG+6*, DRUG+7*

Label References

Name Line Occurrences
@( START+3
DATE ALL+1, ALLDV+1
DEV MIN+1, DEV+2
DRUG DATE+3

Naked Globals

Name Field # of Occurrence
^( DATE+3, DRUG+6*, DRUG+7*
^(0 DRUG+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEV+1!*
%ZIS("B" DEV+1*
DIR MIN+2!, MIN+5!
DIR("?" MIN+1*, MIN+4*
DIR("A" MIN+1*, MIN+4*
DIR("B" MIN+1*, MIN+4*
DIR(0 MIN+1*, MIN+4*
>> DIRUT MIN+2, MIN+5
IO START+1
IO("Q" DEV+3, DEV+4!
IOM DEV+2
ION DEV+1
IOP DEV+1!
IOST DEV+2
POP DEV+1!
>> PSXBDT START+1, DATE+2
>> PSXBDTH START+1*
>> PSXDG DATE+3*, DRUG+1, DRUG+2, DRUG+4
>> PSXDGID DRUG+1*, DRUG+3
>> PSXDT DATE+2*, DATE+3, DRUG+1, DRUG+2, DRUG+4
>> PSXDV START+1, START+3, ALL+1*, ALLDV+1*, DATE+1, DRUG+4*, DRUG+5, DRUG+6, DRUG+7
>> PSXEDT START+1*, DATE+2
>> PSXFAC START+3, ALL+1*, ALLDV+1, DATE+1, DATE+2, DATE+3, DRUG+1, DRUG+2, DRUG+4, DRUG+5
, DRUG+6, DRUG+7
>> PSXG DEV+3*
>> PSXID MIN+1, DRUG+1
>> PSXIDG DRUG+3*, DRUG+5, DRUG+7
>> PSXIDV DATE+1*, DATE+2, DATE+3, DRUG+1, DRUG+2, DRUG+4
PSXION DEV+1*, DEV+3!
>> PSXMC MIN+5*, DRUG+2
>> PSXNAM DRUG+5, DRUG+6, DRUG+7
>> PSXOUT EN+1
>> PSXPG START+1*
>> PSXRF MIN+2*, DRUG+2
PSXSPDV START+1!*
>> Y MIN+2, MIN+5, DRUG+4*, DRUG+5, DRUG+6, DRUG+7
>> ZTDESC DEV+3*
>> ZTRTN DEV+3*
>> ZTSAVE( DEV+3*
ZTSK DEV+1!, DEV+4
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All