Focal Point
[SOLVED] Display SUBHEAD on top of ACROSS Fields

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

September 12, 2012, 07:16 PM
prodrigu
[SOLVED] Display SUBHEAD on top of ACROSS Fields
Does anyone know how to display the subhead (ON COUNTRY SUBHEAD) to be on top of the across fields (ACROSS BODYTYPE)? Or can someone point me in the right direction.

Below is a sample using the car file. I just put some code together so it might be completely formatted.

SET HIDENULLACRS=ON

TABLE FILE CAR
SUM
DEALER_COST AS ''

BY COUNTRY  AS ''
BY CAR      AS ''
BY MODEL    AS ''
ACROSS BODYTYPE AS ''

ON COUNTRY PAGE-BREAK 
ON TABLE SUBHEAD
"PAGE: <TABPAGENO"
"car_report.fex"
" "
"CAR REPORT"
"Data as of: &MDYY"
" "
"COUNTRY<+0>CAR<+0>MODEL"
" "
ON COUNTRY SUBHEAD
"<LENGTH <+0> <WIDTH <+0> <HEIGHT <+0> <WEIGHT "
"Parent Product Lot: "
" "
ON COUNTRY SUBFOOT
" "
" "
ON TABLE PCHOLD FORMAT EXL2K
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     PAGESIZE='LETTER',
     LEFTMARGIN=0.1500000,
     RIGHTMARGIN=0.15000000,
     TOPMARGIN=0.000000,
     BOTTOMMARGIN=0.000000,
     SQUEEZE=ON,
     ORIENTATION=LANDSCAPE,
$
TYPE=REPORT,
     GRID=OFF,
	 HEADPANEL=OFF,
     FONT='TIMES NEW ROMAN',
     SIZE=9,
     COLOR=BLACK,
     BACKCOLOR=NONE,
     STYLE=NORMAL,
$

TYPE=TABHEADING, HEADALIGN=BODY,$
TYPE=TABHEADING, LINE=1, ITEM=1, OBJECT=TEXT,  COLSPAN=1, JUSTIFY=LEFT,$
TYPE=TABHEADING, LINE=1, ITEM=1, OBJECT=FIELD, COLSPAN=1, JUSTIFY=LEFT,$
TYPE=TABHEADING, LINE=2, ITEM=1, OBJECT=TEXT, COLSPAN=8,  JUSTIFY=RIGHT,$
TYPE=TABHEADING, LINE=3, COLSPAN=8, JUSTIFY=RIGHT,$
TYPE=TABHEADING, LINE=4, COLSPAN=8, JUSTIFY=CENTER,$
TYPE=TABHEADING, LINE=5, COLSPAN=8, JUSTIFY=CENTER,$
TYPE=TABHEADING, LINE=6, COLSPAN=8, JUSTIFY=LEFT,$

TYPE=TABHEADING, LINE=7, OBJECT=TEXT, ITEM=1, SIZE=9, COLSPAN=1, JUSTIFY=LEFT, $
TYPE=TABHEADING, LINE=7, OBJECT=TEXT, ITEM=2, SIZE=9, COLSPAN=1, JUSTIFY=LEFT, $
TYPE=TABHEADING, LINE=7, OBJECT=TEXT, ITEM=3, SIZE=9, COLSPAN=1, JUSTIFY=LEFT, $
TYPE=TABHEADING, LINE=7, OBJECT=TEXT, ITEM=4, SIZE=9, COLSPAN=4, JUSTIFY=CENTER, $
TYPE=TABHEADING, LINE=7, OBJECT=TEXT, ITEM=5, SIZE=9, COLSPAN=1, JUSTIFY=CENTER, $
TYPE=TABHEADING, LINE=7, OBJECT=TEXT, ITEM=6, SIZE=9, COLSPAN=1, JUSTIFY=CENTER, $
TYPE=TABHEADING, LINE=7, OBJECT=TEXT, ITEM=7, SIZE=9, COLSPAN=1, JUSTIFY=CENTER, $
TYPE=TABHEADING, LINE=7, OBJECT=TEXT, ITEM=8, SIZE=9, COLSPAN=1, JUSTIFY=CENTER, $

TYPE=TABHEADING, LINE=8, COLSPAN=8, JUSTIFY=LEFT,$

TYPE=SUBHEAD, BY=CHILD_PRD_N, LINE=2, COLSPAN=8, JUSTIFY=LEFT,$

