topic Re: problem with AT SELECTION-SCREEN ON VALUE REQUEST in Application Development and Automation Discussions

problem with AT SELECTION-SCREEN ON VALUE REQUEST

Former Member — Wed, 05 Nov 2008 11:18:10 GMT

Hi all,

Following is my code.

PARAMETERS: pa_kschl TYPE konv-kschl.

TYPES: BEGIN OF ty_kschl,

kschl TYPE konv-kschl,

END OF ty_kschl.

DATA: t_kschl TYPE STANDARD TABLE OF ty_kschl,

l_wa_kschl TYPE ty_kschl.

l_wa_kschl-kschl = 'ZPRA'.

APPEND l_wa_kschl TO t_kschl.

clear l_wa_kschl.

l_wa_kschl-kschl = 'ZPRE'.

APPEND l_wa_kschl TO t_kschl.

clear l_wa_kschl.

l_wa_kschl-kschl = 'ZPRV'.

APPEND l_wa_kschl TO t_kschl.

clear l_wa_kschl.

l_wa_kschl-kschl = 'ZARL'.

APPEND l_wa_kschl TO t_kschl.

clear l_wa_kschl.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR pa_kschl.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

DDIC_STRUCTURE = ' '

retfield = 'kschl'

PVALKEY = ' '
DYNPPROG = ' '
DYNPNR = ' '
DYNPROFIELD = ' '
STEPL = 0
WINDOW_TITLE =
VALUE = ' '
VALUE_ORG = 'C'
MULTIPLE_CHOICE = ' '
DISPLAY = ' '
CALLBACK_PROGRAM = ' '
CALLBACK_FORM = ' '
MARK_TAB =
IMPORTING
USER_RESET =

TABLES

value_tab = t_kschl.

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.

But when I click F4 on the parameter on the selection screen,it is displaying a message as 'NO VALUES FOUND'.

please help me out.

Re: problem with AT SELECTION-SCREEN ON VALUE REQUEST

Former Member — Wed, 05 Nov 2008 11:21:04 GMT

Hi,

Use like this..


  CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      retfield        = 'KSCHL'
      dynpprog        = sy-cprog
      dynpnr          = '1000'
      dynprofield     = 'PA_KSCHL'
      value_org       = 'S'
    TABLES
      value_tab       = t_kschl
    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.

Edited by: Sukriti Saha on Nov 5, 2008 4:51 PM

Re: problem with AT SELECTION-SCREEN ON VALUE REQUEST

Former Member — Wed, 05 Nov 2008 11:22:41 GMT

Hi,

pass 'S' to value_org. "Structres

Hope it's solve ur problem.

Re: problem with AT SELECTION-SCREEN ON VALUE REQUEST

Former Member — Wed, 05 Nov 2008 11:26:17 GMT

Hi,

Declare the parameter as type C.

buddy have U checked like above.

As you are refering to komv-kschl, it doesnt give u the values that ur intending to.

Try like this.

Declare the parameter as type C.

Regards,

Priya

Edited by: Priya agarwal on Nov 5, 2008 12:30 PM

Re: problem with AT SELECTION-SCREEN ON VALUE REQUEST

Former Member — Wed, 05 Nov 2008 11:27:40 GMT

Hi,

I have changed it. but no change

Re: problem with AT SELECTION-SCREEN ON VALUE REQUEST

Former Member — Wed, 05 Nov 2008 11:28:04 GMT

Hi Sandeep,

Change ur program as below.

PARAMETERS: pa_kschl TYPE konv-kschl.

TYPES: BEGIN OF ty_kschl,

kschl TYPE konv-kschl,

END OF ty_kschl.

DATA: t_kschl TYPE STANDARD TABLE OF ty_kschl,

l_wa_kschl TYPE ty_kschl.

INITIALIZATION.

l_wa_kschl-kschl = 'ZPRA'.

APPEND l_wa_kschl TO t_kschl.

