topic Re: At selection-screen in Application Development and Automation Discussions

At selection-screen

Former Member — Tue, 27 Jun 2006 09:22:23 GMT

Hi Abapers,

I had 5 parameters in my seelction screen...My requirement is, if i enter value in the first parameter and press enter then it has to populate the values in other 4 parameters.....

this is my coding .But its not working....

PARAMETERS : S_SO LIKE EKKO-EBELN,

P_BUKRS LIKE EKKO-BUKRS,

P_BSART LIKE EKKO-BSART,

P_AEDAT LIKE EKKO-AEDAT,

P_LIFNR LIKE EKKO-LIFNR,

P_EKORG LIKE EKKO-EKORG,

P_EKGRP LIKE EKKO-EKGRP,

P_INCO1 LIKE EKKO-INCO1,

P_INCO2 LIKE EKKO-INCO2.

AT SELECTION-SCREEN .

SELECT BUKRS BSART AEDAT LIFNR EKORG EKGRP INCO1 INCO2

FROM EKKO INTO P_BUKRS P_BSART P_AEDAT P_LIFNR P_EKORG P_EKGRP P_INCO1 P_INCO2 WHERE EBELN = S_SO

Can anybody plz correct this one.

Re: At selection-screen

Former Member — Tue, 27 Jun 2006 09:24:32 GMT

try

at selection-screen output....

This event is executed at PBO of the selection screen every time the user presses ENTER - in contrast to INITIALIZATION. Therefore, this event is not suitable for setting selection screen default values. Also, since AT SELECTION-SCREEN OUTPUT is first executed after the variant is imported (if a variant is used) and after adopting any values specified under SUBMIT in the WITH clause, changing the report parameters or the selection options in AT SELECTION-SCREEN OUTPUT would destroy the specified values.

Here, however, you can use LOOP AT SCREEN or MODIFY SCREEN to change the input/output attributes of selection screen fields

Reward points if it helps

Regards

Gunjan

Message was edited by: Gunjan Kumar

Re: At selection-screen

Former Member — Tue, 27 Jun 2006 09:24:36 GMT

AT SELECTION-SCREEN output.

SELECT single BUKRS BSART AEDAT LIFNR EKORG EKGRP INCO1 INCO2

FROM EKKO INTO ( P_BUKRS, P_BSART, P_AEDAT, P_LIFNR, P_EKORG, P_EKGRP, P_INCO1, P_INCO2) WHERE EBELN = S_SO.

REgards,

Ravi

Re: At selection-screen

Former Member — Tue, 27 Jun 2006 09:25:34 GMT

Hi Abaper,

Use FM DYNP_VALUES_READ to get the value in parameter S_SO and the use FM F4IF_INT_TABLE_VALUE_REQUEST to Populate values to other parameters.

Thanks,

Vinay

Re: At selection-screen

Former Member — Tue, 27 Jun 2006 09:30:57 GMT

Hi ,

One method is through a FM called DYNP_VALUES_UPDATE.

Another method is to store the values of the variables to be displayed when enter is pressed, in an internal table.And pass the internal table to be updated in the other fields by using the FM F4IF_INT_TABLE_VALUE_REQUEST.

Both should work.

Regards,

SP.

Re: At selection-screen

Former Member — Tue, 27 Jun 2006 09:37:03 GMT

Hi contact,

1. use the event

AT SELECTION-SCREEN output .

(and not at selection-screen)

regards,

amit m.

Re: At selection-screen

Former Member — Tue, 27 Jun 2006 09:37:12 GMT

Check the sample code..

REPORT  ZTEST_F4HELP                              .

*---Report with selection screen and to display the list of
* possible entries for field 'B' as per the value in field 'A'.


parameters: p_vbeln type vbak-vbeln,
            p_posnr type vbap-posnr.

at selection-screen on value-request for p_posnr.


  data: begin of help_item occurs 0,
          posnr type vbap-posnr,
          matnr type vbap-matnr,
          arktx type vbap-arktx,
        end of help_item.

  data: dynfields type table of dynpread with header line.


  dynfields-fieldname = 'P_VBELN'.
  append dynfields.

  call function 'DYNP_VALUES_READ'
       exporting
            dyname               = sy-cprog
            dynumb               = sy-dynnr
            translate_to_upper   = 'X'
       tables
            dynpfields           = dynfields
       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.


  read table dynfields with key fieldname = 'P_VBELN'.

  p_vbeln = dynfields-fieldvalue.


  call function 'CONVERSION_EXIT_ALPHA_INPUT'
       exporting
            input  = p_vbeln
       importing
            output = p_vbeln.

  select posnr matnr arktx into table help_item
                 from vbap
                      where vbeln = p_vbeln.



  call function 'F4IF_INT_TABLE_VALUE_REQUEST'
       exporting
            retfield    = 'POSNR'
            dynprofield = 'P_POSNR'
            dynpprog    = sy-cprog
            dynpnr      = sy-dynnr
            value_org   = 'S'
       tables
            value_tab   = help_item.

