Routine: IBCNOR4

Package	Total	Call Graph
VA FileMan	3	NOW^%DTC ($$GET1,GETS)^DIQ ^DIR
Kernel	2	$$UP^XLFSTR EN^XUTMDEVQ
Integrated Billing	1	$$DAT2^IBOUTL

Package	Total	Caller Graph
Integrated Billing	1	IBCN DUP GRP PLAN BY INS RPT

Name	Comments	DBIA/ICR reference
EN	; entry point
ENTYP	; get type equal or contain or all
ENRK	; come here if continue from ^ response
ENR	; ask question return point.
ENAQ	;
CON	; continue if all
RE	; report or excel
EXIT	; quit point
ISET	; if item save and set flag
OUT	; Prompt to allow users to select output format ; Returns: E - Output to excel ; R - Output to report ; IBSTOP=1 - No Selection made
OUTQ	;
DEVICE	;
COMPILE	; build output of payers
PRINT	; out put the compile in insurance co name order
EXITC	; compile section exit
NOD	; no info to print
QLINE	; cr to continue
WALK(IBINDX,IBLS)	; get subscribers
RUN	; go through 355.3
RSET	; update TMP to prep for subscriber check
HDRE	; excel header
HDRR	; report header
STOP()	; Determine if user wants to exit out of the whole option ; Initialize Variables
STOPX	; STOP Exit Point

Name	Field # of Occurrence
NOW^%DTC	COMPILE+14
$$GET1^DIQ	WALK+9, RUN+5, RUN+28
GETS^DIQ	RUN+15, RUN+37
^DIR	ENTYP+13, ENAQ+1, CON+10, OUT+11, QLINE+5, STOP+9
$$DAT2^IBOUTL	COMPILE+15
$$UP^XLFSTR	ISET+4, RUN+44, RSET+3
EN^XUTMDEVQ	DEVICE+11

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"This report can help identify potential duplicate group plans by group" Line Location: EN+5
Function Call: WRITE	Prompt: !,"number in one or more insurance companies. Search through the entire" Line Location: EN+6
Function Call: WRITE	Prompt: !,"database for duplicate groups or narrow down the search by a specific" Line Location: EN+7
Function Call: WRITE	Prompt: !,"group number." Line Location: EN+8
Function Call: WRITE	Prompt: ! Line Location: ENTYP+2
Function Call: WRITE	Prompt: ! Line Location: ENR+1
Function Call: WRITE	Prompt: !,"This is a required response. Enter '^' to exit" Line Location: ENAQ+3
Function Call: WRITE	Prompt: !!!,"WARNING: You have selected to run this report for all duplicate groups." Line Location: CON+2
Function Call: WRITE	Prompt: !,"In doing so, this report will take a long time to run.",! Line Location: CON+3
Function Call: WRITE	Prompt: ! Line Location: OUT+5
Function Call: WRITE	Prompt: !!,"*This report is 132 characters wide.*",! Line Location: DEVICE+2
Function Call: WRITE	Prompt: !!,"For CSV output, turn logging or capture on now.",! Line Location: DEVICE+4
Function Call: WRITE	Prompt: "To avoid undesired wrapping of the data, please" Line Location: DEVICE+5
Function Call: WRITE	Prompt: !," enter '0;256;99999'.",! Line Location: DEVICE+6
Function Call: WRITE	Prompt: !,"Checking for Duplicate Group Number(s)",! Line Location: COMPILE+28
Function Call: WRITE	Prompt: !,$P(IBA,U,4),U,IBNM,U,IBGNAM,U,IBINS,U,IBADDR,U,$P(IBA,U,2),U,$P(IBA,U,3) Line Location: PRINT+16
Function Call: WRITE	Prompt: !,IBNM Line Location: PRINT+24
Function Call: WRITE	Prompt: !,?2,$P(IBA,U,6),?6,IBINS,?38,IBADDR,?74,$P(IBW,U,1),?83,$P(IBW,U,2),?107,$E($P(IBW,U,3),1,24) Line Location: PRINT+30
Function Call: WRITE	Prompt: !,IBNM," (continued)" Line Location: PRINT+35
Function Call: WRITE	Prompt: !,IBEORMSG Line Location: PRINT+37
Function Call: WRITE	Prompt: !,IBNONEMSG,!,IBEORMSG Line Location: NOD+3
Function Call: WRITE	Prompt: ! Line Location: QLINE+3
Function Call: WRITE	Prompt: !,"Gathering Subscriber Counts: ",!,"." Line Location: WALK+3
Function Call: WRITE	Prompt: "." Line Location: WALK+8
Function Call: WRITE	Prompt: !,"Placing Subscriber Totals: ",!,"." Line Location: WALK+13
Function Call: WRITE	Prompt: "." Line Location: WALK+20
Function Call: WRITE	Prompt: "." Line Location: RUN+4
Function Call: WRITE	Prompt: !,IBHDRNAME,U,IBHDRDATE Line Location: HDRE+2
Function Call: WRITE	Prompt: !,IBFILTER Line Location: HDRE+3
Function Call: WRITE	Prompt: ", + Indicates individual group plan * Indicates inactive group plan" Line Location: HDRE+4
Function Call: WRITE	Prompt: !,"A/I^GROUP NUMBER^GROUP NAME^INSURANCE COMPANY^ADDRESS^TYPE OF PLAN^TOTAL SUBSCRIBERS" Line Location: HDRE+5
Function Call: WRITE	Prompt: ! Line Location: HDRR+4
Function Call: WRITE	Prompt: IBHDRNAME,?92,IBHDRDATE,?119,"Page: ",IBA,! Line Location: HDRR+6
Function Call: WRITE	Prompt: IBFILTER,?57,"+ Indicates individual group plan",?99,"* Indicates inactive group plan",!! Line Location: HDRR+8
Function Call: WRITE	Prompt: "GROUP NUMBER",! Line Location: HDRR+9
Function Call: WRITE	Prompt: ?2,"A/I",?6,"INSURANCE COMPANY",?38,"ADDRESS",?72,"TOTAL SUB",?83,"GROUP NAME",?107,"TYPE OF PLAN" Line Location: HDRR+10
Function Call: WRITE	Prompt: !,$E(IBDASHES,1,132) Line Location: HDRR+11
Function Call: WRITE	Prompt: ! Line Location: STOP+3
Routine Call	DIR Line Location: ENTYP+13 ENAQ+1 CON+10 OUT+11 QLINE+5 STOP+9

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

