Quantcast
Channel: SCN : All Content - ABAP Development
Viewing all articles
Browse latest Browse all 8332

Screen Enhancement ME51N: Data not getting updated in table EBAN

$
0
0

Hi,

 

For screen enhancement of ME51N, I am using MEREQ001.

I am trying to add new tab at item level with the following fields:

1.png

I have added the fields in append structure CI_EBANDB of EBAN.

 

Logic in EXIT_SAPLMEREQ_001

 

   TABLES : ci_ebandb.

    DATA : i_mereq_item TYPE mereq_item.

 

   IF im_req_item IS INITIAL.
      CLEAR: ci_ebandb.
    ELSE.
      i_mereq_item = im_req_item->get_data( ).
      MOVE-CORRESPONDING i_mereq_item TO ci_ebandb.
    ENDIF.

 

Logic in EXIT_SAPLMEREQ_003

 

   DATA : i_mereq_item TYPE mereq_item.

 

   IF sy-tcode EQ 'ME51N'.
    IF NOT im_req_item IS INITIAL.
      i_mereq_item = im_req_item->get_data( ).

      IF ( ci_ebandb-zemail_id_pr NE i_mereq_item-zemail_id_pr OR ci_ebandb-zcon_det_pr NE i_mereq_item-zcon_det_pr ).
        i_mereq_item-zemail_id_pr = email_ip.
        MOVE-CORRESPONDING ci_ebandb TO i_mereq_item .
        CALL METHOD im_req_item->set_data( i_mereq_item ).
        ex_changed = 'X'.
      ENDIF.

    ENDIF.
  ENDIF.

 

Please guys, let me know what addition I need to do as using this logic I am not able to save the data of Email and Contact Details in table EBAN.

 

Regards,

Kush


Viewing all articles
Browse latest Browse all 8332

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>