IBCEF75 ;ALB/WCJ - Provider ID functions ;13 Feb 2006
Source file <IBCEF75.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 |
Package | Total | Caller Graph |
---|---|---|
Integrated Billing | 4 | IBCEF76 IBCEF77 IBCEFP ^IBA(364.7 |
E Claims Management Engine | 1 | BPSSCRRJ |
Outpatient Pharmacy | 1 | PSOREJU2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
AWAY | ||
ALLIDS(IBIFN,IBXSAVE,IBSTRIP,SEG) | ; Return all of the Provider IDS
|
|
BPIDS(IBIFN,IDS,SORT1,SORT2,COB,IBSTRIP,SEG) | ; Get all the billing provider IDs and qualifiers from the claim and file 355.92
|
|
OLDWAY(IBIFN,COB) | ; Figure out the qualifier the old way if it's not stored with the claim.
; It's based on the plan type. This is used for Billing Provider Secondary ID #2 |
|
BPSID1(DIV) | ; Return the Billing Provider Secondary ID #1 and qualifier which Emdeon uses to sort IBIFNs
|
|
TAXID() | ; Return the Billing Provider Primary ID and qualifier which is the TAXID for the site and also the qualifier
|
|
CLEANUP(IBXSAVE) | ; Clean up
|
Name | Field # of Occurrence |
---|---|
$$COBN^IBCEF | ALLIDS+24, BPIDS+10 |
$$FT^IBCEF | ALLIDS+21, BPIDS+5 |
$$INPAT^IBCEF | BPIDS+7 |
$$NOPUNCT^IBCEF | TAXID+3 |
$$ISRX^IBCEF1 | BPIDS+6 |
$$POLTYP^IBCEF3 | BPIDS+27, OLDWAY+3 |
ALLPROV^IBCEF7 | ALLIDS+6 |
$$PROVID^IBCEF73 | ALLIDS+7 |
$$GETNPI^IBCEF73A | ALLIDS+14 |
$$STRIP^IBCEF76 | ALLIDS+15, ALLIDS+17, BPIDS+17, BPIDS+21, BPIDS+35, BPIDS+37, BPIDS+38, BPIDS+62, BPIDS+67 |
LFIDS^IBCEF76 | ALLIDS+19 |
$$MAIN^IBCEP2B | BPIDS+9 |
$$SOP^IBCEP2B | OLDWAY+4 |
$$PRIM^VASITE | BPSID1+2 |
$$SITE^VASITE | BPSID1+2 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGCR(399 - [#399] | BPIDS+3, BPIDS+11, BPIDS+25 |
^DIC(36 - [#36] | BPIDS+28 |
^IBA(355.92 - [#355.92] | BPIDS+51, BPIDS+52 |
^IBE(350.9 - [#350.9] | TAXID+2 |
^IBE(355.97 - [#355.97] | BPIDS+35, BPIDS+63 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARF | BPIDS+1~ |
ARID | ALLIDS+3~ |
ARIEN | ALLIDS+3~, ALLIDS+23*, ALLIDS+28 |
ARINFO | ALLIDS+3~, ALLIDS+28* |
ARINS | ALLIDS+3~ |
ARQ | ALLIDS+3~ |
CNT | BPIDS+1~, BPIDS+49*, BPIDS+51, BPIDS+67, BPIDS+68* |
COB | ALLIDS+3~, ALLIDS+25*, ALLIDS+26, ALLIDS+27, ALLIDS+30, BPIDS~, BPIDS+11, BPIDS+14, BPIDS+27, BPIDS+32 , BPIDS+34, BPIDS+37, BPIDS+38, OLDWAY~, OLDWAY+3 |
DAT | ALLIDS+3~, ALLIDS+7*, BPIDS+1~, BPIDS+3*, BPIDS+8, BPIDS+34*, BPIDS+35, BPIDS+52*, BPIDS+53, BPIDS+54 , BPIDS+55, BPIDS+56, BPIDS+57, BPIDS+62, BPIDS+67 |
DAT("QUAL" | ALLIDS+8* |
DATA | BPSID1+1~, BPSID1+2*, BPSID1+3*, BPSID1+4, TAXID+1~, TAXID+2*, TAXID+3*, TAXID+4 |
DEF | BPIDS+1~ |
DIV | BPSID1~, BPSID1+2 |
DT | BPSID1+2 |
I | ALLIDS+3~, ALLIDS+16*, ALLIDS+17, BPIDS+1~ |
IB2 | BPIDS+1~, BPIDS+38*, BPIDS+43, BPIDS+44, BPIDS+46 |
IBCARE | BPIDS+1~, BPIDS+6*, BPIDS+7* |
IBCCOB | ALLIDS+3~, ALLIDS+24*, ALLIDS+26, ALLIDS+27, BPIDS+1~, BPIDS+10* |
IBDIV | BPIDS+1~, BPIDS+8*, BPIDS+21 |
IBFRMTYP | ALLIDS+3~, ALLIDS+21*, ALLIDS+23, BPIDS+1~, BPIDS+5*, BPIDS+56, BPIDS+57, BPIDS+59 |
IBIFN | ALLIDS~, ALLIDS+5, ALLIDS+7, ALLIDS+9, ALLIDS+10, ALLIDS+11, ALLIDS+14, ALLIDS+15, ALLIDS+16, ALLIDS+17 , ALLIDS+19, ALLIDS+21, ALLIDS+24, ALLIDS+28, ALLIDS+30, BPIDS~, BPIDS+3, BPIDS+5, BPIDS+6, BPIDS+7 , BPIDS+10, BPIDS+11, BPIDS+14, BPIDS+17, BPIDS+18, BPIDS+21, BPIDS+22, BPIDS+25, BPIDS+27, BPIDS+37 , BPIDS+44, BPIDS+49, BPIDS+67, OLDWAY~, OLDWAY+3, OLDWAY+4 |
IBINS | BPIDS+1~, BPIDS+11*, BPIDS+12, BPIDS+28, BPIDS+51 |
IBLIMIT | BPIDS+1~, BPIDS+50*, BPIDS+51 |
IBNPI | ALLIDS+13~, ALLIDS+14*, ALLIDS+15 |
IBPRVPTR | ALLIDS+13~, ALLIDS+14* |
IBSTRIP | ALLIDS~, ALLIDS+1*, ALLIDS+15, ALLIDS+17, ALLIDS+19, ALLIDS+30, BPIDS~, BPIDS+17, BPIDS+21, BPIDS+35 , BPIDS+37, BPIDS+38, BPIDS+62, BPIDS+67 |
IBXIEN | ALLIDS+3~, ALLIDS+5* |
IBXSAVE | ALLIDS~, ALLIDS+19, ALLIDS+30, CLEANUP~ |
IBXSAVE("BILL | ING PRV" , CLEANUP+3! |
IBXSAVE("ID" | ALLIDS+8, CLEANUP+4! |
IBXSAVE("LAB/FAC" | CLEANUP+2! |
IBXSAVE("PROVINF" | ALLIDS+9, ALLIDS+10, ALLIDS+11, ALLIDS+14, ALLIDS+15*, ALLIDS+16, ALLIDS+17*, ALLIDS+28, CLEANUP+1! |
ID | BPIDS+1~ |
IDDIV | BPIDS+1~ |
IDS | BPIDS~ |
IDS("BILLING | PRV" , BPIDS+14*, BPIDS+17*, BPIDS+18, BPIDS+21*, BPIDS+22, BPIDS+44*, BPIDS+49, BPIDS+67* |
IEN | BPIDS+1~, BPIDS+51*, BPIDS+52 |
M1 | BPIDS+1~, BPIDS+25*, BPIDS+32, BPIDS+34, BPIDS+38 |
MAIN | BPIDS+1~, BPIDS+9* |
PLANTYPE | BPIDS+1~, BPIDS+27*, BPIDS+28, OLDWAY+2~, OLDWAY+3*, OLDWAY+4 |
QUAL | BPIDS+1~, BPIDS+33*, BPIDS+35*, BPIDS+37*, BPIDS+38, BPIDS+62*, BPIDS+63*, BPIDS+64, BPIDS+65, BPIDS+67 , BPIDS+68 |
SEG | ALLIDS~, ALLIDS+2*, ALLIDS+19, ALLIDS+30, BPIDS~ |
SORT1 | ALLIDS+3~, ALLIDS+9*, ALLIDS+10, ALLIDS+11, ALLIDS+14, ALLIDS+15, ALLIDS+16, ALLIDS+17, ALLIDS+26*, ALLIDS+27 , ALLIDS+28, ALLIDS+30, BPIDS~, BPIDS+14, BPIDS+17, BPIDS+18, BPIDS+21, BPIDS+22, BPIDS+44, BPIDS+49 , BPIDS+67 |
SORT2 | ALLIDS+3~, ALLIDS+10*, ALLIDS+11, ALLIDS+14, ALLIDS+15, ALLIDS+16, ALLIDS+17, ALLIDS+27*, ALLIDS+28, ALLIDS+30 , BPIDS~, BPIDS+14, BPIDS+17, BPIDS+18, BPIDS+21, BPIDS+22, BPIDS+44, BPIDS+49, BPIDS+67 |
SORT3 | ALLIDS+3~, ALLIDS+11*, ALLIDS+14, ALLIDS+15, ALLIDS+16, ALLIDS+17 |
U | ALLIDS+15, ALLIDS+17, BPIDS+8, BPIDS+11, BPIDS+17, BPIDS+18, BPIDS+21, BPIDS+22, BPIDS+32, BPIDS+34 , BPIDS+35, BPIDS+38, BPIDS+43, BPIDS+46, BPIDS+53, BPIDS+54, BPIDS+55, BPIDS+56, BPIDS+57, BPIDS+62 , BPIDS+63, BPIDS+67, BPSID1+2, BPSID1+4, TAXID+2, TAXID+4 |
USED | BPIDS+1~ |
USED( | BPIDS+18*, BPIDS+22*, BPIDS+46*, BPIDS+65, BPIDS+68* |
Z0 | ALLIDS+3~ |