Screen Entry Values Query Problem

Anything wrong with this query....It is taking LONG TIME to execute
select papf.FULL_NAME EMPLOYEE_NAME,papf.EMPLOYEE_NUMBER, papf.PERSON_ID
,papf.BUSINESS_GROUP_ID
,CASE
WHEN peevf6.SCREEN_ENTRY_VALUE is not null THEN 'Remaining Balance 7'
WHEN peevf5.SCREEN_ENTRY_VALUE is not null THEN 'Remaining Balance 6'
WHEN peevf4.SCREEN_ENTRY_VALUE is not null THEN 'Remaining Balance 5'
WHEN peevf3.SCREEN_ENTRY_VALUE is not null THEN 'Remaining Balance 4'
WHEN peevf2.SCREEN_ENTRY_VALUE is not null THEN 'Remaining Balance 3'
WHEN peevf1.SCREEN_ENTRY_VALUE is not null THEN 'Remaining Balance 2'
WHEN peevf.SCREEN_ENTRY_VALUE is not null THEN 'Remaining Balance 1'
END input_name
,CASE
WHEN peevf6.SCREEN_ENTRY_VALUE is not null THEN peevf6.SCREEN_ENTRY_VALUE
WHEN peevf5.SCREEN_ENTRY_VALUE is not null THEN peevf5.SCREEN_ENTRY_VALUE
WHEN peevf4.SCREEN_ENTRY_VALUE is not null THEN peevf4.SCREEN_ENTRY_VALUE
WHEN peevf3.SCREEN_ENTRY_VALUE is not null THEN peevf3.SCREEN_ENTRY_VALUE
WHEN peevf2.SCREEN_ENTRY_VALUE is not null THEN peevf2.SCREEN_ENTRY_VALUE
WHEN peevf1.SCREEN_ENTRY_VALUE is not null THEN peevf1.SCREEN_ENTRY_VALUE
WHEN peevf.SCREEN_ENTRY_VALUE is not null THEN peevf.SCREEN_ENTRY_VALUE
END input_value
,papf.ORIGINAL_DATE_OF_HIRE , papf.START_DATE hire_date
,paaf.ASSIGNMENT_ID, paaf.ASSIGNMENT_NUMBER
,paaf.SUPERVISOR_ID
,pcak.SEGMENT1 Business_unit
,pcak.SEGMENT2 Location
,pcak.SEGMENT3 Department
,papf.EFFECTIVE_START_DATE employee_start_date
,papf.EFFECTIVE_END_DATE employee_end_date
,paaf.EFFECTIVE_START_DATE ASG_start_date
,paaf.EFFECTIVE_END_DATE ASG_end_date
,pcaf.EFFECTIVE_START_DATE costing_start_date
,pcaf.EFFECTIVE_END_DATE costing_end_date
,petf.element_name
,pivf.NAME input_value_name1
,peevf.SCREEN_ENTRY_VALUE SCREEN_ENTRY_VALUE1
,pivf1.NAME input_value_name2
,peevf1.SCREEN_ENTRY_VALUE SCREEN_ENTRY_VALUE2
,pivf2.NAME input_value_name3
,peevf2.SCREEN_ENTRY_VALUE SCREEN_ENTRY_VALUE3
,pivf3.NAME input_value_name4
,peevf3.SCREEN_ENTRY_VALUE SCREEN_ENTRY_VALUE4
,pivf4.NAME input_value_name5
,peevf4.SCREEN_ENTRY_VALUE SCREEN_ENTRY_VALUE5
,pivf5.NAME input_value_name6
,peevf5.SCREEN_ENTRY_VALUE SCREEN_ENTRY_VALUE6
,pivf6.NAME input_value_name7
,peevf6.SCREEN_ENTRY_VALUE SCREEN_ENTRY_VALUE7
,peef.EFFECTIVE_START_DATE element_entry_start_date
,peef.EFFECTIVE_END_DATE element_entry_end_date
,peevf.EFFECTIVE_START_DATE entry_value_start_date
,peevf.EFFECTIVE_END_DATE entry_value_end_date
from apps.per_all_people_f papf
,apps.per_all_assignments_f paaf
,apps.pay_cost_allocations_f pcaf
,apps.pay_cost_allocation_keyflex pcak
,apps.pay_element_entries_f peef
,apps.pay_element_types_x petf
,apps.pay_input_values_x pivf
,apps.pay_element_entry_values_x peevf
,apps.pay_input_values_x pivf1
,apps.pay_element_entry_values_x peevf1
,apps.pay_input_values_x pivf2
,apps.pay_element_entry_values_x peevf2
,apps.pay_input_values_x pivf3
,apps.pay_element_entry_values_x peevf3
,apps.pay_input_values_x pivf4
,apps.pay_element_entry_values_x peevf4
,apps.pay_input_values_x pivf5
,apps.pay_element_entry_values_x peevf5
,apps.pay_input_values_x pivf6
,apps.pay_element_entry_values_x peevf6
where paaf.PERSON_ID = papf.PERSON_ID
and paaf.BUSINESS_GROUP_ID = papf.BUSINESS_GROUP_ID
and paaf.PRIMARY_FLAG ='Y'
and paaf.ASSIGNMENT_TYPE ='E'
AND paaf.assignment_id = pcaf.assignment_id
and pcaf.COST_ALLOCATION_KEYFLEX_ID = pcak.COST_ALLOCATION_KEYFLEX_ID
and peef.assignment_id = paaf.assignment_id
and peef.ELEMENT_ENTRY_ID= peevf.ELEMENT_ENTRY_ID
and petf.element_name='Car Allowance'
and pivf.ELEMENT_TYPE_ID = petf.ELEMENT_TYPE_ID
and pivf.NAME = 'Remaining Balance 1'
and peevf.ELEMENT_ENTRY_ID= peef.ELEMENT_ENTRY_ID
and peevf.INPUT_VALUE_ID = pivf.INPUT_VALUE_ID
and pivf1.ELEMENT_TYPE_ID = petf.ELEMENT_TYPE_ID
and pivf1.NAME = 'Remaining Balance 2'
and peevf1.ELEMENT_ENTRY_ID= peef.ELEMENT_ENTRY_ID
and peevf1.INPUT_VALUE_ID = pivf1.INPUT_VALUE_ID
and pivf2.ELEMENT_TYPE_ID = petf.ELEMENT_TYPE_ID
and pivf2.NAME = 'Remaining Balance 3'
and peevf2.ELEMENT_ENTRY_ID= peef.ELEMENT_ENTRY_ID
and peevf2.INPUT_VALUE_ID = pivf2.INPUT_VALUE_ID
and pivf3.ELEMENT_TYPE_ID = petf.ELEMENT_TYPE_ID
and pivf3.NAME = 'Remaining Balance 4'
and peevf3.ELEMENT_ENTRY_ID= peef.ELEMENT_ENTRY_ID
and peevf3.INPUT_VALUE_ID = pivf3.INPUT_VALUE_ID
and pivf4.ELEMENT_TYPE_ID = petf.ELEMENT_TYPE_ID
and pivf4.NAME = 'Remaining Balance 5'
and peevf4.ELEMENT_ENTRY_ID= peef.ELEMENT_ENTRY_ID
and peevf4.INPUT_VALUE_ID = pivf4.INPUT_VALUE_ID
and pivf5.ELEMENT_TYPE_ID = petf.ELEMENT_TYPE_ID
and pivf5.NAME = 'Remaining Balance 6'
and peevf5.ELEMENT_ENTRY_ID= peef.ELEMENT_ENTRY_ID
and peevf5.INPUT_VALUE_ID = pivf5.INPUT_VALUE_ID
and pivf6.ELEMENT_TYPE_ID = petf.ELEMENT_TYPE_ID
and pivf6.NAME = 'Remaining Balance 7'
and peevf6.ELEMENT_ENTRY_ID= peef.ELEMENT_ENTRY_ID
and peevf6.INPUT_VALUE_ID = pivf6.INPUT_VALUE_ID
and paaf.assignment_id in(select assignment_id from per_assignments_f)
and papf.person_type_id not in (128)
and :p_date between papf.effective_start_date and papf.effective_end_date
and :p_date between paaf.effective_start_date and paaf.effective_end_date
and :p_date between peef.effective_start_date and peef.effective_end_date
and :p_date between pcaf.effective_start_date and pcaf.effective_end_date
and pcak.segment1 = '0002'

