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.
I have a composer report that inlcudes 3 dynamic length reports. They could be 5 rows or 100 rows. How do I prevent the first called report from walking over the next report called? Ive tried setting the OVERFLOW option.
The results look great if there are only a few records, but if there is lots of data it walks on the next report and looks crummy.
-* File board_report_pdf
-* Default Mode: ResourceLayout
SET HTMLARCHIVE=ON
COMPOUND LAYOUT PCHOLD FORMAT PDF
UNITS=IN, $
SECTION=section1, LAYOUT=ON, METADATA='0.5^0.5^0.5^0.5^1', MERGE=OFF, ORIENTATION=PORTRAIT, PAGESIZE=Letter, $
PAGELAYOUT=1, NAME='Page layout 1', text='Page layout 1', TOC-LEVEL=1, BOTTOMMARGIN=0.5, TOPMARGIN=0.5, METADATA='BOTTOMMARGIN=0.5,TOPMARGIN=0.5,LEFTMARGIN=0,RIGHTMARGIN=0,', $
COMPONENT='report1', TEXT='report1', TOC-LEVEL=2, POSITION=(0.516 1.144), DIMENSION=(* *), METADATA='Z-INDEX: 100; POSITION: absolute; WIDTH: 7.479in; HEIGHT: 2.705in; OVERFLOW: auto; TOP: 1.144in; LEFT: 0.516in', $
COMPONENT='report2', TEXT='report2', TOC-LEVEL=2, POSITION=(0.500 3.849), DIMENSION=(* *), METADATA='Z-INDEX: 100; POSITION: absolute; WIDTH: 7.5in; HEIGHT: 3.024in; OVERFLOW: auto; TOP: 3.849in; LEFT: 0.5in', $
COMPONENT='report3', TEXT='report3', TOC-LEVEL=2, POSITION=(0.521 6.874), DIMENSION=(7.483 3.537), METADATA='Z-INDEX: 100; POSITION: absolute; WIDTH: 7.483in; HEIGHT: 3.537in; OVERFLOW: auto; TOP: 6.874in; LEFT: 0.521in', $
OBJECT=STRING, NAME='text1', TEXT='<font face="ARIAL" size=10><center>[b]RECOMMENDED PERSONNEL ACTIONS<BR>Board of Trustees Meeting<BR>May 7, 2012[/b]</center></font>', POSITION=(0.500 0.500), MARKUP=ON, WRAP=ON, DIMENSION=(7.438 0.625), METADATA='', $
OBJECT=STRING, NAME='text2', TEXT='<font face="ARIAL" size=10>[b]DISTRICT[/b]</font>', POSITION=(0.500 1.144), MARKUP=ON, WRAP=ON, DIMENSION=(0.792 0.418), METADATA='', $
OBJECT=STRING, NAME='text3', TEXT='<font face="ARIAL" size=10>[b]New Employees[/b]</font>', POSITION=(0.500 1.542), MARKUP=ON, WRAP=ON, DIMENSION=(1.313 0.292), METADATA='', $
OBJECT=STRING, NAME='text4', TEXT='<font face="ARIAL" size=10>[b]Employee Changes[/b]</font>', POSITION=(0.500 4.167), MARKUP=ON, WRAP=ON, DIMENSION=(1.542 0.292), METADATA='', $
OBJECT=STRING, NAME='text5', TEXT='<font face="ARIAL" size=10>[b]Terminations (Includes terminations, resignations, and retirements)[/b]</font>', POSITION=(0.510 6.977), MARKUP=ON, WRAP=ON, DIMENSION=(4.468 0.207), METADATA='', $
PAGELAYOUT=2, NAME='Page layout 2', text='Page layout 2', TOC-LEVEL=1, BOTTOMMARGIN=0.5, TOPMARGIN=0.5, METADATA='BOTTOMMARGIN=0.5,TOPMARGIN=0.5,LEFTMARGIN=0,RIGHTMARGIN=0,', $
OBJECT=STRING, NAME='text6', TEXT='<font face="ARIAL" size=10>[b]CENTRAL [/b]</font>', POSITION=(0.510 0.552), MARKUP=ON, WRAP=ON, DIMENSION=(0.813 0.417), METADATA='', $
OBJECT=STRING, NAME='text7', TEXT='<font face="ARIAL" size=10>[b]New Employees[/b]</font>', POSITION=(0.510 0.977), MARKUP=ON, WRAP=ON, DIMENSION=(1.760 0.311), METADATA='', $
COMPONENT='report4', TEXT='report4', TOC-LEVEL=2, POSITION=(0.500 0.879), DIMENSION=(* *), METADATA='Z-INDEX: 100; POSITION: absolute; WIDTH: 7.5in; HEIGHT: 2.188in; OVERFLOW: auto; TOP: 0.879in; LEFT: 0.5in', $
OBJECT=STRING, NAME='text8', TEXT='<font face="ARIAL" size=10>[b]Employee Changes[/b]</font>', POSITION=(0.520 3.271), MARKUP=ON, WRAP=ON, DIMENSION=(1.352 0.312), METADATA='', $
COMPONENT='report5', TEXT='report5', TOC-LEVEL=2, POSITION=(0.521 3.390), DIMENSION=(* *), METADATA='Z-INDEX: 100; POSITION: absolute; WIDTH: 7.291in; HEIGHT: 4.569in; OVERFLOW: auto; TOP: 3.39in; LEFT: 0.521in', $
END
SET COMPONENT='report1'
-*component_type report
-DEFAULT &beg_date = '01-FEB-2012'
-DEFAULT &end_date = '31-MAR-2012'
ENGINE SQLORA SET DEFAULT_CONNECTION PROD
SQL SQLORA PREPARE SQLOUT FOR
select spriden_pidm as PIDM,nbrjobs_status AS STAT,
CASE
WHEN PEBEMPL_FIRST_HIRE_DATE between '&beg_date' and '&end_date' THEN 'NEWHIRE'
ELSE 'CHANGE'
END STATUS,
spriden_last_name || ' '|| spriden_first_name || ', '|| nbrjobs_desc || '/'|| ftvorgn_title AS JB,' ,at an hourly rate of $'|| trunc(nbrjobs_reg_rate,2) AS PT,
', at a rate of $'|| nbrjobs_assgn_salary||' per month ' AS FT, ', effective as of ' || (TRUNC(nbrjobs_effective_date)) AS LINE,pebempl_internal_ft_pt_ind,pebempl_camp_code AS CMPCD
from nbrjobs o,spriden,nbrbjob,ftvorgn,pebempl
where nbrjobs_effective_date = (select max(nbrjobs_effective_date)
from nbrjobs i
where i.nbrjobs_pidm = o.nbrjobs_pidm
and i.nbrjobs_posn = o.nbrjobs_posn
and i.nbrjobs_suff = o.nbrjobs_suff
and i.nbrjobs_effective_date between '&beg_date' and '&end_date'
and trunc(i.nbrjobs_effective_date) <> '01-APR-12')
and pebempl_pidm (+)= spriden_pidm
and pebempl_pidm = nbrjobs_pidm
and spriden_change_ind is null
and nbrbjob_pidm = nbrjobs_pidm
and nbrbjob_contract_type = 'P'
and pebempl_camp_code = 'D'
and nbrbjob_posn = nbrjobs_posn
and nbrbjob_suff = nbrjobs_suff
and nbrjobs_orgn_code_ts = ftvorgn_orgn_code
and (ftvorgn_eff_date < '&end_date' and ftvorgn_nchg_date > '&end_date')
order by spriden_last_name,STATUS ;
END
DEFINE FILE SQLOUT
Part_time/A200=IF PEBEMPL_INTERNAL_FT_PT_IND = 'F' THEN JB || FT || LINE ELSE JB || PT || LINE;
END
TABLE FILE SQLOUT
PRINT
Part_time AS ''
BY STATUS NOPRINT
WHERE STATUS EQ 'NEWHIRE'
ON STATUS SUBHEAD
" "
ON STATUS PAGE-BREAK
ON TABLE SUBHEAD
""
HEADING
""
ON TABLE SET LINES 999999
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT HTML
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
UNITS=IN,
SQUEEZE=ON,
ORIENTATION=PORTRAIT,
$
TYPE=REPORT,
GRID=OFF,
FONT='ARIAL',
SIZE=9,
$
TYPE=TITLE,
STYLE=BOLD,
$
TYPE=TABHEADING,
LINE=1,
OBJECT=TEXT,
ITEM=1,
SIZE=16,
STYLE=BOLD,
$
TYPE=TABFOOTING,
SIZE=12,
STYLE=BOLD,
$
TYPE=FOOTING,
SIZE=12,
STYLE=BOLD,
$
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,
$
TYPE=GRANDTOTAL,
BACKCOLOR=RGB(210 210 210),
STYLE=BOLD,
$
TYPE=REPORT,
COLUMN=N1,
WRAP=0.680556,
$
ENDSTYLE
END
SET COMPONENT='report2'
-*component_type report
-DEFAULT &beg_date = '01-FEB-2012'
-DEFAULT &end_date = '31-MAR-2012'
ENGINE SQLORA SET DEFAULT_CONNECTION PROD
SQL SQLORA PREPARE SQLOUT FOR
select spriden_pidm as PIDM,nbrjobs_status AS STAT,
CASE
WHEN PEBEMPL_FIRST_HIRE_DATE between '&beg_date' and '&end_date' THEN 'NEWHIRE'
ELSE 'CHANGE'
END STATUS,
spriden_last_name || ' '|| spriden_first_name || ', '|| nbrjobs_desc || '/'|| ftvorgn_title AS JB,' ,at an hourly rate of $'|| trunc(nbrjobs_reg_rate,2) AS PT,
', at a rate of $'|| nbrjobs_assgn_salary||' per month ' AS FT, ', effective as of ' || (TRUNC(nbrjobs_effective_date)) AS LINE,pebempl_internal_ft_pt_ind,pebempl_camp_code AS CMPCD
from nbrjobs o,spriden,nbrbjob,ftvorgn,pebempl
where nbrjobs_effective_date = (select max(nbrjobs_effective_date)
from nbrjobs i
where i.nbrjobs_pidm = o.nbrjobs_pidm
and i.nbrjobs_posn = o.nbrjobs_posn
and i.nbrjobs_suff = o.nbrjobs_suff
and i.nbrjobs_effective_date between '&beg_date' and '&end_date'
and trunc(i.nbrjobs_effective_date) <> '01-APR-12')
and pebempl_pidm (+)= spriden_pidm
and pebempl_pidm = nbrjobs_pidm
and spriden_change_ind is null
and nbrbjob_pidm = nbrjobs_pidm
and nbrbjob_contract_type = 'P'
and pebempl_camp_code = 'D'
and nbrbjob_posn = nbrjobs_posn
and nbrbjob_suff = nbrjobs_suff
and nbrjobs_orgn_code_ts = ftvorgn_orgn_code
and (ftvorgn_eff_date < '&end_date' and ftvorgn_nchg_date > '&end_date')
order by spriden_last_name,STATUS ;
END
DEFINE FILE SQLOUT
Part_time/A200=IF PEBEMPL_INTERNAL_FT_PT_IND = 'F' THEN JB || FT || LINE ELSE JB || PT || LINE;
END
TABLE FILE SQLOUT
PRINT
Part_time AS ''
BY STATUS NOPRINT
WHERE STATUS EQ 'CHANGE'
ON STATUS SUBHEAD
" "
ON STATUS PAGE-BREAK
ON TABLE SUBHEAD
""
HEADING
""
ON TABLE SET LINES 999999
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT HTML
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
UNITS=IN,
SQUEEZE=ON,
ORIENTATION=PORTRAIT,
$
TYPE=REPORT,
GRID=OFF,
FONT='ARIAL',
SIZE=9,
$
TYPE=TITLE,
STYLE=BOLD,
$
TYPE=TABHEADING,
LINE=1,
OBJECT=TEXT,
ITEM=1,
SIZE=16,
STYLE=BOLD,
$
TYPE=TABFOOTING,
SIZE=12,
STYLE=BOLD,
$
TYPE=FOOTING,
SIZE=12,
STYLE=BOLD,
$
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,
$
TYPE=GRANDTOTAL,
BACKCOLOR=RGB(210 210 210),
STYLE=BOLD,
$
TYPE=REPORT,
COLUMN=N1,
WRAP=0.680556,
$
ENDSTYLE
END
SET COMPONENT='report3'
-*component_type report
-DEFAULT &beg_date = '01-FEB-2012'
-DEFAULT &end_date = '31-MAR-2012'
ENGINE SQLORA SET DEFAULT_CONNECTION PROD
SQL SQLORA PREPARE SQLOUT FOR
select spriden_pidm as PIDM,nbrjobs_status AS STAT,
CASE
WHEN PEBEMPL_FIRST_HIRE_DATE between '&beg_date' and '&end_date' THEN 'NEWHIRE'
ELSE 'CHANGE'
END STATUS,
spriden_last_name || ' '|| spriden_first_name || ', '|| nbrjobs_desc || '/'|| ftvorgn_title AS JB,' ,at an hourly rate of $'|| trunc(nbrjobs_reg_rate,2) AS PT,
', at a rate of $'|| nbrjobs_assgn_salary||' per month ' AS FT, ', effective as of ' || (TRUNC(nbrjobs_effective_date)) AS LINE,pebempl_internal_ft_pt_ind,pebempl_camp_code AS CMPCD
from nbrjobs o,spriden,nbrbjob,ftvorgn,pebempl
where nbrjobs_effective_date = (select max(nbrjobs_effective_date)
from nbrjobs i
where i.nbrjobs_pidm = o.nbrjobs_pidm
and i.nbrjobs_posn = o.nbrjobs_posn
and i.nbrjobs_suff = o.nbrjobs_suff
and i.nbrjobs_effective_date between '&beg_date' and '&end_date'
and trunc(i.nbrjobs_effective_date) <> '01-APR-12')
and pebempl_pidm (+)= spriden_pidm
and pebempl_pidm = nbrjobs_pidm
and spriden_change_ind is null
and nbrbjob_pidm = nbrjobs_pidm
and nbrbjob_contract_type = 'P'
and pebempl_camp_code = 'D'
and nbrbjob_posn = nbrjobs_posn
and nbrbjob_suff = nbrjobs_suff
and nbrjobs_orgn_code_ts = ftvorgn_orgn_code
and (ftvorgn_eff_date < '&end_date' and ftvorgn_nchg_date > '&end_date')
order by spriden_last_name,STATUS ;
END
DEFINE FILE SQLOUT
Part_time/A200=IF PEBEMPL_INTERNAL_FT_PT_IND = 'F' THEN JB || FT || LINE ELSE JB || PT || LINE;
Term/A200=IF STAT = 'T' THEN JB || ' termination ' || LINE ELSE JB || ' termination ' || LINE;
END
TABLE FILE SQLOUT
PRINT
Term AS ''
BY STATUS NOPRINT
WHERE STAT EQ 'T';
ON STATUS SUBHEAD
" "
ON STATUS PAGE-BREAK
ON TABLE SUBHEAD
""
HEADING
""
ON TABLE SET LINES 999999
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT HTML
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
UNITS=IN,
SQUEEZE=ON,
ORIENTATION=PORTRAIT,
$
TYPE=REPORT,
GRID=OFF,
FONT='ARIAL',
SIZE=9,
$
TYPE=TITLE,
STYLE=BOLD,
$
TYPE=TABHEADING,
LINE=1,
OBJECT=TEXT,
ITEM=1,
SIZE=16,
STYLE=BOLD,
$
TYPE=TABFOOTING,
SIZE=12,
STYLE=BOLD,
$
TYPE=FOOTING,
SIZE=12,
STYLE=BOLD,
$
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,
$
TYPE=GRANDTOTAL,
BACKCOLOR=RGB(210 210 210),
STYLE=BOLD,
$
TYPE=REPORT,
COLUMN=N1,
WRAP=0.680556,
$
ENDSTYLE
END
SET COMPONENT='report4'
-*component_type report
-DEFAULT &beg_date = '01-FEB-2012'
-DEFAULT &end_date = '31-MAR-2012'
ENGINE SQLORA SET DEFAULT_CONNECTION PROD
SQL SQLORA PREPARE SQLOUT FOR
select spriden_pidm as PIDM,nbrjobs_status AS STAT,
CASE
WHEN PEBEMPL_FIRST_HIRE_DATE between '&beg_date' and '&end_date' THEN 'NEWHIRE'
ELSE 'CHANGE'
END STATUS,
spriden_last_name || ' '|| spriden_first_name || ', '|| nbrjobs_desc || '/'|| ftvorgn_title AS JB,' ,at an hourly rate of $'|| trunc(nbrjobs_reg_rate,2) AS PT,
', at a rate of $'|| nbrjobs_assgn_salary||' per month ' AS FT, ', effective as of ' || (TRUNC(nbrjobs_effective_date)) AS LINE,pebempl_internal_ft_pt_ind,pebempl_camp_code AS CMPCD
from nbrjobs o,spriden,nbrbjob,ftvorgn,pebempl
where nbrjobs_effective_date = (select max(nbrjobs_effective_date)
from nbrjobs i
where i.nbrjobs_pidm = o.nbrjobs_pidm
and i.nbrjobs_posn = o.nbrjobs_posn
and i.nbrjobs_suff = o.nbrjobs_suff
and i.nbrjobs_effective_date between '&beg_date' and '&end_date'
and trunc(i.nbrjobs_effective_date) <> '01-APR-12')
and pebempl_pidm (+)= spriden_pidm
and pebempl_pidm = nbrjobs_pidm
and spriden_change_ind is null
and nbrbjob_pidm = nbrjobs_pidm
and nbrbjob_contract_type = 'P'
and pebempl_camp_code = 'C'
and nbrbjob_posn = nbrjobs_posn
and nbrbjob_suff = nbrjobs_suff
and nbrjobs_orgn_code_ts = ftvorgn_orgn_code
and (ftvorgn_eff_date < '&end_date' and ftvorgn_nchg_date > '&end_date')
order by spriden_last_name,STATUS ;
END
DEFINE FILE SQLOUT
Part_time/A200=IF PEBEMPL_INTERNAL_FT_PT_IND = 'F' THEN JB || FT || LINE ELSE JB || PT || LINE;
END
TABLE FILE SQLOUT
PRINT
Part_time AS ''
BY STATUS NOPRINT
WHERE STATUS EQ 'NEWHIRE'
WHERE STAT EQ 'A';
ON STATUS SUBHEAD
" "
ON STATUS PAGE-BREAK
ON TABLE SUBHEAD
""
HEADING
""
ON TABLE SET LINES 999999
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT HTML
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
UNITS=IN,
SQUEEZE=ON,
ORIENTATION=PORTRAIT,
$
TYPE=REPORT,
GRID=OFF,
FONT='ARIAL',
SIZE=9,
$
TYPE=TITLE,
STYLE=BOLD,
$
TYPE=TABHEADING,
LINE=1,
OBJECT=TEXT,
ITEM=1,
SIZE=16,
STYLE=BOLD,
$
TYPE=TABFOOTING,
SIZE=12,
STYLE=BOLD,
$
TYPE=FOOTING,
SIZE=12,
STYLE=BOLD,
$
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,
$
TYPE=GRANDTOTAL,
BACKCOLOR=RGB(210 210 210),
STYLE=BOLD,
$
TYPE=REPORT,
COLUMN=N1,
WRAP=0.680556,
$
ENDSTYLE
END
SET COMPONENT='report5'
-*component_type report
-DEFAULT &beg_date = '01-FEB-2012'
-DEFAULT &end_date = '31-MAR-2012'
ENGINE SQLORA SET DEFAULT_CONNECTION PROD
SQL SQLORA PREPARE SQLOUT FOR
select spriden_pidm as PIDM,nbrjobs_status AS STAT,
CASE
WHEN PEBEMPL_FIRST_HIRE_DATE between '&beg_date' and '&end_date' THEN 'NEWHIRE'
ELSE 'CHANGE'
END STATUS,
spriden_last_name || ' '|| spriden_first_name || ', '|| nbrjobs_desc || '/'|| ftvorgn_title AS JB,' ,at an hourly rate of $'|| trunc(nbrjobs_reg_rate,2) AS PT,
', at a rate of $'|| nbrjobs_assgn_salary||' per month ' AS FT, ', effective as of ' || (TRUNC(nbrjobs_effective_date)) AS LINE,pebempl_internal_ft_pt_ind,pebempl_camp_code AS CMPCD
from nbrjobs o,spriden,nbrbjob,ftvorgn,pebempl
where nbrjobs_effective_date = (select max(nbrjobs_effective_date)
from nbrjobs i
where i.nbrjobs_pidm = o.nbrjobs_pidm
and i.nbrjobs_posn = o.nbrjobs_posn
and i.nbrjobs_suff = o.nbrjobs_suff
and i.nbrjobs_effective_date between '&beg_date' and '&end_date'
and trunc(i.nbrjobs_effective_date) <> '01-APR-12')
and pebempl_pidm (+)= spriden_pidm
and pebempl_pidm = nbrjobs_pidm
and spriden_change_ind is null
and nbrbjob_pidm = nbrjobs_pidm
and nbrbjob_contract_type = 'P'
and pebempl_camp_code = 'C'
and nbrbjob_posn = nbrjobs_posn
and nbrbjob_suff = nbrjobs_suff
and nbrjobs_orgn_code_ts = ftvorgn_orgn_code
and (ftvorgn_eff_date < '&end_date' and ftvorgn_nchg_date > '&end_date')
order by spriden_last_name,STATUS ;
END
DEFINE FILE SQLOUT
Part_time/A200=IF PEBEMPL_INTERNAL_FT_PT_IND = 'F' THEN JB || FT || LINE ELSE JB || PT || LINE;
END
TABLE FILE SQLOUT
PRINT
Part_time AS ''
BY STATUS NOPRINT
WHERE STATUS EQ 'CHANGE'
WHERE STAT EQ 'A';
ON STATUS SUBHEAD
" "
ON STATUS PAGE-BREAK
ON TABLE SUBHEAD
""
HEADING
""
ON TABLE SET LINES 999999
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT HTML
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
UNITS=IN,
SQUEEZE=ON,
ORIENTATION=PORTRAIT,
$
TYPE=REPORT,
GRID=OFF,
FONT='ARIAL',
SIZE=9,
$
TYPE=TITLE,
STYLE=BOLD,
$
TYPE=TABHEADING,
LINE=1,
OBJECT=TEXT,
ITEM=1,
SIZE=16,
STYLE=BOLD,
$
TYPE=TABFOOTING,
SIZE=12,
STYLE=BOLD,
$
TYPE=FOOTING,
SIZE=12,
STYLE=BOLD,
$
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,
$
TYPE=GRANDTOTAL,
BACKCOLOR=RGB(210 210 210),
STYLE=BOLD,
$
TYPE=REPORT,
COLUMN=N1,
WRAP=0.680556,
$
ENDSTYLE
END
COMPOUND END
This message has been edited. Last edited by: Kerry,
whoa Dan, way too much information ... what i gather is that your pdf compound bits are overlapping? Is that it? Up to you to create them as hold files first, meaure their size, (&LINES), and then decide on the parmaters within your PAGELAYOUT bits... when to go to the next page and when not to.
In Focus since 1979///7706m/5 ;wintel 2008/64;OAM security; Oracle db, ///MRE/BID
Posts: 3811 | Location: Manhattan | Registered: October 28, 2003
With PDF format, the only way to prevent data from the first window from running over the second window is to put each window in it's own PAGE LAYOUT. You could also use the old COMPOUND OPEN/CLOSE outside of Doc Composer to force each report to appear sequentially. Search the forum for plenty of help on 'COMPOUND'.
You didn't say you were working with other output formats, but you may have other options. We have one Doc composer created PRODUCTION report with 3 windows on the opening front page. Each report is an Active HTML format with a set number of rows per page. This way, the user stays on one physical HTML page, but can naviate multiple Active content pages in each of the 3 windows.This message has been edited. Last edited by: DavSmith,
In FOCUS since 1985 - WF 8.009/8.104 Win 8 Outputs: ALL of 'em! Adapters: Sql Server Teradata Oracle
you figure that out... if , say, you have a graf and a report on the first page, but the report is long and might go to the 2nd page, you measure the &LINES of the report extract, and , say, you determine that &LINES <=20 will work nicely on that first page, but if &LINES gt 20, you go to the next page and start at the TOP of the page, then you'll need to have a PAGELAYOUT=2 bit in your compound pdf code. ..IF your &LINES of your report is, say, 19, then you don't need page 2 and you can comment that bit out (dynamically) in your compound layout. ...by 'dynamically', i mean something like this: -SET &howmany = &LINES ; -SET &cmt_page2 = IF &howmany LE 20 THEN '-*' ELSE ''; ... &cmt_page2.EVAL PAGELAYOUT=2, etc &cmt_page2.EVAL OBJECT=...etc. ... nb. you can't use dialog manager GOTO's with a compound pdf setup. whisky tango foxtrot!
If your &LINES is >20, then you need to prepare 2 separate reports, one for the first 20 items and 1 for the rest (a zillion ways to handle that)... and then you have 2 OBJECTS, and one gets placed on the first page under the graf, and one gets placed on the second page at the top of the page, you control it all.
See the POSITION and DIMENSION statments in your pdf language? you can parm those numbers, and feed them whatever you want to, from your data extract, but do your extract bit first.
[you're using compound layout and not defaulting to that open close method...]This message has been edited. Last edited by: susannah,
In Focus since 1979///7706m/5 ;wintel 2008/64;OAM security; Oracle db, ///MRE/BID
Posts: 3811 | Location: Manhattan | Registered: October 28, 2003
@Dav, I acutally wanted to give the user the option of making a PDF or a DOC, and was told that it cannot be done using composer. I setup a report with multiple HTMTABLE HOLD files and then called them
Originally posted by susannah: nb. you can't use dialog manager GOTO's with a compound pdf setup. whisky tango foxtrot!
O! Susannah! -- Of course you can, in principle. Once it emerges from FOCSTACK for execution, the Focus Code Lord High Executioner doesn't know and doesn't care whether it was static code taken verbatim from a fex, or dynamically generated from a DM-laced fex. Not part of his job description.
But you have to ensure that all possible paths through your code lead to a valid compound request getting stuffed into FOCSTACK -- i.e., in the net result, COMPONENT names must be unique [tho' not necessarily sequentially named], and there must be a proper match between COMPONENTs declared upstairs and COMPONENTs invoked downstairs.
IOW, you just have to keep track of whisky tango focus you're doing!This message has been edited. Last edited by: j.gross,
Posts: 1925 | Location: NYC | In FOCUS since 1983 | Registered: January 11, 2005
You're going to the well too many times -- The SQL SELECTs in reports 1, 2, and 3 are identical. Ditto for 4 and 5.
As Susan suggested, you should extract the SQL output to HOLD file(s), outside the Compound report structure; and within the Compound structure TABLE or GRAPH against the Hold file(s).
Posts: 1925 | Location: NYC | In FOCUS since 1983 | Registered: January 11, 2005
Dan, Based on your "-HTMLFORM" example, it seems you want to append 8 separate reports into one long continuous report. If true, 2 options come to mind:
1) Doc Composer: Set up each report in their own Page Layout section. Output formats are EXL2K, HTML, PDF, Active PDF, Flex, Active HTML, Power Point. 2) Text Editor: Use the old school "ON TABLE PCHOLD FORMAT PDF COMPOUND OPEN/NOBREAK/CLOSE" to append the reports together. The old school method works for PDF, PS, HTML, EXL2K formats.
Example:
TABLE FILE CAR
LIST COUNTRY CAR MODEL
IF RECORDLIMIT EQ 11
ON TABLE PCHOLD FORMAT PDF OPEN NOBREAK
ON TABLE SET PAGE NOLEAD
ON TABLE SET STYLE *
COLOR=RED,$
ENDSTYLE
END
TABLE FILE BOTSCHED
LIST SCHEDULEID PACKETID
ON TABLE PCHOLD FORMAT PDF CLOSE
ON TABLE SET PAGE NOLEAD
ON TABLE SET STYLE *
COLOR=GREEN,$
ENDSTYLE
END
Note DOC format is not available for either method.
Hi Suzanna, using your scenario of a set graph in the first window and a report in the second with the number of rows greater than the height of the window, by setting OVERFLOW=FLOWING on the second window, it will automatically push the remaining rows that don't fit to the top of the next page. You won't need to pre-determine rows and set up a dynamic 2nd layout page.
Pop the following into a test fex and you'll see what I mean:
SET HTMLARCHIVE=ON
COMPOUND LAYOUT PCHOLD FORMAT PDF
UNITS=IN, $
SECTION=section1, LAYOUT=ON, METADATA='0.5^0.5^0.5^0.5^1', MERGE=OFF, ORIENTATION=PORTRAIT, PAGESIZE=Letter, $
PAGELAYOUT=1, NAME='Page layout 1', text='Page layout 1', TOC-LEVEL=1, BOTTOMMARGIN=0.5, TOPMARGIN=0.5, METADATA='BOTTOMMARGIN=0.5,TOPMARGIN=0.5,LEFTMARGIN=0,RIGHTMARGIN=0,', $
COMPONENT='report1', TEXT='report1', TOC-LEVEL=2, POSITION=(0.832 0.625), DIMENSION=(6.870 2.080), METADATA='Z-INDEX: 100; POSITION: absolute; WIDTH: 6.87in; HEIGHT: 2.08in; OVERFLOW: auto; TOP: 0.625in; LEFT: 0.832in', $
COMPONENT='report2', TEXT='report2', TOC-LEVEL=2, POSITION=(0.832 2.810), DIMENSION=(* *), METADATA='Z-INDEX: 103; POSITION: absolute; WIDTH: 6.876in; HEIGHT: 7.603in; OVERFLOW: auto; TOP: 2.81in; LEFT: 0.832in', $
END
SET COMPONENT='report1'
-*component_type report
TABLE FILE CAR
LIST COUNTRY CAR MODEL
IF RECORDLIMIT EQ 5
ON TABLE SET PAGE NOLEAD
ON TABLE SET STYLE *
COLOR=RED,$
ENDSTYLE
END
SET COMPONENT='report2'
-*component_type report
TABLE FILE BOTSCHED
LIST SCHEDULEID PACKETID
ON TABLE SET PAGE NOLEAD
ON TABLE SET STYLE *
COLOR=GREEN,$
ENDSTYLE
END
COMPOUND END
In FOCUS since 1985 - WF 8.009/8.104 Win 8 Outputs: ALL of 'em! Adapters: Sql Server Teradata Oracle
You're going to the well too many times -- The SQL SELECTs in reports 1, 2, and 3 are identical. Ditto for 4 and 5.
As Susan suggested, you should extract the SQL output to HOLD file(s), outside the Compound report structure; and within the Compound structure TABLE or GRAPH against the Hold file(s).
Yea, I figured someone was ganna call me out on that, I have a version of it with hold files, but not in composer, it was a quick example to show what I was looking to do, not for proper coding techniques....
Dav, Riddle me this, Ive been toiling with making the composer version varibale length, and I just cannot get that thing to work right, I would love to do like Suzannah mentioned and created a variable to store the LINES, but Im not successfully getting it to work.
so I went back to my one report with multiple holds, and did it the way you suggested with the old school....but alas its complaining
0 NUMBER OF RECORDS IN TABLE= 736 LINES= 736 0 NUMBER OF RECORDS IN TABLE= 6 LINES= 6 (FOC3218) NOTE: REPORT WILL BE PANELED; TOTAL WIDTH IS: 8.06 INCHES (FOC3269) PDF: CANNOT USE NOBREAK WITH PANELED REPORTS (FOC3298) ERROR FOUND IN A COMPOUND REPORT Compound Report is TERMINATING.....
So there is a formatting issue, Im in the process of searching the forums, but you may beat me to the punch and know what it is...
Thanks for all the help BTW!
here is an example....
TABLE FILE HOLD_MAIN
PRINT
'HOLD_MAIN.HOLD_MAI.Term' AS ''
BY 'HOLD_MAIN.HOLD_MAI.STAT' NOPRINT
ON TABLE SUBHEAD
"Terminations (Includes terminations, resignations, and retirements)"
HEADING
""
WHERE HOLD_MAIN.HOLD_MAI.CMPCD EQ 'N';
WHERE STAT EQ 'T';
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT PDF OPEN NOBREAK
ON TABLE SET HTMLCSS ON
Its telling you that one of your reports is too wide. so set your orientaton to landscape and your paper to tabloid just to see if it works then you'll have to figure out how to shrink your width to the printer size you have available
In Focus since 1979///7706m/5 ;wintel 2008/64;OAM security; Oracle db, ///MRE/BID
Posts: 3811 | Location: Manhattan | Registered: October 28, 2003
ok. I tried all kinds of methods here, and inevitably Dav gets the prize I think. All were great responses, I actually learned a lot going through this drill. What ended up working best for me was using the old rock gut method(which I didnt know you could do!) of
ON TABLE PCHOLD FORMAT PDF OPEN NOBREAK ... ON TABLE PCHOLD FORMAT PDF NOBREAK ... ON TABLE PCHOLD FORMAT PDF CLOSE
It worked just the way I needed it to. Thanks for all the help!