Focal Point Banner


As of December 1, 2020, Focal Point is retired and repurposed as a reference repository. We value the wealth of knowledge that's been shared here over the years. You'll continue to have access to this treasure trove of knowledge, for search purposes only.

Join the TIBCO Community
TIBCO Community is a collaborative space for users to share knowledge and support one another in making the best use of TIBCO products and services. There are several TIBCO WebFOCUS resources in the community.

  • From the Home page, select Predict: WebFOCUS to view articles, questions, and trending articles.
  • Select Products from the top navigation bar, scroll, and then select the TIBCO WebFOCUS product page to view product overview, articles, and discussions.
  • Request access to the private WebFOCUS User Group (login required) to network with fellow members.

Former myibi community members should have received an email on 8/3/22 to activate their user accounts to join the community. Check your Spam folder for the email. Please get in touch with us at community@tibco.com for further assistance. Reference the community FAQ to learn more about the community.


Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     [CLOSED] Page number missing in footing

Read-Only Read-Only Topic
Go
Search
Notify
Tools
[CLOSED] Page number missing in footing
 Login/Join
 
Member
posted
Hi,

I've an issue with page number display in footing. There’s no page number on any of the pages except the last page.(The entire report has only graphs except for the last page).

I am using TABPAGENO to display the page number in the footing.

Its like -

FOOTING BOTTOM
" "
"(C) Copyright 2006-&CURYEAR.EVAL All rights reserved - &FOOTLBL - Report generated &DATEtrMDYY at &TOD by &FULLNAME Page

TYPE=FOOTING,BORDER=OFF,GRID=OFF,$
TYPE=FOOTING,LINE=1,SIZE=1,BACKCOLOR=RGB(210 210 210),WIDTH=11.0,$
TYPE=FOOTING,LINE=2,SIZE=6,COLOR=RGB(102 102 102),JUSTIFY=CENTER,$


Also I've -
SET PRINTPLUS=ON
SET PAGE=NOLEAD

What could be the issue ?

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


764
Windows
PDF,EXL2K,HTML
 
Posts: 27 | Registered: July 28, 2009Report This Post
Member
posted Hide Post
Sorry the code is -

"(C) Copyright 2006-&CURYEAR.EVAL FMR Corp. All rights reserved - &FOOTLBL - Report generated &DATEtrMDYY at &TOD by &FULLNAME Page

764
Windows
PDF,EXL2K,HTML
 
Posts: 27 | Registered: July 28, 2009Report This Post
Member
posted Hide Post
Sorry the code is -
"(C) Copyright 2006-&CURYEAR.EVAL FMR Corp. All rights reserved - &FOOTLBL - Report generated &DATEtrMDYY at &TOD by &FULLNAME
Page

764
Windows
PDF,EXL2K,HTML
 
Posts: 27 | Registered: July 28, 2009Report This Post
Member
posted Hide Post
I am not sure why tabpageno is not getting displayed in the post,but I hope you can make out. it has "

764
Windows
PDF,EXL2K,HTML
 
Posts: 27 | Registered: July 28, 2009Report This Post
Silver Member
posted Hide Post
It would be helpful if you display the entire styling part.


Webfocus 8002M, 8009
OS: Windows7
 
Posts: 33 | Registered: July 31, 2008Report This Post
Member
posted Hide Post
The related code -

-SET &FOOTLBL = IF &RECORDS EQ 0 THEN 'Fidelity Confidential Information' ELSE 'Fidelity Highly Confidential / Attorney Client Privileged Communication / Attorney Work Product';

