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 |
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 | 1 | IB20PT |
Name | Comments | DBIA/ICR reference |
---|---|---|
ACHG | ; Clean up any IB ACTION CHARGE (#350.2) nodes left hanging.
|
|
DEF | ; Enter default billing form type.
|
|
BASC | ; Update the BASC start date to 10/1/99.
|
|
STAT | ; Set new entries into the IB ACTION STATUS (#350.21) file.
|
|
CCMG | ; Update the central collection mailgroup in file #350.9
|
|
CRES | ; Update the cancellation reason MT CHARGE EDITED in file #350.3
|
|
FT | ; Update called routine for form type HCFA 1500
|
|
PSO | ; Update the eligibility logic for PSO SC RX COPAY NEW
|
|
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
|
|
ABP | ; Set auto biller parameters.
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
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 | 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 |