IBCNEBF ;DAOU/ALA - Create an Entry in the Buffer File ;20-JUN-2002
Source file <IBCNEBF.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 |
|---|---|---|
| PT(DFN,IRIEN,SYMBOL,OVRRIDE,ADD,IBERROR) | ; Get data
; from a specific patient and insurance record entry |
|
| RP(IEN,ADD,BUFF) | ; Get data from a specific response record
|
|
| FIL | ; File Buffer Data
|
|
| ADDSTF(IBSOURCE,DFN,IBDATA) | ; add new entry to Insurance Buffer file (355.33) and stuff the data passed in, no user interaction
; IBSOURCE = source of information (required) ; 1 = interview 2 = data match ; 3 = ivm 4 = pre-registration ; 5 = eIV etc., refer to file #365.12 for full list of sources ; DFN = patient's ifn in file 2 (required) ; IBDATA = data to file in Buffer in an array subscripted by field number of the data field in 355.33 ; ex: IBDATA(20.01)="Insurance Company Name", etc, ; returns ien of new entry or 0 followed by error if entry not added |
|
| EXIT |
| FileNo | Call Tags |
|---|---|
| 2.312 | GET1^DIQ |
| ^VA(200 - [#200] | FIND1^DIC |
| ^DIC(36 - [#36] | GET1^DIQ |
| ^IBCN(365 - [#365] | GET1^DIQ |
| ^IBCN(365.1 - [#365.1] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(36 - [#36] | PT+23, RP+20 |
| ^DPT - [#2] | PT+20, PT+21, PT+25, PT+29, PT+41, RP+18, ADDSTF+16 |
| ^IBA(355.33 - [#355.33] | ADDSTF+37 |
| ^IBCN(365 - [#365] | RP+13, RP+14, RP+21, RP+22 |
| ^IBCN(365.1 - [#365.1] | RP+16 |
| ^IBE(365.12 - [#365.12] | RP+15 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | RP+14 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | RP+45! |
| ADD | PT~, PT+45!, RP~, RP+45!, FIL+9, FIL+48, FIL+58, FIL+84 |
| BFD | PT+17~, PT+42* |
| BFN | PT+17~, PT+42* |
| BPHONE | PT+16~, PT+23*, RP+9~, RP+40*, RP+44!, FIL+22 |
| BUFF | RP~, RP+7*, FIL+48, FIL+84 |
| BUFLOCK | ADDSTF+12~, ADDSTF+23*, ADDSTF+34 |
| COB | PT+16~, PT+26*, RP+9~, RP+28*, RP+44!, FIL+29 |
| D0 | RP+45! |
| DFN | PT~, PT+12, PT+20, PT+21, PT+25, PT+29, PT+34, PT+41, RP+9~, RP+13* , RP+18, RP+43!, FIL+15, FIL+61, FIL+71, ADDSTF~, ADDSTF+16, ADDSTF+25 |
| DG | RP+45! |
| DIC | RP+45! |
| DISYS | RP+45! |
| DIW | RP+45! |
| DUZ | ADDSTF+29 |
| EFFDT | PT+16~, PT+28*, RP+9~, RP+35*, RP+44!, FIL+23 |
| >> ERACT | FIL+13 |
| ESGHPARR | PT+17~, FIL+45 |
| ESGHPARR( | PT+42* |
| EXPDT | PT+16~, PT+28*, RP+9~, RP+36*, RP+44!, FIL+24 |
| GNAME | PT+15~, PT+36*, RP+9~, RP+31*, RP+43!, FIL+17 |
| GNUMB | PT+15~, PT+35*, RP+9~, RP+32*, RP+43!, FIL+16 |
| IBBUFDA | ADDSTF+12~, ADDSTF+20*, ADDSTF+23, ADDSTF+31, ADDSTF+34, ADDSTF+37, EXIT |
| IBDATA | ADDSTF~, ADDSTF+17, ADDSTF+31 |
| IBDATA( | ADDSTF+25* |
| IBEISTC | RP+45!, FIL+41, FIL+42! |
| >> IBELIGDT | FIL+12 |
| IBERR | FIL+76! |
| IBERROR | PT~, FIL+51*, FIL+63*, FIL+67, FIL+69, ADDSTF+12~, ADDSTF+15*, ADDSTF+16*, ADDSTF+17*, ADDSTF+20* , EXIT |
| >> IBFDA | FIL+61*, FIL+63, FIL+64* |
| IBSOURCE | RP+9~, RP+16*, FIL+59*, FIL+61, ADDSTF~, ADDSTF+15, ADDSTF+20 |
| IDATA0 | PT+15~, PT+20*, PT+22, PT+26, PT+28 |
| IDATA3 | PT+15~, PT+20*, PT+27, PT+30, PT+31, PT+32 |
| IDATA7 | PT+15~, PT+21*, PT+24 |
| IDOB | PT+16~, PT+27*, RP+9~, RP+25*, RP+44!, FIL+27 |
| >> IDUZ | FIL+7*, FIL+9 |
| IEN | PT+15~, RP~, RP+13, RP+14, RP+21, RP+22, RP+34, RP+43! |
| IENS | PT+34*, PT+35, PT+36, RP+45! |
| IIEN | PT+15~, PT+22*, PT+23, RP+9~, RP+18*, RP+19, RP+20, RP+43! |
| INAME | PT+15~, PT+22*, RP+9~, RP+17*, RP+20*, RP+24*, RP+43!, FIL+14 |
| INSDATA | PT+17~, PT+41*, PT+42 |
| INSPCE | PT+17~, PT+42* |
| IRIEN | PT~, PT+12, PT+20, PT+21, PT+25, PT+29, PT+34, PT+41, RP+9~, RP+16* , RP+17, RP+18, RP+43!, FIL+72 |
| ISEX | PT+16~, PT+27*, RP+9~, RP+27*, RP+44!, FIL+30 |
| ISSN | PT+16~, PT+27*, RP+9~, RP+26*, RP+44!, FIL+28 |
| MSG | PT+17~, FIL+76! |
| MSG(1 | FIL+68* |
| MSG(2 | FIL+69* |
| MSG(3 | FIL+70* |
| MSG(4 | FIL+71* |
| MSG(5 | FIL+72* |
| MSG(6 | FIL+73* |
| MSGP | PT+17~, FIL+2*, FIL+75, FIL+76! |
| NAME | PT+16~, PT+24*, RP+9~, RP+23*, RP+44!, FIL+18 |
| OVRRIDE | PT~, FIL+11 |
| PATID | PT+15~, PT+25*, RP+10~, RP+30*, RP+43!, FIL+20 |
| PCE | PT+17~, PT+41*, PT+42* |
| PIEN | RP+10~, RP+14*, RP+15 |
| PNAME | PT+15~, RP+10~, RP+15*, RP+24, RP+43! |
| PPHONE | PT+15~, PT+23*, RP+10~, RP+40*, RP+43!, FIL+21 |
| RDATA | PT+16~, RP+10~, RP+21*, RP+25, RP+26, RP+27, RP+28, RP+30, RP+33, RP+35 , RP+36, RP+44! |
| RDATA13 | RP+10~, RP+22*, RP+23, RP+29 |
| RDATA14 | RP+10~, RP+22*, RP+31, RP+32 |
| RDATA5 | RP+10~, RP+21*, RP+37, RP+38, RP+39 |
| REL | PT+16~, PT+29*, RP+10~, RP+34*, RP+44!, FIL+26 |
| RSTYPE | RP+10~, RP+14*, RP+24 |
| SUBADDR1 | PT+18~, PT+30*, RP+11~, RP+37*, FIL+31 |
| SUBADDR2 | PT+18~, PT+30*, RP+11~, RP+37*, FIL+32 |
| SUBCITY | PT+18~, PT+31*, RP+11~, RP+37*, FIL+33 |
| SUBCNDIV | PT+18~, PT+32*, RP+11~, RP+39*, FIL+37 |
| SUBCNTRY | PT+18~, PT+32*, RP+11~, RP+38*, FIL+36 |
| SUBID | PT+15~, PT+24*, RP+10~, RP+29*, RP+43!, FIL+19 |
| SUBSTATE | PT+18~, PT+31*, RP+11~, RP+38*, FIL+34 |
| SUBZIP | PT+18~, PT+31*, RP+11~, RP+38*, FIL+35 |
| SYMBOL | PT~, FIL+10 |
| TQIEN | PT+16~, RP+10~, RP+13*, RP+16, RP+44! |
| U | PT+22, PT+23, PT+24, PT+25, PT+26, PT+27, PT+28, PT+29, PT+30, PT+31 , PT+32, PT+42, RP+13, RP+14, RP+15, RP+16, RP+18, RP+20, RP+23, RP+25 , RP+26, RP+27, RP+28, RP+29, RP+30, RP+31, RP+32, RP+33, RP+35, RP+36 , RP+37, RP+38, RP+39, FIL+63, FIL+64 |
| VBUF | PT+15~, RP+43!, FIL+45*, FIL+61, FIL+84 |
| VBUF( | FIL+9*, FIL+10*, FIL+11*, FIL+12*, FIL+14*, FIL+15*, FIL+16*, FIL+17*, FIL+18*, FIL+19* , FIL+20*, FIL+21*, FIL+22*, FIL+23*, FIL+24*, FIL+25*, FIL+26*, FIL+27*, FIL+28*, FIL+29* , FIL+30*, FIL+31*, FIL+32*, FIL+33*, FIL+34*, FIL+35*, FIL+36*, FIL+37*, FIL+41*, FIL+48! |
| WHO | PT+16~, PT+26*, RP+10~, RP+33*, RP+44!, FIL+25 |
| X | ADDSTF+12~ |
| XMSUB | PT+17~, FIL+74*, FIL+75, FIL+76! |
| Y | ADDSTF+12~ |
