PSUSUM3 ;BIR/DAM - Patient Demographics Summary for UD Extract ; 20 DEC 2001
Source file <PSUSUM3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;EN CALLED FROM PSUUD0
|
|
| EN1 | ;Entry point to collect data
|
|
| RE | ;Rearrange the ^XTMP("PSU_"_PSUJOB,"PSUUD","DETAIL" global so information in PATDIV
|
|
| DATE | ;Convert date range of extract to external format
|
|
| UDSUM | ;Summary report header to be run if UD (Inpatient) extract is run
|
|
| UNIQUE | ;Find number of unique patients across all divisions
|
|
| TAB2 | ;Tab spacing for line 7. Set line into global
|
|
| DIVNUM | ;Set number of patients per division into summary message
|
|
| TAB | ;Calculate tab spacing
|
|
| TOTAL | ;EN Calculate Inpatient total of all divisions
|
|
| TAB1 | ;EN Calculate tab spacing for 'Outpatient Total of all Divisions' line.
|
|
| NODATA | ;Summary report line to be sent if there is no data
|
