Разделить файл на 2 файла случайным образом

* (Вопрос) Как разделить файл данных на два случайно сформированных файла?.

* (Ответ) Автор: Raynald@spsstools.net

GET FILE='C:\\Program Files\\SPSS\\Employee data.sav'.
COMPUTE draw=UNIFORM(1).
SORT CASES BY draw.

DO IF mod($CASENUM,2)=0.
- XSAVE OUTFILE='c:\\temp\\чётные наблюдения.sav'.
ELSE.
- XSAVE OUTFILE='c:\\temp\\нечётные наблюдения.sav'.
END IF.
EXECUTE.