* Взято из конференции spss usenet; Автор: Bjarte Aagnes, 14.11.1999. set mprint=on. *Приведём какие-то данные. DATA LIST FREE /v1. BEGIN DATA 142 132 13 134 2 6 3 6 1 1 23 345 34 END DATA. RANK v1 /n into N. * N содержит число наблюдений в файле данных. * Создадим подмакрос, который будет вызываться из основного макроса. DO IF $CASENUM=1. WRITE OUTFILE 'c:\\temp\\temp.sps' /"DEFINE !subN()"/n/"!ENDDEFINE.". END IF. EXE. INCL FILE="c:\\temp\\temp.sps". /* Число наблюдений в файле данный теперь доступно через макрос !subN */. *Определим основной макрос. DEFINE !MAIN() COMPUTE NewN=!subN*2. EXE. !ENDDEFINE. *Запустим основной макрос. !MAIN.