Focal Point
[SOLVED] Infinite loop?

This topic can be found at:
https://forums.informationbuilders.com/eve/forums/a/tpc/f/7971057331/m/574106045

October 05, 2010, 12:10 PM
texgator
[SOLVED] Infinite loop?
I have the following two graphs in the same procedure. If I comment one of them out, the other one runs fine. However, if I run both of them at the same time, I get IBIF_max_messages error. Can someone tell me what I am doing wrong here. Thanks.


SET HOLDLIST=PRINTONLY
SET ASNAMES=ON
-SET &RANDOM=EDIT(&TOD,'99$99$99');
-SET &CURRENTMN=EDIT(&YYMD,'$$$$99');
-SET &CURENTYR = EDIT(&YYMD, '9999$$');
-SET &STARTYR12 = &SYEAR -1;
-SET &STARTYRMN12 = &STARTYR12 || &SMONTH;


TABLE FILE CACHE_REGION_SALES_BY_COSTCENTER_MONTH_TEST_3
SUM MAX.ACC_PER2
BY ACC_PER1 NOPRINT
WHERE ACC_PER1 GE '&STARTYRMN12' AND IDCSTS EQ '&COSTCENTERDRILL'
ON TABLE SAVE
END
-RUN

-SET &CNTR=0;
-RUN

-SET &MAXVALUES=&LINES;

-MRNOEDIT BEGIN

GRAPH FILE CACHE_REGION_SALES_BY_COSTCENTER_MONTH_TEST_3
SUM CC_CURRENTYTD_SALES AS 'Sales $'
WHERE ACC_PER1 GE '&STARTYRMN12'
ACROSS ACC_PER2 AS 'Accounting Period'
COLUMNS
-READMORE
-READ SAVE &ACC_PER2.A12. NOCLOSE
-IF &IORETURN NE 0 GOTO DONE;
-SET &CNTR=&CNTR +1;
-SET &ANDCOLUMN.&CNTR= IF &CNTR EQ &MAXVALUES THEN '''&ACC_PER2.EVAL'''
-ELSE '''&ACC_PER2.EVAL''' || (' AND') ;
&ANDCOLUMN.&CNTR
-GOTO READMORE
-DONE


ON GRAPH HOLD AS GRAPHE FORMAT HTMTABLE
......
..........



SET HOLDLIST=PRINTONLY
SET ASNAMES=ON
-SET &RANDOM=EDIT(&TOD,'99$99$99');
-SET &CURRENTMN=EDIT(&YYMD,'$$$$99');
-SET &CURENTYR = EDIT(&YYMD, '9999$$');
-SET &STARTYR12 = &SYEAR -1;
-SET &STARTYRMN12 = &STARTYR12 || &SMONTH;


TABLE FILE CACHE_REGION_SALES_BY_COSTCENTER_MONTH_TEST_3
SUM MAX.ACC_PER2
BY ACC_PER1 NOPRINT
WHERE ACC_PER1 GE '&STARTYRMN12' AND IDCSTS EQ '&COSTCENTERDRILL'
ON TABLE SAVE
END
-RUN

-SET &CNTRA=0;
-RUN

-SET &MAXVALUESA=&LINES;

-MRNOEDIT BEGIN

GRAPH FILE CACHE_REGION_SALES_BY_COSTCENTER_MONTH_TEST_3
SUM CC_GROSS_MARGIN_YTD AS 'GP MTD'
WHERE ACC_PER1 GE '&STARTYRMN12'
ACROSS ACC_PER2 AS 'Accounting Period'
COLUMNS
-READMOREA
-READ SAVE &ACC_PER2.A12. NOCLOSE
-IF &IORETURN NE 0 GOTO DONE;
-SET &CNTRA=&CNTRA +1;
-SET &ANDCOLUMN.&CNTRA= IF &CNTRA EQ &MAXVALUESA THEN '''&ACC_PER2.EVAL'''
-ELSE '''&ACC_PER2.EVAL''' || (' AND') ;
&ANDCOLUMN.&CNTRA
-GOTO READMOREA
-DONE



ON GRAPH HOLD AS GRAPHF FORMAT HTMTABLE
.....
.......

This message has been edited. Last edited by: Kerry,


WebFOCUS 7.6.10
Windows
all output (Excel, HTML, PDF)
October 05, 2010, 12:41 PM
Doug
For starters, you have multiple target labels: -DONE. Which ONE do you want to -GOTO? Keep target labels unique.

IMHO: I wouldn't even use such things as READMORE and READMOREA. Just for uniqueness. READMORE is the shortest unique truncation of READMOREA.

I only took a glance at this, so, I hope this helps.




   In FOCUS Since 1983 ~ from FOCUS to WebFOCUS.
   Current: WebFOCUS Administrator at FIS Worldpay | 8204, 8206
October 05, 2010, 01:04 PM
texgator
It did. Thanks.


WebFOCUS 7.6.10
Windows
all output (Excel, HTML, PDF)