Print pagenumbers based on a particular column in pdf and printer Friendly formats

In Focus since 1993. WebFOCUS 7.7.03 Win 2003

June 14, 2007, 09:49 AM

Leah

Be sure to use the less than sign spot markers which always seem to be lost on replies. You would of course put the items in a footing and you can make it at the bottom of the page as well.

Leah

June 14, 2007, 10:02 AM

Prarie

Thanks Leah for the followup on that...

In Focus since 1993. WebFOCUS 7.7.03 Win 2003

June 14, 2007, 10:33 AM

Alan B

There is an issue with the mix of PAGE-BREAK REPAGE and the use of TABLASTPAGE.

The REPAGE sets the TABPAGENO back to 1, but TABLASTAPGE is for the total in the report, so you would get:
Page 1 of 18
Page 2 of 18
Page 1 of 18
Page 2 of 18
Page 3 of 18 etc.

There is not an easy way to get these figures into a SUBHEAD/HEADING and a SUBFOOT/FOOTING to show the number of pages within a sort break.

Alan.
WF 7.705/8.007

June 14, 2007, 10:34 AM

Kerry

Hi Suji,

Have you got a chance to try Prarie and Leah's suggestions? Many thanks to Prarie and Leah.

You may also want to try the following:

BY ACCOUNTNUMBER PAGE-BREAK

this will cause a page break when the account number changes.

The following online document may be of interest as well:

Producing 'Page 1 of n' Reports

Hope this helps.

Cheers,

Kerry

Kerry Zhan
Focal Point Moderator
Information Builders, Inc.

June 14, 2007, 10:52 AM

Alan B

I've dug out an old program that did page renumbering on sort pages. This is the basis of it:

SET PAGE=OFF
DEFINE FILE CAR
CNTR/I9 WITH CAR = 1;
END
TABLE FILE CAR
SUM  CNT.CAR WITHIN COUNTRY  NOPRINT
         MODEL
         BODY
COMPUTE  CNTR1/I9  = IF COUNTRY EQ LAST COUNTRY THEN CNTR1+1
                     ELSE 1; NOPRINT
COMPUTE  CNTR2/I9  = C1;     NOPRINT
BY       COUNTRY
BY       CAR                 PAGE-BREAK
ON CAR SUBHEAD
"Page <CNTR1 of <CNTR2"
ON CAR SUBFOOT
"Page <CNTR1 of <CNTR2 - (Page <TABPAGENO of <TABLASTPAGE total document pages.)"
END

Alan.
WF 7.705/8.007

June 14, 2007, 11:59 AM

Leah

You're welcome Prarie. And Alan, I like your example. I was trying to find an old example from our converion from production mainframe to WebFOCUS paging issues. This is good.

quote:

Originally posted by Alan B:
I've dug out an old program that did page renumbering on sort pages. This is the basis of it:

SET PAGE=OFF
DEFINE FILE CAR
CNTR/I9 WITH CAR = 1;
END
TABLE FILE CAR
SUM  CNT.CAR WITHIN COUNTRY  NOPRINT
         MODEL
         BODY
COMPUTE  CNTR1/I9  = IF COUNTRY EQ LAST COUNTRY THEN CNTR1+1
                     ELSE 1; NOPRINT
COMPUTE  CNTR2/I9  = C1;     NOPRINT
BY       COUNTRY
BY       CAR                 PAGE-BREAK
ON CAR SUBHEAD
"Page <CNTR1 of <CNTR2"
ON CAR SUBFOOT
"Page <CNTR1 of <CNTR2 - (Page <TABPAGENO of <TABLASTPAGE total document pages.)"
END

Leah

June 15, 2007, 03:24 AM

Damien

Perhaps this can help too, giving the possibility to put titles in subhead on every top of page as there is not yet setting like :

SET TITLEPOS=ONDATA that would put titles just above data and under SUBHEAD

EX :

-SET &NBRLINES = 22 ; :number of lines per page
DEFINE FILE CAR
CNT/I9 WITH CAR = CNT +1 ;
PGE/I9 = INT(CNT/&NBRLINES) + 1 ;
END
TABLE FILE CAR
SUM LST.PGE NOPRINT
PRINT SALES
BY PGE PAGE-BREAK NOPRINT
BY COUNTRY
ON PGE SUBHEAD
" COUNTRY<+0>CAR"
ON PGE SUBFOOT
" PAGES : END

Damien
WF 8202
DB : NETEZZA, MSSQL, DB2, ORACLE
Output : ALL

August 09, 2007, 05:34 AM

Suji

quote:
BY ACCOUNTNO PAGE-BREAK REPAGE

Thank you all for your updates.

I tried this one,
BY ACCOUNTNO PAGE-BREAK REPAGE

but I faced the same problem what Allan had stated .Is there any straightforward solution for this problem.

