IBCU73 ;ALB/ARH - ADD/DELETE MODIFIER 26 TO SPECIFIED CPTS ; 1-SEP-00
Source file <IBCU73.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 3 | $$BILLRATE^IBCRU3 $$VERSDT^IBCRU8 $$GETMOD^IBEFUNC |
VA FileMan | 2 | FILE^DICN ^DIE |
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 |
---|---|---|
CPTMOD26(IBIFN) | ; add/remove modifier 26 from specific CPT codes on Reasonable Charges bills
|
|
MOD26(CPT,IBDT) | ; returns true if CPT should have a 26-modifier for professional bill
; |
|
MOD26Q | ||
DELMOD(IBIFN,BCPT,MOD) | ; delete the modifier from the CPT
; Input: BCPT - the ifn of the CPT in the 304 multiple ; MOD - internal form of the modifier to delete |
|
ADDMOD(IBIFN,BCPT,MOD) | ; add the modifier to the CPT
; Input: BCPT - the ifn of the CPT in the 304 multiple ; MOD - internal form of the modifier to add |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGCR(399 - [#399] | CPTMOD26+2, CPTMOD26+3, CPTMOD26+4, CPTMOD26+12, CPTMOD26+13, DELMOD+4, ADDMOD+4, ADDMOD+7, ADDMOD+9 |
^IBA(363.2 - [#363.2] | CPTMOD26+19 |
^IBE(363.1 - [#363.1] | CPTMOD26+9, CPTMOD26+10 |
Name | Line Occurrences |
---|---|
$$MOD26 | CPTMOD26+17 |
ADDMOD | CPTMOD26+24 |
DELMOD | CPTMOD26+23 |
MOD26Q | MOD26+2 |
Name | Field # of Occurrence |
---|---|
^( | ADDMOD+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
BCPT | DELMOD~, DELMOD+4, DELMOD+6, ADDMOD~, ADDMOD+4, ADDMOD+7, ADDMOD+9, ADDMOD+11, ADDMOD+13, ADDMOD+14 |
CPT | MOD26~, MOD26+2, MOD26+3, MOD26+4, MOD26+5, MOD26+11 |
DA | DELMOD+3~, DELMOD+6*, ADDMOD+3~, ADDMOD+10~, ADDMOD+13* |
DA(1 | DELMOD+6*, ADDMOD+11*, ADDMOD+13*, ADDMOD+14* |
DA(2 | DELMOD+6*, ADDMOD+11*, ADDMOD+13*, ADDMOD+14* |
DD | ADDMOD+10~, ADDMOD+12! |
DIC | DELMOD+3~, ADDMOD+3~, ADDMOD+11*, ADDMOD+13, ADDMOD+14* |
DIC("DR" | ADDMOD+12*, ADDMOD+14* |
DIC(0 | ADDMOD+12*, ADDMOD+14* |
DIE | DELMOD+3~, DELMOD+6*, ADDMOD+3~, ADDMOD+13* |
DINUM | ADDMOD+3~, ADDMOD+10~, ADDMOD+12*, ADDMOD+14* |
DO | ADDMOD+10~, ADDMOD+12! |
DR | DELMOD+3~, DELMOD+6*, ADDMOD+3~, ADDMOD+13* |
DT | MOD26+2 |
IB0 | CPTMOD26+1~, CPTMOD26+3*, CPTMOD26+7 |
IB26 | CPTMOD26+1~, CPTMOD26+21*, CPTMOD26+23, CPTMOD26+24 |
>> IBAUTO | CPTMOD26+26 |
IBBCPT | CPTMOD26+1~, CPTMOD26+12*, CPTMOD26+13, CPTMOD26+21, CPTMOD26+23, CPTMOD26+24 |
IBBCT | CPTMOD26+1~, CPTMOD26+3*, CPTMOD26+23, CPTMOD26+24 |
IBBU | CPTMOD26+1~, CPTMOD26+4*, CPTMOD26+5, CPTMOD26+6 |
IBCHANGE | CPTMOD26+1~*, CPTMOD26+23*, CPTMOD26+24*, CPTMOD26+26 |
IBCPM | ADDMOD+3~, ADDMOD+8*, ADDMOD+9*, ADDMOD+12, ADDMOD+13 |
IBCPTX | MOD26+2~*, MOD26+6, MOD26+8, MOD26+9, MOD26+10, MOD26+13 |
IBCSI | CPTMOD26+1~, CPTMOD26+9*, CPTMOD26+19 |
IBCSP | CPTMOD26+1~, CPTMOD26+10*, CPTMOD26+19 |
IBDT | MOD26~, MOD26+2*, MOD26+13 |
IBEND | CPTMOD26+1~, CPTMOD26+4*, CPTMOD26+6, CPTMOD26+15 |
IBEVDT | CPTMOD26+1~, CPTMOD26+13*, CPTMOD26+14, CPTMOD26+15, CPTMOD26+17, CPTMOD26+19 |
IBIFN | CPTMOD26~, CPTMOD26+2, CPTMOD26+3, CPTMOD26+4, CPTMOD26+12, CPTMOD26+13, CPTMOD26+21, CPTMOD26+23, CPTMOD26+24, DELMOD~ , DELMOD+4, DELMOD+6, ADDMOD~, ADDMOD+4, ADDMOD+7, ADDMOD+9, ADDMOD+11, ADDMOD+13, ADDMOD+14 |
IBLN | CPTMOD26+1~, CPTMOD26+13*, CPTMOD26+17, CPTMOD26+19, DELMOD+3~, DELMOD+4*, DELMOD+6, ADDMOD+3~, ADDMOD+4* |
IBM | ADDMOD+3~, ADDMOD+9*, ADDMOD+12 |
IBMODS | CPTMOD26+1~, CPTMOD26+21*, CPTMOD26+23, CPTMOD26+24 |
IBX | CPTMOD26+1~, CPTMOD26+9*, CPTMOD26+10*, CPTMOD26+19*, MOD26+2~*, MOD26+3*, MOD26+4*, MOD26+5*, MOD26+6*, MOD26+8* , MOD26+9*, MOD26+10*, MOD26+11*, MOD26+13*, MOD26Q |
MOD | DELMOD~, DELMOD+3, DELMOD+4, ADDMOD~, ADDMOD+3, ADDMOD+4, ADDMOD+14 |
U | CPTMOD26+3, CPTMOD26+5, CPTMOD26+7, CPTMOD26+13, ADDMOD+9, ADDMOD+12 |
X | DELMOD+3~, ADDMOD+3~, ADDMOD+10~, ADDMOD+12*, ADDMOD+14* |
Y | DELMOD+3~, ADDMOD+3~, ADDMOD+10~, ADDMOD+13 |
>> ZTQUEUED | CPTMOD26+26 |