Want to use ldb selection screen with select queries

I want to use ldb selection screen with select queries since ldb having performance issue .How can I use the fields of the dynamic selection of LDB in the select queries

Hi,
Check the code snippet below: Here 'XXXX' is the table for your select query.
DATA L_DS_CLAUSES TYPE RSDS_WHERE.
MOVE 'XXXX' TO L_DS_CLAUSES-TABLENAME.
READ TABLE DYN_SEL-CLAUSES WITH KEY L_DS_CLAUSES-TABLENAME
                             INTO L_DS_CLAUSES.
SELECT * FROM XXXX
          WHERE field1 IN ...
           AND   field2 ....
           AND (L_DS_CLAUSES-WHERE_TAB).
      PUT XXXX.
ENDSELECT.
You can also try using the FM 'RS_REFRESH_FROM_DYNAMICAL_SEL' passing SY-CPROG in curr_report and 'M' for mode to get the dynamic selection screen values.
Regards,
Munesh.

Similar Messages

Validate plant and material on selection screen with select-options

Hi all,
I want to validate plant and material on selection screen. More over I need to validate the combination of that also (i.e plant based materials). Individually I made the validations, but combination I didnt get it.
For your information both are select-options, please reply me if you have an idea. The table to get the relationship is KEKO. <b>I have the below code for parameters, but I require code for select options.</b>
SELECT MATNR WERKS FROM KEKO UP TO 1 ROWS
INTO (KEKO-MATNR, KEKO-WERKS)
WHERE MATNR = P_MATNR AND
WERKS = P_WERKS.
IF SY-SUBRC <> 0.
MESSAGE E023 WITH 'COST ESTIMATE NOT FOUND FOR '
P_MATNR P_WERKS 'COMBINATION'.
ENDIF.
ENDSELECT.
Surely I will reward you.
Thanks in Advance,
Raghu.

Raghu,
You can't validate on select-options, MARC will have N to 1 relation between Material and plant.
You can do one thing, keep material as select-option and plant as parameter, now you can validate the materials on plant level.
Reward if this helps,
Satish

How to replace the existing selection screen with new selection screen

Hi,
I have first selection screen with parametre as a table name, then I have created dynamic selection screen as 2nd selection screen with different fields of that table as select options. This is done using genaration of dynamic report. Now If I click on button on this 2nd selction screen , then I want to replace this 2nd dynamic selection screen , with the other selection screen fields.
Can anybody guide me, How to do replace one slection screen with different selection screen.
and one imp thing is this selction screen is populating with dynamic fields on it.
Regards,
Mrunal

As I can understand you want to make some of the screen field to disable or visible on screen depending upon the interaction of user with screen 1.
You may use this example code in PBO of screen 2.
LOOP AT SCREEN.
    " action has been taken to modify the area office screen as per the option chosen at screen 99.
    CASE ACTION.
        " if the user has taken up the option of UPLOAD
      WHEN 'UP'.     " screen processing while we upload the plan
        " during upload we will make dates as output fields only
        IF SCREEN-NAME = 'ZSDTPLANVRSIO-DAT_TO' OR SCREEN-NAME = 'ZSDTPLANVRSIO-DAT_FRM'.
          SCREEN-INPUT = 0.
          MODIFY SCREEN.
        ENDIF.
        " also make 2 buttons disabled
        IF SCREEN-NAME = 'AO_DO' OR SCREEN-NAME = 'AO_VE'.
          SCREEN-ACTIVE = 0.
          MODIFY SCREEN.
        ENDIF.
      WHEN 'DN'.      " screen processing while we upload the approved plan
        " during upload we will make dates as output fields only
        IF SCREEN-NAME = 'ZSDTPLANVRSIO-DAT_TO' OR SCREEN-NAME = 'ZSDTPLANVRSIO-DAT_FRM'.
          SCREEN-INPUT = 0.
          MODIFY SCREEN.
        ENDIF.
        " also make 2 buttons disabled
        IF SCREEN-NAME = 'AO_UP' OR SCREEN-NAME = 'AO_VE'.
          SCREEN-ACTIVE = 0.
          MODIFY SCREEN.
        ENDIF.
      WHEN 'VW'.      " screen processing while we view the plan
        " during upload we will make dates as output fields only
        IF SCREEN-NAME = 'ZSDTPLANVRSIO-DAT_TO' OR SCREEN-NAME = 'ZSDTPLANVRSIO-DAT_FRM'.
          SCREEN-INPUT = 0.
          MODIFY SCREEN.
        ENDIF.
        " also make 2 buttons disabled
        IF SCREEN-NAME = 'RLGRAP-FILENAME' OR SCREEN-NAME = 'FNAME'.
          SCREEN-ACTIVE = 0.
          MODIFY SCREEN.
        ENDIF.
        " and hide the file input field
        IF SCREEN-NAME = 'AO_DO' OR SCREEN-NAME = 'AO_UP'.
          SCREEN-ACTIVE = 0.
          MODIFY SCREEN.
        ENDIF.
    ENDCASE.
