IBOHCK ;ALB/EMG - CHECK FOR IB CHARGES ON HOLD ; MAR 21 1997
Source file <IBOHCK.m>
| 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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FIND(DFN,IBIFN) | ; find all related IB charges on hold for episodes of care
; being billed on this third party claim. ; once IB Charge is found, set ON HOLD DATE in file 350 to date ; third party claim is authorized. |
|
| UPDT | ; Update Integrated Billing Action (#350) On Hold Date field (#16)
|
|
| ALLQ | ||
| RXCHG | ; - find related rx copay's on hold in file 350
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | FIND+11, FIND+12 |
| ^IB - [#350] | FIND+19, FIND+22, RXCHG+5 |
| ^IB("AF" | FIND+18 |
| ^IB("AFDT" | FIND+17 |
| ^IB("APTDT" | RXCHG+5 |
| ^IBA(362.4 - [#362.4] | FIND+13, RXCHG+2, RXCHG+3 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | FIND+19 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | FIND~, FIND+8, FIND+17, RXCHG+5 |
| FDA | UPDT+1~ |
| FDA(350 | UPDT+4* |
| IBAUTH | FIND+10~, FIND+12*, UPDT+3, ALLQ! |
| IBBEG | FIND+10~, FIND+11*, FIND+20, ALLQ!, RXCHG+4 |
| IBC | ALLQ!, RXCHG+1~, RXCHG+5*, RXCHG+6 |
| IBCRG | ALLQ!, RXCHG+1~ |
| IBDT | FIND+10~, FIND+17*, ALLQ! |
| IBEND | FIND+10~, FIND+11*, FIND+17, FIND+20, ALLQ!, RXCHG+4 |
| IBERR | FIND+10~, UPDT+2*, ALLQ! |
| IBIFN | FIND~, FIND+8, FIND+11, FIND+12, FIND+13, ALLQ!, RXCHG+2 |
| IBNOHD | UPDT+1~, UPDT+3*, UPDT+4, ALLQ! |
| IBOHD | FIND+10~, FIND+22*, UPDT+3, ALLQ!, RXCHG+5* |
| IBRXBN | ALLQ!, RXCHG+1~, RXCHG+2*, RXCHG+3 |
| IBRXDT | ALLQ!, RXCHG+1~, RXCHG+3*, RXCHG+4, RXCHG+5* |
| IBRXEND | ALLQ!, RXCHG+1~, RXCHG+5* |
| IBRXN | ALLQ!, RXCHG+1~, RXCHG+2* |
| IBX | FIND+10~, FIND+19*, FIND+20, FIND+21, ALLQ! |
| Y | FIND+10~, FIND+17*, FIND+18, ALLQ! |
| Y1 | FIND+10~, FIND+18*, FIND+19, FIND+22, UPDT+4, ALLQ!, RXCHG+5* |
