IBCU81 ;ALB/ARH - THIRD PARTY BILLING UTILITIES (AUTOMATED BILLER) ;02 JUL 93
Source file <IBCU81.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 2 | $$BILLED^IBCU8 $$EXSET^IBEFUNC |
VA Fileman | 1 | C^%DTC |
Name | Comments | DBIA/ICR reference |
---|---|---|
EABDQ | ||
BILLQ | ||
RXRF(IBTRN) | ; returns rx # and refill date for given claims tracking rx entry
|
|
EABD(IBETYP,IBTDT) | ; -- compute earliest auto bill date: date entered plus days delay for event type
|
|
EVBILL(IBTRN) | ;check if event is billable, return EABD if it is, the difference between this and BILL^IBTUTL is that
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGCR(399 - [#399] | EVBILL+6 |
^IBE(356.6 - [#356.6] | EABD+7 |
^IBE(356.8 - [#356.8] | EVBILL+10 |
^IBT(356 - [#356] | EVBILL+3, EVBILL+12, RXRF+1 |
^PSRX - [#52] | RXRF+1 |
Name | Line Occurrences |
---|---|
$$EABD | EVBILL+13 |
BILLQ | EVBILL+3, EVBILL+6, EVBILL+9, EVBILL+10, EVBILL+11 |
EABDQ | EABD+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DT | EABD+7, EVBILL+12 |
E | EVBILL+3~*, EVBILL+6*, EVBILL+9*, EVBILL+10*, EVBILL+11*, BILLQ |
IBETYP | EABD~, EABD+6, EABD+7 |
IBETYPD | EABD+6~, EABD+7*, EABD+8 |
IBTDT | EABD~, EABD+7*, EABD+9 |
IBTRN | EVBILL~, EVBILL+3, EVBILL+6, EVBILL+12, RXRF~, RXRF+1 |
IBTRND | EVBILL+3~*, EVBILL+9, EVBILL+10, EVBILL+11, EVBILL+13 |
IBX | RXRF+1~* |
IBY | RXRF+1~* |
IBZ | RXRF+1~* |
U | EVBILL+6, EVBILL+9, EVBILL+10, EVBILL+11, EVBILL+13, RXRF+1 |
X | EABD+6~, EABD+9, EVBILL+3~*, EVBILL+13*, BILLQ, RXRF+1~*, RXRF+2 |
X1 | EABD+6~, EABD+9* |
X2 | EABD+6~, EABD+8* |
Y | EABD+6~*, EABD+9*, EABDQ, EVBILL+3~*, EVBILL+6*, EVBILL+12*, EVBILL+13 |
Z | EVBILL+3~, EVBILL+6* |