Existe algo que iremos sempre nos deparar no dia a dia como ABAP's, o tal do ALV, ele que fica na nossa mente quando dormimos depois de um longo dia de estudos.
Quando assisti a primeira aula de ALV, pensei, precisarei disso com frequência, então comecei a estudar sobre este assunto, percorri diversos blogs, desde os mais populares até os esquecidos, seja pelo tempo ou por seus responsáveis, eu sempre tenho um 'programa de testes' onde coloco todas as linhas de código que encontro, edito conforme a minha necessidade, e com isso, percebi um monte de código 'furado', alguns não funcionavam, outros também não hehe, isso é comum, porém encontrei um que foi a minha salvação!
No blog do Furlan, ABAP 101, ele descreve sobre o 'ALV mais fácil do mundo!', e por incrível que pareça, sim, este é um ALV muito simples de ser usado, utilizando a classe CL_SALV_TABLE você abap irá construir o seu ALV de maneira fácil e rápida!
Este é o ALV mais fácil, até agora!
* Declarando as variáveis.
DATA:
gt_sflight TYPE STANDARD TABLE OF sflight, " Tabela que será apresentada.
go_alv TYPE REF TO cl_salv_table. " Objeto do ALV
* Selecionando os dados no banco de dados.
SELECT *
FROM sflight
INTO TABLE gt_sflight.
gt_sflight TYPE STANDARD TABLE OF sflight, " Tabela que será apresentada.
go_alv TYPE REF TO cl_salv_table. " Objeto do ALV
* Selecionando os dados no banco de dados.
SELECT *
FROM sflight
INTO TABLE gt_sflight.
" Utilizando o Objeto do ALV.
TRY .
TRY .
cl_salv_table=>factory(
IMPORTING
r_salv_table = go_alv
CHANGING
t_table = gt_sflight
).
CATCH cx_salv_msg.
WRITE: / 'ALV error'.
IMPORTING
r_salv_table = go_alv
CHANGING
t_table = gt_sflight
).
CATCH cx_salv_msg.
WRITE: / 'ALV error'.
ENDTRY.
" Apresentação do ALV.
go_alv->display( ).
Comentários
Postar um comentário