Hi ami bardogo,
this code is mostly use can use full. can you check this code.
DATA : T_STRING TYPE STRING VALUE 'aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA'.
DATA: BEGIN OF GRAPHIC_TABLE OCCURS 0,
LINE TYPE string,
END OF GRAPHIC_TABLE.
DATA : T_INT TYPE I.
DATA : T_INT1 TYPE I.
DATA : T_INT4 TYPE I.
DATA: L_GRAPHIC_OFFS TYPE I.
DATA : T_INT2 TYPE I.
PARAMETERS : T_INPUT TYPE I.
T_INT = STRLEN( T_STRING ).
T_INT1 = T_INT mod T_INPUT .
T_INT2 = T_INT div T_INPUT.
if t_int1 eq 0.
L_GRAPHIC_OFFS = 0.
do t_int2 TIMES.
GRAPHIC_TABLE-LINE = T_STRING+L_GRAPHIC_OFFS(T_INPUT).
APPEND GRAPHIC_TABLE.
L_GRAPHIC_OFFS = L_GRAPHIC_OFFS + T_INPUT.
ENDDO.
else.
* t_int2 = t_int2 + 1.
L_GRAPHIC_OFFS = 0.
do t_int2 TIMES.
GRAPHIC_TABLE-LINE = T_STRING+L_GRAPHIC_OFFS(T_INPUT).
APPEND GRAPHIC_TABLE.
L_GRAPHIC_OFFS = L_GRAPHIC_OFFS + T_INPUT.
CLEAR GRAPHIC_TABLE.
ENDDO.
T_INT4 = T_INT2 * T_INPUT.
GRAPHIC_TABLE-LINE = T_STRING+T_INT4(T_INT1).
APPEND GRAPHIC_TABLE.
* L_GRAPHIC_OFFS = L_GRAPHIC_OFFS + 132.
CLEAR GRAPHIC_TABLE.
endif.
*WRITE : / T_INT1.
LOOP AT GRAPHIC_TABLE INTO GRAPHIC_TABLE.
WRITE :/ GRAPHIC_TABLE-LINE.
CLEAR : GRAPHIC_TABLE.
ENDLOOP.