1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
* Change all strings in the data file to lower case.

* Posted to SPSSX-L list by Raynald Levesque 2003/02/12.

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.