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.

New TIBCO Community Coming Soon
In early summer, TIBCO plans to launch a new community—with a new user experience, enhanced search, and expanded capabilities for member engagement with answers and discussions! In advance of that, the current myibi community will be retired on April 30. We will continue to provide updates here on both the retirement of myibi and the new community launch.

What You Need to Know about Our New Community
We value the wealth of knowledge and engagement shared by community members and hope the new community will continue cultivating networking, knowledge sharing, and discussion.

During the transition period, from April 20th until the new community is launched this summer, myibi users should access the TIBCO WebFOCUS page to engage.


Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     [SOLVED] Making part of report expandable

Read-Only Read-Only Topic
Go
Search
Notify
Tools
[SOLVED] Making part of report expandable
 Login/Join
 
Håkan
Guru
posted
All, I have a report spanning a selected financial half year, e.g. 1401 which contain 26 weeks. What we would like to do is to be able to expand only 5 out of 22 lines. Is it possible? Preferable, we also would like to get rid of the + sign for the other rows.

Tia

This message has been edited. Last edited by: <Kathryn Henning>,


WebFOCUS DS 8.0.06/08 DS/AS
WebFOCUS RS 8.0.08 (Linux/IBM i)
WebFOCUS Client 8.0.06 (Linux)
 
Posts: 319 | Location: Stockholm, Sweden | Registered: February 04, 2004Report This Post
GavinL
Master
posted Hide Post
Not sure if this will help or not, but we built our own. Little bit of JQuery and HTML and we have a menu that expands, with the first two starting up expanded.



When we click on the green titles, it expands and collapses.



Code: had to change some things to protect my company, but this is the generic version.
SET NODATA = ''

DEFINE FILE TBLDATAMYDATA ADD
	STYLECONDCD/I5=
	IF TBLDATAMYDATA.TBLDATAMYDATA.PARENT EQ -1
		AND TBLDATAMYDATA.TBLDATAMYDATA.ENABLED EQ -1
		THEN 1
	ELSE IF TBLDATAMYDATA.TBLDATAMYDATA.PARENT EQ -1
		AND TBLDATAMYDATA.TBLDATAMYDATA.ENABLED EQ 0
		THEN 2
	ELSE 3;

	CONDDISPLAYVAL/A50V=
	IF STYLECONDCD EQ 2 THEN 'NOT LINKED'
	ELSE TBLDATAMYDATA.TBLDATAMYDATA.DISPLAYVALUE;

	STATUSIMG/A200V=
	IF STYLECONDCD EQ 1 THEN '<img src="/ibi_apps/WFServlet.ibfs?IBFS1_action=RUNFEX&|IBFS_path=/WFC/Repository/MYTEST/images/greencheck.PNG" align="middle" width="30"/> '
	ELSE IF STYLECONDCD EQ 2 THEN '<img src="/ibi_apps/WFServlet.ibfs?IBFS1_action=RUNFEX&|IBFS_path=/WFC/Repository/MYTEST/images/redx.PNG" align="middle" width="30"/> '
	ELSE '';

	ITEMDISPVL/A250V=STATUSIMG | TBLDATAMYDATA.TBLDATAMYDATA.ITEM;

	ITEMHTMLCD/A5000V=IF STYLECONDCD EQ 1 AND TBLDATAMYDATA.TBLDATAMYDATA.EXPANDEDIND EQ -1 THEN '<tr class="header" id="expandeddiv"><td class="headerval1" colspan="2">'||ITEMDISPVL||'</td></tr>'
	ELSE IF STYLECONDCD EQ 1 AND TBLDATAMYDATA.TBLDATAMYDATA.EXPANDEDIND EQ 0 THEN '<tr class="header" id="collapseddiv"><td class="headerval3" colspan="2">'||ITEMDISPVL||'</td><td class="headerval4">'||CONDDISPLAYVAL||'</th></tr>'
	ELSE IF STYLECONDCD EQ 2 THEN '<tr class="header" id="nodatadiv"><td class="headerval5">'||ITEMDISPVL||'</td><td class="headerval6">'||CONDDISPLAYVAL||'</th></tr>'
	ELSE '<tr class="data"><td class="dataval1">'||ITEMDISPVL||'</td><td class="dataval2">'||CONDDISPLAYVAL||'</td></tr>';
END


TABLE FILE TBLDATAMYDATA
PRINT
	 TBLDATAMYDATA.TBLDATAMYDATA.ITEMHTMLCD
BY  LOWEST TBLDATAMYDATA.TBLDATAMYDATA.GROUPID NOPRINT
BY  LOWEST TBLDATAMYDATA.TBLDATAMYDATA.ORDERING NOPRINT
ON TABLE SET PAGE-NUM NOLEAD
ON TABLE NOTOTAL
ON TABLE HOLD AS HOLDDIV FORMAT INTERNAL
END

-RUN

-HTMLFORM BEGIN
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN"  "http://www.w3.org/TR/html4/strict.dtd">
<html lang="en">
<head>
<script src="/ibi_html/javaassist/jquery/jquery_min.js"></script>
<script type='text/javascript'>//<![CDATA[
$(window).load(function(){
$('tr.data').slideToggle(1);

$(expandeddiv).nextUntil('tr.header').slideToggle(1);

$('.header').click(function(){
    $(this).nextUntil('tr.header').slideToggle(1);
});
});//]]>

</script>
<style type="text/css">

tr.header {
    cursor:pointer;
	vertical-align:middle;
	line-height:30px;
}

table{padding: 5px; width: 220px; border-collapse: collapse; vertical-align=middle;}

.headerval1 { font-family:'Segoe UI', Calibri, sans-serif ; font-size:10pt; font-weight:bold; color:#424649; background-color:#DEEFDE; padding-top:0pt; padding-bottom:0pt; border-top: 5.00pt SOLID #FFFFFF; border-bottom: NONE; border-right: NONE; border-left: NONE; vertical-align:middle; }
.headerval3 { font-family:'Segoe UI', Calibri, sans-serif ; font-size:10pt; font-weight:bold; color:#424649; background-color:#DEEFDE; padding-top:0pt; padding-bottom:0pt;  border-top: 5.00pt SOLID #FFFFFF; border-bottom: NONE; border-right: NONE; border-left: NONE; vertical-align:middle; }
.headerval5 { font-family:'Segoe UI', Calibri, sans-serif ; font-size:10pt; color:#424649; background-color:#F7DEDE; padding-top:0pt; padding-bottom:0pt; border-top: 5.00pt SOLID #FFFFFF; border-bottom: NONE; border-right: NONE; border-left: NONE; vertical-align:middle; }
.headerval6 { font-family:'Segoe UI', Calibri, sans-serif ; font-size:8pt; color:#424649; background-color:#F7DEDE; padding-top:0pt; padding-bottom:0pt;  border-top: 5.00pt SOLID #FFFFFF; border-bottom: NONE; border-right: NONE; border-left: NONE; vertical-align:middle; }

.dataval1 { font-family:'Segoe UI', Calibri, sans-serif ; font-size:10pt; color:#424649; padding-top:0pt; padding-bottom:0pt; border-top: 5.00pt SOLID #FFFFFF; border-bottom: NONE; border-right: NONE; border-left: NONE; vrtical-align:middle; }
.dataval2 {  font-family:'Segoe UI', Calibri, sans-serif ; font-size:10pt; color:#424649; padding-top:0pt; padding-bottom:0pt; text-align:right; border-top: 5.00pt SOLID #FFFFFF; border-bottom: NONE; border-right: NONE; border-left: NONE; vertical-align:middle; }


</style>
</head>
<body>
<table>
-REPEAT HENDNUM FOR &MYDATA FROM 1 TO &LINES
-READFILE HOLDDIV

!IBI.AMP.ITEMHTMLCD;

-HENDNUM
-ENDLOOP
</table>
</body>
</html>

-HTMLFORM END



- FOCUS Man, just FOCUS!
-----------------------------
Product: WebFOCUS
Version: 8.1.04
Server: Windows 2008 Server
 
Posts: 578 | Registered: October 01, 2014Report This Post
Håkan
Guru
posted Hide Post
Thanks Gavin, I will take a look after the weekend. In the meantime, we tried using a compound report, the first with EXPANDEDBYROW OFF and the second with EXPANDEDBYROW ON, and it seems to work.


WebFOCUS DS 8.0.06/08 DS/AS
WebFOCUS RS 8.0.08 (Linux/IBM i)
WebFOCUS Client 8.0.06 (Linux)
 
Posts: 319 | Location: Stockholm, Sweden | Registered: February 04, 2004Report 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] Making part of report expandable

Copyright © 1996-2020 Information Builders