DEFINE FILE LALITHA
BLANK/A1 = ' ' ;
BLANK1/A1 = ' ' ;
BLANK2/A1 = ' ' ;
BLANK3/A1 = ' ' ;
END
-*
SET PRINTPLUS=ON
SET PAGE=NOLEAD
-RUN
TABLE FILE LALITHA
SUM
COMPUTE CTR/I1 = IF CTR EQ 1 THEN 2 ELSE 1 ; NOPRINT
-*Now print the months
-SET &MTHCTR = 1 ;
-*Get column title
-REPEAT MTHLOOP &MTHS TIMES
-SET &MTHCTR = &MTHCTR + 1 ;
-SET &COL = IF &MTHCTR GE 10 THEN 'E' || &MTHCTR ELSE 'E' || '0'||'&MTHCTR.EVAL' ;
-READ MTHS &MTHNAME_T.10.
-SET &MTHNAME = TRUNCATE(&MTHNAME_T) ;
&COL AS '&MTHNAME.EVAL'
-MTHLOOP
-*
-*Print first total. Dont print if no records
-IF &MTHS EQ 0 THEN GOTO SKPTOT1 ;
-SET &MTHTOT = &MTHCTR + 1 ;
-*If 'InProcess', then the total displays values from the last month
-SET &COLTOT = IF &SUBLVL EQ 3 THEN &COL ELSE
- IF &MTHTOT GE 10 THEN 'E' || &MTHTOT ELSE 'E' || '0'||'&MTHTOT.EVAL' ;
&COLTOT AS 'YTD'
BLANK1 AS ''
-SKPTOT1
-*
-*Print Quarters
-SET &QTRCTR = &MTHTOT ;
-REPEAT QTRLOOP &QTRS TIMES
-SET &QTRCTR = &QTRCTR + 1 ;
-SET &COL = IF &QTRCTR GE 10 THEN 'E' || &QTRCTR ELSE 'E' || '0'||'&QTRCTR.EVAL' ;
-*Get column title
-READ QTRS &QTRNAME_T.10.
-SET &QTRNAME = TRUNCATE(&QTRNAME_T) ;
&COL AS '&QTRNAME.EVAL'
-QTRLOOP
-*
-*Print Quarters total. Dont print if no records
-IF &MTHS EQ 0 THEN GOTO SKPTOT2 ;
-SET &QTRTOT = &QTRCTR + 1 ;
-*If 'InProcess', then the total displays values from the last month
-SET &COLQTOT = IF &SUBLVL EQ 3 THEN &COL ELSE
- IF &QTRTOT GE 10 THEN 'E' || &QTRTOT ELSE 'E' || '0'||'&QTRTOT.EVAL' ;
&COLQTOT AS 'YTD'
BLANK2 AS ''
-SKPTOT2
-*
-*Print Cumulative Quarters
-CLOSE QTRS
-SET &QTRCTR = &QTRTOT ;
-SET &CUM_QTR1# = '' ;
-SET &CUM_QTR2# = '' ;
-SET &CUM_QTR3# = '' ;
-SET &CUM_QTR4# = '' ;
-SET &CTR = 0 ;
-REPEAT QTRCLOOP &QTRS TIMES
-SET &QTRCTR = &QTRCTR + 1 ;
-SET &COL = IF &QTRCTR GE 10 THEN 'E' || &QTRCTR ELSE 'E' || '0'||'&QTRCTR.EVAL' ;
-SET &CTR = &CTR + 1 ;
-*Get column title
-READ QTRS &QTRNAME_T.10.
-SET &QTRNAME = IF &CTR EQ 1 THEN 'Cumulative,' ||TRUNCATE(&QTRNAME_T) ELSE TRUNCATE(&QTRNAME_T) ;
-*Store the column number for Cumulative title. Used to format in stylesheet
-SET &CUM_QTR1# = IF &CTR EQ 1 THEN &COL ELSE &CUM_QTR1#;
-SET &CUM_QTR2# = IF &CTR EQ 2 THEN &COL ELSE &CUM_QTR2#;
-SET &CUM_QTR3# = IF &CTR EQ 3 THEN &COL ELSE &CUM_QTR3#;
-SET &CUM_QTR4# = IF &CTR EQ 4 THEN &COL ELSE &CUM_QTR4#;
&COL AS '&QTRNAME.EVAL'
-QTRCLOOP
-*
BY BLANK NOPRINT SUB-TOTAL AS 'Total'
BY RISKISSUETYPE AS 'Type'
HEADING
"&REPORT_NAME"
"Time Period: &TOTLBL"
" "
"&HDR.EVAL Level (Risk Issues) - &STAT.EVAL"
FOOTING BOTTOM
" "
"(C) Copyright 2006-&CURYEAR.EVAL FMR Corp. All rights reserved - &FOOTLBL - Report generated &DATEtrMDYY at &TOD by &FULLNAME PageON TABLE SET PAGE-NUM OFF
ON TABLE SET NODATA ''
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT &OUTMODE
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
UNITS=IN,PAGESIZE='Letter',LEFTMARGIN=0.150,RIGHTMARGIN=0.15,TOPMARGIN=0.150,BOTTOMMARGIN=0.0,SQUEEZE=ON, ORIENTATION=LANDSCAPE,$
TYPE=REPORT,GRID=OFF,LEFTGAP=0.01,RIGHTGAP=0.01, BORDER=OFF,FONT='ARIAL',SIZE=8,STYLE=NORMAL,JUSTIFY=RIGHT,$
-*
TYPE=DATA,BACKCOLOR=RGB(228 228 228),WHEN=CTR EQ 1,$
TYPE=REPORT,WRAP=0.4, $
-*
TYPE=REPORT,COLUMN=N2,WRAP=1.5,JUSTIFY=LEFT, $
-*
TYPE=REPORT,COLUMN=BLANK1,WRAP=0.05, $
TYPE=DATA,COLUMN=BLANK1,BORDER-RIGHT=ON,BORDER-RIGHT-COLOR='BLACK',$
-*
TYPE=REPORT,COLUMN=BLANK2,WRAP=0.05, $
TYPE=DATA,COLUMN=BLANK2,BORDER-RIGHT=ON,BORDER-RIGHT-COLOR='BLACK',$
-*
TYPE=SUBTOTAL,BACKCOLOR='WHEAT', $
-*
TYPE=TITLE,BORDER=ON,GRID=OFF,JUSTIFY=CENTER,BACKCOLOR=RGB(210 210 210),STYLE=-UNDERLINE+BOLD,BORDER-COLOR='WHITE',BOTTOMGAP=0.05,$
TYPE=TITLE,COLUMN=&COLTOT,BORDER-RIGHT=OFF,$
TYPE=TITLE,COLUMN=BLANK1,BORDER-LEFT=OFF,$
TYPE=TITLE,COLUMN=&COLQTOT,BORDER-RIGHT=OFF,$
TYPE=TITLE,COLUMN=BLANK2,BORDER-LEFT=OFF,$
-*
-SET &CUM_QTR1# = IF &CUM_QTR1# EQ '' THEN 'N2' ELSE &CUM_QTR1# ;
TYPE=REPORT,COLUMN=&CUM_QTR1#,WRAP=0.7,$
TYPE=TITLE,COLUMN=&CUM_QTR1#,BORDER-RIGHT=OFF, JUSTIFY=RIGHT,$
-*Turn left borders off in the next 2 cells too if they exist
-SET &CUM_QTR2# = IF &CUM_QTR2# EQ '' THEN &CUM_QTR1# ELSE &CUM_QTR2# ;
-SET &CUM_QTR3# = IF &CUM_QTR3# EQ '' THEN &CUM_QTR1# ELSE &CUM_QTR3# ;
-SET &CUM_QTR4# = IF &CUM_QTR4# EQ '' THEN &CUM_QTR1# ELSE &CUM_QTR4# ;
TYPE=TITLE,COLUMN=&CUM_QTR2#,BORDER-RIGHT=OFF, JUSTIFY=RIGHT, $
TYPE=TITLE,COLUMN=&CUM_QTR3#,BORDER-RIGHT=OFF, JUSTIFY=RIGHT, $
TYPE=TITLE,COLUMN=&CUM_QTR4#,JUSTIFY=RIGHT, $
-*
TYPE=HEADING,BORDER=OFF,GRID=OFF,JUSTIFY=LEFT, BOTTOMGAP=0.05,$
TYPE=HEADING,LINE=1,OBJECT=TEXT,ITEM=1,SIZE=10,STYLE=BOLD,WRAP=3.4,JUSTIFY=LEFT,WIDTH=18.0,$
TYPE=HEADING,LINE=2,SIZE=8,JUSTIFY=LEFT,WIDTH=11.0,$
TYPE=HEADING,LINE=4,BACKCOLOR='NONE',SIZE=8,COLOR='BLACK',JUSTIFY=LEFT,WIDTH=11.0,$
-*
-*TYPE=FOOTING,LINE=3,SIZE=1,BACKCOLOR=RGB(210 210 210),WIDTH=11.0,$
-*TYPE=FOOTING,LINE=4,SIZE=6,COLOR=RGB(102 102 102),JUSTIFY=CENTER,$
TYPE=FOOTING,BORDER=OFF,GRID=OFF,$
TYPE=FOOTING,LINE=1,SIZE=1,BACKCOLOR=RGB(210 210 210),WIDTH=11.0,$
TYPE=FOOTING,LINE=2,SIZE=6,COLOR=RGB(102 102 102),JUSTIFY=CENTER,$
-*TYPE=FOOTING,LINE=1,SIZE=1,BACKCOLOR=RGB(210 210 210),WIDTH=10.7,$
-*TYPE=FOOTING,LINE=2,SIZE=7,JUSTIFY=CENTER,$

