Merin Joseph Posted October 26, 2023 Posted October 26, 2023 here is the code which i have related to this. at present this dropdown is not working after i chained the link. -PROMPT &ABC.(<'PROJECT',Project>,<'GLOBAL',Global>).Select.QUOTEDSTRING;-IF &ABC EQ 'PROJECT' THEN GOTO BY_PROJECT ELSE ENDSELECT ;-BY_PROJECT WHERE NEW_PROJECTNAME_ALPHA EQ &NEW_PROJECTNAME_ALPHA.(OR(FIND NEW_PROJECTNAME_ALPHA IN SHIELD/PROJECTS |FORMAT=A410V,SORT=ASCENDING)).PROJECTS:.;-GOTO ENDSELECT-ENDSELECTFull code-DEFAULTH &SUBSIDIARY = 1;-PROMPT &WFFMT.(<AHTML,AHTML>,<Excel,XLSX>).Format.QUOTEDSTRING;-PROMPT &ZRT.(OR(FIND ZRT IN ZRT_LISTING)).ZRT.;-PROMPT &ABC.(<'PROJECT',Project>,<'GLOBAL',Global>).Select.QUOTEDSTRING;-INCLUDE IBFS:/WFC/Repository/Shield/common_content/zrt_select_list.fex-RUN -*COMPONENT=Join_J001 JOIN CALLS.CALLS.CUSTOMERID IN SHIELD/CALLS TO UNIQUE CUSTOMERS.CUSTOMERS.ID IN SHIELD/CUSTOMERS TAG J001 AS J001 END-*COMPONENT=Join_J002 JOIN CUSTOMERS.CUSTOMERS.ID IN SHIELD/CALLS TO UNIQUE CUSTOMERADDRESSES.CUSTOMERADDRESSES.CUSTOMERID IN SHIELD/CUSTOMERADDRESSES TAG J002 AS J002 END-*COMPONENT=Join_J020 JOIN J002.CUSTOMERADDRESSES.ADDRESSTYPEID IN SHIELD/CALLS TO UNIQUE ADDRESSTYPES.ADDRESSTYPES.ID IN SHIELD/ADDRESSTYPES TAG J020 AS J020 END-*COMPONENT=Join_J021 JOIN J002.CUSTOMERADDRESSES.ADDRESSID IN SHIELD/CALLS TO UNIQUE ADDRESSES.ADDRESSES.ID IN SHIELD/ADDRESSES TAG J021 AS J021 END-*COMPONENT=Join_J005 JOIN CALLS.CALLS.CREATEDUSERZRT IN SHIELD/CALLS TO UNIQUE PROJECTS.PROJECTS.CREATEDUSERZRT IN SHIELD/PROJECTS TAG J005 AS J005 END-*COMPONENT=Join_J006 JOIN J005.PROJECTS.CREATEDUSERZRT IN SHIELD/CALLS TO UNIQUE SURVEYS.SURVEYS.CREATEDUSERZRT IN SHIELD/SURVEYS TAG J006 AS J006 END-*COMPONENT=Join_J007 JOIN J006.SURVEYS.SURVEYTYPEID IN SHIELD/CALLS TO UNIQUE SURVEYTYPES.SURVEYTYPES.ID IN SHIELD/SURVEYTYPES TAG J007 AS J007 END-*COMPONENT=Join_J008 JOIN CALLS.CALLS.ID IN SHIELD/CALLS TO UNIQUE CALLSURVEYANSWERS.CALLSURVEYANSWERS.CALLID IN SHIELD/CALLSURVEYANSWERS TAG J008 AS J008 END-*COMPONENT=Join_J009 JOIN J008.CALLSURVEYANSWERS.SURVEYQUESTIONID IN SHIELD/CALLS TO UNIQUE SURVEYQUESTIONS.SURVEYQUESTIONS.ID IN SHIELD/SURVEYQUESTIONS TAG J009 AS J009 ENDDEFINE FILE SHIELD/CALLS ZRT1/A4 = CALLS.CALLS.CREATEDUSERZRT; END TABLE FILE SHIELD/CALLS BY CALLS.CALLS.CALLNUMBER AS 'Call Number' BY CALLS.CALLS.STARTTIME/HMDYIA AS 'Call Time' BY J001.CUSTOMERS.ID AS 'Customer ID' BY J001.CUSTOMERS.NAME AS 'Store Name' BY J021.ADDRESSES.ADDRESS1 AS 'Store Address' BY J021.ADDRESSES.CITY AS 'Store City' BY J021.ADDRESSES.STATE AS 'Store State' BY J021.ADDRESSES.ZIP AS 'Store Zip' BY J005.PROJECTS.CREATEDUSERZRT AS 'ZRT' BY J009.SURVEYQUESTIONS.TEXT AS 'Questions' BY J008.CALLSURVEYANSWERS.ANSWER AS 'Answers'-IF &ABC EQ 'PROJECT' THEN GOTO BY_PROJECT ELSE ENDSELECT ;-BY_PROJECT BY J005.PROJECTS.NEW_PROJECTNAME_ALPHA WHERE NEW_PROJECTNAME_ALPHA EQ &NEW_PROJECTNAME_ALPHA.(OR(FIND NEW_PROJECTNAME_ALPHA IN SHIELD/PROJECTS |FORMAT=A410V,SORT=ASCENDING)).PROJECTS:.;-GOTO ENDSELECT-ENDSELECT WHERE STARTTIME FROM DT(&STARTTIME_YEAR_D_FROM.(|FORMAT=YYMD,LINK_TO=STARTTIME_YEAR_D_TO,TITLE='START_DATE').STARTTIME_YEAR_D From.QUOTEDSTRING) TO DT(&STARTTIME_YEAR_D_TO.(|FORMAT=YYMD,LINK_TO=STARTTIME_YEAR_D_FROM,TITLE='END_DATE').STARTTIME_YEAR_D To.QUOTEDSTRING); WHERE ZRT1 IN FILE ZRTFILE-* WHERE J007.SURVEYTYPES.ID EQ 1 ;HEADING "Activities" "From Call Date: &STARTTIME_YEAR_D_FROM To Call Date: &STARTTIME_YEAR_D_TO " "As of &DATE "-* "&NEW_PROJECTNAME_ALPHA"FOOTING "Title of the Procedure : IBFS:/WFC/Repository/Shield/Reports/Activities.fex" "Swisher International, Inc.<+0>________________________<+0>Confidential Information"ON TABLE SET PAGE-NUM NOLEADON TABLE SET ASNAMES ONON TABLE NOTOTALON TABLE SET AUTOFIT ONON TABLE PCHOLD AS 'Activities' FORMAT &WFFMTON TABLE SET HTMLEMBEDIMG ONON TABLE SET HTMLCSS ONON TABLE SET BYDISPLAY ONON TABLE SET STYLE *INCLUDE = IBFS:/WFC/Repository/Shield/common_content/Swisher_Shield_Theme.sty,$ENDSTYLEEND-RUN
David Beagan Posted October 27, 2023 Posted October 27, 2023 You are creating your parameters page in App Studio's HTML Canvas?I think to accomplish this you will need to write a WebFOCUS procedure that produces the values for the Projects dropdown. The procedure would have parameter variables to filter and invoke the logic for producing the necessary values to display in the dropdown. See the documentation for it here:App Studio User's Manual - Using Custom Procedures to Retrieve Dynamic Values, page 457
Merin Joseph Posted October 27, 2023 Author Posted October 27, 2023 @David Beagan I Created the page in WF designer .
David Beagan Posted October 27, 2023 Posted October 27, 2023 Yea, that might be beyond what you can do in Designer.
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now