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]A way to move the 'ALL' option down the list of a dyn. populated drop-down...
Page 1 2 

Read-Only Read-Only Topic
Go
Search
Notify
Tools
[SOLVED]A way to move the 'ALL' option down the list of a dyn. populated drop-down...
 Login/Join
 
Virtuoso
posted Hide Post
Tom,

FINALLY! lol It works!!

Working code:

-SET &ECHO = 'ALL';

-DEFAULTH &DSDIVISION = _FOC_NULL;
-DEFAULTH &DSDISTRICT = _FOC_NULL;
-DEFAULTH &DSBANNERGL = _FOC_NULL;

SET ASNAMES = ON
-RUN

DEFINE FILE AFSTEMP
SORT/A1 = '1';
DSACCTNAME_X/A44 = 'ALL';
NEW_COL/A11 = '_FOC_NULL';
END
TABLE FILE AFSTEMP
SUM
DSNAME NOPRINT
DSACCTNAME_X AS 'DSACCTNAME'
BY SORT
BY NEW_COL AS 'DSACCTNO'
ON TABLE SET HOLDLIST PRINTONLY
ON TABLE HOLD AS HOLD1 FORMAT ALPHA
END
-RUN

-*-------------------------------------------

DEFINE FILE AFSTEMP
SORT/A1 = '2';
DSACCTNO_X/A11 = EDIT(DSACCTNO);
DSACCTNAME/A44 = DSACCTNO_X | ' - ' | DSNAME;
END
TABLE FILE AFSTEMP
SUM
DSACCTNAME
BY SORT
BY DSACCTNO_X AS 'DSACCTNO'
WHERE (DSDIVISION EQ &DSDIVISION);
WHERE (DSDISTRICT EQ &DSDISTRICT);
WHERE (DSBANNERGL EQ &DSBANNERGL);
WHERE (DSACCTNO NE 0);
ON TABLE HOLD AS HOLD2 FORMAT ALPHA
END
-RUN

-*-------------------------------------------

TABLE FILE HOLD2
PRINT
DSACCTNAME
BY HIGHEST SORT NOPRINT 
BY DSACCTNO
ON TABLE PCHOLD FORMAT XML
MORE
FILE HOLD1
END
-RUN


Output:

**Expected XML list**

Tom, THANK YOU!! This helps a ton! I appreciate you taking the time to help me troubleshoot my code as well!


8.2.02M (production), 8.2.02M (test), Windows 10, all outputs.
 
Posts: 1113 | Location: USA | Registered: January 27, 2015Report This Post
Expert
posted Hide Post
Thank God!!!
Just joking....
Welcome...


Tom Flynn
WebFOCUS 8.1.05 - PROD/QA
DB2 - AS400 - Mainframe
 
Posts: 1972 | Location: Centennial, CO | Registered: January 31, 2006Report This Post
Virtuoso
posted Hide Post
Thank you Eric, Squatch, and BabakNYC also for your time, input, and suggestions!


8.2.02M (production), 8.2.02M (test), Windows 10, all outputs.
 
Posts: 1113 | Location: USA | Registered: January 27, 2015Report This Post
Expert
posted Hide Post
What was the solution on this, summary?

Do it have anything to do with the access limited by filters messages as seen in CoolGuy's Fri Feb 05 2016 14:16 post?




   In FOCUS Since 1983 ~ from FOCUS to WebFOCUS.
   Current: WebFOCUS Administrator at FIS Worldpay | 8204, 8206
 
Posts: 3132 | Location: Tennessee, Nashville area | Registered: February 23, 2005Report This Post
  Powered by Social Strata Page 1 2  

Read-Only Read-Only Topic

Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     [SOLVED]A way to move the 'ALL' option down the list of a dyn. populated drop-down...

Copyright © 1996-2020 Information Builders