Hello,
My understanding says that initialization event is triggered before selection screen gets generated.
So, i would suggest you write the code in At selection screen Output.
I have came across same problem and this thing worked in my case.
Regards,
Jacky.

Similar Messages

Selection screen list values initiating problem

Hi All,
I have designed a selection screen with list and initiating that list in initialization event. When i run the report through se38 the list is populated with values. But if i run the report through T-CODE the list is not populated with values.
why?
Thanx in advance

Hello,
My understanding says that initialization event is triggered before selection screen gets generated.
So, i would suggest you write the code in At selection screen Output.
I have came across same problem and this thing worked in my case.
Regards,
Jacky.

Info about Element entry values for an element

Hi
Im trying to get info on something. Im supposed to get entry values for a certain Sc med element.
Now i know that the entry values reside in pay_element_entry_values_f.
The values i need are for the input EE Contr
Now when i query the pay_element_entry_values_f table I see that the screen entry value for the input EE Contr is null.
But when i use the screens to look at the value in the EE Contr and ER Contr i see values in double quotes in red like "377.22".
The Pay value is null which is why i see null in the pay_element_entry_values_f screen entry value column.
I wanna know how i can pull that value(in red double quotes) in an sql query.I mean do we know which table these seemingly default values are stored in?
Ive already tried using record history and other things to get it.but the tables i see are null.
Any help in getting this info is much appreciated.
Thanks
J

This value can be obtained from pay_input_values_f and the data u see in " " in red color is due to the Hot default flag checked.
Reagrds,
Prashanth
Edited by: user574397 on 6 Apr, 2010 5:53 PM

AT SELECTION SCREEN OUTPUT ON VALUE REQUESt problem

hi I am fetching the values into second field based on first field by reading them like this
<b>
AT SELECTION-SCREEN ON VALUE-REQUEST FOR ST_NAME.
CLEAR: FIELD_VALUE, DYNPRO_VALUES.
REFRESH DYNPRO_VALUES.
FIELD_VALUE-FIELDNAME = 'EXCH'.
APPEND FIELD_VALUE TO DYNPRO_VALUES.
CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
      DYNAME             = SY-CPROG
      DYNUMB             = SY-DYNNR
      TRANSLATE_TO_UPPER = 'X'
    TABLES
      DYNPFIELDS         = DYNPRO_VALUES.
