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

Package: Auto Replenishment Ward Stock

Routine: PSGWNU


Information

PSGWNU ;BHAM ISC/PTD,CML-Print Drugs (Items) with NO Usage for Selected Date Range ; 19 Mar 93 / 8:31 AM

Source Information

Source file <PSGWNU.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA Fileman 4 ^%DT  ^DIC  ^DIE  ^DIK  
Auto Replenishment Ward Stock 2 (,END)^PSGWNU1  SEL^PSGWUTL1  
Kernel 2 (,HOME)^%ZIS  ^%ZTLOAD  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Auto Replenishment Ward Stock 1 PSGW ZERO USAGE  

Entry Points

Name Comments DBIA/ICR reference
DRUG ;LOOP THROUGH DRUGS FOR AOU
EN
DRGLP
ENQ ;ENTRY POINT WHEN QUEUED
PRTQUE ;AFTER DATA IS COMPILED, QUEUE THE PRINT
RET ;RETURNS
OD ;ON DEMAND REQUESTS
ODLP
DEV
INVLP
BDT
AOU
AR ;AUTOMATIC REPLENISHMENT INVENTORIES
RETLP
ASKAOU
EDT
INACT
SETGL

External References

Name Field # of Occurrence
^%DT BDT, EDT
^%ZIS DEV
HOME^%ZIS DEV+2
^%ZTLOAD DEV+2, PRTQUE+2
^DIC ASKAOU
^DIE INVLP+1
^DIK DRGLP+1
^PSGWNU1 AOU
END^PSGWNU1 BDT, EDT, EDT+1, ASKAOU+1, EN, DEV, DEV+2, PRTQUE+2
SEL^PSGWUTL1 EDT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"The right margin for this report is 80.",!,"You may queue the report to print at a later time.",!!
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: !,"NO DEVICE SELECTED OR REPORT PRINTED!"
  • Line Location: DEV+0
Routine Call
  • %ZIS
  • Line Location:
    • DEV+2
Routine Call
  • DIE
  • Line Location:
    • INVLP+1
Routine Call
  • DIC
  • Line Location:
    • ASKAOU
Routine Call
  • %ZIS
  • Line Location:
    • DEV

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSI(58.1 - [#58.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSDRUG - [#50] DRGLP+1, DRGLP+2
^PSI(58.1 - [#58.1] EDT+1, ASKAOU+2, DRGLP, INACT, INACT+1, INVLP, INVLP+2, ODLP, ODLP+1, RETLP
, RETLP+1
^PSI(58.19 - [#58.19] INVLP, INVLP+1
^TMP("PSGWNU" ENQ+1!, SETGL*, PRTQUE+2!

Label References

Name Line Occurrences
AOU DRGLP
DRGLP DRGLP+1, INACT+1, SETGL
EN EDT+2
INVLP INVLP+1, INVLP+4
OD INVLP
ODLP ODLP+3
PRTQUE AOU
RET ODLP
RETLP RETLP+2
SETGL RETLP

Naked Globals

Name Field # of Occurrence
^("I" EDT+1, ASKAOU+2
^(0 INACT*, INVLP

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT BDT*!, EDT*!
%DT("A" BDT*, EDT*
%DT(0 EDT*
%ZIS DEV!*
%ZIS("B" DEV*
>> AOU ASKAOU+2*, ENQ+1*, AOU*, DRGLP, DRGLP+1, INACT, INACT+1, INVLP, INVLP+1, INVLP+2
, ODLP, ODLP+1, RETLP, RETLP+1, SETGL
>> AOULP ASKAOU+1, EN, DEV+1
>> AOULP( EDT+1!, ASKAOU*, ASKAOU+2*, AOU
>> AR AR+1*, INVLP+2*, SETGL
>> ARDT INVLP*, INVLP+1, INVLP+2, INVLP+3
>> BDT BDT*, EDT, INVLP+3, ODLP+2, RETLP+1
>> DA DRGLP+1*, INVLP+1*
>> DA(1 DRGLP+1*, INVLP+1*
>> DA(2 INVLP+1*
DIC ASKAOU*!
DIC("S" ASKAOU*
DIC(0 ASKAOU*
DIE INVLP+1*!
DIK DRGLP+1*!
>> DR INVLP+1*
>> DRGDA DRUG+1*, DRGLP*, DRGLP+1, INACT, INACT+1, INVLP, INVLP+1, INVLP+2, ODLP, ODLP+1
, RETLP, RETLP+1
>> DRGNAME DRGLP+2*, SETGL
>> DRGNM DRGLP*, DRGLP+1, DRGLP+2, SETGL
>> DRGQD AR+1*, INVLP+3*, ODLP+2*, RETLP+1*, SETGL
DT EDT+1, ASKAOU+2
>> EDT EDT*, INVLP+3, ODLP+2, RETLP+1
>> G DEV+1*, PRTQUE+1*
>> INVDA AR+1*, INVLP*, INVLP+1, INVLP+2
IO DEV+3
IO("Q" DEV+1!
ION DEV+1
IOP DEV!
>> JJ EDT+1*, ASKAOU*
>> OD OD+1*, ODLP+1*, SETGL
>> ODA OD+1*, ODLP*, ODLP+1
>> ODT ODLP*, ODLP+1, ODLP+2
>> POP DEV
>> PSGWIO DEV+1*, PRTQUE+1
>> QD INVLP+2*, INVLP+3, ODLP+1*, ODLP+2, RETLP+1*
>> RETDT RET+1*, RETLP*, RETLP+1
>> RFLG RET+1*, RETLP+1*, SETGL
>> SEL EDT+1, EDT+2
>> X ASKAOU+1, ASKAOU+2
>> Y BDT, EDT, ASKAOU
>> ZTDESC DEV+1*, PRTQUE+1*
ZTDTH DEV+1!, PRTQUE+1*
ZTIO DEV+1*, PRTQUE+1!*
>> ZTQUEUED AOU
>> ZTRTN DEV+1*, PRTQUE+1*
ZTSAVE DEV+1!, PRTQUE+1!
ZTSAVE( DEV+1*, PRTQUE+1*
ZTSAVE("AOULP(" DEV+1*
ZTSAVE("^TMP(""PSGWNU"",$J," PRTQUE+1*
ZTSK DEV+1!, DEV+2!
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