get file ='D:\work\data\spss\hsb2.sav'.
sort cases by race.
compute byrace = 1.
if lag(race) ~= race   byrace = lag(byrace) + 1.
if lag(race)   = race   byrace = lag(byrace).
exe.
save outfile = 'd:/work/data/spss/byrace.sav'.
 
split file separate by race.

* OMS.
dataset declare slope1.
oms
  /select tables
  /if commands =['Regression'] SUBTYPES=['Coefficients']
  /destination format =SAV numbered=race outfile ='slope1'
  /columns sequence =[RALL CALL LALL].
regression  
  /dependent write
  /method =enter math.
omsend.

dataset activate slope1.
save outfile = 'd:/work/data/spss/slope1.sav' 
/rename=( @1_math_B = slope_math) 
/keep= byrace slope_math. 


get file ='D:\work\data\spss\byrace.sav'.
match files 
/file = *  
/table='D:\work\data\spss\slope1.sav' 
/by byrace. 
exe.