Display mode for fields G/L Account and cost center in ME51N

                                                                 Refer -  Find meta field value

                                                                G/L account - SAKTO - 551(meta field value)

                                                                Cost center - KOSTL - 510(meta field value)



Step 1: Go to T-code: SE37.

Step 2: Give FM name MEREQBADI_FS_ITEM. And click on display.

Step 3: Click on enhance button (shift +F4).

Step 5: Goto Edit - Enhancement operations- click on show implicit enhancements.

Step 6: Right click on Double quotes (140 line)- enhancement operations- create implementation.


Step 7: Choose enhancement type- Code and click on create implementation and save.

Step 8: Write code.

IF sy-uname = 'TRNGAB63'.
  DATA: wa_header TYPE mereq_header,
        wa_item   TYPE mereq_item,
        lv_kostl  TYPE mmpur_metafield VALUE '510',
        lv_sakto  TYPE mmpur_metafield VALUE '551'.
  FIELD-SYMBOLS: <fs_kostl> LIKE LINE OF ch_fieldselection,
                 <fs_sakto> LIKE LINE OF ch_fieldselection.
  CLEAR:wa_item.
  CALL METHOD im_header->get_data
    RECEIVING
      re_data = wa_header.              " Header Data
  CALL METHOD im_item->get_data
    RECEIVING
      re_data = wa_item.           " Item Data
  IF wa_item-bnfpo IS NOT INITIAL.
    READ TABLE ch_fieldselection ASSIGNING <fs_kostl> WITH TABLE KEY metafield = lv_kostl.
    IF  sy-subrc = 0.
      <fs_kostl>-fieldstatus = '*'.
    ENDIF.
  ENDIF.
  READ TABLE ch_fieldselection ASSIGNING <fs_sakto> WITH TABLE KEY metafield = lv_sakto.
  IF  sy-subrc = 0.
    <fs_sakto>-fieldstatus = '*'.
  ENDIF.
ENDIF.

Step 9: Check and activate the function module.


Check

    * Goto T-code:  ME51N.

    * Give required fields.


******************************Thank You***************************

Comments

Post a Comment

Popular posts from this blog

Pf status and user command in factory method - OOPS ALV in ABAP

Image
  1. Goto  SE38 . 2. Give  program name  and click on  create . 3. Give  title  and  click on save . 4. Write  code. REPORT  zab_rp_oops_pfstatus_ucomm . TABLES :   ekko , ekpo . TYPES :   BEGIN  OF  ty_ekko ,          ebeln  TYPE  ekko - ebeln ,          bukrs  TYPE  ekko - bukrs ,          bstyp  TYPE  ekko - bstyp ,          bsart  TYPE  ekko - bsart ,         END  OF  ty_ekko . TYPES :   BEGIN  OF  ty_ekpo ,          ebeln  TYPE  ekpo - ebeln ,          ebelp  TYPE  ekpo - ebelp ,          matnr  TYPE  ekpo - matnr ,          werks  TYPE  ekpo - werks ,         END  OF  ty_ekpo . DATA :   lt_ekko  TYPE  TABLE  OF  ty_ekko ,       lr_ekko  TYPE  ty_ekko ,       lt_ekpo  TYPE  TABLE  OF  ty_ekpo ,       lr_ekpo  TYPE  ty_ekpo . DATA :   lo_salv1 TYPE   REF  TO  cl_salv_table ,       lo_salv2  TYPE  REF  TO  cl_salv_table ,       lo_events  TYPE  REF  TO  cl_salv_events_table ,       lo_grid    TYPE  REF  TO  cl_gui_alv_grid ,       lt_rows    TYPE  lvc_t_row ,       lr_rows    TYPE 
Read more

fetch the data from table and send an email in ABAP

Image
  Send an email in abap. REPORT  ZAJAY_EF_ZSTU . tables : zstu . data :  maildata  LIKE  sodocchgi1 ,       mailtxt   LIKE  solisti1  OCCURS  10  WITH  HEADER  LINE ,       mailrec   LIKE  somlrec90  OCCURS  0  WITH  HEADER  LINE ,       it_zstu  type  table  of  zstu  WITH  HEADER  LINE ,       wa_zstu  type  zstu . START-OF-SELECTION .      clear : maildata , mailtxt , mailrec .      REFRESH : mailtxt , mailrec . select-OPTIONS  :  s_id  for  zstu - zstu_id . SELECT  *  from  zstu  into  TABLE  it_zstu  where  zstu_id  in  s_id .    sort  it_zstu  by  zstu_id . maildata - obj_descr  =  | Employee details | . mailtxt  =  '<!DOCTYPE html>' . append  mailtxt . mailtxt  =  '<html lang="en">' . append  mailtxt . mailtxt  =  '<head>' . append  mailtxt .   mailtxt  =  '<title>Email Functionality</title>' .   append  mailtxt . * mailtxt = ' <style>'. * append mailtxt. * *  mailtxt = 'table, th, td { bor
Read more

Enhancements in abap

 Enhancements     *  Will enhance the sap functionality in customer name space.     *  Customer  name space-> (z or y) Modifications      *  Will enhance the sap functionality in sap name space.     *  Name  should not start with z or y. Types      1. Implicit and Explicit enhancements { enhancements }      2. Customer exit. { enhancements }      3. Badi { enhancements }      4. User exit { modification } Implicit      *  Implicit point is available at the starting or at the last of program.     *  Subroutines, function  modules  etc. Explicit        *  Explicit point & section are available at any line.     *  Point  - It will not give default implementation .                     -  You can only add additional codes, you can't replace the existing code.     *  Section - It will give default implementation .      -  You can change or replace the existing code. BADI             - Badi is an enhancement. we enhance the sap functionalities in customer name space. -
Read more