Regards

vijay

Re: At selection-screen

Former Member — Tue, 27 Jun 2006 09:38:46 GMT

Hi ,

Use Select single statement.

See the following code. It is working fine.

REPORT ZDEMO1 .

PARAMETERS : S_SO LIKE EKKO-EBELN,

P_BUKRS LIKE EKKO-BUKRS,

P_BSART LIKE EKKO-BSART,

P_AEDAT LIKE EKKO-AEDAT,

P_LIFNR LIKE EKKO-LIFNR,

P_EKORG LIKE EKKO-EKORG,

P_EKGRP LIKE EKKO-EKGRP,

P_INCO1 LIKE EKKO-INCO1,

P_INCO2 LIKE EKKO-INCO2.

AT SELECTION-SCREEN OUTPUT.

SELECT SINGLE BUKRS

BSART

AEDAT

LIFNR

EKORG

EKGRP

INCO1

INCO2

FROM EKKO INTO (P_BUKRS, P_BSART, P_AEDAT, P_LIFNR, P_EKORG, P_EKGRP, P_INCO1, P_INCO2) WHERE EBELN = S_SO.

- Selvapandian Arunachalam

Re: At selection-screen

venkat_o — Tue, 27 Jun 2006 09:55:36 GMT

Hi,

1.

Use the below Function module under AT SELECTION-SCREEN event.

*-- Write it back to screen !

CALL FUNCTION 'DYNP_VALUES_UPDATE'

EXPORTING

dyname = sy-repid

dynumb = sy-dynnr

TABLES

dynpfields = lt_dynpfields.

It works .Try it.

Thanks,

Venkat.O

Re: At selection-screen

Former Member — Tue, 27 Jun 2006 09:59:19 GMT

Hi Buddy,

Each screen has got two events A PBO (process before output) and a PAI (process after input). The PBO is the event just before triggering the screen and PAI is the event after the user does some validation in the screen. Each time the screen is called this cycle will be executed.

In our case consider some parameters p1,p2,p3,p4. According to your issue, when the user enters P1 and presses enter p2,p3 and p4 should be populated right. So do this logic in the PBO part.

At Selection-screen output.

if not p1 is initial.

select logic to populate p2,p3,p4.

endif.

Now initially when the screen is called the PBO will come into effect, since P1 is initial the select logic will not triggered. after this the screen will be called. Once the user enters the P1 value which is in the PAI event the control goes to the PBO event now what happens is the P1 is not initial and the value for p2,p3 and p4 will be populated. and those values will be displayed in the screen.

Hope this solves ur issue. Reward if helpful.

Regards,

Tushar

Re: At selection-screen

Former Member — Tue, 27 Jun 2006 10:00:02 GMT

Hi again,

1. We can use the

AT SELECTION-SCREEN OUTPUT

event.

2. just copy paste

(if will show company name,

after selecting company code and pressing ENTER)

report abc.

*----

parameters : bukrs like t001-bukrs,

butxt like t001-butxt.

*----

at selection-screen output.

select single butxt

into butxt

from t001

where bukrs = bukrs.

regards,

amit m.

Re: At selection-screen

Former Member — Tue, 27 Jun 2006 10:08:05 GMT

hi try the follwing type of code:

TABLES : bkpf.

SELECTION-SCREEN BEGIN OF BLOCK b1.

PARAMETERS : p_belnr LIKE bkpf-belnr,

p_gjahr LIKE bkpf-gjahr,

p_budat LIKE bkpf-budat.

SELECTION-SCREEN END OF BLOCK b1.

AT SELECTION-SCREEN.

SELECT *

UP TO 1 ROWS

FROM bkpf

WHERE belnr EQ p_belnr.

ENDSELECT.

MOVE bkpf-gjahr TO p_gjahr.

MOVE bkpf-budat TO p_budat.

regards,

Lucky.

Re: At selection-screen

Former Member — Tue, 27 Jun 2006 10:47:30 GMT

Hi,

check the following code.


