Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: IBCU7A

Package: Integrated Billing

Routine: IBCU7A


Information

IBCU7A ;ALB/ARH - BILL PROCEDURE MANIPULATIONS ; 10-OCT-03

Source Information

Source file <IBCU7A.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Integrated Billing 8 $$COBN^IBCEF  $$CHGMOD^IBCRCU1  $$BILLRATE^IBCRU3  ($$RCDV,$$VERSDT)^IBCRU8  (ADDMOD,DELMOD)^IBCU73  BNDL^IBCU7A1  ($$ADDCPT,$$DELCPT,GETSD)^IBCU7U  ($$GETMOD,$$WNRBILL)^IBEFUNC  
CPT HCPCS Codes 1 $$MOD^ICPTMOD  
VA FileMan 1 ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Integrated Billing 6 IBCCC2  IBCD3  IBCSC4  IBCSC5  IBCSCE  IBNCPDP5  

Entry Points

Name Comments DBIA/ICR reference
PROC(IBIFN,EDIT) ; manipulate bill procedures base on charges and the clinical data
; EDIT is a flag for which manipulations should be completed, if true then only the charge significant manipulations are preformed
DELTC(IBIFN) ; delete TC modifier from all procedures on RC v2.0+ Institutional bills
DELCLN(IBIFN) ; remove clinical procedures from RC v2.0+ bills
; - remove from institutional bill any procedures with a 26 in the clinical data
; - remove from professional bill any procedures with a TC in the clinical data
; to delete a procedure the outpatient encounter pointer must match the clinical encounter
; (checks for non-modified procedure on bill in case modifier was manually removed)
ADDCLN(IBIFN) ; add 26 modified clinical procedures to RC v2.0+ bills
; - add to professional bill any procedures with a 26 in the clinical data
; to add the clinical procedure the bill must not already have that procedure for the date
; (checks for non-modified procedure on bill in case modifier was manually removed)
MOD26(IBIFN) ; add/delete modifier 26 to procedure if that is the only professional charge available
; added on professional bill, deleted from institutional bill
MODTC(IBIFN) ; add TC modifier to procedures on the institutional bill
; *564 remove TC modifier from procedures on the professional bill
MCRB(IBIFN) ; *619 - no TC modifier for Medicare
; input-IBIFN, output-1 if payer sequence is primary and 1st or 2nd payer is Medicare, otherwise 0
ASK(IBIFN) ; ask if the bill procedure modifications should be executed

External References

Name Field # of Occurrence
^DIR ASK+12
$$COBN^IBCEF MCRB+3
$$CHGMOD^IBCRCU1 MOD26+11, MODTC+13
$$BILLRATE^IBCRU3 PROC+6
$$RCDV^IBCRU8 PROC+8
$$VERSDT^IBCRU8 PROC+5, DELTC+3, DELCLN+8, ADDCLN+7, MOD26+4, MODTC+3
ADDMOD^IBCU73 MOD26+14, MODTC+15
DELMOD^IBCU73 DELTC+9, MOD26+13, MODTC+14
BNDL^IBCU7A1 PROC+19
$$ADDCPT^IBCU7U ADDCLN+19
$$DELCPT^IBCU7U DELCLN+21
GETSD^IBCU7U DELCLN+11, ADDCLN+9
$$GETMOD^IBEFUNC DELTC+8, MOD26+9, MODTC+12
$$WNRBILL^IBEFUNC MCRB+4
$$MOD^ICPTMOD DELTC+3, DELCLN+9, ADDCLN+7, MOD26+4, MODTC+6, MODTC+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Modifier TC Deleted from all Procedures ("_IBCHANGE_")."
  • Line Location: DELTC+10
Function Call: WRITE
  • Prompt: !,"Modifier "_IBMODE_" Procedures Deleted ("_IBCHANGE_")."
  • Line Location: DELCLN+22
Function Call: WRITE
  • Prompt: !,"Modifier 26 Procedures Added ("_IBCHANGE_")."
  • Line Location: ADDCLN+20
