©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
IB20PT5 ;ALB/CPM - IB V2.0 POST-INIT ONE-TIME ITEMS ; 03-SEP-93
Source file <IB20PT5.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 2 | ^DIE IXALL^DIK |
| Integrated Billing | 1 | ^IB20PT51 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| STAT | ; Set new entries into the IB ACTION STATUS (#350.21) file.
|
|
| FT | ; Update called routine for form type HCFA 1500
|
|
| PSO | ; Update the eligibility logic for PSO SC RX COPAY NEW
|
|
| CRES | ; Update the cancellation reason MT CHARGE EDITED in file #350.3
|
|
| ABP | ; Set auto biller parameters.
|
|
| BASC | ; Update the BASC start date to 10/1/99.
|
|
| NEWCODE | ;;S X=0,X1="",X2="" G:'$D(VAEL) 1^IBAERR I VAEL(4),+VAEL(3),'IBDOM S X=$S($P(VAEL(3),"^",2)<50:2,1:0) I X S:$$RXEXMT^IBARXEU0(DFN,DT) X=0 I X S X2=$P(^IBE(350.1,DA,0),"^",4) D COST^IBAUTL
|
|
| CCMG | ; Update the central collection mailgroup in file #350.9
|
|
| ACHG | ; Clean up any IB ACTION CHARGE (#350.2) nodes left hanging.
|
|
| DEF | ; Enter default billing form type.
|
| FileNo | Call Tags |
|---|---|
| ^IBE(350.21 - [#350.21] | Classic Fileman Calls |
| ^IBE(350.3 - [#350.3] | Classic Fileman Calls |
| ^IBE(350.9 - [#350.9] | Classic Fileman Calls |
| ^IBE(353 - [#353] | Classic Fileman Calls |
| ^IBE(356.6 - [#356.6] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IBE(350.1 - [#350.1] | PSO+3, PSO+4* |
| ^IBE(350.2 - [#350.2] | ACHG+2! |
| ^IBE(350.21 - [#350.21] | STAT+2!, STAT+3*, STAT+4*, STAT+5*, STAT+6*, STAT+7*, STAT+8*, STAT+9*, STAT+10*, STAT+11* , STAT+12*, STAT+13* |
| ^IBE(350.3 - [#350.3] | CRES+2 |
| ^IBE(350.9 - [#350.9] | DEF+2, BASC+2* |
| ^IBE(353 - [#353] | FT+2 |
| Name | Line Occurrences |
|---|---|
| ABP | IB20PT5+12 |
| ACHG | IB20PT5+4 |
| BASC | IB20PT5+7 |
| CCMG | IB20PT5+10 |
| CRES | IB20PT5+9 |
| DEF | IB20PT5+5 |
| FT | IB20PT5+11 |
| NEWCODE | PSO+2 |
| PSO | IB20PT5+8 |
| STAT | IB20PT5+6 |
| Name | Field # of Occurrence |
|---|---|
| ^( | ACHG+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | DEF+2*!, CCMG+3*!, CRES+2*, CRES+3!, FT+2*!, ABP+3*!, ABP+4*! |
| DIE | DEF+2*!, CCMG+3*!, CRES+3*!, FT+2*!, ABP+3*!, ABP+4*! |
| DIK | STAT+14*! |
| DR | DEF+2*!, CCMG+3*!, CRES+3*!, FT+2*!, ABP+3*!, ABP+4*! |
| DT | ABP+3 |
| >> I | ACHG+2* |
| >> IBAUTOBP | ABP+1 |
| IBDA | PSO+3*, PSO+4, PSO+5! |
| IBFT | FT+2*, FT+4! |
| IBFTI | FT+2*, FT+4! |
| IBNEWSC | PSO+2*, PSO+4, PSO+5! |
| IBX | CCMG+2*, CCMG+3!, PSO+3*, PSO+5! |
| U | DEF+2 |
| Name | Field # of Occurrence |
|---|---|
| $T(NEWCODE | PSO+2 |