Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

search help

Former Member
0 Likes
878

Hi

I am having a selection screen with parameters

1 .p_quonum type vbak-vbeln ,

2. p_quotyp type vbak-auart default 'ZQTP' obligatory,

Depending on the second parameter the values for the first parameter should come using search help .

kindly suggest.

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
832

Hi,

you can do it using F4IF_INT_TABLE_VALUE_REQUEST ,

Regards,

Raghavendra

7 REPLIES 7
Read only

Former Member
0 Likes
833

Hi,

you can do it using F4IF_INT_TABLE_VALUE_REQUEST ,

Regards,

Raghavendra

Read only

0 Likes
832

You can as well check program BCALV_TEST_LIST.

Regards,

Raghavendra

Read only

seshatalpasai_madala
Product and Topic Expert
Product and Topic Expert
0 Likes
832

Hi,

Create a search help that takes an importing parameter of type your Second parameter and then use it as a search help for your first parameter. Make sure that data element of your search help Import parameter and your screens second parameter are same.

Regards,

Sesh

Read only

Former Member
0 Likes
832

Hi,

write at selection screen and pass the first value to select and get the values into itab and call the FM 'F4IF_INT_TABLE_VALUE_REQUEST'

Try below and change

TYPES : BEGIN OF lt_kunnr,

kunnr TYPE kna1-kunnr,

END OF lt_kunnr.

TYPES : BEGIN OF lt_terr,

name1 TYPE kna1-name1,

END OF lt_terr.

DATA : lv_vbeln TYPE vbak-vbeln.

DATA : li_kunnr TYPE STANDARD TABLE OF lt_kunnr,

li_terri TYPE STANDARD TABLE OF lt_terr.

SELECT kunnr

FROM vbpa

INTO

TABLE li_kunnr

WHERE parvw = 'ZT'.

DELETE ADJACENT DUPLICATES FROM li_kunnr.

SELECT name1

INTO TABLE li_terri

FROM kna1

FOR ALL

ENTRIES IN li_kunnr

WHERE kunnr = li_kunnr-kunnr.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

retfield = 'NAME1'

dynprofield = 'P_TERR'

value_org = 'S'

dynpprog = sy-repid

dynpnr = sy-dynnr

TABLES

value_tab = li_terri

EXCEPTIONS

parameter_error = 1

no_values_found = 2

OTHERS = 3.

Regards

Shiva

Read only

Former Member
0 Likes
832

Hi

creat one internal table to store the values

AT SELECTION-SCREEN ON VALUE-REQUEST FOR S_OBJID-LOW.

  • IF S_OBJID IS NOT INITIAL.

SELECT OTYPE OBJID FROM HRP1000

INTO TABLE IT_OBJID_SH

WHERE OTYPE = 'D'.

IF SY-SUBRC EQ 0.

  • SEARCH HELP FOR QUALIFICATION.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

  • DDIC_STRUCTURE = ' '

RETFIELD = 'OBJID'

  • PVALKEY = ' '

DYNPPROG = SY-REPID

DYNPNR = SY-DYNNR

DYNPROFIELD = 'S_OBJID'

  • STEPL = 0

  • WINDOW_TITLE =

  • VALUE = ' '

VALUE_ORG = 'S'

  • MULTIPLE_CHOICE = ' '

  • DISPLAY = ' '

  • CALLBACK_PROGRAM = ' '

  • CALLBACK_FORM = ' '

  • MARK_TAB =

  • IMPORTING

  • USER_RESET =

TABLES

VALUE_TAB = IT_OBJID_SH

  • FIELD_TAB =

  • RETURN_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.

.

write like this

<b>Reward if usefull</b>

Read only

varma_narayana
Active Contributor
0 Likes
832

Hi

Test this report.. it will work..

***************F4 HELP GENERATION

REPORT zsel_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.

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.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_posnr.

dynfields-fieldname = 'P_VBELN'.

APPEND dynfields.

**Read the Values of the SCREEN FIELDs

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.

**Find out the Value of P_VBELN

READ TABLE dynfields WITH KEY fieldname = 'P_VBELN'.

p_vbeln = dynfields-fieldvalue.

**Convert the Value into internal format

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'

EXPORTING

input = p_vbeln

IMPORTING

output = p_vbeln.

**Fetch the correponding itemnos from VBAP

SELECT posnr matnr arktx INTO TABLE help_item

FROM vbap

WHERE vbeln = p_vbeln.

**Generate the F4 help with internal table values

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.

*********************************************************

**SELECTION SCREEN - CUSTOMIZING GUI STATUS

REPORT ZSEL_GUI .

parameters : p_dsn(30) DEFAULT 'EMP.TXT'.

DATA : V_STATUS TYPE SY-PFKEY VALUE 'SEL1', create in SE41 WITH TYPE Selection Screen

V_rEPID TYPE SY-REPID.

AT SELECTION-SCREEN OUTPUT.

V_REPID = SY-REPID.

DATA itab TYPE TABLE OF sy-ucomm.

APPEND: 'PRIN' TO itab.

APPEND: 'SPOS' TO itab.

CASE sy-dynnr.

WHEN '1000'.

CALL FUNCTION 'RS_SET_SELSCREEN_STATUS'

EXPORTING

p_status = V_STATUS

P_PROGRAM = V_REPID "program where the GUI Status is created

TABLES

p_exclude = itab.

ENDCASE.

<b>reward if helpful.</b>

Read only

Former Member
0 Likes
832

hi,

make one search help from SE11.

Give name and in selection method give VBAK.

Now Make VBELN Export and Auart Import with default value 'ZQTP'.

Now in report , write like this,

parameters: p_quonum like vbak-vbeln MATCHCODE OBJECT <b>zdoc_typ</b>.

zdoc_typ is Search Help name.

reward if useful.