Routine: IBCNGP1

Package	Total	Call Graph
Integrated Billing	3	$$FO^IBCNEUT1 $$PLANOK^IBCNSU21 ($$DAT2,$$DAT3)^IBOUTL
VA FileMan	3	NOW^%DTC ($$GET1,GETS)^DIQ ^DIR
Kernel	1	$$S^%ZTLOAD

Entry Points

Name	Comments	DBIA/ICR reference
COMPILE(IBCNGPRTN,IBCNGP)	; Entry Point called from EN^XUTMDEVQ. ; IBCNGPRTN = Routine name for ^TMP($J,... ; IBCNGP = Array of params ; Input: ; IBCNGP("IBI") 0-Selected, 1-All Insurance Companies ; IBCNGP("IBIA") 0-Active, 1-Both Active and Inactive, 2-Inactive Insurance Companies ; IBCNGP("IBIP") 0-Selected, 1-All Group Plans ; IBCNGP("IBIPA") 0-Active, 1-Both Active and Inactive, 2-Inactive Group Plans ; IBCNGP("IBIGN") 1-Group Name, 2-Group Number, 3-Both Group Name and Group Number ; IBCNGP("IBFIL") A^B^C where" ; A - 1-Begin with, 2-Contains, 3-Range ; B - A=1 Begin with text, A=2 Contains text, A=3 Range start text ; C - only if A=3 Range End text ; IBCNGP("IBICS") 1-Covered, 2-Not Covered, 3-Conditional ; 4-By Default (blank status), 5-All Coverage Statuses ; IBCNGP("IBOUT") E-EXCEL, R-REPORT
GETDATA	; Get Insurance Company and Group Plan data ; Input: IIEN - IEN of the Insurance Company, file 36 ; GIEN - IEN of the Group Plan, file 355.3 ; Output: ^TMP($J,"PR",INSNAME,ICT,GNAME,GCT,IBCAT,CCT)) - C1^C2^..^C4 Where: ; INSNAME - Insurance Company name ; ICT - Insurance Company counter from ^TMP("IBCNGP") ; GNAME - Group Plan name ; GCT - Group Plans counter from ^TMP("IBCNGP") ; IBCAT - Coverage Category ; CCT - Coverage Category counter ; C1=Coverage Category, C2=Effective Date ; C3=Coverage Status, C4=Limitation Comment ;
CATARR	; Loop thru CATARR, add the Categories that should be displayed to the Print array.
GETINS	; Get Insurance info
GETGRP	; Get Group Plan info
COVOK	; If the Coverage matches what the user selected, flag the Category and set PRINT=1. ; This Coverage, it's Insurance and Group, will be displayed on the report. ; IBCNGP("IBICS") - 1-Covered, 2-Not Covered, 3-Conditional ; 4-By Default (blank status), 5-All Coverage Statuses
PRINT	; ; Input: ^TMP($J,"PR",INSNAME,ICT,GNAME,GCT,IBCAT,CCT)) - C1^C2^..^C4 Where: ; INSNAME - Insurance Company name ; ICT - Insurance Company counter from ^TMP("IBCNGP") ; GNAME - Group Plan name ; GCT - Group Plans counter from ^TMP("IBCNGP") ; IBCAT - Coverage Category ; CCT - Coverage Category counter ; C1=Coverage Category, C2=Effective Date ; C3=Coverage Status, C4=Limitation Comment
EXIT	; PRINT exit
PRT	; Print report
PRTEX	;
HEADER(HDRNAME,HDRDATE)	; Report header
EHDR	; EXCEL header
HDR1	; Report Header for Page 1 and Excel report
HDR2	; Column Headers for the Report format, for all pages
INSDATA	; Insurance Company info
GPDATA	; Group Plan info
COVDATA	; Coverage info
LINE(DISPDATA)	; Print data
LINEX	;
CENTER(LINE,XWIDTH)	;return centered line OFFSET

External References

