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

Package: Integrated Billing

Routine: IBCNBME


Information

IBCNBME ;ALB/ARH-Ins Buffer: external entry points, add/edit buffer ;1 Jun 97

Source Information

Source file <IBCNBME.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Integrated Billing 8 (GRP,INS,POLICY)^IBCNBEE  $$ADDSTF^IBCNBES  ($$DICBUF,$$LOCK,UNLOCK)^IBCNBU1  BUFF^IBCNEUT2  $$INSERROR^IBCNEUT3  COVERED^IBCNSM31  ENR^IBCNSMM  $$ASKCOVD^IBCNSP2  
Kernel 1 $$UP^XLFSTR  
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: 3

Package Total Caller Graph
Registration 2 DGRPCE  DGRPE  
Integrated Billing 1 IBCNSP2  

Entry Points

Name Comments DBIA/ICR reference
FEE(DFN) ; ENTRY FOR FEE BASIS: add/edit a buffer entry
REG(DFN) ; ENTRY FOR REGISTRATION: add/edit a buffer entry
  • ICR #2538
    • Status: Active
    • Usage: Private
    PREG(DFN) ; ENTRY FOR PRE-REGISTRATION: add/edit a buffer entry
  • ICR #2538
    • Status: Active
    • Usage: Private
    EDADD(IBSOURCE,DFN) ; add or select a specific patient's buffer entry then edit all data
    ; IBSOURCE = 1-interview, 2-data match, 3-ivm, 4-pre-reg, 5-eiiv
    HELP ;
    NEW(DFN,INSNAME,SOURCE) ; ask then add new insurance buffer entry
    EDIT() ; ask user if they want to edit an existing buffer entry
    ; returns 0 if don't want to edit, -1 if trys to exit, 1 if wants to edit existing buffer entry
    DISPLAY ;
    INSCOV(DFN) ; return true if covered by insurance is yes, false if not covered or user ^ out
    ; allow user to edit 'Covered By Insurance' question (2,.3192), then auto correct if if they were wrong
    ; (primarily needed because this field an inconsistancy check in registration so it must have a value)

    External References

    Name Field # of Occurrence
    ^DIR EDADD+6, NEW+2, EDIT+3
    GRP^IBCNBEE EDADD+21
    INS^IBCNBEE EDADD+20
    POLICY^IBCNBEE EDADD+22
    $$ADDSTF^IBCNBES NEW+3
    $$DICBUF^IBCNBU1 EDADD+13, HELP+3
    $$LOCK^IBCNBU1 EDADD+18
    UNLOCK^IBCNBU1 EDADD+27
    BUFF^IBCNEUT2 EDADD+25
    $$INSERROR^IBCNEUT3 EDADD+25
    COVERED^IBCNSM31 INSCOV+6
    ENR^IBCNSMM EDADD+11
    $$ASKCOVD^IBCNSP2 INSCOV+5
    $$UP^XLFSTR EDADD+8

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!
    • Line Location: EDADD+16
    Function Call: WRITE
    • Prompt: !
    • Line Location: EDADD+20
    Function Call: WRITE
    • Prompt: !
    • Line Location: EDADD+21
    Function Call: WRITE
    • Prompt: !!,"You may add a new Insurance Buffer entry or edit an entry you have already ",!,"created for this patient. Insurance Company name must be 3-30 characters.",!
    • Line Location: HELP+1
    Function Call: WRITE
    • Prompt: "To 'fast enter' Medicare coverage information, please enter 'MEDICARE (WNR)'.",!
    • Line Location: HELP+2
    Function Call: WRITE
    • Prompt: !
    • Line Location: NEW+1
    Function Call: WRITE
    • Prompt: !
    • Line Location: EDIT+2
    Function Call: WRITE
    • Prompt: !!,?2,"This option adds or edits insurance information in the Insurance Buffer File."
    • Line Location: DISPLAY+2
    Function Call: WRITE
    • Prompt: !,?2,"This is a temporary file that will hold all new insurance information until"
    • Line Location: DISPLAY+3
    Function Call: WRITE
    • Prompt: !,?2,"authorized insurance personnel can coordinate this new information with the"
    • Line Location: DISPLAY+4
    Function Call: WRITE
    • Prompt: !,?2,"patient's existing insurance. You may add a new Buffer entry or edit a"
    • Line Location: DISPLAY+5
    Function Call: WRITE
    • Prompt: !,?2,"Buffer entry that you previously created for this patient if that entry"
    • Line Location: DISPLAY+6
    Function Call: WRITE
    • Prompt: !,?2,"has not yet been processed by insurance personnel."
    • Line Location: DISPLAY+7
    Function Call: WRITE
    • Prompt: !!,?2,"Please enter all available insurance information.",!!
    • Line Location: DISPLAY+8
    Routine Call
    • DIR
    • Line Location:
      • EDADD+6
      • NEW+2
      • EDIT+3

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DPT - [#2] FEE+1, REG+1, PREG+1, EDADD+2

    Label References

    Name Line Occurrences
    $$EDIT EDADD+13
    $$INSCOV FEE+2, REG+2, PREG+2
    $$NEW EDADD+15
    DISPLAY FEE+3, REG+3, PREG+3
    EDADD FEE+4, REG+4, PREG+4

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    DFN FEE~, FEE+1, FEE+2, FEE+4, REG~, REG+1, REG+2, REG+4, PREG~, PREG+1
    , PREG+2, PREG+4, EDADD~, EDADD+2, EDADD+11, EDADD+13, EDADD+15, HELP+3, NEW~, NEW+3
    , INSCOV~, INSCOV+5, INSCOV+6
    DIR EDADD+2~, NEW+1~, EDIT+2~
    DIR("?" EDADD+5*
    DIR("A" EDADD+6*, NEW+2*, EDIT+3*
    DIR("B" NEW+2*, EDIT+3*
    DIR(0 EDADD+6*, NEW+2*, EDIT+3*
    DIRUT EDADD+2~, EDADD+6, NEW+1~, EDIT+2~, EDIT+3
    DTOUT EDIT+2~
    DUOUT EDIT+2~
    DUZ EDADD+13, HELP+3
    IBBUFDA EDADD+2~, EDADD+8*, EDADD+13*, EDADD+15*, EDADD+16, EDADD+18, EDADD+20, EDADD+21, EDADD+22, EDADD+25
    , EDADD+27
    IBCOV1 INSCOV+4~, INSCOV+5, INSCOV+6
    IBDATA NEW+1~, NEW+3
    IBDATA( NEW+3*
    IBINSNM EDADD+2~, EDADD+8*, EDADD+11, EDADD+13, EDADD+15
    IBSOURCE EDADD~, EDADD+2, EDADD+11, EDADD+15
    IBX EDADD+2~, EDADD+13*, NEW+1~*, NEW+3*, NEW+4, EDIT+2~*, EDIT+3*, EDIT+4, INSCOV+4~*, INSCOV+5*
    , INSCOV+7
    IBY EDADD+2~, EDADD+13*, INSCOV+4~, INSCOV+5*
    INSNAME NEW~, NEW+3
    SOURCE NEW~, NEW+3
    X EDADD+2~, NEW+1~, EDIT+2~
    Y EDADD+2~, EDADD+6, EDADD+8, NEW+1~, NEW+3, EDIT+2~, EDIT+3
    Z HELP+1~, HELP+3*
    Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All