Function Call: WRITE
  • Prompt: !,"Modifier 26 "_$S(IBBCT=1:"Deleted from",1:"Added to")_" Procedures ("_IBCHANGE_")."
  • Line Location: MOD26+16
Function Call: WRITE
  • Prompt: !,"Modifier TC "_$S(IBBCT=2:"Deleted from",1:"Added to")_" Procedures ("_IBCHANGE_")."
  • Line Location: MODTC+16
Function Call: WRITE
  • Prompt: !!
  • Line Location: ASK+11
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+12
Routine Call
  • DIR
  • Line Location:
    • ASK+12

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] PROC+3, PROC+4, PROC+5, DELTC+2, DELTC+5, DELTC+6, DELCLN+7, DELCLN+18, DELCLN+19, DELCLN+20
, ADDCLN+6, ADDCLN+16, ADDCLN+17, ADDCLN+18, MOD26+3, MOD26+6, MOD26+7, MODTC+4, MODTC+9, MODTC+10
, ASK+2
^UTILITY($J PROC+21!, DELCLN+12, DELCLN+13, ADDCLN+10, ADDCLN+11

Label References

Name Line Occurrences
$$MCRB MODTC+15
ADDCLN PROC+11
DELCLN PROC+10
MOD26 PROC+17
MODTC PROC+15
PROC ASK+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR ASK+1~, ASK+12!
DIR("?" ASK+3*, ASK+4*, ASK+5*, ASK+6*, ASK+7*, ASK+8*, ASK+9*
DIR("A" ASK+11*
DIR("B" ASK+12*
DIR(0 ASK+12*
DIRUT ASK+1~
DTOUT ASK+1~
DUOUT ASK+1~
EDIT PROC~, PROC+2*, PROC+10, PROC+11
IB0 PROC+2~, PROC+4*, PROC+6, PROC+8, DELTC+1~, DELTC+2*, DELCLN+6~, DELCLN+7*, ADDCLN+5~, ADDCLN+6*
, MOD26+2~, MOD26+3*, MODTC+2~, MODTC+4*, MODTC+5
IB26 MOD26+2~, MOD26+4*, MOD26+11, MOD26+13, MOD26+14, MODTC+2~, MODTC+7*, MODTC+13
>> IBAUTO DELTC+10, DELCLN+22, ADDCLN+20, MOD26+16, MODTC+16
IBBCPT DELTC+1~, DELTC+5*, DELTC+6, DELTC+8, DELTC+9, DELCLN+6~, DELCLN+18*, DELCLN+19, DELCLN+20, DELCLN+21
, ADDCLN+5~, ADDCLN+16*, ADDCLN+17, ADDCLN+18, MOD26+2~, MOD26+6*, MOD26+7, MOD26+9, MOD26+13, MOD26+14
, MODTC+2~, MODTC+9*, MODTC+10, MODTC+12, MODTC+14, MODTC+15
IBBCT PROC+2~, PROC+4*, DELTC+1~, DELTC+2*, DELCLN+6~, DELCLN+7*, DELCLN+8, ADDCLN+5~, ADDCLN+6*, MOD26+2~
, MOD26+3*, MOD26+13, MOD26+14, MOD26+16, MODTC+2~, MODTC+5*, MODTC+14, MODTC+15, MODTC+16
IBCHANGE DELTC+1~*, DELTC+9*, DELTC+10, DELCLN+6~*, DELCLN+21*, DELCLN+22, ADDCLN+5~*, ADDCLN+19*, ADDCLN+20, MOD26+2~*
, MOD26+13*, MOD26+14*, MOD26+16, MODTC+2~, MODTC+3*, MODTC+14*, MODTC+15*, MODTC+16
IBCHGS MOD26+2~, MOD26+11*, MODTC+2~, MODTC+13*
IBCM DELCLN+6~, DELCLN+15*, DELCLN+17, ADDCLN+5~, ADDCLN+12*, ADDCLN+15
IBCOB MCRB+2~, MCRB+3*, MCRB+4
IBCPT DELCLN+6~, DELCLN+18*, ADDCLN+5~, ADDCLN+16*
IBEND DELCLN+6~, DELCLN+13*, DELCLN+18, DELCLN+20*, ADDCLN+5~, ADDCLN+11*, ADDCLN+16, ADDCLN+18*
IBEVDT DELTC+1~, DELTC+6*, DELTC+7, ADDCLN+5~, ADDCLN+12*, ADDCLN+13, ADDCLN+18, MOD26+2~, MOD26+7*, MOD26+8
, MOD26+11, MODTC+2~, MODTC+10*, MODTC+11, MODTC+13
IBFND DELCLN+6~, DELCLN+13*, DELCLN+20*, DELCLN+21, ADDCLN+5~, ADDCLN+11*, ADDCLN+18*, ADDCLN+19
IBIFN PROC~, PROC+3, PROC+4, PROC+5, PROC+10, PROC+11, PROC+15, PROC+17, PROC+19, DELTC~
, DELTC+2, DELTC+5, DELTC+6, DELTC+8, DELTC+9, DELCLN~, DELCLN+7, DELCLN+11, DELCLN+18, DELCLN+19
, DELCLN+20, DELCLN+21, ADDCLN~, ADDCLN+6, ADDCLN+9, ADDCLN+16, ADDCLN+17, ADDCLN+18, ADDCLN+19, MOD26~
, MOD26+3, MOD26+6, MOD26+7, MOD26+9, MOD26+11, MOD26+13, MOD26+14, MODTC~, MODTC+4, MODTC+9
, MODTC+10, MODTC+12, MODTC+13, MODTC+14, MODTC+15, MCRB~, MCRB+3, MCRB+4, ASK~, ASK+2
, ASK+12
IBLN DELTC+1~, DELTC+6*, DELCLN+6~, DELCLN+13*, DELCLN+14, DELCLN+15, DELCLN+18, ADDCLN+5~, ADDCLN+11*, ADDCLN+12
, ADDCLN+16, ADDCLN+19, MOD26+2~, MOD26+7*, MOD26+11, MODTC+2~, MODTC+10*, MODTC+13
IBLN1 DELCLN+6~, DELCLN+19*, DELCLN+20, ADDCLN+5~, ADDCLN+17*, ADDCLN+18
IBMCR MCRB+2~*, MCRB+4*, MCRB+5
IBMOD DELCLN+6~, DELCLN+9*, DELCLN+17, DELCLN+20, ADDCLN+5~, ADDCLN+7*, ADDCLN+15, ADDCLN+18
IBMODE DELCLN+6~, DELCLN+8*, DELCLN+9, DELCLN+22
IBMODS DELTC+1~, DELTC+8*, DELTC+9, MOD26+2~, MOD26+9*, MOD26+13, MOD26+14, MODTC+2~, MODTC+12*, MODTC+14
, MODTC+15
IBOE DELCLN+6~, DELCLN+15*, DELCLN+20
IBPBTYP PROC+2~, PROC+8*, PROC+10, PROC+11
IBTC DELTC+1~, DELTC+3*, DELTC+9, MODTC+2~, MODTC+6*, MODTC+14, MODTC+15
IBV2 DELTC+1~, DELTC+3*, DELTC+7, DELCLN+6~, DELCLN+8*, DELCLN+14, ADDCLN+5~, ADDCLN+7*, ADDCLN+13, MOD26+2~
, MOD26+4*, MOD26+8, MODTC+2~, MODTC+3*, MODTC+11
IBX DELCLN+6~, DELCLN+12*, DELCLN+13, ADDCLN+5~, ADDCLN+10*, ADDCLN+11
U PROC+4, PROC+5, PROC+6, PROC+8, DELTC+2, DELTC+6, DELCLN+7, DELCLN+14, DELCLN+15, DELCLN+20
, ADDCLN+6, ADDCLN+12, ADDCLN+18, MOD26+3, MOD26+7, MODTC+5, MODTC+10
X ASK+1~, ASK+12!
Y ASK+1~, ASK+12
>> ZTQUEUED DELTC+10, DELCLN+22, ADDCLN+20, MOD26+16, MODTC+16
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All