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

Package: Integrated Billing

Routine: IBCNBES


Information

IBCNBES ;ALB/ARH-Ins Buffer: stuff new entries/data into buffer ;1 Jun 97

Source Information

Source file <IBCNBES.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 2 FIELD^DID  FILE^DIE  
Integrated Billing 1 ($$ADD,DELEMP)^IBCNBEE  
Kernel 1 DUZ^XUP  

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

Package Total Caller Graph
Integrated Billing 8 IBCNBES1  IBCNBLA1  IBCNBME  IBCNEBF  IBCNEHL7  IBCNEQU  IBCNRDV  IBCNSMM1  
Income Verification Match 1 IVMLINS3  

Entry Points

Name Comments DBIA/ICR reference
ADDSTF(IBSOURCE,DFN,IBDATA) ; add new entry to Insurance Buffer file (355.33) and stuff the data passed in, no user interaction
; IBSOURCE = source of information (required)
; 1 = interview 2 = data match
; 3 = ivm 4 = pre-registration
; 5 = eIV
; DFN = patient's ifn in file 2 (required)
; IBDATA = data to file in Buffer in an array subscripted by field number of the data field in 355.33
; ex: IBDATA(20.01)="Insurance Company Name", etc,
; returns ien of new entry or 0 followed by error if entry not added
  • ICR #2537
    • Status: Active
    • Usage: Private
    EXIT
    EDITSTF(IBBUFDA,IBDATA) ; loop though data array and stuff each buffer field, no user interaction
    FLDCHK(FILE,FIELD,VALUE) ; minor checks on data: truncate if length too long, if pointer add ' so can be processed as external format
    FLDCHKQ

    External References

    Name Field # of Occurrence
    FIELD^DID FLDCHK+3
    FILE^DIE EDITSTF+9, EDITSTF+17
    $$ADD^IBCNBEE ADDSTF+20
    DELEMP^IBCNBEE ADDSTF+31
    DUZ^XUP ADDSTF+26

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DPT - [#2] ADDSTF+16
    ^IBA(355.33 - [#355.33] ADDSTF+31, EDITSTF+2

    Label References

    Name Line Occurrences
    $$FLDCHK EDITSTF+7, EDITSTF+15
    EDITSTF ADDSTF+28
    EXIT ADDSTF+15, ADDSTF+16, ADDSTF+17, ADDSTF+20
    FLDCHKQ FLDCHK+2, FLDCHK+4, FLDCHK+5

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    DFN ADDSTF~, ADDSTF+16, ADDSTF+22
    DUZ ADDSTF+26
    FIELD FLDCHK~, FLDCHK+3
    FILE FLDCHK~, FLDCHK+3
    IBARR EDITSTF+2~, EDITSTF+9, EDITSTF+16!
    IBARR( EDITSTF+8*, EDITSTF+16*
    IBATTR FLDCHK+1~
    IBATTR("FIELD LENGTH" , FLDCHK+6
    IBATTR("SPECIFIER" FLDCHK+5
    IBBUFDA ADDSTF+12~, ADDSTF+20*, ADDSTF+28, ADDSTF+31, EXIT, EDITSTF~, EDITSTF+2, EDITSTF+8, EDITSTF+16
    IBDATA ADDSTF~, ADDSTF+17, ADDSTF+28, EDITSTF~
    IBDATA( ADDSTF+22*, EDITSTF+4, EDITSTF+7, EDITSTF+12, EDITSTF+14, EDITSTF+15
    IBERR EDITSTF+2~, FLDCHK+1~, FLDCHK+4
    IBERR("DIERR" FLDCHK+4
    IBERROR ADDSTF+12~, ADDSTF+15*, ADDSTF+16*, ADDSTF+17*, ADDSTF+20*, EXIT
    IBFIELD EDITSTF+2~, EDITSTF+4*, EDITSTF+6, EDITSTF+7, EDITSTF+8
    IBSOURCE ADDSTF~, ADDSTF+15, ADDSTF+20
    IBSUBIDF EDITSTF+13~, EDITSTF+14*, EDITSTF+15, EDITSTF+16
    IBVALUE EDITSTF+2~, EDITSTF+7*, EDITSTF+8, EDITSTF+15*, EDITSTF+16
    IBX FLDCHK+1~*, FLDCHK+2*, FLDCHK+4*, FLDCHK+5*, FLDCHK+6*, FLDCHKQ
    U EDITSTF+8, EDITSTF+16
    VALUE FLDCHK~, FLDCHK+1, FLDCHK+2, FLDCHK+5, FLDCHK+6
    X ADDSTF+12~
    Y ADDSTF+12~
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All