1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
* Перевод строковых переменных в нижний регистр (запись строчными буквами).

* Размещено в SPSSX-L 12.02.2003. Автор: Raynald Levesque.

DATA LIST LIST /str1 a str2(A8,F8,A8).
BEGIN DATA
BNhb 98 AbbcBBB
END DATA.

DO REPEAT v=ALL.
COMPUTE v=LOWER(v).
END REPEAT.
EXECUTE.