hide tabstrip at runtime in module pool

[Former Member]

Hi all,

I have problem in module pool programming, how can i hide the whole tabstrip control at runtime?

Thanks & regards,

SAHIR

[Former Member]

Hi,

If youwant to hide it based on Tcode.

U have to call the subscreen right.

Check with sy-tcode.

If sy-tcode matches call the screen other wise don't call it.

other wise Try with this...

Tabstrip is nothing but the screen element, so what you can do is

in PBO of the screen give some module to modify the screen.

module moify_screen.

module modify_screen.

loop at screen.

if screen-name = 'TAB3' and some condition."decide

screen-invisible = 1.

modify screen.

endif.

endloop.

endmodule.

Regards,

Raj.

[Former Member]

Hi,

Set tabstrip-AKTIV = space.

regards,

lavanya

[Former Member]

hi lavanya,

when i put your code in my program the error comes like there is no property like AKTIV for tabstrip control.

Thanks & Regards,

SAHIR

[Former Member]

Hi,

You create a empty subscreen with the same size and width as that of your tabstrip. based on your condition you call this empty subscreen when you want to hide your entire tabstrip control. This is the method normally i use to hide a subscreen.

Hope this helps.

Thanks and Regards.

Aswath.

[Former Member]

aswathsa

Your solution to switch subscreens is perfect!

Thanks a lot!

Regards,

bob.

[Former Member]

Hi bobens,

aswathsa
> 
> Your solution to switch subscreens is perfect!
> Thanks a lot!
> 
> Regards,
> bob.

Its good to here you found solution based on this method.

Thanks.

Aswath.

[Former Member]

hi

good

Check with sy-tcode.

If sy-tcode matches call the next tab strip screen other wise don't call it.

thanks

mrutyun^

[Former Member]

here check this..

tab1 and tab2 are names of tabs of tabstrip..

main program

&----

---

*& Report Z15_3 *

*& *

&----

---

*& *

*& *

&----

---

REPORT Z15_3 .

CONTROLS TABCON TYPE TABSTRIP.

DATA: OK_CODE TYPE SY-UCOMM,

SAVE_OK TYPE SY-UCOMM.

CALL SCREEN 9003.

&----

---

*& Module STATUS_9003 OUTPUT

&----

---

• text

----

---

MODULE STATUS_9003 OUTPUT.

SET PF-STATUS 'BASE'.

SET TITLEBAR 'TITLE'.

• DATA : CARRID TYPE SCARR-CARRID.

LOOP AT SCREEN.

IF SCREEN-NAME = 'TAB1' OR SCREEN-NAME = 'TAB2'.

SCREEN-INVISIBLE = 1.

SCREEN-ACTIVE = 0.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

ENDMODULE. " STATUS_9003 OUTPUT

&----

---

*& Module USER_COMMAND_9003 INPUT

&----

---

• text

----

---

MODULE USER_COMMAND_9003 INPUT.

ENDMODULE. " USER_COMMAND_9003 INPUT

flow logic

PROCESS BEFORE OUTPUT.

MODULE STATUS_9003.

CALL SUBSCREEN : SUB1 INCLUDING SY-CPROG '0101',

SUB2 INCLUDING SY-CPROG '0102'.

*

PROCESS AFTER INPUT.

CALL SUBSCREEN: SUB1,

SUB2.

MODULE USER_COMMAND_9003.

[Former Member]

Hi sahir vhora

Did you solve your problem?

I tried code suggested by Kamini Rawat

...
LOOP AT SCREEN.
  IF SCREEN-NAME = 'TAB1' OR SCREEN-NAME = 'TAB2'.
    SCREEN-INVISIBLE = 1.
    SCREEN-ACTIVE = 0.
    MODIFY SCREEN.
  ENDIF.
ENDLOOP.

... tabs are getting invisible tht's right ... But there is still gray rectangle (subscreen area) appearing.

How to get rid of this?

Regards,

Bob.

[former_member226225]

Hi,

This is the following code related to hide the TABSTRIP CONTROL at runtime.

I am using SCREEN structure for hiding tabstrip control and write the following code in PBO Event.

module STATUS_0100 output.

SET PF-STATUS 'ABC'.

controls tab TYPE TABSTRIP .

loop at screen.

if screen-name = 'TAB1' or screen-name = 'TAB2'.

screen-invisible = '1'.

screen-input = '0'.

endif.

modify screen.

endloop.

endmodule. " STATUS_0100 OUTPUT

Thanks & Regards,

Raghunadh . K