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: IBCRBC3

Package: Integrated Billing

Routine: IBCRBC3


Information

IBCRBC3 ;ALB/ARH - RATES: BILL CALCULATION SORT/STORE ;22-MAY-1996

Source Information

Source file <IBCRBC3.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Integrated Billing 4 $$ADDRC^IBCRBF  $$EMUTL^IBCRU1  DEFAULT^IBCSC5C  $$NAME^IBCSC61  
CPT HCPCS Codes 1 $$CPT^ICPTCOD  
VA FileMan 1 ^DIK  

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: 1

Package Total Caller Graph
Integrated Billing 1 IBCRBC  

Entry Points

Name Comments DBIA/ICR reference
SORTCI ; process charge array - create new array sorted by bedsection and revenue code
; if bs, rv cd, unit charge, cpt, div, item type, item ptr and component all match then charge is combined
; Input: TMP($J,"IBCRCC",X) = ... (from IBCRBC2)
; Output: TMP($J,"IBCRCS",BS,RV CD,Y) =
; RV CD PTR ^ BS PTR ^ UNIT $ ^ UNITS ^ CPT ^ DIV ^ ITEM TYPE ^ ITEM PTR ^ CHARGE COMPONENT
ADDBCHGS(IBIFN) ; store all auto calculated charges: add charges to bill: sets RC multiple
; Input: TMP($J,"IBCRCS",BS,RV CD,X) = ... (from SORTCI)
CLEANRX(IBIFN) ; Clean up any procedures left over from deleted Rx entries
DSPDL ;
DSPHDR ;
DSPLN(LN) ;

External References

Name Field # of Occurrence
^DIK CLEANRX+2
$$ADDRC^IBCRBF ADDBCHGS+16
$$EMUTL^IBCRU1 DSPLN+3
DEFAULT^IBCSC5C ADDBCHGS+19
$$NAME^IBCSC61 DSPLN+3
$$CPT^ICPTCOD DSPLN+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Removing old Revenue Codes and Rate Schedules..."
  • Line Location: DSPDL+2
Function Call: WRITE
  • Prompt: !,"Updating Revenue Codes and Charges"
  • Line Location: DSPHDR+2
Function Call: WRITE
  • Prompt: !,?9,"Rev Code",?19,"Units",?31,"Charge",?41,"Bedsection"
  • Line Location: DSPHDR+3
