IBCCC2 ;ALB/AAS - CANCEL AND CLONE A BILL - CONTINUED ;6/6/03 9:56am
Source file <IBCCC2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| STEP5 | ||
| STEP6 | ||
| END | ||
| IBSCEDT | ; call the IB bill edit screens and validate the data
|
|
| ST1 | ||
| IBSCX | ;
|
|
| TX | ||
| U | ||
| U1 | ||
| U2 | ||
| U3 | ||
| UF2 | ||
| UF3 | ||
| U4 | ||
| U5 | ||
| U6 | ||
| U7 | ||
| U8 | ||
| UF31 | ||
| UF32 | ||
| C | ||
| M | ||
| M2 | ||
| CC | ||
| OP | ||
| OC | ||
| OT | ||
| CV | ; Don't copy value codes from inpatient inst to inpatient prof bills
|
|
| RC | ||
| CP | ||
| CP1 | ||
| PRV | ; Copy providers for cloned claim
|
|
| U9 | ; Added for new data elements in IB*2.0*447 BI
|
|
| COB | ||
| FILE | ||
| INDEX | ;index entire file (set logic)
|
|
| PRIOR(IBIFN) | ; set Secondary/Tertiary Bill #s on prior bills, if the bill is cancelled remove it from prior bills
|
|
| COBCHG(IBIFN,IBINS,IBCOB) | ; Make changes for a new COB payer for bill
; IBIFN = ien of bill in file 399 ; IBINS = ien of bill's current insurance (optional) ; IBCOB = array subscripted by node,piece of COB data field change |
|
| SAVERC(IBIFN,IBMAED) | ||
| RESTRC(IBIFN,IBMAED) |
| FileNo | Call Tags |
|---|---|
| ^DGCR(399 - [#399] | Classic Fileman Calls, RECALL^DILFD |