Focal Point Banner


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.


Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     [SOLVED] getting server crashed error when linebreak used in compund pdf report

Read-Only Read-Only Topic
Go
Search
Notify
Tools
[SOLVED] getting server crashed error when linebreak used in compund pdf report
 Login/Join
 
Member
posted
Hi, i am getting a server crashed error when i am using linebreak = 'lf' in my second report style of my compund pdf report consisting of 3 reports. here is the code that i am using. can any one help me on this.
its the spt_text field that i want linebreak to be applied to.


-SET &ECHO = ALL;
SET HOLDLIST = PRINTONLY
SET BYDISPLAY = ON
-DEFAULT &LP_SI_CASE_I = '7943809';
-TYPE &LP_SI_CASE_I
-DEFAULT &R_FLAG = 'N';
-*-DEFAULT &LOCATION = 'NO';
ENGINE DB2 SET DEFAULT_CONNECTION DB21
SQL DB2 PREPARE SQLOUT FOR
SELECT LP_SI_SUPLMNT_I
FROM DB2PROD.LP_SI_SUPLMNT
WHERE LP_SI_CASE_I= &LP_SI_CASE_I
AND SEND_SPCL_ATTN_F='Y'
;
END
TABLE FILE SQLOUT
PRINT
COMPUTE T_LP_SI_SUPLMNT_I/A6 = EDIT(LP_SI_SUPLMNT_I);
ON TABLE SAVE
END
-IF &LINES EQ 0 THEN GOTO LBL_ERROR ELSE GOTO BEGIN;
-BEGIN
-RUN
-READ SAVE &T_LP_SI_SUPLMNT_I.A6.
-TYPE &T_LP_SI_SUPLMNT_I
-***********************************************CASEIDEND
-*-GOTO COOL
-*******************GENERAL
-RUN
TABLE FILE CAR
PRINT
CAR
WHERE RECORDLIMIT EQ 10
ON TABLE PCHOLD FORMAT PDF OPEN NOBREAK
END
-**************EVIDENCE SUMMARY
ENGINE DB2 SET DEFAULT_CONNECTION DB21
SQL DB2 PREPARE SQLOUT FOR
SELECT DB2PROD.LP_SI_SUBJ_STMT.SGN_ADMIT_F, DB2PROD.LP_SI_SUBJ_STMT.INTVW_START_TI, DB2PROD.LP_SI_SUBJ_STMT.INTVW_END_TI, DB2PROD.LP_SI_SUBJ_STMT.REAS_GIV_SUB_T,
DB2PROD.LP_SI_SUBJ_STMT.STMT_T,DB2PROD.LP_SI_SUBJ_STMT.SMRY_INTVW_T, DB2PROD.LP_SI_SUBJ_STMT.REAS_ACT_T
FROM DB2PROD.LP_SI_INDIV INNER JOIN DB2PROD.LP_SI_SUBJ_STMT ON DB2PROD.LP_SI_INDIV.INDIV_SEQ_I = DB2PROD.LP_SI_SUBJ_STMT.INDIV_SEQ_I AND DB2PROD.LP_SI_INDIV.LP_SI_SUPLMNT_I = DB2PROD.LP_SI_SUBJ_STMT.LP_SI_SUPLMNT_I AND DB2PROD.LP_SI_INDIV.LP_SI_CASE_I = DB2PROD.LP_SI_SUBJ_STMT.LP_SI_CASE_I
WHERE DB2PROD.LP_SI_INDIV.LP_SI_CASE_I= &LP_SI_CASE_I
AND DB2PROD.LP_SI_INDIV.LP_SI_SUPLMNT_I= &T_LP_SI_SUPLMNT_I
AND DB2PROD.LP_SI_INDIV.INDIV_SUB_CATG_C=4
;
END
DEFINE FILE SQLOUT
lf#Text/A4000V = CTRAN(ARGLEN(4000, SMRY_INTVW_T,'I4'), SMRY_INTVW_T, 10, 35, lf#Text);
lf%Text/A4000V = STRREP (4000,lf#Text,1,'#',2,'#%',4000,lf%Text);
lf_Text/A4000V = CTRAN(4000, lf%Text, 35, 10, lf_Text);
spt_Text/A4000V = ' ' | CTRAN(4000, lf_Text, 37, 0, spt_Text);
END
-RUN
TABLE FILE SQLOUT
HEADING
"Summary of Interview<+0> <+0> <+0> <+0> <+0> "
"(Internal):<+0>< spt_Text <+0> <+0> <+0> <+0> "
PRINT SGN_ADMIT_F NOPRINT
ON TABLE PCHOLD FORMAT PDF NOBREAK
ON TABLE SET STYLE *
UNITS=IN,
SQUEEZE=ON,
ORIENTATION=PORTRAIT,
$
TYPE=REPORT,
GRID=OFF,
FONT='TIMES NEW ROMAN',
SIZE=10,
COLOR='BLACK',
BACKCOLOR='NONE',
STYLE=NORMAL,
LINEBREAK='LF',
-*WRAP=6,
$
TYPE=HEADING,
LINE=1,
OBJECT=TEXT,
ITEM=1,
JUSTIFY=LEFT,
POSITION=0.200,
$
TYPE=HEADING,
LINE=2,
OBJECT=TEXT,
ITEM=1,
JUSTIFY=LEFT,
POSITION=1.00,
$
TYPE=HEADING,
LINE=2,
OBJECT=TEXT,
ITEM=2,
JUSTIFY=LEFT,
POSITION=0.00,
$
ENDSTYLE
END
-RUN
ENGINE DB2 SET DEFAULT_CONNECTION DB21
SQL DB2 PREPARE SQLOUT FOR
SELECT
DISTINCT
PRNCPL_SUM_A,
INIL_PYMT_A,
INSTM_PYMT_A,
INSTM_DUE_D
FROM DB2PROD.LP_SI_SUPLMNT
WHERE LP_SI_CASE_I= &LP_SI_CASE_I
AND LP_SI_SUPLMNT_I= &T_LP_SI_SUPLMNT_I
;
END


TABLE FILE SQLOUT
PRINT
COMPUTE V_PRNCPL_SUM_A/A15 = PTOA(PRNCPL_SUM_A, '(P11.2)', 'A15');
COMPUTE TV_PRNCPL_SUM_A/A15 = TRIM('L', V_PRNCPL_SUM_A, 15, ' ', 1 , 'A15');
COMPUTE T_PRNCPL_SUM_A/A16 = '$'|TV_PRNCPL_SUM_A;
COMPUTE V_INIL_PYMT_A/A15 = PTOA(INIL_PYMT_A, '(P11.2)', 'A15');
COMPUTE TV_INIL_PYMT_A/A15 = TRIM('L', V_INIL_PYMT_A, 15, ' ', 1 , 'A15');
COMPUTE T_INIL_PYMT_A/A16 = '$'|TV_INIL_PYMT_A;
COMPUTE V_INSTM_PYMT_A/A15 = PTOA(INSTM_PYMT_A, '(P11.2)', 'A15');
COMPUTE TV_INSTM_PYMT_A/A15 = TRIM('L', V_INSTM_PYMT_A, 15, ' ', 1 , 'A15');
COMPUTE T_INSTM_PYMT_A/A16 = '$'|TV_INSTM_PYMT_A;
PRNCPL_SUM_A
INIL_PYMT_A
INSTM_PYMT_A
COMPUTE TV_INSTM_DUE_D/MDYY = DATECVT(INSTM_DUE_D, 'YYMD', 'MDYY');
COMPUTE V_INSTM_DUE_D/A30 = DATETRAN(TV_INSTM_DUE_D, '(MDYY)', '(/)', 'EN', 30, 'A30');
ON TABLE HOLD AS EVIDSMRY
END
TABLE FILE EVIDSMRY
PRINT
V_INSTM_DUE_D
T_PRNCPL_SUM_A
T_INIL_PYMT_A
T_INSTM_PYMT_A
ON TABLE HOLD AS EVIDSMRY1 FORMAT ALPHA
END
-RUN
-READ EVIDSMRY1 &V_INSTM_DUE_D.A30. &T_PRNCPL_SUM_A.A16. &T_INIL_PYMT_A.A16. &T_INSTM_PYMT_A.A16.
TABLE FILE CAR
PRINT
CAR NOPRINT
WHERE RECORDLIMIT EQ 1
HEADING
"Evidence Summary"
" "
" <+0>Promisory Note-Principal Sum:<+0>&T_PRNCPL_SUM_A <+0> "
" <+0>Promisory Note-Initial Sum:<+0>&T_INIL_PYMT_A<+0> "
" <+0>Promissory Note-Install Payment:<+0>&T_INSTM_PYMT_A<+0> "
" <+0>Promissory Note-Install Date Due:<+0>&V_INSTM_DUE_D<+0> "
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT PDF CLOSE
END

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


Thanks,
Richa
 
Posts: 5 | Registered: September 29, 2008Report This Post
Expert
posted Hide Post
Update your profile to let us know your software environment.

Have you tried executing that second report on its own, not as a compound report? If that works, I would try using a slightly different syntax for compound reports, use SET COMPOUND statements instead of ON TABLE PCHOLD FORMAT PDF OPEN/CLOSE:

SET COMPOUND = 'OPEN NOBREAK'

TABLE XXX
...
ON TABLE PCHOLD FORMAT PDF
END

SET COMPOUND = NOBREAK

TABLE XXX
...
ON TABLE PCHOLD FORMAT PDF
END

SET COMPOUND = CLOSE

TABLE XXX
...
ON TABLE PCHOLD FORMAT PDF
END


Look for "Creating a Compound PDF or PostScript Report" in the "Creating Reports With WebFOCUS Language" documentation.

If this doesn't work, I would open a case with Tech Support, after checking that LINEBREAK is valid for the version of WebFOCUS you're running the report on.


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
 
Posts: 10577 | Location: Toronto, Ontario, Canada | Registered: April 27, 2005Report This Post
Platinum Member
posted Hide Post
Francis has hit on the answer exactly. We had the same error message when when creating an excel output compound report. Once we sorted out the SET open and close compound dialog and the places to break and nobreak placement it runs like a dream


809 DevStudio, MRE, Report Caster , Report Library
Output: Excel PDF, HTML
 
Posts: 171 | Registered: April 28, 2008Report This Post
  Powered by Social Strata  

Read-Only Read-Only Topic

Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     [SOLVED] getting server crashed error when linebreak used in compund pdf report

Copyright © 1996-2020 Information Builders