[cirsgo]

Hola qué tal,

Soy nuevo por aquí y tengo un problema para optimizar un código que me han dicho debo hacerlo con field symbols. Adjunto trozo de código:

Previamente a esto hay un select single * tabla que me informa la cabecera l_wa_tabla y en esa están todos los tpr*...cómo hago esto con field symbols????

case sy-datum+6(2).
when '01'.
move l_wa_tabla-tpr01 to grid_tab-tprog.
when '02'.
move l_wa_tabla-tpr02 to grid_tab-tprog.
when '03'.
move l_wa_tabla-tpr03 to grid_tab-tprog.
.
.
.
etc.
endcase.


Haber si alguien puede ayudar por favor!!!! Muchas gracias!!!