if (v083097 EQ 1 AND v083098a EQ 1)
    pid7=1
else if (v083097 EQ 1 AND v083098a EQ 5)
    pid7=2
else if (v083097 EQ 3 AND v083098b EQ 5)
    pid7=3
else if (v083097 EQ 3 AND v083098b EQ 3)
    pid7=4
else if (v083097 EQ 3 AND v083098b EQ -9)
    pid7=4
else if (v083097 EQ 3 AND v083098b EQ -8)
    pid7=4
else if (v083097 EQ 3 AND v083098b EQ 1)
    pid7=5
else if (v083097 EQ 2 AND v083098a EQ 5)
    pid7=6
else if (v083097 EQ 2 AND v083098a EQ 1)
    pid7=7