IBCU63 ;ALB/AAS - BILLING UTILITY TO SET AMB SURG REV CODES ; 20-NOV-91
Source file <IBCU63.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 3 | ^IBAUTL1 $$FT^IBCU3 (FILE,SETREV)^IBCU62 |
| CPT HCPCS Codes | 1 | $$CPT^ICPTCOD |
| VA FileMan | 1 | ^DIK |
| 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 |
|---|---|---|
| BLD | ||
| STORREV | ;build revenue codes in bill
|
|
| FILE | ;
|
|
| STDATE() | ; -start date for basc billing
|
|
| RX | ;add rx refill charges (adds default rx cpt for cms-1500)
|
|
| END | ||
| ALL | ;delete all revenue codes that may have been set up automatically
|
|
| DEL | ||
| CHG(IBSI,IBDT,IBRVCD) | ; returns charge for bedsection and date, rev cd optional
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | BLD, STORREV+1*, RX+2*, ALL+3, DEL |
| ^DGCR(399.1 - [#399.1] | STORREV+4, RX+4 |
| ^DGCR(399.5 - [#399.5] | CHG+3, CHG+4, CHG+5, CHG+8, CHG+9, CHG+10, CHG+11 |
| ^IBE(350.9 - [#350.9] | %+3, STDATE+1, RX+5, RX+7 |
| ^UTILITY($J | %+2!, BLD+4, BLD+5, STORREV+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | ALL+2!*, ALL+3* |
| DA(1 | FILE+1*, ALL+2*, DEL |
| >> DGAMNT | STORREV+3*, FILE+3, RX+9* |
| DGASC | BLD*, STORREV+7! |
| >> DGBILLBS | STORREV+4, FILE+3 |
| >> DGBS | RX+4* |
| >> DGBSI | STORREV+4*, RX+4*, RX+9 |
| >> DGBSLOS | STORREV+2*, FILE+3, RX+3* |
| DGDAT | BLD+1*, BLD+3, BLD+4, BLD+5, STORREV+2*, STORREV+3, STORREV+7! |
| DGDIV | BLD+1*, BLD+2, BLD+4, BLD+5, STORREV+2*, STORREV+3, STORREV+7!, RX+5*, END! |
| >> DGII | ALL+3* |
| >> DGINPAR | %+3, RX+6 |
| DGPROC | BLD*, BLD+1, BLD+4, BLD+5, STORREV+2*, STORREV+3, STORREV+7!, FILE+3, RX+5*, END! |
| DGRVCOD | %+3*, STORREV+4, STORREV+7!, FILE+3, RX+6*, RX+7*, RX+8, RX+9, END! |
| >> DIK | DEL* |
| IBACTDT | CHG+1~, CHG+3*, CHG+4, CHG+8*, CHG+9, CHG+10 |
| IBAMNT | CHG+1~*, CHG+3, CHG+4, CHG+6*, CHG+8, CHG+9, CHG+10, CHG+12*, CHG+13 |
| >> IBAUTO | FILE+3, ALL+2, ALL+5 |
| >> IBCNT | RX+3 |
| IBDA | CHG+1~, CHG+4*, CHG+5, CHG+10*, CHG+11 |
| IBDT | CHG~, CHG+3, CHG+8 |
| >> IBIDS( | %+1 |
| >> IBIDS(151 | RX+9 |
| >> IBIFN | BLD, STORREV+1, FILE+1, RX+2, RX+5, ALL+2, ALL+3, DEL |
| IBQUIT | CHG+1~ |
| IBRC | CHG+1~, CHG+4*, CHG+9*, CHG+10 |
| IBRT | CHG+1~, CHG+5*, CHG+6, CHG+11*, CHG+12 |
| IBRVCD | CHG~, CHG+4 |
| IBSI | CHG~, CHG+3, CHG+4, CHG+8, CHG+9, CHG+10 |
| U | CHG+6, CHG+12 |
| X | STORREV+3*, STORREV+4*, RX+9*, ALL+3*, CHG+1~ |
| >> Y | STORREV+3 |