TYPE=SUBHEAD, BY=CHILD_PRD_N, LINE=3, OBJECT=FIELD, ITEM=1, SIZE=9, COLSPAN=1, JUSTIFY=LEFT, $
TYPE=SUBHEAD, BY=CHILD_PRD_N, LINE=3, OBJECT=FIELD, ITEM=2, SIZE=9, COLSPAN=1, JUSTIFY=LEFT, $
TYPE=SUBHEAD, BY=CHILD_PRD_N, LINE=3, OBJECT=FIELD, ITEM=3, SIZE=9, COLSPAN=1, JUSTIFY=LEFT, $
TYPE=SUBHEAD, BY=CHILD_PRD_N, LINE=3, OBJECT=FIELD, ITEM=4, SIZE=9, COLSPAN=1, JUSTIFY=LEFT, $

TYPE=SUBFOOT, LINE=1, COLSPAN=8, JUSTIFY=LEFT,$
TYPE=SUBFOOT, LINE=2, COLSPAN=8, JUSTIFY=LEFT,$

END
-EXIT  


Thanks,
prodrigu

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


Prod: WebFOCUS 7.7.03: Win 2008 & AIX hub/Servlet Mode; sub: AS/400 JDE; mostly Self Serve; DBs: Oracle, JDE, SQLServer; various output formats
September 13, 2012, 10:53 AM
Francis Mariani
There's no way to get Subheading above the Across titles. The only way to do this is to put the SUBHEAD lines in the HEADING, which shouldn't be a problem in your code because the example you provided has a page break on the SUBHEAD column.


Francis


Give me code, or give me retirement. In FOCUS since 1991

Production: WF 7.7.05M, Dev Studio, BID, MRE, WebSphere, DB2 / Test: WF 8.1.05M, App Studio, BI Portal, Report Caster, jQuery, HighCharts, Apache Tomcat, MS SQL Server
September 13, 2012, 10:56 AM
prodrigu
Below is an example of what i would like the report to look like.




Prod: WebFOCUS 7.7.03: Win 2008 & AIX hub/Servlet Mode; sub: AS/400 JDE; mostly Self Serve; DBs: Oracle, JDE, SQLServer; various output formats
September 13, 2012, 10:59 AM
prodrigu
Francis,

How would I go about adding the SUBHEAD in the HEADING? I only want to show the heading on the top of 1st page and the SUBHEAD needs to change on COUNTRY.

Can you please show me an example? Or point me to a forum that shows what you are talking about.

Thanks,
prodrigu


Prod: WebFOCUS 7.7.03: Win 2008 & AIX hub/Servlet Mode; sub: AS/400 JDE; mostly Self Serve; DBs: Oracle, JDE, SQLServer; various output formats
September 13, 2012, 06:13 PM
prodrigu
Can someone please help me or point me to a forum that will show what Francis is talking about putting the SUBHEAD lines in the HEADING?

Thanks,
prodrigu


Prod: WebFOCUS 7.7.03: Win 2008 & AIX hub/Servlet Mode; sub: AS/400 JDE; mostly Self Serve; DBs: Oracle, JDE, SQLServer; various output formats
September 14, 2012, 03:51 AM
GamP
I think this is what Francis meant:
-DEFAULT &OUTPUT = 'HTML'
-SET &HEADLINE = IF &OUTPUT EQ 'EXL2K' THEN 'PAGE: <TABPAGENO' ELSE ' ';

SET HIDENULLACRS=ON

TABLE FILE CAR
SUM
DEALER_COST AS ''

BY COUNTRY  AS ''
BY CAR      AS ''
BY MODEL    AS ''
ACROSS BODYTYPE AS ''

ON COUNTRY PAGE-BREAK 
ON TABLE SUBHEAD
"&HEADLINE"
"car_report.fex"
" "
"CAR REPORT"
"Data as of: &MDYY"
" "
"COUNTRY<+0>CAR<+0>MODEL"
" "
HEADING
"<LENGTH <+0> <WIDTH <+0> <HEIGHT <+0> <WEIGHT "
"Parent Product Lot: "
" "
ON COUNTRY SUBFOOT
" "
" "
ON TABLE PCHOLD FORMAT &OUTPUT
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
     UNITS=IN,
     PAGESIZE='LETTER',
     LEFTMARGIN=0.1500000,
     RIGHTMARGIN=0.15000000,
     TOPMARGIN=0.000000,
     BOTTOMMARGIN=0.000000,
     SQUEEZE=ON,
     ORIENTATION=LANDSCAPE,
