К примеру есть таблица TEST. Содержит скажем 50 полей
Есть ли короткая программа, которая будет выводить на экран значения всех полей каждой записи.

Попробуй с field-symbols выводить.
например:

field-symbols <f> type any.


loop at itab.
component_index = 1.
assign component component_index of structure itab to <f>.
if sy-subrc ne 0. continue. endif.
if component_index = 1.
write: / ''.
endif.

write: <f>.

endloop.

Спасибо, заработало, только в варианте:

field-symbols <f> type any.
data component_index type n.
loop at I_MARA.
assign component component_index of structure I_MARA to <f>.
if sy-subrc ne 0. continue. endif.
write: / <f>.
endloop.

и работает, если полей в таблице не много.