Aqui tens um pseudocódigo fácil de converter para ABAP
pos_end = length of string
pos_start = 1
do pos_end/2 times.
read character of string at position pos_start and pos_end.
not the same?
set flag
exit
add 1 to pos_start
subtract 1 from pos_end
enddo.
if flag set
say 'não é palíndromo'.
else
say 'é palíndromo'