Routine: DGPMTSR2

Information

DGPMTSR2 ;ALB/LM - TREATING SPECIALTY REPORT SET ; 3/1/93

Source file <DGPMTSR2.m>

Name	Comments	DBIA/ICR reference
A	; This will set ^TMP("TSR") = TREATING SPECIALTY TOTALS ; ^TMP("TSRS") = SERVICE TOTALS ; ^TMP("TSRD") = DIVISION TOTALS ; ^TMP("TSRG") = GRAND TOTAL
START	; Pats Remaining (Previous Date)
GAINS	; Gains Total Cum (new) - Gains Total Cum (previous)
LOSSES	; losses (new) - losses (previous)
CURRENT	; Patients Remaining
PASS
AA
UA
ASIH
ADC
CUM
COMMA
END