I have a report that I have put a banner in the first heading row. The problem is that it is stretching out the rest of the report across the complete width of the banner.
I am embedding css into my focus code to format most of the report. Is there a way to have this banner generate as a separate html table so that it won't stretch the report, or perhaps some other way (with focus code) that I am unaware of. Here is my code...
-IF '&OUTPUT.EVAL' EQ 'PDF' OR 'EXL2K' THEN GOTO HOORAYBEER
-HTMLFORM BEGIN
<style>
.Indent {
padding-left: 10px;
font-size: 8pt;
font-family: Arial;
font-style: italic;
color: 5F6062;
}
.NoIndent {
font-size: 8pt;
font-family: Arial;
color: 5F6062;
}
.AlternateColorIndent {
padding-left: 10px;
font-size: 8pt;
font-family: Arial;
font-style: italic;
background-color: #f1f2f2;
color: 5F6062;
}
.AlternateColorNoIndent {
font-size: 8pt;
font-family: Arial;
background-color: #f1f2f2;
color: 5F6062;
}
</style>
-HTMLFORM END
-HOORAYBEER
DEFINE FILE H_FINAL
PDF/A60= '<IMG SRC="/approot/era/pdf_logo.gif" border=0>';
EXCEL/A60='<IMG SRC="/approot/era/excel_logo.gif" border=0>';
BANNER/A60='<IMG SRC="/approot/era/bannertek-thin.jpg" border=0>';
END
TABLE FILE H_FINAL
PRINT
COMPUTE OPEN/I6C=OPEN_COUNT; AS 'Total,Open,Positions'
COMPUTE GT/I6C=OPEN_GT; AS 'Total,Open,Positions, >= >VALUE days'
OPEN_NEW_AVG AS 'New Siebel,Positions/,Account Mgr.,for &AVGWEEKS weeks'
COMPUTE SP/D6.2C=SUB_PER_REC; AS 'Regular,Submittals/,Recruiter,for &AVGWEEKS weeks'
COMPUTE RANK/I2=RANK+1; NOPRINT
COMPUTE CLASSFLAG/A1 = IF CLASSFLAG EQ '' THEN '2' ELSE ''; NOPRINT
COMPUTE FLAG/A1=IF CHILD EQ 'Y' AND CLASSFLAG EQ '2' THEN '1' ELSE
IF CHILD EQ 'N' AND CLASSFLAG EQ '2' THEN '2' ELSE
IF CHILD EQ 'Y' AND CLASSFLAG NE '2' THEN '3' ELSE
IF CHILD EQ 'N' AND CLASSFLAG NE '2' THEN '4' ELSE '0'; NOPRINT
-* COMPUTE SAT_FLAG/A1 = IF (PARENTOFFICENAME EQ LAST PARENTOFFICENAME) AND (DUMMY EQ '1') THEN 'Y' ELSE 'N'; NOPRINT
CHILD NOPRINT
BY DUMMY NOPRINT
BY PARENTOFFICENAME NOPRINT
BY CHILD NOPRINT
BY SAT_OFFNAME AS 'Office'
BY OFFICE_NO NOPRINT
HEADING
"<BANNER"
"&HDR1 Open Positions Report"
"Region/Office: ®ION"
"Data as of: <HEADINGDATE"
"<PDF<EXCEL"
FOOTING
" "
"Run Date: &DATEMDYY &TOD <+0>Confidential <+0> &PAGENO"
ON TABLE SET PAGE-NUM &SETPAGE
ON TABLE SET HTMLCSS ON
ON TABLE SET CSSURL mycss.css
ON TABLE PCHOLD FORMAT &OUTPUT
ON TABLE SET STYLE *
UNITS=IN,
-* PAGESIZE='Letter',
LEFTMARGIN=0.3,
RIGHTMARGIN=0.3,
TOPMARGIN=0.0,
BOTTOMMARGIN=0.3,
SQUEEZE=ON,
ORIENTATION=LANDSCAPE,
$
TYPE=REPORT,GRID=OFF,FONT='ARIAL',SIZE=8,$
TYPE=HEADING, SIZE=10,COLOR=RGB(95 95 98),$
TYPE=HEADING,LINE=&HDSTY1,SIZE=12, STYLE=BOLD,COLOR=RGB(19 50 86),$
TYPE=HEADING,LINE=&HDSTY2,STYLE=BOLD+ITALIC,$
TYPE=HEADING,LINE=&HDSTY4,JUSTIFY=RIGHT, TARGET='report',$
TYPE=HEADING, LINE=&HDSTY4, ITEM=1,TARGET='report',
FOCEXEC=open_positions_drill1(OUTPUT='PDF' \
GTVALUE='>VALUE.EVAL' \
FLAG='&FLAG.EVAL' \
AVGWEEKS='&AVGWEEKS.EVAL' \
REGION='®ION.EVAL' \
RUN_FLAG='Y'),$
TYPE=HEADING, LINE=&HDSTY4, ITEM=2, TARGET='report',
FOCEXEC=open_positions_drill1(OUTPUT='EXL2K' \
GTVALUE='>VALUE.EVAL' \
FLAG='&FLAG.EVAL' \
AVGWEEKS='&AVGWEEKS.EVAL' \
REGION='®ION.EVAL' \
RUN_FLAG='Y'),$
TYPE=TITLE,JUSTIFY=CENTER,STYLE=-UNDERLINE+BOLD,SIZE=9,BACKCOLOR=(RGB(19 50 86)),COLOR=WHITE,$
TYPE=TITLE,COLUMN=SAT_OFFNAME,JUSTIFY=LEFT,$
TYPE=DATA,BACKCOLOR=(WHITE RGB(241 242 242)),COLOR=RGB(95 95 98),WHEN=DUMMY EQ '1',$
TYPE=DATA,STYLE=BOLD,COLOR=RGB(19 50 86),BORDER-COLOR=RGB(95 95 98),BACKCOLOR=RGB(219 224 230),WHEN=DUMMY EQ '2',$
TYPE=DATA,STYLE=BOLD,COLOR=RGB(19 50 86),BORDER-COLOR=RGB(95 95 98),BACKCOLOR=RGB(219 224 230),WHEN=DUMMY EQ '3',$
TYPE=DATA,BACKCOLOR=(WHITE RGB(241 242 242)),COLOR=RGB(95 95 98),$
TYPE=DATA,COLUMN=SAT_OFFNAME,WHEN=FLAG EQ '4',CLASS=AlternateColorNoIndent,TARGET='report',
FOCEXEC=open_positions_drill2( \
REGION=®ION.QUOTEDSTRING \
GTVALUE=>VALUE.QUOTEDSTRING \
AVGWEEKS=&AVGWEEKS.QUOTEDSTRING \
OUTPUT='&OUTPUT.EVAL' \
OFFICE=OFFICE_NO ),$
TYPE=DATA,COLUMN=SAT_OFFNAME,WHEN=FLAG EQ '3',CLASS=AlternateColorIndent,TARGET='report',FOCEXEC=open_positions_drill2( \
REGION=®ION.QUOTEDSTRING \
GTVALUE=>VALUE.QUOTEDSTRING \
AVGWEEKS=&AVGWEEKS.QUOTEDSTRING \
OUTPUT='&OUTPUT.EVAL' \
OFFICE=OFFICE_NO ),$
TYPE=DATA,COLUMN=SAT_OFFNAME,WHEN=FLAG EQ '2',CLASS=NoIndent,TARGET='report',
FOCEXEC=open_positions_drill2( \
REGION=®ION.QUOTEDSTRING \
GTVALUE=>VALUE.QUOTEDSTRING \
AVGWEEKS=&AVGWEEKS.QUOTEDSTRING \
OUTPUT='&OUTPUT.EVAL' \
OFFICE=OFFICE_NO ),$
TYPE=DATA,COLUMN=SAT_OFFNAME,WHEN=FLAG EQ '1',CLASS=Indent,TARGET='report',
FOCEXEC=open_positions_drill2( \
REGION=®ION.QUOTEDSTRING \
GTVALUE=>VALUE.QUOTEDSTRING \
AVGWEEKS=&AVGWEEKS.QUOTEDSTRING \
OUTPUT='&OUTPUT.EVAL' \
OFFICE=OFFICE_NO ),$
TYPE=DATA,COLUMN=SAT_OFFNAME,WHEN=DUMMY EQ '2',STYLE=BOLD,COLOR=RGB(19 50 86),BACKCOLOR=RGB(219 224 230),TARGET='report',
FOCEXEC=open_positions_drill2( \
REGION=®ION.QUOTEDSTRING \
GTVALUE=>VALUE.QUOTEDSTRING \
AVGWEEKS=&AVGWEEKS.QUOTEDSTRING \
OUTPUT='&OUTPUT.EVAL' \
OFFICE='' ),$
TYPE=FOOTING,LINE=2,OBJECT=TEXT,ITEM=1,STYLE=NORMAL,WIDTH=3,COLOR=RGB(95 95 98),$
TYPE=FOOTING,LINE=2,OBJECT=TEXT,ITEM=2,STYLE=NORMAL,COLOR=RGB(95 95 98),&FTR.EVAL $
TYPE=FOOTING,LINE=2,OBJECT=TEXT,ITEM=3,STYLE=NORMAL,WIDTH=0.500,COLOR=RGB(95 95 98),$
ENDSTYLE
END
This message has been edited. Last edited by: Kerry,
WebFOCUS 7.7 Windows All Output (Excel, HTML, PDF)