Добавить в имена переменных первый символ (или заменить его)

**************.
*** Как добавить 'm' в начало имен существующих переменных.
* (для поздник версий SPSS ограниечение по длине имени в 8 символов снимается.
* 13 версия, например - 64 символа (байта) - А.Б.).
**************.
DATA LIST LIST /v1 vara varz a2345678 a2345679.
BEGIN DATA.
1 1 1 1 1
END DATA.

SAVE OUTFILE='c:\\temp\\mydata.sav'.
FLIP.

STRING newname(A8).
* Восьмой символ в имени переменной всегда удаляется.
* Если это вызывает дублирование имён (как в примере), возникает ошибка и
* переменная остаётся непереименованной.
COMPUTE newname=CONCAT("m",case_lbl).
WRITE OUTFILE='c:\\temp\\rename.sps'
/ 'RENAME VARIABLE ('case_lbl'='newname').'.
Execute.

GET FILE='c:\\temp\\mydata.sav'.
INCLUDE 'C:\\temp\\rename.sps'.


**************.
* Заменить первую букву имени на 'm'.
**************.

DATA LIST LIST /v1 vara varz a2345678 b2345678.
BEGIN DATA.
1 1 1 1 1
END DATA.

SAVE OUTFILE='c:\\temp\\mydata.sav'.
FLIP.

STRING newname(A8).
* Первый символ заменяется. Если это вызывает дублирование имён (как в примере),
* возникает ошибка и переменная не переименовывается.
COMPUTE newname=CONCAT("m",SUBSTR(case_lbl,2)).
WRITE OUTFILE='c:\\temp\\rename2.sps'
/ 'RENAME VARIABLE ('case_lbl'='newname').'.
Execute.

GET FILE='c:\\temp\\mydata.sav'.
INCLUDE 'C:\\temp\\rename2.sps'.