ENDLOOP.

Modifying selection screen with help of radio buttons

Hi,
In my program am using three parameters to download a three different files and I have to use radiobuttons for that.
I want to download only one file at a time.
I have used MODIF ID but it is not working for 3 Parameters but it is working for only two parameters.
Please help me out!!!!!!!!!

Hi,
check with the following code
* Parameters and Selection Options
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS: s_lifnr FOR lfm1-lifnr .
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.
PARAMETERS:
   r_asn RADIOBUTTON GROUP rad1 USER-COMMAND uc1 DEFAULT 'X',
   r_ers RADIOBUTTON GROUP rad1 ,
   r_830 RADIOBUTTON GROUP rad1,
   r_850 RADIOBUTTON GROUP rad1,
   r_862 RADIOBUTTON GROUP rad1,
   r_810 RADIOBUTTON GROUP rad1,
   r_820 RADIOBUTTON GROUP rad1,
   r_824 RADIOBUTTON GROUP rad1.
SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN BEGIN OF BLOCK b3 WITH FRAME TITLE text-003.
SELECT-OPTIONS: s_bstae   FOR lfm1-bstae MODIF ID sd1.
PARAMETERS:
   p_ekorg   TYPE lfm1-ekorg   MODIF ID md1,
   p_evcode TYPE edp21-evcode MODIF ID md2,
   p_kappl   TYPE nach-kappl   MODIF ID md3,
   p_parvw   TYPE nach-parvw   MODIF ID md4,
   p_kschl   TYPE nach-kschl   MODIF ID md5,
   p_vakey   TYPE nach-vakey   MODIF ID md6,
   p_werks   TYPE werks_d      MODIF ID md7,
   p_bukrs   TYPE lfb1-bukrs   MODIF ID md8.
SELECTION-SCREEN END OF BLOCK b3.
*eject
* Initialization
INITIALIZATION.
* PERFORM check_authorization.
*eject
* at selection screen
*AT SELECTION-SCREEN.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
    IF r_asn EQ 'X'
      AND ( screen-group1 = 'MD3' or screen-group1 = 'MD4'
         or screen-group1 = 'MD5' or screen-group1 = 'MD6'
         or screen-group1 = 'MD7' or screen-group1 = 'MD8').
      screen-active = '0'.
      screen-invisible = '1'.
      screen-input = '0'.
      screen-output = '0'.
    ELSEIF r_ers EQ 'X'
      AND ( screen-group1 = 'SD1' or screen-group1 = 'MD1'
         or screen-group1 = 'MD2' or screen-group1 = 'MD3'
         or screen-group1 = 'MD4' or screen-group1 = 'MD5'
         or screen-group1 = 'MD6' or screen-group1 = 'MD7'
         or screen-group1 = 'MD8').
      screen-active = '0'.
      screen-invisible = '1'.
      screen-input = '0'.
      screen-output = '0'.
    ELSEIF r_830 EQ 'X'
      AND ( screen-group1 = 'SD1' or screen-group1 = 'MD1'
         or screen-group1 = 'MD2' or screen-group1 = 'MD6'
         or screen-group1 = 'MD7' or screen-group1 = 'MD8').
      screen-active = '0'.
      screen-invisible = '1'.
      screen-input = '0'.
      screen-output = '0'.
    ELSEIF r_850 EQ 'X'
      AND ( screen-group1 = 'SD1' or screen-group1 = 'MD1'
         or screen-group1 = 'MD2' or screen-group1 = 'MD6'
         or screen-group1 = 'MD7' or screen-group1 = 'MD8').
      screen-active = '0'.
      screen-invisible = '1'.
      screen-input = '0'.
      screen-output = '0'.
    ELSEIF r_862 EQ 'X'
      AND ( screen-group1 = 'SD1' or screen-group1 = 'MD1'
         or screen-group1 = 'MD2' or screen-group1 = 'MD8').
      screen-active = '0'.
      screen-invisible = '1'.
      screen-input = '0'.
      screen-output = '0'.
    ELSEIF r_810 EQ 'X'
      AND ( screen-group1 = 'MD3' or screen-group1 = 'MD4'
         or screen-group1 = 'MD5' or screen-group1 = 'MD6'
         or screen-group1 = 'MD7' or screen-group1 = 'MD8').
      screen-active = '0'.
      screen-invisible = '1'.
      screen-input = '0'.
      screen-output = '0'.
    ELSEIF r_820 EQ 'X'
      AND ( screen-group1 = 'SD1' or screen-group1 = 'MD1'
         or screen-group1 = 'MD2' or screen-group1 = 'MD3'
         or screen-group1 = 'MD4' or screen-group1 = 'MD5'
         or screen-group1 = 'MD6' or screen-group1 = 'MD7' ).
      screen-active = '0'.
      screen-invisible = '1'.
      screen-input = '0'.
      screen-output = '0'.
    ELSEIF r_824 EQ 'X'
      AND ( screen-group1 = 'SD1' or screen-group1 = 'MD1'
         or screen-group1 = 'MD2' or screen-group1 = 'MD3'
         or screen-group1 = 'MD4' or screen-group1 = 'MD5'
         or screen-group1 = 'MD6' or screen-group1 = 'MD7'
         or screen-group1 = 'MD8').
      screen-active = '0'.
      screen-invisible = '1'.
      screen-input = '0'.
      screen-output = '0'.
    ENDIF.
    MODIFY SCREEN.