READ TABLE DYNPRO_VALUES INDEX 1 INTO FIELD_VALUE.
IF FIELD_VALUE-FIELDVALUE IS NOT INITIAL.
    IF SY-SUBRC = 0 AND FIELD_VALUE-FIELDVALUE = 1.
      FIELD_VALUE-FIELDVALUE = 'BSE'.
    ELSEIF SY-SUBRC = 0 AND FIELD_VALUE-FIELDVALUE = 2.
      FIELD_VALUE-FIELDVALUE = 'NSE'.
    ENDIF.
    SELECT STOCK ST_NAME
                   FROM
                   ZEXCH
                   INTO TABLE TEMP_ITAB
                   WHERE EXCH = FIELD_VALUE-FIELDVALUE.
    IF SY-SUBRC = 0.
      FLAG = 'X'.
    ENDIF.
    CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
      EXPORTING
        RETFIELD    = 'ST_NAME'
        DYNPPROG    = SY-CPROG
        DYNPNR      = SY-DYNNR
        DYNPROFIELD = 'ST_NAME'
        VALUE_ORG   = 'S'
      TABLES
        VALUE_TAB   = TEMP_ITAB.
ENDIF.
</b>
This is working fine, now my requirement is to fetch a value into 3rd field from database table when the user selects a value through 'F4IF_INT_TABLE_VALUE_REQUEST'
Please help me with this, hope u got my problem, i want to know how to continue and fill value into third field after filling the field ST_NAME
points guaranteed

Hi,
If you have two parameters, you want to display values(f4) in parameter 2
depending on the values entered in parameter 1.
REPORT Z_SRI_HELP_VALUE_FOR_TABLES .
tables tcurt.
DATA   DYFIELDS LIKE DYNPREAD OCCURS 1 WITH HEADER LINE.
PARAMETERS: P_WAERS LIKE TCURT-WAERS,        "Currency
            P_LTEXT LIKE TCURT-LTEXT,        "Long Text
            P_KTEXT LIKE TCURT-KTEXT.        "Short Text
*--- Example of updating value of another field on the screen -
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_WAERS.
CLEAR: DYFIELDS[], DYFIELDS.
*--- select currency
CALL FUNCTION 'HELP_VALUES_GET'
       EXPORTING
            fieldname        = 'WAERS'
            tabname          = 'TCURT'
       IMPORTING
            SELECT_VALUE     =   P_WAERS.
*--- get long text for the selected currency
SELECT SINGLE LTEXT FROM TCURT
    INTO DYFIELDS-FIELDVALUE
    WHERE SPRAS = SY-LANGU
    AND   WAERS = P_WAERS.
IF SY-SUBRC <> 0.
    CLEAR DYFIELDS-FIELDVALUE.
ENDIF.
*--- update another field
DYFIELDS-FIELDNAME = 'P_LTEXT'.
APPEND DYFIELDS.
CALL FUNCTION 'DYNP_VALUES_UPDATE'
       EXPORTING
            DYNAME               = SY-CPROG
            DYNUMB               = SY-DYNNR
       tables
            dynpfields           = DYFIELDS .
*--- Example of reading value of another field -
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_KTEXT.
*--- read another field
CLEAR: DYFIELDS[], DYFIELDS.
DYFIELDS-FIELDNAME = 'P_WAERS'.
APPEND DYFIELDS.
CALL FUNCTION 'DYNP_VALUES_READ'
       EXPORTING
            DYNAME                   = SY-CPROG
            DYNUMB                   = SY-DYNNR
       TABLES
            DYNPFIELDS               = DYFIELDS .
READ TABLE DYFIELDS INDEX 1.
*--- get short text and update current field
SELECT SINGLE KTEXT FROM TCURT
    INTO P_KTEXT
    WHERE SPRAS EQ SY-LANGU
    AND   WAERS EQ DYFIELDS-FIELDVALUE.
How to add F4 functionality to a paramter variable? Say P_name ie Parameters: P_name like dbtab-fieldname
in At selection-screen on value-request for p_name. How should I add the values john, abraham, linga etc so that these values appear when f4 is pressed on the field in the selection screen?
PARAMETERS: p_name(10).
DATA: BEGIN OF value_tab OCCURS 0,
               name(10),
             END OF value_tab.
DATA :field_tab LIKE dfies OCCURS 0 WITH HEADER LINE.
DATA : return_tab LIKE ddshretval OCCURS 0 WITH HEADER LINE. DATA : x TYPE string.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_name.
REFRESH value_tab[].
REFRESH field_tab[].
REFRESH return_tab[].
    field_tab-fieldname = 'ERNAM'.
field_tab-tabname = 'VBAK'.
APPEND field_tab.
    value_tab-name = 'John'.
APPEND value_tab.
value_tab-name = 'Abraham'.
APPEND value_tab.
value_tab-name = 'Lingam'.
APPEND value_tab.
    CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      retfield        = field_tab-fieldname
    TABLES
      value_tab       = value_tab
      field_tab       = field_tab
      return_tab      = return_tab
    EXCEPTIONS
      parameter_error = 1
      no_values_found = 2
      OTHERS          = 3.
IF sy-subrc = 0.
    p_name = return_tab-fieldval.
ENDIF.
Regards
Sudheer

Problem in at selection-screen on value request

hi friends ,
      i want to display f4 help for a field in a popup. this i can do, but this popup comes based on values
i entered in other screen fields . but these values are not updated to screen values when i trigger f4.

Hi,
DATA: T_DYNPRO TYPE TABLE OF DYNPREAD,
      WA_DYNPRO LIKE LINE OF T_DYNPRO,
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_PARAM.
WA_DYNPRO-FIELDNAME = 'Screen Field Name'.
APPEND WA_DYNPRO TO T_DYNPRO.
CALL FUNCTION 'DYNP_VALUES_READ'
EXPORTING
    DYNAME                               = SY-REPID
    DYNUMB                               = SY-DYNNR
   TRANSLATE_TO_UPPER                   = 'X'
