Announcement:
wanna exchange links? contact me at sapchatroom@gmail.com.
Posted by
Admin at
Mike,
I don't think you'll have to do the EXPORT/IMPORT thing-I was focusing more on the assignment of the tab name to the block name. But if you think it would help, here is a larger snippet of code that includes the data definition and the EXPORT statement:
************************************************************************
* S E L E C T I O N - S C R E E N *
************************************************************************
SELECTION-SCREEN BEGIN OF SCREEN 1010 AS SUBSCREEN.
PARAMETERS p_jappd TYPE flag RADIOBUTTON GROUP g1 DEFAULT 'X'.
PARAMETERS p_jappr TYPE flag RADIOBUTTON GROUP g1.
PARAMETERS p_jerr TYPE flag RADIOBUTTON GROUP g1.
SELECTION-SCREEN SKIP.
SELECTION-SCREEN END OF SCREEN 1010.
SELECTION-SCREEN BEGIN OF SCREEN 1030 AS SUBSCREEN.
PARAMETERS p_jcpy TYPE flag RADIOBUTTON GROUP g3 DEFAULT 'X'.
PARAMETERS p_spcc TYPE flag RADIOBUTTON GROUP g3.
PARAMETERS p_mass TYPE flag RADIOBUTTON GROUP g3.
SELECTION-SCREEN SKIP.
PARAMETERS p_path TYPE flag RADIOBUTTON GROUP g3.
PARAMETERS p_pathd TYPE flag RADIOBUTTON GROUP g3.
PARAMETERS p_burn TYPE flag RADIOBUTTON GROUP g3.
PARAMETERS p_burnd TYPE flag RADIOBUTTON GROUP g3.
PARAMETERS p_burnr TYPE flag RADIOBUTTON GROUP g3.
SELECTION-SCREEN END OF SCREEN 1030.
SELECTION-SCREEN BEGIN OF SCREEN 1040 AS SUBSCREEN.
PARAMETERS p_ntxt TYPE flag RADIOBUTTON GROUP g4 DEFAULT 'X'.
PARAMETERS p_ndst TYPE flag RADIOBUTTON GROUP g4.
PARAMETERS p_nsnd TYPE flag RADIOBUTTON GROUP g4.
PARAMETERS p_nrsd TYPE flag RADIOBUTTON GROUP g4.
SELECTION-SCREEN END OF SCREEN 1040.
SELECTION-SCREEN BEGIN OF TABBED BLOCK tabb1 FOR 10 LINES.
SELECTION-SCREEN TAB (11) tabs1 USER-COMMAND tabs1
DEFAULT SCREEN 1010.
*SELECTION-SCREEN TAB (11) tabs2 USER-COMMAND tabs2
* DEFAULT SCREEN 1020. "R3DK907880
SELECTION-SCREEN TAB (11) tabs3 USER-COMMAND tabs3
DEFAULT SCREEN 1030.
SELECTION-SCREEN TAB (12) tabs4 USER-COMMAND tabs4
DEFAULT SCREEN 1040.
SELECTION-SCREEN END OF BLOCK tabb1.
DATA s_tabb1 LIKE tabb1.
************************************************************************
* L O A D - O F - P R O G R A M *
************************************************************************
LOAD-OF-PROGRAM.
d_repid = sy-repid.
* Set selection screen tab titles.
tabs1 = text-001.
* tabs2 = text-002. "R3DK907880
tabs3 = text-003.
tabs4 = text-004.
************************************************************************
* A T S E L E C T I O N - S C R E E N *
************************************************************************
AT SELECTION-SCREEN OUTPUT.
* Note: The selection screen loses track of which tab it was on upon
* returning from a called transaction. This import/export mess is to
* help it remember.
IMPORT s_tabb1 FROM MEMORY.
IF NOT s_tabb1 IS INITIAL.
tabb1 = s_tabb1.
ENDIF.
AT SELECTION-SCREEN.
CLEAR s_tabb1.
EXPORT s_tabb1 TO MEMORY.
IF sy-ucomm = 'DOCU'. "Info button on toolbar
CALL FUNCTION 'DSYS_SHOW_FOR_F1HELP'
EXPORTING
dokclass = 'RE'
dokname = d_repid
EXCEPTIONS
class_unknown = 1
object_not_found = 2
OTHERS = 3.
ENDIF.
************************************************************************
* S T A R T - O F - S E L E C T I O N *
************************************************************************
START-OF-SELECTION.
s_tabb1 = tabb1.
EXPORT s_tabb1 TO MEMORY.
Cheers,
Terry
| | | ---------------Original Message---------------
From: Mike Hammond
Sent: Monday, August 01, 2011 6:48 PM
Subject: Call subscreen of selection screen on validation error
Hi Terry,
Thanks so much for the tip; I'm giving it a try right now. Any chance you could tell me where you did your export and how you defined s_tabb1?
thanks again,
mike |
| __.____._ Copyright © 2011 Toolbox.com and message author.
Toolbox.com 4343 N. Scottsdale Road Suite 280, Scottsdale, AZ 85251
| |  TerryB
SAP ABAP Helper
Posted helpful replies on 5 threads in a group to earn a Bronze Achievement Popular White Papers
In the Spotlight View the "Managing the Application Life Cycle" webinar and learn how organizations optimize their SAP applications.  _.____.__ |
