Routine: PSGWHC0

Information

PSGWHC0 ;BHAM ISC/PTD,CML-High Cost for Selected Date Range (Single AOU or Cumulative) - CONTINUED ; 19 Mar 93 / 8:30 AM

Source file <PSGWHC0.m>

Name	Comments	DBIA/ICR reference
ENQ	;ENTRY POINT WHEN QUEUED
AOU
DRUG	;LOOP THROUGH DRUGS FOR AOU
DRGLP
AR	;AUTO REPLENISH INVENTORIES
INVLP
OD	;ON DEMAND REQUESTS
ODLP
RET	;RETURNS
RETLP
CHKDTA	;DETERMINE TOTAL COST FOR SELECTED DRUG
COST
SETGL
CONV
DRUGLP
AOULP
HIGH
PRTQUE	;AFTER DATA IS COMPILED, QUEUE THE PRINT