CLEAR l_wa_kschl.

l_wa_kschl-kschl = 'ZPRE'.

APPEND l_wa_kschl TO t_kschl.

CLEAR l_wa_kschl.

l_wa_kschl-kschl = 'ZPRV'.

APPEND l_wa_kschl TO t_kschl.

CLEAR l_wa_kschl.

l_wa_kschl-kschl = 'ZARL'.

APPEND l_wa_kschl TO t_kschl.

CLEAR l_wa_kschl.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR pa_kschl.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

retfield = 'KSCHL'

dynpprog = sy-cprog

dynpnr = '1000'

dynprofield = 'PA_KSCHL'

value_org = 'S'

TABLES

value_tab = t_kschl

EXCEPTIONS

parameter_error = 1

no_values_found = 2

OTHERS = 3.

IF sy-subrc NE 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

Re: problem with AT SELECTION-SCREEN ON VALUE REQUEST

Former Member — Wed, 05 Nov 2008 11:28:58 GMT

Hi,

But my program is a normal report program.

Re: problem with AT SELECTION-SCREEN ON VALUE REQUEST

Former Member — Wed, 05 Nov 2008 11:31:07 GMT

Hi Sandeep,

u need to populate the internal table under event INITIALIZATION.Hope wil work

Re: problem with AT SELECTION-SCREEN ON VALUE REQUEST

Former Member — Wed, 05 Nov 2008 11:31:28 GMT

Hey pass this...

dynpprog = sy-cprog

dynpnr = '1000'

Re: problem with AT SELECTION-SCREEN ON VALUE REQUEST

Former Member — Wed, 05 Nov 2008 11:33:40 GMT

Hi Avi,

Its working. Thanks a lot.

Re: problem with AT SELECTION-SCREEN ON VALUE REQUEST

Former Member — Wed, 05 Nov 2008 11:33:46 GMT

Buddy have U checked like above .

As you are refering to komv-kschl, it doesnt give u the values that ur intending to.

Try like this.

Declare the parameter as type C.

Regards,

Priya

Re: problem with AT SELECTION-SCREEN ON VALUE REQUEST

Former Member — Wed, 05 Nov 2008 11:37:53 GMT

hi,

give value_org = 'S'

Re: problem with AT SELECTION-SCREEN ON VALUE REQUEST

Former Member — Wed, 05 Nov 2008 11:44:21 GMT

PARAMETERS: PA_KSCHL TYPE KONV-KSCHL.

TYPES: BEGIN OF TY_KSCHL,

KSCHL TYPE KONV-KSCHL,

END OF TY_KSCHL.

DATA: T_KSCHL TYPE STANDARD TABLE OF TY_KSCHL,

L_WA_KSCHL TYPE TY_KSCHL.

DATA: IT_RET TYPE DDSHRETVAL OCCURS 0 WITH HEADER LINE.

INITIALIZATION.

L_WA_KSCHL-KSCHL = 'ZPRA'.

APPEND L_WA_KSCHL TO T_KSCHL.

CLEAR L_WA_KSCHL.

L_WA_KSCHL-KSCHL = 'ZPRE'.

APPEND L_WA_KSCHL TO T_KSCHL.

CLEAR L_WA_KSCHL.

L_WA_KSCHL-KSCHL = 'ZPRV'.

APPEND L_WA_KSCHL TO T_KSCHL.

CLEAR L_WA_KSCHL.

L_WA_KSCHL-KSCHL = 'ZARL'.

APPEND L_WA_KSCHL TO T_KSCHL.

CLEAR L_WA_KSCHL.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR PA_KSCHL.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

RETFIELD = 'KSCHL'

DYNPPROG = SY-REPID

DYNPNR = SY-DYNNR

DYNPROFIELD = 'KSCHL'

VALUE_ORG = 'S'

TABLES

VALUE_TAB = T_KSCHL

RETURN_TAB = IT_RET.

IF SY-SUBRC EQ 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.