VAFCTF ;BIR/DLR-Utility for capturing patient's Date Last Treated and Event Reason ; 5/6/20 5:29pm
Source file <VAFCTF.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN1(VAFCDFN,VAFCSUP) | ; determine the LAST TREATMENT DATE for a single
; patient ; input: VAFCDFN - the dfn of the patient ; VAFCSUP - if 1, suppress add entries to the ADT HL7 PIVOT ; (#391.71) file for TF messaging - VAFCTFMF (optional) ; output: VAFCDATE - patient's DATE LAST TREATED ; VAFCENVR - event reason |
|
| ADMDIS(DFN) | ; find the patient's last admission and discharge dates if
; they exist. ; Input: DFN - ien of the patient (file 2) |
|
| ENCDT(DFN,INPDT) | ; find the last patient check out date/time. 'ADFN'
; cross-reference accessed through DBIA: 2953 ; Input: DFN - ien of the patient (file 2) ; INPDT - date (if any) returned from the inpatient admission/ ; discharge subroutine |