$
TYPE=REPORT,
     GRID=OFF,
     HEADPANEL=OFF,
     FONT='TIMES NEW ROMAN',
     SIZE=9,
     COLOR=BLACK,
     BACKCOLOR=NONE,
     STYLE=NORMAL,
$

TYPE=TABHEADING, HEADALIGN=BODY,$
TYPE=TABHEADING, LINE=1, ITEM=1, OBJECT=TEXT,  COLSPAN=1, JUSTIFY=LEFT,$
TYPE=TABHEADING, LINE=1, ITEM=1, OBJECT=FIELD, COLSPAN=1, JUSTIFY=LEFT,$
TYPE=TABHEADING, LINE=2, ITEM=1, OBJECT=TEXT, COLSPAN=8,  JUSTIFY=RIGHT,$
TYPE=TABHEADING, LINE=3, COLSPAN=8, JUSTIFY=RIGHT,$
TYPE=TABHEADING, LINE=4, COLSPAN=8, JUSTIFY=CENTER,$
TYPE=TABHEADING, LINE=5, COLSPAN=8, JUSTIFY=CENTER,$
TYPE=TABHEADING, LINE=6, COLSPAN=8, JUSTIFY=LEFT,$

TYPE=TABHEADING, LINE=7, OBJECT=TEXT, ITEM=1, SIZE=9, COLSPAN=1, JUSTIFY=LEFT, $
TYPE=TABHEADING, LINE=7, OBJECT=TEXT, ITEM=2, SIZE=9, COLSPAN=1, JUSTIFY=LEFT, $
TYPE=TABHEADING, LINE=7, OBJECT=TEXT, ITEM=3, SIZE=9, COLSPAN=1, JUSTIFY=LEFT, $
TYPE=TABHEADING, LINE=7, OBJECT=TEXT, ITEM=4, SIZE=9, COLSPAN=4, JUSTIFY=CENTER, $
TYPE=TABHEADING, LINE=7, OBJECT=TEXT, ITEM=5, SIZE=9, COLSPAN=1, JUSTIFY=CENTER, $
TYPE=TABHEADING, LINE=7, OBJECT=TEXT, ITEM=6, SIZE=9, COLSPAN=1, JUSTIFY=CENTER, $
TYPE=TABHEADING, LINE=7, OBJECT=TEXT, ITEM=7, SIZE=9, COLSPAN=1, JUSTIFY=CENTER, $
TYPE=TABHEADING, LINE=7, OBJECT=TEXT, ITEM=8, SIZE=9, COLSPAN=1, JUSTIFY=CENTER, $

TYPE=TABHEADING, LINE=8, COLSPAN=8, JUSTIFY=LEFT,$

TYPE=SUBHEAD, BY=CHILD_PRD_N, LINE=2, COLSPAN=8, JUSTIFY=LEFT,$

TYPE=SUBHEAD, BY=CHILD_PRD_N, LINE=3, OBJECT=FIELD, ITEM=1, SIZE=9, COLSPAN=1, JUSTIFY=LEFT, $
TYPE=SUBHEAD, BY=CHILD_PRD_N, LINE=3, OBJECT=FIELD, ITEM=2, SIZE=9, COLSPAN=1, JUSTIFY=LEFT, $
TYPE=SUBHEAD, BY=CHILD_PRD_N, LINE=3, OBJECT=FIELD, ITEM=3, SIZE=9, COLSPAN=1, JUSTIFY=LEFT, $
TYPE=SUBHEAD, BY=CHILD_PRD_N, LINE=3, OBJECT=FIELD, ITEM=4, SIZE=9, COLSPAN=1, JUSTIFY=LEFT, $

TYPE=SUBFOOT, LINE=1, COLSPAN=8, JUSTIFY=LEFT,$
TYPE=SUBFOOT, LINE=2, COLSPAN=8, JUSTIFY=LEFT,$

END



GamP

- Using AS 8.2.01 on Windows 10 - IE11.
in Focus since 1988
September 14, 2012, 12:01 PM
prodrigu
Gamp,

Thank you so much!!!! This is what I was looking for. Thank you too Francis Mariani...

Thanks,
prodrigu


Prod: WebFOCUS 7.7.03: Win 2008 & AIX hub/Servlet Mode; sub: AS/400 JDE; mostly Self Serve; DBs: Oracle, JDE, SQLServer; various output formats