IBCEFP ;ALB/TAZ - Provider ID functions ;28-OCT-10
Source file <IBCEFP.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 17 | ($$COB,$$COBN,$$FT,$$INPAT)^IBCEF $$ISRX^IBCEF1 OUTPT^IBCEF11 HOS^IBCEF22 ($$ISINSUR,PRACT)^IBCEF71 $$CH35591^IBCEF72 $$CHCKSEC^IBCEF73 $$ORGNPI^IBCEF73A BPIDS^IBCEF75 ($$STRIP,LFIDS)^IBCEF76 SORT^IBCEF77 $$B^IBCEF79 EN^IBCEF81 ($$COBID,$$NAME,$$NPI,$$TAXON)^IBCEFP1 $$SUB1OK^IBCEP8A $$MCR24K^IBCEU3 $$MCRONBIL^IBEFUNC |
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 | 8 | IBCBB11 IBCEF11 IBCEF74 IBCEF76 IBCEF79 IBCEF83 IBCEU ^IBA(364.7 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ALLIDS(IBIFN,IBXSAVE,IBSTRIP,SEG) | ; Return all of the Provider IDS
|
|
ALLIDSQ | ;
|
|
PSID(IBIFN,IBXPROV,IBXIDS) | ; Build array of either the Fac/Lab ID or Rendering Provider IDs
|
|
PSIDQ | ;
|
|
SLPRV(IBXIEN,IBX,PRTYPE) | ;Build SLPRV nodes for the line provider type record
|
|
SLPRVQ | ;
|
|
PROVIDER(IB399,IBPROV,IBRES,IBFRMTYP,IBCARE,IBCURR,IBXDATA) | ;
|
|
PROVINF(IB399,IBPRNUM,IBRES,IBSORT,IBINSTP,IBFRMTYP,IBCARE,IBLIMIT,IBCURR,IBXDATA) | ;
|
|
PROVINFQ | ;Exit PROVINF
|
|
GETPRV(IBINSCO,IBFRMTYP,IBCARE,IBPROV,IBRES,IBPRTYP,IBINSTP,IBD) | ;
|
|
GETPRVQ | ;
|
|
PROVPTR(IBIEN399,IBFUNC,IBCP) | ; Retrieve Provider Pointer from appropriate file
|
|
AMB(IBXIEN,IBXSAVE) | ; Gather Ambulance Data for AMB Record(s) - IB*2.0*447/TAZ
|
|
SNDS2(IBXDATA,PIECE) | ;Determine if a SUB2 record is necessary.
; Input: IBXDATA ; May contain data from field 232 of file 399. ; Output: IBXDATA ; Returns Output for piece 2 or 3 or 1 for any other piece (like 1.5) |
Name | Field # of Occurrence |
---|---|
$$COB^IBCEF | ALLIDS+8 |
$$COBN^IBCEF | ALLIDS+34 |
$$FT^IBCEF | ALLIDS+5, ALLIDS+32 |
$$INPAT^IBCEF | ALLIDS+7 |
$$ISRX^IBCEF1 | ALLIDS+6 |
OUTPT^IBCEF11 | ALLIDS+13 |
HOS^IBCEF22 | ALLIDS+14 |
$$ISINSUR^IBCEF71 | PROVIDER+6, PROVIDER+10, PROVIDER+11, PROVIDER+13, PROVIDER+14, PROVIDER+16, PROVIDER+17 |
PRACT^IBCEF71 | GETPRV+3 |
$$CH35591^IBCEF72 | PROVINF+7 |
$$CHCKSEC^IBCEF73 | GETPRV+9, GETPRV+11 |
$$ORGNPI^IBCEF73A | ALLIDS+28 |
BPIDS^IBCEF75 | ALLIDS+40 |
$$STRIP^IBCEF76 | GETPRV+15, GETPRV+16 |
LFIDS^IBCEF76 | ALLIDS+27 |
SORT^IBCEF77 | GETPRV+14 |
$$B^IBCEF79 | SNDS2+16 |
EN^IBCEF81 | ALLIDS+42 |
$$COBID^IBCEFP1 | GETPRV+20 |
$$NAME^IBCEFP1 | GETPRV+17 |
$$NPI^IBCEFP1 | GETPRV+13 |
$$TAXON^IBCEFP1 | GETPRV+19 |
$$SUB1OK^IBCEP8A | ALLIDS+51 |
$$MCR24K^IBCEU3 | GETPRV+7 |
$$MCRONBIL^IBEFUNC | GETPRV+5 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGCR(399 - [#399] | PROVINF+6, PROVINF+9, PROVINF+13, PROVINF+22, PROVINF+26, PROVPTR+4, PROVPTR+6, PROVPTR+8, PROVPTR+10, AMB+3 , AMB+5 |
^IBA(355.93 - [#355.93] | GETPRV+18 |
^IBE(353.5 - [#353.5] | AMB+6 |
^IBE(355.97 - [#355.97] | GETPRV+9, GETPRV+10 |
Name | Line Occurrences |
---|---|
$$PROVPTR | PROVINF+11, PROVINF+24 |
ALLIDSQ | ALLIDS+45, ALLIDS+51, ALLIDS+61, ALLIDS+62, ALLIDS+63, ALLIDS+64, ALLIDS+65, ALLIDS+67, ALLIDS+68 |
GETPRV | PROVINF+14, PROVINF+27 |
GETPRVQ | GETPRV+1 |
PROVIDER | ALLIDS+23 |
PROVINF | ALLIDS+19, PROVIDER+6, PROVIDER+10, PROVIDER+11, PROVIDER+13, PROVIDER+14, PROVIDER+16, PROVIDER+17 |
PROVINFQ | PROVINF+1, PROVINF+2 |
PSID | ALLIDS+54 |
PSIDQ | PSID+18, PSID+24 |
SLPRV | ALLIDS+61, ALLIDS+62, ALLIDS+63, ALLIDS+64, ALLIDS+65, ALLIDS+67, ALLIDS+68 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARID | ALLIDS+3~ |
ARIEN | ALLIDS+3~, ALLIDS+33*, ALLIDS+38 |
ARINFO | ALLIDS+3~, ALLIDS+38* |
ARINS | ALLIDS+3~ |
ARQ | ALLIDS+3~ |
CNT | AMB+1~, AMB+4*, AMB+7* |
COB | ALLIDS+3~, ALLIDS+35*, ALLIDS+36, ALLIDS+37, ALLIDS+40 |
CODE | AMB+1~, AMB+4*, AMB+5*, AMB+6 |
CPLNK | PROVINF+17~, PROVINF+20*, PROVINF+22, PROVINF+24, PROVINF+26 |
CRED | ALLIDS+46~, ALLIDS+48*, ALLIDS+49 |
CUROTH | ALLIDS+3~, ALLIDS+11~, ALLIDS+23*, ALLIDS+29*, ALLIDS+30 |
DAT | ALLIDS+3~ |
DATA | SLPRV+1~, SLPRV+8*, SLPRV+9 |
I | ALLIDS+3~ |
IB35591 | PROVINF+4~, PROVINF+7*, GETPRV+11, GETPRV+12 |
IB355OV | PROVINF+10~, GETPRV+2~*, GETPRV+4*, GETPRV+7*, GETPRV+8, GETPRV+9, GETPRV+10 |
IB399 | PROVIDER~, PROVIDER+6, PROVIDER+10, PROVIDER+11, PROVIDER+13, PROVIDER+14, PROVIDER+16, PROVIDER+17, PROVINF~, PROVINF+1 , PROVINF+6, PROVINF+9, PROVINF+11, PROVINF+13, PROVINF+15, PROVINF+16, PROVINF+22, PROVINF+24, PROVINF+26, PROVINF+28 , PROVINF+29, GETPRV+5, GETPRV+7, GETPRV+14, GETPRV+20 |
IBARR | PROVINF+10~, PROVINF+14, PROVINF+15, PROVINF+23~, PROVINF+27, PROVINF+28 |
IBCARE | ALLIDS+3~, ALLIDS+6*, ALLIDS+7*, ALLIDS+19, ALLIDS+23, PROVIDER~, PROVIDER+6, PROVIDER+10, PROVIDER+11, PROVIDER+13 , PROVIDER+14, PROVIDER+16, PROVIDER+17, PROVINF~, PROVINF+7, PROVINF+14, PROVINF+27, GETPRV~, GETPRV+3 |
IBCCOB | ALLIDS+3~, ALLIDS+34*, ALLIDS+36, ALLIDS+37 |
IBCNT | ALLIDS+52~, ALLIDS+59*, SLPRV+1~, SLPRV+2*, SLPRV+10*, SLPRV+11, SLPRV+12 |
IBCP | PROVPTR~, PROVPTR+2*, PROVPTR+3, PROVPTR+7, PROVPTR+8, PROVPTR+10 |
IBCURR | ALLIDS+3~, ALLIDS+8*, ALLIDS+16, ALLIDS+19, ALLIDS+23, PROVIDER~, PROVIDER+3, PROVIDER+6, PROVIDER+9, PROVIDER+10 , PROVIDER+11, PROVIDER+12, PROVIDER+13, PROVIDER+14, PROVIDER+15, PROVIDER+16, PROVIDER+17, PROVINF~ |
IBD | GETPRV~, GETPRV+4, GETPRV+17, GETPRV+19, GETPRV+20 |
IBEXC | PROVINF+4~, PROVINF+11*, PROVINF+24*, GETPRV+10*, GETPRV+11, GETPRV+14 |
IBFRMTYP | ALLIDS+3~, ALLIDS+5*, ALLIDS+10, ALLIDS+13, ALLIDS+14, ALLIDS+19, ALLIDS+23, ALLIDS+32*, ALLIDS+33, PROVIDER~ , PROVIDER+6, PROVIDER+10, PROVIDER+11, PROVIDER+13, PROVIDER+14, PROVIDER+16, PROVIDER+17, PROVINF~, PROVINF+7, PROVINF+14 , PROVINF+27, GETPRV~, GETPRV+3, GETPRV+7, GETPRV+9, GETPRV+11 |
IBFUNC | PROVPTR~, PROVPTR+4, PROVPTR+8 |
IBIEN399 | PROVPTR~, PROVPTR+4, PROVPTR+6, PROVPTR+8, PROVPTR+10 |
IBIFN | ALLIDS~, ALLIDS+5, ALLIDS+6, ALLIDS+7, ALLIDS+8, ALLIDS+10, ALLIDS+13, ALLIDS+14, ALLIDS+19, ALLIDS+21 , ALLIDS+23, ALLIDS+24, ALLIDS+27, ALLIDS+28, ALLIDS+30, ALLIDS+32, ALLIDS+34, ALLIDS+38, ALLIDS+40, ALLIDS+45 , ALLIDS+47, ALLIDS+48, ALLIDS+49, ALLIDS+51, ALLIDS+54, ALLIDS+61, ALLIDS+62, ALLIDS+63, ALLIDS+64, ALLIDS+65 , ALLIDS+67, ALLIDS+68, PSID~, PSID+14, PSID+15, PSID+16, PSID+17, PSID+20, PSID+21, PSID+22 , PSID+23, PSID+26, PSID+27, PSID+28, PSID+29, PSID+30, GETPRV+17 |
IBINSCO | PROVINF+4~, PROVINF+6*, PROVINF+7, PROVINF+14, PROVINF+27, GETPRV~, GETPRV+3, GETPRV+10, GETPRV+12 |
IBINSTP | PROVINF~, PROVINF+2, PROVINF+14, PROVINF+15, PROVINF+16, PROVINF+27, PROVINF+28, PROVINF+29, GETPRV~, GETPRV+1 , GETPRV+3, GETPRV+9, GETPRV+11 |
IBLIMIT | ALLIDS+18*, ALLIDS+19, PROVIDER+1~, PROVIDER+5*, PROVIDER+6, PROVIDER+8*, PROVIDER+10, PROVIDER+11, PROVIDER+13, PROVIDER+14 , PROVIDER+16, PROVIDER+17, PROVINF~, GETPRV+14 |
IBMRAND | GETPRV+2~, GETPRV+5*, GETPRV+7, GETPRV+20 |
IBN | SLPRV+7*, SLPRV+8, PROVINF+4~, PROVINF+5*, GETPRV+2~, GETPRV+5*, GETPRV+10*, GETPRV+12*, GETPRV+14, GETPRV+16* , PROVPTR+1~, PROVPTR+4*, PROVPTR+5, PROVPTR+6, PROVPTR+8*, PROVPTR+9, PROVPTR+10 |
IBNPI | GETPRV+2~, GETPRV+13*, GETPRV+15 |
IBPRNUM | PROVINF~, PROVINF+3, PROVINF+6, PROVINF+16, PROVINF+29, GETPRV+4, GETPRV+14 |
IBPROV | PROVIDER~, PROVIDER+4, PROVIDER+6, PROVIDER+7, PROVIDER+10, PROVIDER+11, PROVIDER+13, PROVIDER+14, PROVIDER+16, PROVIDER+17 , PROVINF+4~, PROVINF+10~, PROVINF+11*, PROVINF+12, PROVINF+14, PROVINF+23~, PROVINF+24*, PROVINF+25, PROVINF+27, GETPRV~ , GETPRV+3, GETPRV+7, GETPRV+13, GETPRV+17, GETPRV+18, GETPRV+19, GETPRV+21 |
IBPRTYP | PROVINF+4~, PROVINF+8*, PROVINF+9*, PROVINF+11, PROVINF+13, PROVINF+14, PROVINF+21*, PROVINF+22*, PROVINF+24, PROVINF+26 , PROVINF+27, GETPRV~, GETPRV+3, GETPRV+7, GETPRV+9, GETPRV+10, GETPRV+11, GETPRV+12, GETPRV+14, GETPRV+15 , GETPRV+16, GETPRV+17, GETPRV+18, GETPRV+19, GETPRV+20, GETPRV+21 |
IBRES | PROVIDER~, PROVIDER+18*, PROVINF~, GETPRV~, GETPRV+14 |
IBRES( | GETPRV+10*, GETPRV+12*, GETPRV+15*, GETPRV+16*, GETPRV+17*, GETPRV+18*, GETPRV+19*, GETPRV+20*, GETPRV+21* |
IBRES("L-PROV" | PROVINF+28*, PROVINF+29* |
IBRES("PROVINF" | PROVINF+15*, PROVINF+16* |
IBRESARR | ALLIDS+17~, ALLIDS+19, ALLIDS+20, PROVIDER+1~, PROVIDER+2*, PROVIDER+6, PROVIDER+10, PROVIDER+11, PROVIDER+13, PROVIDER+14 , PROVIDER+16, PROVIDER+17, PROVIDER+18 |
IBRETARR | GETPRV+2~*, GETPRV+3, GETPRV+14 |
IBSORT | PROVINF~, PROVINF+3*, PROVINF+16, PROVINF+29, GETPRV+10, GETPRV+12, GETPRV+14, GETPRV+15, GETPRV+16, GETPRV+17 , GETPRV+18, GETPRV+19, GETPRV+20, GETPRV+21 |
IBSTRIP | ALLIDS~, ALLIDS+1*, ALLIDS+27, ALLIDS+40, GETPRV+15, GETPRV+16 |
IBX | SLPRV~ |
IBX("L-PROV" | SLPRV+3, SLPRV+4, SLPRV+5, SLPRV+6, SLPRV+7, SLPRV+8 |
IBX("SLPRV" | SLPRV+11*, SLPRV+12* |
IBXDATA | ALLIDS+3~, ALLIDS+19, ALLIDS+23, PROVIDER~, PROVIDER+6, PROVIDER+10, PROVIDER+11, PROVIDER+13, PROVIDER+14, PROVIDER+16 , PROVIDER+17, PROVINF~, AMB+1~, AMB+3*, AMB+6*, AMB+7, SNDS2~, SNDS2+14, SNDS2+19*, SNDS2+21* , SNDS2+22*, SNDS2+23 |
IBXDATA( | PROVINF+19, PROVINF+20 |
IBXIDS | PSID~, PSID+11! |
IBXIDS(0 | PSID+18*, PSID+24*, PSID+31* |
IBXIDS(1 | PSID+18*, PSID+24*, PSID+31* |
IBXIEN | ALLIDS+3~, SLPRV~, SLPRV+3, SLPRV+4, SLPRV+5, SLPRV+6, SLPRV+7, SLPRV+8, AMB~, AMB+3 , AMB+5, SNDS2+16 |
IBXPROV | PSID~ |
IBXPROV("L-PROV" | PSID+26, PSID+27, PSID+28, PSID+29, PSID+30 |
IBXPROV("LAB/FAC" | PSID+14, PSID+15, PSID+16, PSID+17 |
IBXPROV("PROVINF" | PSID+20, PSID+21, PSID+22, PSID+23 |
IBXSAVE | ALLIDS~, ALLIDS+20*, ALLIDS+23*, ALLIDS+27, ALLIDS+40, ALLIDS+42, ALLIDS+54, ALLIDS+61, ALLIDS+62, ALLIDS+63 , ALLIDS+64, ALLIDS+65, ALLIDS+67, ALLIDS+68, AMB~ |
IBXSAVE("AMB" | AMB+2!, AMB+3*, AMB+7* |
IBXSAVE("L-PROV" | ALLIDS+47, ALLIDS+48 |
IBXSAVE("LAB/FAC" | ALLIDS+30* |
IBXSAVE("PROVINF" | ALLIDS+10, ALLIDS+21*, ALLIDS+24*, ALLIDS+38, ALLIDS+45, ALLIDS+47, ALLIDS+49* |
IBXSAVE("SLC" | ALLIDS+51, ALLIDS+59, PROVINF+19* |
IBXSAVE("SLPRV" | ALLIDS+59* |
IBZ | ALLIDS+11~, ALLIDS+23, PROVIDER+1~ |
>> IDS | ALLIDS+54 |
>> IDS(0 | ALLIDS+57 |
>> IDS(1 | ALLIDS+58 |
LINE | PSID+10~, PSID+15*, PSID+16, PSID+17, PSID+21*, PSID+22, PSID+23, PSID+28*, PSID+29, PSID+30 |
NAME | SLPRV+1~, SLPRV+5*, SLPRV+6 |
NODE | AMB+1~, AMB+3* |
NPI | ALLIDS+3~, ALLIDS+28*, ALLIDS+30 |
OUT | ALLIDS+52~, ALLIDS+57*, ALLIDS+58*, ALLIDS+59, SLPRV+1~, SLPRV+6*, SLPRV+9*, SLPRV+11 |
PID | PSID+10~, PSID+13*, PSID+14*, PSID+18, PSID+20*, PSID+24, PSID+26, PSID+27*, PSID+31 |
PIECE | SNDS2~, SNDS2+22 |
PLINE | PSID+10~, PSID+26*, PSID+27, PSID+28, PSID+29, PSID+30 |
PRTYPE | SLPRV~, SLPRV+4, SLPRV+5, SLPRV+6, SLPRV+7, SLPRV+8 |
RSLT | PROVPTR+1~, PROVPTR+5*, PROVPTR+6*, PROVPTR+9*, PROVPTR+10*, PROVPTR+11 |
SEG | ALLIDS~, ALLIDS+2*, ALLIDS+27, ALLIDS+40, ALLIDS+44, ALLIDS+51, ALLIDS+61, ALLIDS+62, ALLIDS+63, ALLIDS+64 , ALLIDS+65, ALLIDS+67, ALLIDS+68 |
SID | PSID+10~, PSID+13*, PSID+15, PSID+17*, PSID+18, PSID+21, PSID+23*, PSID+24, PSID+26, PSID+28 , PSID+30*, PSID+31 |
SIDQ | PSID+10~, PSID+13*, PSID+16*, PSID+18, PSID+22*, PSID+24, PSID+29*, PSID+31 |
SLC | ALLIDS+46~*, ALLIDS+47*, ALLIDS+48, SLPRV+1~, SLPRV+2*, SLPRV+3*, SLPRV+4, SLPRV+5, SLPRV+6, SLPRV+7 , SLPRV+8, SLPRV+12, PROVINF+17~, PROVINF+18*, PROVINF+19*, PROVINF+20, PROVINF+28, PROVINF+29 |
SORT1 | ALLIDS+3~, ALLIDS+36*, ALLIDS+37, ALLIDS+38, ALLIDS+40 |
SORT2 | ALLIDS+3~, ALLIDS+37*, ALLIDS+38, ALLIDS+40 |
SORT3 | ALLIDS+3~ |
U | ALLIDS+28, ALLIDS+30, ALLIDS+48, ALLIDS+49, ALLIDS+57, ALLIDS+58, PSID+14, PSID+16, PSID+17, PSID+18 , PSID+20, PSID+22, PSID+23, PSID+24, PSID+27, PSID+29, PSID+30, PSID+31, SLPRV+6, SLPRV+9 , GETPRV+4, GETPRV+8, GETPRV+9, GETPRV+10, GETPRV+11, GETPRV+12, GETPRV+15, GETPRV+16, GETPRV+17, GETPRV+18 , GETPRV+19, PROVPTR+6, PROVPTR+10, AMB+3, AMB+6, SNDS2+16 |
Z | PROVINF+10~, PROVINF+13*, PROVINF+14, PROVINF+23~, PROVINF+26*, PROVINF+27, SNDS2+15~, SNDS2+16*, SNDS2+19 |
Z0 | ALLIDS+3~ |