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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: IBJD1

Package: Integrated Billing

Routine: IBJD1


Information

IBJD1 ;ALB/MR - DIAGNOSTIC MEASURES UTILITIES ;16-DEC-00

Source Information

Source file <IBJD1.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Integrated Billing 2 ($$CHK,$$COB)^IBCNS1  $$SCE^IBSDU  
Registration 2 DEM^VADPT  $$PRIM^VASITE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
Integrated Billing 6 IBJDB21  IBJDF41  IBJDF51  IBJDF61  IBJDF8I  IBJDF8I1  
Accounts Receivable 1 RCDMBWLA  

Entry Points

Name Comments DBIA/ICR reference
PAYQ
VA(DFN) ; - Is patient a VA employee?
; Input: DFN - Pointer to the Patient file
; IBEXCEL - Optional global Variable (Print to an Excel format)
; Output: VAEMP - "E" (if IBEXCEL) or "*" - VA employee
DIV(CLM) ; Returns the Medical Center Division for the Claim
; Input: CLM - Pointer to Claim Tracking File (#356)
QDIV
QINS
CATTYP(IBBCAT) ; - Break down AR Categories into First or Third party
  • ICR #3345
    • Status: Active
    • Usage: Private
    INS(DFN,DTE) ; return the Insurance Company for the Patient on DTE (date)
    VAQ
    PYMT(X) ; - Return most recent bill payment.
    ; Input: X=Bill pointer to file #399/#430
    ; Output: Y=Payment date in Fileman format ^ Payment amount

    External References

    Name Field # of Occurrence
    $$CHK^IBCNS1 INS+6
    $$COB^IBCNS1 INS+11
    $$SCE^IBSDU DIV+14
    DEM^VADPT VA+7
    $$PRIM^VASITE QDIV

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DGPM - [#405] DIV+11
    ^DIC(36 - [#36] INS+13
    ^DIC(42 - [#42] DIV+11
    ^DPT - [#2] INS+4, INS+5
    ^IBT(356 - [#356] DIV+6
    ^PRCA(430.2 - [#430.2] CATTYP+5, CATTYP+6
    ^PRCA(433 - [#433] PYMT+6, PYMT+7
    ^PRSPC - [#450] VA+9
    ^PRSPC("SSN" VA+8

    Label References

    Name Line Occurrences
    PAYQ PYMT+4
    QINS INS+9
    VAQ VA+6, VA+7, VA+8

    Naked Globals

    Name Field # of Occurrence
    ^( INS+4

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    ADM DIV+4~, DIV+8*, DIV+11
    CLM DIV~, DIV+6
    DFN VA~, VA+6, INS~, INS+4, INS+5
    DIV DIV+4~, DIV+6*, DIV+11*, DIV+14*, QDIV*, QDIV+1
    DTE INS~, INS+6
    ELMD VA+5~
    ENC DIV+4~, DIV+7*, DIV+14
    IBBCAT CATTYP~, CATTYP+4, CATTYP+5, CATTYP+6, CATTYP+8, CATTYP+9
    IBBTYP CATTYP+2~, CATTYP+3*, CATTYP+6*, CATTYP+7
    IBCATDA0 CATTYP+2~, CATTYP+6*
    >> IBEXCEL VA+9
    IBFOTP CATTYP+2~, CATTYP+3*, CATTYP+4, CATTYP+5, CATTYP+7*, CATTYP+8*, CATTYP+9*, CATTYP+10
    IEN VA+5~, VA+8*, VA+9
    INS INS+2~, INS+3*, INS+13*, QINS
    POL INS+2~, INS+11
    POL( INS+7*, INS+13
    POL(0 INS+7*, INS+9, INS+10, INS+11
    PRSC DIV+4~
    PRST DIV+4~
    SSN VA+5~, VA+7*, VA+8
    U VA+9, PYMT+8, PYMT+9, PYMT+10, DIV+11
    VADM VA+5~
    VADM(2 VA+7
    VAEMP VA+5~, VA+6*, VA+9*, VAQ
    X PYMT~, PYMT+4, PYMT+6, INS+2~, INS+3*, INS+4*, INS+5, INS+7, DIV+4~, DIV+6*
    , DIV+7, DIV+8
    X0 INS+2~, INS+5*, INS+6, INS+7
    X1 PYMT+4~, PYMT+5*, PYMT+6*, PYMT+7
    X2 PYMT+4~, PYMT+7*, PYMT+8
    X3 PYMT+4~, PYMT+7*, PYMT+9, PYMT+10
    Y PYMT+4~*, PYMT+6, PYMT+10*, PAYQ, INS+2~, INS+10*, INS+11*, INS+13
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All