IBOUNP2 ;ALB/CJM - OUTPATIENT INSURANCE REPORT ;JAN 25,1992
Source file <IBOUNP2.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 1 | ELIG^VADPT |
| VA Fileman | 1 | C^%DTC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| STATUS | ; checks if appt status="",otherwise should not be on report
|
|
| INDEX | ; indexes appointment,also indexs vet so he won't be reported
|
|
| VET | ; checks if patient is a vet
|
|
| LOOPCLNC | ; loops through selected clinics
|
|
| LOOPAPPT | ; loops through appointments for a selected clinic
|
|
| DONE | ; checks if patient already on report
|
|
| EXP | ; goes in expired category only if there is insurance and
|
|
| UNI | ; goes in unisured category if there is no insurance data and
|
|
| UNK | ; goes in 'unknown' category if the field COVERED BY HEALTH INSURANCE
|
|
| CKINS | ; checks if any insurance in insurance multiple of patient record
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(40.8 - [#40.8] | LOOPAPPT+2 |
| ^DPT - [#2] | LOOPAPPT+6, STATUS+1, INDEX+1, UNK+2, EXP+3, UNI+2, CKINS+1 |
| ^SC - [#44] | LOOPAPPT+1, LOOPAPPT+2, LOOPAPPT+3, LOOPAPPT+4 |
| ^SC("AC" | LOOPCLNC+3 |
| ^TMP($J | DONE+1, INDEX+2*, INDEX+3* |
| Name | Line Occurrences |
|---|---|
| CKINS | UNK+2, EXP+2, UNI+2 |
| DONE | LOOPAPPT+6 |
| EXP | LOOPAPPT+6 |
| INDEX | LOOPAPPT+6 |
| LOOPAPPT | LOOPCLNC+3, LOOPCLNC+4 |
| STATUS | LOOPAPPT+6 |
| UNI | LOOPAPPT+6 |
| UNK | LOOPAPPT+6 |
| VET | LOOPAPPT+6 |
| Name | Field # of Occurrence |
|---|---|
| ^( | EXP+3 |
| ^(0 | LOOPAPPT+5, LOOPAPPT+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DFN | LOOPAPPT+5*, LOOPAPPT+6, DONE+1, STATUS+1, INDEX+1, INDEX+2, INDEX+3, UNK+2, EXP+3, UNI+2 , CKINS+1 |
| E | EXP+2~, EXP+3* |
| >> IBOBEG | LOOPAPPT+4 |
| IBOCLN | LOOPAPPT+1~, LOOPAPPT+3~*, INDEX+2 |
| IBOCLNC | LOOPCLNC+1~*, LOOPCLNC+3*, LOOPCLNC+4*, LOOPAPPT+1, LOOPAPPT+2, LOOPAPPT+3, LOOPAPPT+4 |
| IBOCTG | LOOPCLNC+1~, INDEX+2, UNK+2*, EXP+3*, UNI+2* |
| IBODIV | LOOPAPPT+1~, LOOPAPPT+2*, INDEX+2 |
| >> IBOEND | LOOPCLNC+2, LOOPAPPT+4 |
| IBOEND2 | LOOPCLNC+1~, LOOPCLNC+2*, EXP+3 |
| >> IBOEXP | LOOPAPPT+6 |
| IBOINS | LOOPCLNC+1~, UNK+2, EXP+2, UNI+2, CKINS+1* |
| IBONAME | LOOPCLNC+1~, INDEX+1*, INDEX+2 |
| >> IBOQUIT | LOOPAPPT+6*, VET+1*, DONE+1*, STATUS+1* |
| IBORPTD | LOOPCLNC+1~, LOOPAPPT+6*, UNK+2*, EXP+2*, EXP+3*, UNI+2* |
| IBOTIME | LOOPCLNC+1~, LOOPAPPT+4*, LOOPAPPT+6, STATUS+1, INDEX+2 |
| >> IBOUI | LOOPAPPT+6 |
| >> IBOUK | LOOPAPPT+6 |
| J | LOOPAPPT+1~, LOOPAPPT+4* |
| R | LOOPAPPT+1~, LOOPAPPT+5*, LOOPAPPT+6 |
| T | UNK+2~*, EXP+2~, EXP+3*, UNI+2~* |
| >> VAEL(4 | VET+1 |
| >> VAERR | VET+1 |
| >> VAUTC | LOOPCLNC+3, LOOPCLNC+4 |
| >> VAUTC( | LOOPCLNC+4 |
| >> X | LOOPCLNC+2 |
| >> X1 | LOOPCLNC+2* |
| >> X2 | LOOPCLNC+2* |