IBOUNP5 ;ALB/CJM - INPATIENT INSURANCE REPORT ;JAN 25,1992
Source file <IBOUNP5.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
LOOP | ; loops through inpatients
|
|
LOOP1 | ; finds current admissions for selected divisions
|
|
LOOP2 | ; finds admissions during selected date range for selected divisions
|
|
PROC | ;
|
|
VET | ; checks if patient is a vet
|
|
DONE | ; checks if patient already on report
|
|
INDEX | ; indexes appointment,also indexs vet so he won't be reported twice
|
|
UNK | ; goes in 'unknown' category if the field COVERED BY HEALTH INSURANCE
; was not answered, was answered unknown, and there is no insurance data |
|
EXP | ; goes in expired category only if there is insurance and
; all of it expired before end of specified period + 30 days |
|
UNI | ; goes in unisured category if there is no insurance data and
; the field COVERED BY HEALTH INSURANCE was answered YES or NO |
|
CKINS | ; checks if any insurance in insurance multiple of patient record
|
|
DIV | ; checks if the division is on the list VAUTD()
|