Report

strlen / replace

KindKay 2009. 2. 3. 15:45

  data: v_text(132type c.
  datavalue(50type c value 'THIS IS TEST DATA'.
  data: 20_space(20type c value '####################'.
  data: length type i.

  concatenate value 20_space  into v_text.

  length = strlen( v_text ).

  write:/ length.

  while sy-subrc = 0.
    replace '#' with space into v_text.
  endwhile.

  write:/ v_text.