TABLES
    DYNPFIELDS                           = T_DYNPRO
EXCEPTIONS
   INVALID_ABAPWORKAREA                 = 1
   INVALID_DYNPROFIELD                  = 2
   INVALID_DYNPRONAME                   = 3
   INVALID_DYNPRONUMMER                 = 4
   INVALID_REQUEST                      = 5
   NO_FIELDDESCRIPTION                  = 6
   INVALID_PARAMETER                    = 7
   UNDEFIND_ERROR                       = 8
   DOUBLE_CONVERSION                    = 9
   STEPL_NOT_FOUND                      = 10
   OTHERS                               = 11
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
READ TABLE T_DYNPRO INTO WA_DYNPRO WITH KEY FIELDNAME = 'Screen Field Name'.
TEMP = WA_DYNPRO-FIELDVALUE.
" Select the values based on Temp and populate your internal table for F4 help using the Screen value Temp
"Call 'F4IF_INT_TABLE_VALUE_REQUEST' and display the pop up.

Problem using At Selection Screen on value request for *"Select Fieldname"*

Hi All,
I Have a requirement of passing mutiple paraters value or selection option values in selection screen.
For Eg :I Have -
*--- Selection Screen
    Select-options : s1 for vbak-vbeln ,
                                          s2 for vbap-posnr.
*--- At Selection Screen
    At Selection Screen on value request for s1-low.
     i need to pass S1-low as well as S2-low ...
     i.e first item of the Sales Document.
    Value is getting passed in S1-low but not in S2-low
    Can anybody help me on this ...
   Thanks in Advance ..

Hi,
Make use of the FM "F4IF_INT_TABLE_VALUE_REQUEST" for the value request for the first field.
Use the "FIELD_MAPPING" in the tables parameter of the above FM.
Please go through the FM documentation.
Hope this will help you.
Regards,
Smart Varghese

Error: ORA-01722: invalid number performing List of Values query.

when i created a cascading select list, For the first time it worked properly then little later
it is giving this error.
Error: ORA-01722: invalid number performing List of Values query: "select distinct cl_name d, cl_no r from Kclient where gr_no = :P1_GRNO order by 1
could any one please solve the problem?
2. when i run the application. in all the items edit button is automatically seen
including in the login screen.
could any one identify what is the error and give me a solution.

Is this better?
select DISTINCT FIRST_NAME||' '||LAST_NAME display_value
      , ROW_ID return_value
from "PSA_RESOURCE_MANAGER"
where PSA_RESOURCE_MANAGER.ACTIVE_FLAG='Y'
   AND :P117_REPORTING_MANAGER = PSA_RESOURCE_MANAGER.REPORTING_MANAGER
   AND :P117_REPORTING_MANAGER <> -1 order by 1or
select DISTINCT FIRST_NAME||' '||LAST_NAME display_value
      , ROW_ID return_value
from "PSA_RESOURCE_MANAGER"
where PSA_RESOURCE_MANAGER.ACTIVE_FLAG='Y'
   AND :P117_REPORTING_MANAGER = PSA_RESOURCE_MANAGER.REPORTING_MANAGER
   AND :P117_REPORTING_MANAGER != '-1' order by 1Is ROW_ID a column in your table by the way? If not, you should use ROWID (without the underscore)

At selection-screen on value-request

Hi experts,
Pls see the below code.
When ever plant is enterd in screen i have to get material no. and material group based on that plant dynamically.
I am getting F4 list of values for the first one.But For the second one i am not getting.
What may be teh problem?
*& Report ZRA_SELECTIONSCTREEN                                        *
REPORT ZRA_SELECTIONSCTREEN                    .
tables: mara,marc.
parameters: p_werks like marc-werks,
            p_matnr like marC-matnr,
            p_matkl like mara-matkl.
data: begin of it_matnr occurs 0,
      matnr like mara-matnr,
      end of it_matnr.
data: begin of it_matkl occurs 0,
      matkl like mara-matkl,
      end of it_matkl.
at selection-screen on value-request for p_matnr.
select matnr into table it_matnr from marc where werks = p_werks.
if not it_matnr[] is initial.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
DDIC_STRUCTURE         = ' '
    RETFIELD               = 'MATNR'
PVALKEY                = ' '
   DYNPPROG               = SY-CPROG
   DYNPNR                 = SY-DYNNR
   DYNPROFIELD            = 'p_matnr'
STEPL                  = 0
WINDOW_TITLE           =
VALUE                  = ' '
   VALUE_ORG              = 'S'
MULTIPLE_CHOICE        = ' '
DISPLAY                = ' '
CALLBACK_PROGRAM       = ' '
CALLBACK_FORM          = ' '
MARK_TAB               =
IMPORTING
USER_RESET             =
TABLES
    VALUE_TAB              = it_matnr
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.
ENDIF.
select matkl from mara into table it_matkl for all entries IN it_matnr
WHERE MATNR = IT_MATNR-MATNR.
if not it_matkl[] is INITIAL.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
DDIC_STRUCTURE         = ' '
    RETFIELD               = 'MATKL'
PVALKEY                = ' '
   DYNPPROG               = SY-CPROG
   DYNPNR                 = SY-DYNNR
   DYNPROFIELD            = 'p_matkl'
STEPL                  = 0
WINDOW_TITLE           =
VALUE                  = ' '
   VALUE_ORG              = 'S'
