IVMUFNC2 ;ALB/SEK - INPATIENT/OUTPATIENT CALCULATIONS (CON'T) ; 24-NOV-93
Source file <IVMUFNC2.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Income Verification Match | 1 | IVMUFNC1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(IVMQUERY) | ; Calculate number of outpatient days
; Input: IVMQUERY("OVIS") - the # of the QUERY this job has open for ; searching for patient's outpatient visits. If null, this QUERY has ; yet been opened. (pass by reference) |
|
VALENC(IVME,IVME0) | ; Check for valid outpatient encounter
; Input: IVME = encounter ien ; IVME0 = 0-node of encounter (optional) |
|
ENCL(IVMIBOE) | ; Return classification results for an encounter.
; Input: IVMIBOE -- Pointer to outpatient encounter in file #409.68 ; Output: ao^ir^sc^ec, where, for each piece, ; 1 - care was related to condition, and ; 0 (or null) - care not related to condition |
|
END(DFN,IVMPMTD) | ; return end date for calculating inpatient/
; outpatient days. this date will be earliest of day before next means ; test and day before current date. ; Input: DFN -- pointer to patient in file #2 ; IVMPMTD -- previous means test date |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^SC - [#44] | VALENC+10 |
^SDD(409.42 - [#409.42] | ENCL+6 |
^TMP("DIERR" | EN+7!, EN+21!, VALENC+5! |
^TMP($J | VALENC+14* |
Name | Line Occurrences |
---|---|
$$ENCL | VALENC+11 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CL | ENCL+5~, ENCL+6* |
CLD | ENCL+5~, ENCL+6* |
DFN | EN+17, VALENC+14, END~, END+8 |
DT | END+9 |
IVMD | VALENC+3~, VALENC+7*, VALENC+9, VALENC+12, VALENC+14 |
IVME | VALENC~, VALENC+5, VALENC+11 |
IVME0 | VALENC~, VALENC+5*, VALENC+7, VALENC+9, VALENC+10 |
>> IVMENDT | EN+18 |
IVMIBOE | ENCL~, ENCL+6 |
IVMICY | END+6~, END+7*, END+8 |
>> IVMMTDT | EN+18 |
>> IVMOUT | VALENC+14* |
IVMPMTD | END~, END+7, END+9 |
IVMQ | EN+6~, EN+8*, EN+9, EN+11, EN+12, EN+13, EN+14, EN+15, EN+17, EN+18 , EN+19, EN+20 |
IVMQUERY | EN~ |
IVMQUERY("OVIS" | EN+8, EN+15* |
IVMZ | VALENC+3~ |
IVMZ(0 | VALENC+5 |
U | VALENC+9, VALENC+10 |
>> VADMVT | VALENC+12 |
>> VAINDT | VALENC+12* |
X | ENCL+5~, END+6~, END+8*, END+9 |
Y | ENCL+5~*, ENCL+6*, ENCL+7 |