No comprendo bien la funcionalidad de este código:
FORM llena_cadena.
DATA: indice LIKE sy-fdpos, resto LIKE sy-fdpos.
CLEAR: cadena, indice, resto.
* Construcción de la cadena de caracteres a partir de la tabla TEXTO
LOOP AT texto.
CHECK NOT ( texto-tdline IS INITIAL ).
IF sy-tabix = 1.
cadena = texto-tdline.
ELSE.
IF resto = 0.
resto = 150.
ENDIF.
cadena+indice(resto) = texto-tdline.
ENDIF.
indice = STRLEN( cadena ) + 1.
resto = 150 - indice.
IF indice GE 150.
EXIT.
ENDIF.
ENDLOOP.
ENDFORM. " llena_cadena
Alguien me puede ayudar?
