Application Development and Automation 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: 
Read only

REGARDING O/P

Former Member
0 Likes
969

DATA : BEGIN OF IT_MAKT OCCURS 0,

MATNR LIKE MAKT-MATNR,

MAKTX LIKE MAKT-MAKTX,

END OF IT_MAKT.

SELECTION-SCREEN BEGIN OF SCREEN 500 TITLE TITLE." AS WINDOW.

PARAMETERS : P_X TYPE I.

SELECT-OPTIONS SO_MATNR FOR IT_MAKT-MATNR.

SELECTION-SCREEN END OF SCREEN 500.

title = 'MATERIAL NUMBER'.

*WRITE:'HELLO'.

CALL SELECTION-SCREEN '0500'. "STARTING AT 10 10.

SET PF-STATUS 'MENU1'.

AT USER-COMMAND.

CASE SY-UCOMM.

WHEN 'BACK'.

CALL SCREEN '0500'.

ENDCASE.

AT SELECTION-SCREEN.

IF sy-dynnr = '0500'.

IF P_X IS INITIAL.

MESSAGE 'Please enter values' TYPE 'W'.

ELSE.

leave to list-processing ."and return to screen '0500'.

SELECT MATNR MAKTX FROM MAKT INTO TABLE IT_MAKT WHERE MATNR IN SO_MATNR .

LOOP AT IT_MAKT.

WRITE : / IT_MAKT-MATNR , IT_MAKT-MAKTX.

ENDLOOP.

  • IF sy-subrc <> 0.

  • MESSAGE 'No RECORDS found' TYPE 'E'.

  • ENDIF.

ENDIF.

HERE THE BACK BUTTON WICH WAS ADDED IN STANDARD TOOL BAR IS NOT WORKING. WHY?

SUGGEST ME THE SOLUTION PLEASE.

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
926

AT USER-COMMAND.
CASE SY-UCOMM.
WHEN 'CBAC'. " Instead of BACK. change to CBAC
CALL SCREEN '0500'.
ENDCASE.

DATA : BEGIN OF IT_MAKT OCCURS 0,

MATNR LIKE MAKT-MATNR,

MAKTX LIKE MAKT-MAKTX,

END OF IT_MAKT.

SELECTION-SCREEN BEGIN OF SCREEN 500 TITLE TITLE." AS WINDOW.

PARAMETERS : P_X TYPE I.

SELECT-OPTIONS SO_MATNR FOR IT_MAKT-MATNR.

SELECTION-SCREEN END OF SCREEN 500.

title = 'MATERIAL NUMBER'.

*WRITE:'HELLO'.

CALL SELECTION-SCREEN '0500'. "STARTING AT 10 10.

SET PF-STATUS 'MENU1'.

AT USER-COMMAND.

CASE SY-UCOMM.

WHEN 'BACK'.

CALL SCREEN '0500'.

ENDCASE.

AT SELECTION-SCREEN.

IF sy-dynnr = '0500'.

IF P_X IS INITIAL.

MESSAGE 'Please enter values' TYPE 'W'.

ELSE.

leave to list-processing ."and return to screen '0500'.

SELECT MATNR MAKTX FROM MAKT INTO TABLE IT_MAKT WHERE MATNR IN SO_MATNR .

LOOP AT IT_MAKT.

WRITE : / IT_MAKT-MATNR , IT_MAKT-MAKTX.

ENDLOOP.

  • IF sy-subrc <> 0.

  • MESSAGE 'No RECORDS found' TYPE 'E'.

  • ENDIF.

ENDIF.

HERE THE BACK BUTTON WICH WAS ADDED IN STANDARD TOOL BAR IS NOT WORKING. WHY?

SUGGEST ME THE SOLUTION PLEASE.

5 REPLIES 5
Read only

Former Member
0 Likes
926

Double click on pf-status 'MENU1' to check whether BACK button is mentioned as text over the ICON. Also ensure that pf status is activated.

Read only

Former Member
0 Likes
926

Hi Sandeep,

Did u give BACK in the menu painter and activate it.

Check out.

Thanks

Vasudha

Read only

0 Likes
926

I DID THAT...BUT ITS NOT WORKING.

CAN YOU PLEASE CHECK OUT THE CODE?

Read only

0 Likes
926

In debugging please check what is captured in sy-ucomm ...

when I test it is capturing 'CBAC' when I press the back button ...

Read only

Former Member
0 Likes
927

AT USER-COMMAND.
CASE SY-UCOMM.
WHEN 'CBAC'. " Instead of BACK. change to CBAC
CALL SCREEN '0500'.
ENDCASE.