TABLES :KNA1,VBAK,MARA,SSCRFIELDS.
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
PARAMETERS:CUSTOMER RADIOBUTTON GROUP RG1,
SALES RADIOBUTTON GROUP RG1,
MATERIALS RADIOBUTTON GROUP RG1.
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN FUNCTXT-01 = 'REPORT'.
SELECTION-SCREEN FUNCTXT-02 = 'EXIT'.
AT SELECTION-SCREEN.
IF SSCRFIELDS-UCOM='FC01'
SSCRFIELDS-UCOM = 'ONLI'
ELSEIF SSCRFIELDS-UCOMM = 'FC02'
LEAVE.
ENDIF.
START-OF-SELECTION.
IF CUSTOMER = 'X'
SELECT * FROM KNA1.
WRITE:/KNA1-KUNNR,KNA1-LAND1,KNA1-NAME1
ENDSELECT.
ELSE
IF SALES = 'X'
SELECT * FROM VBAK.
WRITE :/VBAK-VBELN,VBAK-ERDAT,VBAK-NETWR.
ENDSELECT.
ELSE
SELECT * FROM MARA.
WRITE :/MARA-MATNR,MARA-MEINS.
ENDSELECT.
IWOULD BE VERY HAPPY IF ANY BODY OF YOU CAN RECTIFY THE ERROR THE ERROR IS SELECTION SCREEN OBJECTS CAN ONLY BE USED BETWEEN SELECTION SCREEN BEGIN AND SELECTION SCREEN END