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     [CLOSED] Variable Assignment

Read-Only Read-Only Topic
Go
Search
Notify
Tools
[CLOSED] Variable Assignment
 Login/Join
 
Platinum Member
posted
Hi,

Below is part of my FEX code.

-SET &ACCESS=&REVOKE.().REVOKE.;
-SET &VERBOBJ = STRREP(&ACCESS.LENGTH, &ACCESS, 4,' AND ', 1, ',', &ACCESS.LENGTH, A4109);
-TYPE &VERBOBJ

&REVOKE will get almost 1000 user id from a list box under HTML page. It is from multiselect list box AND will be appended to each user id. i use strrep to replace all AND with , (comma).

While printing the value from &VEROBJ nothing is displayed.
My String length becomes 15100
Below is result from HTML,
  
-SET &ACCESS='002' AND '003' AND '00G' AND '01K' AND '020' AND '03B' AND '03D' AND '047' AND '04A' AND '04N' AND '04T' AND '04U' AND '04V' AND '065' AND '06A' AND '06Q' AND '07E' AND '07F' AND '07Z' AND '08X' AND '0A7' AND '0AE' AND '0BD' AND '0BE' AND '0BR' AND '0CR' AND '0CZ' AND '0D0' AND '0D2' AND '0DQ' AND '0DS' AND '0DT' AND '0E1' AND '0E4' AND '0EB' AND '0EN' AND '0EP' AND '0FM' AND '0G7' AND '0G9' AND '0GA' AND '0GF' AND '0GV' AND '0HA' AND '0HH' AND '0HR' AND '0HY' AND '0J2' AND '0J8' AND '0JB' AND '0JQ' AND '0JS' AND '0JT' AND '0JW' AND '0JX' AND '0K4' AND '0KW' AND '0M5' AND '0M6' AND '0MH' AND '0NC' AND '0NR' AND '0NV' AND '0P4' AND '0PS' AND '0PT' AND '0Q1' AND '0Q2' AND '0Q3' AND '0Q4' AND '0Q5' AND '0Q6' AND '0Q7' AND '0Q8' AND '0QM' AND '0RA' AND '0S8' AND '0W9' AND '0WT' AND '0WU' AND '0WX' AND '0WZ' AND '0X1' AND '0X4' AND '0X5' AND '0X9' AND '0XA' AND '0XJ' AND '0XK' AND '0XM' AND '0XN' AND '0XP' AND '0XQ' AND '0XV' AND '0XW' AND '0XX' AND '0Y3' AND '0Y7' AND '0Y8' AND '0YA' AND '0YE' AND '0ZC' AND '0ZJ' AND '0ZM' AND '10M' AND '10T' AND '10Y' AND '11D' AND '12M' AND '12T' AND '12V' AND '15N' AND '18D' AND '18X' AND '19A' AND '19S' AND '1FM' AND '1G9' AND '1GD' AND '1GF' AND '1GY' AND '1H6' AND '1JS' AND '1K8' AND '1KR' AND '1KZ' AND '1M8' AND '1MX' AND '1NT' AND '1NW' AND '1NX' AND '1P6' AND '1P7' AND '1P9' AND '1PC' AND '1PJ' AND '1PX' AND '1Q3' AND '1Q6' AND '1QC' AND '1QX' AND '1RU' AND '1RW' AND '1TW' AND '1UU' AND '1UW' AND '1V0' AND '1V5' AND '1VG' AND '1VH' AND '1VN' AND '1VP' AND '1VT' AND '1VX' AND '1WN' AND '1X1' AND '1X4' AND '1XU' AND '1ZC' AND '1ZD' AND '1ZQ' AND '1ZU' AND '20D' AND '20E' AND '20Q' AND '20W' AND '21A' AND '21N' AND '232' AND '23F' AND '23X' AND '24G' AND '24U' AND '26B' AND '26E' AND '26M' AND '26U' AND '26V' AND '26W' AND '27T' AND '2A6' AND '2A9' AND '2AJ' AND '2AT' AND '2BC' AND '2C0' AND '2C1' AND '2CF' AND '2D8' AND '2DR' AND '2DT' AND '2DU' AND '2DV' AND '2E8' AND '2EC' AND '2EM' AND '2FG' AND '2FH' AND '2H9' AND '2HQ' AND '2HW' AND '2JC' AND '2JF' AND '2JG' AND '2K9' AND '2KF' AND '2KK' AND '2KM' AND '2KP' AND '2M7' AND '2ME' AND '2MN' AND '2MZ' AND '2NX' AND '2NY' AND '2P0' AND '2PF' AND '2PH' AND '2PJ' AND '2PK' AND '2QY' AND '2R2' AND '2R8' AND '2R9' AND '2RA' AND '2RB' AND '2RC' AND '2RV' AND '2TB' AND '2TV' AND '2U8' AND '2UA' AND '2UB' AND '2UP' AND '2VF' AND '2VM' AND '2WB' AND '2XB' AND '2Y2' AND '2Y3' AND '300' AND '309' AND '30N' AND '30U' AND '314' AND '317' AND '31P' AND '321' AND '322' AND '323' AND '324' AND '325' AND '32J' AND '32K' AND '32M' AND '32N' AND '32P' AND '32R' AND '32T' AND '32U' AND '32V' AND '337' AND '34D' AND '34H' AND '35E' AND '35F' AND '35R' AND '36B' AND '36C' AND '36E' AND '36F' AND '37R' AND '385' AND '3CC' AND '3CG' AND '3CW' AND '3EC' AND '3FH' AND '3GF' AND '3GG' AND '3GH' AND '3GJ' AND '3H9' AND '3HW' AND '3HX' AND '3JT' AND '3K8' AND '3K9' AND '3M0' AND '3N9' AND '3PC' AND '3PD' AND '3PG' AND '3PZ' AND '3Q6' AND '3QW' AND '3RK' AND '3RY' AND '3TV' AND '3U8' AND '3V9' AND '3VY' AND '3VZ' AND '3W4' AND '3W5' AND '3WE' AND '3X1' AND '3X9' AND '3Y5' AND '3Y7' AND '3YZ' AND '3ZG' AND '41Z' AND '43A' AND '44N' AND '45Z' AND '47P' AND '49Y' AND '4AA' AND '4DM' AND '4EE' AND '4EY' AND '4F2' AND '4JB' AND '4KD' AND '4KW' AND '4KX' AND '4N2' AND '4NZ' AND '4PT' AND '4RE' AND '4T5' AND '4UW' AND '4V5' AND '4V6' AND '4VP' AND '4YE' AND '4YX' AND '4YZ' AND '501' AND '503' AND '506' AND '50D' AND '50E' AND '50F' AND '50H' AND '50M' AND '50N' AND '50Q' AND '50U' AND '50X' AND '510' AND '511' AND '513' AND '514' AND '515' AND '517' AND '518' AND '519' AND '51A' AND '51E' AND '51F' AND '51P' AND '51R' AND '51V' AND '51Z' AND '521' AND '522' AND '523' AND '527' AND '528' AND '52K' AND '53B' AND '53V' AND '53W' AND '53X' AND '53Y' AND '54B' AND '559' AND '55R' AND '55Y' AND '57F' AND '57P' AND '58M' AND '58R' AND '58U' AND '5AH' AND '5B6' AND '5B9' AND '5BD' AND '5BR' AND '5CM' AND '5CR' AND '5CW' AND '5D0' AND '5D1' AND '5DF' AND '5DG' AND '5DK' AND '5DL' AND '5DZ' AND '5EZ' AND '5F0' AND '5F1' AND '5F4' AND '5F7' AND '5F8' AND '5F9' AND '5FB' AND '5FG' AND '5FJ' AND '5FU' AND '5FV' AND '5G0' AND '5G2' AND '5G4' AND '5G5' AND '5G6' AND '5G8' AND '5GB' AND '5GP' AND '5GU' AND '5GZ' AND '5H0' AND '5H8' AND '5H9' AND '5HD' AND '5HH' AND '5HN' AND '5HZ' AND '5J1' AND '5J2' AND '5J7' AND '5J9' AND '5JF' AND '5JL' AND '5JY' AND '5KC' AND '5LW' AND '5MT' AND '5NJ' AND '5NN' AND '5NV' AND '5PV' AND '5PW' AND '5PZ' AND '5Q3' AND '5Q6' AND '5QJ' AND '5QX' AND '5QZ' AND '5R5' AND '5R8' AND '5RD' AND '5RG' AND '5S1' AND '5SB';
-SET &VERBOBJ = STRREP(4109, '002' AND '003' AND '00G' AND '01K' AND '020' AND '03B' AND '03D' AND '047' AND '04A' AND '04N' AND '04T' AND '04U' AND '04V' AND '065' AND '06A' AND '06Q' AND '07E' AND '07F' AND '07Z' AND '08X' AND '0A7' AND '0AE' AND '0BD' AND '0BE' AND '0BR' AND '0CR' AND '0CZ' AND '0D0' AND '0D2' AND '0DQ' AND '0DS' AND '0DT' AND '0E1' AND '0E4' AND '0EB' AND '0EN' AND '0EP' AND '0FM' AND '0G7' AND '0G9' AND '0GA' AND '0GF' AND '0GV' AND '0HA' AND '0HH' AND '0HR' AND '0HY' AND '0J2' AND '0J8' AND '0JB' AND '0JQ' AND '0JS' AND '0JT' AND '0JW' AND '0JX' AND '0K4' AND '0KW' AND '0M5' AND '0M6' AND '0MH' AND '0NC' AND '0NR' AND '0NV' AND '0P4' AND '0PS' AND '0PT' AND '0Q1' AND '0Q2' AND '0Q3' AND '0Q4' AND '0Q5' AND '0Q6' AND '0Q7' AND '0Q8' AND '0QM' AND '0RA' AND '0S8' AND '0W9' AND '0WT' AND '0WU' AND '0WX' AND '0WZ' AND '0X1' AND '0X4' AND '0X5' AND '0X9' AND '0XA' AND '0XJ' AND '0XK' AND '0XM' AND '0XN' AND '0XP' AND '0XQ' AND '0XV' AND '0XW' AND '0XX' AND '0Y3' AND '0Y7' AND '0Y8' AND '0YA' AND '0YE' AND '0ZC' AND '0ZJ' AND '0ZM' AND '10M' AND '10T' AND '10Y' AND '11D' AND '12M' AND '12T' AND '12V' AND '15N' AND '18D' AND '18X' AND '19A' AND '19S' AND '1FM' AND '1G9' AND '1GD' AND '1GF' AND '1GY' AND '1H6' AND '1JS' AND '1K8' AND '1KR' AND '1KZ' AND '1M8' AND '1MX' AND '1NT' AND '1NW' AND '1NX' AND '1P6' AND '1P7' AND '1P9' AND '1PC' AND '1PJ' AND '1PX' AND '1Q3' AND '1Q6' AND '1QC' AND '1QX' AND '1RU' AND '1RW' AND '1TW' AND '1UU' AND '1UW' AND '1V0' AND '1V5' AND '1VG' AND '1VH' AND '1VN' AND '1VP' AND '1VT' AND '1VX' AND '1WN' AND '1X1' AND '1X4' AND '1XU' AND '1ZC' AND '1ZD' AND '1ZQ' AND '1ZU' AND '20D' AND '20E' AND '20Q' AND '20W' AND '21A' AND '21N' AND '232' AND '23F' AND '23X' AND '24G' AND '24U' AND '26B' AND '26E' AND '26M' AND '26U' AND '26V' AND '26W' AND '27T' AND '2A6' AND '2A9' AND '2AJ' AND '2AT' AND '2BC' AND '2C0' AND '2C1' AND '2CF' AND '2D8' AND '2DR' AND '2DT' AND '2DU' AND '2DV' AND '2E8' AND '2EC' AND '2EM' AND '2FG' AND '2FH' AND '2H9' AND '2HQ' AND '2HW' AND '2JC' AND '2JF' AND '2JG' AND '2K9' AND '2KF' AND '2KK' AND '2KM' AND '2KP' AND '2M7' AND '2ME' AND '2MN' AND '2MZ' AND '2NX' AND '2NY' AND '2P0' AND '2PF' AND '2PH' AND '2PJ' AND '2PK' AND '2QY' AND '2R2' AND '2R8' AND '2R9' AND '2RA' AND '2RB' AND '2RC' AND '2RV' AND '2TB' AND '2TV' AND '2U8' AND '2UA' AND '2UB' AND '2UP' AND '2VF' AND '2VM' AND '2WB' AND '2XB' AND '2Y2' AND '2Y3' AND '300' AND '309' AND '30N' AND '30U' AND '314' AND '317' AND '31P' AND '321' AND '322' AND '323' AND '324' AND '325' AND '32J' AND '32K' AND '32M' AND '32N' AND '32P' AND '32R' AND '32T' AND '32U' AND '32V' AND '337' AND '34D' AND '34H' AND '35E' AND '35F' AND '35R' AND '36B' AND '36C' AND '36E' AND '36F' AND '37R' AND '385' AND '3CC' AND '3CG' AND '3CW' AND '3EC' AND '3FH' AND '3GF' AND '3GG' AND '3GH' AND '3GJ' AND '3H9' AND '3HW' AND '3HX' AND '3JT' AND '3K8' AND '3K9' AND '3M0' AND '3N9' AND '3PC' AND '3PD' AND '3PG' AND '3PZ' AND '3Q6' AND '3QW' AND '3RK' AND '3RY' AND '3TV' AND '3U8' AND '3V9' AND '3VY' AND '3VZ' AND '3W4' AND '3W5' AND '3WE' AND '3X1' AND '3X9' AND '3Y5' AND '3Y7' AND '3YZ' AND '3ZG' AND '41Z' AND '43A' AND '44N' AND '45Z' AND '47P' AND '49Y' AND '4AA' AND '4DM' AND '4EE' AND '4EY' AND '4F2' AND '4JB' AND '4KD' AND '4KW' AND '4KX' AND '4N2' AND '4NZ' AND '4PT' AND '4RE' AND '4T5' AND '4UW' AND '4V5' AND '4V6' AND '4VP' AND '4YE' AND '4YX' AND '4YZ' AND '501' AND '503' AND '506' AND '50D' AND '50E' AND '50F' AND '50H' AND '50M' AND '50N' AND '50Q' AND '50U' AND '50X' AND '510' AND '511' AND '513' AND '514' AND '515' AND '517' AND '518' AND '519' AND '51A' AND '51E' AND '51F' AND '51P' AND '51R' AND '51V' AND '51Z' AND '521' AND '522' AND '523' AND '527' AND '528' AND '52K' AND '53B' AND '53V' AND '53W' AND '53X' AND '53Y' AND '54B' AND '559' AND '55R' AND '55Y' AND '57F' AND '57P' AND '58M' AND '58R' AND '58U' AND '5AH' AND '5B6' AND '5B9' AND '5BD' AND '5BR' AND '5CM' AND '5CR' AND '5CW' AND '5D0' AND '5D1' AND '5DF' AND '5DG' AND '5DK' AND '5DL' AND '5DZ' AND '5EZ' AND '5F0' AND '5F1' AND '5F4' AND '5F7' AND '5F8' AND '5F9' AND '5FB' AND '5FG' AND '5FJ' AND '5FU' AND '5FV' AND '5G0' AND '5G2' AND '5G4' AND '5G5' AND '5G6' AND '5G8' AND '5GB' AND '5GP' AND '5GU' AND '5GZ' AND '5H0' AND '5H8' AND '5H9' AND '5HD' AND '5HH' AND '5HN' AND '5HZ' AND '5J1' AND '5J2' AND '5J7' AND '5J9' AND '5JF' AND '5JL' AND '5JY' AND '5KC' AND '5LW' AND '5MT' AND '5NJ' AND '5NN' AND '5NV' AND '5PV' AND '5PW' AND '5PZ' AND '5Q3' AND '5Q6' AND '5QJ' AND '5QX' AND '5QZ' AND '5R5' AND '5R8' AND '5RD' AND '5RG' AND '5S1' AND '5SB', 4,' AND ', 1, ',', 4109, A4109);
-TYPE





