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 |