©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
ABMAROLL ; IHS/ASDST/DMJ - A/R ROLL OVER ;
Source file <ABMAROLL.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 4 | ^DIC FILE^DICN ^DIE ^DIR |
| Third Party Billing | 2 | ADDCHK^ABMDE2E ELG^ABMDLCK |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Accounts Receivable | 2 | BARMAWO1 BARMAWO7 |
| Tucson | 1 | BZSMAWO2 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| START(X,ABM,Z,ZZ) | ;EP - FROM A/R
|
|
| SET | ;
; set up needed variables for Eligibility Checker |
|
| UNBILL | ;
; Look for additional sources that have not yet been billed |
|
| REST | ;
; Quit if billed manually. . . no other sources to find |
|
| CBIL | ;
; EP for Closing Bill ; OK for both 1.0 and 1.1 |
|
| ADD | ;
; Add bill not currently in 3P BILL ; MAYBE WILL DO LATER |
|
| FILE | ; PEP - FILE PAYMENT INFORMATION
; OK for both 1.0 and 1.1 ; The payment multiple will contain cumulative data about that bill ; ; 3PB field = A/R field ; ; Payment Amount = Payments + 3P Previous Payments + Payment ; Adjustments - Refunds ; Deductible = Deductible ; Co-Insurance = Co-pay ; Write Offs = Write Offs ; Non-covered = Non payments ; Penalties = Penalties |
|
| OCLM | ;
; Open claim for editing |
|
| LKUP | ; PEP - LOOK UP ABMP("BDFN")
|
|
| CCLM | ;
; Complete a claim |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ABMDBILL( | START+21, LKUP+1, LKUP+3, FILE+15, FILE+17!, FILE+18*, CBIL+3, SET+2, SET+3, SET+4 , REST+2, REST+11, REST+12, REST+13 |
| ^ABMDCLM - [#9002274.3] | REST+5, REST+16, REST+22, UNBILL+25, UNBILL+26, UNBILL+27!, UNBILL+28, UNBILL+29, OCLM+4 |
| ^ABMNINS( | OCLM+7 |
| ^AUTNINS - [#9999999.18] | UNBILL+30, UNBILL+31, UNBILL+34, OCLM+7 |
| ^DD(9002274.3 | OCLM+12 |
| ^XUSEC("ABMDZ EDIT CLAIM AND EXPORT" | UNBILL+45 |
| Name | Line Occurrences |
|---|---|
| CBIL | FILE+43 |
| CCLM | UNBILL+39, UNBILL+53 |
| FILE | START+30 |
| LKUP | START+27 |
| OCLM | UNBILL+59 |
| REST | START+32 |
| SET | START+31 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | REST+12, REST+13 |
| ^(3 | FILE+15* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABM | START~, START+24, START+25!, START+33!, UNBILL+24*, UNBILL+25*, UNBILL+26, UNBILL+27, UNBILL+38!, UNBILL+53! , UNBILL+65! |
| ABM( | UNBILL+35* |
| ABM("3P" | FILE+31, FILE+39 |
| ABM("AMT" | START+26*, FILE+28 |
| ABM("CNT" | UNBILL+3*, UNBILL+32, UNBILL+33*, UNBILL+34, UNBILL+35, UNBILL+38 |
| ABM("COP" | FILE+34 |
| ABM("DED" | FILE+33 |
| ABM("GRP" | FILE+40 |
| ABM("HIT" | UNBILL+3*, UNBILL+41*, UNBILL+62, OCLM+4 |
| ABM("I" | UNBILL+25* |
| ABM("INS" | UNBILL+16* |
| ABM("INSCO" | UNBILL+29*, UNBILL+30, UNBILL+31, UNBILL+34 |
| ABM("NP" | FILE+36 |
| ABM("NPAY" | FILE+31*, FILE+32 |
| ABM("PAY" | FILE+31, FILE+38 |
| ABM("PCR" | FILE+31, FILE+42 |
| ABM("PEN" | FILE+37 |
| ABM("PRI" | UNBILL+15* |
| ABM("RF" | FILE+31, FILE+41 |
| ABM("WO" | FILE+35 |
| ABM("X" | UNBILL+26*, UNBILL+27, UNBILL+28, UNBILL+29, UNBILL+35 |
| ABM(1 | UNBILL+41, OCLM+7 |
| ABMA | START+33! |
| >> ABML | UNBILL+5 |
| >> ABML( | UNBILL+11, UNBILL+14 |
| ABMP | START+33!, UNBILL+38!, UNBILL+53!, UNBILL+65! |
| ABMP("AR1.0" | START+23*, FILE+14, FILE+26, FILE+29 |
| ABMP("BDFN" | START+20*, START+21, START+28, LKUP+1*, LKUP+2, LKUP+3, FILE+15, FILE+17, FILE+18, FILE+19 , CBIL+3, CBIL+6, SET+2, SET+3, SET+4, REST+2, REST+11, REST+12, REST+13, UNBILL+56 |
| ABMP("BILL" | START+21*, START+27, LKUP+3*, REST+2, REST+4, OCLM+15 |
| ABMP("CDFN" | REST+4*, REST+5, REST+15, REST+22, UNBILL+25, UNBILL+26, UNBILL+27, UNBILL+28, UNBILL+29, UNBILL+60 , OCLM+2, OCLM+4, OCLM+9, CCLM+2 |
| ABMP("INS" | SET+3*, OCLM+7 |
| ABMP("PDFN" | SET+2*, UNBILL+5 |
| ABMP("VDT" | SET+4*, UNBILL+5 |
| DA | FILE+24*, CBIL+6*, REST+7*, REST+12*, REST+13*, REST+14, REST+16, UNBILL+56*, UNBILL+62*, OCLM+2* , OCLM+8!, CCLM+2* |
| DA(1 | FILE+19*, REST+15*, REST+16, REST+17, UNBILL+60*, UNBILL+61, OCLM+9*, OCLM+10 |
| DD | FILE+23! |
| DIC | FILE+21*, FILE+25, OCLM+8!, OCLM+10* |
| DIC("P" | OCLM+12* |
| DIC(0 | FILE+22*, OCLM+11* |
| DIE | FILE+25*, CBIL+5*, REST+17*, UNBILL+55*, UNBILL+61*, OCLM+3*, OCLM+8!, CCLM+3* |
| DIR | UNBILL+50! |
| DIR("A" | UNBILL+48* |
| DIR(0 | UNBILL+47* |
| >> DIRUT | UNBILL+51 |
| DO | FILE+23! |
| DR | FILE+28*, FILE+32*, FILE+33*, FILE+34*, FILE+35*, FILE+36*, FILE+37*, FILE+38*, FILE+39*, FILE+40* , FILE+41*, FILE+42*, CBIL+7*, CBIL+9!, REST+18*, REST+20!, UNBILL+57*, UNBILL+63*, OCLM+4*, CCLM+4* |
| DT | FILE+20 |
| DUZ | UNBILL+45 |
| DUZ(2 | START+21, LKUP+1, LKUP+3, FILE+15, FILE+17, FILE+18, CBIL+3, SET+2, SET+3, SET+4 , REST+2, REST+5, REST+11, REST+12, REST+13, REST+16, REST+17, REST+22, UNBILL+25, UNBILL+26 , UNBILL+27, UNBILL+28, UNBILL+29, UNBILL+61, OCLM+3, OCLM+4, OCLM+7, OCLM+10, CCLM+3 |
| I | REST+6~, REST+7*, REST+11*, REST+12, REST+13, UNBILL+6~, UNBILL+7*, UNBILL+11*, UNBILL+14, UNBILL+15 |
| J | UNBILL+12~, UNBILL+13*, UNBILL+14*, UNBILL+16 |
| U | CBIL+3, REST+2, UNBILL+28, UNBILL+30, UNBILL+31, UNBILL+34, OCLM+4, OCLM+7, OCLM+12 |
| X | START~, START+20, FILE+20*, OCLM+8!, OCLM+13* |
| Y | START+24*, START+26, FILE+24, FILE+27, FILE+30, UNBILL+42*, UNBILL+53, UNBILL+57, OCLM+8! |
| Z | START~, START+22, START+27, START+29, LKUP+1 |
| ZZ | START~ |