Thanks,

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


WebFocus-8/Windows/HTML, PDF, EXCEL
 
Posts: 106 | Registered: September 20, 2010Report This Post
Expert
posted Hide Post
What do you get when you add the following code:
-TPYE *** &ACCESS ***
-TYPE *** &VERBOBJ ***
?

You probable want to use IN FILE instead...

Also, please place any code within the brackets shown above this edit box.
 
Posts: 3132 | Location: Tennessee, Nashville area | Registered: February 23, 2005Report This Post
Platinum Member
posted Hide Post
Hi Doug,
here is my code
-SET &DEMO_MIDO_LEN = &DEMO_MIDO.LENGTH;
-SET &DEMO_MIDO_N = STRREP(&DEMO_MIDO_LEN,'&DEMO_MIDO.EVAL',5,' AND ',3,''',''',&DEMO_MIDO_LEN,'A&DEMO_MIDO_LEN.EVAL');
 


here is the Output

-SET &DEMO_MIDO_LEN = 15031;
-SET &DEMO_MIDO_N = STRREP(15031,'8027376279 AND 8027376212 AND 8027376220 AND 8027376220 AND 8027376220 AND 8027376584 AND 8027376584 AND 8027376188 AND 8027378564 AND 8027376212 AND 8027376188 AND 8027376279 AND 8027376584 AND 8027378549 AND 8027378564 AND 8027163354 AND 8027163354 AND 8027163354 AND 8027811432 AND 8027378580 AND 8027378663 AND 8027378630 AND 8027378580 AND 8027378663 AND 8027378630 AND 8027378549 AND 8027163354 AND 8027376584 AND 8019182131 AND 8019181737 AND 8019181745 AND 8019182248 AND 8019181760 AND 8019182792 AND 8019181786 AND 8019181810 AND 8019181901 AND 8019181950 AND 8019182826 AND 8019182834 AND 8019182131 AND 8019184707 AND 8023921607 AND 8023921607 AND 8022965571 AND 8023921607 AND 8019182131 AND 8022962990 AND 8019181760 AND 8019181786 AND 8019181737 AND 8019181810 AND 8019181745 AND 8019184707 AND 8019182834 AND 8019182826 AND 8019181950 AND 8019181901 AND 8019182834 AND 8019181901 AND 8019181760 AND 8019182826 AND 8023921607 AND 8019182248 AND 8019184707 AND 8019184707 AND 8019182792 AND 8019182826 AND 8019184707 AND 8019184707 AND 8022963048 AND 8019182248 AND 8019182834 AND 8012080837 AND 8012080936 AND 8012080852 AND 8012080852 AND 8012080837 AND 8012080837 AND 8015558847 AND 8022434123 AND 8012080936 AND 8016727904 AND 8012080837 AND 8016727904 AND 8022111036 AND 8015558847 AND 8022673498 AND 8018538069 AND 8028242249 AND 8028242249 AND 8008108113 AND 8019025124 AND 8006596673 AND 8028713199 AND 8028713199 AND 8027738106 AND 960500430137 AND 8014414604 AND 8028952078 AND 8003896753 AND 8028942541 AND 8028942541 AND 8028942541 AND 8028942541 AND 8028942541 AND 8028942541 AND 8028942541 AND 8028854571 AND 8028854571 AND 8023955662 AND 8023353876 AND 8027800104 AND 8008169537 AND 8010991274 AND 8028702713 AND 8028952078 AND 8028856386 AND 8028856386 AND 8028628850 AND 8018477730 AND 8011424283 AND 8011424283 AND 8028571936 AND 8021070035 AND 8021070035 AND 8012233048 AND 8028591322 AND 8022233756 AND 8028548090 AND 8028548090 AND 8022233756 AND 8028592643 AND 8028534330 AND 8028548090 AND 8023548756 AND 8023548756 AND 8023548756 AND 960500210331 AND 8028244690 AND 8028595588 AND 8028595588 AND 8028599655 AND 8027217838 AND 8028567173 AND 8028595588 AND 8027217838 AND 8028706342 AND 8028751496 AND 8028751496 AND 8028751439 AND 8028751439 AND 8028751470 AND 8028751470 AND 8028691122 AND 8028796905 AND 8028755745 AND 8028755745 AND 8028755745 AND 8028755745 AND 8010880840 AND 8006784600 AND 8028686981 AND 8028686981 AND 8028699372 AND 8028595588 AND 8028653395 AND 8028595588 AND 8028595588 AND 8015234282 AND 960500357314 AND 8028592643 AND 8028545823 AND 8028548090 AND 8028548090 AND 8028538943 AND 8028558537 AND 8013704997 AND 8028548090 AND 8028548090 AND 8028548090 AND 8028548090 AND 8024199385 AND 8028538943 AND 8021669000 AND 8028592643 AND 8028548090 AND 8028592643 AND 8028592643 AND 8023807764 AND 8024014642 AND 8028942715 AND 8028942715 AND 8028702713 AND 8028702713 AND 8027977746 AND 8085999012 AND 8012518745 AND 8012057181 AND 8012204577 AND 8028742792 AND 8022909421 AND 8024046651 AND 8027406092 AND 8027810178 AND 8028277484 AND 8027520314 AND 8013024412 AND 8013024412 AND 8027520314 AND 8028569138 AND 8028435710 AND 8028568312 AND 8028568692 AND 8028706342 AND 8028591322 AND 8028584616 AND 8028558537 AND 8028584616 AND 8028548090 AND 8028548090 AND 8028548090 AND 8022332756 AND 8022332756 AND 8027650251 AND 8027650251 AND 8023223665 AND 8013823128 AND 8013070142 AND 8016552104 AND 8016552104 AND 8013202554 AND 8011820639 AND 8015679775 AND 8008266853 AND 8008108113 AND 8016834379 AND 8023160206 AND 8028742792 AND 8028742792 AND 8012203249 AND 8012233048 AND 8012233048 AND 8019294571 AND 8019294571 AND 8028569328 AND 8028599655 AND 8010056672 AND 8028706375 AND 8028706375 AND 8028706292 AND 8028058637 AND 8028058637 AND 8028058637 AND 8028625294 AND 8028706375 AND 8028821034 AND 8016834379 AND 8022382066 AND 8022382066 AND 8028244690 AND 8028290586 AND 8028290586 AND 8028706375 AND 8028706375 AND 8028706292 AND 8028706292 AND 960500293931 AND 8028058637 AND 8028058637 AND 8023551982 AND 8023551982 AND 8024074406 AND 8024074406 AND 8024074406 AND 8026787542 AND 8026837545 AND 8023357299 AND 8026787989 AND 8027738106 AND 8027738106 AND 8020542414 AND 8028194242 AND 8028194242 AND 8028595588 AND 8001731986 AND 8016540927 AND 8010904061 AND 8013725356 AND 8023871919 AND 8012294164 AND 8013704997 AND 8011976241 AND 8014328861 AND 960500202700 AND 960500052758 AND 8028595588 AND 8028599655 AND 8028595588 AND 8028595588 AND 8028647025 AND 8028647025 AND 8028643495 AND 8028450933 AND 8028568312 AND 8028518168 AND 8028518168 AND 8028595588 AND 8028599655 AND 8028242249 AND 8028242249 AND 8023357299 AND 8023357299 AND 8011510842 AND 8011510842 AND 8028881319 AND 8028881319 AND 8028881319 AND 8015155560 AND 8015155560 AND 8018394646 AND 8018394646 AND 8018394646 AND 8018394646 AND 8018394646 AND 8018394646 AND 8018394646 AND 8022909421 AND 8022909421 AND 8022909421 AND 8028749250 AND 8028749250 AND 8023187258 AND 8012846948 AND 8010113101 AND 8012850585 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028703638 AND 8028703638 AND 8028706342 AND 8028706342 AND 8022854593 AND 8022854593 AND 8023055760 AND 8023055760 AND 8028686981 AND 8028704172 AND 8011630103 AND 8024522487 AND 8024522487 AND 8024522487 AND 8027006892 AND 8024522487 AND 8024522487 AND 8024522487 AND 8023978169 AND 8023978169 AND 8026877004 AND 8028706375 AND 8028706292 AND 8028827718 AND 8022685898 AND 8022685898 AND 8023055760 AND 8016506365 AND 8028691122 AND 8028691122 AND 8028702879 AND 8028599655 AND 8028599655 AND 8028728700 AND 8028728700 AND 8011411355 AND 8028704172 AND 8028907908 AND 8028902404 AND 8028902404 AND 8028902404 AND 8028902404 AND 8028902404 AND 8008033097 AND 8014801602 AND 8002219627 AND 8014394046 AND 960500010228 AND 960500351903 AND 960500591979 AND 8008071394 AND 8028628850 AND 8011411355 AND 8028905845 AND 8028905845 AND 8010001082 AND 8013406932 AND 8028922923 AND 8013024412 AND 8021521342 AND 8023963260 AND 8027697013 AND 8023241311 AND 8023958070 AND 8013823128 AND 8006757879 AND 8012850585 AND 8006557220 AND 8012846948 AND 8023427324 AND 8023427431 AND 8027508699 AND 8022257862 AND 8023066825 AND 8024392204 AND 8027406092 AND 8027520314 AND 8027520314 AND 8026823628 AND 8026823628 AND 8023827150 AND 8023160206 AND 8021073930 AND 8022603149 AND 8014888518 AND 8014888518 AND 8020942853 AND 8020652577 AND 8028854522 AND 8028776717 AND 8018737133 AND 8028760570 AND 8015750022 AND 8015750022 AND 8028568692 AND 8028568692 AND 8020768167 AND 8028706375 AND 8028706375 AND 8028706375 AND 8027151086 AND 8027255119 AND 8027286387 AND 8027286387 AND 8027286387 AND 8027286387 AND 8014560703 AND 8011948075 AND 8011381186 AND 8008274063 AND 8015154506 AND 8012902139 AND 8011903435 AND 8013914976 AND 8027005076 AND 8013757011 AND 8022230828 AND 8028706250 AND 8014396082 AND 8028242249 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8014394061 AND 8014490612 AND 8028290586 AND 8028897398 AND 8028897398 AND 8023146049 AND 8023146049 AND 8023329082 AND 8027376279 AND 8027376212 AND 8027376220 AND 8027376220 AND 8027376220 AND 8027376584 AND 8027376584 AND 8027376188 AND 8027378564 AND 8027376212 AND 8027376188 AND 8027376279 AND 8027376584 AND 8027378549 AND 8027378564 AND 8027163354 AND 8027163354 AND 8027163354 AND 8027811432 AND 8027378580 AND 8027378663 AND 8027378630 AND 8027378580 AND 8027378663 AND 8027378630 AND 8027378549 AND 8027163354 AND 8027376584 AND 8019182131 AND 8019181737 AND 8019181745 AND 8019182248 AND 8019181760 AND 8019182792 AND 8019181786 AND 8019181810 AND 8019181901 AND 8019181950 AND 8019182826 AND 8019182834 AND 8019182131 AND 8019184707 AND 8023921607 AND 8023921607 AND 8022965571 AND 8023921607 AND 8019182131 AND 8022962990 AND 8019181760 AND 8019181786 AND 8019181737 AND 8019181810 AND 8019181745 AND 8019184707 AND 8019182834 AND 8019182826 AND 8019181950 AND 8019181901 AND 8019182834 AND 8019181901 AND 8019181760 AND 8019182826 AND 8023921607 AND 8019182248 AND 8019184707 AND 8019184707 AND 8019182792 AND 8019182826 AND 8019184707 AND 8019184707 AND 8022963048 AND 8019182248 AND 8019182834 AND 8012080837 AND 8012080936 AND 8012080852 AND 8012080852 AND 8012080837 AND 8012080837 AND 8015558847 AND 8022434123 AND 8012080936 AND 8016727904 AND 8012080837 AND 8016727904 AND 8022111036 AND 8015558847 AND 8022673498 AND 8018538069 AND 8028242249 AND 8028242249 AND 8008108113 AND 8019025124 AND 8006596673 AND 8028713199 AND 8028713199 AND 8027738106 AND 960500430137 AND 8014414604 AND 8028952078 AND 8003896753 AND 8028942541 AND 8028942541 AND 8028942541 AND 8028942541 AND 8028942541 AND 8028942541 AND 8028942541 AND 8028854571 AND 8028854571 AND 8023955662 AND 8023353876 AND 8027800104 AND 8008169537 AND 8010991274 AND 8028702713 AND 8028952078 AND 8028856386 AND 8028856386 AND 8028628850 AND 8018477730 AND 8011424283 AND 8011424283 AND 8028571936 AND 8021070035 AND 8021070035 AND 8012233048 AND 8028591322 AND 8022233756 AND 8028548090 AND 8028548090 AND 8022233756 AND 8028592643 AND 8028534330 AND 8028548090 AND 8023548756 AND 8023548756 AND 8023548756 AND 960500210331 AND 8028244690 AND 8028595588 AND 8028595588 AND 8028599655 AND 8027217838 AND 8028567173 AND 8028595588 AND 8027217838 AND 8028706342 AND 8028751496 AND 8028751496 AND 8028751439 AND 8028751439 AND 8028751470 AND 8028751470 AND 8028691122 AND 8028796905 AND 8028755745 AND 8028755745 AND 8028755745 AND 8028755745 AND 8010880840 AND 8006784600 AND 8028686981 AND 8028686981 AND 8028699372 AND 8028595588 AND 8028653395 AND 8028595588 AND 8028595588 AND 8015234282 AND 960500357314 AND 8028592643 AND 8028545823 AND 8028548090 AND 8028548090 AND 8028538943 AND 8028558537 AND 8013704997 AND 8028548090 AND 8028548090 AND 8028548090 AND 8028548090 AND 8024199385 AND 8028538943 AND 8021669000 AND 8028592643 AND 8028548090 AND 8028592643 AND 8028592643 AND 8023807764 AND 8024014642 AND 8028942715 AND 8028942715 AND 8028702713 AND 8028702713 AND 8027977746 AND 8085999012 AND 8012518745 AND 8012057181 AND 8012204577 AND 8028742792 AND 8022909421 AND 8024046651 AND 8027406092 AND 8027810178 AND 8028277484 AND 8027520314 AND 8013024412 AND 8013024412 AND 8027520314 AND 8028569138 AND 8028435710 AND 8028568312 AND 8028568692 AND 8028706342 AND 8028591322 AND 8028584616 AND 8028558537 AND 8028584616 AND 8028548090 AND 8028548090 AND 8028548090 AND 8022332756 AND 8022332756 AND 8027650251 AND 8027650251 AND 8023223665 AND 8013823128 AND 8013070142 AND 8016552104 AND 8016552104 AND 8013202554 AND 8011820639 AND 8015679775 AND 8008266853 AND 8008108113 AND 8016834379 AND 8023160206 AND 8028742792 AND 8028742792 AND 8012203249 AND 8012233048 AND 8012233048 AND 8019294571 AND 8019294571 AND 8028569328 AND 8028599655 AND 8010056672 AND 8028706375 AND 8028706375 AND 8028706292 AND 8028058637 AND 8028058637 AND 8028058637 AND 8028625294 AND 8028706375 AND 8028821034 AND 8016834379 AND 8022382066 AND 8022382066 AND 8028244690 AND 8028290586 AND 8028290586 AND 8028706375 AND 8028706375 AND 8028706292 AND 8028706292 AND 960500293931 AND 8028058637 AND 8028058637 AND 8023551982 AND 8023551982 AND 8024074406 AND 8024074406 AND 8024074406 AND 8026787542 AND 8026837545 AND 8023357299 AND 8026787989 AND 8027738106 AND 8027738106 AND 8020542414 AND 8028194242 AND 8028194242 AND 8028595588 AND 8001731986 AND 8016540927 AND 8010904061 AND 8013725356 AND 8023871919 AND 8012294164 AND 8013704997 AND 8011976241 AND 8014328861 AND 960500202700 AND 960500052758 AND 8028595588 AND 8028599655 AND 8028595588 AND 8028595588 AND 8028647025 AND 8028647025 AND 8028643495 AND 8028450933 AND 8028568312 AND 8028518168 AND 8028518168 AND 8028595588 AND 8028599655 AND 8028242249 AND 8028242249 AND 8023357299 AND 8023357299 AND 8011510842 AND 8011510842 AND 8028881319 AND 8028881319 AND 8028881319 AND 8015155560 AND 8015155560 AND 8018394646 AND 8018394646 AND 8018394646 AND 8018394646 AND 8018394646 AND 8018394646 AND 8018394646 AND 8022909421 AND 8022909421 AND 8022909421 AND 8028749250 AND 8028749250 AND 8023187258 AND 8012846948 AND 8010113101 AND 8012850585 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028703638 AND 8028703638 AND 8028706342 AND 8028706342 AND 8022854593 AND 8022854593 AND 8023055760 AND 8023055760 AND 8028686981 AND 8028704172 AND 8011630103 AND 8024522487 AND 8024522487 AND 8024522487 AND 8027006892 AND 8024522487 AND 8024522487 AND 8024522487 AND 8023978169 AND 8023978169 AND 8026877004 AND 8028706375 AND 8028706292 AND 8028827718 AND 8022685898 AND 8022685898 AND 8023055760 AND 8016506365 AND 8028691122 AND 8028691122 AND 8028702879 AND 8028599655 AND 8028599655 AND 8028728700 AND 8028728700 AND 8011411355 AND 8028704172 AND 8028907908 AND 8028902404 AND 8028902404 AND 8028902404 AND 8028902404 AND 8028902404 AND 8008033097 AND 8014801602 AND 8002219627 AND 8014394046 AND 960500010228 AND 960500351903 AND 960500591979 AND 8008071394 AND 8028628850 AND 8011411355 AND 8028905845 AND 8028905845 AND 8010001082 AND 8013406932 AND 8028922923 AND 8013024412 AND 8021521342 AND 8023963260 AND 8027697013 AND 8023241311 AND 8023958070 AND 8013823128 AND 8006757879 AND 8012850585 AND 8006557220 AND 8012846948 AND 8023427324 AND 8023427431 AND 8027508699 AND 8022257862 AND 8023066825 AND 8024392204 AND 8027406092 AND 8027520314 AND 8027520314 AND 8026823628 AND 8026823628 AND 8023827150 AND 8023160206 AND 8021073930 AND 8022603149 AND 8014888518 AND 8014888518 AND 8020942853 AND 8020652577 AND 8028854522 AND 8028776717 AND 8018737133 AND 8028760570 AND 8015750022 AND 8015750022 AND 8028568692 AND 8028568692 AND 8020768167 AND 8028706375 AND 8028706375 AND 8028706375 AND 8027151086 AND 8027255119 AND 8027286387 AND 8027286387 AND 8027286387 AND 8027286387 AND 8014560703 AND 8011948075 AND 8011381186 AND 8008274063 AND 8015154506 AND 8012902139 AND 8011903435 AND 8013914976 AND 8027005076 AND 8013757011 AND 8022230828 AND 8028706250 AND 8014396082 AND 8028242249 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8014394061 AND 8014490612 AND 8028290586 AND 8028897398 AND 8028897398 AND 8023146049 AND 8023146049 AND 8023329082',5,' AND ',3,''',''',15031,'A15031');


