IBCEFG1 ;ALB/TMP - OUTPUT FORMATTER DATA DEFINITION UTILITIES ;18-JAN-96
Source file <IBCEFG1.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 |
---|---|---|
EDIBILL(IBXFORM,IBXDA,IBINS,IBTYP) | ; Find element associated with form fld
; IBXFORM = (REQUIRED) actual form being extracted (in file 353) ; IBXDA = (REQUIRED) form definition file (364.6) entry to use to find ; extract data element definition entry (in file 364.7) ; IBINS = (REQUIRED) insurance co. ien for the current insurance on bill ; IBTYP = (REQUIRED) bill type (I/O) |
|
EDIQ | ||
DT(DATE1,DATE2,FORMAT) | ; Return date in DATE1 (and optionally DATE2)
; (input in Fileman format) converted to X12 format ; FORMAT (required) ; DATE1,DATE2 in FILEMAN date format |
|
DTQ | ||
NAME(IBNM1,COMB) | ; Parse person's nm into 5 pieces LAST^FIRST^MIDDLE^CRED^SUFFIX
; IBNM1 = NAME in LAST,FIRST MIDDLE^vp file ien (200 or 355.93)^bill ien^prv type ; OR FIRST MIDDLE LAST^vp file ien (200 or 355.93)^bill ien^prv type ; COMB = if set to 1, then combine the first and middle name ; if set to 2, combine the last and middle names |
|
NAMEQ | ||
DOLLAR(AMT) | ; Format amount in AMT so it is numeric including cents, without
; the decimal and commas. |
|
STATE(CODE) | ;Return state code from state pointer
|
|
SEX(CODE) | ;Return the X12 code for sex
; CODE = DHCP code for sex |
|
EMPLST(CODE) | ;Return the X12 code for employment status
; CODE = DHCP code for employment status |
|
MARITAL(CODE) | ;Return the X12 code for marital status
; CODE = ien of code for marital status |
|
TOS(CODE) | ;Return the X12 code for type of service
; CODE = DHCP code for type of service |
|
FIXLEN(DATA,LEN) | ; Create a fixed length field from data DATA length LEN
|
|
RCDT(IBXSAVE,IBXDATA,IBDT) | ; Format date for multiple revenue code transmission)
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGCR(399 - [#399] | NAME+7 |
^DIC(11 - [#11] | MARITAL+3 |
^DIC(5 - [#5] | STATE+1 |
^IBA(355.93 - [#355.93] | NAME+15 |
^IBA(364.6 - [#364.6] | EDIBILL+38 |
^IBA(364.7 - [#364.7] | EDIBILL+18, EDIBILL+19, EDIBILL+20, EDIBILL+22, EDIBILL+23, EDIBILL+24, EDIBILL+26, EDIBILL+27, EDIBILL+28, EDIBILL+31 , EDIBILL+32, EDIBILL+34, EDIBILL+35, EDIBILL+38, EDIBILL+39 |
^IBE(353 - [#353] | EDIBILL+14, EDIBILL+15 |
Name | Field # of Occurrence |
---|---|
^("" | EDIBILL+35, EDIBILL+38 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AMT | DOLLAR~, DOLLAR+3*, DOLLAR+4 |
CENT | DOLLAR+2~, DOLLAR+3* |
CODE | STATE~, STATE+1, SEX~, SEX+2, EMPLST~, EMPLST+4, MARITAL~, MARITAL+3, TOS~, TOS+3 |
COMB | NAME~, NAME+17, NAME+18 |
DATA | FIXLEN~, FIXLEN+1 |
DATE | DT+4~*, DT+7*, DT+8*, DT+10*, DT+12*, DTQ |
DATE1 | DT~, DT+5*, DT+7, DT+8, DT+10, DT+12 |
DATE2 | DT~, DT+10, DT+12 |
DOLR | DOLLAR+2~, DOLLAR+3* |
EDIQ | EDIBILL+11~, EDIBILL+13*, EDIBILL+18, EDIBILL+20*, EDIBILL+22, EDIBILL+24*, EDIBILL+26, EDIBILL+28* |
FORMAT | DT~, DT+6, DT+7, DT+9, DT+11 |
IB1 | EDIBILL+11~, EDIBILL+16* |
IBCRED | NAME+5~, NAME+8*, NAME+12, NAME+14, NAME+16, NAME+17, NAME+18 |
IBDT | RCDT~, RCDT+6 |
IBIEN | NAME+5~, NAME+6*, NAME+8 |
IBINS | EDIBILL~, EDIBILL+18, EDIBILL+19, EDIBILL+20, EDIBILL+22, EDIBILL+23, EDIBILL+24 |
IBNM | NAME+5~, NAME+12*, NAME+14*, NAME+16*, NAME+17*, NAME+18*, NAMEQ |
IBNM1 | NAME~, NAME+6, NAME+7, NAME+8, NAME+15, NAME+16 |
IBNMATCH | EDIBILL+11~, EDIBILL+19*, EDIBILL+20*, EDIBILL+23*, EDIBILL+24*, EDIBILL+27*, EDIBILL+28*, EDIBILL+36*, EDIQ |
IBNMC | NAME+5~, NAME+6*, NAME+9*, NAME+10, NAME+11*, NAME+13 |
IBNMC("FAMILY" | NAME+12, NAME+14 |
IBNMC("GIVEN" | NAME+12, NAME+14 |
IBNMC("MIDDLE" | NAME+12, NAME+14, NAME+17, NAME+18 |
IBNMC("SUFFIX" | NAME+12, NAME+14 |
IBPARFM | EDIBILL+11~, EDIBILL+14*, EDIBILL+16, EDIBILL+30 |
IBPIEN | NAME+5~, NAME+7*, NAME+8 |
IBSCREEN | EDIBILL+11~, EDIBILL+15*, EDIBILL+30, EDIQ |
IBTYP | EDIBILL~, EDIBILL+18, EDIBILL+19, EDIBILL+20, EDIBILL+26, EDIBILL+27, EDIBILL+28 |
IBX | EDIBILL+11~, EDIBILL+20*, EDIBILL+24*, EDIBILL+28*, EDIBILL+31*, EDIBILL+32, EDIBILL+34*, EDIBILL+35*, EDIBILL+36, EDIBILL+38* , EDIBILL+39*, EDIQ*, EDIQ+1 |
IBXDA | EDIBILL~, EDIBILL+12, EDIBILL+18, EDIBILL+19, EDIBILL+20, EDIBILL+22, EDIBILL+23, EDIBILL+24, EDIBILL+26, EDIBILL+27 , EDIBILL+28, EDIBILL+31, EDIBILL+32, EDIBILL+34, EDIBILL+35, EDIBILL+38, EDIBILL+39 |
IBXDATA | RCDT~ |
IBXDATA( | RCDT+6* |
IBXFORM | EDIBILL~, EDIBILL+12, EDIBILL+14, EDIBILL+15, EDIBILL+16, EDIBILL+30, EDIBILL+38 |
IBXSAVE | RCDT~ |
IBXSAVE("INPT" | RCDT+6 |
LEN | FIXLEN~, FIXLEN+1 |
PC | NAME+5~ |
Q | RCDT+5~, RCDT+6* |
U | EDIBILL+14, EDIBILL+15, EDIBILL+34, NAME+6, NAME+7, NAME+8, NAME+12, NAME+14, NAME+15, NAME+16 , NAME+17, NAME+18, STATE+1, EMPLST+4, MARITAL+3, MARITAL+4, TOS+3, RCDT+6 |
W | RCDT+5~, RCDT+6* |
X12 | EMPLST+2~, EMPLST+3*, EMPLST+4*, EMPLST+5*, EMPLST+6, MARITAL+2~, MARITAL+3*, MARITAL+4*, MARITAL+5, TOS+2~ , TOS+3*, TOS+4 |
Z | EDIBILL+33~, EDIBILL+34* |