ENDLOOP.
*eject
* Event top of page
TOP-OF-PAGE.
*eject
* event Start of Selection
START-OF-SELECTION.
*eject
*EVENT End-of selection
END-OF-SELECTION.
*eject
*EVENT End-of page
END-OF-PAGE.
Regards,
Vikas.
plz reward if helpful..

Selection screen with Muliple tabs

Morning All
I have a selection screen with 3 tabs depicting 3 separate selection screens in effect. There are certain fields (parameters and select options) that I would like to keep synchronized between the 3 screens. Is there a neat way of doing this?
Cheers
Ian

Hi Ian,
I don't quite understand as to what "synchronisation" means here.
Though anything you would want to do on a Selection Screen, can be handled in the event
<b>AT SELECTION-SCREEN OUTPUT.</b>
This event acts like PBO for the selection screen.
For example, if you have parameter, P1 on Tab 1 and parameter P2 on Tab2, then to equate (assuming that it is "synchronisation"), you could code.
AT SELECTION-SCREEN OUTPUT.
P2 = P1.
Enter the value "10" in P1 on Tab1, click Tab2, P2 will display "10".
You could control this using conditions on flag variables.
Hope this helps.
Best Regards,
Sanyam
Message was edited by: Sanyam Kapur (correction to code)

Can you giv me a brief introduction regarding selection screen with one eg:

Hello
can you giv me a brief introduction regarding selection screen with one eg:

Hi Ranjith,
Selection Screens
Selection screens are one of the three types of screen in the R/3 System, along with dialog screens and lists. You use them whenever you want the user to enter either a single value for a field or fields, or to enter selection criteria.
Function
ABAP programs use screens to obtain input from users. The most general type of screen is a dialog screen, which you create using the ABAP Workbench tools Screen Painter and Menu Painter These tools allow you to create screens for data input and output. However, each of these screens requires its own flow logic.
Defining and Calling Selection Screens
You often use screens purely for data input . In these cases, you can use a selection screen. Selection screens provide a standardized user interface in the R/3 System. Users can enter both single values and complex selections. Input parameters are primarily used to control the program flow, while users can enter selection criteria to restrict the amount of data read from the database. You can create and save predefined sets of input values in the ABAP Editor for any selection screen. These are called variants. Texts on the selection screen are stored as language-specific selection texts in the program text elements. If you start an executable report using the SUBMIT statement, the input fields of the selection screen also serve as a data interface.
Defining and Calling Selection Screens
You define selection screens using ABAP statements in a program. Simple statements allow you to create input fields, checkboxes, and radio buttons, and design the screen layout. If you want to create a screen exclusively for data input, you do not need to create it using the normal dialog programming tools. When you create a selection screen, the system automatically assumes the tasks of the Screen Painter and Menu Painter.
The rules for calling and defining selection screens in ABAP programs depend on the program type:
·         Executable program (type 1) without logical database
You can use a single standard selection screen and as many user-defined selection screens as you wish. The standard selection screen is called automatically when you start the program. User-defined selection screens, on the other hand, are called using the CALL SELECTION-SCREEN statement in a program. The standard selection screen always has the screen number 1000. User-defined selection screens can have any screen number except 1000.
·         Executable program (type 1) with logical database
The standard selection screen for an executable program linked to a logical database is made up of the logical database selections and the program selections.
·         Module pools (type M) and function modules (type F)
You can only use user-defined selection screens in module pools and function modules. These can have any number apart from 1000. You can only call a selection screen from a function module using the CALL SELECTION-SCREEN statement. You can also define selection screens as Subscreens and incorporate them in screens or tabstrip controls.
Hope this is useful.
regards
Ram
Message was edited by:
        Ramanujan Chitrakootam

