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: AZFMCM1

Package: Local Area Programs

Routine: AZFMCM1


Information

AZFMCM1 ;IHS/OHPRD/JCM;COMMON DRUG PRINT[ 02/03/95 2:25 PM ]

Source Information

Source file <AZFMCM1.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA Fileman 1 NOW^%DTC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Local Area Programs 1 AZFMCM  

Entry Points

Name Comments DBIA/ICR reference
PRINT ;
START ;INITIALIZE
EXIT ;
DRUG ;
HEADER ;

External References

Name Field # of Occurrence
NOW^%DTC HEADER+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,@IOF
  • Line Location: EXIT+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !,DRGNAME
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: ?40,$P(UTL,U,3)
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: ?47,$P(UTL,U,1)
  • Line Location: PRINT+5
Function Call: WRITE
  • Prompt: ?52,$P(UTL,U,2)
  • Line Location: PRINT+6
Function Call: WRITE
  • Prompt: ?60,APSPO,?70,$P(UTL,U,4)
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !!,$P(^DIC(4,DUZ(2),0),"^",1)," DISPENSED DRUG LIST"
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: !!,"DISPENSED DRUG LIST"
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: ?73,"Page ",PSOZCOM1("PAGE")
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !,"DATE OF LISTING: "
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: $E(X,4,5)_"-"_$E(X,6,7)_"-"_$E(X,2,3)
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: !!,"This list includes all prescriptions from "
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: $E(BD,4,5)_"-"_$E(BD,6,7)_"-"_$E(BD,2,3)," through "
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: $E(ED,4,5)_"-"_$E(ED,6,7)_"-"_$E(ED,2,3)_"."
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: !!,"DRUG",?40,"TOTAL",?47,"NEW",?52,"REFILL",?60,"DISPENSE",?70,"QTY",!,?60,"UNIT"
  • Line Location: HEADER+12
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+13
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HEADER+13
Function Call: WRITE
  • Prompt: !!?20,"NO RXS FOR A DRUG THAT TOTALS OVER COUNT SPECIFIED"
  • Line Location: HEADER+14
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+15

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS("C" EXIT+2
^%ZOSF("XY" START+1
^DIC(4 - [#4] HEADER+2
^TMP("PSOZCOM1" PRINT+2, DRUG+2

Label References

Name Line Occurrences
DRUG START+8
HEADER START+4, PRINT+1
PRINT DRUG+2

Naked Globals

Name Field # of Occurrence
^("XY" START+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APSPO START+3*, PRINT+2, PRINT+7, DRUG+2*
BD EXIT+3!, HEADER+8
DRGNAME EXIT+3!, PRINT+2, PRINT+3, DRUG+1*, DRUG+2*
DUZ(2 HEADER+2, HEADER+3
DX START+1*, EXIT+3!
DY START+1*, EXIT+3!
ED EXIT+3!, HEADER+9
I EXIT+3!, DRUG+2*, HEADER+13*
IO START+2
IOF EXIT+1, PRINT+1
IOM HEADER+13
IOSL PRINT+1
IOST EXIT+1
NUM EXIT+3!
PSOZCOM1 EXIT+3!
PSOZCOM1("PAGE" START+3*, HEADER+1*, HEADER+4
PSZCNT EXIT+3!
U PRINT+4, PRINT+5, PRINT+6, PRINT+7
UTL EXIT+3!, PRINT+2*, PRINT+4, PRINT+5, PRINT+6, PRINT+7
X EXIT+3!, HEADER+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All