* School Violence Victims by Victim/Offender Relationship'.

GET FILE='Directory\Path\NIBRS victim segment.sav'.

SELECT IF (msvoff le 130 or
   msvoff = 180 or
   msvoff = 181 or
   msvoff = 182 or
   msvoff = 183 or
   msvoff = 198).
SAVE OUTFILE='Directory\Path\victim violent offenses.sav'.
GET FILE='Directory\Path\victim violent offenses.sav'.
SORT CASES BY
  ori (A) inc_num (A) vic_num (A) .
MATCH FILES /FILE=*
 /TABLE='Directory\Path\NIBRS Incident file.sav'
 /BY ori inc_num
 /DROP= voff1 voff10 voff2 voff3 voff4 voff5 voff6 voff7 voff8 voff9
  aggasl arfemale arr0509 arr1017 arr1524 arr65 arr_cnt arradult
  arrmale asl_arr att_comp bur bur_arr clr_arr clr_excp firearm inc_dy inc_mo
  inc_yr indivl lar lar_arr msioff mur mur_arr mvt mvt_arr mvtonly oasl_arr
  off1017 off1524 off65 off_cnt offadult offemale offmale ofns_cnt oth_asl rap
  rap_arr rob rob_arr rptdate vadult vage1017 vage1524 vage65 vfemale vic_cnt
  vic_inj vlt18 vmale.
SELECT IF (inc_loc = 22).
DO REPEAT ovr = ovr1 to ovr10/
  ovr_rcd = rcdovr1 to rcdovr10.
RECODE
  OVR ('SE','CS','PA','SB','CH','GP',
       'GC','IL','SP','SC','SS','OF','XS' = 1)
      ('AQ','FR','NE','BE','CF','XS','OK' = 2)
      ('BG','HR' = 3)
      ('EE','ER' = 4)
      ('RU','ST' = 5) INTO OVR_RCD.
END REPEAT.
VALUE LABELS RCDOVR1 to RCDOVR10 
    1 'Family'
    2 'Known to Victim' 
    3 'Romantic'
    4 'Work'
    5 'Not Known'.
VARIABLE LABELS RCDOVR1  'VICTIM TO OFFENDER RELATIONSHIP RECODED'.
* General Tables.
TABLES
  /FORMAT BLANK MISSING('.')
  /MRGROUP  $ovr 'Relationship'  rcdovr1 rcdovr2
  rcdovr3 rcdovr4 rcdovr5 rcdovr6 rcdovr7 rcdovr8 rcdovr9 rcdovr10
  /GBASE=CASES
  /FTOTAL= $t000001 "Total"
  /TABLE=$ovr + $t000001  BY (STATISTICS)
  /STATISTICS
  count( $ovr( F5.0 ) 'Number')
  rpct( $ovr( PCT5.1 ) 'Percent')
  /TITLE  'School Violence Victims by Victim/Offender Relationship'.