IBEFUNC1 ;ALB/ARH - CPT BILLING EXTRINSIC FUNCTIONS ; 11/27/91
Source file <IBEFUNC1.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 3 | RATE^IBAUTL1 $$STDATE^IBCU63 $$CPTCHG^IBEFUNC1 |
Package | Total | Caller Graph |
---|---|---|
Integrated Billing | 16 | IB CPT BILLING CHARGE IB CPT BILLING STATUS IBCCPT IBCU7 IBEFUNC1 IBEFUNC2 IBERSP1 IBOBCC IBOCNC2 IBXCPTC IBXSC61 IBXSC73 IBXX14 REVENUE CODE ^IBE(350.71 PROCEDURES |
Name | Comments | DBIA/ICR reference |
---|---|---|
FCR | ;
|
|
ENDST | ||
FCBS | ;
|
|
ENDIV | ||
CPTCHG(CODE,DIV,DATE) | ;ambulatory procedure billing charge on a date
|
|
RC(D0,D1,DATE) | ;find BASC charge for particular revenue code entry (399,42)
|
|
MCDIV(DIV,DATE) | ;find the medical center division
|
|
FCC | ;
|
|
CPTBSTAT(CODE,DATE) | ;ambulatory procedure billing status on a date
|
|
ENDRG | ||
CP(D0,D1) | ;find BASC charge for particular procedure entry (399,304)
|
|
FMCD | ;
|
|
CPTRG(CPT,DATE) | ;find the rate group for the CPT on the given date
|
|
ENDCHG |
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 | Line Occurrences |
---|---|
$$CPTBSTAT | CPTCHG+10, FCBS+1 |
$$CPTCHG | FCC+1 |
$$CPTRG | FCR+1 |
$$MCDIV | CPTCHG+9, FMCD+1 |
ENDCHG | CPTCHG+7 |
ENDRG | CPTRG+5 |
ENDST | CPTBSTAT+6, CPTBSTAT+8 |
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~* |