MULTIPLE_CHOICE        = ' '
DISPLAY                = ' '
CALLBACK_PROGRAM       = ' '
CALLBACK_FORM          = ' '
MARK_TAB               =
IMPORTING
USER_RESET             =
TABLES
    VALUE_TAB              = IT_MATKL
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.
ENDIF.
Regards
Ravi.

hi
good
i tried your report, f4 help is coming for all the fields but dynamic field selection is ot coming because ther eis a prob with your select statment,
you select the data from the database table for the another two fields as the value you r entering for werks(plant).
thanks
mrutyun^

BEx web report selection screen entries retain when closing and opening the report again

Hello all,
please help me in the below query.
Till last month the entries we made in BEx web report selection screen are retained in the selection screen even when we close the web report and open it again from portal without logging off. But recently this functionality is missing and the entries in selection screen are not remembered when we close and open the same report again. It is a good feature for the users. Have you come across this issue?

No...I think i can reframe the question very clearly......For ex: we are opening a Bex Web report...so initally we would be prompted by the variable selection screen...in which we have to give the entries(Values) for those variables like Cal month, Sales org, Company code, etc.....Later on the report will get open based on the values we have given......
Now if we close the particular report without logging off then if i try to open the same report that selected values are missing.....earlier it used to remember the values we have given until we log off....But now that functionality is missing....It was very useful feature.....Can you please tel me what can be done to resolve this??
I hope the explanation would be clear now.

Module-pool screen field value under POV event

Hi All,
I have one issue...please suggest me solution for this.
In module-pool program i have one screen(1000) which has one field(hrname_1000).
Under this event:
PROCESS ON VALUE-REQUEST.
FIELD hrname_1000 MODULE hrname_1000.
under this module hename_1000 i have used F4IF_INT_TABLE_VALUE_REQUEST to put a search help for field hrname_1000.
after that i am trying to retrive HR related stuff's based on the field on module-pool i.e i am using hrname_1000 in the where condition.
but problem is that im not getting value for hrname_1000 which im giving in the module-pool screen.
thats y my select query is not working.
Where as im getting values for the hrname_1000 under PBO & PAI.
It will look like below.
PROCESS ON VALUE-REQUEST.
FIELD hrname_1000 MODULE hrname_1000.
(under the above module)
SELECT DISTINCT ename plans FROM pa0001 INTO CORRESPONDING FIELDS OF TABLE itab WHERE stell = '50001026'.
      LOOP AT itab INTO wa WHERE ename = hrname_1000.
      ENDLOOP.
Please suggest
Thanks & regards
Ansumesh

In some of the cases the screen field is present in the screen but not holding the value in the required structure or field.
so here u need to check the option of reading the screen field values explictly..
//once u hit an enter and do the f4 i think the value will be there ...but if u dont hit enter and do an F4 the value cannot hold and i think u r in this case ..
1.Fill the screen field name in the structure dynpread.
DATA: BEGIN OF DYNP_VALUES OCCURS 10.
        INCLUDE STRUCTURE DYNPREAD.
DATA: END   OF DYNP_VALUES.
DYNP_VALUES-FIELDNAME = 'HRNAME_1000'.
APPEND DYNP_VALUES.
* read screen values
CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
      DYNAME     = HELP_REPID "call the repid of ur prog
      DYNUMB     = HELP_DYNNR "pass the screen number
    TABLES
      DYNPFIELDS = DYNP_VALUES
    EXCEPTIONS
      OTHERS     = 1.
now dynp_values hold the field name and field value of the screen .
now
SORT DYNP_VALUES BY FIELDNAME.
    READ TABLE DYNP_VALUES WITH KEY 'HRNAME_1000' BINARY SEARCH.
    IF SY-SUBRC EQ 0.
      HELP_XXXX = DYNP_VALUES-FIELDVALUE. "store the value into a variable
      TRANSLATE HELP_XXXX TO UPPER CASE.
    ENDIF.
Now check the code with the value if its getting populated which once there will make ur select work ..
Vijay..

Selection Screen for BW Query

Hi,
We have a requirement where, in the Selection Screen of the Query we have to show a Table, the data will be fetch from a Info Object. There will be a last column for taking data from the User.
Once the selection screen is filled and executed Report will be outputed.
This can be achieved in R/3 ABAP by using Table Control on the screen.
but have no idea how this can be achieved in BW.
Can anyone help me out ?

Hi Muthu,
Thanks for replying. Let me explain the scenario little more in detail.
We have a selection screen which will have some slection fields and a table like structure for displaying some values by default. When the execute button is pressed the final report is generated.
There is no link between table structure and the final report except one of the coulmn field is used to derive a flag value in the final report.
The problem we are facing is how the Selection fields and table structure be displayed when the Report transaction is called.
Pankaj

Selection screen field value capturing

