**************. *** Add _99 to the end of existing variable names. *** Of course existing variable names are assumed to have *** at most 5 characters. **************. DATA LIST LIST /v1 vara varz a2345 a3456. BEGIN DATA. 1 1 1 1 1 END DATA. SAVE OUTFILE='c:\\temp\\mydata.sav'. FLIP. STRING newname(A8). * The last letter of var names having 8 characters are deleted. * unless this would result in a name duplication. COMPUTE newname=CONCAT(RTRIM(case_lbl),'_99'). WRITE OUTFILE='c:\\temp\\rename.sps' / 'RENAME VARIABLE ('case_lbl'='newname').'. Execute. GET FILE='c:\\temp\\mydata.sav'. INCLUDE 'C:\\temp\\rename.sps'.