Adding new parameter in ME28 selection screen

Hi All,
Did anyone know how to add in a new parameter(select-options) in ME28 selection screen?
I'm only able found one enhancement for this requirement.
In program
i create a new implementation for ENHANCEMENT-POINT RM06EF00_02 and write the
For eg:
PARAMETERS: p_matnr LIKE mara-matnr.
The new parameter displayed in ME28.
Anyhow, i'm not able to change the selection text from p_matnr to "Material Number" as there is no enhancement in INITIALIZATION for me to set the text dynamically. (i'm not able to change the text element via goto->text elements->selection texts as its standard sap).
Can someone please share if you've done this enhancement before?
Really appreciate your input and advise.
Thanks.
Regards,
Sham.

Hi Sham,
I copy standard program of me28(RM06EF00) and implement the code.
Regards,
Quddus.

Similar Messages

Adding a new field to the selection screen of a LDB

Hi all,
I want to add a new field Clearing date(BSEG-AUGDT) in the dynamic selection screen of the report RFUMSV00.
For adding a new field i have copied the SAP view of a Logical database to CUS view.
Next i had added the Clearing date(BSEG-AUGDT) to the function group Document header(01) and selected the check box Preselect and saved the view.
But still i am not able to find the newly added field in the dynamic selection screen of the report.
Please suggest me where i am going wrong or how to do this.
Thanks in advance
Ajay

Hi Srini,
Thanks for your Reply
I have kept 01 against the field BSEG-AUGDT and selected the preselect check box also.
But still that field is not visible in the dynamic selection screen.
Thanks
Ajay.D

Added new parameter but it doesn't worl properly.