How to design selection screen with WAD 3.x Web Items

Hi Guruu2019s,
I have a requirement where I need to design a selection screen by using WAD 3.x web items. In the selection screen we have to include the Query Description - in the left corner of the selection screen, Name of Sales Person u2013 left side of the screen, Date from and Date to u2013 right side of the selection screen, User ID and User Name u2013 on the top right of the selection screen etc., after this on the bottom of the selection screen I have to include the pushbutton RUN REPORT.
After filling all the above parameters and click on Run Report it has to trigger another URL link which contains consolidated Sales CRM Report.
Could any one suggest me and provide me the idea on developing the selection screen with WAD 3.x Web items and is there any other interface to trigger the other URL link when I click on Run Report.
Regards
Venkat

no replies. Closing the incident

Tabbed selection screen with AT SELECTION-SCREEN ON events does not work

I have a selection screen with 3 tabs fields on each tab have AT SELECTION-SCREEN ON field events.
If you are on tab 1 and select a variant that populates fields on all tabs and then click the execute button ABAP does not seem to recognize that the field has changed when it executes AT SELECTION-SCREEN ON field event unless you physically go to each tab.
I can work around this by:
1) moving all of the AT SELECTION-SCREEN ON field events in a AT SELECTION-SCREEN OUTPUT event. This is not efficient and it potentially opens me up to other problems.
2) changing the selection screen to remove the tabs and have all of the fields on 1 screen. This makes for a very long screen.
Is there any way to have ABAP check all tabs?
Thanks,
Jerry

I finally got it to start. Let it sit and tried and it wouldn't but then I tried again and it did. How do I blow the dust out? I think it must be something with the heat since that comes up alot.
I will do it, I love my Mac.

Dynamic selection screen with ABAP web dynpro

Hi all.
    How can I create dynamic selection screen with ABAP web dynpro? Thank you in advance.

hi yinglak.....
         this is possible........ all the ui elelments has the property called visible and enabled.... just assign an attribute of type wdui_visibility to the visible property....
in the wddomodify method..... check for the radio button value and pass the value true or false to this attribute and it gets changed automatically.
---regards,
   alex b justin

How to display the selection screen with icons as well as with text element

How to display the selection screen with icons as well as with texts (written in text elements) for PlantDate, OrderType,WareHouse..

Report zex33.
type-pools: icon.
selection-screen begin of line.
selection-screen comment 1(20) text_001.
parameters: p_werks type marc-werks.
selection-screen end of line.
selection-screen begin of line.
selection-screen comment 1(20) text_002.
parameters: p_whouse(10).
selection-screen end of line.
selection-screen begin of line.
selection-screen comment 1(20) text_003.
parameters: p_auart like vbak-auart.
selection-screen end of line.
initialization.
write ICON_PLANT as icon to text_001.
concatenate text_001 text-001 into text_001 separated by space.
write ICON_WAREHOUSE as icon to text_002.
concatenate text_002 text-002 into text_002 separated by space.
write ICON_ORDER as icon to text_003.
concatenate text_003 text-003 into text_003 separated by space.

Selection screen with radio button groups

hi experts,
i have 3 frames in selection screen. in first frame i have two radio buttons. if i select 1st radio button 2nd frame should be in active and 3rd frame should be disable mode. if i select 2nd radio button then 3rd frame should be in active and other 2nd frame should be disable mode. in which event i need to write the code.
can any one help me regarding this and give some sample code.
rgds,
nag.

