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 |  Local Variables  | All
Print Page as PDF
Routine: PSGWADP1

Package: Auto Replenishment Ward Stock

Routine: PSGWADP1


Information

PSGWADP1 ;BHAM ISC/PTD,CML-Print Data for AMIS Stats - CONTINUED ; 30 Aug 93 / 10:13 AM

Source Information

Source file <PSGWADP1.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 2 ^%DT  ^DIR  
Kernel 1 ^%ZISC  

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
Auto Replenishment Ward Stock 1 PSGWADP  

Entry Points

Name Comments DBIA/ICR reference
PRINT
ONDM
DONE
END
HDR ;PRINT REPORT HEADING
WRTYPE
WRTDATA

External References

Name Field # of Occurrence
^%DT HDR+2
^%ZISC END+1
^DIR HDR+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,PSGWNM
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !!?5,PSGWNM
  • Line Location: ONDM+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DONE+0
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue: "
  • Line Location: DONE+1
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!,"PAGE: ",PSGWPG,?110,"DATE: ",Y,!?50,"DATA FOR AR/WS AMIS STATS",!!,"TYPE",?47,"ORDER",?59,"PRICE PER",?73,"DISPENSE UNITS",?90,"PRICE PER",?105,"AMIS",?120,"AMIS CONV.",!
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?5,"DRUG NAME",?47,"UNIT",?59,"ORDER UNIT",?73,"PER ORDER UNIT",?90,"DISPENSE UNIT",?105,"CATEGORY",?120,"NUMBER",!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: "="
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?47,$P(LOC,"^"),?61,$P(LOC,"^",2),?75,$P(LOC,"^",3),?90,$P(LOC,"^",4),?105,$P(LOC,"^",5),?120,$P(LOC,"^",6)
  • Line Location: WRTDATA+1
Routine Call
  • DIR
  • Line Location:
    • HDR+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" HDR+2
^PSI(58.16 - [#58.16] WRTYPE
^TMP("PSGWADP" PRINT+1, ONDM, END!, WRTDATA

Label References

Name Line Occurrences
DONE PRINT+1
END PRINT
HDR PRINT, PRINT+1, PRINT+2, ONDM
ONDM PRINT+1
WRTDATA PRINT+2, ONDM
WRTYPE PRINT+1, ONDM

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% END!
%DT END!, HDR+2*
%H END!
%I END!
AUTO DONE+1*, END!
DA END!
DIR HDR+1!
DIR(0 HDR+1*
DTIME DONE+1
I END!
IO("Q" END!
IOF DONE, HDR+2
IOSL PRINT+1, PRINT+2, ONDM
IOST DONE, DONE+1, HDR+1
J PRINT+1*, ONDM*, END!, HDR+4*, WRTDATA*
K END!
LOC END!, WRTDATA*, WRTDATA+1
LOC1 END!
LOC2 END!
OUNIT END!
OUPTR END!
OUT PRINT*, PRINT+1, PRINT+2, ONDM, DONE+1, END!, HDR+1*
PSGWAOU END!
PSGWDR END!
PSGWDT END!
PSGWIO END!
PSGWITM END!
PSGWNM PRINT+1*, PRINT+2, ONDM*, END!, WRTDATA
PSGWPG PRINT*, END!, HDR+1, HDR+2, HDR+5*
PSGWTY PRINT+1*, END!, WRTYPE, WRTDATA
X END!, HDR+2*
Y END!, HDR+1, HDR+2
ZTIO END!
>> ZTQUEUED END+2
>> ZTREQ END+2*
ZTSK END!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All