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

Package: Auto Replenishment Ward Stock

Routine: PSGWEXR2


Information

PSGWEXR2 ;BHAM ISC/CML-Print Drug Expiration Date Report by Selected Date Range/AOU for AOUs with Locations ; 23 Mar 93 / 12:52 PM

Source Information

Source file <PSGWEXR2.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Auto Replenishment Ward Stock 1 ($$PSGWDT,HELP,SS)^PSGWUTL1  
Kernel 1 ^%ZISC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Auto Replenishment Ward Stock 1 PSGWEXR  

Entry Points

Name Comments DBIA/ICR reference
QUIT
HDR ;PRINT REPORT MAIN HEADER
PRTCHK ;
PRT
DONE
W2 ;
W1 ;
PRINT ;ENTRY POINT WHEN QUEUED
W3 ;

External References

Name Field # of Occurrence
^%ZISC QUIT
$$PSGWDT^PSGWUTL1 HDR+1
HELP^PSGWUTL1 PRTCHK+1
SS^PSGWUTL1 DONE+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"NO DATA FOUND FOR THIS REPORT"
  • Line Location: PRT+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DONE+0
Function Call: WRITE
  • Prompt: !!,"=> ",Y
  • Line Location: W1+1
Function Call: WRITE
  • Prompt: !
  • Condition for execution: CNT>1
  • Line Location: W2+1
Function Call: WRITE
  • Prompt: !?12,P1
  • Line Location: W2+1
Function Call: WRITE
  • Prompt: "/(",$P(^SC(LOC,0),"^"),")"
  • Line Location: W2+1
Function Call: WRITE
  • Prompt: !,?25,P2
  • Line Location: W3+1
Function Call: WRITE
  • Prompt: "/(",$E($P(^SC(LOC,0),"^"),1,22),")"
  • Line Location: W3+1
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !?26,"DRUG EXPIRATION DATE REPORT",?70,"PAGE ",PG
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !?TAB,"FOR ",AOUNM," (LOCATION - ",LOCNM,")"
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !?22,"FOR PERIOD "
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: Y," TO "
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: Y," TO "
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: "FOR INVENTORY GROUP - ",$P(^PSI(58.2,IGDA,0),"^"),!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: "=> DATE",!?12
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: "ITEM",!,LN
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: "ITEM",!?25,"AOU/(LOCATION)",!,LN
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: "AOU/(LOCATION)",!?25,"ITEM",!,LN
  • Line Location: HDR+7
Function Call: READ
  • Timeout: DTIME
  • Variable: ANS
  • Line Location: PRTCHK+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" W1+1, HDR+2
^PSI(58.1 - [#58.1] PRINT+2, W2+1, W3+1
^PSI(58.2 - [#58.2] HDR+3
^SC - [#44] PRINT+2, W2+1, W3+1
^TMP("PSGWEXR" PRT+1, PRT+2, QUIT!, W2+1, W3+1

Label References

Name Line Occurrences
DONE PRT+1
HDR PRT, PRTCHK+2
PRTCHK W1+1, W2+1, W3+1
W1 PRT+2
W2 PRT+2
W3 PRT+2

Naked Globals

Name Field # of Occurrence
^( W2+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% QUIT!
%H QUIT!
%I QUIT!
%Z QUIT!
ANS QUIT!, PRTCHK+1*
AOU PRINT+1*, PRINT+2*, QUIT!, W2+1*, W3+1*
AOULP QUIT!
AOULP( PRINT+2
AOUNM PRINT+1*, PRINT+2*, QUIT!, HDR+1
BDT QUIT!, HDR+2
CNT PRINT+2, PRT+2, QUIT!, W2+1, HDR+1, HDR+5
DRG QUIT!
DRGNM QUIT!
DTIME PRTCHK+1
EDT QUIT!, HDR+2
EXDT PRT+2*, QUIT!, W1+1, W2+1, W3+1
G QUIT!
HDT QUIT!, HDR+1*, HDR+2
HH QUIT!, W3+1*
IGDA QUIT!, HDR+3
IO("Q" QUIT!
IOF DONE, HDR+1
IOSL W1+1, W2+1, W3+1
IOST DONE, DONE+1, PRTCHK+1
JJ PRT+2*, QUIT!, W2+1*
LN PRINT+1*, QUIT!, HDR+5, HDR+6, HDR+7
LOC QUIT!, W2+1*, W3+1*
LOCFLG QUIT!
LOCNM PRINT+1*, PRINT+2*, QUIT!, HDR+1
P1 PRT+2*, QUIT!, W2+1, W3+1
P2 PRT+2*, QUIT!, W3+1*
PG PRINT+1*, QUIT!, HDR+1*
QFLG PRINT+1*, PRT+2, DONE+1, QUIT!, W1+1, W2+1, W3+1, PRTCHK+1*
SEL QUIT!, HDR+3
SORT QUIT!, W2+1, W3+1, HDR+6
TAB PRINT+2*, QUIT!, HDR+1
X QUIT!
Y QUIT!, W1+1*, HDR+2*
>> ZTQUEUED QUIT+1
>> ZTREQ QUIT+1*
ZTSK QUIT!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All