Here is the example which will explain it completely :
*& Report Z_sscr                                                 *
* Published at ****************
*&DYNAMIC Selection screen based on user clicks on the radiobutton*
REPORT zsscr.
*TYPE POOLS DECLARATIONS FOR VALUE REQUEST MANAGER AND ICONS
TYPE-POOLS : vrm,
             icon.
*SELECTION SCREEN FIELDS
TABLES : sscrfields.
*GLOBAL DECLARATIONS
DATA : flag TYPE c,
      tablename(10),
      mmtable LIKE dd02l-tabname,
      sdtable LIKE dd02l-tabname,
      hrtable LIKE dd02l-tabname.
*DECLARATIONS FOR SELECTION SCREEN STATUS
DATA it_ucomm TYPE TABLE OF sy-ucomm.
***********SELECTION-SCREENS**********************
SELECTION-SCREEN BEGIN OF BLOCK blk1 WITH FRAME.
*FOR DYNAMIC DISPLAY OF MODULES
PARAMETERS : pa RADIOBUTTON GROUP rad USER-COMMAND com MODIF ID mod,
              pb RADIOBUTTON GROUP rad MODIF ID rad,
              pc RADIOBUTTON GROUP rad MODIF ID cad.
SELECTION-SCREEN SKIP.
**TO INCLUDE DYNAMIC ICONS
SELECTION-SCREEN COMMENT 2(6) text_001.
*DYNAMIC LIST BOX BASED ON USER SELECTIONS
PARAMETERS one AS LISTBOX VISIBLE LENGTH 20 MODIF ID mod.
PARAMETERS two AS LISTBOX VISIBLE LENGTH 20   MODIF ID rad.
PARAMETERS three AS LISTBOX VISIBLE LENGTH 20 MODIF ID cad.
SELECTION-SCREEN END OF BLOCK blk1.
*DISPLAY DYNAMIC PUSHBUTTON ON APP TOOLBAR ON USER CLICKS
SELECTION-SCREEN: FUNCTION KEY 1,
                  FUNCTION KEY 2,
                  FUNCTION KEY 3.
**EVENT ON SELECTION SCREEN FOR OUTPUT DISPLAY
AT SELECTION-SCREEN OUTPUT.
*CLICK OF FIRST RADIO BUTTON
IF pa = 'X'.
    sscrfields-functxt_01 = 'Materials Management'.
    WRITE icon_plant AS ICON TO text_001.
*CODE TO GET DYNAMICS BASED ON THE SELECTED RADIO
    LOOP AT SCREEN.
      IF screen-group1 = 'MOD'.
        screen-intensified = '1'.
        screen-active = 1.
        screen-display_3d = '1'.
        MODIFY SCREEN.
      ENDIF.
      IF screen-group1 = 'RAD'.
        screen-intensified = '0'.
        screen-active = 0.
        screen-display_3d = '0'.
        MODIFY SCREEN.
      ENDIF.
      IF screen-group1 = 'CAD'.
        screen-intensified = '0'.
        screen-active = 0.
        screen-display_3d = '0'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
ENDIF.
*CLICK OF SECOND RADIO
IF pb = 'X'.
    sscrfields-functxt_02 = 'Sales And Distribution'.
    WRITE icon_ws_ship AS ICON TO text_001.
    LOOP AT SCREEN.
      IF screen-group1 = 'RAD'.
        screen-intensified = '1'.
        screen-active = 1.
        screen-display_3d = '1'.
        MODIFY SCREEN.
      ENDIF.
      IF screen-group1 = 'MOD'.
        screen-intensified = '0'.
        screen-active = 0.
        screen-display_3d = '0'.
        MODIFY SCREEN.
      ENDIF.
      IF screen-group1 = 'CAD'.
        screen-intensified = '0'.
        screen-active = 0.
        screen-display_3d = '0'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
ENDIF.
*CLICK OF THIRD RADIO
IF pc = 'X'.
    sscrfields-functxt_03 = 'Human Resources'.
    WRITE icon_new_employee AS ICON TO text_001.
    LOOP AT SCREEN.
      IF screen-group1 = 'RAD'.
        screen-intensified = '0'.
        screen-active = 0.
        screen-display_3d = '0'.
        MODIFY SCREEN.
      ENDIF.
      IF screen-group1 = 'MOD'.
        screen-intensified = '0'.
        screen-active = 0.
        screen-display_3d = '0'.
        MODIFY SCREEN.
      ENDIF.
      IF screen-group1 = 'CAD'.
        screen-intensified = '1'.
        screen-active = 1.
        screen-display_3d = '1'.
        MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
