I have a need to use two IN FILE filters in one fex. FOCUS does not allow this, does anyone know a work around?
FILEDEF EUROPE DISK C:\ibi\apps\TEMPFILE\EUROPE.ftm
FILEDEF ASIA DISK C:\ibi\apps\TEMPFILE\ASIA.ftm
DEFINE FILE CAR
ITEM7/D12.2 = IF COUNTRY IN FILE EUROPE THEN SALES ELSE 0;
ITEM8/D12.2 = IF COUNTRY IN FILE ASIA THEN SALES ELSE 0;
END
TABLE FILE CAR
SUM ITEM7 ITEM8
END

Spence, FOCUS/WebFOCUS does allow this:

DEFINE FILE CAR
SEL1/I1 = DECODE COUNTRY(ASIA ELSE 1);
SEL2/I1 = DECODE COUNTRY(EUROPE ELSE 1);
ITEM7/D12.2 = IF SEL2 EQ 0 THEN SALES ELSE 0;
ITEM8/D12.2 = IF SEL1 EQ 0 THEN SALES ELSE 0;
END
TABLE FILE CAR
SUM ITEM7 ITEM8
END


Use the DDNAME in the DECODE...Tom

This is what I'd do:

Change the contents of the selection files to have single quotes around each value and each value ending with a comma (I am assuming you're generating these files in previous TABLE commands):

Europe:
'ENGLAND',
'ITALY',

Asia:
'JAPAN',
'KOREA',

Then use the files as fexes in -INCLUDE statements. Change the DEFINE IF statements, the INCLUDEs will pull in the files as values in the IN('a','b','c') statement. Because the files are generated with a TABLE they will most likely have a comma on the last value, that's why the '' is there before the closing ) of the IN statment.

-SET &ECHO=ALL;
FILEDEF EUROPE DISK C:\IBI\APPS\TEMP\EUROPE.FTM
FILEDEF ASIA DISK C:\IBI\APPS\TEMP\ASIA.FTM
-RUN
DEFINE FILE CAR
ITEM7/D10 = IF COUNTRY IN (
-INCLUDE EUROPE
'') THEN SALES ELSE 0;
ITEM8/D10 = IF COUNTRY IN (
-INCLUDE ASIA
'') THEN SALES ELSE 0;
END
TABLE FILE CAR
SUM
SALES
ITEM7
ITEM8
BY COUNTRY
END

With ECHO=ALL, the program looks like this:

FILEDEF EUROPE DISK C:\IBI\APPS\TEMP\EUROPE.FTM
FILEDEF ASIA DISK C:\IBI\APPS\TEMP\ASIA.FTM
-RUN
DEFINE FILE CAR
ITEM7/D10 = IF COUNTRY IN (
'ENGLAND',
'ITALY',
'') THEN SALES ELSE 0;
ITEM8/D10 = IF COUNTRY IN (
'JAPAN',
'KOREA',
'') THEN SALES ELSE 0;
END
TABLE FILE CAR
SUM
SALES
ITEM7
ITEM8
BY COUNTRY
END

Tom, that's certainly easier!

Tom and Francis thanks for the responses.

Tom, the decode works great. Thanks for your help.

ds