Application Development and Automation 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: 
Read only

BAPi Updation Change material

Former Member
0 Likes
1,489

Hi all,

I am using the following BAPI to make changes in material master

but my material description s not getting updated

can u please tell where would i had gone wrong

*"----


""Local Interface:

*" IMPORTING

*" VALUE(MATNR) LIKE MARA-MATNR

*" VALUE(MATKL) LIKE MARA-MATKL

*" VALUE(MTART) LIKE MARA-MTART

*" VALUE(BISMT) LIKE MARA-BISMT OPTIONAL

*" VALUE(MEINS) LIKE MARA-MEINS OPTIONAL

*" VALUE(ZEINR) LIKE MARA-ZEINR OPTIONAL

*" VALUE(GROES) LIKE MARA-GROES OPTIONAL

*" VALUE(NORMT) LIKE MARA-NORMT OPTIONAL

*" VALUE(WRKST) LIKE MARA-WRKST

*" VALUE(LVORM) TYPE CHAR1 OPTIONAL

*" VALUE(MAKTX) LIKE MAKT-MAKTX

*" VALUE(EKGRP) LIKE MARC-EKGRP OPTIONAL

*" VALUE(KAUTB) LIKE MARC-KAUTB OPTIONAL

*" VALUE(WERKS) LIKE MARC-WERKS

*" EXPORTING

*" VALUE(RETURN) LIKE BAPIRETURN1 STRUCTURE BAPIRETURN1

*"----


DATA: tg_mara_ueb TYPE STANDARD TABLE OF mara_ueb WITH HEADER LINE,

tg_marc_ueb TYPE STANDARD TABLE OF marc_ueb WITH HEADER LINE,

tg_makt_ueb TYPE STANDARD TABLE OF makt_ueb WITH HEADER LINE,

h_matnr LIKE mara-matnr.

SELECT SINGLE matnr FROM mara INTO h_matnr

WHERE matnr EQ matnr.

IF sy-subrc EQ 0.

tg_mara_ueb-mandt = sy-mandt.

tg_mara_ueb-matnr = h_matnr.

tg_mara_ueb-matkl = matkl.

tg_mara_ueb-mtart = mtart.

tg_mara_ueb-bismt = bismt.

tg_mara_ueb-meins = meins.

tg_mara_ueb-zeinr = zeinr.

tg_mara_ueb-groes = groes.

tg_mara_ueb-normt = normt.

tg_mara_ueb-wrkst = wrkst.

tg_mara_ueb-tranc = 1.

tg_mara_ueb-tcode = 'MM02'.

tg_mara_ueb-lvorm = lvorm.

APPEND tg_mara_ueb.

tg_marc_ueb-mandt = sy-mandt.

  • tg_marc_ueb-matnr = tg_matmas-matnr.

tg_marc_ueb-matnr = h_matnr.

tg_marc_ueb-werks = werks.

tg_marc_ueb-kautb = kautb.

tg_marc_ueb-tranc = 1.

APPEND tg_marc_ueb.

  • tg_makt_ueb-matnr = tg_matmas-matnr.

tg_makt_ueb-mandt = sy-mandt.

  • tg_makt_ueb-matnr = h_matnr.

tg_makt_ueb-tranc = 1.

<b> tg_makt_ueb-maktx = maktx.

tg_makt_ueb-maktg = maktx.</b> ( where i am not getting updated)

  • tg_makt_ueb-spras = sy-langu.

tg_makt_ueb-spras = 'NL'.

APPEND tg_makt_ueb.

CALL FUNCTION 'MATERIAL_MAINTAIN_DARK'

EXPORTING

flag_muss_pruefen = 'X'

sperrmodus = 'E'

max_errors = 9999

p_kz_no_warn = 'W'

kz_prf = 'W'

user = sy-uname

IMPORTING

matnr_last = h_matnr

TABLES

amara_ueb = tg_mara_ueb

amakt_ueb = tg_makt_ueb

amarc_ueb = tg_marc_ueb

  • AMFIELDRES =

  • AMERRDAT =

EXCEPTIONS

kstatus_empty = 1

tkstatus_empty = 2

t130m_error = 3

internal_error = 4

too_many_errors = 5

update_error = 6

OTHERS = 7.

COMMIT WORK AND WAIT.

IF sy-subrc EQ 0.

return-number = 0.

return-type = 'S'.

return-id = 'Z1'.

return-message = 'Successfully updated'.

return-message_v1 = ''.

return-message_v2 = ''.

return-message_v3 = ''.

return-message_v4 = sy-mandt.

ELSE.

return-number = 0.

return-type = 'E'.

return-id = 'Z1'.

return-message = 'Not updated'.

return-message_v1 = ''.

return-message_v2 = ''.

return-message_v3 = ''.

return-message_v4 = sy-mandt.

ENDIF.

ELSE.

return-number = 0.

return-type = 'E'.

return-id = 'Z1'.

return-message = 'Material not found'.

return-message_v1 = ''.

return-message_v2 = ''.

return-message_v3 = ''.

return-message_v4 = sy-mandt.

ENDIF.

ENDFUNCTION.

Awaiting for u r kind reply

senthil

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
1,113

hI

I saw ur code and found that tg_makt_ueb-tranc = 1 U DID AND I CHANGED TO

tg_makt_ueb-tranc = 0000000001

Now u check it.

Regs

Manas Ranjan Panda

*"----


""Local Interface:

*" IMPORTING

*" VALUE(MATNR) LIKE MARA-MATNR

*" VALUE(MATKL) LIKE MARA-MATKL

*" VALUE(MTART) LIKE MARA-MTART

*" VALUE(BISMT) LIKE MARA-BISMT OPTIONAL

*" VALUE(MEINS) LIKE MARA-MEINS OPTIONAL

*" VALUE(ZEINR) LIKE MARA-ZEINR OPTIONAL

*" VALUE(GROES) LIKE MARA-GROES OPTIONAL

*" VALUE(NORMT) LIKE MARA-NORMT OPTIONAL

*" VALUE(WRKST) LIKE MARA-WRKST

*" VALUE(LVORM) TYPE CHAR1 OPTIONAL

*" VALUE(MAKTX) LIKE MAKT-MAKTX

*" VALUE(EKGRP) LIKE MARC-EKGRP OPTIONAL

*" VALUE(KAUTB) LIKE MARC-KAUTB OPTIONAL

*" VALUE(WERKS) LIKE MARC-WERKS

*" EXPORTING

*" VALUE(RETURN) LIKE BAPIRETURN1 STRUCTURE BAPIRETURN1

*"----


DATA: tg_mara_ueb TYPE STANDARD TABLE OF mara_ueb WITH HEADER LINE,

tg_marc_ueb TYPE STANDARD TABLE OF marc_ueb WITH HEADER LINE,

tg_makt_ueb TYPE STANDARD TABLE OF makt_ueb WITH HEADER LINE,

h_matnr LIKE mara-matnr.

SELECT SINGLE matnr FROM mara INTO h_matnr

WHERE matnr EQ matnr.

IF sy-subrc EQ 0.

tg_mara_ueb-mandt = sy-mandt.

tg_mara_ueb-matnr = h_matnr.

tg_mara_ueb-matkl = matkl.

tg_mara_ueb-mtart = mtart.

tg_mara_ueb-bismt = bismt.

tg_mara_ueb-meins = meins.

tg_mara_ueb-zeinr = zeinr.

tg_mara_ueb-groes = groes.

tg_mara_ueb-normt = normt.

tg_mara_ueb-wrkst = wrkst.

tg_mara_ueb-tranc = 1.

tg_mara_ueb-tcode = 'MM02'.

tg_mara_ueb-lvorm = lvorm.

APPEND tg_mara_ueb.

tg_marc_ueb-mandt = sy-mandt.

  • tg_marc_ueb-matnr = tg_matmas-matnr.

tg_marc_ueb-matnr = h_matnr.

tg_marc_ueb-werks = werks.

tg_marc_ueb-kautb = kautb.

tg_marc_ueb-tranc = 1.

APPEND tg_marc_ueb.

  • tg_makt_ueb-matnr = tg_matmas-matnr.

tg_makt_ueb-mandt = sy-mandt.

  • tg_makt_ueb-matnr = h_matnr.

<b>tg_makt_ueb-tranc = 0000000001."HERE I MADE CHANGE</b>.

tg_makt_ueb-maktx = maktx.

tg_makt_ueb-maktg = maktx. ( where i am not getting updated)

  • tg_makt_ueb-spras = sy-langu.

tg_makt_ueb-spras = 'NL'.

APPEND tg_makt_ueb.

CALL FUNCTION 'MATERIAL_MAINTAIN_DARK'

EXPORTING

flag_muss_pruefen = 'X'

sperrmodus = 'E'

max_errors = 9999

p_kz_no_warn = 'W'

kz_prf = 'W'

user = sy-uname

IMPORTING

matnr_last = h_matnr

TABLES

amara_ueb = tg_mara_ueb

amakt_ueb = tg_makt_ueb

amarc_ueb = tg_marc_ueb

  • AMFIELDRES =

  • AMERRDAT =

EXCEPTIONS

kstatus_empty = 1

tkstatus_empty = 2

t130m_error = 3

internal_error = 4

too_many_errors = 5

update_error = 6

OTHERS = 7.

COMMIT WORK AND WAIT.

IF sy-subrc EQ 0.

return-number = 0.

return-type = 'S'.

return-id = 'Z1'.

return-message = 'Successfully updated'.

return-message_v1 = ''.

return-message_v2 = ''.

return-message_v3 = ''.

return-message_v4 = sy-mandt.

ELSE.

return-number = 0.

return-type = 'E'.

return-id = 'Z1'.

return-message = 'Not updated'.

return-message_v1 = ''.

return-message_v2 = ''.

return-message_v3 = ''.

return-message_v4 = sy-mandt.

6 REPLIES 6
Read only

Former Member
0 Likes
1,113

i think you have to get the material description from MAKT table

Read only

Former Member
0 Likes
1,114

hI

I saw ur code and found that tg_makt_ueb-tranc = 1 U DID AND I CHANGED TO

tg_makt_ueb-tranc = 0000000001

Now u check it.

Regs

Manas Ranjan Panda

*"----


""Local Interface:

*" IMPORTING

*" VALUE(MATNR) LIKE MARA-MATNR

*" VALUE(MATKL) LIKE MARA-MATKL

*" VALUE(MTART) LIKE MARA-MTART

*" VALUE(BISMT) LIKE MARA-BISMT OPTIONAL

*" VALUE(MEINS) LIKE MARA-MEINS OPTIONAL

*" VALUE(ZEINR) LIKE MARA-ZEINR OPTIONAL

*" VALUE(GROES) LIKE MARA-GROES OPTIONAL

*" VALUE(NORMT) LIKE MARA-NORMT OPTIONAL

*" VALUE(WRKST) LIKE MARA-WRKST

*" VALUE(LVORM) TYPE CHAR1 OPTIONAL

*" VALUE(MAKTX) LIKE MAKT-MAKTX

*" VALUE(EKGRP) LIKE MARC-EKGRP OPTIONAL

*" VALUE(KAUTB) LIKE MARC-KAUTB OPTIONAL

*" VALUE(WERKS) LIKE MARC-WERKS

*" EXPORTING

*" VALUE(RETURN) LIKE BAPIRETURN1 STRUCTURE BAPIRETURN1

*"----


DATA: tg_mara_ueb TYPE STANDARD TABLE OF mara_ueb WITH HEADER LINE,

tg_marc_ueb TYPE STANDARD TABLE OF marc_ueb WITH HEADER LINE,

tg_makt_ueb TYPE STANDARD TABLE OF makt_ueb WITH HEADER LINE,

h_matnr LIKE mara-matnr.

SELECT SINGLE matnr FROM mara INTO h_matnr

WHERE matnr EQ matnr.

IF sy-subrc EQ 0.

tg_mara_ueb-mandt = sy-mandt.

tg_mara_ueb-matnr = h_matnr.

tg_mara_ueb-matkl = matkl.

tg_mara_ueb-mtart = mtart.

tg_mara_ueb-bismt = bismt.

tg_mara_ueb-meins = meins.

tg_mara_ueb-zeinr = zeinr.

tg_mara_ueb-groes = groes.

tg_mara_ueb-normt = normt.

tg_mara_ueb-wrkst = wrkst.

tg_mara_ueb-tranc = 1.

tg_mara_ueb-tcode = 'MM02'.

tg_mara_ueb-lvorm = lvorm.

APPEND tg_mara_ueb.

tg_marc_ueb-mandt = sy-mandt.

  • tg_marc_ueb-matnr = tg_matmas-matnr.

tg_marc_ueb-matnr = h_matnr.

tg_marc_ueb-werks = werks.

tg_marc_ueb-kautb = kautb.

tg_marc_ueb-tranc = 1.

APPEND tg_marc_ueb.

  • tg_makt_ueb-matnr = tg_matmas-matnr.

tg_makt_ueb-mandt = sy-mandt.

  • tg_makt_ueb-matnr = h_matnr.

<b>tg_makt_ueb-tranc = 0000000001."HERE I MADE CHANGE</b>.

tg_makt_ueb-maktx = maktx.

tg_makt_ueb-maktg = maktx. ( where i am not getting updated)

  • tg_makt_ueb-spras = sy-langu.

tg_makt_ueb-spras = 'NL'.

APPEND tg_makt_ueb.

CALL FUNCTION 'MATERIAL_MAINTAIN_DARK'

EXPORTING

flag_muss_pruefen = 'X'

sperrmodus = 'E'

max_errors = 9999

p_kz_no_warn = 'W'

kz_prf = 'W'

user = sy-uname

IMPORTING

matnr_last = h_matnr

TABLES

amara_ueb = tg_mara_ueb

amakt_ueb = tg_makt_ueb

amarc_ueb = tg_marc_ueb

  • AMFIELDRES =

  • AMERRDAT =

EXCEPTIONS

kstatus_empty = 1

tkstatus_empty = 2

t130m_error = 3

internal_error = 4

too_many_errors = 5

update_error = 6

OTHERS = 7.

COMMIT WORK AND WAIT.

IF sy-subrc EQ 0.

return-number = 0.

return-type = 'S'.

return-id = 'Z1'.

return-message = 'Successfully updated'.

return-message_v1 = ''.

return-message_v2 = ''.

return-message_v3 = ''.

return-message_v4 = sy-mandt.

ELSE.

return-number = 0.

return-type = 'E'.

return-id = 'Z1'.

return-message = 'Not updated'.

return-message_v1 = ''.

return-message_v2 = ''.

return-message_v3 = ''.

return-message_v4 = sy-mandt.

Read only

0 Likes
1,113

thnaks for u replies

I changes it but still only material descrition s not getting

changed

wainting for u r replies

thanx n advance

senthil

Read only

0 Likes
1,113

ANy help gurus

regarding this

waiting for u r help

senthil

Read only

0 Likes
1,113

Senthil,

I've not the correction, but why don't you use the following BAPI :

BAPI_MATERIAL_SAVEDATA

What you are using isn't a BAPI, but a FM.

Regards,

ERWAN

Read only

0 Likes
1,113

hi Gurus,

My problem has been solved

<b> tg_makt_ueb-mandt = sy-mandt.</b> ( added this )

tg_makt_ueb-matnr = h_matnr.

tg_makt_ueb-maktx = maktx.

tg_makt_ueb-maktg = maktx.

tg_makt_ueb-spras = sy-langu.

  • tg_makt_ueb-tranc = 0000000001.

tg_makt_ueb-tranc = 1.

thank you for all replies

senthil