©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
IBDFN6 ;ALB/CJM - ENCOUNTER FORM - INTERFACE ROUTINES ;NOV 16,1992
Source file <IBDFN6.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 1 | ($$INSURED,ALL,INSURED)^IBCNS1 |
| Registration | 1 | ADD^VADPT |
| VA Fileman | 1 | DD^%DT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INSURED | ;is the patient insured?
|
|
| INSURANC | ;returns all sorts of insurance information
|
|
| ADDRESS | ;returns address, telephone
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(36 - [#36] | INSURANC+13 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> ACT | INSURANC+9 |
| ARY | ADDRESS+2~, ADDRESS+3*, ADDRESS+5*, ADDRESS+6, ADDRESS+7, ADDRESS+8, ADDRESS+9, ADDRESS+13, ADDRESS+15, INSURANC+5~ , INSURANC+7*, INSURANC+8, INSURANC+9, INSURANC+11, INSURANC+12, INSURANC+23 |
| CNT | ADDRESS+2~*, ADDRESS+6*, ADDRESS+7*, ADDRESS+8*, ADDRESS+9, ADDRESS+12* |
| DATE | INSURANC+5~ |
| >> DFN | INSURANC+4, INSURANC+9, INSURED+2, INSURED+6 |
| ENTRY | INSURANC+5~, INSURANC+11*, INSURANC+13*, INSURANC+14*, INSURANC+15*, INSURANC+16*, INSURANC+17*, INSURANC+18*, INSURANC+20*, INSURANC+21 |
| >> IBARY | INSURANC+21, INSURED+7 |
| INS | INSURED+3~*, INSURED+6*, INSURED+7 |
| ITEM | INSURANC+5~, INSURANC+11*, INSURANC+21, INSURANC+22* |
| LINE | ADDRESS+2~, ADDRESS+12*, ADDRESS+13 |
| NODE | INSURANC+5~, INSURANC+12*, INSURANC+13, INSURANC+14, INSURANC+15, INSURANC+16, INSURANC+17, INSURANC+18, INSURANC+19 |
| SUB | INSURANC+5~, INSURANC+11*, INSURANC+12 |
| VA | ADDRESS+16! |
| VAEL | ADDRESS+16! |
| VAERR | ADDRESS+5, ADDRESS+16! |
| VAPA | ADDRESS+16! |
| VAPA( | ADDRESS+12 |
| VAPA(1 | ADDRESS+6 |
| VAPA(11 | ADDRESS+9, ADDRESS+13 |
| VAPA(2 | ADDRESS+7 |
| VAPA(3 | ADDRESS+8 |
| VAPA(4 | ADDRESS+9, ADDRESS+13 |
| VAPA(5 | ADDRESS+9, ADDRESS+13 |
| VAPA(8 | ADDRESS+15 |
| WHO | INSURANC+5~, INSURANC+19*, INSURANC+20 |
| >> Y | INSURANC+14* |
| Name | Field # of Occurrence |
|---|---|
| $T(ALL^IBCNS1 | INSURANC+6 |
| $T(INSURED^IBCNS1 | INSURED+5 |