POOLS:slis
POOLS:slis
---------------------------*
*& Include ZB16_ALV_LIST_GRID_TOP
*&------------------------------------------
---------------------------*
* Declare tables t be used !r de!"n"n# t$e
select-%t"ns
*TABL&S'(br)*
* T+%e Pls Declarat"n
TYPE-POOLS:slis.
* ,t+%#*
* De!"ne t+%es
* -lds t$e b"ll"n# dcu.ent $eader data
TYPES:BEGIN OF typ_vbrk,
vbeln TYPE vbeln_vf,
fkrt TYPE fkrt,
fktyp TYPE fktyp,
vbtyp TYPE vbtyp,
!erk TYPE !erk,
vk"r# TYPE vk"r#,
net!r TYPE net!r,
EN$ OF typ_vbrk,
* -lds t$e b"ll"n# dcu.ent Ite. data
BEGIN OF typ_vbrp,
vbeln TYPE vbeln_vf,
p"snr TYPE p"snr_vf,
fki%# TYPE fki%#,
vrk%e TYPE vrk%e,
%eins TYPE %eins,
EN$ OF typ_vbrp,
* -lds t$e !"nal data
BEGIN OF typ_finl,
vbeln TYPE vbeln_vf,
p"snr TYPE p"snr_vf,
fkrt TYPE fkrt,
fktyp TYPE fktyp,
vbtyp TYPE vbtyp,
!erk TYPE !erk,
vk"r# TYPE vk"r#,
net!r TYPE net!r,
fki%# TYPE fki%#,
vrk%e TYPE vrk%e,
%eins TYPE %eins,
EN$ OF typ_finl.
* De!"ne /r) areas
$&T&:!_vbrk TYPE typ_vbrk,
!_vbrp TYPE typ_vbrp,
!_finl TYPE typ_finl.
* De!"ne Internal tables
$&T&:#t_vbrk TYPE SO'TE$ T&BLE OF typ_vbrk (
IT) *NI+*E ,EY vbeln,
#t_vbrp TYPE T&BLE OF typ_vbrp,
#t_finl TYPE ST&N$&'$ T&BLE OF typ_fin
l.
* Declarat"n ! Glbal Var"ables
$&T&:#v_-".nt TYPE i,
#v_vbeln LI,E vbrk-vbeln.
* Al( Declarat"n
$&T&:#t_fiel/-t TYPE slis_t_fiel/-t_lv,
!_fiel/-t LI,E LINE OF #t_fiel/-t,
#t_list_0e/er TYPE slis_t_list0e/er,
#t_event TYPE slis_t_event,
!_event LI,E LINE OF #t_event,
!_ly".t TYPE slis_ly".t_lv.