topic Re: search help in Application Development and Automation Discussions

search help

Former Member — Thu, 04 Oct 2007 05:51:54 GMT

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.

Re: search help

Former Member — Thu, 04 Oct 2007 06:02:49 GMT

Hi,

you can do it using F4IF_INT_TABLE_VALUE_REQUEST ,

Regards,

Raghavendra

Re: search help

Former Member — Thu, 04 Oct 2007 06:05:06 GMT

You can as well check program BCALV_TEST_LIST.

Regards,

Raghavendra

Re: search help

seshatalpasai_madala — Thu, 04 Oct 2007 06:07:21 GMT

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

Re: search help

Former Member — Thu, 04 Oct 2007 06:10:04 GMT

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

Re: search help

Former Member — Thu, 04 Oct 2007 06:13:21 GMT

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.

write like this

Reward if usefull

Re: search help

varma_narayana — Thu, 04 Oct 2007 06:15:02 GMT

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.

reward if helpful.

Re: search help

Former Member — Thu, 04 Oct 2007 09:19:45 GMT

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 zdoc_typ.

zdoc_typ is Search Help name.

reward if useful.