Привет!
Не фейк! Там где мы когда-то работали 7.4
Скомпилил такой опус.
REPORT ZYS_TEST.
DATA: ls1 type pa0002-pernr,
ls2 type pa0002-begda,
ls3(20) .
Select single pernr,
begda,
case subty
when '01' then 'sss'
else 'Are you kidding'
end as inv
into (@ls1, @ls2, @ls3)
from pa0002
.
write: / ls1, ls2, ls3.
На выходе подставляет условие из кейса
00001000 01.02.1970 Are you kidding