IBTOSUM1 ;ALB/AAS - CLAIMS TRACKING BILLING INFORMATION PRINT ; 29-OCT-93
Source file <IBTOSUM1.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 3 | $$CDT^IBTODD1 CHK^IBTOSUM2 $$DAY^IBTUTL3 |
Registration | 1 | INP^VADPT |
Package | Total | Caller Graph |
---|---|---|
Integrated Billing | 3 | IBTODD IBTOSUM IBTOUR2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
CHKREV | ; -- check if billing rate (dgbr) is active and starndard.
|
|
RCNT | ; -- process each review
|
|
REV | ; -- count reviews
|
|
ACTION(IBTRC) | ; -- compute action code for a review
|
|
SPEC(IBTRC) | ; -- compute treating specialty on review date
|
|
SETREV | ; -- find current active revenue codes for bedsection
|
|
RATEQ | ||
BBS(IBSPEC) | ; -- compute billing bedsection from specialty
|
|
RATE(IBBBS,IBDT) | ; -- compute daily bed section rate for date
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGCR(399.1 - [#399.1] | BBS+3 |
^DGCR(399.5 - [#399.5] | SETREV+2, SETREV+3, SETREV+4, CHKREV+2, CHKREV+8 |
^DIC(42.4 - [#42.4] | BBS+2 |
^DIC(45.7 - [#45.7] | BBS+2 |
^IBE(356.11 - [#356.11] | RCNT+3 |
^IBE(356.7 - [#356.7] | ACTION+1 |
^IBT(356.2 - [#356.2] | REV+4, RCNT+2, RCNT+18, RCNT+24, RCNT+34, RCNT+46, ACTION+1, SPEC+2, SPEC+3 |
Name | Line Occurrences |
---|---|
$$ACTION | RCNT+21 |
$$BBS | RCNT+15 |
$$RATE | RCNT+16 |
$$SPEC | RCNT+14 |
CHKREV | SETREV+4 |
RATEQ | RATE+2 |
RCNT | REV+4 |
SETREV | RATE+3 |
Name | Field # of Occurrence |
---|---|
^( | RCNT+46 |
^(0 | SPEC+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | SPEC+1~, SPEC+2*, SPEC+6 |
DGBR | RATE+1~, SETREV+1*, SETREV+4*, CHKREV+2, CHKREV+8 |
DGBRN | RATE+1~, CHKREV+2*, CHKREV+3, CHKREV+6 |
DGFND | RATE+1~, SETREV+1!, SETREV+2, CHKREV+6* |
DGREV | RATE+1~, SETREV+1*, SETREV+3*, SETREV+4 |
DT | RCNT+29, RCNT+39 |
I | SPEC+1~ |
IBAC | RCNT+1~, RCNT+21*, RCNT+23, RCNT+33, RCNT+43, RCNT+44, RCNT+45, RCNT+46 |
IBAMT | RATE+1~, RATE+2*, RATEQ, SETREV+1*, SETREV+4* |
IBBBS | RCNT+15*, RCNT+16, RATE~, RATE+2, SETREV+2, SETREV+3, SETREV+4 |
>> IBBDT | REV+3 |
IBCDT | RCNT+25*, RCNT+26, RCNT+29, RCNT+35*, RCNT+36, RCNT+39, SPEC+1~, SPEC+3*, SPEC+4, SPEC+5 |
IBCHK | RATE+1~, SETREV+4, CHKREV+1*, CHKREV+6* |
>> IBCNT( | RCNT+43*, RCNT+44*, RCNT+45*, RCNT+48*, RCNT+49*, RCNT+50*, RCNT+51* |
>> IBCNT(5 | RCNT+19*, RCNT+20* |
>> IBCNT(81 | RCNT+7* |
>> IBCNT(82 | RCNT+10* |
IBDAY | RCNT+1~, RCNT+21*, RCNT+28*, RCNT+29*, RCNT+30*, RCNT+31, RCNT+38*, RCNT+39*, RCNT+40*, RCNT+41 , RCNT+43, RCNT+44, RCNT+45 |
>> IBDCNT( | RCNT+26, RCNT+27*, RCNT+31*, RCNT+36, RCNT+37*, RCNT+41* |
IBDT | REV+3*, REV+4*, RATE~, RATE+2, SETREV+1 |
>> IBEDT | REV+4, RCNT+26, RCNT+36 |
IBETYP | RCNT+1~, RCNT+3*, RCNT+4, RCNT+6, RCNT+9 |
IBIDT | RATE+1~, SETREV+1*, SETREV+2*, SETREV+3, SETREV+4 |
>> IBMAX | RCNT+26*, RCNT+27, RCNT+30, RCNT+36*, RCNT+37, RCNT+40 |
IBNOD | RCNT+1~, RCNT+47*, RCNT+48, RCNT+49, RCNT+50, RCNT+51 |
>> IBPCNT( | RCNT+18* |
>> IBPEN | RCNT+46* |
IBPEND | RCNT+1~, RCNT+46*, RCNT+47, RCNT+49, RCNT+51 |
>> IBRATE | RCNT+16*, RCNT+44, RCNT+45 |
IBSPEC | RCNT+14*, RCNT+15, RCNT+20, RCNT+43, RCNT+45, RCNT+50, RCNT+51, BBS~, BBS+2 |
IBTALL | RCNT+1~, RCNT+24*, RCNT+28, RCNT+29, RCNT+34*, RCNT+38, RCNT+39 |
IBTRC | REV+4*, RCNT+2, RCNT+14, RCNT+18, RCNT+21, RCNT+24, RCNT+34, RCNT+46, ACTION~, ACTION+1 , SPEC~, SPEC+2, SPEC+3 |
>> IBTRCD | RCNT+2*, RCNT+3, RCNT+12, RCNT+16, RCNT+28, RCNT+38 |
IBTRN | RCNT+18, RCNT+25, RCNT+26, RCNT+27, RCNT+28, RCNT+29, RCNT+31, RCNT+35, RCNT+36, RCNT+37 , RCNT+38, RCNT+39, RCNT+41, SPEC+1~, SPEC+3* |
J | SPEC+1~ |
U | CHKREV+6 |
VAERR | SPEC+1~ |
VAIN | SPEC+1~ |
VAIN(3 | SPEC+7 |
VAINDT | SPEC+1~, SPEC+2*, SPEC+4*, SPEC+5* |
X | SPEC+1~, BBS+1~, BBS+2*, BBS+3*, BBS+4, RATE+1~, SETREV+4, CHKREV+1*, CHKREV+8* |
Y | SPEC+1~ |
>> ZTSTOP | REV+1 |