ENDIF.
*CUSTOMISING THE TOOLBARS OF THE SELECTION SCREEN
*WITH F8 BUTTON DISABLED
APPEND : 'PRIN' TO it_ucomm,
            'SPOS' TO it_ucomm,
            'ONLI' TO it_ucomm.
CALL FUNCTION 'RS_SET_SELSCREEN_STATUS'
    EXPORTING
      p_status = sy-pfkey
    TABLES
      p_exclude = it_ucomm.
**EVENT ON THE SELECTION
AT SELECTION-SCREEN.
* LIST BOX ONE VALUES
CASE one.
    WHEN '1'.
      mmtable = 'MARC'.
    WHEN '2'.
      mmtable = 'MARA'.
    WHEN '3'.
      mmtable = 'MARD'.
    WHEN '4'.
      mmtable = 'MARM'.
ENDCASE.
* LIST BOX TWO VALUES
CASE two.
    WHEN '1'.
      sdtable = 'VBAK'.
    WHEN '2'.
      sdtable = 'VBAP'.
    WHEN '3'.
      sdtable = 'VBUK'.
    WHEN '4'.
      sdtable = 'VBUP'.
ENDCASE.
* LIST BOX THREE VALUES
CASE three.
    WHEN '1'.
      hrtable = 'PA0001'.
    WHEN '2'.
      hrtable = 'PA0006'.
    WHEN '3'.
      hrtable = 'PA0022'.
    WHEN '4'.
      hrtable = 'PA0008'.
ENDCASE.
*VALUES FOR CLICK OF THE PUSHBUTTON ON APP TOOLBAR
*AND ENABLING THE BUTTONS TO PERFORM F8
CASE sscrfields-ucomm.
    WHEN 'FC01'.
      tablename = mmtable.
      sscrfields-ucomm = 'ONLI'.
    WHEN 'FC02'.
      tablename = sdtable.
      sscrfields-ucomm = 'ONLI'.
    WHEN 'FC03'.
      tablename = hrtable.
      sscrfields-ucomm = 'ONLI'.
ENDCASE.
*INITIALIZATION EVENT
INITIALIZATION.
*VALUES ASSIGNED TO DROPDOWNLISTS IN THE SUBROUTINES
PERFORM f4_value_request_pa.
PERFORM f4_value_request_pb.
PERFORM f4_value_request_pc.
*START OF SELECTION EVENT
START-OF-SELECTION.
*SUBROUTINE FOR OUTPUT
PERFORM output.
*&      Form f4_value_request_PA
*       text
*SUBROUTINE TO PROVIDE DROPDOWN VALUES TO LIST1
FORM f4_value_request_pa.
DATA: l_name TYPE vrm_id,
        li_list TYPE vrm_values,
        l_value LIKE LINE OF li_list.
l_value-key = '1'.
l_value-text = 'Plant Data for Material'.
APPEND l_value TO li_list.
CLEAR l_value.
l_value-key = '2'.
l_value-text = 'General Material Data'.
APPEND l_value TO li_list.
CLEAR l_value.
l_value-key = '3'.
l_value-text = 'Storage Location Data for Material'.
APPEND l_value TO li_list.
CLEAR l_value.
l_value-key = '4'.
l_value-text = 'Units of Measure for Material'.
APPEND l_value TO li_list.
CLEAR l_value.
l_name = 'ONE'.
CALL FUNCTION 'VRM_SET_VALUES'
    EXPORTING
      id              = l_name
      values          = li_list
    EXCEPTIONS
      id_illegal_name = 1
      OTHERS          = 2.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ENDFORM. " f4_value_request_tabname
*&      Form f4_value_request_PB
*       text
*SUBROUTINE TO PROVIDE DROPDOWN VALUES TO LIST2
FORM f4_value_request_pb.
DATA: l_name TYPE vrm_id,
        li_list TYPE vrm_values,
        l_value LIKE LINE OF li_list.
l_value-key = '1'.
l_value-text = 'Sales Document: Header Data'.
APPEND l_value TO li_list.
CLEAR l_value.
l_value-key = '2'.
l_value-text = 'Sales Document: Item Data'.
APPEND l_value TO li_list.
CLEAR l_value.
l_value-key = '3'.
l_value-text = 'Sales Document:Header Status'.
APPEND l_value TO li_list.
CLEAR l_value.
l_value-key = '4'.
l_value-text = 'Sales Document: Item Status'.
APPEND l_value TO li_list.
CLEAR l_value.
l_name = 'TWO'.
CALL FUNCTION 'VRM_SET_VALUES'
    EXPORTING
      id              = l_name
      values          = li_list
    EXCEPTIONS
      id_illegal_name = 1
      OTHERS          = 2.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ENDFORM. " f4_value_request_PB
