I did my research on FocalPoint and read Mickey Grackin's WebFOCUS HTML and PDF Report Design part and part 2. These two documents helped my a lot.
My PDF report has six columns, I can change the column sizes on five of them but the sixth column (CAMP) just would not response to whatever I did. Please review my code and let me know what you think:
DEFINE FILE HOLD NAME_FTPT/A30 = NAME || (' ' | FTPT); END TABLE FILE HOLD PRINT NAME_FTPT AS 'Instructor''s Name' PROG AS 'Program' NEW_CRSE2 AS 'Courses Taught (D)Development (T)Transfer (N)Non-Transfer' NEW_DEGREE AS 'Degrees' NEW_DSPQUAL AS 'Other Related Qualifications - Work Experience/Licensure/Certification' CAMP AS 'Campus' BY &SELECT_SORT NOPRINT HEADING "FACULTY CREDENTIAL REPORT" "Term: <+0>&PARM_TERM_CODE<+0> " FOOTING "Submitted by: <+0>&IBIMR_user" "Date: <+0>&DATEtMDYY<+0> <+0> " ON TABLE SET PAGE-NUM OFF ON TABLE NOTOTAL ON TABLE PCHOLD FORMAT &WFFMT.(,,,,,).Select type of display output. ON TABLE SET STYLE * UNITS=IN, GRID=ON, RIGHTGAP=0, ORIENTATION=LANDSCAPE, $ TYPE=REPORT, COLUMN=NAME_FTPT , WRAP=1,$ TYPE=REPORT, COLUMN=PROG , WRAP=1.30,$ TYPE=REPORT, COLUMN=NEW_CRSE2 , WRAP=1.70,$ TYPE=REPORT, COLUMN=NEW_DEGREE , WRAP=2.10,$ TYPE=REPORT, COLUMN=NEW_DSPQUAL , WRAP=2.70,$ TYPE=REPORT, COLUMN=CAMP , WRAP=.5,$ TYPE=REPORT, BORDER-TOP=1, BORDER-BOTTOM=1, BORDER-LEFT=1, BORDER-RIGHT=1, BORDER-TOP-COLOR='SILVER', BORDER-BOTTOM-COLOR='SILVER', BORDER-LEFT-COLOR='SILVER', BORDER-RIGHT-COLOR='SILVER', FONT='ARIAL', SIZE=8, WRAP=1.7, ORIENTATION=LANDSCAPE, LEFTGAP=.005, RIGHTGAP=.005, SQUEEZE=ON, LINEBREAK='CRLF', $ TYPE=DATA, COLUMN=N1, SIZE=8,
Thanks.This message has been edited. Last edited by: Kerry,
7.6.4 OS is Windows HTML, Excel, and PDF
June 22, 2009, 05:01 PM
Prarie
How big is the Field? are you trying to make it smaller then the size?
June 22, 2009, 05:16 PM
Francis Mariani
It seems to work for me. I used your code by adding the creation of the HOLD file:
-SET &ECHO=ALL;
SET ASNAMES=ON
SET HOLDLIST=PRINTONLY
SET HOLDFORMAT=ALPHA
TABLE FILE CAR
PRINT
COUNTRY AS NAME
CAR AS FTPT
MODEL AS PROG
BODYTYPE AS CAMP
WARRANTY AS NEW_DSPQUAL
STANDARD AS NEW_DEGREE
DEALER_COST AS NEW_CRSE2
ON TABLE HOLD AS HOLD
END
-RUN
-DEFAULT &SELECT_SORT = 'NAME';
-DEFAULT &PARM_TERM_CODE = 'AAA';
-DEFAULT &WFFMT = 'PDF';
DEFINE FILE HOLD
NAME_FTPT/A30 = NAME || (' ' | FTPT);
END
TABLE FILE HOLD
PRINT
NAME_FTPT AS 'Instructor''s Name'
PROG AS 'Program'
NEW_CRSE2 AS 'Courses Taught (D)Development (T)Transfer (N)Non-Transfer'
NEW_DEGREE AS 'Degrees'
NEW_DSPQUAL AS 'Other Related Qualifications - Work Experience/Licensure/Certification'
CAMP AS 'Campus'
BY &SELECT_SORT NOPRINT
HEADING
"FACULTY CREDENTIAL REPORT"
"Term: <+0>&PARM_TERM_CODE<+0> "
FOOTING
"Submitted by: <+0>&IBIMR_user"
"Date: <+0>&DATEtMDYY<+0> <+0> "
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT &WFFMT.(,,,,,).Select type of display output.
ON TABLE SET STYLE *
UNITS=IN,
GRID=ON,
RIGHTGAP=0,
ORIENTATION=LANDSCAPE,
$
TYPE=REPORT, COLUMN=NAME_FTPT , WRAP=1, COLOR=GREEN, $
TYPE=REPORT, COLUMN=PROG , WRAP=1.30, COLOR=ORANGE, $
TYPE=REPORT, COLUMN=NEW_CRSE2 , WRAP=1.70, COLOR=RED, $
TYPE=REPORT, COLUMN=NEW_DEGREE , WRAP=2.10, COLOR=BROWN, $
TYPE=REPORT, COLUMN=NEW_DSPQUAL , WRAP=2.70, COLOR=YELLOW, $
TYPE=REPORT, COLUMN=CAMP , WRAP=.5, COLOR=BLUE, $
TYPE=REPORT,
BORDER-TOP=1,
BORDER-BOTTOM=1,
BORDER-LEFT=1,
BORDER-RIGHT=1,
BORDER-TOP-COLOR='SILVER',
BORDER-BOTTOM-COLOR='SILVER',
BORDER-LEFT-COLOR='SILVER',
BORDER-RIGHT-COLOR='SILVER',
FONT='ARIAL',
SIZE=8,
WRAP=1.7,
ORIENTATION=LANDSCAPE,
LEFTGAP=.005,
RIGHTGAP=.005,
SQUEEZE=ON,
LINEBREAK='CRLF',
$
TYPE=DATA,
COLUMN=N1,
SIZE=8,
$
END
-RUN
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
June 22, 2009, 05:52 PM
kingfish1
Thank you for your helpful and quick responses. I was able to make it to work.
Thanks, Steven
7.6.4 OS is Windows HTML, Excel, and PDF
June 22, 2009, 08:22 PM
susannah
if, by any chance, your sort field (which is a parm) was CAMP, then that would explain why you weren't getting displayed CAMP column styled. You would have had 2 fields named CAMP. btw, good on ya for reading up before Pointing!
In Focus since 1979///7706m/5 ;wintel 2008/64;OAM security; Oracle db, ///MRE/BID
June 22, 2009, 09:54 PM
Francis Mariani
Susannah, yep, I forgot about that!
You could change all your column styling to this to affect all instances of the column:
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
June 22, 2009, 10:17 PM
mgrackin
This has happened to me so often that this was the first thing I thought was the issue. This is a real easy thing to get tripped up on. Susannah and Francis got it covered as far as resolving the issue. You could also use column notation COLUMN=P6 instead of referencing CAMP. I believe this will work as well.
I'm glad the articles I wrote helped you a lot.
Thanks!
Mickey
FOCUS/WebFOCUS 1990 - 2011
August 30, 2009, 10:34 AM
Baillecl
Bonjour,
I went to IBI documentations on line and got such a number of answrers for the search Mickey Grackin's WebFOCUS HTML and PDF Report Design part and part 2. ( Without mentioning Mickey Grackin) I grew nervous and began telling names, and then, I had the idea to turn outside, to the one and very Google.
I asked the same question ( Mentioning Mickey Grackin, this time) and I got the article. I can even see your snapshot, Mickey
So, I turn on reading. But what I'm expecting, is like Francis Mariani in around 2006 : A FocStyle Syntax that would lead HTML, PDF and EXCEL as well. This time, I wish Column Titles to follow the width calculated by Focus for Column Data. And Wrap Column Titles as necessary. Another dream is that _ should be considered as blanks in column Titles and help Wrap 'cleverly' Cordially and Focusely ( And thanks to Google the Great )
Focus Mainframe 7.6.11 Dev Studio 7.6.11 and !!! PC Focus, Focus for OS/2, FFW Six, MSO