PARAMETERS : S_SO LIKE EKKO-EBELN,
P_BUKRS LIKE EKKO-BUKRS,
P_BSART LIKE EKKO-BSART,
P_AEDAT LIKE EKKO-AEDAT,
P_LIFNR LIKE EKKO-LIFNR,
P_EKORG LIKE EKKO-EKORG,
P_EKGRP LIKE EKKO-EKGRP,
P_INCO1 LIKE EKKO-INCO1,
P_INCO2 LIKE EKKO-INCO2.

AT SELECTION-SCREEN <b>on S_SO</b>.

SELECT BUKRS BSART AEDAT LIFNR EKORG EKGRP INCO1 INCO2
  FROM EKKO
  INTO P_BUKRS P_BSART P_AEDAT P_LIFNR P_EKORG P_EKGRP P_INCO1 P_INCO2
 WHERE EBELN = S_SO.

this should help you.

Regards,

Kinshuk

Re: At selection-screen

Former Member — Tue, 27 Jun 2006 11:06:11 GMT

Hai

Check with the following Code

Tables : EKKO.

DATA : T_RETURN TYPE STANDARD TABLE OF DDSHRETVAL WITH HEADER LINE.

DATA : begin of itab occurs 0,

EBELN LIKE EKKO-EBELN,

BUKRS LIKE EKKO-BUKRS,

BSART LIKE EKKO-BSART,

AEDAT LIKE EKKO-AEDAT,

LIFNR LIKE EKKO-LIFNR,

EKORG LIKE EKKO-EKORG,

EKGRP LIKE EKKO-EKGRP,

INCO1 LIKE EKKO-INCO1,

INCO2 LIKE EKKO-INCO2,

end of itab.

PARAMETERS : P_EBELN LIKE EKKO-EBELN,

P_BUKRS LIKE EKKO-BUKRS,

P_BSART LIKE EKKO-BSART,

P_AEDAT LIKE EKKO-AEDAT,

P_LIFNR LIKE EKKO-LIFNR,

P_EKORG LIKE EKKO-EKORG,

P_EKGRP LIKE EKKO-EKGRP,

P_INCO1 LIKE EKKO-INCO1,

P_INCO2 LIKE EKKO-INCO2.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_EBELN.

SELECT EBELN

BUKRS

BSART

AEDAT

LIFNR

EKORG

EKGRP

INCO1

INCO2

up to 10 rows

FROM EKKO INTO table itab. "WHERE EBELN = S_SO.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

RETFIELD = 'EBELN'

DYNPPROG = SY-REPID

DYNPNR = '1000'

DYNPROFIELD = 'P_EBELN'

VALUE_ORG = 'S'

TABLES

VALUE_TAB = ITAB

RETURN_TAB = T_RETURN

EXCEPTIONS

PARAMETER_ERROR = 1

NO_VALUES_FOUND = 2

OTHERS = 3.

if sy-subrc = 0.

read table itab index 1.

P_BUKRS = itab-bukrs.

P_BSART = itab-bsart.

P_AEDAT = itab-aedat.

P_LIFNR = itab-lifnr.

P_EKORG = itab-ekorg.

P_EKGRP = itab-ekgrp.

P_INCO1 = itab-inco1.

P_INCO2 = itab-inco2.

endif.

after execute this code

you will get a popup screen by pressing 'F4' at S_SO parameter

then select a 'EBELN'

then again Execute the values under that P.O will be filled the corresponding Parameters

Thanks & regards

Sreenivasulu P

Re: At selection-screen

Former Member — Tue, 27 Jun 2006 11:17:29 GMT

try this code.it works.

TABLES : bkpf.

SELECTION-SCREEN BEGIN OF BLOCK b1.

PARAMETERS : p_belnr LIKE bkpf-belnr,

p_gjahr LIKE bkpf-gjahr,

p_budat LIKE bkpf-budat.

SELECTION-SCREEN END OF BLOCK b1.

AT SELECTION-SCREEN output.

CLEAR bkpf.

CLEAR p_gjahr.

CLEAR p_budat.

SELECT *

UP TO 1 ROWS

FROM bkpf

WHERE belnr EQ p_belnr.

ENDSELECT.

MOVE bkpf-gjahr TO p_gjahr.

MOVE bkpf-budat TO p_budat.

Re: At selection-screen

Former Member — Tue, 27 Jun 2006 12:18:39 GMT

1. Use At selection-screen output.

2. Otherwise select * and move the individual field into the corresponding parameter.

3.Use Select single.