INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X I $D(X) S DINUM=X
LAST EDITED: JUL 15, 1992
DESCRIPTION:
Date that the purge routine was run which resulted in the purging of payment data for this patient. This data will exist ONLY IF data was purged for the patient for the specific purge run.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER