data tq84_nums; do num = 1 to 50; txt = put(num, words30.); output; end; run; proc sql; select num, txt, case when num = 1 then 'prime' when num = 2 then 'prime' when mod(num, 2) = 0 then 'multiple of 2' when mod(num, 3) = 0 then 'multiple of 3' when mod(num, 5) = 0 then 'multiple of 5' when mod(num, 7) = 0 then 'multiple of 7' else 'prime' end as is_prime from tq84_nums; quit;