Name	Field # of Occurrence
NOW^%DTC	PRINT+16
$$S^%ZTLOAD	HEADER+6
$$GET1^DIQ	GETDATA+25, GETDATA+32, GETDATA+33, GETDATA+34, GETINS+1, GETINS+3, GETINS+4, GETINS+5, GETINS+7, GETGRP+1 , GETGRP+2, GETGRP+3, GETGRP+4, GETGRP+8
GETS^DIQ	COMPILE+38
^DIR	PRINT+28, PRINT+29, HEADER+4
$$FO^IBCNEUT1	INSDATA+2, GPDATA+2, GPDATA+3, COVDATA+2, COVDATA+3, COVDATA+4, COVDATA+5
$$PLANOK^IBCNSU21	COMPILE+39
$$DAT2^IBOUTL	PRINT+17
$$DAT3^IBOUTL	GETDATA+33

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Compiling report data ...",! Line Location: COMPILE+26
Function Call: WRITE	Prompt: ! Line Location: PRINT+27
Function Call: WRITE	Prompt: !,NONEMSG Line Location: PRT+8
Function Call: WRITE	Prompt: !,DISPDATA Line Location: PRT+21
Function Call: WRITE	Prompt: !,?40,NONEMSG Line Location: PRT+28
Function Call: WRITE	Prompt: !,EORMSG Line Location: PRTEX+2
Function Call: WRITE	Prompt: !!,?40,EORMSG Line Location: PRTEX+5
Function Call: WRITE	Prompt: ! Line Location: HEADER+3
Function Call: WRITE	Prompt: @IOF Line Location: HEADER+7
Function Call: WRITE	Prompt: HDRNAME Line Location: HEADER+8
Function Call: WRITE	Prompt: ?OFFSET,HDRDATE,! Line Location: HEADER+10
Function Call: WRITE	Prompt: DASHES Line Location: HEADER+11
Function Call: WRITE	Prompt: HDR Line Location: EHDR+3
Function Call: WRITE	Prompt: HDR2 Line Location: EHDR+8
Function Call: WRITE	Prompt: !,"+ =>INDIV. PLAN * => INACTIVE" Line Location: HDR1+1
Function Call: WRITE	Prompt: !,"Filters: ",$S(IBCNGP("IBI")=1:"All",1:"Selected")," Insurances" Line Location: HDR1+2
Function Call: WRITE	Prompt: ", ",$S(IBCNGP("IBIP")=1:"All",1:"Selected")," Group Plans" Line Location: HDR1+3
Function Call: WRITE	Prompt: ", ",$S(+IBCNGP("IBFIL")=2:"Contains = ",+IBCNGP("IBFIL")=3:"Range = ",+IBCNGP("IBFIL")=4:"BLANK",1:"Begins with = ") Line Location: HDR1+4
Function Call: WRITE	Prompt: $S(+IBCNGP("IBFIL")=3:$P(IBCNGP("IBFIL"),U,2)_"-"_$P(IBCNGP("IBFIL"),U,3),1:$P(IBCNGP("IBFIL"),U,2)) Line Location: HDR1+5
Function Call: WRITE	Prompt: ", " Line Location: HDR1+6
Function Call: WRITE	Prompt: "All Coverage Statuses" Line Location: HDR1+7
Function Call: WRITE	Prompt: "Coverage Status: " Line Location: HDR1+9
Function Call: WRITE	Prompt: $S(IBCNGP("IBICS")=1:"COVERED",IBCNGP("IBICS")=2:"NOT COVERED",IBCNGP("IBICS")=3:"CONDITIONAL",1:"BY DEFAULT") Line Location: HDR1+10
Function Call: WRITE	Prompt: ! Line Location: HDR1+11
Function Call: WRITE	Prompt: !,"COMPANY",?15,"GROUP NAME",?38,"GROUP NUMBER",?58,"CATEGORY",?86,"EFFECTIVE DATE" Line Location: HDR2+1
Function Call: WRITE	Prompt: ?103,"COVERED?",?116,"LIMIT COMMENTS?" Line Location: HDR2+2
Function Call: WRITE	Prompt: !,DISPDATA Line Location: LINEX+2
Routine Call	DIR Line Location: PRINT+28 PRINT+29 HEADER+4

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^IBA(355.3 - [#355.3]	GET1^DIQ, GETS^DIQ
^IBE(355.31 - [#355.31]	GET1^DIQ
^IBA(355.32 - [#355.32]	GET1^DIQ
^DIC(36 - [#36]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(5 - [#5]	GETINS+5, GETINS+6
^IBA(355.3 - [#355.3]	COMPILE+33, COMPILE+35
^IBA(355.32 - [#355.32]	GETDATA+23, GETDATA+29, GETDATA+31, GETDATA+37
^IBE(355.31 - [#355.31]	GETDATA+21
^TMP("IBCNGP"	COMPILE+31, COMPILE+32, COMPILE+42*, COMPILE+45, COMPILE+46, COMPILE+48, COMPILE+49, COMPILE+54!
^TMP($J	COMPILE+24!, CATARR+15, GETINS+8, GETGRP+9*, EXIT+1!, PRT+7, PRT+9, PRT+10, PRT+11, PRT+12 , PRT+13, PRT+14, PRT+15, PRT+16, PRT+18, PRT+27, PRT+31, PRT+32, PRT+33, PRT+38 , PRT+39, PRT+40, PRT+44, PRT+45, INSDATA+1, GPDATA+1, COVDATA+1

Label References

Name	Line Occurrences
COVDATA	PRT+46
COVOK	GETDATA+27, GETDATA+41
EHDR	PRT+6
GETDATA	COMPILE+50
GETGRP	CATARR+14
GETINS	CATARR+14
GPDATA	PRT+43
HDR1	HEADER+13, EHDR+4
HDR2	HEADER+14
HEADER	PRT+24, PRTEX+4, LINE+6, LINE+7, LINE+9
INSDATA	PRT+37
LINE	PRT+36, PRT+37, PRT+42, PRT+43, PRT+46, HDR2+5
LINEX	LINE+3
PRINT	COMPILE+52
PRT	PRINT+25
PRTEX	PRT+5, PRT+7, PRT+27, PRT+31, PRT+33, PRT+38, PRT+40, PRT+44, PRT+45

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	PRINT+17
BLANK	PRT+1~
CAT	PRT+1~, PRT+15, PRT+16, PRT+18, PRT+44, PRT+45, COVDATA+1
CATARR	GETDATA+13~
CATARR(	GETDATA+26, GETDATA+39, CATARR+1, CATARR+2, CATARR+4, CATARR+5, CATARR+6, COVOK+4, COVOK+5, COVOK+6* , COVOK+7, COVOK+8
CCT	GETDATA+13~, CATARR+3, CATARR+11, CATARR+14, CATARR+15, PRT+1~, PRT+16, PRT+18, PRT+45, HDR2+5 , COVDATA+1
CDATA	GETDATA+13~, CATARR+6, CATARR+7, CATARR+8, CATARR+9, CATARR+10, PRT+1~, PRT+18, PRT+20, COVDATA+1* , COVDATA+2, COVDATA+3, COVDATA+4, COVDATA+5
COVDATA	PRT+34!, PRT+46, COVDATA+2, COVDATA+3, COVDATA+4, COVDATA+5
CRT	PRINT+11~, PRINT+21, PRINT+22, PRINT+26, PRINT+29
CTR	GETDATA+13~, CATARR+5*, CATARR+6
DASHES	PRINT+11~, PRINT+18*, HEADER+11
DIR	PRINT+28!, PRINT+29!, HEADER+1~, HEADER+4!
DIR(0	PRINT+28, PRINT+29, HEADER+4*
DISPDATA	PRT+1~, PRT+17!, PRT+20*, PRT+21, LINE~, LINE+3, LINEX+2
DTOUT	HEADER+1~, HEADER+5
DUOUT	HEADER+1~, HEADER+5
EORMSG	PRINT+11~, PRINT+13*, PRTEX+2, PRTEX+5
FGCT	PRT+30~, PRT+39*, PRT+42
FGP	PRT+30~, PRT+39*, PRT+42
FICT	PRT+30~, PRT+32*, PRT+36
FINS	PRT+30~, PRT+32*, PRT+36
FIRST	PRINT+11~
GCT	COMPILE+23~, COMPILE+34, COMPILE+41, COMPILE+42, COMPILE+47, COMPILE+48, COMPILE+49, CATARR+15, GETGRP+9, PRT+1~ , PRT+13, PRT+14, PRT+15, PRT+16, PRT+18, PRT+40, PRT+42, PRT+44, PRT+45, GPDATA+1 , COVDATA+1
GDATA	COMPILE+23~, COMPILE+37!, COMPILE+39, PRT+1~, PRT+14, PRT+20, GPDATA+1, GPDATA+2, GPDATA+3, GPDATA+4
GDATALN	PRT+2~, INSDATA+5, GPDATA+5, LINE+7*
GIEN	COMPILE+23~, COMPILE+35, COMPILE+38, COMPILE+42, COMPILE+49, GETDATA+23, GETDATA+29, GETDATA+31, GETGRP+1, GETGRP+2 , GETGRP+3, GETGRP+4, GETGRP+8
GINACT	GETDATA+13~, GETGRP+2*, GETGRP+7
GIND	GETDATA+13~, GETGRP+1*, GETGRP+6
GNAME	GETDATA+13~, CATARR+15, GETGRP+3, GETGRP+6, GETGRP+9
GNUM	GETDATA+13~, GETGRP+4, GETGRP+7, GETGRP+9
GPDATA	PRT+34!, PRT+43, HDR2+5, GPDATA+2, GPDATA+3, GPDATA+4*
GPLAN	PRT+1~, PRT+12, PRT+13, PRT+14, PRT+15, PRT+16, PRT+18, PRT+38, PRT+40, PRT+42 , PRT+44, PRT+45, HDR2+5, GPDATA+1, COVDATA+1
GTYP	GETDATA+13~, GETGRP+8*, GETGRP+9
HDR	EHDR+1~, EHDR+2*, EHDR+3
HDR2	EHDR+1~, EHDR+5, EHDR+6, EHDR+7*, EHDR+8
HDRDATE	PRINT+11~, PRINT+17, PRT+24, PRTEX+4, HEADER~, HEADER+9, HEADER+10, EHDR+2, LINE+6, LINE+7 , LINE+9
HDRNAME	PRINT+11~, PRINT+15*, PRT+24, PRTEX+4, HEADER~, HEADER+8, LINE+6, LINE+7, LINE+9
I	GETDATA+13~, GETDATA+21*, GETDATA+23, GETDATA+25
IBCAT	GETDATA+13~, GETDATA+21, GETDATA+26, GETDATA+29, GETDATA+31, GETDATA+39, CATARR+1, CATARR+2, CATARR+4, CATARR+5 , CATARR+6, CATARR+15, COVOK+4, COVOK+5, COVOK+6, COVOK+7, COVOK+8
IBCNGP	COMPILE~
IBCNGP("IBFIL"	COMPILE+39, HDR1+4, HDR1+5
IBCNGP("IBI"	HDR1+2
IBCNGP("IBICS"	COVOK+4, COVOK+5, COVOK+6, COVOK+7, COVOK+8, HDR1+7, HDR1+8, HDR1+10
IBCNGP("IBIGN"	COMPILE+39
IBCNGP("IBIP"	COMPILE+29, HDR1+3
IBCNGP("IBIPA"	COMPILE+39
IBCNGP("IBOUT"	COMPILE+26, PRINT+29, PRT+5, PRTEX+2, PRTEX+3, HEADER+13, HEADER+14, LINE+4
IBCNGPRTN	COMPILE~
IBCOV	GETDATA+13~, GETDATA+25, GETDATA+26, GETDATA+32, GETDATA+39, CATARR+7*, CATARR+15
IBCSTA	GETDATA+13~, GETDATA+24, GETDATA+26, GETDATA+34, GETDATA+35, GETDATA+39, CATARR+9, CATARR+15, COVOK+5, COVOK+6 , COVOK+7, COVOK+8
IBCT	COMPILE+23~, COMPILE+30, COMPILE+31, COMPILE+32, COMPILE+42
IBDT	GETDATA+13~, CATARR+4*, CATARR+5, CATARR+6
IBEFDT	GETDATA+13~, GETDATA+33, GETDATA+39, CATARR+8, CATARR+15
IBINS	GETDATA+13~, GETINS+2, GETINS+3, GETINS+4, GETINS+6, GETINS+7*, GETINS+8
IBLIMCOM	GETDATA+14~, GETDATA+36, GETDATA+37, GETDATA+39, CATARR+10*, CATARR+15
IBPGC	PRINT+11~, PRINT+20, PRINT+26, PRTEX+4, HEADER+2, HEADER+7, HEADER+9, HEADER+13, HDR2+5, LINE+9
IBPGN	COMPILE+23~
IBPXT	PRINT+11~, PRINT+20, PRINT+25, PRT+37, PRT+43, PRT+46, PRTEX+1, PRTEX+3, HEADER+2, HEADER+5 , LINE+4, LINE+9
IBRECDT	GETDATA+14~, GETDATA+28, GETDATA+29, GETDATA+31, GETDATA+39
IBRECN	GETDATA+14~, GETDATA+30, GETDATA+31, GETDATA+32, GETDATA+33, GETDATA+34, GETDATA+37, GETDATA+39
ICT	COMPILE+23~, COMPILE+44, COMPILE+45, COMPILE+46, COMPILE+48, COMPILE+49, CATARR+15, GETINS+8, GETGRP+9, PRT+1~ , PRT+10, PRT+11, PRT+12, PRT+13, PRT+14, PRT+15, PRT+16, PRT+18, PRT+33, PRT+36 , PRT+38, PRT+39, PRT+40, PRT+44, PRT+45, INSDATA+1, GPDATA+1, COVDATA+1
IDATA	PRT+1~, PRT+11, PRT+20, INSDATA+1, INSDATA+2, INSDATA+3, INSDATA+4
IDATALN	PRT+2~, INSDATA+5, LINE+6, LINEX+1*
IIEN	COMPILE+23~, COMPILE+32, COMPILE+33, COMPILE+35, COMPILE+46, GETINS+1, GETINS+3, GETINS+4, GETINS+5, GETINS+7
INS	PRT+1~, PRT+9, PRT+10, PRT+11, PRT+12, PRT+13, PRT+14, PRT+15, PRT+16, PRT+18 , PRT+31, PRT+33, PRT+36, PRT+38, PRT+39, PRT+40, PRT+44, PRT+45, INSDATA+1, GPDATA+1 , COVDATA+1
INSDATA	PRT+34!, PRT+37, HDR2+5, INSDATA+2, INSDATA+3, INSDATA+4*
INSNAME	GETDATA+14~, CATARR+15, GETINS+1*, GETINS+2, GETINS+8, GETGRP+9
IOF	HEADER+7
IOSL	PRINT+21, PRINT+22
IOST	COMPILE+26, PRINT+22, PRINT+26, PRINT+29, HEADER+2, HEADER+6, HEADER+7
LENGTH	CENTER+1~, CENTER+2*
LIN	PRINT+27, HEADER+1~, HEADER+3
LINE	CENTER~, CENTER+2
MAXCNT	PRINT+11~, PRINT+21, PRINT+22, PRINT+27, PRTEX+4, HEADER+3, LINE+6, LINE+7, LINE+9
NONEMSG	PRINT+11~, PRINT+14*, PRT+8, PRT+28
NWPG	LINE+1~, LINE+2, LINE+6, LINE+7, LINE+9
OFFSET	HEADER+1~, HEADER+9, HEADER+10, CENTER+1~, CENTER+2, CENTER+3
PLANOK	COMPILE+23~, COMPILE+39*, COMPILE+40
PRINT	GETDATA+14~, COVOK+4, COVOK+5, COVOK+6, COVOK+7, COVOK+8*
SPACES	PRINT+11~, PRINT+19*, PRT+36, PRT+42, INSDATA+2, GPDATA+2, GPDATA+3, COVDATA+2, COVDATA+3, COVDATA+4
STATE	GETDATA+14~
STATECD	GETDATA+14~, GETINS+5*, GETINS+6
STOP	PRINT+11~, PRINT+12, PRT+31, PRT+33, PRT+37, PRT+38, PRT+40, PRT+43, PRT+44, PRT+45 , PRT+46
U	GETDATA+26, GETDATA+39, CATARR+7, CATARR+8, CATARR+9, CATARR+10, CATARR+15, GETINS+2, GETINS+3, GETINS+4 , GETINS+6, GETINS+7, GETGRP+9, PRT+20, EHDR+2, HDR1+5, INSDATA+2, INSDATA+3, INSDATA+4, GPDATA+2 , GPDATA+3, GPDATA+4, COVDATA+2, COVDATA+3, COVDATA+4, COVDATA+5
X	HEADER+1~
XWIDTH	CENTER~, CENTER+2
XX	GETDATA+14~, GETINS+5*, GETINS+6
Y	HEADER+1~
>> ZSTOP	PRINT+12*
ZTSTOP	PRINT+11~, PRINT+25, PRT+37, PRT+43, PRT+46, PRTEX+1, PRTEX+3, HEADER+2, HEADER+6*, LINE+4 , LINE+9

Customize PDF page

Package: Integrated Billing

Routine: IBCNGP1

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: