* Encoding: UTF-8.
******************************************************************
*SPSS syntax code for the computation of index*
*values with the NL TTO value set*
******************************************************************;

IF (mobility=1) disut_mo=0.
IF (mobility=2) disut_mo=0.039.
IF (mobility=3) disut_mo=0.056. 
IF (mobility=4) disut_mo=0.107.
IF (mobility=5) disut_mo=0.293.

IF (selfcare=1) disut_sc=0.
IF (selfcare=2) disut_sc=0.048.
IF (selfcare=3) disut_sc=0.052.
IF (selfcare=4) disut_sc=0.098.
IF (selfcare=5) disut_sc=0.233.

IF (activity=1) disut_ua=0.
IF (activity=2) disut_ua=0.039.
IF (activity=3) disut_ua=0.058.
IF (activity=4) disut_ua=0.111.
IF (activity=5) disut_ua=0.203.

IF (pain=1) disut_pd=0.
IF (pain=2) disut_pd=0.053.
IF (pain=3) disut_pd=0.077.
IF (pain=4) disut_pd=0.156.
IF (pain=5) disut_pd=0.375.

IF (anxiety=1) disut_ad=0.
IF (anxiety=2) disut_ad=0.038.
IF (anxiety=3) disut_ad=0.059.
IF (anxiety=4) disut_ad=0.11.
IF (anxiety=5) disut_ad=0.218.

Compute disut_total= disut_mo +disut_sc +disut_ua +disut_pd +disut_ad.
Compute EQindex = 1-disut_total.
IF (mobility= 1 & selfcare= 1 & activity= 1 & pain= 1 & anxiety= 1) EQindex = 1.
Formats EQindex(F8.3).
execute.