<< Click to Display Table of Contents >> Navigation:  All About ABAP Technique > English > ABAP Tutorial > ABAP Workbench Tools > Enhancement > Business Add-Ins (BADI) > Business Add-Ins (BADI) Examples > ZME_DEFINE_CALCTYPE  > DEFINE_CALCTYPE

method IF_EX_ME_DEFINE_CALCTYPE~DEFINE_CALCTYPE .
CHECK ch_x_lf_calctype NE 'B'.
IF im_x_nekpo-netpr <> 0.
  IF im_x_nekpo-retpo ne im_x_oekpo-retpo.
     ch_x_lf_calctype = 'C'.
  ENDIF.
ENDIF.
endmethod.