*&      Form f4_value_request_PC
*       text
*SUBROUTINE TO PROVIDE DROPDOWN VALUES TO LIST3
FORM f4_value_request_pc.
DATA: l_name TYPE vrm_id,
        li_list TYPE vrm_values,
        l_value LIKE LINE OF li_list.
l_value-key = '1'.
l_value-text = 'HR Master :Infotype 0001 (Org. Assignment)'.
APPEND l_value TO li_list.
CLEAR l_value.
l_value-key = '2'.
l_value-text = 'Address Infotype 0006'.
APPEND l_value TO li_list.
CLEAR l_value.
l_value-key = '3'.
l_value-text = 'Education Infotype 0022'.
APPEND l_value TO li_list.
CLEAR l_value.
l_value-key = '4'.
l_value-text = 'Basic Pay Infotype 0008'.
APPEND l_value TO li_list.
CLEAR l_value.
l_name = 'THREE'.
CALL FUNCTION 'VRM_SET_VALUES'
    EXPORTING
      id              = l_name
      values          = li_list
    EXCEPTIONS
      id_illegal_name = 1
      OTHERS          = 2.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ENDFORM. " f4_value_request_PC
*&      Form OUTPUT
*       text
*      -->P_TABLENAME text
*fINAL OUTPUT
FORM output.
DATA p_table(10).
p_table = tablename.
*popup to display teh selected table and
*Continue button is clicked
CALL FUNCTION 'POPUP_TO_DISPLAY_TEXT'
    EXPORTING
      titel        = 'User Selections '
      textline1    = p_table
      textline2    = 'is the Selected table'
      start_column = 25
      start_row    = 6.
*assigning the table value in p_table to the
* Table in SE16 transaction by explicitly calling
SET PARAMETER ID 'DTB' FIELD p_table.
CALL TRANSACTION 'SE16'.
ENDFORM.                    "OUTPUT
Reward If found Helpful.

Dynamically calling selection screens with obligatory

TABLES :
******selection-screen: begin of block bal with frame title txt3.
******parameters: RB1 radiobutton group rd1 user-command abc default 'X'.
******parameters: RB2 radiobutton group rd1.
******selection-screen: end of block bal.
******selection-screen: begin of block B1 with frame title txt1.
******SELECT-OPTIONS : s_cust FOR KNA1-kunnr OBLIGATORY MODIF ID r1.
******SELECT-OPTIONS : s_plant FOR plko-werks OBLIGATORY MODIF ID r1 .
******selection-screen: end of block val.
******selection-screen: begin of block upd with frame title txt2.
******SELECT-OPTIONS: s_vend FOR lfa1-lifnr OBLIGATORY modif id r2.
******SELECT-OPTIONS: s_plan FOR plko-werks OBLIGATORY modif id r2.
******selection-screen: end of block upd.
Here i need to call these two selection screens dynamically depends on radio buttion selection.
But
Problem is a arising when when both are obligatory in selection screen ( with out obligatory , it is working fine)
I need to call screens dynamically, ecen though we have obligatory
Let me know procedure , the possibility of same funcationality in tabstips & selection screen.
Madhu

Hi Madhu,
You have to write code in AT SELECTION-SCREEN OUTPUT event.
First of all remove obligatory from select-options declaration. Do it dynamically in AT SELECTION-SCREEN OUTPUT event.
You enable or disable the block depending upon the rediobutton selected. Then in the venet AT SELECTION-SCREEN ON field, you can check whethere user has entered data into that field or not depending upon the radiobutton selected.
TABLES : kna1,
         plko,
         lfa1.
