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()
|
