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 am trying to create 2 reports in 1 FEX with the usage of Compound Reports, but I faced this error upon execution, report could be run the 1st report is able to show, the 2nd report is nowhere to be seen
quote:
(FOC2526) WARNING: NO JOIN CONDITION SPECIFIED FOR SEGMENT : CUST 0 NUMBER OF RECORDS IN TABLE= 0 LINES= 0 0 HOLDING HTML FILE ON PC DISK ... (FOC3298) ERROR FOUND IN A COMPOUND REPORT Compound Report is TERMINATING.....
Following is my code :
-INCLUDE gen_def_env_vars
-SET &IMGURL = IF &WFFMT EQ 'PDF' THEN &PDFIMGURL ELSE &HTMLIMGURL
SET EMPTYREPORT = ON
JOIN
INNER FILE APPL AT APPL.APPL.ANKIPN TO MULTIPLE FILE CUST AT CUST.CUST.IPKIPN
TAG J0 AS J0
WHERE ANAVST EQ '009' OR ANAVST EQ '002' ;
END
JOIN
LEFT_OUTER FILE APPL AT APPL.APPL.ANOTYP TO UNIQUE FILE GEN_CODE
AT GEN_CODE.GEN_CODE.GCGCOD TAG J1 AS J1
WHERE J1.GEN_CODE.GCCTYP EQ 'APO' AND APPL.APPL.ANOTYP EQ J1.GEN_CODE.GCGCOD;
END
DEFINE FILE APPL
DATE1/A10 = '&dateFrom';
DD1/A2 = EDIT(DATE1,'99$$$$$$$$');
MM1/A2 = EDIT(DATE1,'$$$99$$$$$');
YY1/A4 = EDIT(DATE1,'$$$$$$9999');
DATE2/A10 = '&dateTo';
DD2/A2 = EDIT(DATE2,'99$$$$$$$$');
MM2/A2 = EDIT(DATE2,'$$$99$$$$$');
YY2/A4 = EDIT(DATE2,'$$$$$$9999');
DATEFROM/YYMD = DATECVT(EDIT(DD1|MM1|YY1),'I8DMYY','I8YYMD');
DATETO/YYMD = DATECVT(EDIT(DD2|MM2|YY2),'I8DMYY','I8YYMD');
STDTCENTURY/I7 = IF ARGLEN(7,EDIT(ANSTDT),STDTCENTURY) = 6 THEN 0 ELSE IF SUBSTR(7, EDIT(ANSTDT), 0, 1, 1, 'A1') = '1' THEN 1 ELSE 0;
STDT8/I8 = IF STDTCENTURY = 0 THEN 19000000 + ANSTDT ELSE IF STDTCENTURY = 1 THEN 20000000 + ANSTDT;
STDT/YYMD = DATECVT(STDT8, 'I8YYMD', 'I8YYMD');
Gold/I7=IF APPL.APPL.ANRKID EQ 'MBRGLD' THEN 1 ELSE 0;
Classic/I7=IF APPL.APPL.ANRKID EQ 'MBRSTD' THEN 1 ELSE 0;
END
SET COMPOUND=OPEN NOBREAK
TABLE FILE APPL
SUM
'J1.GEN_CODE.GCDESC' AS 'Description'
'APPL.APPL.Gold'
'APPL.APPL.Classic'
BY 'APPL.APPL.ANOTYP' AS 'Code'
ON TABLE SUBHEAD
" "
" "
HEADING
"APPLICATION APPROVED FROM <+0>&dateFrom <+0>TO<+0> <+0>&dateTo"
" "
"PRODUCT VS ORIGIN"
FOOTING
" "
" "
WHERE ANAVST EQ '009' AND ANKIPN EQ IPKIPN;
WHERE CUST.CUST.IPFDAT NE 0;
WHERE STDT GE DATEFROM;
WHERE STDT LE DATETO;
ON TABLE SET PAGE-NUM ON
ON TABLE ROW-TOTAL/I11 AS 'Total'
ON TABLE COLUMN-TOTAL AS 'Total'
ON TABLE PCHOLD FORMAT &WFFMT
ON TABLE SET HTMLCSS OFF
ON TABLE SET STYLE *
UNITS=IN,
SQUEEZE=ON,
GRID=OFF,
ORIENTATION=PORTRAIT,
PAGECOLOR=RGB(245 245 245),
$
TYPE=REPORT,
FONT='COURIER NEW',
SIZE=9,
COLOR='BLACK',
STYLE=NORMAL,
$
TYPE=DATA,
BORDER-TOP=LIGHT,
BORDER-BOTTOM=LIGHT,
BORDER-LEFT=LIGHT,
BORDER-RIGHT=LIGHT,
BACKCOLOR=( 'WHITE' RGB(242 238 240) ),
JUSTIFY=CENTER,
$
TYPE=TITLE,
BORDER-TOP=LIGHT,
BORDER-BOTTOM=LIGHT,
BORDER-LEFT=LIGHT,
BORDER-RIGHT=LIGHT,
BACKCOLOR=RGB(153 204 255),
STYLE=BOLD,
JUSTIFY=CENTER,
$
TYPE=TABHEADING,
SIZE=12,
STYLE=BOLD,
$
TYPE=TABHEADING,
IMAGE=&IMGURL,
POSITION=(+0.055556 -0.027778),
SIZE=(1.680556 0.402778),
$
TYPE=TABFOOTING,
SIZE=12,
$
TYPE=HEADING,
SIZE=12,
$
TYPE=HEADING,
LINE=1,
JUSTIFY=CENTER,
$
TYPE=HEADING,
LINE=1,
OBJECT=TEXT,
ITEM=1,
STYLE=BOLD,
$
TYPE=HEADING,
LINE=1,
OBJECT=TEXT,
ITEM=3,
STYLE=BOLD,
$
TYPE=HEADING,
LINE=2,
JUSTIFY=CENTER,
$
TYPE=HEADING,
LINE=3,
JUSTIFY=CENTER,
$
TYPE=HEADING,
LINE=3,
OBJECT=TEXT,
ITEM=1,
STYLE=BOLD+UNDERLINE,
$
TYPE=FOOTING,
SIZE=8,
$
TYPE=SUBHEAD,
SIZE=10,
$
TYPE=SUBFOOT,
SIZE=10,
$
TYPE=SUBTOTAL,
BACKCOLOR=RGB(210 210 210),
$
TYPE=ACROSSVALUE,
SIZE=9,
BACKCOLOR=RGB(255 255 153),
$
TYPE=ACROSSTITLE,
STYLE=BOLD,
$
TYPE=PAGENUM,
JUSTIFY=RIGHT,
$
TYPE=GRANDTOTAL,
BORDER-TOP=LIGHT,
BORDER-BOTTOM=LIGHT,
BORDER-LEFT=LIGHT,
BORDER-RIGHT=LIGHT,
BACKCOLOR=RGB(210 210 210),
STYLE=BOLD,
JUSTIFY=CENTER,
$
ENDSTYLE
END
SET COMPOUND=CLOSE
TABLE FILE APPL
SUM
'J1.GEN_CODE.GCDESC' AS 'Description'
'APPL.APPL.Gold'
'APPL.APPL.Classic'
BY 'APPL.APPL.ANOTYP' AS 'Code'
HEADING
"APPLICATION REJECTED FROM <+0>&dateFrom <+0>TO<+0> <+0>&dateTo"
" "
"PRODUCT VS ORIGIN"
FOOTING
" "
" "
" "
"Private & Confidential"
"Report Generated On <+0>&DATEtrDMYY<+0> <+0> "
WHERE ANAVST EQ '002' AND ANKIPN EQ IPKIPN;
WHERE CUST.CUST.IPFDAT NE 0;
WHERE STDT GE DATEFROM;
WHERE STDT LE DATETO;
ON TABLE SET PAGE-NUM OFF
ON TABLE ROW-TOTAL/I11 AS 'Total'
ON TABLE COLUMN-TOTAL AS 'Total'
ON TABLE PCHOLD FORMAT &WFFMT
ON TABLE SET STYLE *
UNITS=IN,
GRID=OFF,
SQUEEZE=ON,
ORIENTATION=PORTRAIT,
PAGECOLOR=RGB(245 245 245),
$
TYPE=REPORT,
FONT='COURIER NEW',
SIZE=9,
COLOR='BLACK',
STYLE=NORMAL,
$
TYPE=DATA,
BORDER-TOP=LIGHT,
BORDER-BOTTOM=LIGHT,
BORDER-LEFT=LIGHT,
BORDER-RIGHT=LIGHT,
BACKCOLOR=( 'WHITE' RGB(242 238 240) ),
JUSTIFY=CENTER,
$
TYPE=TITLE,
BORDER-TOP=LIGHT,
BORDER-BOTTOM=LIGHT,
BORDER-LEFT=LIGHT,
BORDER-RIGHT=LIGHT,
BACKCOLOR=RGB(153 204 255),
STYLE=BOLD,
JUSTIFY=CENTER,
$
TYPE=TABHEADING,
SIZE=12,
STYLE=BOLD,
$
TYPE=TABFOOTING,
SIZE=12,
$
TYPE=HEADING,
SIZE=12,
$
TYPE=HEADING,
LINE=1,
JUSTIFY=CENTER,
$
TYPE=HEADING,
LINE=1,
OBJECT=TEXT,
ITEM=1,
STYLE=BOLD,
$
TYPE=HEADING,
LINE=1,
OBJECT=TEXT,
ITEM=3,
STYLE=BOLD,
$
TYPE=HEADING,
LINE=2,
JUSTIFY=CENTER,
$
TYPE=HEADING,
LINE=3,
JUSTIFY=CENTER,
$
TYPE=HEADING,
LINE=3,
OBJECT=TEXT,
ITEM=1,
STYLE=BOLD+UNDERLINE,
$
TYPE=FOOTING,
SIZE=12,
$
TYPE=FOOTING,
LINE=4,
OBJECT=TEXT,
ITEM=1,
SIZE=8,
$
TYPE=FOOTING,
LINE=5,
OBJECT=TEXT,
ITEM=1,
SIZE=7,
$
TYPE=FOOTING,
LINE=5,
OBJECT=TEXT,
ITEM=2,
SIZE=7,
$
TYPE=FOOTING,
LINE=5,
OBJECT=TEXT,
ITEM=3,
SIZE=7,
$
TYPE=FOOTING,
LINE=5,
OBJECT=TEXT,
ITEM=4,
SIZE=7,
$
TYPE=SUBHEAD,
SIZE=10,
$
TYPE=SUBFOOT,
SIZE=10,
$
TYPE=SUBTOTAL,
BACKCOLOR=RGB(210 210 210),
$
TYPE=ACROSSVALUE,
SIZE=9,
BACKCOLOR=RGB(255 255 153),
$
TYPE=ACROSSTITLE,
STYLE=BOLD,
$
TYPE=GRANDTOTAL,
BORDER-TOP=LIGHT,
BORDER-BOTTOM=LIGHT,
BORDER-LEFT=LIGHT,
BORDER-RIGHT=LIGHT,
BACKCOLOR=RGB(210 210 210),
STYLE=BOLD,
JUSTIFY=CENTER,
$
ENDSTYLE
END
quote:
StyleSheet formatting seems to be ugly when it is in compound report, is there anyway to retain stylesheet formatting?
Hope you guys can help me to take a look.
Thanks in advance.This message has been edited. Last edited by: Kevin Tong,
WebFOCUS 7.6.9 Windows 2003, all output
Posts: 32 | Location: Malaysia | Registered: December 29, 2009
You appear to be missing the JOIN condition WHERE clause in your first JOIN.
JOIN
INNER FILE APPL AT APPL.APPL.ANKIPN TO MULTIPLE FILE CUST AT CUST.CUST.IPKIPN
TAG J0 AS J0
WHERE APPL.APPL.ANKIPN EQ CUST.CUST.IPKIPN ; <---------- Try adding this.
WHERE ANAVST EQ '009' OR ANAVST EQ '002' ;
END
WebFOCUS 7.7.05
Posts: 1213 | Location: Seattle, Washington - USA | Registered: October 22, 2007