©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
BARADJR2 ; IHS/SD/LSL - CREATE ENTRY IN A/R EDI STND CLAIM ADJ REASON ;
Source file <BARADJR2.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 3 | ^DIC FILE^DICN ^DIE |
| IHS Accounts Receivable | 1 | ^BARVKL0 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RPMSREA | ;
; Create new Adjustment Reasons in A/R TABLE ENTRY |
|
| EN | ; EP
|
|
| CLAIM | ;
; Populate A/R EDI CLAIM STATUS CODES to accomodate new codes added ; between 6/02 and 9/03. Inactivate necessary codes. |
|
| RPMSREA2 | ;
|
|
| STND2 | ;
|
|
| MODIFY2 | ;
|
|
| MODIFY | ; EP
; Change PENDING to NON PAYMENT |
|
| 3 | ;;
|
|
| 1 | ;;
|
|
| CHNGREA2 | ;
|
|
| 2 | ;;
|
|
| 4 | ;;
|
|
| CLAIM2 | ;
|
|
| CLAIM3 | ;
|
|
| STND | ;
; Create entries in A/R EDI STND CLAIM ADJ REASONS to accomodate ; Standard codes added between 6/02 and 9/03. |
|
| CHNGREA | ; EP
; Change category of these reasons to Non-Payment |
| FileNo | Call Tags |
|---|---|
| ^BARTBL - [#90052.02] | Classic Fileman Calls |
| ^BARADJ - [#90056.06] | Classic Fileman Calls |
| ^BARECSC - [#90056.1] | Classic Fileman Calls |
| Name | Line Occurrences |
|---|---|
| CHNGREA2 | CHNGREA+4 |
| CLAIM | EN+3 |
| CLAIM2 | CLAIM+4 |
| CLAIM3 | CLAIM+6 |
| MODIFY2 | MODIFY+4 |
| RPMSREA | EN+1 |
| RPMSREA2 | RPMSREA+4 |
| STND | EN+2 |
| STND2 | STND+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> BARCNT | RPMSREA+3*, RPMSREA2+1*, CHNGREA+3*, CHNGREA2+1*, STND+4*, STND2+1*, CLAIM+3*, CLAIM+5*, CLAIM2+1*, MODIFY+3* , MODIFY2+1* |
| >> BARD | RPMSREA+2*, RPMSREA2+2, RPMSREA2+7, RPMSREA2+8, CHNGREA+2*, CHNGREA2+2, STND+3*, STND2+2, STND2+7, CLAIM2+2 , CLAIM2+7, MODIFY+2*, MODIFY2+2, MODIFY2+7 |
| >> BARVALUE | RPMSREA+4, RPMSREA2+2*, RPMSREA2+3, RPMSREA2+7, RPMSREA2+8, CHNGREA+4, CHNGREA2+2*, CHNGREA2+3, CHNGREA2+6, STND+5 , STND2+2*, STND2+3, STND2+7, CLAIM+4, CLAIM+6*, CLAIM2+2*, CLAIM2+3, CLAIM2+7, CLAIM3+4, MODIFY+4 , MODIFY2+2*, MODIFY2+3, MODIFY2+7 |
| DA | RPMSREA2+4!, CHNGREA2+4!, CHNGREA2+6*, STND2+4!, CLAIM2+4!, CLAIM3+1!, CLAIM3+8!, CLAIM3+9*, MODIFY2+4!, MODIFY2+13* |
| DD | RPMSREA2+10!, STND2+12!, CLAIM2+9!, CLAIM3+5!, MODIFY2+8! |
| DIC | RPMSREA2+4!, RPMSREA2+5*, CHNGREA2+4!, STND2+4!, STND2+5*, CLAIM2+4!, CLAIM2+5*, CLAIM3+1!, CLAIM3+2*, CLAIM3+10 , MODIFY2+4!, MODIFY2+5*, MODIFY2+12 |
| DIC("DR" | RPMSREA2+9*, STND2+8*, STND2+9*, STND2+10*, STND2+11*, CLAIM2+8* |
| DIC(0 | RPMSREA2+6*, STND2+6*, CLAIM2+6*, CLAIM3+3*, MODIFY2+6* |
| DIE | CHNGREA2+4!, CHNGREA2+5*, CLAIM3+8!, CLAIM3+10*, MODIFY2+12* |
| >> DINUM | RPMSREA2+7* |
| DO | RPMSREA2+10!, STND2+12!, CLAIM2+9!, CLAIM3+5!, MODIFY2+8! |
| DR | CHNGREA2+7*, CLAIM3+8!, CLAIM3+11*, MODIFY2+4!, MODIFY2+14* |
| X | RPMSREA2+4!, RPMSREA2+8*, CHNGREA2+4!, STND2+4!, STND2+7*, CLAIM2+4!, CLAIM2+7*, CLAIM3+1!, CLAIM3+4*, MODIFY2+4! , MODIFY2+7* |
| Y | RPMSREA2+4!, CHNGREA2+4!, STND2+4!, CLAIM2+4!, CLAIM3+1!, CLAIM3+7, CLAIM3+9, MODIFY2+4!, MODIFY2+10, MODIFY2+13 |
| Name | Field # of Occurrence |
|---|---|
| $T(@1+BARCNT | RPMSREA2+2 |
| $T(@2+BARCNT | STND2+2 |
| $T(@3+BARCNT | CLAIM2+2 |
| $T(@4+BARCNT | CHNGREA2+2, MODIFY2+2 |