IVMUFNC1 ;ALB/SEK - INPATIENT/OUTPATIENT CALCULATIONS ; 06/19/2003
Source file <IVMUFNC1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(DFN,IVMMTDT,IVMQUERY) | ; number of inpatient and outpatient days since IVMMTDT date to
; IVMENDT (earliest of day before next means test and day before current date). ; Input: DFN -- pointer to patient in file #2 ; IVMMTDT -- Means Test date/time for the patient ; IVMQUERY("OVIS") -- # of the QUERY that is currently open or ; undefined, zero, or null if no QUERY opened for ; finding outpatient visits ; Output: 1^2 where piece 1 = # of inpatient days ; piece 2 = # of outpatient days |
|
| EPQ | ||
| LOS(IVMDG,IVMST) | ; Calculate the length of stay for an admission.
; Input: IVMDG -- Pointer to the admission in file #405 ; IVMST -- [Optional] Date after the admission on ; which to begin calculation of the LOS. ; Output: X -- Length of stay (in days) |
|
| Q | ||
| ABS | ; If patient was out on absence, find return
|
|
| CHK(ADPTR,DATE) | ; Determine date that patient returned from leave
; Input: ADPTR -- Pointer to admission in file #405 ; DATE -- Date the patient was on leave or ASIH ; Output: X1 -- Date the patient returned from leave |