Hi,
I have developed a report for displaying amendment changes in a purchse order. The input are purchase order
and plant. Now they have asked for an additional input of version field, which should also have F4 field-value help.
For version field, default there is no F4 key. So, i have written code like after entering the PO number when we press the enter key, for the corresponding PO, it brings the version no in input field. But my problem is it is displaying the values for version field, but when i select some value it is not getting updated in selection-screen version field. I have attached my code below... please help me
in the below code my problem is only between
AT SELECTION-SCREEN on value-request for P_REVNO.
and
start-of-selection event...
TABLES : ekko,
ekpo,
cdhdr,
cdpos,
MEPO1325,
t001,
t166c,
t166t,
adrc,
komp, " net rate of header
konv, " net value of purchase order
zammendpodet.
TYPES : BEGIN OF ts_cdpos,
ebeln TYPE ekbe-ebeln,
ebelp TYPE ekbe-ebelp,
matnr type ekpo-matnr,
maktx type makt-maktx,
prdat type ekpo-prdat,
belnr TYPE ekbe-belnr,
budat TYPE ekbe-budat,
tkey(70),
txz01 TYPE ekpo-txz01,
ctxnr TYPE t166c-ctxnr,
desp(20) type C,
MEINS LIKE MARA-MEINS,
chtxt TYPE t166t-chtxt.
INCLUDE STRUCTURE cdpos.
TYPES : END OF ts_cdpos.
data : begin of it_makt occurs 0,
matnr like makt-matnr,
maktx like makt-maktx,
end of it_makt.
data : begin of it_maRA occurs 0,
matnr like maRA-matnr,
mEINS like maRA-mEINS,
end of it_maRA.
*Internal table declartion
DATA : it_erev TYPE TABLE OF erev WITH HEADER LINE,
it_ekko1 type table of ekko with header line,
it_konv2 type table of konv with header line,
it_ekpo TYPE TABLE OF ekpo WITH HEADER LINE,
it_ekpo1 TYPE TABLE OF ekpo WITH HEADER LINE,
it_cdhdr TYPE TABLE OF cdhdr WITH HEADER LINE,
it_t166c TYPE TABLE OF t166c WITH HEADER LINE,
it_ekbe TYPE TABLE OF ekbe WITH HEADER LINE,
IT_AMMEND TYPE TABLE OF ZAMMENDPODET WITH HEADER LINE,
IT_AMMEND1 TYPE TABLE OF ZAMMENDPODET WITH HEADER LINE,
it_komp TYPE TABLE OF KOMP WITH HEADER LINE,
it_konv type table of konv with header line,
it_konv1 type table of konv with header line,
it_cdpos TYPE TABLE OF ts_cdpos WITH HEADER LINE.
data : BEGIN OF it_erev1 occurs 0,
revno TYPE erev-revno.
data : end of it_erev1.
data : begin of it_cdpos1 occurs 0.
include structure cdpos.
data : ebeln like ekko-ebeln,
item like ekpo-ebelp,
aedat like ekpo-aedat,
matnr like ekpo-matnr,
txz01 like ekpo-txz01,
desp(20) type C,
MEINS LIKE MARA-MEINS,
item1 like ekpo-netpr.
data : end of it_cdpos1.
types : dy_temp TYPE lips-lgort.
DATA : dyfields LIKE dynpread OCCURS 1 WITH HEADER LINE, dy_value TYPE dy_temp.
DATA: progname TYPE sy-repid,
dynnum TYPE sy-dynnr,
dynpro_values TYPE TABLE OF dynpread,
field_value LIKE LINE OF dynpro_values.
*Work variable declaration
DATA : v_revno TYPE erev-revno,
revno1 type zammendpodet-revno,
w_version TYPE erev-revno,
w_erdat TYPE erev-erdat,
w_eruhr TYPE erev-eruhr,
wv_eruhr TYPE erev-eruhr,
v_tabkey TYPE cdpos-tabkey,
v_temp(5),
v_olddate(8),
v_newdate(8),
v_value_old TYPE cdpos-value_old,
V_OLD TYPE EKPO-BRTWR, " OLD VALUE FOR PURCHASE ORDER
l_ind TYPE i,
temp value 0 type i,
temp1 type i,
temp2 type i,
temp3 type i,
wa_cdpos like line of it_cdpos,
wa_cdpos1 like line of it_cdpos1,
v_tabkey1 TYPE cdpos-tabkey.
PARAMETERS : p_ebeln TYPE ekko-ebeln,
p_ebelp TYPE ekpo-ebelp.
p_bukrs TYPE t001-bukrs,
p_revno type erev-revno.
INITIALIZATION.
AT SELECTION-SCREEN on value-request for P_REVNO.
CLEAR: dyfields[], dyfields.
dyfields-fieldname = 'P_REVNO'.
APPEND dyfields.
CALL FUNCTION 'DYNP_VALUES_READ'
EXPORTING
dyname = sy-cprog
dynumb = sy-dynnr
TABLES
dynpfields = dyfields.
READ TABLE dyfields INDEX 1.
SELECT revno
FROM erev
INTO TABLE it_erev1 WHERE edokn = p_ebeln.
IF sy-subrc = 0.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
retfield = 'REVNO'
dynpprog = progname
dynpnr = dynnum
dynprofield = 'P_REVNO'
value_org = 'S'
TABLES
value_tab = it_eREV1
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.
ENDIF.
START-OF-SELECTION.
SELECT SINGLE *
FROM t001
WHERE bukrs EQ p_bukrs.
IF sy-subrc EQ 0.
SELECT SINGLE *
FROM adrc
WHERE addrnumber EQ t001-adrnr.
ENDIF.
SELECT SINGLE *
FROM ekko
WHERE ebeln
EQ p_ebeln
AND frgke = 2.
select * from konv into corresponding fields of table it_konv where knumv eq ekko-knumv.
useful informations will be rewarded.
thanks and regards,
subbu.,

Hi ,
       Use this function module
    call function 'DYNP_VALUES_UPDATE'
      exporting
        dyname               = sy-repid
        dynumb               = sy-dynnr
      tables
        dynpfields           = t_dynpfields
      exceptions
        invalid_abapworkarea = 1
        invalid_dynprofield = 2
        invalid_dynproname   = 3
        invalid_dynpronummer = 4
        invalid_request      = 5
        no_fielddescription = 6
        undefind_error       = 7
        others               = 8.
where t_dynpfields would contain name of field and value you want to update.
Please reward if useful.