here is the code that i used.
added new parameter date_where, but after that the mark_all and clear_all is not working.
someone please help me.
/* PROJECT DATE INITIALS DESCRIPTION */
/* W_O_9130 07/11/2006 FJK ADDED A PARAMETER P_ORDER_DATE */
PACKAGE BODY SignAgenda IS
/* Marks all the records in the ORDERS_VIEW_LIST datablock. Marking the records allows only */
/* the marked records to be printed from the list. */
PROCEDURE MarkAll IS
MarkLoop BOOLEAN := TRUE;
BEGIN
SET_APPLICATION_PROPERTY(CURSOR_STYLE, 'BUSY');
IF (:SYSTEM.CURSOR_BLOCK != 'ORDERS_VIEW_LIST') THEN
GO_BLOCK('ORDERS_VIEW_LIST');
END IF;
FIRST_RECORD;
WHILE (MarkLoop) LOOP
:ORDERS_VIEW_LIST.G_PICK_FIELD := 'x';
IF (:SYSTEM.LAST_RECORD = 'TRUE') THEN
MarkLoop := FALSE;
ELSE
NEXT_RECORD;
END IF;
END LOOP;
FIRST_RECORD;
IsMarked := TRUE;
SET_APPLICATION_PROPERTY(CURSOR_STYLE, 'DEFAULT');
END;
/* UnMarks all the records in the ORDERS_VIEW_LIST datablock. */
PROCEDURE ClearAll IS
MarkLoop BOOLEAN := TRUE;
BEGIN
SET_APPLICATION_PROPERTY(CURSOR_STYLE, 'BUSY');
IF (:SYSTEM.CURSOR_BLOCK != 'ORDERS_VIEW_LIST') THEN
GO_BLOCK('ORDERS_VIEW_LIST');
END IF;
FIRST_RECORD;
WHILE (MarkLoop) LOOP
:ORDERS_VIEW_LIST.G_PICK_FIELD := NULL;
IF (:SYSTEM.LAST_RECORD = 'TRUE') THEN
MarkLoop := FALSE;
ELSE
NEXT_RECORD;
END IF;
END LOOP;
FIRST_RECORD;
IsMarked := FALSE;
SET_APPLICATION_PROPERTY(CURSOR_STYLE, 'DEFAULT');
END;
/* Prints the regular and 24 hour signing agendas. */
PROCEDURE PrintReport(ReportName IN VARCHAR2) IS
MaxSize NUMBER(5) := 2000;
Where1 VARCHAR2(2000):=NULL;
Where2 VARCHAR2(2000):=NULL;
Where3 VARCHAR2(2000):=NULL;
DefWhere VARCHAR2(32767):=NULL;
DefWhere2 VARCHAR2(2000):=NULL;
RecsMarked BOOLEAN;
MarkLoop BOOLEAN := TRUE;
DblQuote VARCHAR2(1) := '"';
RepParam PARAMLIST;
TooMany EXCEPTION;
AlId ALERT;
AlBtn NUMBER(10);
ExcMsg VARCHAR2(130);
Report_Id REPORT_OBJECT;
Report_Status VARCHAR2(30);
/*** W_O_9130 07/11/2006 FJK START *** */
date_where varchar2(30);
/*** W_O_9130 07/11/2006 FJK END *** */
BEGIN
SET_APPLICATION_PROPERTY(CURSOR_STYLE, 'BUSY');
RepParam := BuildParamList;
/*** W_O_9130 07/11/2006 FJK START *** */
date_where := replace(:ORDERS_VIEW_QUERY.dd_order_date,':',' to ');
/*** W_O_9130 07/11/2006 FJK END *** */
DefWhere := GET_BLOCK_PROPERTY('ORDERS_VIEW_LIST', DEFAULT_WHERE);
IF (LENGTH(DefWhere) <= 2000) THEN
DefWhere2 := DblQuote || DefWhere || DblQuote;
ELSE
DefWhere2 := 'DD_ORDER_DATE IS NOT NULL';
END IF;
IF NOT(IsMarked) THEN
Where1 := DblQuote || DefWhere || DblQuote;
ADD_PARAMETER(RepParam, 'P_WHERE', TEXT_PARAMETER, Where1);
ADD_PARAMETER(RepParam, 'P_DEF_WHERE', TEXT_PARAMETER, DefWhere2);
/*** W_O_9130 07/11/2006 FJK START *** */
ADD_PARAMETER(RepParam, 'P_order_date', TEXT_PARAMETER, Date_Where);
/*** W_O_9130 07/11/2006 FJK END *** */
ELSE
IsMarked := FALSE;
GO_BLOCK('ORDERS_VIEW_LIST');
FIRST_RECORD;
WHILE (MarkLoop) LOOP
IF (:ORDERS_VIEW_LIST.G_PICK_FIELD IS NOT NULL) THEN
:ORDERS_VIEW_LIST.G_PICK_FIELD := NULL;
ELSIF
(Where1 IS NULL) THEN
Where1 := 'DD_ORDER_RSN IN (''' || :ORDERS_VIEW_LIST.DD_ORDER_RSN || '''';
ELSIF (LENGTH(Where1) + LENGTH(:ORDERS_VIEW_LIST.DD_ORDER_RSN) + 5 <= MaxSize) THEN
Where1 := Where1 || ', ''' || :ORDERS_VIEW_LIST.DD_ORDER_RSN || '''';
ELSIF (Where2 IS NULL) THEN
Where2 := 'DD_ORDER_RSN IN (''' || :ORDERS_VIEW_LIST.DD_ORDER_RSN || '''';
ELSIF (LENGTH(Where2) + LENGTH(:ORDERS_VIEW_LIST.DD_ORDER_RSN) + 5 <= MaxSize) THEN
Where2 := Where2 || ', ''' || :ORDERS_VIEW_LIST.DD_ORDER_RSN || '''';
ELSIF (Where3 IS NULL) THEN
Where3 := 'DD_ORDER_RSN IN (''' || :ORDERS_VIEW_LIST.DD_ORDER_RSN || '''';
ELSIF (LENGTH(Where3) + LENGTH(:ORDERS_VIEW_LIST.DD_ORDER_RSN) + 5 <= MaxSize) THEN
Where3 := Where3 || ', ''' || :ORDERS_VIEW_LIST.DD_ORDER_RSN || '''';
ELSE
RAISE TooMany;
END IF;
IF (:SYSTEM.LAST_RECORD = 'TRUE') THEN
MarkLoop := FALSE;
ELSE
NEXT_RECORD;
END IF;
MarkLoop := false ;
END LOOP;
FIRST_RECORD;
Where1 := Where1 || ')';
IF (LENGTH(Where2) > 0) THEN
Where2 := Where2 || ')';
ELSE
Where2 := 'DD_ORDER_RSN IS NULL';
END IF;
IF (LENGTH(Where3) > 0) THEN
Where3 := Where3 || ')';
ELSE
Where3 := 'DD_ORDER_RSN IS NULL';
END IF;
ADD_PARAMETER(RepParam, 'P_WHERE', TEXT_PARAMETER, Where1);
ADD_PARAMETER(RepParam, 'P_WHERE2', TEXT_PARAMETER, Where2);
ADD_PARAMETER(RepParam, 'P_WHERE3', TEXT_PARAMETER, Where3);
ADD_PARAMETER(RepParam, 'P_DEF_WHERE', TEXT_PARAMETER, DefWhere2);
/*** W_O_9130 07/11/2006 FJK START *** */
add_parameter(RepParam, 'P_order_date', TEXT_PARAMETER, Date_Where);
/*** W_O_9130 07/11/2006 FJK END *** */
END IF;
HOST('..\..\STANDARD\VBExe\SetLegal', NO_SCREEN);
Report_Id := FIND_REPORT_OBJECT(ReportName);
Report_Status := RUN_REPORT_OBJECT(Report_Id, RepParam);
HOST('..\..\STANDARD\VBExe\ResetOrigPaper', NO_SCREEN);
SET_APPLICATION_PROPERTY(CURSOR_STYLE, 'DEFAULT');
EXCEPTION
WHEN TooMany THEN
AlId := FIND_ALERT('ERR_ALERT');
IF ID_NULL(AlId) THEN
ExcMsg := 'Error occurred in the SignAgenda.PrintReport package';
ExcMsg := ExcMsg || ' - ERR_ALERT doesn' || '''' || 't exist.';
:LIST__SIGN_AGENDA.G_MESSAGE_FIELD := ExcMsg;
MESSAGE(ExcMsg);
RAISE FORM_TRIGGER_FAILURE;
ELSE
ExcMsg := 'The maximum number of records that can be selected has been exceeded.';
ExcMsg := ExcMsg || CHR(10) || 'Please select a smaller number of records.';
SET_ALERT_PROPERTY(AlId, ALERT_MESSAGE_TEXT, ExcMsg);
SET_ALERT_PROPERTY(AlId, TITLE, 'Unable to complete the requested task!');
AlBtn := SHOW_ALERT(AlId);
RAISE FORM_TRIGGER_FAILURE;
END IF;
END;
/* Creates and returns a parameter list. This is used by the PrintReport procedure. */
FUNCTION BuildParamList RETURN PARAMLIST IS
RepParam PARAMLIST;
BEGIN
IF ID_NULL(GET_PARAMETER_LIST('SIGNING_AGENDA')) THEN
RepParam := CREATE_PARAMETER_LIST('SIGNING_AGENDA');
ELSE
DESTROY_PARAMETER_LIST('SIGNING_AGENDA');
RepParam := CREATE_PARAMETER_LIST('SIGNING_AGENDA');
END IF;
RETURN RepParam;
END;
END;

