IBOUNP2 ;ALB/CJM - OUTPATIENT INSURANCE REPORT ;JAN 25,1992
Source file <IBOUNP2.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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LOOPPT | ; loops through patients returned from API
|
|
| INFO | ; looks up info, assumes IBSDDAT
|
|
| VET(DFN) | ; checks if patient is a vet
|
|
| INDEX | ; indexes appointment
|
|
| 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
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(40.8 - [#40.8] | INFO+4 |
| ^DPT - [#2] | UNK+2, EXP+3, UNI+2, CKINS+1 |
| ^SC - [#44] | INFO+4 |
| ^TMP("IBOUNP" | INDEX+1* |
| ^TMP($J | LOOPPT+3 |
| Name | Field # of Occurrence |
|---|---|
| ^( | EXP+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | LOOPPT+1*, LOOPPT+3*, VET~, INDEX+1, UNK+2, EXP+3, UNI+2, CKINS+1 |
| E | EXP+2~, EXP+3* |
| >> IBOCLN | INFO+3*, INDEX+1 |
| IBOCLNC | LOOPPT+1~, INFO+2*, INFO+4 |
| IBOCTG | LOOPPT+1~, INDEX+1, UNK+2*, EXP+3*, UNI+2* |
| >> IBODIV | INFO+4*, INDEX+1 |
| >> IBOEND | LOOPPT+2 |
| IBOEND2 | LOOPPT+1~, LOOPPT+2*, EXP+3 |
| >> IBOEXP | INFO+5 |
| IBOINS | LOOPPT+1~, UNK+2, EXP+2, UNI+2, CKINS+1* |
| IBONAME | LOOPPT+1~, INFO+1*, INDEX+1 |
| IBORPTD | LOOPPT+1~, LOOPPT+3, INFO+5*, UNK+2*, EXP+2*, EXP+3*, UNI+2* |
| IBOTIME | LOOPPT+1~, LOOPPT+3*, INDEX+1 |
| >> IBOUI | INFO+5 |
| >> IBOUK | INFO+5 |
| >> IBSDDAT | LOOPPT+3*, INFO+1, INFO+2, INFO+3 |
| T | UNK+2~*, EXP+2~, EXP+3*, UNI+2~* |
| >> VAEL(4 | VET+2 |
| >> VAERR | VET+2 |
| >> X | LOOPPT+2 |
| >> X1 | LOOPPT+2* |
| >> X2 | LOOPPT+2* |
