quote:

-SET &ECHO=ALL;
-*
SET NODATA = ' ',ASNAMES = ON
-*
TABLE FILE CAR
PRINT
CAR
MODEL
SEATS
COMPUTE SFLAG/A4 MISSING ON = IF SEATS EQ '4' OR '5'
THEN 'GOOD'
ELSE IF SEATS EQ '2' THEN 'BAD'
ELSE MISSING;
-*
BY COUNTRY
ON TABLE HOLD AS TIGER
END
-RUN
-*
DEFINE FILE TIGER
BDCNT/I9 MISSING ON = IF SFLAG EQ 'BAD'
THEN 1
ELSE MISSING;
GDCNT/I9 MISSING ON = IF SFLAG EQ 'GOOD'
THEN 1
ELSE MISSING;
END
-*
TABLE FILE TIGER
PRINT
CAR
MODEL
SEATS
BDCNT
GDCNT
SFLAG
BY COUNTRY
ON TABLE HOLD AS PUMA
END
-RUN
-*
?FF PUMA
-RUN
-*
TABLE FILE PUMA
HEADING CENTER
"RPT ONE"
SUM
CNT.BDCNT AS 'BADONES'
BY COUNTRY
-*
PRINT
CAR
MODEL
SEATS
BY COUNTRY
WHERE SFLAG EQ 'GOOD';
ON TABLE HOLD AS LEOPARD
END
-RUN
-*
TABLE FILE LEOPARD
" SFLAG EQ GOOD "
SUM
CAR
MODEL
SEATS
LST.BADONES
-*
BY COUNTRY
END
-RUN
-*

quote:

WHERE SFLAG EQ 'GOOD';

quote:

-* File bad_cars.fex
-SET &ECHO=ALL;
-*
SET ASNAMES=ON
-*
MATCH FILE CAR
SUM CNT.SALES AS 'LT_10K'
BY COUNTRY

WHERE SALES LT 10000;
RUN
-*
FILE CAR
PRINT
CAR
MODEL
SALES
BY COUNTRY
WHERE SALES GE 10000;
AFTER MATCH HOLD AS X12 OLD-OR-NEW
END
-RUN
-*
TABLE FILE X12
HEADING CENTER
"AFTER THE MATCH"
SUM
-*LST.LT_10K
CAR
MODEL
SALES
LST.LT_10K
BY COUNTRY
END
-RUN
-*
-* LET'S GET THE REAL DATA AND COUNTS
DEFINE FILE CAR
XFLAG/I9 MISSING ON = IF SALES LT 10000 THEN 1 ELSE MISSING;
ZFLAG/I9 MISSING ON = IF SALES GE 10000 THEN 1 ELSE MISSING;
END
-*
TABLE FILE CAR
HEADING CENTER
" THIS IS NORMAL DATA"
SUM
CNT.XFLAG AS 'LT_10K'
CNT.ZFLAG AS 'GE_10K'
BY COUNTRY
-*
PRINT
CAR
MODEL
SALES
BY COUNTRY
END
-RUN