Определение переменных от varX до varY

* Это я опубликовал в SPSSX-L 30 августа 2000 г.
* Как определить переменные от varX до varY.
* Автор: Ray.

DATA LIST LIST /a(F8).
BEGIN DATA
1
END DATA.

DEFINE MakeVars (!POS=!TOKENS(1)/!POS=!TOKENS(1)).
NUMERIC !CONCAT(Var,!1) TO !CONCAT(Var,!2).
!ENDDEFINE.

MakeVars 10 14.
EXECUTE.