Skip to Content
0
Former Member
Oct 04, 2005 at 06:50 AM

REPORTS

32 Views

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