ENDSTYLE
END
-RUN


764
Windows
PDF,EXL2K,HTML
 
Posts: 27 | Registered: July 28, 2009Report This Post
Expert
posted Hide Post
Put your code between the RED code tags on the far right of the toolbar above...
Didn't need the style code...
Make sure you have a double quote to CLOSE the footer...

 
SET &FOOTLBL = IF &RECORDS EQ 0 THEN 'Fidelity Confidential Information' ELSE 'Fidelity Highly Confidential / Attorney Client Privileged Communication / Attorney Work Product';

DEFINE FILE LALITHA
BLANK/A1 = ' ' ;
BLANK1/A1 = ' ' ;
BLANK2/A1 = ' ' ;
BLANK3/A1 = ' ' ;
END
-*
SET PRINTPLUS=ON
SET PAGE=NOLEAD
-RUN
TABLE FILE LALITHA
SUM
COMPUTE CTR/I1 = IF CTR EQ 1 THEN 2 ELSE 1 ; NOPRINT
-*Now print the months
-SET &MTHCTR = 1 ;
-*Get column title
-REPEAT MTHLOOP &MTHS TIMES
-SET &MTHCTR = &MTHCTR + 1 ;
-SET &COL = IF &MTHCTR GE 10 THEN 'E' || &MTHCTR ELSE 'E' || '0'||'&MTHCTR.EVAL' ;
-READ MTHS &MTHNAME_T.10.
-SET &MTHNAME = TRUNCATE(&MTHNAME_T) ;
&COL AS '&MTHNAME.EVAL'
-MTHLOOP
-*
-*Print first total. Dont print if no records
-IF &MTHS EQ 0 THEN GOTO SKPTOT1 ;
-SET &MTHTOT = &MTHCTR + 1 ;
-*If 'InProcess', then the total displays values from the last month
-SET &COLTOT = IF &SUBLVL EQ 3 THEN &COL ELSE
- IF &MTHTOT GE 10 THEN 'E' || &MTHTOT ELSE 'E' || '0'||'&MTHTOT.EVAL' ;
&COLTOT AS 'YTD'
BLANK1 AS ''
-SKPTOT1
-*
-*Print Quarters
-SET &QTRCTR = &MTHTOT ;
-REPEAT QTRLOOP &QTRS TIMES
-SET &QTRCTR = &QTRCTR + 1 ;
-SET &COL = IF &QTRCTR GE 10 THEN 'E' || &QTRCTR ELSE 'E' || '0'||'&QTRCTR.EVAL' ;
-*Get column title
-READ QTRS &QTRNAME_T.10.
-SET &QTRNAME = TRUNCATE(&QTRNAME_T) ;
&COL AS '&QTRNAME.EVAL'
-QTRLOOP
-*
-*Print Quarters total. Dont print if no records
-IF &MTHS EQ 0 THEN GOTO SKPTOT2 ;
-SET &QTRTOT = &QTRCTR + 1 ;
-*If 'InProcess', then the total displays values from the last month
-SET &COLQTOT = IF &SUBLVL EQ 3 THEN &COL ELSE
- IF &QTRTOT GE 10 THEN 'E' || &QTRTOT ELSE 'E' || '0'||'&QTRTOT.EVAL' ;
&COLQTOT AS 'YTD'
BLANK2 AS ''
-SKPTOT2
-*
-*Print Cumulative Quarters
-CLOSE QTRS
-SET &QTRCTR = &QTRTOT ;
-SET &CUM_QTR1# = '' ;
-SET &CUM_QTR2# = '' ;
-SET &CUM_QTR3# = '' ;
-SET &CUM_QTR4# = '' ;
-SET &CTR = 0 ;
-REPEAT QTRCLOOP &QTRS TIMES
-SET &QTRCTR = &QTRCTR + 1 ;
-SET &COL = IF &QTRCTR GE 10 THEN 'E' || &QTRCTR ELSE 'E' || '0'||'&QTRCTR.EVAL' ;
-SET &CTR = &CTR + 1 ;
-*Get column title
-READ QTRS &QTRNAME_T.10.
-SET &QTRNAME = IF &CTR EQ 1 THEN 'Cumulative,' ||TRUNCATE(&QTRNAME_T) ELSE TRUNCATE(&QTRNAME_T) ;
-*Store the column number for Cumulative title. Used to format in stylesheet
-SET &CUM_QTR1# = IF &CTR EQ 1 THEN &COL ELSE &CUM_QTR1#;
-SET &CUM_QTR2# = IF &CTR EQ 2 THEN &COL ELSE &CUM_QTR2#;
-SET &CUM_QTR3# = IF &CTR EQ 3 THEN &COL ELSE &CUM_QTR3#;
-SET &CUM_QTR4# = IF &CTR EQ 4 THEN &COL ELSE &CUM_QTR4#;
&COL AS '&QTRNAME.EVAL'
-QTRCLOOP
-*
BY BLANK NOPRINT SUB-TOTAL AS 'Total'
BY RISKISSUETYPE AS 'Type'
HEADING
"&REPORT_NAME"
"Time Period: &TOTLBL"
" "
"&HDR.EVAL Level (Risk Issues) - &STAT.EVAL"
FOOTING BOTTOM
" "
"(C) Copyright 2006-&CURYEAR.EVAL FMR Corp. All rights reserved - &FOOTLBL - Report generated &DATEtrMDYY at &TOD by &FULLNAME Page <TABPAGENO"
ON TABLE SET PAGE-NUM OFF
ON TABLE SET NODATA ''
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT &OUTMODE
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
UNITS=IN,PAGESIZE='Letter',LEFTMARGIN=0.150,RIGHTMARGIN=0.15,TOPMARGIN=0.150,BOTTOMMARGIN=0.0,SQUEEZE=ON, ORIENTATION=LANDSCAPE,$
TYPE=REPORT,GRID=OFF,LEFTGAP=0.01,RIGHTGAP=0.01, BORDER=OFF,FONT='ARIAL',SIZE=8,STYLE=NORMAL,JUSTIFY=RIGHT,$
-*
TYPE=DATA,BACKCOLOR=RGB(228 228 228),WHEN=CTR EQ 1,$
TYPE=REPORT,WRAP=0.4, $
-*
TYPE=REPORT,COLUMN=N2,WRAP=1.5,JUSTIFY=LEFT, $
-*
TYPE=REPORT,COLUMN=BLANK1,WRAP=0.05, $
TYPE=DATA,COLUMN=BLANK1,BORDER-RIGHT=ON,BORDER-RIGHT-COLOR='BLACK',$
-*
TYPE=REPORT,COLUMN=BLANK2,WRAP=0.05, $
TYPE=DATA,COLUMN=BLANK2,BORDER-RIGHT=ON,BORDER-RIGHT-COLOR='BLACK',$
-*
TYPE=SUBTOTAL,BACKCOLOR='WHEAT', $
-*
TYPE=TITLE,BORDER=ON,GRID=OFF,JUSTIFY=CENTER,BACKCOLOR=RGB(210 210 210),STYLE=-UNDERLINE+BOLD,BORDER-COLOR='WHITE',BOTTOMGAP=0.05,$
TYPE=TITLE,COLUMN=&COLTOT,BORDER-RIGHT=OFF,$
TYPE=TITLE,COLUMN=BLANK1,BORDER-LEFT=OFF,$
TYPE=TITLE,COLUMN=&COLQTOT,BORDER-RIGHT=OFF,$
TYPE=TITLE,COLUMN=BLANK2,BORDER-LEFT=OFF,$
-*
-SET &CUM_QTR1# = IF &CUM_QTR1# EQ '' THEN 'N2' ELSE &CUM_QTR1# ;
TYPE=REPORT,COLUMN=&CUM_QTR1#,WRAP=0.7,$
TYPE=TITLE,COLUMN=&CUM_QTR1#,BORDER-RIGHT=OFF, JUSTIFY=RIGHT,$
-*Turn left borders off in the next 2 cells too if they exist
-SET &CUM_QTR2# = IF &CUM_QTR2# EQ '' THEN &CUM_QTR1# ELSE &CUM_QTR2# ;
-SET &CUM_QTR3# = IF &CUM_QTR3# EQ '' THEN &CUM_QTR1# ELSE &CUM_QTR3# ;
-SET &CUM_QTR4# = IF &CUM_QTR4# EQ '' THEN &CUM_QTR1# ELSE &CUM_QTR4# ;
TYPE=TITLE,COLUMN=&CUM_QTR2#,BORDER-RIGHT=OFF, JUSTIFY=RIGHT, $
TYPE=TITLE,COLUMN=&CUM_QTR3#,BORDER-RIGHT=OFF, JUSTIFY=RIGHT, $
TYPE=TITLE,COLUMN=&CUM_QTR4#,JUSTIFY=RIGHT, $
-*
TYPE=HEADING,BORDER=OFF,GRID=OFF,JUSTIFY=LEFT, BOTTOMGAP=0.05,$
TYPE=HEADING,LINE=1,OBJECT=TEXT,ITEM=1,SIZE=10,STYLE=BOLD,WRAP=3.4,JUSTIFY=LEFT,WIDTH=18.0,$
TYPE=HEADING,LINE=2,SIZE=8,JUSTIFY=LEFT,WIDTH=11.0,$
TYPE=HEADING,LINE=4,BACKCOLOR='NONE',SIZE=8,COLOR='BLACK',JUSTIFY=LEFT,WIDTH=11.0,$
-*
-*TYPE=FOOTING,LINE=3,SIZE=1,BACKCOLOR=RGB(210 210 210),WIDTH=11.0,$
-*TYPE=FOOTING,LINE=4,SIZE=6,COLOR=RGB(102 102 102),JUSTIFY=CENTER,$
TYPE=FOOTING,BORDER=OFF,GRID=OFF,$
TYPE=FOOTING,LINE=1,SIZE=1,BACKCOLOR=RGB(210 210 210),WIDTH=11.0,$
TYPE=FOOTING,LINE=2,SIZE=6,COLOR=RGB(102 102 102),JUSTIFY=CENTER,$
-*TYPE=FOOTING,LINE=1,SIZE=1,BACKCOLOR=RGB(210 210 210),WIDTH=10.7,$
-*TYPE=FOOTING,LINE=2,SIZE=7,JUSTIFY=CENTER,$

ENDSTYLE
END
-RUN
 

This message has been edited. Last edited by: Tom Flynn,


Tom Flynn
WebFOCUS 8.1.05 - PROD/QA
DB2 - AS400 - Mainframe
 
Posts: 1972 | Location: Centennial, CO | Registered: January 31, 2006Report This Post
  Powered by Social Strata  

Read-Only Read-Only Topic

Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     [CLOSED] Page number missing in footing

Copyright © 1996-2020 Information Builders