Routine: IBCNGP

Package	Total	Call Graph
Integrated Billing	4	$$SELFILT^IBCNGP EN^IBCNILK OK^IBCNSM3 LKP^IBCNSU21
VA FileMan	2	$$GET1^DIQ ^DIR
Kernel	1	EN^XUTMDEVQ

Package	Total	Caller Graph
Integrated Billing	2	IBCN COVERAGE LIMITATION RPT IBCNGP

Entry Points

Name	Comments	DBIA/ICR reference
EN	;Main Entry point ; Initialize variables
C10	; All/Selected Insurance Companies
C20	; Inactive/Active/Both Insurance Company look-up filter
C30	; Insurance Company look-up listman template ; Allow user selection of Insurance Companies
G10	; All/Selected Group Plans
G20	; Inactive/Active/Both Group Plan filter
G30	; Group Name/Group Number/Both filter
G40	; Group(s)that Begin/Contain/Range XXX
G50	; Group Coverage Status filter
O10	; Report or CSV output
EXIT	;
DEVICE	;
ENQ	;
START	; Group Plan look-up listman template ; Allow user selection of one or more Group Plans ; Input: IBCNGP("IBIP") 0-Selected, 1-All Group Plans ; IBCNGP("IBIPA") 0-Inactive, 1-Active, 2-Both Active and 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
STARTQ	;
GETGRP	; Gather Group Plans by Insurance Companies
SORT	; Sort the currently selected insurance companies into name order
SELI	; Prompt user to select all or subset of insurance companies ; Count insurance companies with plans ; Returns: 0 - User selects insurance companies ; 1 - Run report for all insurance companies with plans ; STOP=1 - No selection made
SELIQ	;
SELA	; Prompt user to select Active/Inactive/Both Insurance Companies ; Returns: 0 - INACTIVE Insurance Companies Only ; 1 - ACTIVE Insurance Companies Only ; 2 - Both ACTIVE and INACTIVE Insurance Companies ; STOP=1 - No selection made
SELAQ	;
SELG	; Prompt user to select all or subset of group plans ; Count of group plans ; Returns: 0 - Selected Group Plans ; 1 - All Group Plans ; STOP=1 - No selection made
SELGQ	;
SELGA	; Prompt user to select Active/Inactive/Both Group Plans ; Input: None ; Returns: 0 - INACTIVE Group Plans Only ; 1 - ACTIVE Group Plans Only ; 2 - Both ACTIVE and INACTIVE Group Plans ; -1 - No selection made
SELGAQ	;
SELGN	; Prompt user to select Group Name/Group Number/Both filter ; Returns: 1 - Group Name ; 2 - Group Number ; 3 - Both Group Name and Group Number ; -1 - No selection made
SELGNQ	;
SELFILT()	; Group Plan filter ; Returns: A^B^C Where: ; A - 1 - Search for Group(s) that begin with ; the specified text (case insensitive) ; 2 - Search for Group(s) that contain ; the specified text (case insensitive) ; 3 - Search for Group(s) in a specified ; range (inclusive, case insensitive) ; 4 - Search for Group(s) that are BLANK or null ; B - Begin with text if A=1, Contains Text if A=2 or ; the range start if A=3 ; C - Range End text (only present when A=3) ; -1 if a valid filter was not selected
SELFILTQ	;
SELCS	; Prompt user to select Coverage Status of the Group Plan(s) ; Input: None ; Returns: 1 - Coverage Status COVERED only ; 2 - Coverage Status NOT COVERED only ; 3 - Coverage Status CONDITIONAL only ; 4 - Coverage Status BY DEFAULT only ; 5 - ALL Coverage Statuses ; -1 - No selection made
SELCSQ	;
OUT	; Prompt to allow users to select output format ; Returns: E - Output to excel ; R - Output to report ; STOP=1 - No Selection made
OUTQ	;

External References

