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 |  Marked Items  | All
Print Page as PDF
Routine: IBCNBCD6

Package: Integrated Billing

Routine: IBCNBCD6


Information

IBCNBCD6 ;ALB/AWC - MCCF FY14 Subscriber Display Screens ;25 Feb 2015

Source Information

Source file <IBCNBCD6.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
List Manager 1 PAUSE^VALM1  
VA FileMan 1 FILE^DIE  

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

Package Total Caller Graph
Integrated Billing 2 IBCNBCD7  IBCNBMI  

Entry Points

Name Comments DBIA/ICR reference
SUB(IBBUFDA,IBEXTDA,IBRIEN,IBSEL,IBTYPE,IBRESULT,DFN,IBFNAM,IBVAL,IBHOLD,IBXHOLD) ; called from routine SUB^IBCMBMI
; Move patient data(file #2) <or> income person data(408.13) into existing Patient Policy (file 2.312)
SELF(IBSET,IBBUFDA,IBRIEN,IBEXTDA,IBTYPE,BUFARR,EXTARR,IBCHNG,IBCHNGN,IBFLDS,IBLBLS,IBADDS,IBRESULT,IBHOLD,IBXHOLD) ; get data for "self" relationship
SPOUSE(IBSET,IBBUFDA,IBRIEN,IBEXTDA,IBTYPE,BUFARR,EXTARR,IBCHNG,IBCHNGN,IBFLDS,IBLBLS,IBADDS,IBRESULT,IBHOLD,IBXHOLD) ; get data for "spouse" relationship
NSPOUSE(IBSET,IBBFDA,IBRIEN,IBEXTDA,IBTYPE,BUFARR,EXTARR,IBCHNG,IBCHNGN,IBFLDS,IBLBLS,IBADDS,IBRESULT,IBHOLD,IBXHOLD) ; no spuse data
STUFF(IBSET,IBEXTDA,IBRESULT) ; update fields in insurance files that
POLOTH(IBBUFDA,IBEXTDA,IBRESULT) ; other special cases that can not be transferred using the generic code above, usually because of dependencies
FIELDS(IBSET,IBFLDS,IBLBLS,IBADDS) ; return array of corresponding fields: IBFLDS(Buffer #)=Ins #
EHANDLE(IBSET,FMERR,IBRESULT) ;
REMOVDEL(FMERR) ;
; Removed field delete errors. SET and STUFF API delete data first and
; then update with new data from Insurance Buffer file. Error Code 712
; "Deletion was attempted but not allowed" errors will be removed from
; the returned FM error array
;
; INPUT/OUTPUT:
; FMERR - Array that is returned by FM with error messages
DPTDR ; -- insurance type subfile(#2.312) ^ insurance verificaiton processor(#355.33) fields ^ insurance type subfile(#2.312) fields
DPTFLD ; -- insurance verification processor(#355.33) field ^ insurance type subfile(#2.312)
DGPRDR ; -- insurance type subfile(#2.312) ^ insurance verificaiton processor(#355.33) fields ^ insurance type subfile(#2.312) fields
DGPRFLD ; -- insurance verification processor(#355.33) field ^ insurance type subfile(#2.312)
NDR ; -- insurance type subfile(#2.312) ^ insurance verificaiton processor(#355.33) fields ^ insurance type subfile(#2.312) fields
NFLD ; -- insurance verification processor(#355.33) field ^ insurance type subfile(#2.312)
POLDR ;
POLA ; auto set fields

External References

Name Field # of Occurrence
FILE^DIE SUB+16, SUB+18, STUFF+12, STUFF+14, POLOTH+10, POLOTH+12
PAUSE^VALM1 SUB+16, SUB+18

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Error... SUB-IBCNBCD6 Could not file fields with nulls"
  • Line Location: SUB+16
Function Call: WRITE
  • Prompt: !,"Error... SUB-IBCNBCD6 Could not file fields with data"
  • Line Location: SUB+18
Routine Call
  • DIE
  • Line Location:
    • SUB+16
    • SUB+18
    • STUFF+12
    • STUFF+14
    • POLOTH+10
    • POLOTH+12

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBA(355.33 - [#355.33] POLOTH+2
^TMP($J SELF+16, SPOUSE+16, NSPOUSE+16

Label References

Name Line Occurrences
EHANDLE STUFF+12, STUFF+14, POLOTH+10, POLOTH+12
FIELDS SELF+4, SPOUSE+4, NSPOUSE+4, STUFF+3
NSPOUSE SUB+13
POLOTH SUB+23
SELF SUB+8
SPOUSE SUB+12
STUFF SUB+21

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BUFARR SUB+3~, SUB+8, SUB+12, SUB+13, SELF~, SPOUSE~, NSPOUSE~
DFN SUB~, SUB+5
DIR SUB+16!, SUB+18!
DUZ STUFF+7
ERRNUM EHANDLE+13~, EHANDLE+18*, EHANDLE+19*, EHANDLE+21, EHANDLE+23, REMOVDEL+10~, REMOVDEL+11*, REMOVDEL+12*, REMOVDEL+13
EXTARR SUB+3~, SUB+8, SUB+12, SUB+13, SELF~, SPOUSE~, NSPOUSE~
EXTFILE STUFF+1~, STUFF+4*, STUFF+8, STUFF+9
FMERR EHANDLE~, EHANDLE+12, REMOVDEL~, REMOVDEL+9
FMERR("DIERR" EHANDLE+19, EHANDLE+21, EHANDLE+23, REMOVDEL+12, REMOVDEL+13!
IB0 POLOTH+1~, POLOTH+2*, POLOTH+5, POLOTH+6, POLOTH+7
IB1 SELF+1~, SELF+9*, SELF+11, SELF+16, SPOUSE+9*, SPOUSE+11, SPOUSE+16, NSPOUSE+9*, NSPOUSE+11, NSPOUSE+16
IB2 SELF+1~, SELF+9*, SELF+11, SELF+19, SELF+22, SELF+24, SPOUSE+9*, SPOUSE+11, SPOUSE+18, SPOUSE+21
, SPOUSE+23, NSPOUSE+9*, NSPOUSE+11, NSPOUSE+18, NSPOUSE+21, NSPOUSE+23
IBADDS SUB+3~, SUB+8, SUB+12, SUB+13, SELF~, SELF+4, SPOUSE~, SPOUSE+4, NSPOUSE~, NSPOUSE+4
, STUFF+1~, STUFF+3, FIELDS~
IBADDS( FIELDS+7*
IBB FIELDS+1~, FIELDS+4*, FIELDS+5, FIELDS+6, FIELDS+7
IBBFDA SUB+3~, SUB+4*, SUB+8, SUB+12, SUB+13, SUB+23, NSPOUSE~
IBBUFDA SUB~, SUB+4, SELF~, SPOUSE~, POLOTH~, POLOTH+2
IBBUFVAL SELF+1~, SELF+11*, SELF+13, SELF+15, SELF+19, SPOUSE+1~, SPOUSE+11*, SPOUSE+13, SPOUSE+15, SPOUSE+18
, NSPOUSE+1~, NSPOUSE+11*, NSPOUSE+13, NSPOUSE+15, NSPOUSE+18
IBCHNG SUB+3~, SUB+8, SUB+12, SUB+13, SUB+18, SELF~, SPOUSE~, NSPOUSE~
IBCHNG( SELF+19*, SPOUSE+18*, NSPOUSE+18*
IBCHNGN SUB+3~, SUB+8, SUB+12, SUB+13, SUB+16, SELF~, SPOUSE~, NSPOUSE~
IBCHNGN( SELF+24*, SPOUSE+23*, NSPOUSE+23*
IBDRB SUB+3~, SELF+1~, SELF+5*, SELF+7, SELF+9, SPOUSE+1~, SPOUSE+5*, SPOUSE+7, SPOUSE+9, NSPOUSE+1~
, NSPOUSE+5*, NSPOUSE+7, NSPOUSE+9
IBDRX SUB+3~, SELF+1~, SELF+5*, SELF+9, SPOUSE+1~, SPOUSE+5*, SPOUSE+9, NSPOUSE+1~, NSPOUSE+5*, NSPOUSE+9
IBE FIELDS+1~, FIELDS+4*, FIELDS+5, FIELDS+6, FIELDS+7
IBERR SUB+3~, SUB+16, SUB+18, STUFF+1~, STUFF+12, STUFF+14, POLOTH+1~, POLOTH+10, POLOTH+12
IBEXTDA SUB~, SUB+5*, SUB+8, SUB+12, SUB+13, SUB+21, SUB+23, SELF~, SELF+19, SELF+24
, SPOUSE~, SPOUSE+18, SPOUSE+23, NSPOUSE~, NSPOUSE+18, NSPOUSE+23, STUFF~, STUFF+8, STUFF+9, POLOTH~
, POLOTH+6, POLOTH+7
IBEXTFLD SELF+1~, SPOUSE+1~, NSPOUSE+1~, STUFF+1~, STUFF+6*, STUFF+7, STUFF+8, STUFF+9
IBEXTVAL SELF+1~, SELF+11*, SELF+13, SELF+14, SPOUSE+1~, SPOUSE+11*, SPOUSE+13, SPOUSE+14, NSPOUSE+1~, NSPOUSE+11*
, NSPOUSE+13, NSPOUSE+14, STUFF+1~, STUFF+7*, STUFF+8
IBFARY SELF+1~, SPOUSE+1~, NSPOUSE+1~
IBFDA STUFF+1~, POLOTH+1~, POLOTH+12
IBFDA( STUFF+8*, POLOTH+6*, POLOTH+7*
IBFDAX STUFF+1~, POLOTH+1~, POLOTH+10
IBFDAX( STUFF+9*, POLOTH+6*, POLOTH+7*
IBFLDS SUB+3~, SUB+8, SUB+12, SUB+13, SELF~, SELF+4, SPOUSE~, SPOUSE+4, NSPOUSE~, NSPOUSE+4
, STUFF+1~, STUFF+3, FIELDS~
IBFLDS( STUFF+6, STUFF+7, FIELDS+6*
IBFNAM SUB~, SUB+8, SUB+12, SUB+13
IBG FIELDS+1~, FIELDS+4*, FIELDS+7
IBHOLD SUB~, SUB+8, SUB+12, SUB+13, SELF~, SELF+11, SPOUSE~, SPOUSE+11, NSPOUSE~, NSPOUSE+11
IBI FIELDS+1~, FIELDS+3*
IBLBLS SUB+3~, SUB+8, SUB+12, SUB+13, SELF~, SELF+4, SPOUSE~, SPOUSE+4, NSPOUSE~, NSPOUSE+4
, STUFF+1~, STUFF+3, FIELDS~
IBLBLS( FIELDS+7*
IBLN FIELDS+1~, FIELDS+3*, FIELDS+4, FIELDS+7
IBRESULT SUB~, SUB+8, SUB+12, SUB+13, SUB+21, SUB+23, SELF~, SPOUSE~, NSPOUSE~, STUFF~
, STUFF+12, STUFF+14, POLOTH~, POLOTH+10, POLOTH+12, EHANDLE~
IBRESULT( EHANDLE+18, EHANDLE+23*
IBRIEN SUB~, SUB+8, SUB+12, SUB+13, SELF~, SPOUSE~, NSPOUSE~
IBSEL SUB~, SUB+7, SUB+11
IBSET SUB+3~, SUB+8*, SUB+12*, SUB+13*, SELF~, SELF+4, SPOUSE~, SPOUSE+4, NSPOUSE~, NSPOUSE+4
, STUFF~, STUFF+3, STUFF+12, STUFF+14, FIELDS~, FIELDS+7, EHANDLE~, EHANDLE+12, EHANDLE+16
IBTYPE SUB~, SUB+8, SUB+12, SUB+13, SELF~, SELF+7, SELF+14, SELF+15, SELF+16, SPOUSE~
, SPOUSE+7, SPOUSE+14, SPOUSE+15, SPOUSE+16, NSPOUSE~, NSPOUSE+7, NSPOUSE+14, NSPOUSE+15, NSPOUSE+16
IBVAL SUB~
IBX SUB+3~, SELF+1~, SELF+5*, SELF+7*, SELF+9, SPOUSE+1~, SPOUSE+5*, SPOUSE+7*, SPOUSE+9, NSPOUSE+1~
, NSPOUSE+5*, NSPOUSE+7*, NSPOUSE+9, STUFF+1~, STUFF+4*
IBXARY SELF+1~, SPOUSE+1~, NSPOUSE+1~
IBXFILE SUB+3~, SELF+1~, SELF+5*, SELF+19, SELF+24, SPOUSE+1~, SPOUSE+5*, SPOUSE+18, SPOUSE+23, NSPOUSE+1~
, NSPOUSE+5*, NSPOUSE+18, NSPOUSE+23
IBXHOLD SUB~, SUB+8, SUB+12, SUB+13, SELF~, SELF+11, SPOUSE~, SPOUSE+11, NSPOUSE~, NSPOUSE+11
LINENUM EHANDLE+13~, EHANDLE+20*, EHANDLE+21*, EHANDLE+23
RNUM EHANDLE+13~, EHANDLE+18*, EHANDLE+22*, EHANDLE+23
SUB1 EHANDLE+13~, EHANDLE+16*, EHANDLE+18, EHANDLE+23
U SELF+5, SPOUSE+5, NSPOUSE+5, STUFF+4, POLOTH+5, POLOTH+6, POLOTH+7, FIELDS+4, FIELDS+7

Marked Items

Name Field # of Occurrence
$T(@(1)+IBI FIELDS+3
$T(@(3)+1 SELF+5, SPOUSE+5, NSPOUSE+5, STUFF+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All