Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: PSGWSC1

Package: Auto Replenishment Ward Stock

Routine: PSGWSC1


Information

PSGWSC1 ;BHAM ISC/PTD,CML-Print Cost Report for Single Item for Selected Date Range - CONTINUED ; 23 Mar 93 / 12:55 PM

Source Information

Source file <PSGWSC1.m>

Entry Points

Name Comments DBIA/ICR reference
EN1
AOU
WRTOT
DONE
END
HDR ;PRINT REPORT MAIN HEADER
WRTLN
PRTCHK ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?5,"NO COST DATA IN FILE FOR SELECTED DATES."
  • Line Location: AOU+1
Function Call: WRITE
  • Prompt: !?44
  • Line Location: WRTOT+0
Function Call: WRITE
  • Prompt: "-"
  • Line Location: WRTOT+0
Function Call: WRITE
  • Prompt: !?39,"TOTAL",?46,$J((QD),8,0),?64,$S(INACTOT=1:"INCOMPLETE",1:$J((CST),10,2)),!!
  • Line Location: WRTOT+1
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: !?5,"COST REPORT FROM "
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: Y," TO "
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: Y," TO "
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: Y," TO "
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !?5,"DATE: ",$$PSGWDT^PSGWUTL1
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!?5,"ITEM: ",ITNAM,!?46,"QUANTITY",!?5,"AREA OF USE",?45,"DISPENSED",?67,"COST",!,LN
  • Line Location: HDR+2
Function Call: READ
  • Variable: ANS
  • Timeout: DTIME
  • Line Location: PRTCHK+1
Info |  Source |  Entry Points |  Interaction Calls