Routine: PSGWHC1

Information

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

Source file <PSGWHC1.m>

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