Skip to Content
0
Former Member
Jan 09, 2008 at 04:31 AM

Not Getting Checkboxes properly..

18 Views

Hi.

I used this code to put checkboxes. But I am getting checkboxes in each column instead of data.

But I want checkboxes only at the starting.

Please help me out...

CODE:

TYPES : BEGIN OF st_ekko,

check(1),

ebeln TYPE ekko-ebeln,

bstyp TYPE ekko-bstyp,

bsart TYPE ekko-bsart,

aedat TYPE ekko-aedat,

ernam TYPE ekko-ernam,

END OF st_ekko.

data : it_ekko TYPE STANDARD TABLE OF st_ekko,

wa_ekko LIKE LINE OF it_ekko,

it_fieldcat TYPE slis_t_fieldcat_alv,

wa_fieldcat LIKE LINE OF it_fieldcat.

START-OF-SELECTION.

SELECT ebeln bstyp bsart aedat ernam

FROM ekko

INTO CORRESPONDING FIELDS OF TABLE it_ekko

WHERE ebeln IN so_ebeln.

wa_fieldcat-fieldname = 'CHECK'.

wa_fieldcat-input = 'X'.

wa_fieldcat-col_pos = 1.

wa_fieldcat-input = 'X'.

wa_fieldcat-edit = 'X'.

wa_fieldcat-checkbox = 'X'.

APPEND wa_fieldcat TO it_fieldcat.

wa_fieldcat-fieldname = 'EBELN'.

wa_fieldcat-seltext_l = 'Purchase document number'.

wa_fieldcat-col_pos = 2.

wa_fieldcat-no_zero = 'X'.

APPEND wa_fieldcat TO it_fieldcat.

wa_fieldcat-fieldname = 'BSTYP'.

wa_fieldcat-seltext_l = 'Purchasing Document Category'.

wa_fieldcat-col_pos = 3.

APPEND wa_fieldcat TO it_fieldcat.

wa_fieldcat-fieldname = 'BSART'.

wa_fieldcat-seltext_l = 'Purchasing Document Type'.

wa_fieldcat-col_pos = 4.

APPEND wa_fieldcat TO it_fieldcat.

wa_fieldcat-fieldname = 'AEDAT'.

wa_fieldcat-seltext_l = 'Created On'.

wa_fieldcat-col_pos = 5.

APPEND wa_fieldcat TO it_fieldcat.

wa_fieldcat-fieldname = 'ERNAM'.

wa_fieldcat-seltext_l = 'Created By'.

wa_fieldcat-col_pos = 6.

APPEND wa_fieldcat TO it_fieldcat.

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'

EXPORTING

i_callback_program = sy-repid

is_layout = wa_layout

it_fieldcat = it_fieldcat

TABLES

t_outtab = it_ekko[]

EXCEPTIONS

program_error = 1

OTHERS = 2.

Regards

Sandeep.