quarta-feira, 28 de março de 2012

Split

"  Sabe quando vc quer uma parte da String até certo ponto do texto,
" isso pode ser resolvido facilmente usando um commando chamado
" 'SPLIT' que faz nada mais nada menos que quebrar o texto até o
" delimitador informado deletando o delimitador, usado bastante pra
" Batch Input e outras tratativas de string, olhem aaee.

REPORT z_split.

DATA : it_texto TYPE TABLE OF string.

DATA :
  v_texto TYPE string,
  v_t1 TYPE string,
  v_t2 TYPE string.

*&------Texto Inicial sem alteração------------------------------------*
v_texto 'Texto test2 pra ver s3 funciona'.

WRITE : 'Texto no começo :' , v_texto, / .
*&---------------------------------------------------------------------*

*&-----Texto sendo quebrado para duas variáveis------------------------*
SPLIT v_texto AT space INTO v_t1
                            v_t2.

WRITE : 'Texto enviado para duas variáveis : ',/
        'Variável 1: ', v_t1,/,
        'Variavel 2: ', v_t2,/.
*&---------------------------------------------------------------------*

*&-----Texto sendo quebrado para uma tabela de string------------------*
SPLIT v_texto AT space INTO TABLE it_texto.

LOOP AT it_texto INTO v_texto.

  IF sy-tabix 1.
    WRITE : 'Texto enviando para uma tabela :' , v_texto, /.
  else.
    WRITE : v_texto, / .
  ENDIF.

ENDLOOP.

BREAK-POINT.
*&---------------------------------------------------------------------*
Comentários
0 Comentários

Nenhum comentário:

Postar um comentário