DATA LIST LIST
 /A (A161)
 B (A3).

BEGIN DATA
abc   def
ghi   jkl
END DATA.

COMPUTE A=upcase(A).
EXECUTE.
LIST.