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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: IBCNBCD1

Package: Integrated Billing

Routine: IBCNBCD1


Information

IBCNBCD1 ;ALB/AWC - MCCF FY14 Display Annual Benefits from Insurance Buffer entry ;25 Feb 2015

Source Information

Source file <IBCNBCD1.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 4 FILE^DICN  (,FILE)^DIE  DT^DILF  ($$GET1,GETS)^DIQ  
Integrated Billing 2 $$READ^IBCNBAA  $$ABDISP^IBCNBCD3  
List Manager 1 PAUSE^VALM1  

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 IBCNBAA  

Entry Points

Name Comments DBIA/ICR reference
ANNBEN(IBBUFDA,IBGRPDA,IBASAV,IBQ,IBERR) ; Annual Benefits Entry point. - Called from routine ACANB^IBCNBAA
ABDTS(IBGRPDA,IBDTL) ; Display a list of Annual Benefits Years to select
ABDATA(IBDATE,IBIEN,IBDTL,IBDATA,IBERR) ; get the annual benefits data for the user selected date
ABDCRE(IBGRPDA,IBIEN,IBDATE,IBASAV,IBHOLD,IBDATA,IBERR) ; Display/Edit Annual Benefits for newly created date
ABEDIT(IBIEN,IBASAV,IBDATA,IBDATE,IBPOL,IBERR) ; -- Edit Patient Annual Benefits
ABEDT(IBIEN,IBGRPDA,IBDATE,IBPOL,IBERR) ; Main call to edit data in Annual Benefits via Input Template
ABUNDO(IBIEN,IBDATA,IBERR) ; - undo any annual benefits edits
ABGFLD(IBFLDS) ; Put fields into one string
ABSAVE(IBSYS,IBGSAV) ; -- save the global before editing
ABDIF(IBSYS,IBGSAV) ; -- check for any edits made to annual benefits
ABOUT(IBIEN) ; -- Set return variable and unlock global
ABCLN ; Clean up ^TMP globals
ABLKD ; -- write locked message
ABASK() ; Prompt to ask user to Save Changes
ASKREV() ; Prompt to ask user to Review the Annual Benefits
ABDEDT() ; ask user if they want to Edit the Annual Benefits
ASKYR() ; Prompt to Enter a New or Existing AB year
EDTYR(IBDATE) ; Prompt to Edit an Existing AB year
CREYR(IBDATE) ; Prompt to Create a new AB year

External References

Name Field # of Occurrence
FILE^DICN ABDCRE+7
^DIE ABDCRE+12, ABEDT+9
FILE^DIE ABUNDO+8
DT^DILF ABDTS+13
$$GET1^DIQ ANNBEN+2
GETS^DIQ ABDATA+14
$$READ^IBCNBAA ABASK+1, ASKREV+1, ABDEDT+3, ASKYR+1, EDTYR+1, CREYR+1
$$ABDISP^IBCNBCD3 ANNBEN+20
PAUSE^VALM1 ANNBEN+2, ABDATA+14, ABDCRE+7, ABUNDO+8, ABLKD+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Error... ANNBEN-IBCNBCD1 Cannot get Policy field: "_2.01
  • Line Location: ANNBEN+2
Function Call: WRITE
  • Prompt: !!,"Benefit year:",!
  • Line Location: ABDTS+29
Function Call: WRITE
  • Prompt: ?2,@IBDTL@(IBDT,IBIEN),!
  • Line Location: ABDTS+30
Function Call: WRITE
  • Prompt: !,"***Error...ABDATTA^IBCNBCD1 Cannot retrieve Annual Benefits data fields."
  • Line Location: ABDATA+14
Function Call: WRITE
  • Prompt: !,!,"***Error... ABDCRE^IBCNBCD1 - Cannot Create New Annual Benefit Record"
  • Line Location: ABDCRE+7
Function Call: WRITE
  • Prompt: !!,"---------------------- EDIT ANNUAL BENEFITS INFORMATION ----------------------",!
  • Line Location: ABEDT+3
Function Call: WRITE
  • Prompt: !,!,"***Error...ABUNDO^IBCNBCD1 - Cannot undo changes to the Annual Benefits file! ",!
  • Line Location: ABUNDO+8
Function Call: WRITE
  • Prompt: !!,"Sorry, another user currently editing this entry."
  • Line Location: ABLKD+1
Function Call: WRITE
  • Prompt: !,"Try again later."
  • Line Location: ABLKD+2
Routine Call
  • DIE
  • Line Location:
    • ABDCRE+12
    • ABEDT+9