Name	Field # of Occurrence
$$GET1^DIQ	C30+20, SORT+6
^DIR	C30+13, G10+3, G40+7, SELI+18, SELA+17, SELG+35, SELGA+18, SELGN+16, SELFILT+33, SELFILT+50 , SELFILT+62, SELCS+23, OUT+11
$$SELFILT^IBCNGP	G40+1
EN^IBCNILK	C30+4
OK^IBCNSM3	GETGRP+4
LKP^IBCNSU21	GETGRP+11
EN^XUTMDEVQ	DEVICE+16

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: EN+9
Function Call: WRITE	Prompt: !,"Coverage Limitations Report",! Line Location: EN+10
Function Call: WRITE	Prompt: !,"This report will generate a list of coverage limitations by company and" Line Location: EN+11
Function Call: WRITE	Prompt: !,"group. You must select one, multiple, or all insurance companies and anywhere" Line Location: EN+12
Function Call: WRITE	Prompt: !,"from one to all of the plans under each company. The results can be filtered" Line Location: EN+13
Function Call: WRITE	Prompt: !,"by coverage limitation status." Line Location: EN+14
Function Call: WRITE	Prompt: !!," No Insurance Companies selected! ",!! Line Location: C30+13
Function Call: WRITE	Prompt: !!," No plans selected! ",!! Line Location: G40+7
Function Call: WRITE	Prompt: !!,"We recommend you queue this report as it will take awhile." Line Location: DEVICE+2
Function Call: WRITE	Prompt: !!,"For CSV output, turn logging or capture on now. To avoid undesired wrapping" Line Location: DEVICE+4
Function Call: WRITE	Prompt: !,"of the data saved to the file, please enter ""0;256;99999"" at the ""DEVICE:""" Line Location: DEVICE+5
Function Call: WRITE	Prompt: !,"prompt.",! Line Location: DEVICE+6
Function Call: WRITE	Prompt: !!,"* You will need a 132 column printer for this report. *",! Line Location: DEVICE+8
Function Call: WRITE	Prompt: !!,"Insurance Company # "_CT_": "_A Line Location: GETGRP+3
Function Call: WRITE	Prompt: " ...building a list of plans..." Line Location: GETGRP+7
Function Call: WRITE	Prompt: ! Line Location: SELI+11
Function Call: WRITE	Prompt: ! Line Location: SELA+7
Function Call: WRITE	Prompt: !!,"The selected Company(s) does not contain any Groups",!! Line Location: SELG+19
Function Call: WRITE	Prompt: !!,"Some Selected Companies do not contain groups and will not display on the report" Line Location: SELG+24
Function Call: WRITE	Prompt: ! Line Location: SELG+28
Function Call: WRITE	Prompt: ! Line Location: SELGA+8
Function Call: WRITE	Prompt: ! Line Location: SELGN+7
Function Call: WRITE	Prompt: ! Line Location: SELFILT+16
Function Call: WRITE	Prompt: ! Line Location: SELFILT+39
Function Call: WRITE	Prompt: ! Line Location: SELFILT+56
Function Call: WRITE	Prompt: ! Line Location: SELCS+10
Function Call: WRITE	Prompt: ! Line Location: OUT+5
Routine Call	DIR Line Location: C30+13 G10+3 G40+7 SELI+18 SELA+17 SELG+35 SELGA+18 SELGN+16 SELFILT+33 SELFILT+50 SELFILT+62 SELCS+23 OUT+11

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(36 - [#36]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(36 - [#36]	C30+18
^IBA(355.3 - [#355.3]	SELI+8, SELG+13, SELG+14
^TMP("IBCNGP"	EN+4!, C30+10, C30+24, G40+7, EXIT+2!, ENQ+2!, GETGRP+6!, GETGRP+14!, GETGRP+22*, SORT+4 , SORT+5, SELG+11, SELG+12
^TMP("IBCNILKA"	C30+5, C30+7, C30+11!, EXIT+1!, ENQ+1!
^TMP($J	STARTQ+1!, GETGRP+8!, GETGRP+13, GETGRP+18, GETGRP+20

Label References

Name	Line Occurrences
DEVICE	O10+2
EXIT	C10+1, C20+1, C30+13, G10+1, G10+3, G20+1, G30+1, G40+2, G40+7, G40+8 , G50+1, O10+1
GETGRP	START+18
OUT	O10+1
OUTQ	OUT+12
SELA	C20+1
SELAQ	SELA+18
SELCS	G50+1
SELCSQ	SELCS+24
SELFILTQ	SELFILT+36
SELG	G10+1
SELGA	G20+1
SELGAQ	SELGA+19
SELGN	G30+1
SELGNQ	SELGN+17
SELGQ	SELG+36
SELI	C10+1
SELIQ	SELI+19
SORT	START+14
START	G40+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	EN+3~
A	EN+2~, START+9~, START+16, START+17, GETGRP+1, GETGRP+3, GETGRP+14, SELI+6~, SELI+7, SELI+8* , SELG+6~, SELG+12*, SELG+13, SELG+14
A0	SELG+6~, SELG+11*, SELG+12
A1	SELG+6~
B	START+9~, START+17, GETGRP+1, GETGRP+11, GETGRP+14, SELI+6~, SELI+7, SELI+8, SELI+12, SELI+13 , SELG+14
CT	START+9~, START+15, GETGRP+2, GETGRP+3, SELG+6~, SELG+10, SELG+15, SELG+18, SELG+29, SELG+30
DIR	C30+13!, G10+3!, G40+7!, SELI+10~, SELI+18!, SELA+6~, SELA+17!, SELG+27~, SELG+35!, SELGA+7~ , SELGA+18!, SELGN+6~, SELGN+16!, SELFILT+13~, SELFILT+40!, SELFILT+50!, SELFILT+57!, SELCS+9~, SELCS+23!, OUT+4~ , OUT+11!
DIR("?"	SELI+16, SELI+17, SELA+13, SELA+14, SELA+15, SELG+33, SELG+34, SELGA+14, SELGA+15, SELGA+16 , SELGN+13, SELGN+14, SELGN+15, SELFILT+23, SELFILT+24, SELFILT+25, SELFILT+26, SELFILT+27, SELFILT+28, SELFILT+29 , SELFILT+30, SELFILT+31, SELFILT+45, SELFILT+47, SELFILT+49, SELFILT+61, SELCS+18, SELCS+19, SELCS+20, SELCS+21 , SELCS+22, OUT+9, OUT+10*
DIR("A"	SELI+13, SELI+14, SELI+15, SELA+9, SELA+10, SELA+11, SELA+12, SELG+30, SELG+31, SELG+32 , SELGA+10, SELGA+11, SELGA+12, SELGA+13, SELGN+9, SELGN+10, SELGN+11, SELGN+12, SELFILT+18, SELFILT+19 , SELFILT+20, SELFILT+21, SELFILT+22, SELFILT+43, SELFILT+59, SELCS+12, SELCS+13, SELCS+14, SELCS+15, SELCS+16 , SELCS+17, OUT+7
DIR("B"	SELA+16, SELGA+17, SELFILT+60, OUT+8
DIR(0	C30+13, G10+3, G40+7, SELI+12, SELA+8, SELG+29, SELGA+9, SELGN+8, SELFILT+17, SELFILT+41 , SELFILT+58, SELCS+11, OUT+6*
DIROUT	EN+2~, SELI+10~, SELI+19, SELA+6~, SELA+18, SELG+27~, SELG+36, SELGA+7~, SELGA+19, SELGN+6~ , SELGN+17, SELFILT+13~, SELFILT+34, SELFILT+51, SELFILT+63, SELCS+9~, SELCS+24, OUT+4~, OUT+12
DIRUT	EN+2~, SELI+10~, SELI+19, SELA+6~, SELA+18, SELG+27~, SELG+36, SELGA+7~, SELGA+19, SELGN+6~ , SELGN+17, SELFILT+13~, SELFILT+34, SELFILT+51, SELFILT+63, SELCS+9~, SELCS+24, OUT+4~, OUT+12
DTOUT	EN+2~, SELI+10~, SELI+19, SELA+6~, SELA+18, SELG+27~, SELG+36, SELGA+7~, SELGA+19, SELGN+6~ , SELGN+17, SELFILT+13~, SELFILT+34, SELFILT+51, SELFILT+63, SELCS+9~, SELCS+24, OUT+4~, OUT+12
DUOUT	EN+2~, SELI+10~, SELI+19, SELA+6~, SELA+18, SELG+27~, SELG+36, SELGA+7~, SELGA+19, SELGN+6~ , SELGN+17, SELFILT+13~, SELFILT+34, SELFILT+51, SELFILT+63, SELCS+24, OUT+4~, OUT+12
FILTER	EN+2~, G40+1, G40+2, G40+3, SELFILT+13~, SELFILT+35, SELFILT+36, SELFILT+42, SELFILT+44, SELFILT+46 , SELFILT+48, SELFILT+52, SELFILT+53, SELFILT+60, SELFILT+64, SELFILTQ+1
GCT	START+9~, GETGRP+19, GETGRP+21, GETGRP+22
GIEN	EN+2~, START+9~, GETGRP+20*, GETGRP+22
I	EN+2~, DEVICE+1~
IBCNGP	EN+2~
IBCNGP("IBAI"	GETGRP+15*
IBCNGP("IBFIL"	G40+3*, GETGRP+11
IBCNGP("IBI"	C30+2, C30+16, SELI+20*, SELG+18
IBCNGP("IBIA"	C30+4, C30+21, C30+22, SELA+19*
IBCNGP("IBICS"	SELCS+25*
IBCNGP("IBIGN"	GETGRP+11, SELGN+18*
IBCNGP("IBIP"	START+13, SELG+20, SELG+37
IBCNGP("IBIPA"	GETGRP+11, SELGA+20*
IBCNGP("IBOUT"	DEVICE+3, DEVICE+7, OUT+13*
IBCNGPRTN	EN+2~, EN+6*
IBCNS	C30+3~, C30+7*, C30+10
IBCT	START+9~, GETGRP+1, GETGRP+6, GETGRP+14, GETGRP+22, SORT+1~, SORT+3, SORT+4*, SORT+5, SORT+9
IBOK	START+9~, GETGRP+6
IBQUIT	EN+2~, EN+5, C30+5, C30+13, START+10*, START+16, START+17, GETGRP+5, GETGRP+12, SORT+4
IBSEL	START+9~, GETGRP+8!
IIEN	EN+2~, C30+18, C30+20, C30+24, SORT+1~, SORT+5, SORT+6, SORT+9
INACT	EN+2~, C30+20*, C30+21, C30+22, SELG+6~
INSCT	C30+3~, C30+6, C30+8, C30+10, C30+17, C30+23, C30+24
INSNAME	C30+3~, SORT+1~, SORT+6*, SORT+8, SORT+9
IOF	EN+9
NGFLG	EN+3~, SELG+9, SELG+13, SELG+24
NGFND	EN+3~, G10+3, SELG+9, SELG+20
PLANOK	START+9~
POP	EN+3~, DEVICE+1~, DEVICE+11~
SORT	START+9~
SORT(	START+16, START+17, GETGRP+1, GETGRP+14!, SORT+9*
STOP	EN+3~, EN+5, C10+1, C20+1, G10+1, G20+1, G30+1, G40+2, G40+8, G50+1 , O10+1, GETGRP+5, GETGRP+12, SELI+19, SELA+18, SELG+36, SELGA+19, SELGN+17, SELCS+24, OUT+12*
X	EN+3~, SELI+10~, SELA+6~, SELG+27~, SELGA+7~, SELGN+6~, SELFILT+13~, OUT+4~
XX	SELFILT+13~, SELFILT+32, SELFILT+42, SELFILT+43, SELCS+9~
Y	EN+3~, SELI+10~, SELI+20!, SELA+6~, SELA+19, SELG+27~, SELG+37!, SELGA+7~, SELGA+20, SELGN+6~ , SELGN+18, SELFILT+13~, SELFILT+35, SELFILT+52, SELFILT+64, SELCS+25, OUT+4~, OUT+13
ZTDESC	EN+3~, DEVICE+11~, DEVICE+13*, DEVICE+16
ZTDEXC	EN+3~
ZTQUEUED	EN+3~
ZTREQ	EN+3~
ZTRTN	EN+3~, DEVICE+11~, DEVICE+12*, DEVICE+16
ZTSAVE	EN+3~, DEVICE+11~, DEVICE+16
ZTSAVE("IBCNGP("	DEVICE+15*
ZTSAVE("^TMP(""IBCNGP"",$J,"	DEVICE+14*
ZTSTOP	EN+3~

Customize PDF page

Package: Integrated Billing

Routine: IBCNGP

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: