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] Passing the "ALL" option from launch page to procedure

Read-Only Read-Only Topic
Go
Search
Notify
Tools
[SOLVED] Passing the "ALL" option from launch page to procedure
 Login/Join
 
JL
Silver Member
posted
Hi,

I have a html launch page with a drop down list (combobox) populated from a procedure and checked the 'Add "All" option'. The drop down list is populated by the procedure and includes the ALL option. This launch page calls another procedure and the &variable for the drop down list is populated with FOC_NONE when the "ALL" option is selected.

The program is supposed to do this ... If the ALL option is selected, set X = 1, else compare the &variable with the table column. If they are equal, then set X = 1 else set X = 0.

The code I tried is this ...

DEFINE FILE filename
X/I3 = IF ('&variable' EQ 'FOC_NONE') THEN 1 ELSE (IF (column1 EQ &variable) THEN 1 ELSE 0);
END

However if the ALL option is selected, then X becomes undefined.

Is there are a way to specify that the ALL option returns the word "ALL" or something similar, instead of, FOC_NONE? Or is there any other workaround?

Thanks!

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


Year(s) of experience in WebFOCUS: 5+. Using WebFOCUS 7.7.03 on Windows platform with Oracle/SQL Server.
 
Posts: 41 | Registered: September 08, 2008Report This Post
JL
Silver Member
posted Hide Post
It seems like my brains worked after posting the question to the forum. By splitting up the IF statements, the solution is ...


-DEFAULT &variable_ADJ = 0;

-SET &variable_ADJ = IF &variable EQ FOC_NONE THEN 0 ELSE &variable;

DEFINE FILE tablename
I/I5 = (IF &variable_ADJ EQ 0 THEN 1 ELSE 0);
J/I5 = (IF column_name EQ &variable_ADJ THEN 1 ELSE 0);
X/I5 = I + J;
END


However, please let me know what other solutions are available.

Thanks!


Year(s) of experience in WebFOCUS: 5+. Using WebFOCUS 7.7.03 on Windows platform with Oracle/SQL Server.
 
Posts: 41 | Registered: September 08, 2008Report This Post
susannah
Expert
posted Hide Post
yep, that's the way it works...when you talk it out, clarity strikes and you get the idea that makes it work...whatever it is.
Your procedure that you use to populate your fex...you can write your own 'ALL' and 'ALL' pair (value & display) and then don't check the All option when you're building your launch page in devstu. FOC_NONE is a great idea, but it causes me such ageda that i never use it.



In Focus since 1979///7706m/5 ;wintel 2008/64;OAM security; Oracle db, ///MRE/BID
 
Posts: 3811 | Location: Manhattan | Registered: October 28, 2003Report 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] Passing the "ALL" option from launch page to procedure

Copyright © 1996-2020 Information Builders