How to add customize message on the variable selection screen in the query

Hi all,
Can we add an customise message on the variable selection screen in the query? If yes please let me know how it can be achevied?
Thanks,
Rani

Hi Rani,
I faced a similar issue (for what I understand your request is).
My requirement for the Variable Screen was to do:
1) place a link to a ppt file
2) remove buttons "Save", "Save As...), "Delete"... the standard buttons come when running the Query or WebTempl
We were using a Web Templ for BI7.0
I struggled trying to find out how to do it. My conclusions are:
- WAD, not sure we can accomplish it using a Web Template but i did not "play" a lot with the Web_Template Properties in order to know
- XHTML, I was told in my post HTML modification was the way, but I have close to nil background in HTML and couold not find the way of accessing the Variable Entry screen
For instance, I had to remove similar buttons and change some font size from a link on the Web Template (WAD), which was pretty straight forward. In WAD the buttons come with its own icon and to increase the Font size for that link we used XHTML (<font size="2" >). But the heck of the variable screen...well, i just did not get trhough to it to modify it in any way.
Good luck,
Definetly in a Query I would say that no.
alex
PS: If anyone had a better insight, please feel free to share it.

ORA-01722: invalid number performing List of Values query

I have a situation here where I want to pass string value(available in search field) to POP up key LOV on another page as default value.
I passed item value in default field in POPup key LOV item.I am able to see string value but It also gave me following error.
Error: ORA-01722: invalid number performing List of Values query: "select CUSTOMER_NAME, CUSTOMER_ID from (select customer_name, customer_id from hed_customers) wwvlovinlineviewname where CUSTOMER_ID = :WWV_LOV_RETURN_KEY_UTIL_1111".
Without Default value, it work like champ.
Please suggest how to get rid of this error
Thanks in advance

I hit the same problem.
The thing is that, in APEX, a 'null' value in a form is not really null but gets passed on as '%'.
When that gets compared to a number, 01722 will occur.
A workaround is to define a 'value if null' that is an implicit number, like '-1'.
And lets hope no one ever uses that as a real ID...
Cheers
Peter

Selection screen field value

Hi All,
I am facing a problem with selection screen parameter.
I have one file parameter p_fname TYPE rlgrap-filename OBLIGATORY.When I enter some file path and excute I will get the result and once again when I start to execute the program I expect the previous value(file path) should be available for this file parameter that has entered on the selection screen but I am not getting that.
I dont find any parameter id for this field data element.
Please let me know how to do this?
Best Regards
Ramesh

Hi,
You should have..
DATA: FLNAME TYPE STRING.
PARAMETERS: FILENAME TYPE RLGRAP-FILENAME.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILENAME.
CALL FUNCTION 'F4_FILENAME'
   IMPORTING
     FILE_NAME           = FILENAME.
Find the demo code below, it uses the file :
report ZDS_BDC_MM01_2
       no standard page heading line-size 255.
*include bdcrecx1.
*parameters: dataset(132) lower case.
***    DO NOT CHANGE - the generated data section - DO NOT CHANGE    ***
*   If it is nessesary to change the data section use the rules:
*   1.) Each definition of a field exists of two lines
*   2.) The first line shows exactly the comment
*       '* data element: ' followed with the data element
*       which describes the field.
*       If you don't have a data element use the
*       comment without a data element name
*   3.) The second line shows the fieldname of the
*       structure, the fieldname must consist of
*       a fieldname and optional the character '_' and
*       three numbers and the field length in brackets
*   4.) Each field must be type C.
*** Generated data section with specific formatting - DO NOT CHANGE ***
data: begin of record OCCURS 0,
* data element: MATNR
        MATNR_001(018),
* data element: MBRSH
        MBRSH_002(001),
* data element: MTART
        MTART_003(004),
* data element: XFELD
        KZSEL_01_004(001),
* data element: MAKTX
        MAKTX_005(040),
* data element: MEINS
        MEINS_006(003),
* data element: MTPOS_MARA
        MTPOS_MARA_007(004),
      end of record.
DATA: FLNAME TYPE STRING.
*** End generated data section ***
DATA:   BDCDATA LIKE BDCDATA    OCCURS 0 WITH HEADER LINE.
*** MESSAGE******
DATA: BEGIN OF MESSTAB OCCURS 0.
        INCLUDE STRUCTURE BDCMSGCOLL.
        DATA: MATNR TYPE MARA-MATNR,
      END OF MESSTAB.
****END OF MESSAGE****
PARAMETERS: FILENAME TYPE RLGRAP-FILENAME.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILENAME.
CALL FUNCTION 'F4_FILENAME'
   IMPORTING
     FILE_NAME           = FILENAME.
start-of-selection.
*perform open_dataset using dataset.
perform open_group.
FLNAME = FILENAME.
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
    FILENAME                      = FLNAME
    FILETYPE                      = 'DAT'
*   HAS_FIELD_SEPARATOR           = ' '
*   HEADER_LENGTH                 = 0
*   READ_BY_LINE                  = 'X'
*   DAT_MODE                      = ' '
*   CODEPAGE                      = ' '
*   IGNORE_CERR                   = ABAP_TRUE
*   REPLACEMENT                   = '#'
*   CHECK_BOM                     = ' '
*   VIRUS_SCAN_PROFILE            =
*   NO_AUTH_CHECK                 = ' '
* IMPORTING
*   FILELENGTH                    =
*   HEADER                        =
TABLES
    DATA_TAB                      = record
