REPORT <NomeDoSeuReport>.

DATA: it_mara     TYPE TABLE OF mara,
      wa_material LIKE LINE OF it_mara,
      output      TYPE string.

SELECT * UP TO 10 ROWS
  INTO TABLE it_mara
  FROM mara .

*"Antes da versão 7.40:
READ TABLE it_mara INTO wa_material WITH KEY matnr = '000000000000066379'.

CONCATENATE 'Antes da versão 7.40 - Material:'            wa_material-matnr
            'Grupo de mercadoria:' wa_material-matkl
       INTO output SEPARATED BY space.

cl_demo_output=>display( output ).

*"Depois da versão 7.40:
cl_demo_output=>display( |Depois da versão 7.40 - Material: { it_mara[ matnr = '000000000060000004' ]-matnr } Grupo de mercadorias: { it_mara[ matnr = '000000000060000004' ]-matkl }| ).

*"Concatenar - Antes da versão 7.40:
DATA vl_output TYPE string.
CONCATENATE 'Concatenar antes da versão 7.40 - open' 'ABAP' INTO vl_output.
cl_demo_output=>display( vl_output ).

*"Concatenar - Depois da versão 7.40:
DATA(vl_output2) = |Concatenar depois da versão 7.40 - open| & || & |ABAP|.
cl_demo_output=>display( vl_output2 ).

*"Tamanho, alinhamento e preenchimento - Depois da versão 7.40:
WRITE / |Tamanho, alinhamento e preenchimento depois da versão 7.40|.
WRITE / |{ 'Esquerda' WIDTH = 20 ALIGN = LEFT   PAD = '0' }|. "Resultado Esquerda000000000000
WRITE / |{ 'Centro'   WIDTH = 20 ALIGN = CENTER PAD = '0' }|. "Resultado 0000000Centro0000000
WRITE / |{ 'Direita'  WIDTH = 20 ALIGN = RIGHT  PAD = '0' }|. "Resultado 0000000000000Direita
WRITE /.
WRITE /.
*"Condição - Depois da versão 7.40:
WRITE / |Condição depois da versão 7.40|.
WRITE / |{ 'Fiél, sem alteraçÃO' CASE = (cl_abap_format=>c_raw) }|. "Não alterado / Letras minúsculas ou superiores
WRITE / |{ 'maiúsculo' CASE = (cl_abap_format=>c_upper) }|. "Converte todas as letras em maiúsculas
WRITE / |{ 'MINÚSCULO' CASE = (cl_abap_format=>c_lower) }|. "Converte todas as letras em minúsculas
WRITE /.
WRITE /.
*"Conversão - Depois da versão 7.40:
WRITE / |Conversão depois da versão 7.40|.
DATA(vl_vbeln) = '0000012345'.
WRITE / |{ vl_vbeln  ALPHA = OUT }|.
WRITE / |{ vl_vbeln  ALPHA = IN }|.
WRITE /.
WRITE /.
*"Conversão de datas - Depois da versão 7.40:
WRITE / |Conversão de datas depois da versão 7.40|.
WRITE / |{ syst-datum DATE = ISO }|.         "Formato YYYY-MM-DD
WRITE / |{ syst-datum DATE = USER }|.        "Utiliza as configurações do usuário
WRITE / |{ syst-datum DATE = ENVIRONMENT }|. "Utiliza as configurações do idioma de login/desenvolvimento