SELECTION-SCREEN: BEGIN OF BLOCK bal WITH FRAME TITLE txt3.
PARAMETERS: rb1 RADIOBUTTON GROUP rd1 USER-COMMAND abc DEFAULT 'X'.
PARAMETERS: rb2 RADIOBUTTON GROUP rd1.
SELECTION-SCREEN: END OF BLOCK bal.
SELECTION-SCREEN: BEGIN OF BLOCK b1 WITH FRAME TITLE txt1.
SELECT-OPTIONS : s_cust FOR kna1-kunnr MODIF ID r1.
SELECT-OPTIONS : s_plant FOR plko-werks MODIF ID r1 .
SELECTION-SCREEN: END OF BLOCK b1.
SELECTION-SCREEN: BEGIN OF BLOCK upd WITH FRAME TITLE txt2.
SELECT-OPTIONS: s_vend FOR lfa1-lifnr MODIF ID r2.
SELECT-OPTIONS: s_plan FOR plko-werks MODIF ID r2.
SELECTION-SCREEN: END OF BLOCK upd.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
    IF rb1 EQ 'X'.
      IF ( screen-name EQ 'S_CUST-LOW'
        OR screen-name EQ 'S_CUST-HIGH'
        OR screen-name EQ 'S_PLANT-LOW'
        OR screen-name EQ 'S_PLANT-HIGH') .
        screen-active = '1' .
      ENDIF.
      IF ( screen-name EQ 'S_VEND-LOW'
        OR screen-name EQ 'S_VEND-HIGH'
        OR screen-name EQ 'S_PLAN-LOW'
        OR screen-name EQ 'S_PLAN-HIGH') .
        screen-active = '0' .
      ENDIF.
    ELSEIF rb2 EQ 'X'.
      IF ( screen-name EQ 'S_VEND-LOW'
        OR screen-name EQ 'S_VEND-HIGH'
        OR screen-name EQ 'S_PLAN-LOW'
        OR screen-name EQ 'S_PLAN-HIGH') .
        screen-active = '1' .
      ENDIF.
      IF ( screen-name EQ 'S_CUST-LOW'
        OR screen-name EQ 'S_CUST-HIGH'
        OR screen-name EQ 'S_PLANT-LOW'
        OR screen-name EQ 'S_PLANT-HIGH') .
        screen-active = '0' .
      ENDIF.
    ENDIF.
    MODIFY SCREEN.
ENDLOOP.
Regards,
Anil Salekar

Can log into FaceTime it then asks what I want to use as contact so I select email address it says verifying then asks for apple if again and just keeps repeating the process

Can log into FaceTime it then asks what I want to use as contact so I select email address it says verifying then asks for apple if again and just keeps repeating the process

Hello Magsbingham
You may find the troubleshooting steps in the article below helpful.
iOS: Troubleshooting FaceTime and iMessage activation
http://support.apple.com/kb/TS4268
-Griff W.

Need Different Selection screen for different Queries in a Workbook

Hi,
I have created a workbook with Multiple tabs in BI 7.0. Each Tab has different Queries and each query has different Selection screens (Variable Selections).
When i open the workbook and refresh it, the selection screen is appearing only for one query. All the queries are refreshed by this single selection screen, though each query has different Variable selections. What i need is a seperate selection screen i.e seperate Variable selection appearing for each queries, when i refresh each one of them.
Is it possible to do this? If anybody has tried this, help me in solving this issue. Thanks for ur time.
Regards,
Murali

Murali,
If you un-check the 'Display Duplicate Variables Only Once' this WILL solve your problem.
When you Refresh, you should be presented with a single variable selection dialog box, but it should contain an area for each Query (DataProvider) that is embedded in the Workbook.
This is the case if the queries are all on the same tab, or on different tabs.
However, if you have multiple tabs each with a query on it, each query must have it's own DataProvider. If all queries are based on the same DataProvider, it will not work as the Workbook only 'sees' one Query for which it needs variable input.
If you REALLY want multiple variable selection dialog boxes, then maybe the best way to do this is to have the queries in separate Workbooks.
If you don't want the User to have to open 5 queries manually, you could use a Macro in each Workbook that runs on opening, to open the next Workbook in the sequence.
I hope this makes sense!
Regards
Steve

Selection-screen dynamic selections for dtab

Hey experts,
when I add this to my code
selection-screen dynamic selections for zbr_t_autori
and I want activate it, it writes out an error
The addition "DYNAMIC_SELECTIONS" is only allowed in INCLUDE DB__SSEL.
and I don't know how to solve it, what is that include db__ssel?
Can anybody help me.
Regards,
Robert

Check this:
Structure of Logical Databases - ABAP Programming (BC-ABA) - SAP Library
Where are you using this code?
selection-screen dynamic selections for zbr_t_autori
It should be in the include reserved for your LDB selection:

Want to use ldb selection screen with select queries

Similar Messages

Maybe you are looking for