WebFOCUS 7.7.02(Production)
WebFOCUS 7.7.02(Test region)
Oracle backend (10g)and Windows Frontend.
HTML,PDF,EXL2K,FLEX,AHTML

August 09, 2007, 05:46 AM

FrankDutch

Suji

In fact you want a separate report per accountno.
Did you consider the use of reportcaster in Combination with the bursting value.

You send all the reports to the same mailadres (or FTP).

	*Frank*
	prod: WF 7.6.10 platform Windows, databases: msSQL2000, msSQL2005, RMS, Oracle, Sybase,IE7 test: WF 7.6.10 on the same platform and databases,IE7

August 09, 2007, 08:40 AM

Suji

FranckDutch,
Basically we dont use reportcaster for our reporting.Can you please suggest some other solution for this problem?

Thanks,
Suji.

WebFOCUS 7.7.02(Production)
WebFOCUS 7.7.02(Test region)
Oracle backend (10g)and Windows Frontend.
HTML,PDF,EXL2K,FLEX,AHTML

August 09, 2007, 09:28 AM

FrankDutch

Well what Reportcaster in fact does is looping trough all the accountnumbers, print the report, save it, send it by email and jumps to the next account.

You can do the same, create a list of accountnumbers save that list in a alpha file.
-Read that file and create an &ACCNUMBER and &FILENAME
Run the report and save the PDF with that &FILENAME
loop to the next number and do the same proces till the end of the file.

How to loop?

It is here on focal point.

And please update your signature with version information.

	*Frank*
	prod: WF 7.6.10 platform Windows, databases: msSQL2000, msSQL2005, RMS, Oracle, Sybase,IE7 test: WF 7.6.10 on the same platform and databases,IE7

August 09, 2007, 09:38 AM

Suji

Version information: WF 7.4.1 platform Windows, databases: Oracle

Thanks,
Suji

WebFOCUS 7.7.02(Production)
WebFOCUS 7.7.02(Test region)
Oracle backend (10g)and Windows Frontend.
HTML,PDF,EXL2K,FLEX,AHTML

August 09, 2007, 01:44 PM

Leah

It's terrible to have time on your hands.

I decided to see if I could come up with a real world example, though bursting with caster would have saved time. This is a listing of our courses by the department of record, develped in developer studio 7.6.2. Which I'm happy to see recognized column notation for the compute. Can't get code in there correctly on paste but the issue of course is the number of data lines on the page was used, and this can vary. I used 50 in my compute originally and it broke on a 99 count.

quote:
TABLE FILE RCRTTBL_UNO_PROD
SUM
CNT.RC010_RCRT NOPRINT
BY RC028 NOPRINT
PRINT
COMPUTE REALPAGE/I4 = ( C1 / 49 ) +1; NOPRINT
RC010_RCRT
SECTION_ID
RC090
RC110
RC140
BY RC028 NOPRINT
BY RC028

ON RC028 PAGE-BREAK REPAGE
HEADING
"Course Listing By Department of Record"
"&DATE<+0> at <+0>&TOD"
FOOTING
"Page {TABPAGENO of<+0> {REALPAGE"
WHERE RC005_RCRT EQ '20073';
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT PDF
ON TABLE SET STYLE *
UNITS=IN,
LEFTMARGIN=0.500000,
RIGHTMARGIN=0.500000,
TOPMARGIN=0.500000,
BOTTOMMARGIN=0.500000,
SQUEEZE=ON,
ORIENTATION=PORTRAIT,
$
TYPE=REPORT,
GRID=OFF,
FONT='ARIAL',
SIZE=9,
TOPGAP=0.013889,
BOTTOMGAP=0.027778,
$
TYPE=TITLE,
STYLE=BOLD,
$
TYPE=TABHEADING,
SIZE=12,
STYLE=BOLD,
$
TYPE=TABFOOTING,
SIZE=12,
STYLE=BOLD,
$
TYPE=HEADING,
SIZE=12,
STYLE=BOLD,
$
TYPE=HEADING,
LINE=1,
JUSTIFY=CENTER,
$
TYPE=HEADING,
LINE=2,
JUSTIFY=CENTER,
$
TYPE=FOOTING,
SIZE=12,
STYLE=BOLD,
$
TYPE=FOOTING,
LINE=1,
JUSTIFY=CENTER,
$
TYPE=FOOTING,
LINE=1,
OBJECT=TEXT,
ITEM=1,
BACKCOLOR=RGB(205 205 205),
$
TYPE=SUBHEAD,
SIZE=10,
STYLE=BOLD,
$
TYPE=SUBFOOT,
SIZE=10,
STYLE=BOLD,
$
TYPE=SUBTOTAL,
BACKCOLOR=RGB(210 210 210),
$
TYPE=ACROSSVALUE,
SIZE=9,
$
TYPE=ACROSSTITLE,
STYLE=BOLD,
$
ENDSTYLE
END

Leah