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

Package: Auto Replenishment Ward Stock

Routine: PSGWHC1


Information

PSGWHC1 ;BHAM ISC/PTD,CML-Print High Cost Report for Selected Date Range - CONTINUED ; 23 Mar 93 / 12:53 PM

Source Information

Source file <PSGWHC1.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Auto Replenishment Ward Stock 1 ($$PSGWDT,HELP,SS)^PSGWUTL1  
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: 2

Package Total Caller Graph
Auto Replenishment Ward Stock 2 PSGWHC  PSGWHC0  

Entry Points

Name Comments DBIA/ICR reference
EN1
UT1LP
UT2LP
DONE
END
HDR ;PRINT REPORT MAIN HEADER
PRTCHK ;

External References

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"NO DATA AVAILABLE FOR SELECTED DATES."
  • Line Location: EN1+0
Function Call: WRITE
  • Prompt: !!,"# of Items: ",CNT
  • Line Location: UT1LP+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: DONE+0
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"HIGH COST REPORT AR/WS - ",$S(ALL=1:"FOR ALL AOUS",1:$P(^PSI(58.1,AOU,0),"^")),?70,"PAGE ",PGCT,!,"TOTAL COST GREATER THAN OR EQUAL TO $",CUT
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"FROM "
  • 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: !!?53,"DATE: ",$$PSGWDT^PSGWUTL1
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !?5,"ITEM",?45,"TOTAL COST",?60,"QUANTITY DISPENSED",!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HDR+4
Function Call: READ
  • Variable: ANS
  • Timeout: DTIME
  • Line Location: PRTCHK+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" HDR+2
^PSI(58.1 - [#58.1] HDR+1
^TMP("PSGWHC" EN1, UT1LP, UT2LP, END+1!

Label References

Name Line Occurrences
DONE EN1, UT1LP
END UT2LP+1
HDR EN1, PRTCHK+2
PRTCHK UT2LP+1
UT1LP UT2LP
UT2LP UT2LP+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% END+1!
%H END+1!
%I END+1!
ALL END!, HDR+1
ANS END+1!, PRTCHK+1*
AOU END!, HDR+1
AOUCST END!
AOUN END+1!
AOUQD END!
BDT END!, HDR+2
CF END+1!
CNT EN1*, UT1LP, UT2LP+1*, END+1!
CST END+1!
CUT END+1!, HDR+1
DRG UT2LP*, UT2LP+1, END!
DRGCST END!
DRGDA END!
DRGNAME END!
DRGNM END!
DRGQD END!
DRN END+1!
DRUG END+1!
DTIME PRTCHK+1
EDT END!, HDR+2
G END+1!
INACTOT END!
INC END!
INVDA END!
INVDT END!
INVN END!
IO("Q" END+1!
IOF DONE, HDR+1
IOSL UT2LP+1
IOST DONE, DONE+1, PRTCHK+1
J END!, HDR+4*
LOC UT2LP*, UT2LP+1, END!
LOC1 END!
LOC2 END!
LOCN END+1!
LOCSR END!
LOCWD END!
ODA END!
ODT END!
PGCT EN1*, END!, HDR+1, HDR+3*
PRCNT END!
PRCT END!
PSGWCNM END!
PSGWIO END+1!
PSGWION END+1!
QD END!
QFLG EN1*, UT2LP+1, DONE+1, END+1!, PRTCHK+1*
QUAN END+1!
RETDT END!
SORT UT2LP, END!
SRV END!
SRVDA END!
TOTCST END+1!
TOTQD END+1!
UT1 EN1*, UT1LP*, UT2LP, END!
UT2 EN1*, UT2LP*, END!
WARD END!
WDN END!
WRDA END!
WRDDA END!
X END!
>> Y HDR+2*
ZTIO END+1!
>> ZTQUEUED END+2
>> ZTREQ END+2*
ZTSK END!, END+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All