Routine Call
  • DIE
  • Line Location:
    • ABUNDO+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBA(355.3 - [#355.3] GET1^DIQ
^IBA(355.4 - [#355.4] Classic Fileman Calls,  GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBA(355.4 - [#355.4] ABDTS+7, ABDTS+10, ABEDIT+3, ABEDIT+6, ABOUT+1
^TMP("IBCNBCD1 AB FDA" ABUNDO+2
^TMP("IBCNBCD1 AB GLOBAL SAVE" ABSAVE+1, ABCLN+1!
^TMP("IBCNBCD1 ABDATA DATA" ABDATA+3, ABCLN+1!
^TMP("IBCNBCD1 ABLIST DATES" ABDTS+3, ABDCRE+15, ABCLN+1!
^TMP("IBCNBCD1 HOLD DATA" ABCLN+1!

Label References

Name Line Occurrences
$$ABASK ABEDIT+25
$$ABDIF ABEDIT+16
$$ABEDT ABEDIT+13
$$ASKREV ANNBEN+4
$$ASKYR ANNBEN+10
$$CREYR ABDCRE+4
$$EDTYR ANNBEN+23
ABCLN ANNBEN+20, ANNBEN+23, ANNBEN+28
ABDATA ANNBEN+14, ABDCRE+20
ABDCRE ANNBEN+26
ABDTS ANNBEN+7
ABEDIT ANNBEN+23, ABDCRE+23
ABGFLD ABDATA+6
ABLKD ABEDIT+3
ABOUT ABEDIT+19, ABEDIT+22, ABEDIT+25, ABEDIT+27
ABSAVE ABEDIT+10
ABUNDO ABEDIT+22, ABEDIT+25

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA ABDCRE+1~, ABDCRE+10*, ABDCRE+12!, ABEDT+1~, ABEDT+8*
DIC ABDCRE+1~, ABDCRE+6*, ABDCRE+12!
DIC(0 ABDCRE+6*
DIE ABDCRE+1~, ABDCRE+10*, ABDCRE+12!, ABEDT+1~, ABEDT+8*
DIRUT ABDCRE+1~
DLAYGO ABDCRE+1~, ABDCRE+6*
DO ABDCRE+1~
DR ABDCRE+10*, ABDCRE+12!, ABEDT+1~, ABEDT+8*
DTOUT ANNBEN+4, ANNBEN+10, ABEDT+1~, ABEDT+10
IBASAV ANNBEN~, ANNBEN+23, ANNBEN+26, ABDCRE~, ABDCRE+23, ABEDIT~, ABEDIT+27*
IBBUFDA ANNBEN~
IBDA ANNBEN+1~
IBDATA ANNBEN+1~, ANNBEN+14, ANNBEN+20, ANNBEN+23, ANNBEN+26, ABDATA~, ABDATA+3*, ABDATA+4, ABDATA+14, ABDCRE~
, ABDCRE+20, ABDCRE+23, ABEDIT~, ABEDIT+22, ABEDIT+25, ABUNDO~, ABUNDO+6
IBDATE ANNBEN+1~, ANNBEN+10*, ANNBEN+14, ANNBEN+23, ANNBEN+26, ABDATA~, ABDATA+8, ABDCRE~, ABDCRE+4, ABDCRE+6
, ABDCRE+17, ABDCRE+20, ABDCRE+23, ABEDIT~, ABEDIT+13, ABEDT~, EDTYR~, EDTYR+1, CREYR~, CREYR+1
IBDIF ABEDIT+1~, ABEDIT+16*, ABEDIT+19, ABEDIT+22, ABEDIT+25
IBDT ABDTS+1~, ABDTS+6*, ABDTS+7*, ABDTS+10, ABDTS+13, ABDTS+30*, ABDATA+1~, ABDATA+8*, ABDATA+12
IBDTL ANNBEN+1~, ANNBEN+7, ANNBEN+14, ABDTS~, ABDTS+3*, ABDTS+4, ABDTS+16, ABDTS+17, ABDTS+18, ABDTS+19
, ABDTS+20, ABDTS+21, ABDTS+22, ABDTS+23, ABDTS+24, ABDTS+25, ABDTS+26, ABDTS+27, ABDTS+30, ABDATA~
, ABDATA+9, ABDATA+13, ABDCRE+1~, ABDCRE+15*, ABDCRE+16, ABDCRE+17, ABDCRE+20
IBEDIT ANNBEN+1~, ANNBEN+23*
IBERR ANNBEN~, ANNBEN+2, ANNBEN+4, ANNBEN+14, ANNBEN+23, ANNBEN+26, ABDATA~, ABDATA+9, ABDATA+14, ABDCRE~
, ABDCRE+7*, ABDCRE+20, ABDCRE+23, ABEDIT~, ABEDIT+13, ABEDIT+22, ABEDIT+25, ABEDT~, ABUNDO~, ABUNDO+8
IBFDA ABUNDO+1~, ABUNDO+2*, ABUNDO+3, ABUNDO+6, ABUNDO+8
IBFLD ABUNDO+1~, ABUNDO+6*
IBFLDS ABDATA+1~, ABDATA+6, ABDATA+14, ABGFLD~, ABGFLD+1*, ABGFLD+2*, ABGFLD+3*, ABGFLD+4*, ABGFLD+5*
IBGRPDA ANNBEN~, ANNBEN+2, ANNBEN+7, ANNBEN+26, ABDTS~, ABDTS+7, ABDTS+10, ABDCRE~, ABDCRE+10, ABEDIT+13
, ABEDT~
IBGSAV ABEDIT+1~, ABEDIT+10, ABEDIT+16, ABSAVE~, ABSAVE+1*, ABSAVE+2, ABSAVE+4, ABSAVE+5, ABSAVE+6, ABSAVE+7
, ABSAVE+8, ABSAVE+9, ABDIF~, ABDIF+1, ABDIF+2, ABDIF+3, ABDIF+4, ABDIF+5, ABDIF+6
IBHOLD ANNBEN+1~, ANNBEN+26, ABDCRE~
IBI ABDATA+1~, ABDATA+8*, ABDATA+9*, ABDATA+12, ABDATA+13
IBIDT ABDTS+1~, ABDTS+13*, ABDTS+16, ABDTS+17, ABDTS+18, ABDTS+19, ABDTS+20, ABDTS+21, ABDTS+22, ABDTS+23
, ABDTS+24, ABDTS+25, ABDTS+26, ABDTS+27
IBIEN ANNBEN+1~, ANNBEN+12*, ANNBEN+14, ANNBEN+17, ANNBEN+20, ANNBEN+23, ANNBEN+26, ABDTS+1~, ABDTS+10*, ABDTS+16
, ABDTS+17, ABDTS+18, ABDTS+19, ABDTS+20, ABDTS+21, ABDTS+22, ABDTS+23, ABDTS+24, ABDTS+25, ABDTS+26
, ABDTS+27, ABDTS+30*, ABDATA~, ABDATA+13*, ABDATA+14, ABDCRE~, ABDCRE+10*, ABDCRE+17, ABDCRE+20, ABDCRE+23
, ABEDIT~, ABEDIT+3, ABEDIT+6, ABEDIT+13, ABEDIT+19, ABEDIT+22, ABEDIT+25, ABEDIT+27, ABEDT~, ABEDT+8
, ABUNDO~, ABUNDO+5, ABOUT~, ABOUT+1
IBLK ANNBEN+1~
IBN ABUNDO+1~, ABUNDO+5*, ABUNDO+6
IBOUT ANNBEN+1~, ANNBEN+20*, ABDATA+1~, ABDATA+8*, ABDATA+9, ABDATA+15*, ABEDIT+1~, ABEDIT+13*, ABEDIT+19, ABEDIT+22
, ABEDIT+25*
IBPOL ANNBEN+1~, ANNBEN+2*, ANNBEN+20, ANNBEN+23, ABDCRE+23, ABEDIT~, ABEDIT+13, ABEDT~
IBQ ANNBEN~, ANNBEN+4*
IBRET ABDTS+1~, ABDTS+13
IBRET(0 ABDTS+13
IBSCR ABDEDT+1~, ABDEDT+2*, ABDEDT+3
IBSYS ABEDIT+1~, ABEDIT+6*, ABEDIT+10, ABEDIT+13, ABEDIT+16, ABSAVE~, ABSAVE+4, ABSAVE+5, ABSAVE+6, ABSAVE+7
, ABSAVE+8, ABSAVE+9, ABDIF~, ABDIF+1, ABDIF+2, ABDIF+3, ABDIF+4, ABDIF+5, ABDIF+6
IBXDT ABDTS+1~, ABDTS+13*, ABDTS+16, ABDTS+17, ABDTS+18, ABDTS+19, ABDTS+20, ABDTS+21, ABDTS+22, ABDTS+23
, ABDTS+24, ABDTS+25, ABDTS+26, ABDTS+27
U ANNBEN+10, ABDCRE+17, EDTYR+1, CREYR+1
X ABDCRE+1~, ABDCRE+6*
Y ABDCRE+1~, ABDCRE+7, ABDCRE+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All