EXCEPTIONS
   FILE_OPEN_ERROR               = 1
   FILE_READ_ERROR               = 2
   NO_BATCH                      = 3
   GUI_REFUSE_FILETRANSFER       = 4
   INVALID_TYPE                  = 5
   NO_AUTHORITY                  = 6
   UNKNOWN_ERROR                 = 7
   BAD_DATA_FORMAT               = 8
   HEADER_NOT_ALLOWED            = 9
   SEPARATOR_NOT_ALLOWED         = 10
   HEADER_TOO_LONG               = 11
   UNKNOWN_DP_ERROR              = 12
   ACCESS_DENIED                 = 13
   DP_OUT_OF_MEMORY              = 14
   DISK_FULL                     = 15
   DP_TIMEOUT                    = 16
   OTHERS                        = 17
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
LOOP AT record.
DATA:
    CNT TYPE I.
    CNT = CNT + 1.
    REFRESH BDCDATA.
perform bdc_dynpro      using 'SAPLMGMM' '0060'.
perform bdc_field       using 'BDC_CURSOR'
                              'RMMG1-MTART'.
perform bdc_field       using 'BDC_OKCODE'
                              '/00'.
perform bdc_field       using 'RMMG1-MATNR'
                              record-MATNR_001.
perform bdc_field       using 'RMMG1-MBRSH'
                              record-MBRSH_002.
perform bdc_field       using 'RMMG1-MTART'
                              record-MTART_003.
perform bdc_dynpro      using 'SAPLMGMM' '0070'.
perform bdc_field       using 'BDC_CURSOR'
                              'MSICHTAUSW-DYTXT(01)'.
perform bdc_field       using 'BDC_OKCODE'
                              '=ENTR'.
perform bdc_field       using 'MSICHTAUSW-KZSEL(01)'
                              record-KZSEL_01_004.
perform bdc_dynpro      using 'SAPLMGMM' '4004'.
perform bdc_field       using 'BDC_OKCODE'
                              '/00'.
perform bdc_field       using 'MAKT-MAKTX'
                              record-MAKTX_005.
perform bdc_field       using 'BDC_CURSOR'
                              'MARA-MEINS'.
perform bdc_field       using 'MARA-MEINS'
                              record-MEINS_006.
perform bdc_field       using 'MARA-MTPOS_MARA'
                              record-MTPOS_MARA_007.
perform bdc_dynpro      using 'SAPLSPO1' '0300'.
perform bdc_field       using 'BDC_OKCODE'
                              '=YES'.
*perform bdc_transaction using 'MM01'.
CALL TRANSACTION 'MM01' USING BDCDATA
                        MODE 'N'
                        UPDATE 'A'
                        MESSAGES INTO MESSTAB.
READ TABLE MESSTAB INTO MESSTAB INDEX CNT.
   IF MESSTAB-MSGTYP = 'E'.
     MESSTAB-MATNR = RECORD-MATNR_001.
     MODIFY MESSTAB INDEX CNT FROM MESSTAB. " TRANSPORTING MATNR.
   ENDIF.
ENDLOOP.
FORM OPEN_GROUP.
CALL FUNCTION 'BDC_OPEN_GROUP'
         EXPORTING CLIENT   = SY-MANDT
                    GROUP    = 'MM01'
                    USER     = SY-UNAME
                    KEEP     = 'X'.
ENDFORM.
FORM BDC_INSERT.
CALL FUNCTION 'BDC_INSERT'
   EXPORTING
     TCODE                  = 'MM01'
*     POST_LOCAL             = NOVBLOCAL
*     PRINTING               = NOPRINT
*     SIMUBATCH              = ' '
*     CTUPARAMS              = ' '
    TABLES
      DYNPROTAB              = BDCDATA
   EXCEPTIONS
     INTERNAL_ERROR         = 1
     NOT_OPEN               = 2
     QUEUE_ERROR            = 3
     TCODE_INVALID          = 4
     PRINTING_INVALID       = 5
     POSTING_INVALID        = 6
     OTHERS                 = 7
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.
END-OF-SELECTION.
LOOP AT MESSTAB.
    IF MESSTAB-MSGTYP = 'E'.
      WRITE:/ 'ERROR OCCURED ON MATNR = ',MESSTAB-MATNR , 'MESSAGE : MATNR ALREADY EXISTS IN MARA!!!'.
    ENDIF.
ENDLOOP.
perform close_group.
*perform close_dataset using dataset.
*&      Form close_group
*       text
* --> p1        text
* <-- p2        text
FORM close_group .
CALL FUNCTION 'BDC_CLOSE_GROUP'
EXCEPTIONS
   NOT_OPEN          = 1
   QUEUE_ERROR       = 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.
ENDFORM.                    " close_group
*&      Form bdc_dynpro
*       text
*      -->P_0270   text
*      -->P_0271   text
FORM bdc_dynpro USING PROGRAM DYNPRO.
CLEAR BDCDATA.
BDCDATA-PROGRAM = PROGRAM.
BDCDATA-DYNPRO   = DYNPRO.
BDCDATA-DYNBEGIN = 'X'.
APPEND BDCDATA.
ENDFORM.                    " bdc_dynpro
*&      Form bdc_field
*       text
*      -->P_0275   text
*      -->P_0276   text
FORM bdc_field USING FNAM FVAL.
IF FVAL <> ' '.
    CLEAR BDCDATA.
    BDCDATA-FNAM = FNAM.
    BDCDATA-FVAL = FVAL.
    APPEND BDCDATA.
ENDIF.
ENDFORM.                    " bdc_field
HTH
Regards,
Dhruv Shah

Screen Entry Values Query Problem

Similar Messages

Maybe you are looking for