Update.
[pspp] / tests / recode.stat
1 title 'Test RECODE transformation'.
2
3 data list /A B 1-20(a).
4 begin data.
5 12345678901234567890
6 a         b
7 jkl;      aklsdf
8 aklsd     ioqeur
9  ioquer   pasdflk
10 end data.
11 *recode A B(1,2,3,4=5)(5 thru hi=9)(lo thru 10=4) into A D
12         /A B(lo thru hi=copy)(sysmis=0)(else=sysmis) into C D.
13 string c d(a10).
14 leave c d.
15 recode  A B('a'='b')('jkl;'='jkl;p')('ioqeur'='sdjfkla') into C D.
16 *recode A B(1,2,3,4="asdf")(else="xyzw")(sysmis="bdfg") into C D.
17 *recode A B("asdf"=copy)(convert)("lkjf"=sysmis)(convert)(else=123) into C D.
18 *recode A B(1,3,5,6,7=COPY)(SYSMIS=5e5) into C D.
19 *recode a (convert)('xx'=50) into b.
20 list.
21