**This file creates "inc1"& "entry" files to be combined as the 9-month served FC pop
** for denominator of Safety Measure    Last updated:  8-9-01

get file 'c:\cfsr\EZdata\EZserved98c.sav'.
FILTER OFF.
USE ALL.
SELECT IF(YRMODA(latremyr,latremmo,latremda) <= 151927).
EXECUTE .
FILTER OFF.
USE ALL.
SELECT IF(YRMODA(latremyr,latremmo,latremda) >= 151655).
SAVE OUTFILE='c:\cfsr\EZdata\9served-entry98c.sav'.
EXECUTE .

get file 'c:\cfsr\EZdata\EZserved98c.sav'.
FILTER OFF.
USE ALL.
SELECT IF(YRMODA(latremyr,latremmo,latremda) <= 151654).
EXECUTE .
FILTER OFF.
USE ALL.
SELECT IF(YRMODA(dodfcyr,dodfcmo,dodfcda) >= 151655 | MISSING(dodfcyr) &
  MISSING(dodfcmo) & MISSING(dodfcda)).
save outfile='c:\cfsr\EZdata\9served-inc1st98c.sav'.
execute.

ADD FILES /FILE=*
 /FILE='C:\cfsr\EZdata\9served-entry98c.sav'.
EXECUTE.
save outfile='c:\cfsr\EZdata\tot9served98c.sav'.
exe.
FREQUENCIES
  VARIABLES=state
  /ORDER  ANALYSIS .
exe.