Search Help??

[Former Member]

Hello Everyone,

How can v create search help without using SE11?I know that v can do it thru 'AT SELECTION-SCREEN ON VALUE REQUEST',but can someone give me code for the same??

Thanking u in anticipation.

Regards,

Sirisha.

[RichHeilman]

You can do it in the program like this.

report zrich_0001 .

tables: t001.

data: begin of it001 occurs 0,
      bukrs type t001-bukrs,
      butxt type t001-butxt,
      ort01 type t001-ort01,
      land1 type t001-land1,
      end of it001.

select-options s_bukrs for t001-bukrs.

initialization.

  select bukrs butxt ort01 land1 into table it001 from t001.

  sort it001 ascending by bukrs.
  delete adjacent duplicates from it001 comparing bukrs.

at selection-screen on value-request for s_bukrs-low.

  call function 'F4IF_INT_TABLE_VALUE_REQUEST'
       exporting
            retfield    = 'BUKRS'
            dynprofield = 'S_BUKRS'
            dynpprog    = sy-cprog
            dynpnr      = sy-dynnr
            value_org   = 'S'
       tables
            value_tab   = it001.

start-of-selection.

Regards,

Rich HEilman

[Former Member]

hi,

Use FM <b>'F4IF_INT_TABLE_VALUE_REQUEST'</b>

   CALL FUNCTION 'F4IF_FIELD_VALUE_REQUEST'
         EXPORTING
              TABNAME           = SPACE
              FIELDNAME         = SPACE
              SEARCHHELP        = MC_OBJ
*               SHLPPARAM         = ' '
              DYNPPROG          = DYNPRO_PROGRAM
              DYNPNR            = DYNPRO_NUMBER
              DYNPROFIELD       = DYNPFIELDS-FIELDNAME
              STEPL             = DYNPFIELDS-STEPL
*               VALUE             = ' '
*               MULTIPLE_CHOICE   = ' '
*               DISPLAY           = ' '
*               CALLBACK_PROGRAM  = ' '
*               CALLBACK_FORM     = ' '
        EXCEPTIONS
              FIELD_NOT_FOUND   = 1
              NO_HELP_FOR_FIELD = 2
              INCONSISTENT_HELP = 3
              NO_VALUES_FOUND   = 4
              OTHERS            = 5.
  ENDIF.

[Former Member]

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

DDIC_STRUCTURE = ' '

RETFIELD = 'ZFRGGR1'

PVALKEY = ' '

DYNPPROG = DYNAME

DYNPNR = DYNUMB

DYNPROFIELD = FLDNAME

STEPL = GV_STEP_LINE

WINDOW_TITLE =

VALUE = ' '

VALUE_ORG = 'S'

MULTIPLE_CHOICE = ' '

DISPLAY = ' '

CALLBACK_PROGRAM = ' '

CALLBACK_FORM = ' '

TABLES

VALUE_TAB = IT_PCODE

FIELD_TAB =

RETURN_TAB = T_RETURN

DYNPFLD_MAPPING =

EXCEPTIONS

PARAMETER_ERROR = 1

NO_VALUES_FOUND = 2

OTHERS = 3

.

[RichHeilman]

Kapil's post really solved your problem?

Glad your problem is solved.

Regards,

Rich Heilman

[Former Member]

Hi Guys,

Thanks to everyone for the help.I appreciate it.

Regards,

Sirisha.

[Former Member]

Hi Rich,

Actually u reply helped me.No offence to others.But i already 6 pts to u n I didnt know how to undo it.N i had to close the thread thats y I had to award pts to him.

Thanks for the help Rich.

Regards,

Sirisha.

[RichHeilman]

No problem, for future references you may change the point allocation anytime you want. Just simply select a different radiobutton beside the answer. You can only give one blue star, two green stars, and yellow stars infinite.

For example, if you want to change the allocation, first you must reassign the points for the answer which is mark as blue start. This will free it up for you to assign to another answer. Make sense?

Thanks and welcome to SDN

Regards,

Rich Heilman