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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: IBCU81

Package: Integrated Billing

Routine: IBCU81


Information

IBCU81 ;ALB/ARH - THIRD PARTY BILLING UTILITIES (AUTOMATED BILLER) ;02 JUL 93

Source Information

Source file <IBCU81.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Integrated Billing 8 $$BILLCK^IBAMTEDU  $$BILLED^IBCU8  ($$EXSET,$$NABCT,$$NABST)^IBEFUNC  $$BDSRC^IBEFUNC3  ($$FILE,$$ZEROSUB)^IBRXUTL  $$SCE^IBSDU  $$EXPAND^IBTRE  $$CL^IBTRKR41  
Scheduling 1 GETDX^SDOE  
VA FileMan 1 C^%DTC  

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

Package Total Caller Graph
Integrated Billing 7 IBCCPT  IBCD  IBCD1  IBCD2  IBCD5  IBCU82  IBOMHC  

Entry Points

Name Comments DBIA/ICR reference
EABD(IBETYP,IBTDT) ; -- compute earliest auto bill date: date entered plus days delay for event type
EABDQ
EVBILL(IBTRN) ;check if event is auto billable, return EABD if it is, the difference between this and BILL^IBTUTL is that
BILLQ
RXRF(IBTRN) ; returns rx # and fill date for given claims tracking rx entry
NABSCT(IBTRN) ; -- true if CT outpatient visit should NOT be auto billed, based only on stop (1) and clinic (2) auto billable
; returns true only for those stops (352.3) and clinics (352.4) specifically flagged as not auto billable
NBOE(IBOE,IBOE0) ; returns true if outpatient encounter is non-billable, "" otherwise
; input: IBOE - pointer to encounter (409.68)
; IBOE0 - 0-node of the encounter (optional)
; output: "" or x^message, where x=1 if SC, x=2 if NB Stop code, x=3 if NB Clinic, x=4 if NB Appt Status
NBOEQ
OEDX(IBOE,IBDXA,IBDXB) ; returns arrays containing encounters diagnosis (includes duplicates)
; IBDXA(ORDER,DATE/TIME,IBOE,DX IFN)=DX ^ PCE ORDER ^ IBOE ^ DATE/TIME ^ TRUE IF NON-BILLABLE ^ NB MES ^ CLINIC
; IBDXB(IBDX) = 1 for each billable dx found

External References

Name Field # of Occurrence
C^%DTC EABD+9
$$BILLCK^IBAMTEDU NBOE+10
$$BILLED^IBCU8 EVBILL+6
$$EXSET^IBEFUNC EVBILL+9
$$NABCT^IBEFUNC NABSCT+5
$$NABST^IBEFUNC NABSCT+4
$$BDSRC^IBEFUNC3 OEDX+7
$$FILE^IBRXUTL RXRF+2, RXRF+3
$$ZEROSUB^IBRXUTL RXRF+4
$$SCE^IBSDU NABSCT+3, NBOE+6, OEDX+6
$$EXPAND^IBTRE NBOE+11
$$CL^IBTRKR41 NBOE+13
GETDX^SDOE OEDX+10

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] EVBILL+6
^IBE(356.6 - [#356.6] EABD+7
^IBE(356.8 - [#356.8] EVBILL+10
^IBT(356 - [#356] EVBILL+3, EVBILL+12, RXRF+2, NABSCT+2

Label References

Name Line Occurrences
$$EABD EVBILL+13
$$NBOE OEDX+8
BILLQ EVBILL+3, EVBILL+6, EVBILL+9, EVBILL+10, EVBILL+11
EABDQ EABD+6
NBOEQ NBOE+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN NBOE+4~, NBOE+8*
DT EABD+7, EVBILL+12, NABSCT+4, NABSCT+5
E EVBILL+3~*, EVBILL+6*, EVBILL+9*, EVBILL+10*, EVBILL+11*, BILLQ
IBAPST NBOE+4~, NBOE+11*, NBOE+13*, NBOE+14
IBCK NBOE+4~, NBOE+10
IBCK( NBOE+9*
IBDT NBOE+4~, NBOE+8*, OEDX+4~, OEDX+6*, OEDX+13
IBDXA OEDX~
IBDXA( OEDX+13*
IBDXB OEDX~
IBDXB( OEDX+14*
IBDXN OEDX+4~, OEDX+11*, OEDX+12, OEDX+13
IBETYP EABD~, EABD+6, EABD+7
IBETYPD EABD+6~, EABD+7*, EABD+8
IBNBOE OEDX+4~, OEDX+8*, OEDX+13, OEDX+14
IBOE NBOE~, NBOE+6, NBOE+10, OEDX~, OEDX+5, OEDX+6, OEDX+8, OEDX+10, OEDX+13
IBOE0 NBOE~, NBOE+6*, NBOE+7, NBOE+8, NBOE+10, NBOE+11, NBOE+13, OEDX+4~, OEDX+6*, OEDX+7
, OEDX+8, OEDX+13
IBOED NBOE+4~
IBOEP NBOE+4~
IBPB NBOE+4~, NBOE+10, NBOE+11, NBOE+13*, NBOE+14
IBPCE OEDX+4~, OEDX+12*, OEDX+13, OEDX+14
IBPCEI OEDX+4~, OEDX+12*, OEDX+13
IBPOV OEDX+4~
IBPOV( OEDX+11, OEDX+12
IBTDT EABD~, EABD+7*, EABD+9
IBTRN EVBILL~, EVBILL+3, EVBILL+6, EVBILL+12, RXRF~, RXRF+2, NABSCT~, NABSCT+2
IBTRND EVBILL+3~*, EVBILL+9, EVBILL+10, EVBILL+11, EVBILL+13, NABSCT+2~*, NABSCT+3
IBX RXRF+1~, RXRF+2*, RXRF+3, RXRF+4, NABSCT+2~*, NABSCT+4*, NABSCT+5*, NABSCT+6, NBOE+4~, NBOE+5*
, NBOE+14*, NBOEQ
IBY RXRF+1~*, RXRF+2*, RXRF+3, RXRF+4, NABSCT+2~, NABSCT+3*, NABSCT+4, NABSCT+5
IBZ RXRF+1~, RXRF+3*, RXRF+4*, NBOE+4~, NBOE+9*, NBOE+10*
IBZERR OEDX+4~
U EVBILL+6, EVBILL+9, EVBILL+10, EVBILL+11, EVBILL+13, RXRF+2, RXRF+3, RXRF+4, NABSCT+3, NABSCT+4
, NABSCT+5, NBOE+11, OEDX+7, OEDX+12, OEDX+13
X EABD+6~, EABD+9, EVBILL+3~*, EVBILL+13*, BILLQ, RXRF+1~*, RXRF+3*, RXRF+4*, RXRF+5, OEDX+4~
X1 EABD+6~, EABD+9*
X2 EABD+6~, EABD+8*
Y EABD+6~*, EABD+9*, EABDQ, EVBILL+3~*, EVBILL+6*, EVBILL+12*, EVBILL+13
Z EVBILL+3~, EVBILL+6*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All