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
|