ABMUTLP ; IHS/ASDST/DMJ - PAYER UTILITIES ;
Source file <ABMUTLP.m>
| Package | Total | Call Graph | 
|---|---|---|
| Third Party Billing | 4 | DBFX^ABMDEFIP 4^ABMDLCK2 ($$RCID,PCN)^ABMERUTL (OVER,PAYED,SOP)^ABMUTLP2 | 
| IHS Patient | 1 | $$HISTMBI^AUPNMBI | 
| Kernel | 1 | $$UP^XLFSTR | 
| VA Fileman | 1 | $$GET1^DIQ | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PRVT | ;private | |
| PST(X) | ;EP - primary, secondary, tertiary | |
| MPP(X) | ;EP - medicare primary payer | |
| ISET | ; EP | |
| GRP(X) | ;EP - group name & # | |
| TCR(X) | ; EP ; Total credits for bill | |
| MCD | ;mcd | |
| RCID(X) | ;EP - receiver id | |
| PNUM(X) | ;EP - patient policy# | |
| SBR(X,ABMDUZ2) | ;PEP - subscriber | |
| PAYED | ; EP ; Build Ins Pymt Array | |
| SOP | ;EP - source of pay (claim filing indicator) | |
| TRIM(%X,%F,%V) | ;EP | |
| SNUM(X) | ;EP - subscriber policy# | |
| MCDBFX(X,Y) | ; EP ; Fix BILL Ins Multiple if broken ptr mcd ; INPUT:X = IEN (CLAIM OR BILL) ; Y = INS IEN UNDER FIELD #13 (INS MULTIPLE) ; OUTPUT: | |
| REL(X) | ;EP - rel. | |
| SNDR(X,Y) | ;EP - sender id | |
| OVER(ABMOLN) | ;EP - get override values from 3P Ins file | |
| MCR | ;mcr | |
| SET(X,ABMDUZ2) | ; EP set up standard vars | |
| MGET | ; EP ; Get new ptr | 
| Name | Field # of Occurrence | 
|---|---|
| DBFX^ABMDEFIP | ISET+23 | 
| 4^ABMDLCK2 | MGET+8 | 
| $$RCID^ABMERUTL | RCID+16 | 
| PCN^ABMERUTL | SET+25 | 
| OVER^ABMUTLP2 | OVER+1 | 
| PAYED^ABMUTLP2 | PAYED+2 | 
| SOP^ABMUTLP2 | SOP+1 | 
| $$HISTMBI^AUPNMBI | MCR+10, MCR+35 | 
| $$GET1^DIQ | SET+22, ISET+15, MGET+7, SBR+17, SBR+18, MCR+26, MPP+9, RCID+14 | 
| $$UP^XLFSTR | TRIM+2 | 
| FileNo | Call Tags | 
|---|---|
| ^AUTNINS - [#9999999.18] | GET1^DIQ | 
| ^AUTTINTY - [#9999999.181] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ABMDBILL( | SET+8, SET+20, ISET+8, ISET+11, ISET+13, ISET+18, ISET+20, ISET+21, ISET+24, ISET+26 , TCR+5, TCR+6, MCDBFX+8, MCDBFX+9, MCDBFX+10, MCDBFX+12*, MPP+5, MPP+7, MPP+15, MPP+17 | 
| ^ABMDPARM( | RCID+14 | 
| ^ABMNINS( | SET+23, SNDR+14, SNDR+17 | 
| ^ABMRECVR - [#9002274.095] | RCID+9, SNDR+11, SNDR+12 | 
| ^ABMRECVR("C" | RCID+5, RCID+7, SNDR+8, SNDR+9 | 
| ^ABMREFID - [#9002274.11] | SET+23 | 
| ^AUPN3PPH - [#9000003.1] | MCD+14, MCD+19, PRVT+4, PRVT+16, GRP+4 | 
| ^AUPNMCD - [#9000004] | ISET+22, MGET+5, MCD+2, MCD+3, MCD+11, MCD+12, MCD+16 | 
| ^AUPNMCR - [#9000003] | MCR+39 | 
| ^AUPNPRVT - [#9000006] | PRVT+2, PRVT+3, PRVT+4, PRVT+8, PRVT+16 | 
| ^AUPNRRE - [#9000005] | MCR+14 | 
| ^AUTNEGRP - [#9999999.77] | GRP+5, GRP+6, GRP+7 | 
| ^AUTNINS - [#9999999.18] | MCR+1, MCR+26, RCID+15 | 
| ^AUTTLOC - [#9999999.06] | SNDR+18 | 
| ^AUTTMCS - [#9999999.32] | MCR+40 | 
| ^AUTTRLSH - [#9999999.36] | MCD+6, MCD+7, PRVT+11, PRVT+12 | 
| ^AUTTRRP - [#9999999.33] | MCR+15 | 
| ^DIC(40.7 - [#40.7] | SET+19 | 
| Name | Line Occurrences | 
|---|---|
| $$SBR | SNUM+2, PNUM+2, REL+2 | 
| GRP | MCD+20, PRVT+17 | 
| ISET | SBR+5, PST+2 | 
| MCD | SBR+15, SBR+17 | 
| MCR | SBR+20 | 
| MGET | MCDBFX+11 | 
| PRVT | SBR+18, SBR+21 | 
| SET | SBR+4, PST+1 | 
| SOP | SBR+12 | 
| Name | Field # of Occurrence | 
|---|---|
| ^(0 | ISET+13, MCDBFX+12*, MCR+14, MCR+39 | 
| ^(2 | PRVT+4, PRVT+16 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| %F | TRIM~, TRIM+2*, TRIM+3, TRIM+4 | 
| %L | TRIM+2~*, TRIM+4*, TRIM+5 | 
| %R | TRIM+2~*, TRIM+3*, TRIM+5 | 
| %V | TRIM~, TRIM+2*, TRIM+3, TRIM+4 | 
| %X | TRIM~, TRIM+2, TRIM+3, TRIM+4, TRIM+5 | 
| >> ABM("TCREDITS" | TCR+3*, TCR+6*, TCR+7, TCR+8! | 
| >> ABMB0 | SET+12, SET+13, SET+14, SET+15, SET+16, SET+17, SET+18, ISET+4 | 
| >> ABMB6 | SET+9, SET+10, SET+11* | 
| ABMCDNUM | SET+4!, ISET+2!, ISET+20*, ISET+22, ISET+24*, MCD+1*, MCD+2, MCD+3, MCD+11, MCD+12 , MCD+16 | 
| ABMCHIEN | RCID+7*, RCID+9, RCID+10!, SNDR+9*, SNDR+11, SNDR+12, SNDR+13! | 
| >> ABMCNT | PST+3*, PST+8*, PST+9 | 
| ABMDUZ2 | SET~, SET+3*, SET+8, SET+20, SET+23, ISET+8, ISET+11, ISET+13, ISET+18, ISET+20 , ISET+21, ISET+24, ISET+26, TCR+5, TCR+6, MCDBFX+8, MCDBFX+9, MCDBFX+10, MCDBFX+12, SBR~ , SBR+3*, SBR+4 | 
| >> ABME("INS" | ISET+13*, ISET+15, ISET+18 | 
| >> ABME("INS#" | ISET+6*, ISET+25*, ISET+26, ISET+27 | 
| >> ABME("ITYPE" | ISET+15*, ISET+16, ISET+18, ISET+19, ISET+27 | 
| >> ABME("PRIO" | ISET+5*, ISET+8*, ISET+11 | 
| ABMHIC | MCR+14*, MCR+16, MCR+17!, MCR+39*, MCR+41, MCR+42! | 
| ABMI | SBR+7~, SBR+8*, SBR+9*, SBR+10, SBR+11, MCD+2, MCD+3, MCD+6, MCD+7, MCD+9 , MCD+10, MCD+11, MCD+12, MCD+13, MCD+14, MCD+15, MCD+16, MCD+17, MCD+18, MCD+19 , MCD+20, PRVT+3, PRVT+4, PRVT+5, PRVT+6, PRVT+7, PRVT+8, PRVT+11, PRVT+12, PRVT+14 , PRVT+16, PRVT+17, MCR+12, MCR+13, MCR+16, MCR+20, MCR+21, MCR+22, MCR+23, MCR+37 , MCR+38, MCR+41, MCR+45, MCR+46, MCR+47, MCR+48, GRP+2, GRP+3, GRP+6, GRP+7 , GRP+8, GRP+9 | 
| ABMIEN | PRVT+1*, PRVT+2, PRVT+3, PRVT+4, PRVT+8, PRVT+16, MPP+3~, MPP+4*, MPP+5, MPP+7 , MPP+15, MPP+17 | 
| ABMINS | SBR+7~, SBR+10*, SBR+11, SBR+15, SBR+16, SBR+17, SBR+18, SBR+20, MCD+1, PRVT+1 , MCR+1, MCR+26 | 
| >> ABML( | MGET+10, MGET+13 | 
| >> ABML(0 | MGET+9 | 
| >> ABMLOOP | RCID+6 | 
| ABMMBI | MCR+8!, MCR+9*, MCR+10*, MCR+11*, MCR+12, MCR+33!, MCR+34*, MCR+35*, MCR+36*, MCR+37 | 
| ABMMBI( | MCR+12, MCR+37 | 
| ABMMBI(999999999 | MCR+11, MCR+36 | 
| ABMMPP | MPP+13~, MPP+14*, MPP+20*, MPP+21 | 
| ABMOLN | OVER~ | 
| ABMP | MCDBFX+5~ | 
| ABMP( | MGET+13* | 
| ABMP("BDFN" | SET+5*, SET+8, SET+20, ISET+8, ISET+11, ISET+13, ISET+18, ISET+20, ISET+21, ISET+23 , ISET+24, ISET+26 | 
| ABMP("BTYP" | SET+14* | 
| ABMP("CLIN" | SET+18*, SET+19* | 
| ABMP("D0" | MCDBFX+6*, MCDBFX+8, MCDBFX+9, MCDBFX+10, MCDBFX+12 | 
| ABMP("D1" | MCDBFX+7*, MCDBFX+8, MCDBFX+12 | 
| ABMP("EXP" | SET+15*, SET+24 | 
| ABMP("GRP#" | SBR+32*, MCR+22*, MCR+47*, GRP+2*, GRP+6*, GRP+8 | 
| ABMP("GRPNM" | SBR+31*, GRP+3*, GRP+7*, GRP+8, GRP+9* | 
| ABMP("INS" | SET+17*, SET+22, SET+23, ISET+3!, ISET+4*, ISET+8, ISET+11, ISET+26*, ISET+27*, MGET+10* , MGET+11, MGET+13, SBR+9, SBR+10, SBR+11, PST+7, PST+9 | 
| ABMP("INSCO" | MGET+2*, MGET+7, MGET+11 | 
| ABMP("ITYPE" | SET+22*, SET+23 | 
| ABMP("LDFN" | SET+13* | 
| ABMP("PDFN" | SET+12*, ISET+21*, ISET+22, MCDBFX+9*, SBR+24, MCD+10, MCD+15, PRVT+2, PRVT+3, PRVT+4 , PRVT+6, PRVT+8, PRVT+16, MCR+10, MCR+14, MCR+23, MCR+35, MCR+39, MCR+48 | 
| ABMP("PH" | SBR+26*, MCD+2*, MCD+9, MCD+14, MCD+18, MCD+19, MCD+20, PRVT+3*, PRVT+5, PRVT+14 , PRVT+16, PRVT+17 | 
| ABMP("PNUM" | SBR+27*, SBR+29, SBR+30*, MCD+11*, MCD+16*, PRVT+4*, MCR+12*, MCR+13, MCR+16*, MCR+20 , MCR+37*, MCR+38, MCR+41*, MCR+45, PNUM+3 | 
| ABMP("PRI" | MGET+9*, MGET+10, MGET+13 | 
| ABMP("PTR" | MGET+3*, MGET+4, MGET+5 | 
| ABMP("REL" | SBR+25*, MCD+3*, MCD+6*, MCD+7*, MCD+13*, MCD+17*, PRVT+7*, PRVT+8*, PRVT+11*, PRVT+12* , MCR+21*, MCR+46*, REL+3 | 
| ABMP("RTYPE" | SET+23*, SET+24* | 
| ABMP("SNUM" | SBR+28*, SBR+29*, SBR+30, MCD+12*, MCD+19*, PRVT+16*, MCR+20*, MCR+45*, SNUM+3 | 
| ABMP("SOP" | SBR+33* | 
| ABMP("VDT" | SET+20*, MCDBFX+10* | 
| ABMP("VTYP" | SET+16*, SET+23 | 
| ABMP("ZERO" | MCDBFX+8*, MGET+2, MGET+3 | 
| ABMP(1 | MCDBFX+12 | 
| ABMP(2 | MCDBFX+12 | 
| ABMPINS | MPP+6~, MPP+7*, MPP+9, MPP+18 | 
| ABMPRFX | MCR+14*, MCR+15*, MCR+16, MCR+17! | 
| ABMPSQ | SBR+6!, SBR+11*, SBR+22*, SBR+23, SBR+25, SBR+26, SBR+27, SBR+28, SBR+31, SBR+32 , SBR+33 | 
| ABMPTYP | MPP+6~, MPP+9*, MPP+10 | 
| >> ABMR("GS" | SNDR+12 | 
| >> ABMR("ISA" | SNDR+11 | 
| ABMSBR | SBR+6!, SBR+23*, SBR+24*, SBR+34, SNUM+2*, PNUM+2*, REL+2* | 
| ABMSBR( | SBR+23, MCD+10*, MCD+15*, MCD+18*, PRVT+6*, PRVT+14*, MCR+23*, MCR+48* | 
| ABMSUFX | MCR+39*, MCR+40*, MCR+41, MCR+42! | 
| ABMX0 | MPP+16~, MPP+17*, MPP+18, MPP+19 | 
| DUZ(2 | SET+3, SBR+3, MPP+5, MPP+7, MPP+15, MPP+17, RCID+14, SNDR+14, SNDR+17, SNDR+18 | 
| I | SET+6~, SET+7*, SET+8, SET+9*, SET+10, SET+11, ISET+9~, ISET+10*, ISET+11*, ISET+13 , ISET+20, ISET+23, ISET+24, ISET+26, TCR+4*, TCR+5*, TCR+6, MGET+12~, MGET+13*, PST+5~ , PST+6*, PST+7*, PST+9, MPP+11~, MPP+12*, MPP+15*, MPP+17 | 
| >> J | TCR+6* | 
| U | SET+12, SET+13, SET+14, SET+15, SET+16, SET+17, SET+18, SET+19, SET+20, SET+23 , ISET+4, ISET+13, ISET+18, ISET+20, ISET+21, ISET+22, ISET+24, ISET+27, MCDBFX+10, MCDBFX+12 , MGET+2, MGET+3, SBR+11, SBR+15, SBR+16, SBR+20, MCD+1, MCD+2, MCD+3, MCD+6 , MCD+7, MCD+11, MCD+12, MCD+16, MCD+19, PRVT+1, PRVT+2, PRVT+3, PRVT+4, PRVT+8 , PRVT+11, PRVT+12, PRVT+16, MCR+1, MCR+12, MCR+14, MCR+15, MCR+26, MCR+37, MCR+39 , MCR+40, PST+9, GRP+4, GRP+6, GRP+7, MPP+7, MPP+18, MPP+19, RCID+9, RCID+14 , RCID+15, SNDR+11, SNDR+12, SNDR+14, SNDR+17, SNDR+18 | 
| X | SET~, SET+5, TCR~, TCR+5, TCR+6, TCR+7*, TCR+9, MCDBFX~, MCDBFX+6, SBR~ , SBR+4, PST~, PST+1, PST+4*, PST+9*, PST+10*, PST+11, GRP~, GRP+4*, GRP+5 , GRP+6, GRP+7, SNUM~, SNUM+2, SNUM+3*, SNUM+4, PNUM~, PNUM+2, PNUM+3*, PNUM+4 , REL~, REL+2, MPP~, MPP+2, MPP+4, RCID~, RCID+3*, RCID+5, RCID+7, RCID+14 , RCID+15, RCID+16, SNDR~, SNDR+3*, SNDR+8, SNDR+9, SNDR+14, SNDR+17 | 
| Y | MCDBFX~, MCDBFX+7, RCID+2!, RCID+9*, RCID+11, RCID+14*, RCID+15*, RCID+16*, RCID+17, SNDR~ , SNDR+4*, SNDR+14 | 
| Z | SNDR+5~, SNDR+11*, SNDR+12*, SNDR+14*, SNDR+17*, SNDR+18*, SNDR+19 |