IBEFUNC1 ;ALB/ARH - CPT BILLING EXTRINSIC FUNCTIONS ; 11/27/91
Source file <IBEFUNC1.m>
| 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 |
| Package | Total | Caller Graph |
|---|---|---|
| Integrated Billing | 10 | IBEFUNC1 IBEFUNC2 IBXCPTC IBXS63 IBXS74 IBXSC68 IBXSC79 IBXX25 ^IBE(350.71 REVENUE CODE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FCC | ;
|
|
| CPTCHG(CODE,DIV,DATE) | ;ambulatory procedure billing charge on a date
|
|
| ENDCHG | ||
| FCBS | ;
|
|
| CPTBSTAT(CODE,DATE) | ;ambulatory procedure billing status on a date
|
|
| ENDST | ||
| FCR | ;
|
|
| CPTRG(CPT,DATE) | ;find the rate group for the CPT on the given date
|
|
| ENDRG | ||
| FMCD | ;
|
|
| MCDIV(DIV,DATE) | ;find the medical center division
; if DATE is not defined then assumes current date |
|
| ENDIV | ||
| RC(D0,D1,DATE) | ;find BASC charge for particular revenue code entry (399,42)
|
|
| CP(D0,D1) | ;find BASC charge for particular procedure entry (399,304)
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD(350.4 | CPTBSTAT+11 |
| ^DGCR(399 - [#399] | RC+4, RC+5, CP+3 |
| ^IBE(350.1 - [#350.1] | CPTRG+7 |
| ^IBE(350.2 - [#350.2] | CPTBSTAT+10 |
| ^IBE(350.4 - [#350.4] | CPTBSTAT+9, CPTRG+7 |
| ^IBE(350.5 - [#350.5] | MCDIV+8, MCDIV+9 |
| Name | Field # of Occurrence |
|---|---|
| ^( | CPTBSTAT+9, CPTRG+7, MCDIV+8, MCDIV+9 |
| ^(0 | CPTBSTAT+9, CPTRG+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | CPTCHG+6~, CPTBSTAT+5~, CPTRG+4~, MCDIV+5~ |
| %H | CPTCHG+6~, CPTBSTAT+5~, CPTRG+4~, MCDIV+5~ |
| %I | CPTCHG+6~, CPTBSTAT+5~, CPTRG+4~, MCDIV+5~ |
| CODE | CPTCHG~, CPTCHG+7, CPTCHG+10, CPTBSTAT~, CPTBSTAT+6, CPTBSTAT+9 |
| CPT | CPTRG~, CPTRG+5, CPTRG+7 |
| D0 | RC~, RC+4, RC+5, CP~, CP+3 |
| D1 | RC~, RC+5, CP~, CP+3 |
| DA | RC+4~, CP+3~ |
| DATE | CPTCHG~, CPTCHG+8*, CPTCHG+9, CPTCHG+10, CPTBSTAT~, CPTBSTAT+7*, CPTBSTAT+8, CPTBSTAT+9, CPTBSTAT+10, CPTRG~ , CPTRG+6*, CPTRG+7, MCDIV~, MCDIV+7*, MCDIV+8, MCDIV+9, RC~, RC+4*, RC+5 |
| DIV | CPTCHG~, CPTCHG+9*, CPTCHG+10, MCDIV~, MCDIV+5*, MCDIV+8, MCDIV+9*, ENDIV |
| DT | CPTCHG+8, CPTBSTAT+7, CPTRG+6, MCDIV+7 |
| I | MCDIV+5~, MCDIV+9* |
| >> IBCDX | FCC+1, FCBS+1, FCR+1 |
| >> IBCHGX | FCC+1* |
| >> IBDIVX | FCC+1, FMCD+1* |
| >> IBDTX | FCC+1, FCBS+1, FCR+1, FMCD+1 |
| >> IBRGX | FCR+1* |
| >> IBSTX | FCBS+1* |
| INACT | MCDIV+5~ |
| INACT( | MCDIV+9* |
| LN | CPTBSTAT+5~, CPTBSTAT+9*, CPTBSTAT+10 |
| NDIV | MCDIV+5~, MCDIV+8*, MCDIV+9 |
| RATE | CPTRG+4~, CPTRG+7*, ENDRG |
| ST | CPTBSTAT+5~, CPTBSTAT+6*, CPTBSTAT+9*, CPTBSTAT+10*, CPTBSTAT+11*, ENDST |
| U | RC+5, CP+3 |
| X | CPTCHG+6~, CPTCHG+10*, CPTBSTAT+5~, CPTRG+4~, MCDIV+5~, RC+4~*, RC+5*, RC+6, CP+3~*, CP+4 |
| Y | CPTCHG+6~, CPTCHG+7*, ENDCHG, RC+4~, RC+5*, CP+3~* |