Name	Line Occurrences (* Changed, ! Killed)
^DIC(36 - [#36]	RUN+6
^DPT("AB"	WALK+6, WALK+7
^IBA(355.3 - [#355.3]	RUN+3
^TMP("IBCNOR4"	EN+3!, ENRK+1!, EXIT+2!, ISET+4*, DEVICE+7
^TMP($J	COMPILE+19!, COMPILE+20!, COMPILE+22, COMPILE+33, COMPILE+34, PRINT+5, PRINT+8, PRINT+9, PRINT+11, PRINT+12 , PRINT+13, PRINT+14, PRINT+15, PRINT+19, PRINT+20, PRINT+25, PRINT+26, PRINT+27, PRINT+28, EXITC+2! , EXITC+3!, WALK+4, WALK+11, WALK+12, WALK+16, WALK+17, WALK+18, WALK+19, WALK+21, WALK+24 , WALK+28, WALK+29, WALK+30, WALK+33, RUN+44, RSET+2, RSET+3, RSET+5, RSET+6, RSET+8*

Name	Line Occurrences
CON	ENTYP+18
DEVICE	RE+3
ENAQ	ENAQ+3
EXIT	ENTYP+16, ENTYP+17, ENAQ+7, CON+11, RE+1
EXITC	PRINT+5, PRINT+36
HDRE	PRINT+6, PRINT+23, PRINT+34, NOD+2
HDRR	PRINT+6, PRINT+23, PRINT+34, NOD+2
ISET	ENAQ+6
NOD	PRINT+5
OUT	RE+1
OUTQ	OUT+12
QLINE	PRINT+23, PRINT+33, PRINT+38, NOD+4
RE	ENAQ+8, CON+1
RSET	RUN+44, RUN+45
RUN	COMPILE+30
STOPX	STOP+10
WALK	COMPILE+36

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	COMPILE+2~, COMPILE+15
DIR	EN+2~, EN+10~, ENTYP+3!, ENR+2!, CON+4!, CON+10!, OUT+4~, OUT+11!, QLINE+2~, QLINE+5! , STOP+2~, STOP+9!
DIR("?"	ENTYP+5, ENTYP+6, ENTYP+7, ENTYP+8, ENTYP+9, ENTYP+10, ENTYP+11, ENTYP+12, ENR+4, CON+8 , CON+9, OUT+9, OUT+10, STOP+7, STOP+8*
DIR("A"	ENTYP+4, ENR+3, CON+6, OUT+7, STOP+5*
DIR("B"	CON+7, OUT+8, STOP+6*
DIR(0	ENTYP+3, ENR+2, CON+5, OUT+6, QLINE+5, STOP+4
DIROUT	EN+10~, ENTYP+15, ENAQ+5, CON+4!, OUT+4~, OUT+12, QLINE+2~, STOP+10
DIRUT	EN+10~, ENTYP+15, ENAQ+5, CON+4!, OUT+4~, OUT+12, QLINE+2~, STOP+2~, STOP+10
DTOUT	EN+10~, ENTYP+15, ENAQ+5, CON+4!, OUT+4~, OUT+12, QLINE+2~, QLINE+6, STOP+10
DUOUT	EN+10~, ENTYP+15, ENAQ+5, CON+4!, OUT+4~, OUT+12, QLINE+2~, QLINE+6, STOP+10
IB3553	COMPILE+2~, PRINT+14, PRINT+15, PRINT+27, PRINT+28, WALK+2~, WALK+18, WALK+19, WALK+21, WALK+24 , WALK+28, WALK+33
IB3553GNA	RUN+2~, RUN+22, RUN+23, RUN+24, RUN+31, RSET+5
IB3553TY	RUN+2~, RUN+26, RUN+27, RUN+28*, RSET+5
IB36	COMPILE+2~, WALK+2~, WALK+4, WALK+6, WALK+7, WALK+11, WALK+12, WALK+22, WALK+24, RUN+5* , RUN+6, RUN+37, RUN+38, RSET+5, RSET+6
IB36A1	RUN+2~, RUN+40*, RSET+5
IB36N	RUN+2~, RUN+39, RUN+41, RSET+5
IB5	RUN+2~, RUN+16!*
IB5(	RUN+18, RUN+19, RUN+22, RUN+23, RUN+26, RUN+27, RUN+28, RUN+30
IBA	ISET+2~, COMPILE+2~, PRINT+2~, PRINT+15, PRINT+16, PRINT+28, PRINT+29, PRINT+30, WALK+2~, WALK+9* , WALK+10, WALK+11, WALK+12, RUN+30, RUN+31, RUN+42, HDRR+2~, HDRR+5*, HDRR+6
IBADDR	COMPILE+2~, PRINT+13, PRINT+14, PRINT+15, PRINT+16, PRINT+26, PRINT+27, PRINT+28, PRINT+30
IBAR	EN+2~
IBAR5	RUN+2~, RUN+15!
IBAR5(	RUN+16
IBARY	COMPILE+2~, PRINT+3!, WALK+2~, RUN+37!
IBARY(36	RUN+38
IBB	DEVICE+1~, DEVICE+10, COMPILE+2~, COMPILE+34, WALK+2~, WALK+26*, WALK+27
IBC	ISET+2~, COMPILE+2~, WALK+2~, WALK+27*
IBCHK	COMPILE+2~, COMPILE+8, COMPILE+34, WALK+16*
IBCK	EN+2~
IBCNT	EN+2~, COMPILE+2~, COMPILE+33, WALK+4, WALK+8, WALK+16, WALK+20, WALK+24, RUN+3, RUN+4*
IBCRT	COMPILE+2~, COMPILE+9, COMPILE+10, COMPILE+28, QLINE+4, WALK+3, WALK+8, WALK+13, WALK+20, RUN+4 , HDRR+3, HDRR+4
IBCTL	COMPILE+2~, RUN+3, RSET+8
IBD	ISET+2~, WALK+2~
IBDASHES	COMPILE+2~, COMPILE+16*, HDRR+11
IBDOT	COMPILE+2~, COMPILE+23*, WALK+8
IBDTA	WALK+2~, WALK+21, WALK+22, WALK+27, WALK+28, WALK+33
IBE	ISET+2~
IBEORMSG	COMPILE+2~, COMPILE+11*, PRINT+37, NOD+3
IBF	HDRR+2~
IBFILTER	COMPILE+2~, COMPILE+29, COMPILE+32, COMPILE+34*, HDRE+3, HDRR+8
IBFND	ISET+2~, COMPILE+21!
IBG	HDRR+2~
IBGCT	COMPILE+3~, PRINT+4, PRINT+24, PRINT+28*, PRINT+35
IBGLIN	PRINT+2~, PRINT+9, PRINT+10, PRINT+20, PRINT+21, PRINT+35
IBGNAM	COMPILE+3~, PRINT+11*, PRINT+12, PRINT+13, PRINT+14, PRINT+15, PRINT+16
IBGNUM	WALK+2~, WALK+16*, WALK+17, WALK+18, WALK+19, WALK+21, WALK+28, WALK+29, WALK+33
IBGON	COMPILE+3~, PRINT+4*
IBHDR	COMPILE+3~, COMPILE+18*
IBHDRDATE	COMPILE+4~, COMPILE+15*, HDRE+2, HDRR+6
IBHDRNAME	COMPILE+4~, COMPILE+13*, HDRE+2, HDRR+6
IBI	EN+2~, ENAQ+4*
IBID	EN+2~
IBINA	RUN+2~, RUN+42*, RSET+5
IBINAL1	WALK+2~, WALK+17, WALK+18, WALK+19, WALK+21, WALK+28, WALK+33
IBINDX	COMPILE+4~, WALK~
IBINM	WALK+2~, WALK+16, WALK+17, WALK+18, WALK+19, WALK+21, WALK+28, WALK+33
IBINS	COMPILE+4~, PRINT+12, PRINT+13, PRINT+14, PRINT+15, PRINT+16, PRINT+25, PRINT+26, PRINT+27, PRINT+28 , PRINT+30
IBITM	COMPILE+4~
IBL	COMPILE+4~
IBLNC	COMPILE+4~, COMPILE+9, PRINT+23, PRINT+24, PRINT+31, PRINT+32, HDRR+3, HDRR+7*
IBLOOK	COMPILE+4~, COMPILE+33*, COMPILE+34
IBLS	COMPILE+4~, WALK~
IBMAXCNT	COMPILE+4~, COMPILE+9, COMPILE+10, PRINT+23, PRINT+32
IBNM	COMPILE+4~, PRINT+8, PRINT+9, PRINT+11, PRINT+12, PRINT+13, PRINT+14, PRINT+15, PRINT+16, PRINT+19 , PRINT+20, PRINT+24, PRINT+25, PRINT+26, PRINT+27, PRINT+28, PRINT+35
IBNONEMSG	COMPILE+4~, COMPILE+12*, NOD+3
IBOK	EN+2~, ENR+5, ENAQ+3, ENAQ+4*
IBONE	EN+2~
IBOUT	EN+2~, OUT+13, DEVICE+2, DEVICE+3, COMPILE+7, COMPILE+18, PRINT+6, PRINT+7, PRINT+18, PRINT+23 , PRINT+29, PRINT+34, NOD+2, RUN+27, RUN+28
IBPGC	COMPILE+5~, PRINT+4, PRINT+32, HDRR+3, HDRR+5
IBPTDFN	WALK+2~, WALK+6*, WALK+7, WALK+9
IBPTINS	WALK+2~, WALK+6, WALK+7, WALK+9
IBS	COMPILE+5~
IBS3553	COMPILE+5~, RUN+3*, RUN+5, RUN+15, RUN+16, RSET+5, RSET+6
IBSI	COMPILE+5~, RUN+18, RUN+19, RUN+20, RUN+44, RSET+2, RSET+3, RSET+5
IBSPACES	COMPILE+5~, COMPILE+17*, WALK+27, HDRR+5
IBST	COMPILE+5~
IBSTAB	COMPILE+5~
IBSTOP	EN+2~, RE+1, OUT+12, COMPILE+5~, PRINT+4, PRINT+19, PRINT+23, PRINT+25, PRINT+26, PRINT+27 , PRINT+33, PRINT+36, QLINE+6, STOP+10, STOP+11
IBSUBCT	WALK+2~, WALK+24*, WALK+26
IBTYP	EN+2~, ENTYP+2, ENTYP+17, ENTYP+18, CON+1, COMPILE+23, COMPILE+29, COMPILE+32, COMPILE+33, PRINT+10 , PRINT+21, RUN+43, RSET+7
IBUN	COMPILE+5~, RSET+3*
IBW	COMPILE+5~, PRINT+3!, PRINT+29, PRINT+30, RUN+38!
IBW(	RUN+39, RUN+40, RUN+42
IBXSAV	EN+2~, DEVICE+7!*, COMPILE+22
IBXTFEED	COMPILE+5~, COMPILE+9, COMPILE+10
IBZIP	COMPILE+5~
IOF	EN+4, HDRR+3
IOSL	COMPILE+9, COMPILE+10
IOST	COMPILE+10
LIN	QLINE+2~
POP	EN+2~, DEVICE+1~
U	ENTYP+15, ENTYP+16, ENAQ+5, ENAQ+7, ISET+3, PRINT+16, PRINT+29, PRINT+30, WALK+22, WALK+27 , WALK+33, RSET+5, HDRE+2
X	EN+2~, EN+10~, OUT+4~, STOP+2~
Y	EN+2~, EN+10~, ENTYP+14, ENTYP+15, ENTYP+16, ENTYP+17, ENAQ+3, ENAQ+4, ENAQ+5, ENAQ+7 , CON+11, ISET+3, ISET+4, OUT+4~, OUT+13, STOP+2~, STOP+10*, STOP+11, STOPX+1
ZTDESC	DEVICE+1~, DEVICE+9*, DEVICE+11
ZTRTN	DEVICE+1~, DEVICE+8*, DEVICE+11
ZTSAVE	DEVICE+1~, DEVICE+11
ZTSAVE(	DEVICE+10*

Customize PDF page

Package: Integrated Billing

Routine: IBCNOR4

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: