Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

MM06E005 Enhancement

Former Member
0 Kudos

Dear gurus

i have done an enhancement on MM06E005.

i want to fetch the field data when im using t-code ME21n

when the payment Terms is entered

i want to get the field data into my temporary field of mine so i can use that in my coding

but im unable to get it

MEPO1226-ZBD1T

help me

Regards

Saad Nisar

2 REPLIES 2

Former Member
0 Kudos

please show me codes .

0 Kudos
data: begin of itab,
      budat like ekbe-budat,
      elikz like ekbe-elikz,
      bwart like ekbe-bwart,
      ebeln like ekbe-ebeln,
      end of itab.

      clear: ekko-zzcusduty,ekko-zzdtre,ekko-zzsaltax,ekko-zzincotax.
      data : ebeln like ekko-ebeln.
      data: zbd1t like ekko-zbd1t.

      move i_ucomm to zi_ucomm.

*import ebeln FROM MEMORY id '01'.

**break abapdev.

      select single ebeln budat into corresponding fields of itab from ekbe
             where ekbe~bwart = '101' and ekbe~elikz = 'X' and ekbe~ebeln = zebeln.


*if sy-tcode = 'ME21' or
*    sy-tcode = 'ME22'.

******************************* SnAk*********************
      if ekko-zzactdisship is not initial .
        select single zbd1t into zbd1t from ekko where ebeln = zebeln.
*        zbd1t = MEPO1226-ZBD1T.
        ekko-zzmatdate = ekko-zzactdisship + zbd1t.
*      ELSEIF
*        ekko-zzactdisship = ''.
      endif.