Удалить все метки переменных в заданном .sav-файле

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

*(Ответ) Размещён в SPSSX-L, автор: Raynald Levesque, 03.08.2002.

SET MPRINT=no.
*////////////////.
DEFINE !nolabel(fname=!TOKENS(1))
GET FILE=!fname.
N OF CASES 1.
FLIP.
WRITE OUTFILE='c:\\temp\\delete var labels.sps' 
	/"VARIABLE LABEL "case_lbl ".".
EXECUTE.
GET FILE=!fname.
INCLUDE 'c:\\temp\\delete var labels.sps'. 
!ENDDEFINE.
*////////////////.

* Call macro to delete all variable label.
SET MPRINT=yes.
!nolabel fname='c:\\program files\\spss\\employee data.sav'.
SET MPRINT=no.