i am trying for a dynamic compound reporting.
Look at the code below...

  
-SET &SLNO =1;
TABLE FILE HLDFICA
PRINT
  DST.REGION AS 'REGION'
ON TABLE HOLD AS TEST FORMAT ALPHA
END
-SET MAXCNT = &LINES;
-TYPE MAXCOUNT IS &MAXCNT
-RUN
-* Read ahead to prime the &IORETURN
-SET &IORETURN = 0;
-REPEAT :end_read WHILE &IORETURN EQ 0;
-READ TEST,&LINE
-IF &IORETURN NE 0 GOTO :end_read;
-TYPE SLNO = &SLNO
-SET &HOLDNAME = 'HLD'|EDIT(&SLNO);
-TYPE HOLDNAME = &HOLDNAME
-TYPE LINE = &LINE

TABLE FILE HLDFICA
PRINT
  PROTO_GRP_N
  MO_USE_Q
  MO_EXP_A
  MO_YTD_USE_Q
  PRYR_MO_YTD_USE_Q
  AVGMTD
  AVGYTD
  AVGPYTD
  REPTYPE
  REGION
WHERE REGION EQ '&LINE'
ON TABLE HOLD AS &HOLDNAME
END

-SET &PDFFOR = IF &SLNO EQ '1' THEN 'OPEN NOBREAK' ELSE IF &SLNO EQ &MAXCNT THEN 'CLOSE' ELSE 'NOBREAK';
-RUN
-TYPE &PDFFOR

-SET &SLNO = &SLNO+1;
-TYPE &SLNO

-IF &SLNO GT &MAXCNT GOTO LOOPEND;

TABLE FILE &HOLDNAME
SUM
     MO_USE_Q AS 'MTD'
     AVGMTD AS 'MTD,Avg $,per ton'
     MO_YTD_USE_Q AS 'YTD'
     AVGYTD AS 'YTD,Avg $,per ton'
BY REGION NOPRINT
BY PROTO_GRP_N AS ''
ACROSS REPTYPE AS ''
ON REGION SUBTOTAL AS 'Total ' OVER
HEADING
"<REGION"
ON TABLE SET PAGE-NUM OFF
ON TABLE SET HTMLCSS ON
ON TABLE PCHOLD FORMAT PDF &PDFFOR
ON TABLE SET STYLE *
     UNITS=IN,
    SQUEEZE=ON,
     ORIENTATION=LANDSCAPE,
$
ENDSTYLE
END

-:end_read
-GOTO LOOPEND
-LOOPEND
-EXIT

The loop works perfectly fine for storing the values in different hold file...but while i am printing them in the same loop it's not working.
But its also not giving any error.

Any help, highly appreciated.

tks/sam

This message has been edited. Last edited by: FP Mod Chuck,

Off the bat I see
-SET MAXCNT = &LINES;
Which should probably be -SET &MAXCNT = &LINES;

Break the loop into TWO loops. Do a loop around the code that creates the HOLD files and then do a loop around the code that builds the PDF from the HOLD files.

The following is a guess as to what the issue is:

The fact that the PDF is OPEN puts WebFOCUS into a mode in which it expects each HOLD to use the PDF output. Therefore when you loop back and create the next HOLD file it may be getting confused.

mgrackin : i tried with 2 loops, but not working.

Tom: even if you put (-SET &PDFFOR = IF &SLNO EQ '1' THEN 'OPEN NOBREAK' ELSE IF &SLNO EQ &MAXCNT THEN 'CLOSE' ELSE 'NOBREAK' before (-SET &SLNO = &SLNO+1; ) its not working.

It is capturing the data but can not print in PDF.

kewl...thanks a bunch...
NoCLOSE and A.10 made all the difference....

Hi,
This post helped me to loop through and create compound report.
I used NOCLOSE with READ but still i am not getting PDF report output.The data is getting stored as HOLD file ,but PDF output is not displaying,even though there is no error.?

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

Well... where is the code that makes this a compound report? So far I only see a loop that sends multiple PDF documents to PCHOLD in sequence. That would only work for the first PDF, the rest comes after the HTTP-response has been sent already and goes nowhere.