Olá,
Entendi sua solicitação. Estou fornecendo uma solução dinâmica. Isso é aplicável em todos os casos, como carregar dados do Excel ou construir fieldcats dinâmicos.
Ilustração:
data: Begin of wa1,
var type char10, " (pegue o comprimento desejado)
end of wa1,
itab1 like standard table of wa1.
data: begin of wa2,
var1 type char6,
var2 type char7,
var3 type char8,
var4 type char9,
var5 type char10,
end of wa2,
itab2 like standard table of wa2.
field-symbols: <FS1> type any.
parameters: p_a RADIOBUTTON GROUP gr1 default 'X', " preencher na diagonal
p_b RADIOBUTTON GROUP gr1. " preencher no triângulo esquerdo
start-of-selection.
wa1-var = 'Balaji'. Append wa1 to itab1.
wa1-var = 'Balaji1'. Append wa1 to itab1.
wa1-var = 'Balaji12'. Append wa1 to itab1.
wa1-var = 'Balaji123'. Append wa1 to itab1.
wa1-var = 'Balaji1234'. Append wa1 to itab1.
loop at itab1 into wa1.
assign component sy-tabix of structure wa2 to <FS1>.
if sy-subrc = 0.
<fs1> = wa1-var.
append wa2 to itab2.
unassign <fs1>.
if p_b is INITIAL.
clear: wa2.
endif.
else.
exit.
endif.
endloop.
Teste isso.
Obrigado,
Balaji Peethani.
