Skip to Content
0
Former Member
Dec 04, 2009 at 05:54 AM

Hiding a selection screen

37 Views

Hi,

I have a small issue in hding a selection screen.I am able to hide the screen but when i use a push button to display it i am not able to it.Can some one tell me where i am going wrong .I am herewith sending you the code.If i use the flas then it works.

TABLES VBAK.

SELECTION-SCREEN BEGIN OF SCREEN 9000.

SELECTION-SCREEN PUSHBUTTON 10(5) PB1 USER-COMMAND AB1.

SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.

SELECT-OPTIONS : P_VBELN FOR VBAK-VBELN MODIF ID A1.

SELECTION-SCREEN END OF BLOCK B1.

*DATA FLAG.

SELECTION-SCREEN END OF SCREEN 9000.

INITIALIZATION.

PB1 = 'Push'.

*FLAG = 0.

AT SELECTION-SCREEN OUTPUT.

LOOP AT SCREEN.

IF SCREEN-GROUP1 = 'A1'.

SCREEN-ACTIVE = 0.

  • SCREEN-ACTIVE = FLAG.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

START-OF-SELECTION.

CALL SELECTION-SCREEN 9000.

AT SELECTION-SCREEN.

CASE SY-UCOMM.

WHEN 'AB1'.

  • CLEAR FLAG.

  • FLAG = 1.

CLEAR SCREEN.

LOOP AT SCREEN.

IF SCREEN-GROUP1 = 'A1'.

SCREEN-ACTIVE = 1.

  • SCREEN-ACTIVE = FLAG.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

ENDCASE.

I do not want to use the flag.Can someone tell me what should i do to rectify it.

Thanks

Regards

Harish