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

Package: Integrated Billing

Routine: IBCNBCD


Information

IBCNBCD ;ALB/ARH - Ins Buffer: display/compare buffer and existing ins ;1 Jun 97

Source Information

Source file <IBCNBCD.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Integrated Billing 2 INIT^IBCNES  INIT0^IBCNES4  
VA FileMan 2 $$GET1^DIQ  ^DIR  
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: 4

Package Total Caller Graph
Integrated Billing 4 IBCNBAA  IBCNBAR  IBCNBCD3  IBCNBLA1  

Entry Points

Name Comments DBIA/ICR reference
INS(IBBUFDA,IBINSDA) ; display a buffer entry's insurance company fields and
; an existing insurance company's fields for comparison
GRP(IBBUFDA,IBGRPDA) ; display a buffer entry's group insurance fields and an existing group/plan's fields for comparison
POLICY(IBBUFDA,IBPOLDA) ; display a buffer entry's patient policy fields and an existing patient policy's fields for comparison
ESGHP ; display employee sponsored group health plan
ELIG(IBBUFDA,IBPOLDA) ; Display eligibility/benefit data
; IB*2.0*549 Added EBGSTR,EBGLEN, arranged in alphabetical order
ELIGX ;
FNDNXT(IDX,STR,LEN) ; find next node in INS. EB DATA after one that starts with string STR (section title)
; IDX - current index
; STR - string to find
; LEN - length of STR
; returns index of the node found or "" if nothing is found
DISPLAY(BFLD,IFILE,IFLD,LABEL) ; extract, compare, write the two corresponding fields; one from buffer, one from ins files
WRTLN(LABEL,FLD1,FLD2,OVER,MERG,ATTR) ; write a line of formatted data with label and two fields
WRTFLD(STRING,COL,WD,ATTR) ; write an individual field with display attributes

External References

Name Field # of Occurrence
$$GET1^DIQ INS+6, INS+9, INS+10, GRP+8, GRP+9, POLICY+7, POLICY+8, POLICY+9, POLICY+10, POLICY+37
, DISPLAY+4, DISPLAY+9
^DIR ESGHP+1
INIT^IBCNES ELIG+39, ELIG+41
INIT0^IBCNES4 ELIG+40, ELIG+42
PAUSE^VALM1 ELIG+54, ELIGX+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?10,"Selected Insurance Company "_$$GET1^DIQ(36,IBEXTDA,.01)_" is Inactive!",!
  • Line Location: INS+6
Function Call: WRITE
  • Prompt: !
  • Line Location: INS+8
Function Call: WRITE
  • Prompt: !,?23,"Selected Group/Plan is Inactive!",!
  • Line Location: GRP+5
Function Call: WRITE
  • Prompt: !
  • Line Location: GRP+7
Function Call: WRITE
  • Prompt: !
  • Line Location: POLICY+6
Function Call: WRITE
  • Prompt: !
  • Line Location: ESGHP+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ESGHP+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ELIG+22
Function Call: WRITE
  • Prompt: !
  • Line Location: ELIG+26
Function Call: WRITE
  • Prompt: !
  • Line Location: ELIG+30
Function Call: WRITE
  • Prompt: !
  • Line Location: ELIG+59
Function Call: WRITE
  • Prompt: !!
  • Line Location: ELIG+65
Function Call: WRITE
  • Prompt: !!
  • Line Location: ELIG+69
Function Call: WRITE
  • Prompt: !!
  • Line Location: ELIG+73
Function Call: WRITE
  • Prompt: !!
  • Line Location: ELIG+77
Function Call: WRITE
  • Prompt: !!
  • Line Location: ELIG+81
Function Call: WRITE
  • Prompt: !!
  • Line Location: ELIG+85
Function Call: WRITE
  • Prompt: !!
  • Line Location: ELIG+89
Function Call: WRITE
  • Prompt: !
  • Line Location: ELIG+92
Function Call: WRITE
  • Prompt: !
  • Line Location: ELIG+93
Function Call: WRITE
  • Prompt: !
  • Line Location: ELIG+94
Function Call: WRITE
  • Prompt: !
  • Line Location: ELIG+106