i have problem some where here.please help out.
BEGIN
SET_APPLICATION_PROPERTY(CURSOR_STYLE, 'BUSY');
RepParam := BuildParamList;
/*** W_O_9130 07/11/2006 FJK START *** */
date_where := replace(:ORDERS_VIEW_QUERY.dd_order_date,':',' to ');
/*** W_O_9130 07/11/2006 FJK END *** */
DefWhere := GET_BLOCK_PROPERTY('ORDERS_VIEW_LIST', DEFAULT_WHERE);
IF (LENGTH(DefWhere) <= 2000) THEN
DefWhere2 := DblQuote || DefWhere || DblQuote;
ELSE
DefWhere2 := 'DD_ORDER_DATE IS NOT NULL';
END IF;
IF NOT(IsMarked) THEN
Where1 := DblQuote || DefWhere || DblQuote;
ADD_PARAMETER(RepParam, 'P_WHERE', TEXT_PARAMETER, Where1);
ADD_PARAMETER(RepParam, 'P_DEF_WHERE', TEXT_PARAMETER, DefWhere2);
/*** W_O_9130 07/11/2006 FJK START *** */
ADD_PARAMETER(RepParam, 'P_order_date', TEXT_PARAMETER, Date_Where);
/*** W_O_9130 07/11/2006 FJK END *** */
ELSE
IsMarked := FALSE;
GO_BLOCK('ORDERS_VIEW_LIST');
FIRST_RECORD;
WHILE (MarkLoop) LOOP
IF (:ORDERS_VIEW_LIST.G_PICK_FIELD IS NOT NULL) THEN
:ORDERS_VIEW_LIST.G_PICK_FIELD := NULL;
ELSIF
(Where1 IS NULL) THEN
Where1 := 'DD_ORDER_RSN IN (''' || :ORDERS_VIEW_LIST.DD_ORDER_RSN || '''';
ELSIF (LENGTH(Where1) + LENGTH(:ORDERS_VIEW_LIST.DD_ORDER_RSN) + 5 <= MaxSize) THEN
Where1 := Where1 || ', ''' || :ORDERS_VIEW_LIST.DD_ORDER_RSN || '''';
ELSIF (Where2 IS NULL) THEN
Where2 := 'DD_ORDER_RSN IN (''' || :ORDERS_VIEW_LIST.DD_ORDER_RSN || '''';
ELSIF (LENGTH(Where2) + LENGTH(:ORDERS_VIEW_LIST.DD_ORDER_RSN) + 5 <= MaxSize) THEN
Where2 := Where2 || ', ''' || :ORDERS_VIEW_LIST.DD_ORDER_RSN || '''';
ELSIF (Where3 IS NULL) THEN
Where3 := 'DD_ORDER_RSN IN (''' || :ORDERS_VIEW_LIST.DD_ORDER_RSN || '''';
ELSIF (LENGTH(Where3) + LENGTH(:ORDERS_VIEW_LIST.DD_ORDER_RSN) + 5 <= MaxSize) THEN
Where3 := Where3 || ', ''' || :ORDERS_VIEW_LIST.DD_ORDER_RSN || '''';
ELSE
RAISE TooMany;
END IF;
IF (:SYSTEM.LAST_RECORD = 'TRUE') THEN
MarkLoop := FALSE;
ELSE
NEXT_RECORD;
END IF;
MarkLoop := false ;
END LOOP;
FIRST_RECORD;
Where1 := Where1 || ')';
IF (LENGTH(Where2) > 0) THEN
Where2 := Where2 || ')';
ELSE
Where2 := 'DD_ORDER_RSN IS NULL';
END IF;
IF (LENGTH(Where3) > 0) THEN
Where3 := Where3 || ')';
ELSE
Where3 := 'DD_ORDER_RSN IS NULL';
END IF;

How to Add a new fields in the selection screen of LDB.

Hi All,
I want to add a new fields in the selection screen of LDB & then i need to select the data for that fields.
So could you please tell me for that where i need to add the code for selecting the data.
Thanks
Roli

Hi
welcome to SDN forum
If you are designing your own LDB with your own tables you can define tree structure and then the selection screen for the tables
if you wants to modify the std LDB of SAp means take the access key and to modify that code
if you add the extra field you have to modify the where conditions in the code also
see the doc
A logical database is a special ABAP/4 program which combines the contents of certain database tables. You can link a logical database to an ABAP/4 report program as an attribute. The logical database then supplies the report program with a set of hierarchically structured table lines which can be taken from different database tables.
LDB offers an easy-to-use selection screens. You can modify the pre-generated selection screen to your needs. It offers check functions to check whether user input is complete, correct, and plausible. It offers reasonable data selections. It contains central authorization checks for data base accesses. Enhancements such as improved performance immediately apply to all report programs that use the logical database.
Less coding s required to retrieve data compared to normal internel tables.
Tables used LDB are in hierarchial structure.
Mainly we used LDBs in HR Abap Programming.
Where all tables are highly inter related so LDBs can optimize the performance there.
Check this Document. All abt LDB's
https://www.sdn.sap.com/irj/servlet/prt/portal/prtroot/com.sap.km.cm.highlightedcontent?documenturi=%2flibrary%2fabap%2fabap-code-samples%2fldb+browser.doc
GO THROUGH LINKS -
http://www.sap-basis-abap.com/saptab.htm
http://help.sap.com/saphelp_nw04/helpdata/en/9f/db9bfa35c111d1829f0000e829fbfe/content.htm
http://help.sap.com/saphelp_nw04/helpdata/en/9f/db9b5e35c111d1829f0000e829fbfe/frameset.htm
http://help.sap.com/saphelp_nw04/helpdata/en/c6/8a15381b80436ce10000009b38f8cf/frameset.htm
/people/srivijaya.gutala/blog/2007/03/05/why-not-logical-databases
Re: **LDB**
www.sapbrain.com/FAQs/TECHNICAL/SAP_ABAP_Logical_Database_FAQ.html
www.sap-img.com/abap/abap-interview-question.htm
www.sap-img.com/abap/quick-note-on-design-of-secondary-database-indexes-and-logical-databases.htm
http://help.sap.com/saphelp_nw04/helpdata/en/9f/db9b5e35c111d1829f0000e829fbfe/content.htm
http://help.sap.com/saphelp_nw2004s/helpdata/en/9f/db9bb935c111d1829f0000e829fbfe/content.htm
Gothru the blog which provides info on LDB's:
/people/srivijaya.gutala/blog/2007/03/05/why-not-logical-databases
Sample code
TABLES: SPFLI,
SFLIGHT,
SBOOK,
SCARR.
START-OF-SELECTION.
GET SPFLI.
WRITE:/ SPFLI: , SPFLI-CARRID, SPFLI-CONNID,
SPFLI-AIRPFROM, SPFLI-AIRPTO.
GET SFLIGHT.
WRITE:/ SFLIGHT: , SFLIGHT-CARRID, SFLIGHT-CONNID, SFLIGHT-FLDATE.
GET SBOOK.
WRITE:/ SBOOK: , SBOOK-CARRID, SBOOK-CONNID,
SBOOK-FLDATE, SBOOK-BOOKID.
GET SFLIGHT LATE.
WRITE:/ GET SFLIGHT LATE: , SFLIGHT-FLDATE.
Regards
anji

Problem in getting parameter value from selection screen in web dynpro abap

Hi,
I am facing problem in getting parameter value from selection screen.
Please find my code below:
DATA LT_PAR_ITEM TYPE IF_WD_SELECT_OPTIONS=>TT_SELECTION_SCREEN_ITEM.
FIELD-SYMBOLS:<FS_PAR_ITEM> LIKE LINE OF LT_PAR_ITEM,
                             <FS_OBJ_USAGE>    TYPE REF TO data.
WD_THIS->M_HANDLER->GET_PARAMETER_FIELDS( IMPORTING ET_FIELDS = LT_PAR_ITEM ).
LOOP AT LT_PAR_ITEM ASSIGNING <FS_PAR_ITEM>.
    CASE <FS_PAR_ITEM>-M_ID.
      WHEN `OBJ_USAGE`.
         ASSIGN <FS_PAR_ITEM>-M_VALUE->* TO <FS_OBJ_USAGE>.
[ Here, sy-subrc is 4, <FS_OBJ_USAGE> is not assigning.]
    ENDCASE.
ENDLOOP.
So, can any one solve this problem.
Thanks in advance,
Radhika

Hi Radhika,
Try using GET_RANGE_TABLE_OF_SEL_FIELD...
Please Refer below code..
   DATA: NODE_FLIGHTS TYPE REF TO IF_WD_CONTEXT_NODE.
DATA: RT_CARRID TYPE REF TO DATA.
DATA: ISFLIGHT TYPE TABLE OF SFLIGHT.
DATA: WSFLIGHT TYPE SFLIGHT.
FIELD-SYMBOLS: <FS_CARRID> TYPE TABLE.
Retrieve the data from the select option
RT_CARRID = WD_THIS->M_HANDLER->GET_RANGE_TABLE_OF_SEL_FIELD( I_ID = 'S_CARR_ID' ).
Assign it to a field symbol
ASSIGN RT_CARRID->* TO <FS_CARRID>.
CLEAR ISFLIGHT. REFRESH ISFLIGHT.
SELECT * INTO CORRESPONDING FIELDS OF TABLE ISFLIGHT FROM SFLIGHT
                       WHERE CARRID IN <FS_CARRID>.
NODE_FLIGHTS = WD_CONTEXT->GET_CHILD_NODE( NAME = `FLIGHTS` ).
NODE_FLIGHTS->BIND_ELEMENTS( ISFLIGHT ).
Thanks,
Regards,
Kiran

Parameter on the selection screen

Hi All,
I have a check box and a parameter on the selection screen. If the checkbox is initial, the paramter shouldn't be editable but if the checkbox is ticked, the parameter should be made mandatory to be enetered with value. How can this be done ?
Thanks in advance.

Hi,
Refer to the following code.In this change radiobuttons with the checkbox.
SELECTION-SCREEN BEGIN OF BLOCK B1.
parameters: p_erdat like zirpactivity-erdat modif id SC1 ,
            r1 radiobutton group RAD1 user-command ABC default 'X',
            r2 radiobutton group RAD1.
SELECTION-SCREEN END OF BLOCK B1.
AT SELECTION-SCREEN.
check sy-ucomm = 'ABC'.
check sy-ucomm = 'F8'.
AT SELECTION-SCREEN OUTPUT.
loop at screen.
    if r1 = 'X' and screen-group1 = 'SC1' .
      screen-input = 0.
    ENDIF.
    IF r2 = 'X'.
           screen-group1 = 'SC1' .
      screen-input = 1.
    endif.
    modify screen.
endloop.
Hope this helps.
Reward if helpful.'
Regards,
Sipra

Report - parameter name in selection screen

Hi,
I am working with a report and in that I am using a parameter for my selection screen.
Parameter : lifnr like lfa1-lifnr.
My question is: when i execute the program i see in the selection sreen 'Lifnr'. How to get a text say 'Vendor no.' instead of LIFNR in selection screen.
Thanks

Hi,
Go to the TEXT ELEMENTS of the program from the SE38 screen. Click on the SELECTION TEXTS tab, and you can give whatever desription you want for the selection screens here.
If you want the description from the data dictionary just check the check box on the right hand side.
Regards,
Ravi
Note : Please mark the helpful answers

Difficulty in adding new parameter in selection screen of GR55 report

Hi Gurus,
I have a requirement to add an extra field in Cost center:Act/Plan/Comm CC Cur report.This is otherwise a Z report in report painter with 0% code (T-code : GR55-> Report group->Report).But,when we go to technical information of this report,it has four standard sap programs,which contains code for this selection screen.It does not even have a modification scope.
Selection screen of this report contains following parameters:
Selection values:
Controlling Ar
Fiscal Year
From Period
To Period
Plan Version
Selection Groups:
Cost Center Group
Or value(s)
Cost Element Group
Or value(s)
My requirement is to add one more parameter : Purchase oeder in new block:
Is there any way to achieve it.
Note: Copying the standard progs into custom prog is not working,i already tried that.
Please let me know your suggestions,if any one of you came across such requirement before.it is very impoertant for me.
Thanks in advance,
Meenakshi

Hi meenakshi239,
you can always use implicit enhancement spots.
Regards,
Clemens

Adding selection parameter in VF04 selection screen

Hi Gurus...
I need to add a selection parameter on selection screen of VF04 transaction.
Is it possible to do so?
If yes, please tell me how.
Thanks.

HI Jagdish
You can go in for Source Code Enhancements. (wont require the access key in this case)
Note - Available SAP ERP 6.0 onwards
1) Just click on the spiral (ENHANCE) button
2) Right click on the suitable enhancement point / Enhancement Section
3) Go to Enhancement Implementation -> Create
4) Add your code in the enhancement implementation and activate
You will need to add your code at multiple place (Obviously !!); just use the same implementation for all the Point / Sections you use in the program.
Refer Source Code Enhancements - Part 5 of the Series on the New Enhancement Framework for more.
Hope it helps. Please revert in case of specific issues.
Neeraj

Adding a new input field on selection screen after input in a select option

Hi Experts,
There are 2 input fields on the selection screen.
I would like to add a new select option field when a value is entered in the 2nd field <b>only</b>. If there is an input in the 1st field or both the fields, the new input field should not appear.
Message was edited by:
        Gaurav Kothari

execute the code .
you will get sel option for s_lgort only when there is a value in s_werks.
tables mard.
select-options: s_matnr for mard-matnr,
                s_werks for mard-werks,
                s_lgort for mard-lgort modif id abc.
at selection-screen output.
if not s_werks[] is initial and s_matnr[] is initial.
loop at screen.
if screen-group1 = 'ABC'.
screen-active = '1'.
modify screen.
endif.
endloop.
else.
loop at screen.
if screen-group1 = 'ABC'.
screen-active = '0'.
modify screen.
endif.
endloop.
endif.

Adding new field to detail data screen of object link

Hi All,
I've a requirement of adding a new field to the detail screen of object link. But the field is a combination of 3 other standard fields.
Please let me know how could i realise this functionality?
Thanks in advance.

Hi Srini,
Thanks for your Reply
I have kept 01 against the field BSEG-AUGDT and selected the preselect check box also.
But still that field is not visible in the dynamic selection screen.
Thanks
Ajay.D

Set the parameter in the selection screen of a program from another program

Hi ALL,
I need to call the program RHALESMD from another program and the program RHALESMD takes from date as one of the input parameter.how do i set the from date from the calling program and call RHALESMD
Thanks
Bala Duvvuri

i got the answer
Program accessed
REPORT report1.
DATA text TYPE c LENGTH 10.
SELECTION-SCREEN BEGIN OF SCREEN 1100.
SELECT-OPTIONS: selcrit1 FOR text,
                  selcrit2 FOR text.
SELECTION-SCREEN END OF SCREEN 1100.
Calling program
REPORT report2.
DATA: text       TYPE c LENGTH 10,
      rspar_tab TYPE TABLE OF rsparams,
      rspar_line LIKE LINE OF rspar_tab,
      range_tab LIKE RANGE OF text,
      range_line LIKE LINE OF range_tab.
rspar_line-selname = 'SELCRIT1'.
rspar_line-kind    = 'S'.
rspar_line-sign    = 'I'.
rspar_line-option = 'EQ'.
rspar_line-low     = 'ABAP'.
APPEND rspar_line TO rspar_tab.
range_line-sign   = 'E'.
range_line-option = 'EQ'.
range_line-low    = 'H'.
APPEND range_line TO range_tab.
range_line-sign   = 'E'.
range_line-option = 'EQ'.
range_line-low    = 'K'.
APPEND range_line TO range_tab.
SUBMIT report1 USING SELECTION-SCREEN '1100'
               WITH SELECTION-TABLE rspar_tab
               WITH selcrit2 BETWEEN 'H' AND 'K'
               WITH selcrit2 IN range_tab
               AND RETURN.
Thanks
Bala Duvvuri

Input help required for parameter on the selection screen

hi all,
i have created two parameters on the selection screen.
1. deptno
2.empname
so my requirement is if i input any deptno then i should get all
the empname corresponding to that deptno in the parameter empname
ie for deptno 10 there should be f4 help for empname.
here i am pasting my code plz check where i am doing wrong--
*& Report ZTEST10
*& Developer
*& Date:   &DATE
REPORT ZTEST10.
tables: zemployee1.
parameters: p_deptno like zemployee1-deptno,
            p_empnam like zemployee1-empname.
Data: begin of itab occurs 0,
       deptno like zemployee1-deptno,
       empname like zemployee1-empname,
       empno like zemployee1-empno,
       end of itab.
At selection-screen on value-request for p_empnam.
select empname
        from zemployee1
        into corresponding fields of table itab
        where deptno = p_deptno.
    CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
      EXPORTING
      DDIC_STRUCTURE         = ' '
        retfield               = 'empname'
      PVALKEY                = ' '
       DYNPPROG               = sy-repid
       DYNPNR                 = sy-dynnr
      DYNPROFIELD            = 'p_empnam'
      STEPL                  = 0
      WINDOW_TITLE           =
      VALUE                  = ' '
      VALUE_ORG              = 'C'
      MULTIPLE_CHOICE        = ' '
      DISPLAY                = ' '
      CALLBACK_PROGRAM       = ' '
      CALLBACK_FORM          = ' '
      MARK_TAB               =
    IMPORTING
      USER_RESET             =
      tables
        value_tab              = itab
      FIELD_TAB              =
      RETURN_TAB             =
      DYNPFLD_MAPPING        =
    EXCEPTIONS
      PARAMETER_ERROR        = 1
      NO_VALUES_FOUND        = 2
      OTHERS                 = 3
    IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
   ENDIF.
I will award ur efforts.
Thanks
sanjeev

Hi Sanjeev,
If you input any deptno and you should get all the empname corresponding then first you need to use CALL FUNCTION 'DYNP_VALUES_READ'.
EXPORTING
    DYNAME                         = sy-repid
    DYNUMB                         = sy-dynnr
TRANSLATE_TO_UPPER             = ' '
   REQUEST                        = 'A'
PERFORM_CONVERSION_EXITS       = ' '
PERFORM_INPUT_CONVERSION       = ' '
DETERMINE_LOOP_INDEX           = ' '
TABLES
    DYNPFIELDS                     = gt_dynp
declare: DATA : gt_dynp LIKE dynpread OCCURS 0.
loop at gt_dynp into wt_dynp where fieldname = 'P_SUPRID-LOW'.
lv_low = wt_dynp-fieldvalue.
endloop.
Then while selecting use this p_superid-low instead of p_deptno.
Then :
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
After this funtion module:
write:
IF sy-subrc = 0.
    READ TABLE itab
INDEX 1.
    'p_empnam' = return_tab-fieldval.
Declare return_tab as:
    DATA: return_tab   LIKE ddshretval OCCURS 0 WITH HEADER LINE.
Thanks,
Shweta
ENDIF.

How to maximise the length of the Parameter text on Selection screen

Hello,
I am putting the text in the selection screen for a Parameter.
Its text is long and it is not letting me to put the whole text in Text Symbol.
In the report
When I click on GOto--> Text Elements --> Selection Texts
I am sure there is a way we can maximise this...
ANy suggestions will be apprecaiated.
Regards,
Kittu

Hello,
Thank you for all your response!
Here is my code :
SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME.
PARAMETERS : BOTH RADIOBUTTON GROUP RG1,
EXICLASS RADIOBUTTON GROUP RG1.
SELECTION-SCREEN END OF BLOCK B2.
Here for Both, I need to add the selction text as 'BOTH Existing and Non-existing Classifications'
This is a parameter, can any body explain me how to do it with the Parameters.
Any suggestions will be appreciated.......
Regards,
Kittu

Ho to disabled the parameter on the selection screen

Hi all,
I have a parameter (p_matnr) and two radiobutton b1 and b2 on the selection screen. Now what the requirement is if user selects radio button b2, the parameter should get disabled. I know it can be done by <b>loop at screen</b> and then modifying the screen but in this case start-of-seection is to be called. In my case as the user selects the radio button b2 the parameter should be appear disabled. the code which is given below will work in that case where user selects the b2 and then press F8. Bu i don't want the user to pres F8. He will only select the b2 and will find the parameter (p_matnr) disabled.
Please suggest something.
AT SELECTION-SCREEN outpu.
IF b2 = 'X'.
LOOP AT SCREEN.
IF screen-name cs 'p1' .
screen-input = 0.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
ENDIF.
Thanks,
Annup.

Hi,
Try this i have used this in my code
SELECTION-SCREEN BEGIN OF BLOCK b_0 WITH FRAME TITLE text-002.
SELECTION-SCREEN BEGIN OF BLOCK b_1 WITH FRAME TITLE text-000.
PARAMETERS:      rb_img    RADIOBUTTON GROUP rad1 user-command rad.
PARAMETERS:      rb_invo   RADIOBUTTON GROUP rad1.
SELECTION-SCREEN BEGIN OF BLOCK b_2 WITH FRAME TITLE text-001.
*PARAMETERS:      rb_img    RADIOBUTTON GROUP rad1.
PARAMETERS:      p_from    like bkpf-bldat modif id gr2,
                 p_to      like bkpf-bldat modif id gr2.
SELECT-OPTIONS: s_arobj FOR   toa01-ar_object modif id gr2.
SELECTION-SCREEN END OF BLOCK b_2.
SELECTION-SCREEN BEGIN OF BLOCK b_3 WITH FRAME TITLE text-001.
*PARAMETERS:      rb_invo   RADIOBUTTON GROUP rad1.
SELECT-OPTIONS: s_bukrs   FOR bkpf-bukrs modif id gr1,
                 s_belnr   FOR bkpf-belnr modif id gr1,
                 s_gjahr   FOR bkpf-gjahr modif id gr1,
SELECTION-SCREEN END OF BLOCK b_3.
SELECTION-SCREEN END OF BLOCK b_0.
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
    IF screen-group1 = 'GR1'.   "Name field
      IF rb_invo = space.
        screen-active = 0.
      ELSE.
        screen-active = 1.
      ENDIF.
      MODIFY SCREEN.
    ELSEIF screen-group1 = 'GR2'.
      IF rb_invo = c_x.
        screen-active = 0.
      ELSE.
        screen-active = 1.
      ENDIF.
      MODIFY SCREEN.
    ENDIF.
ENDLOOP.
START-OF-SELECTION.
Thanks & Regards,
Judith.

Adding new parameter in ME28 selection screen

Similar Messages

Maybe you are looking for