PSUPR2 ;BIR/PDW - Procurement extract from file 58.811 ; 1/10/11 7:20am
Source file <PSUPR2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;
|
|
| INVOICE | ;EP process an invoice within an order
|
|
| ITEM | ;EP process one item within the invoice
|
|
| RECORD() | ;EP Assemble record
|
|
| DIV | ;Find division or outpatient site
|
|
| MAP | ;Find out whether a Narcotics Area of Use (NAOU) or a DA Pharmacy
|
|
| MAP1 | ;MAP continued. This subroutine takes the IEN from file 58.8 and looks
|
|
| WRD() | ;EP Process for ward;
|
|
| INP() | ;EP Process for Inpatient
; within package call to AR/WS that pulls/builds Inpatient AOU Site ; uses IEN Value to AOU STATs file 58.5 |
|
| IV() | ;EP Process,PSUIVDA for IV
; PSULOC IEN pharmacy location in file 58.8 (DRUG ACCOUNTABILITY) |
|
| OUT() | ;EP Process for Outpatient
|