Skip to Content
0
Former Member
May 13, 2010 at 08:36 AM

remove space

35 Views

hi every one,

I am giving some code just check it first...it is displaying transparent and standard tables

with some space,actually standard tables displaying first later transparent tables.

my requirement is to display both transparent and standard tables side by side with out any space ...

TYPES:BEGIN OF TYPES_TA,

TABNAME TYPE DD02L-TABNAME,

TABCLASS TYPE DD02L-TABCLASS,

END OF TYPES_TA.

DATA: WA TYPE TYPES_TA,

ITAB TYPE TABLE OF TYPES_TA.

SELECT TABNAME TABCLASS FROM DD02L INTO TABLE ITAB.

write:/2(30) 'TRANSPARENT TABLES'.

write:/35(30) 'STANDARD TABLES'.

LOOP AT itab INTO wa.

IF wa-tabclass = 'TRANSP' AND wa-tabname BETWEEN 'Z' AND 'ZZZ'.

WRITE:/2 wa-tabname.

ENDIF.

IF wa-tabclass = 'TRANSP' AND wa-tabname NOT BETWEEN 'Y' AND 'ZZZ'.

WRITE:/35 wa-tabname.

ENDIF.

ENDLOOP.