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.
Is there a way to create a two column report where your data fills up one column on a page and then goes to the next column on the page. We are in the process of creating our campus phone book and in the back we have departmental listings that are two column pages.
This may work, define Row and Column fields. Something like this:
DEFINE FILE CAR COL/P6 WITH MODEL = IF COL LT 4 THEN (COL + 1) ELSE 1; ROW/P6 WITH MODEL = IF COL EQ 1 THEN (ROW + 1) ELSE ROW; END TABLE FILE CAR SUM MODEL BY ROW NOPRINT ACROSS COL NOPRINT END
TABLE FILE CAR
PRINT CAR
COMPUTE COUNTER/I2 =
IF COUNTER GE 4 THEN 1 ELSE COUNTER + 1;
COMPUTE COLUMN_NUM/I2 = IF COUNTER EQ 1 THEN
(IF COLUMN_NUM GE 2 THEN 1 ELSE COLUMN_NUM + 1) ELSE COLUMN_NUM;
COMPUTE PAGE_BR/I2 = IF
(LAST COLUMN_NUM NE COLUMN_NUM) AND (LAST COLUMN_NUM EQ 2)
THEN PAGE_BR + 1 ELSE PAGE_BR;
BY CAR NOPRINT
ON TABLE SET HOLDLIST PRINTONLY
ON TABLE HOLD AS H0 FORMAT ALPHA
END-RUN
DEFINE FILE H0 ROW_1/A20 =
IF COLUMN_NUM EQ 1 THEN CAR ELSE '';
ROW_2/A20 =
IF COLUMN_NUM EQ 2 THEN CAR ELSE '';
END-RUN
TABLE FILE H0
SUM
MAX.ROW_1 MAX.ROW_2BY PAGE_BR
NOPRINT BY COUNTER NOPRINTON PAGE_BR PAGE-BREAK ON TABLE PCHOLD FORMAT PDF END-RUN
This message has been edited. Last edited by: <Mabel>,
Posts: 406 | Location: Canada | Registered: May 31, 2004
You might want to check out the "Mailing Label" printing options. They are described in the "Creating Reports" manual, in the chapter on "Laying out the Report Page". You make each entry a "label" and then specify how to print them the way you want. There are special options you put in your stylesheet. You can set PAGEMATRIX=(2 N) for 2 columns and N (replaced by numbers of rows you want), and MATRIXORDER to VERTICAL to print down first, then the next column. The full syntax and other options for the "labels" are in the documentation.
Posts: 391 | Location: California | Registered: April 14, 2003