in the where condition, huge blank with single codes
WHERE MID IN ('
')

Thanks,


WebFocus-8/Windows/HTML, PDF, EXCEL
 
Posts: 106 | Registered: September 20, 2010Report This Post
Platinum Member
posted Hide Post
Hi Francis,
is their any way that I can pass string(has 15100 length)?

Any help on this will be really appreciated!

Thanks

This message has been edited. Last edited by: Krishna.edara,


WebFocus-8/Windows/HTML, PDF, EXCEL
 
Posts: 106 | Registered: September 20, 2010Report This Post
Platinum Member
posted Hide Post
Any one has any idea to accomplish this?


WebFocus-8/Windows/HTML, PDF, EXCEL
 
Posts: 106 | Registered: September 20, 2010Report This Post
Virtuoso
posted Hide Post
Well, you could try this approach:
FILEDEF OUT DISK APPFOLDER/VALUES.TXT
-RUN
-SET &VALUE   = 'START';
-SET &LOOPCNT = 1;
-REPEAT :LOOP WHILE &VALUE NE '';
-SET &VALUE = GETTOK(&DEMO_MIDO, &DEMO_MIDO.LENGTH, &LOOPCNT, ' ', 15, 'A15');
-SET &LOOPCNT = &LOOPCNT + 1;
-IF &VALUE EQ 'AND' THEN GOTO :LOOP;
-WRITE OUT &VALUE
-:LOOP
And then in the where statement you could then say WHERE MID IN FILE OUT (or whatever other filename you choose).


GamP

- Using AS 8.2.01 on Windows 10 - IE11.
in Focus since 1988
 
Posts: 1961 | Location: Netherlands | Registered: September 25, 2007Report This Post
Expert
posted Hide Post
I would agree with GAMP but would advise you to check the number of potential values that you will be passing. If you are extracting from Oracle or MS SQL then there is a maximum of 1000 lookup values permitted within the IN statement that is generated. You have 1000 values in your string but only 248 of them are unique.

It might be better to utilise GAMPs suggestion but use that file as the parent in a JOIN if there is likely to be more than 1000 values.

-SET &DEMO = '8027376279 AND 8027376212 AND 8027376220 AND 8027376220 AND 8027376220 AND 8027376584 AND 8027376584 AND 8027376188 AND 8027378564 AND 8027376212 AND 8027376188 AND '
-          | '8027376279 AND 8027376584 AND 8027378549 AND 8027378564 AND 8027163354 AND 8027163354 AND 8027163354 AND 8027811432 AND 8027378580 AND 8027378663 AND 8027378630 AND '
-          | '8027378580 AND 8027378663 AND 8027378630 AND 8027378549 AND 8027163354 AND 8027376584 AND 8019182131 AND 8019181737 AND 8019181745 AND 8019182248 AND 8019181760 AND '
-          | '8019182792 AND 8019181786 AND 8019181810 AND 8019181901 AND 8019181950 AND 8019182826 AND 8019182834 AND 8019182131 AND 8019184707 AND 8023921607 AND 8023921607 AND '
-          | '8022965571 AND 8023921607 AND 8019182131 AND 8022962990 AND 8019181760 AND 8019181786 AND 8019181737 AND 8019181810 AND 8019181745 AND 8019184707 AND 8019182834 AND '
-          | '8019182826 AND 8019181950 AND 8019181901 AND 8019182834 AND 8019181901 AND 8019181760 AND 8019182826 AND 8023921607 AND 8019182248 AND 8019184707 AND 8019184707 AND '
-          | '8019182792 AND 8019182826 AND 8019184707 AND 8019184707 AND 8022963048 AND 8019182248 AND 8019182834 AND 8012080837 AND 8012080936 AND 8012080852 AND 8012080852 AND '
-          | '8012080837 AND 8012080837 AND 8015558847 AND 8022434123 AND 8012080936 AND 8016727904 AND 8012080837 AND 8016727904 AND 8022111036 AND 8015558847 AND 8022673498 AND '
-          | '8018538069 AND 8028242249 AND 8028242249 AND 8008108113 AND 8019025124 AND 8006596673 AND 8028713199 AND 8028713199 AND 8027738106 AND 960500430137 AND 8014414604 AND '
-          | '8028952078 AND 8003896753 AND 8028942541 AND 8028942541 AND 8028942541 AND 8028942541 AND 8028942541 AND 8028942541 AND 8028942541 AND 8028854571 AND 8028854571 AND '
-          | '8023955662 AND 8023353876 AND 8027800104 AND 8008169537 AND 8010991274 AND 8028702713 AND 8028952078 AND 8028856386 AND 8028856386 AND 8028628850 AND 8018477730 AND '
-          | '8011424283 AND 8011424283 AND 8028571936 AND 8021070035 AND 8021070035 AND 8012233048 AND 8028591322 AND 8022233756 AND 8028548090 AND 8028548090 AND 8022233756 AND '
-          | '8028592643 AND 8028534330 AND 8028548090 AND 8023548756 AND 8023548756 AND 8023548756 AND 960500210331 AND 8028244690 AND 8028595588 AND 8028595588 AND 8028599655 AND '
-          | '8027217838 AND 8028567173 AND 8028595588 AND 8027217838 AND 8028706342 AND 8028751496 AND 8028751496 AND 8028751439 AND 8028751439 AND 8028751470 AND 8028751470 AND '
-          | '8028691122 AND 8028796905 AND 8028755745 AND 8028755745 AND 8028755745 AND 8028755745 AND 8010880840 AND 8006784600 AND 8028686981 AND 8028686981 AND 8028699372 AND '
-          | '8028595588 AND 8028653395 AND 8028595588 AND 8028595588 AND 8015234282 AND 960500357314 AND 8028592643 AND 8028545823 AND 8028548090 AND 8028548090 AND 8028538943 AND '
-          | '8028558537 AND 8013704997 AND 8028548090 AND 8028548090 AND 8028548090 AND 8028548090 AND 8024199385 AND 8028538943 AND 8021669000 AND 8028592643 AND 8028548090 AND '
-          | '8028592643 AND 8028592643 AND 8023807764 AND 8024014642 AND 8028942715 AND 8028942715 AND 8028702713 AND 8028702713 AND 8027977746 AND 8085999012 AND 8012518745 AND '
-          | '8012057181 AND 8012204577 AND 8028742792 AND 8022909421 AND 8024046651 AND 8027406092 AND 8027810178 AND 8028277484 AND 8027520314 AND 8013024412 AND 8013024412 AND '
-          | '8027520314 AND 8028569138 AND 8028435710 AND 8028568312 AND 8028568692 AND 8028706342 AND 8028591322 AND 8028584616 AND 8028558537 AND 8028584616 AND 8028548090 AND '
-          | '8028548090 AND 8028548090 AND 8022332756 AND 8022332756 AND 8027650251 AND 8027650251 AND 8023223665 AND 8013823128 AND 8013070142 AND 8016552104 AND 8016552104 AND '
-          | '8013202554 AND 8011820639 AND 8015679775 AND 8008266853 AND 8008108113 AND 8016834379 AND 8023160206 AND 8028742792 AND 8028742792 AND 8012203249 AND 8012233048 AND '
-          | '8012233048 AND 8019294571 AND 8019294571 AND 8028569328 AND 8028599655 AND 8010056672 AND 8028706375 AND 8028706375 AND 8028706292 AND 8028058637 AND 8028058637 AND '
-          | '8028058637 AND 8028625294 AND 8028706375 AND 8028821034 AND 8016834379 AND 8022382066 AND 8022382066 AND 8028244690 AND 8028290586 AND 8028290586 AND 8028706375 AND '
-          | '8028706375 AND 8028706292 AND 8028706292 AND 960500293931 AND 8028058637 AND 8028058637 AND 8023551982 AND 8023551982 AND 8024074406 AND 8024074406 AND 8024074406 AND '
-          | '8026787542 AND 8026837545 AND 8023357299 AND 8026787989 AND 8027738106 AND 8027738106 AND 8020542414 AND 8028194242 AND 8028194242 AND 8028595588 AND 8001731986 AND '
-          | '8016540927 AND 8010904061 AND 8013725356 AND 8023871919 AND 8012294164 AND 8013704997 AND 8011976241 AND 8014328861 AND 960500202700 AND 960500052758 AND 8028595588 AND '
-          | '8028599655 AND 8028595588 AND 8028595588 AND 8028647025 AND 8028647025 AND 8028643495 AND 8028450933 AND 8028568312 AND 8028518168 AND 8028518168 AND 8028595588 AND '
-          | '8028599655 AND 8028242249 AND 8028242249 AND 8023357299 AND 8023357299 AND 8011510842 AND 8011510842 AND 8028881319 AND 8028881319 AND 8028881319 AND 8015155560 AND '
-          | '8015155560 AND 8018394646 AND 8018394646 AND 8018394646 AND 8018394646 AND 8018394646 AND 8018394646 AND 8018394646 AND 8022909421 AND 8022909421 AND 8022909421 AND '
-          | '8028749250 AND 8028749250 AND 8023187258 AND 8012846948 AND 8010113101 AND 8012850585 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND '
-          | '8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028703638 AND 8028703638 AND 8028706342 AND '
-          | '8028706342 AND 8022854593 AND 8022854593 AND 8023055760 AND 8023055760 AND 8028686981 AND 8028704172 AND 8011630103 AND 8024522487 AND 8024522487 AND 8024522487 AND '
-          | '8027006892 AND 8024522487 AND 8024522487 AND 8024522487 AND 8023978169 AND 8023978169 AND 8026877004 AND 8028706375 AND 8028706292 AND 8028827718 AND 8022685898 AND '
-          | '8022685898 AND 8023055760 AND 8016506365 AND 8028691122 AND 8028691122 AND 8028702879 AND 8028599655 AND 8028599655 AND 8028728700 AND 8028728700 AND 8011411355 AND '
-          | '8028704172 AND 8028907908 AND 8028902404 AND 8028902404 AND 8028902404 AND 8028902404 AND 8028902404 AND 8008033097 AND 8014801602 AND 8002219627 AND 8014394046 AND '
-          | '960500010228 AND 960500351903 AND 960500591979 AND 8008071394 AND 8028628850 AND 8011411355 AND 8028905845 AND 8028905845 AND 8010001082 AND 8013406932 AND 8028922923 AND '
-          | '8013024412 AND 8021521342 AND 8023963260 AND 8027697013 AND 8023241311 AND 8023958070 AND 8013823128 AND 8006757879 AND 8012850585 AND 8006557220 AND 8012846948 AND '
-          | '8023427324 AND 8023427431 AND 8027508699 AND 8022257862 AND 8023066825 AND 8024392204 AND 8027406092 AND 8027520314 AND 8027520314 AND 8026823628 AND 8026823628 AND '
-          | '8023827150 AND 8023160206 AND 8021073930 AND 8022603149 AND 8014888518 AND 8014888518 AND 8020942853 AND 8020652577 AND 8028854522 AND 8028776717 AND 8018737133 AND '
-          | '8028760570 AND 8015750022 AND 8015750022 AND 8028568692 AND 8028568692 AND 8020768167 AND 8028706375 AND 8028706375 AND 8028706375 AND 8027151086 AND 8027255119 AND '
-          | '8027286387 AND 8027286387 AND 8027286387 AND 8027286387 AND 8014560703 AND 8011948075 AND 8011381186 AND 8008274063 AND 8015154506 AND 8012902139 AND 8011903435 AND '
-          | '8013914976 AND 8027005076 AND 8013757011 AND 8022230828 AND 8028706250 AND 8014396082 AND 8028242249 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND '
-          | '8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND '
-          | '8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8014394061 AND 8014490612 AND 8028290586 AND '
-          | '8028897398 AND 8028897398 AND 8023146049 AND 8023146049 AND 8023329082 AND 8027376279 AND 8027376212 AND 8027376220 AND 8027376220 AND 8027376220 AND 8027376584 AND '
-          | '8027376584 AND 8027376188 AND 8027378564 AND 8027376212 AND 8027376188 AND 8027376279 AND 8027376584 AND 8027378549 AND 8027378564 AND 8027163354 AND 8027163354 AND '
-          | '8027163354 AND 8027811432 AND 8027378580 AND 8027378663 AND 8027378630 AND 8027378580 AND 8027378663 AND 8027378630 AND 8027378549 AND 8027163354 AND 8027376584 AND '
-          | '8019182131 AND 8019181737 AND 8019181745 AND 8019182248 AND 8019181760 AND 8019182792 AND 8019181786 AND 8019181810 AND 8019181901 AND 8019181950 AND 8019182826 AND '
-          | '8019182834 AND 8019182131 AND 8019184707 AND 8023921607 AND 8023921607 AND 8022965571 AND 8023921607 AND 8019182131 AND 8022962990 AND 8019181760 AND 8019181786 AND '
-          | '8019181737 AND 8019181810 AND 8019181745 AND 8019184707 AND 8019182834 AND 8019182826 AND 8019181950 AND 8019181901 AND 8019182834 AND 8019181901 AND 8019181760 AND '
-          | '8019182826 AND 8023921607 AND 8019182248 AND 8019184707 AND 8019184707 AND 8019182792 AND 8019182826 AND 8019184707 AND 8019184707 AND 8022963048 AND 8019182248 AND '
-          | '8019182834 AND 8012080837 AND 8012080936 AND 8012080852 AND 8012080852 AND 8012080837 AND 8012080837 AND 8015558847 AND 8022434123 AND 8012080936 AND 8016727904 AND '
-          | '8012080837 AND 8016727904 AND 8022111036 AND 8015558847 AND 8022673498 AND 8018538069 AND 8028242249 AND 8028242249 AND 8008108113 AND 8019025124 AND 8006596673 AND '
-          | '8028713199 AND 8028713199 AND 8027738106 AND 960500430137 AND 8014414604 AND 8028952078 AND 8003896753 AND 8028942541 AND 8028942541 AND 8028942541 AND 8028942541 AND '
-          | '8028942541 AND 8028942541 AND 8028942541 AND 8028854571 AND 8028854571 AND 8023955662 AND 8023353876 AND 8027800104 AND 8008169537 AND 8010991274 AND 8028702713 AND '
-          | '8028952078 AND 8028856386 AND 8028856386 AND 8028628850 AND 8018477730 AND 8011424283 AND 8011424283 AND 8028571936 AND 8021070035 AND 8021070035 AND 8012233048 AND '
-          | '8028591322 AND 8022233756 AND 8028548090 AND 8028548090 AND 8022233756 AND 8028592643 AND 8028534330 AND 8028548090 AND 8023548756 AND 8023548756 AND 8023548756 AND '
-          | '960500210331 AND 8028244690 AND 8028595588 AND 8028595588 AND 8028599655 AND 8027217838 AND 8028567173 AND 8028595588 AND 8027217838 AND 8028706342 AND 8028751496 AND '
-          | '8028751496 AND 8028751439 AND 8028751439 AND 8028751470 AND 8028751470 AND 8028691122 AND 8028796905 AND 8028755745 AND 8028755745 AND 8028755745 AND 8028755745 AND '
-          | '8010880840 AND 8006784600 AND 8028686981 AND 8028686981 AND 8028699372 AND 8028595588 AND 8028653395 AND 8028595588 AND 8028595588 AND 8015234282 AND 960500357314 AND '
-          | '8028592643 AND 8028545823 AND 8028548090 AND 8028548090 AND 8028538943 AND 8028558537 AND 8013704997 AND 8028548090 AND 8028548090 AND 8028548090 AND 8028548090 AND '
-          | '8024199385 AND 8028538943 AND 8021669000 AND 8028592643 AND 8028548090 AND 8028592643 AND 8028592643 AND 8023807764 AND 8024014642 AND 8028942715 AND 8028942715 AND '
-          | '8028702713 AND 8028702713 AND 8027977746 AND 8085999012 AND 8012518745 AND 8012057181 AND 8012204577 AND 8028742792 AND 8022909421 AND 8024046651 AND 8027406092 AND '
-          | '8027810178 AND 8028277484 AND 8027520314 AND 8013024412 AND 8013024412 AND 8027520314 AND 8028569138 AND 8028435710 AND 8028568312 AND 8028568692 AND 8028706342 AND '
-          | '8028591322 AND 8028584616 AND 8028558537 AND 8028584616 AND 8028548090 AND 8028548090 AND 8028548090 AND 8022332756 AND 8022332756 AND 8027650251 AND 8027650251 AND '
-          | '8023223665 AND 8013823128 AND 8013070142 AND 8016552104 AND 8016552104 AND 8013202554 AND 8011820639 AND 8015679775 AND 8008266853 AND 8008108113 AND 8016834379 AND '
-          | '8023160206 AND 8028742792 AND 8028742792 AND 8012203249 AND 8012233048 AND 8012233048 AND 8019294571 AND 8019294571 AND 8028569328 AND 8028599655 AND 8010056672 AND '
-          | '8028706375 AND 8028706375 AND 8028706292 AND 8028058637 AND 8028058637 AND 8028058637 AND 8028625294 AND 8028706375 AND 8028821034 AND 8016834379 AND 8022382066 AND '
-          | '8022382066 AND 8028244690 AND 8028290586 AND 8028290586 AND 8028706375 AND 8028706375 AND 8028706292 AND 8028706292 AND 960500293931 AND 8028058637 AND 8028058637 AND '
-          | '8023551982 AND 8023551982 AND 8024074406 AND 8024074406 AND 8024074406 AND 8026787542 AND 8026837545 AND 8023357299 AND 8026787989 AND 8027738106 AND 8027738106 AND '
-          | '8020542414 AND 8028194242 AND 8028194242 AND 8028595588 AND 8001731986 AND 8016540927 AND 8010904061 AND 8013725356 AND 8023871919 AND 8012294164 AND 8013704997 AND '
-          | '8011976241 AND 8014328861 AND 960500202700 AND 960500052758 AND 8028595588 AND 8028599655 AND 8028595588 AND 8028595588 AND 8028647025 AND 8028647025 AND 8028643495 AND '
-          | '8028450933 AND 8028568312 AND 8028518168 AND 8028518168 AND 8028595588 AND 8028599655 AND 8028242249 AND 8028242249 AND 8023357299 AND 8023357299 AND 8011510842 AND '
-          | '8011510842 AND 8028881319 AND 8028881319 AND 8028881319 AND 8015155560 AND 8015155560 AND 8018394646 AND 8018394646 AND 8018394646 AND 8018394646 AND 8018394646 AND '
-          | '8018394646 AND 8018394646 AND 8022909421 AND 8022909421 AND 8022909421 AND 8028749250 AND 8028749250 AND 8023187258 AND 8012846948 AND 8010113101 AND 8012850585 AND '
-          | '8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND '
-          | '8028702713 AND 8028702713 AND 8028703638 AND 8028703638 AND 8028706342 AND 8028706342 AND 8022854593 AND 8022854593 AND 8023055760 AND 8023055760 AND 8028686981 AND '
-          | '8028704172 AND 8011630103 AND 8024522487 AND 8024522487 AND 8024522487 AND 8027006892 AND 8024522487 AND 8024522487 AND 8024522487 AND 8023978169 AND 8023978169 AND '
-          | '8026877004 AND 8028706375 AND 8028706292 AND 8028827718 AND 8022685898 AND 8022685898 AND 8023055760 AND 8016506365 AND 8028691122 AND 8028691122 AND 8028702879 AND '
-          | '8028599655 AND 8028599655 AND 8028728700 AND 8028728700 AND 8011411355 AND 8028704172 AND 8028907908 AND 8028902404 AND 8028902404 AND 8028902404 AND 8028902404 AND '
-          | '8028902404 AND 8008033097 AND 8014801602 AND 8002219627 AND 8014394046 AND 960500010228 AND 960500351903 AND 960500591979 AND 8008071394 AND 8028628850 AND 8011411355 AND '
-          | '8028905845 AND 8028905845 AND 8010001082 AND 8013406932 AND 8028922923 AND 8013024412 AND 8021521342 AND 8023963260 AND 8027697013 AND 8023241311 AND 8023958070 AND '
-          | '8013823128 AND 8006757879 AND 8012850585 AND 8006557220 AND 8012846948 AND 8023427324 AND 8023427431 AND 8027508699 AND 8022257862 AND 8023066825 AND 8024392204 AND '
-          | '8027406092 AND 8027520314 AND 8027520314 AND 8026823628 AND 8026823628 AND 8023827150 AND 8023160206 AND 8021073930 AND 8022603149 AND 8014888518 AND 8014888518 AND '
-          | '8020942853 AND 8020652577 AND 8028854522 AND 8028776717 AND 8018737133 AND 8028760570 AND 8015750022 AND 8015750022 AND 8028568692 AND 8028568692 AND 8020768167 AND '
-          | '8028706375 AND 8028706375 AND 8028706375 AND 8027151086 AND 8027255119 AND 8027286387 AND 8027286387 AND 8027286387 AND 8027286387 AND 8014560703 AND 8011948075 AND '
-          | '8011381186 AND 8008274063 AND 8015154506 AND 8012902139 AND 8011903435 AND 8013914976 AND 8027005076 AND 8013757011 AND 8022230828 AND 8028706250 AND 8014396082 AND '
-          | '8028242249 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702655 AND 8028702713 AND '
-          | '8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND 8028702713 AND '
-          | '8028702713 AND 8028702713 AND 8014394061 AND 8014490612 AND 8028290586 AND 8028897398 AND 8028897398 AND 8023146049 AND 8023146049 AND 8023329082';

FILEDEF VALUES DISK VALUES.TXT
-RUN

-SET &VALUE   = 'START';
-SET &LOOPCNT = 1;
-REPEAT :LOOP WHILE &VALUE NE '';
-SET &VALUE = GETTOK(&DEMO, &DEMO.LENGTH, &LOOPCNT, ' ', 15, 'A15');
-SET &LOOPCNT = &LOOPCNT + 1;
-IF &VALUE EQ 'AND' THEN GOTO :LOOP;
-WRITE VALUES &VALUE
-:LOOP
-* Create a synonym for the temporary file
EX -LINES * EDAPUT MASTER,VALUES,CV,FILE
FILENAME=VALUES, SUFFIX=FIX
SEGNAME=SEG01, $
FIELDNAME=YOURVAL, ,D12c,A12,$
EDAPUT*
-RUN

TABLE FILE VALUES
   BY YOURVAL
WHERE YOURVAL NE 0
ON TABLE HOLD
ON TABLE SET HOLDLIST PRINTONLY
END


T



In FOCUS
since 1986
WebFOCUS Server 8.2.01M, thru 8.2.07 on Windows Svr 2008 R2  
WebFOCUS App Studio 8.2.06 standalone on Windows 10 
 
Posts: 5694 | Location: United Kingdom | Registered: April 08, 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     [CLOSED] Variable Assignment

Copyright © 1996-2020 Information Builders