Function Call: WRITE
  • Prompt: !,"Adding",?11,RVCD,?19,$J($P(LN,U,3),3),?28,"$",$J($P(LN,U,2),8,2),?41,$E(BS,U,26),?69,$E(ITM,1,11)
  • Line Location: DSPLN+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399.2 - [#399.2] DSPLN+3
^TMP("IBCRRX" CLEANRX+2, CLEANRX+3!
^TMP($J SORTCI+6!, SORTCI+8, SORTCI+10, SORTCI+18, SORTCI+19, SORTCI+26*, ADDBCHGS+7, ADDBCHGS+8, ADDBCHGS+9, ADDBCHGS+10

Label References

Name Line Occurrences
CLEANRX ADDBCHGS+22
DSPHDR ADDBCHGS+5
DSPLN ADDBCHGS+20

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BS DSPLN+2~, DSPLN+3*, DSPLN+5
DA CLEANRX+1~, CLEANRX+2*
DA(1 CLEANRX+2*
DIK CLEANRX+1~, CLEANRX+2*
DT DSPLN+4
>> IBAUTO DSPDL+1, DSPHDR+1, DSPLN+1
IBAUTOAD ADDBCHGS+3~, ADDBCHGS+13*, ADDBCHGS+16
IBBS SORTCI+6~, SORTCI+13*, SORTCI+18, SORTCI+19, SORTCI+26, ADDBCHGS+3~, ADDBCHGS+13*, ADDBCHGS+16, ADDBCHGS+20
IBCHG SORTCI+6~, SORTCI+13*, SORTCI+20, SORTCI+26, ADDBCHGS+3~, ADDBCHGS+13*, ADDBCHGS+16, ADDBCHGS+20
IBCMPNT ADDBCHGS+3~, ADDBCHGS+14*, ADDBCHGS+16
IBCMPT SORTCI+6~, SORTCI+15*, SORTCI+20, SORTCI+26
IBCPT SORTCI+6~, SORTCI+15*, SORTCI+20, SORTCI+26, ADDBCHGS+3~, ADDBCHGS+14*, ADDBCHGS+16, ADDBCHGS+20
IBDIV ADDBCHGS+3~, ADDBCHGS+14*, ADDBCHGS+16
IBDV SORTCI+6~, SORTCI+15*, SORTCI+20, SORTCI+26
IBI SORTCI+6~, SORTCI+8*, SORTCI+10, ADDBCHGS+3~, ADDBCHGS+7*, ADDBCHGS+8, ADDBCHGS+9, ADDBCHGS+10
IBIFN ADDBCHGS~, ADDBCHGS+16, ADDBCHGS+19, ADDBCHGS+22, CLEANRX~, CLEANRX+2
IBIP SORTCI+6~, SORTCI+15*, SORTCI+20, SORTCI+26
IBIPTR ADDBCHGS+3~, ADDBCHGS+14*, ADDBCHGS+16, ADDBCHGS+19, ADDBCHGS+20
IBIT SORTCI+6~, SORTCI+15*, SORTCI+20, SORTCI+26
IBITYP ADDBCHGS+3~, ADDBCHGS+14*, ADDBCHGS+16, ADDBCHGS+19, ADDBCHGS+20
IBJ SORTCI+6~, SORTCI+18*, SORTCI+19, ADDBCHGS+3~, ADDBCHGS+8*, ADDBCHGS+9, ADDBCHGS+10
IBK SORTCI+6~, SORTCI+17*, SORTCI+19*, SORTCI+23*, SORTCI+26, ADDBCHGS+3~, ADDBCHGS+9*, ADDBCHGS+10
IBLN SORTCI+6~, SORTCI+10*, SORTCI+13, SORTCI+15, ADDBCHGS+3~, ADDBCHGS+10*, ADDBCHGS+13, ADDBCHGS+14
IBRCFN ADDBCHGS+3~, ADDBCHGS+16*, ADDBCHGS+18, ADDBCHGS+19
IBRVCD SORTCI+6~, SORTCI+13*, SORTCI+18, SORTCI+19, SORTCI+26, ADDBCHGS+3~, ADDBCHGS+13*, ADDBCHGS+16, ADDBCHGS+20
IBTUNITS SORTCI+6~, SORTCI+17*, SORTCI+18, SORTCI+21*, SORTCI+23, SORTCI+24*, SORTCI+26
IBUNITS SORTCI+6~, SORTCI+13*, SORTCI+24, ADDBCHGS+3~, ADDBCHGS+13*, ADDBCHGS+16, ADDBCHGS+20
IBX SORTCI+6~, SORTCI+19*, SORTCI+20, SORTCI+21, ADDBCHGS+3~, ADDBCHGS+20*
ITM DSPLN+2~, DSPLN+3*, DSPLN+4*, DSPLN+5
LN DSPLN~, DSPLN+2*, DSPLN+3, DSPLN+4, DSPLN+5
RVCD DSPLN+2~, DSPLN+3*, DSPLN+5
U SORTCI+13, SORTCI+15, SORTCI+20, SORTCI+21, SORTCI+26, ADDBCHGS+13, ADDBCHGS+14, ADDBCHGS+20, DSPLN+3, DSPLN+4
, DSPLN+5
Z ADDBCHGS+3~, CLEANRX+1~, CLEANRX+2*
>> ZTQUEUED DSPDL+1, DSPHDR+1, DSPLN+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All