using tab-strip

[Former Member]

Hi all...

can any body tell me how to use tab-strip control in screens.

Thanks a lot...

[former_member632729]

Hi Dude,

Go through this link:[http://help.sap.com/saphelp_nw04/helpdata/en/17/5bf1b52ba211d2954f0000e8353423/content.htm]

On Selection Screen

Link:[http://help.sap.com/saphelp_nw04/helpdata/EN/00/deb23789e95378e10000009b38f8cf/content.htm]

.

[Former Member]

hi

Check the coding..

REPORT ZKA_TABSTRIP .

TABLES: ZKA_EMP,ZKA_COM.

CONTROLS: TS TYPE TABSTRIP.."""""""""Declare

DATA: SCREENNO(4) TYPE N. """""Screen no

CALL SCREEN '0003'. """""""""""""""""Call the screen

&----

---

*& Module STATUS_0001 OUTPUT

&----

---

• text

----

---

MODULE STATUS_0001 OUTPUT.

• SET PF-STATUS 'xxxxxxxx'.

• SET TITLEBAR 'xxx'.

IF SCREENNO IS INITIAL.

TS-ACTIVETAB = 'EMP'.

SCREENNO = '0002'.

ENDIF.

ENDMODULE. " STATUS_0001 OUTPUT

&----

---

*& Module USER_COMMAND_0001 INPUT

&----

---

• text

----

---

MODULE USER_COMMAND_0001 INPUT.

IF SY-UCOMM = 'EMP'.

TS-ACTIVETAB = 'EMP'.

SCREENNO = '0002'.

ELSEIF SY-UCOMM = 'COM'.

TS-ACTIVETAB = 'COM'.

SCREENNO = '0003'.

ENDIF.

ENDMODULE. " USER_COMMAND_0001 INPUT

&----

---

*& Module USER_COMMAND_0002 INPUT

&----

---

• text

----

---

MODULE USER_COMMAND_0002 INPUT.

IF SY-UCOMM = 'DISPLAY'.

SELECT SINGLE * FROM ZKA_EMP WHERE EMPNO = ZKA_EMP-EMPNO.

ELSEIF SY-UCOMM = 'SAVE'.

INSERT ZKA_EMP.

ELSEIF SY-UCOMM = 'REFRESH'.

CLEAR ZKA_EMP.

ELSEIF SY-UCOMM = 'EXIT'.

LEAVE PROGRAM.

ENDIF

PROCESS BEFORE OUTPUT.

MODULE STATUS_0100.

call SUBSCREEN ts4 INCLUDING sy-repid SCREENNO ."""""""""""Specify the screen no

PROCESS AFTER INPUT.

MODULE USER_COMMAND_0100.

call SUBSCREEN ts4.

thanks

Dharma