PSUPR5 ;BIR/PDW - PROCUREMENT EXTRACT SUMMARY MESSAGE GENERATOR ;10 JUL 1999
Source file <PSUPR5.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN | ;EP generate Total & Cost summary
 | 
|
| EN1 | ||
| DIV | ;EP Loop by Division
 | 
|
| MESSAGE | ;EP Generate Summary Messages for a Division
 | 
|
| MSG1 | ;  Generate 1st summary message
 | 
|
| MSG2 | ; SUMMARY BY DRUG
 ; loop records stored ; psunm - name, psudisp - disp unit, psutq - total quantity, psutc - total cost  | 
|
| NODATA | ;EP SEND NO DATA MESSAGE
 |