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+55, 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+60
Function Call: WRITE
  • Prompt: !!
  • Line Location: ELIG+66
Function Call: WRITE
  • Prompt: !!
  • Line Location: ELIG+70
Function Call: WRITE
  • Prompt: !!
  • Line Location: ELIG+74
Function Call: WRITE
  • Prompt: !!
  • Line Location: ELIG+78
Function Call: WRITE
  • Prompt: !!
  • Line Location: ELIG+82
Function Call: WRITE
  • Prompt: !!
  • Line Location: ELIG+86
Function Call: WRITE
  • Prompt: !!
  • Line Location: ELIG+90
Function Call: WRITE
  • Prompt: !
  • Line Location: ELIG+93
Function Call: WRITE
  • Prompt: !
  • Line Location: ELIG+94
Function Call: WRITE
  • Prompt: !
  • Line Location: ELIG+95
Function Call: WRITE
  • Prompt: !
  • Line Location: ELIG+107
Function Call: WRITE
  • Prompt: !
  • Line Location: ELIG+112
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+51, ELIGX+2!
^TMP("INS. PS DATA" ELIG+34!, ELIG+52, ELIGX+3!
^TMP("RESP. EB DATA" ELIG+33!, ELIG+51, ELIGX+2!
^TMP("RESP. PS DATA" ELIG+34!, ELIG+52, ELIGX+3!

Label References

Name Line Occurrences
$$FNDNXT ELIG+68, ELIG+72, ELIG+76, ELIG+80, ELIG+84, ELIG+88, ELIG+92
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, ELIG+50
ESGHP POLICY+37
WRTFLD INS+8, GRP+7, POLICY+6, ELIG+24, ELIG+28, ELIG+32, ELIG+61, ELIG+67, ELIG+71, ELIG+75
, ELIG+79, ELIG+83, ELIG+87, ELIG+91, ELIG+93, ELIG+94, ELIG+95, ELIG+108, ELIG+112, 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+85, ELIG+88, ELIG+102
BRESTR ELIG+2~, ELIG+10*, ELIG+85, ELIG+88, ELIG+102
BRPLEN ELIG+2~, ELIG+11*, ELIG+89, ELIG+92, ELIG+102
BRPSTR ELIG+2~, ELIG+11*, ELIG+89, ELIG+92, ELIG+102
BUFDATA DISPLAY+1~, DISPLAY+4*, DISPLAY+7, DISPLAY+15, DISPLAY+17
CMPLEN ELIG+2~, ELIG+8*, ELIG+77, ELIG+80, ELIG+100
CMPSTR ELIG+2~, ELIG+8*, ELIG+77, ELIG+80, ELIG+100
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+59, ELIG+104
EBGLEN ELIG+2~, ELIG+5*, ELIG+65, ELIG+68
EBGSTR ELIG+2~, ELIG+5*, ELIG+65, ELIG+68
EBILEN ELIG+2~, ELIG+7*, ELIG+73, ELIG+76, ELIG+100
EBISTR ELIG+2~, ELIG+7*, ELIG+73, ELIG+76, ELIG+100
ENDSEC ELIG+3~
EX ELIG+3~, ELIG+16*, ELIG+54, ELIG+55*, ELIG+109, ELIGX+1
EXTDATA DISPLAY+1~*, DISPLAY+9*, DISPLAY+12, DISPLAY+15, DISPLAY+17
FLD1 ELIG+3~, ELIG+51*, ELIG+52*, ELIG+54, ELIG+56, WRTLN~, WRTLN+9
FLD2 ELIG+3~, ELIG+51*, ELIG+52*, ELIG+98, ELIG+106, ELIG+110, ELIG+111, FNDNXT+7, WRTLN~, WRTLN+10
FLDIDX ELIG+3~, ELIG+50*, ELIG+51
GRPLEN ELIG+3~, ELIG+6*, ELIG+69, ELIG+72, ELIG+104
GRPSTR ELIG+3~, ELIG+6*, ELIG+69, ELIG+72, ELIG+104
HCSLEN ELIG+3~, ELIG+9*, ELIG+81, ELIG+84, ELIG+100
HCSSTR ELIG+3~, ELIG+9*, ELIG+81, ELIG+84, ELIG+100
I ELIG+3~, ELIG+53*, ELIG+54*, ELIG+56, ELIG+111*, FNDNXT+6~, FNDNXT+7*, FNDNXT+8*, FNDNXT+9
I1 ELIG+3~, ELIG+53*, ELIG+68*, ELIG+72*, ELIG+76*, ELIG+80*, ELIG+84*, ELIG+88*, ELIG+92*, ELIG+98
, ELIG+105*, ELIG+106, ELIG+111
I2 ELIG+3~, ELIG+110*, ELIG+111
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+62*, ELIG+98*, ELIG+100, ELIG+101*, ELIG+102, ELIG+103*, ELIG+104*, ELIG+108
, ELIG+111*, ELIG+112
IDX FNDNXT~, FNDNXT+7
IFILE DISPLAY~, DISPLAY+9
IFLD DISPLAY~, DISPLAY+9
IOF ELIG+55
>> IOINHI WRTFLD+2
>> IOINORM WRTFLD+3
IOSL ELIG+55
>> 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+95
NOBSTR ELIG+4~, ELIG+14*, ELIG+95
NOCLEN ELIG+4~, ELIG+13*, ELIG+94
NOCSTR ELIG+4~, ELIG+13*, ELIG+94
NODATA ELIG+4~, ELIG+16*, ELIG+21*, ELIG+25
NOHLEN ELIG+4~, ELIG+12*, ELIG+93, ELIG+102
NOHSTR ELIG+4~, ELIG+12*, ELIG+93, ELIG+102
NOIDATA ELIG+4~, ELIG+46*, ELIG+53*, ELIG+98, ELIG+106*, ELIG+109
OVER WRTLN~, WRTLN+3*, WRTLN+15
RDATA ELIG+4~, ELIG+56*, ELIG+59, ELIG+61, ELIG+65, ELIG+67, ELIG+69, ELIG+71, ELIG+73, ELIG+75
, ELIG+77, ELIG+79, ELIG+81, ELIG+83, ELIG+85, ELIG+87, ELIG+89, ELIG+91, ELIG+93, ELIG+94
, ELIG+95, ELIG+108
RESPIEN ELIG+4~, ELIG+20*, ELIG+21, ELIG+39, ELIG+40
SECEND ELIG+4~, ELIG+68*, ELIG+72*, ELIG+76*, ELIG+80*, ELIG+84*, ELIG+88*, ELIG+92*, ELIG+98, ELIG+101*
, ELIG+103*, ELIG+104*, ELIG+109
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+55, 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