cancel
Showing results for 
Search instead for 
Did you mean: 

Alternate Function Module for ECC

Former Member
0 Kudos

Hi,

I work for an ECC Upgrade assignment.

Kindly let me know the alternate FM for 'HELP_VALUES_GET_WITH_MACO' in ECC, as this is obsolete in older version.

Thanks in adv,

Shiv

Accepted Solutions (1)

Accepted Solutions (1)

Former Member
0 Kudos

Hi Shiv,

Suggest to check the coding in the program accordingly.

Function Module HELP_VALUES_GET_WITH_MACO is obsolete in ECC Suggest to use F4IF_FIELD_VALUE_REQUEST

Regards

Arani Bhaskar

Former Member
0 Kudos

Hi,

will check it.

Also let me know whether there is any replacement for FM 'CD_EVALUATION_PERIODS'.

Thanks,

Shiv

Answers (1)

Answers (1)

Former Member
0 Kudos

Hi Shiv,

u can use the replacement 'F4IF_FIELD_VALUE_REQUEST'

code

function zhelp_values_get_with_maco.
*"--------------------------------------------------------------------
*"*"Local Interface:
*"  IMPORTING
*"     VALUE(MC_ID) TYPE  DD23L-MCID DEFAULT SPACE
*"     VALUE(MC_OBJECT) TYPE  DD23L-MCONAME
*"     VALUE(SELSTR) TYPE  ANY DEFAULT SPACE
*"  EXPORTING
*"     VALUE(SELECTVALUE) TYPE  ANY
*"  EXCEPTIONS
*"      NO_SELECTION
*"      NO_VALUES
*"      NO_VALUES_SELECTED
*"--------------------------------------------------------------------

*& Work variable declarations
  data
  w_searchhelp type dd30v-shlpname.    " Searchhelp variable

*& Field string declarations
  data:
  tfs_return type ddshretval,
  w_fldval  type help_info-fldvalue.

*& Internal table declaration to hold the data for ddshretval
  data:
   it_return like
    standard table
          of tfs_return.

  move mc_object to w_searchhelp.

  if mc_id ne space.
    concatenate '=' mc_id into w_fldval.
  else.
    move selstr to w_fldval.
  endif.                               " IF MC_ID NE space

*& Call function module F4IF_FIELD_VALUE_REQUEST
  call function 'F4IF_FIELD_VALUE_REQUEST'
       exporting
            tabname           = space
            fieldname         = space
            searchhelp        = w_searchhelp
*           SHLPPARAM         = ' '
*           DYNPPROG          = ' '
*           DYNPNR            = ' '
*           DYNPROFIELD       = ' '
*           STEPL             = 0
            value             = w_fldval
*           MULTIPLE_CHOICE   = ' '
*           DISPLAY           = ' '
       tables
            return_tab        =  it_return
       exceptions
            field_not_found   = 1
            no_help_for_field = 2
            inconsistent_help = 3
            no_values_found   = 4
            others            = 5.
  if sy-subrc ne 0.
    case sy-subrc.
      when 1.
        raise no_selection.
      when 2.
        raise no_values_selected.
      when 4.
        raise no_values.

    endcase.                           " CASE SY-SUBRC
  endif.                               " IF SY-SUBRC NE 0

  read table it_return into tfs_return index 1.
  selectvalue = tfs_return-fieldval.

  exit.
endfunction.                           " ZHELP_VALUES_GET_WITH_MACO

also USE FM RP_EVALUATION_PERIODS instead of 'CD_EVALUATION_PERIODS'

regards

ravi