Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

Regarding alv reports with check boxes

Former Member
0 Kudos

Hai,

i need some sample ALV application using chack boxes,.

for example,

if i have three check boxes that three check boxes are the information displayed under one field in my internal table.if i click one information that corresponding records has to be diaplayed for that i need some application or coding pls tell me the solution as soon as possible.

with regards,

R.Dhineshraj.

1 ACCEPTED SOLUTION

Former Member
3 REPLIES 3

Former Member
0 Kudos

&----


*& Report ZALV_SAMPLE *

*& *

&----


*& Program for displaying data using function modules : *

*& REUSE_ALV_LIST_DISPLAY *

*& REUSE_ALV_POPUP_TO_SELECT *

*& REUSE_ALV_GRID_DISPLAY *

*& *

&----


report zalv_sample .

tables vbak.

data it_vbak like vbak occurs 0 with header line.

selection-screen begin of block b1 with frame.

parameters: alv1 radiobutton group alv, "REUSE_ALV_LIST_DISPLAY

alv2 radiobutton group alv, "REUSE_ALV_POPUP_TO_SELECT

alv3 radiobutton group alv, "REUSE_ALV_GRID_DISPLAY

alv4 radiobutton group alv. " NORMAL DISPLAY

selection-screen end of block b1.

select * from vbak

into corresponding fields of table it_vbak

up to 10 rows.

if alv1 = 'X'.

perform alv_func1.

elseif alv2 = 'X'.

perform alv_func2.

elseif alv3 = 'X'.

perform alv_func3.

elseif alv4 = 'X'.

perform norm.

endif.

&----


*& Form ALV_FUNC1

&----


form alv_func1 .

call function 'REUSE_ALV_LIST_DISPLAY'

exporting

i_structure_name = 'VBAK'

tables

t_outtab = it_vbak

exceptions

program_error = 1

others = 2.

if sy-subrc <> 0.

message id sy-msgid type sy-msgty number sy-msgno

with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.

endif.

endform. " ALV_FUNC1

&----


*& Form ALV_FUNC2

&----


form alv_func2 .

call function 'REUSE_ALV_POPUP_TO_SELECT'

exporting

i_title = 'SALES ORDER INFO'

i_zebra = 'X'

i_tabname = 1

i_structure_name = 'vbak'

tables

t_outtab = it_vbak

exceptions

program_error = 1

others = 2.

if sy-subrc <> 0.

message id sy-msgid type sy-msgty number sy-msgno

with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.

endif.

endform. " ALV_FUNC2

&----


*& Form ALV_FUNC3

&----


form alv_func3 .

call function 'REUSE_ALV_GRID_DISPLAY'

exporting

i_structure_name = 'vbak'

i_grid_title = 'SALES ORDER INFO'

tables

t_outtab = it_vbak

exceptions

program_error = 1

others = 2.

if sy-subrc <> 0.

message id sy-msgid type sy-msgty number sy-msgno

with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.

endif.

endform. " ALV_FUNC3

&----


*& Form NORM

&----


form norm .

format intensified.

skip 1.

write: /'SALES DOC.',

' Created on ',

' Time',

' Created by',

' Valid from ',

' Sold-to party'.

format intensified off.

skip 2.

loop at it_vbak.

write: / it_vbak-vbeln,' ',

it_vbak-erdat,' ',

it_vbak-erzet,' ',

it_vbak-ernam,' ',

it_vbak-angdt,' ',

it_vbak-kunnr.

endloop.

endform. " NORM

Former Member

Former Member
0 Kudos

Hi

Go through the link given below :

With Regards

Nikunj Shah