SET
   BLANKS=SYSMIS BLANKS=SYSMIS
  UNDEFINED=WARN.
DATA LIST
  FILE='c:\cfsr\EZdata\EZfy98c.dat' FIXED RECORDS=1 TABLE /1 state 1-2 repdatyr 3-6
  repdatmo 7-8 fipscode 9-13 recnumbr 14-25 (A) pedrevyr 26-29 pedrevmo 30-31
  pedrevda 32-33 dobyr 34-37 dobmo 38-39 dobda 40-41 sex 42-42 race 43-43
  hisorgin 44-44 clindis 45-45 mr 46-46 vishear 47-47 phydis 48-48 dsmIII 49
 -49 othermed 50-50 everadpt 51-51 ageadopt 52-52 rem1yr 53-56 rem1mo 57-58
  rem1da 59-60 totalrem 61-62 dlstfcyr 63-66 dlstfcmo 67-68 dlstfcda 69-70
  latremyr 71-74 latremmo 75-76 latremda 77-78 remtrnyr 79-82 remtrnmo 83-84
  remtrnda 85-86 cursetyr 87-90 cursetmo 91-92 cursetda 93-94 numplep 95-96
  manrem 97-97 phyabuse 98-98 sexabuse 99-99 neglect 100-100 aaparent 101-101
  daparent 102-102 aachild 103-103 dachild 104-104 childis 105-105 chbehprb 106-106
  prtsdied 107-107 prtsjail 108-108 nocope 109-109 abandmnt 110-110 relinqsh 111-111
  housing 112-112 curplset 113-113 placeout 114-114 casegoal 115-115 ctkfamst 116-116
  ctk1yr 117-120 ctk2yr 121-124 prtmomyr 125-128 prtmommo 129-130 prtmomda
  131-132 prtdadyr 133-136 prtdadmo 137-138 prtdadda 139-140 fosfamst 141-141
  fcctk1yr 142-145 fcctk2yr 146-149 rfcctk1 150-150 hofcctk1 151-151 rfcctk2
  152-152 hofcctk2 153-153 dodfcyr 154-157 dodfcmo 158-159 dodfcda 160-161
  dodtrnyr 162-165 dodtrnmo 166-167 dodtrnda 168-169 disreasn 170-170 ivefc
  171-171 iveaa 172-172 ivaafdc 173-173 ivdchsup 174-174 xixmedcd 175-175
  ssiother 176-176 noa 177-177 fcmntpay 178-182.
save outfile 'c:\cfsr\EZdata\EZfy98c.sav'.
execute.