Function Call: WRITE
  • Prompt: !
  • Line Location: ELIG+111
Function Call: WRITE
  • Prompt: !
  • Line Location: WRTLN+6
Function Call: WRITE
  • Prompt: !
  • Line Location: WRTLN+16
Function Call: WRITE
  • Prompt: ATTRB,$E(STRING,1,WD),ATTRE
  • Line Location: WRTFLD+6
Routine Call
  • DIR
  • Line Location:
    • ESGHP+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
2.312 GET1^DIQ
^IBA(355.3 - [#355.3] GET1^DIQ
^IBA(355.33 - [#355.33] GET1^DIQ
^DIC(36 - [#36] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(36 - [#36] INS+6
^IBA(355.3 - [#355.3] GRP+5
^IBA(355.33 - [#355.33] POLICY+2, POLICY+37, ELIG+35
^IBCN(365 - [#365] ELIG+20, ELIG+21
^TMP("INS. EB DATA" ELIG+33!, ELIG+45, ELIG+50, ELIGX+2!
^TMP("INS. PS DATA" ELIG+34!, ELIG+51, ELIGX+3!
^TMP("RESP. EB DATA" ELIG+33!, ELIG+50, ELIGX+2!
^TMP("RESP. PS DATA" ELIG+34!, ELIG+51, ELIGX+3!

Label References

Name Line Occurrences
$$FNDNXT ELIG+67, ELIG+71, ELIG+75, ELIG+79, ELIG+83, ELIG+87, ELIG+91
DISPLAY INS+12, INS+13, INS+14, INS+15, INS+16, INS+17, INS+18, INS+19, INS+20, GRP+11
, GRP+12, GRP+13, GRP+14, GRP+15, GRP+16, GRP+17, GRP+18, GRP+19, GRP+20, POLICY+12
, POLICY+13, POLICY+14, POLICY+15, POLICY+16, POLICY+17, POLICY+18, POLICY+19, POLICY+20, POLICY+21, POLICY+22
, POLICY+23, POLICY+24, POLICY+25, POLICY+26, POLICY+27, POLICY+28, POLICY+29, POLICY+30, POLICY+31, POLICY+32
, POLICY+33, POLICY+34, POLICY+35, ESGHP+3, ESGHP+4, ESGHP+5, ESGHP+6, ESGHP+7, ESGHP+8, ESGHP+9
, ESGHP+10, ESGHP+11, ESGHP+12, ESGHP+13
ELIGX ELIG+29
ESGHP POLICY+37
WRTFLD INS+8, GRP+7, POLICY+6, ELIG+24, ELIG+28, ELIG+32, ELIG+60, ELIG+66, ELIG+70, ELIG+74
, ELIG+78, ELIG+82, ELIG+86, ELIG+90, ELIG+92, ELIG+93, ELIG+94, ELIG+107, ELIG+111, WRTLN+13
, WRTLN+14, WRTLN+15
WRTLN INS+9, INS+10, INS+22, GRP+8, GRP+9, GRP+22, POLICY+7, POLICY+8, POLICY+9, POLICY+10
, POLICY+39, DISPLAY+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ATTR ELIG+2~, WRTLN~, WRTLN+3*, WRTLN+13, WRTLN+15, WRTFLD~, WRTFLD+2, WRTFLD+3
ATTRB WRTFLD+1~, WRTFLD+2*, WRTFLD+6
ATTRE WRTFLD+1~, WRTFLD+3*, WRTFLD+6
BFLD DISPLAY~, DISPLAY+4
BRELEN ELIG+2~, ELIG+10*, ELIG+84, ELIG+87, ELIG+101
BRESTR ELIG+2~, ELIG+10*, ELIG+84, ELIG+87, ELIG+101
BRPLEN ELIG+2~, ELIG+11*, ELIG+88, ELIG+91, ELIG+101
BRPSTR ELIG+2~, ELIG+11*, ELIG+88, ELIG+91, ELIG+101
BUFDATA DISPLAY+1~, DISPLAY+4*, DISPLAY+7, DISPLAY+15, DISPLAY+17
CMPLEN ELIG+2~, ELIG+8*, ELIG+76, ELIG+79, ELIG+99
CMPSTR ELIG+2~, ELIG+8*, ELIG+76, ELIG+79, ELIG+99
COL WRTFLD~, WRTFLD+5, WRTFLD+7
DFN POLICY+1~, POLICY+2*, POLICY+4, POLICY+9, ELIG+2~, ELIG+35*, ELIG+41, ELIG+42
DIR POLICY+1~
DIR("A" ESGHP+1*
DIR(0 ESGHP+1*
DIRUT POLICY+1~, ESGHP+1
DX WRTFLD+1~, WRTFLD+5*, WRTFLD+7*
DY WRTFLD+1~, WRTFLD+5*, WRTFLD+7*
EBDDATA ELIG+2~, ELIG+15*, ELIG+58, ELIG+103
EBGLEN ELIG+2~, ELIG+5*, ELIG+64, ELIG+67
EBGSTR ELIG+2~, ELIG+5*, ELIG+64, ELIG+67
EBILEN ELIG+2~, ELIG+7*, ELIG+72, ELIG+75, ELIG+99
EBISTR ELIG+2~, ELIG+7*, ELIG+72, ELIG+75, ELIG+99
ENDSEC ELIG+3~
EX ELIG+3~, ELIG+16*, ELIG+49, ELIG+53, ELIG+54*, ELIG+108, ELIGX+1
EXTDATA DISPLAY+1~*, DISPLAY+9*, DISPLAY+12, DISPLAY+15, DISPLAY+17
FLD1 ELIG+3~, ELIG+50*, ELIG+51*, ELIG+53, ELIG+55, WRTLN~, WRTLN+9
FLD2 ELIG+3~, ELIG+50*, ELIG+51*, ELIG+97, ELIG+105, ELIG+109, ELIG+110, FNDNXT+7, WRTLN~, WRTLN+10
FLDIDX ELIG+3~, ELIG+49*, ELIG+50
GRPLEN ELIG+3~, ELIG+6*, ELIG+68, ELIG+71, ELIG+103
GRPSTR ELIG+3~, ELIG+6*, ELIG+68, ELIG+71, ELIG+103
HCSLEN ELIG+3~, ELIG+9*, ELIG+80, ELIG+83, ELIG+99
HCSSTR ELIG+3~, ELIG+9*, ELIG+80, ELIG+83, ELIG+99
I ELIG+3~, ELIG+52*, ELIG+53*, ELIG+55, ELIG+110*, FNDNXT+6~, FNDNXT+7*, FNDNXT+8*, FNDNXT+9
I1 ELIG+3~, ELIG+52*, ELIG+67*, ELIG+71*, ELIG+75*, ELIG+79*, ELIG+83*, ELIG+87*, ELIG+91*, ELIG+97
, ELIG+104*, ELIG+105, ELIG+110
I2 ELIG+3~, ELIG+109*, ELIG+110
IBBUFDA INS~, INS+2, INS+9, INS+10, GRP~, GRP+1, GRP+8, GRP+9, POLICY~, POLICY+1
, POLICY+2, POLICY+7, POLICY+8, POLICY+9, POLICY+10, POLICY+37, ELIG~, ELIG+19, ELIG+20, ELIG+35
, DISPLAY+4
IBBUFV WRTLN+1~, WRTLN+9*, WRTLN+11*, WRTLN+14
IBCTR WRTLN+1~, WRTLN+8*, WRTLN+13, WRTLN+16
IBEV WRTLN+1~, WRTLN+2*, WRTLN+9, WRTLN+10, WRTLN+18*
IBEXTDA INS+2~, INS+4*, INS+6, INS+9, INS+10, GRP+1~, GRP+3*, GRP+5, GRP+8, GRP+9
, POLICY+1~, POLICY+4*, POLICY+7, POLICY+8, POLICY+9, POLICY+10, POLICY+37, DISPLAY+8, DISPLAY+9
IBFLD1 INS+2~, INS+9*, INS+10*, INS+22*, GRP+1~, GRP+8*, GRP+9*, GRP+22*, POLICY+1~, POLICY+7*
, POLICY+8*, POLICY+9*, POLICY+10*, POLICY+39*
IBFLD2 INS+2~, INS+9*, INS+10*, INS+22*, GRP+1~, GRP+8*, GRP+9*, GRP+22*, POLICY+1~, POLICY+7*
, POLICY+8*, POLICY+9*, POLICY+10*, POLICY+39*
IBGRPDA GRP~, GRP+3
IBINSDA INS~, INS+4
IBITER DISPLAY+1~, DISPLAY+3*, DISPLAY+14*, WRTLN+7*, WRTLN+8, WRTLN+16
IBITER1 DISPLAY+1~, DISPLAY+2*, DISPLAY+7*, DISPLAY+14
IBITER2 DISPLAY+1~, DISPLAY+2*, DISPLAY+12*, DISPLAY+14
IBMERG DISPLAY+1~, DISPLAY+15*, DISPLAY+17
IBOVER DISPLAY+1~, DISPLAY+15*, DISPLAY+17
IBPOLDA POLICY~, POLICY+4, ELIG~, ELIG+41, ELIG+42
IBSPV WRTLN+1~, WRTLN+10*, WRTLN+12*, WRTLN+15
IBSV WRTLN+1~, WRTLN+2*, WRTLN+9, WRTLN+10, WRTLN+17*
IBVEBCOL ELIG+3~, ELIG+36*
IDATA ELIG+3~, ELIG+36*, ELIG+61*, ELIG+97*, ELIG+99, ELIG+100*, ELIG+101, ELIG+102*, ELIG+103*, ELIG+107
, ELIG+110*, ELIG+111
IDX FNDNXT~, FNDNXT+7
IFILE DISPLAY~, DISPLAY+9
IFLD DISPLAY~, DISPLAY+9
IOF ELIG+54
>> IOINHI WRTFLD+2
>> IOINORM WRTFLD+3
IOSL ELIG+54
>> IOUOFF WRTFLD+3
>> IOUON WRTFLD+2
>> IOXY WRTFLD+5, WRTFLD+7
LABEL DISPLAY~, DISPLAY+17, WRTLN~, WRTLN+5*, WRTLN+13
LEN ELIG+3~, FNDNXT~, FNDNXT+7
MERG WRTLN~, WRTLN+3*, WRTLN+14
NOBLEN ELIG+3~, ELIG+14*, ELIG+94
NOBSTR ELIG+4~, ELIG+14*, ELIG+94
NOCLEN ELIG+4~, ELIG+13*, ELIG+93
NOCSTR ELIG+4~, ELIG+13*, ELIG+93
NODATA ELIG+4~, ELIG+16*, ELIG+21*, ELIG+25
NOHLEN ELIG+4~, ELIG+12*, ELIG+92, ELIG+101
NOHSTR ELIG+4~, ELIG+12*, ELIG+92, ELIG+101
NOIDATA ELIG+4~, ELIG+46*, ELIG+52*, ELIG+97, ELIG+105*, ELIG+108
OVER WRTLN~, WRTLN+3*, WRTLN+15
RDATA ELIG+4~, ELIG+55*, ELIG+58, ELIG+60, ELIG+64, ELIG+66, ELIG+68, ELIG+70, ELIG+72, ELIG+74
, ELIG+76, ELIG+78, ELIG+80, ELIG+82, ELIG+84, ELIG+86, ELIG+88, ELIG+90, ELIG+92, ELIG+93
, ELIG+94, ELIG+107
RESPIEN ELIG+4~, ELIG+20*, ELIG+21, ELIG+39, ELIG+40
SECEND ELIG+4~, ELIG+67*, ELIG+71*, ELIG+75*, ELIG+79*, ELIG+83*, ELIG+87*, ELIG+91*, ELIG+97, ELIG+100*
, ELIG+102*, ELIG+103*, ELIG+108
STR FNDNXT~, FNDNXT+7
STRING WRTFLD~, WRTFLD+6
U INS+6, GRP+5
WD WRTFLD~, WRTFLD+6, WRTFLD+7
X INS+2~, GRP+1~, POLICY+1~, WRTFLD+1~
XX ELIG+4~, ELIG+23*, ELIG+24, ELIG+27*, ELIG+28, ELIG+31*, ELIG+32
Y POLICY+1~, ELIG+54, WRTFLD+1~
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