Mass Update

Former Member — Fri, 05 Jan 2007 06:03:31 GMT

Hi Gurus....

I want to update material group with existing one for material ..... can u please help me is there any function module available for this directly update the DB ......... the file is in the format of XL sheet........

Thanks Advance,

BVM

Re: Mass Update

Former Member — Fri, 05 Jan 2007 06:09:09 GMT

why dont you try doing a BDC recording for transaction MM02 and update it in a BDC program? this will be a easy way fo you to do.

- Guru

Reward points for helpful answers

Re: Mass Update

Former Member — Fri, 05 Jan 2007 06:19:24 GMT

Hi Prasad ,

thanks for ur reply ..........client need to use BAPi function module ....

Re: Mass Update

Former Member — Fri, 05 Jan 2007 06:42:58 GMT

Dear Venu,

Use BDC Recording for MM02.

Regarding upload of excel file data into Internal Table, I'm providing the code which is listed below:

************************************************************************

D A T A D E C L A R A T I O N *

************************************************************************

TABLES: ANEP,

BKPF.

TYPES: BEGIN OF TY_TABDATA,

MANDT LIKE SY-MANDT, " Client

ZSLNUM LIKE ZSHIFTDEPN-ZSLNUM, " Serial Number

ZASSET LIKE ZSHIFTDEPN-ZASSET, " Original asset that was transferred

ZYEAR LIKE ZSHIFTDEPN-ZYEAR, " Fiscal Year

ZPERIOD LIKE ZSHIFTDEPN-ZPERIOD, " Fiscal Period

ZSHIFT1 LIKE ZSHIFTDEPN-ZSHIFT1, " Shift No. 1

ZSHIFT2 LIKE ZSHIFTDEPN-ZSHIFT1, " Shift No. 2

ZSHIFT3 LIKE ZSHIFTDEPN-ZSHIFT1, " Shift No. 3

END OF TY_TABDATA.

*----

Declaration of the Internal Table with Header Line comprising of the uploaded data.

*----

DATA: BEGIN OF IT_FILE_UPLOAD OCCURS 0.

INCLUDE STRUCTURE ALSMEX_TABLINE. " Rows for Table with Excel Data

DATA: END OF IT_FILE_UPLOAD.

************************************************************************

S E L E C T I O N - S C R E E N *

************************************************************************

SELECTION-SCREEN: BEGIN OF BLOCK B1 WITH FRAME,

BEGIN OF BLOCK B2 WITH FRAME.

PARAMETERS: P_FNAME LIKE RLGRAP-FILENAME OBLIGATORY.

SELECTION-SCREEN: END OF BLOCK B2,

END OF BLOCK B1.

************************************************************************

E V E N T : AT S E L E C T I O N - S C R E E N *

************************************************************************

AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_FNAME.

CALL FUNCTION 'KD_GET_FILENAME_ON_F4'

EXPORTING

PROGRAM_NAME = SYST-REPID
DYNPRO_NUMBER = SYST-DYNNR
FIELD_NAME = ' '

STATIC = 'X'

MASK = '.'

CHANGING

FILE_NAME = P_FNAME

EXCEPTIONS
MASK_TOO_LONG = 1
OTHERS = 2

IF SY-SUBRC <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

************************************************************************

E V E N T : S T A R T - O F - S E L E C T I O N *

************************************************************************

START-OF-SELECTION.

--------------------------------------
Upload Excel file into Internal Table.
--------------------------------------

PERFORM UPLOAD_EXCEL_FILE.

-------------------------------------------------------
Organize the uploaded data into another Internal Table.
-------------------------------------------------------

PERFORM ORGANIZE_UPLOADED_DATA.

************************************************************************

E V E N T : E N D - O F - S E L E C T I O N *

************************************************************************

END-OF-SELECTION.

&----

*& Form UPLOAD_EXCEL_FILE

&----

text

----

--> p1 text
<-- p2 text

----

FORM UPLOAD_EXCEL_FILE .

CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'

EXPORTING

FILENAME = P_FNAME

I_BEGIN_COL = 1

I_BEGIN_ROW = 3

I_END_COL = 7

I_END_ROW = 32000

TABLES

INTERN = IT_FILE_UPLOAD

EXCEPTIONS

INCONSISTENT_PARAMETERS = 1

UPLOAD_OLE = 2

OTHERS = 3

IF SY-SUBRC <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

ENDFORM. " UPLOAD_EXCEL_FILE

&----

*& Form ORGANIZE_UPLOADED_DATA

&----

text

----

--> p1 text
<-- p2 text

----

FORM ORGANIZE_UPLOADED_DATA .

SORT IT_FILE_UPLOAD BY ROW

COL.

LOOP AT IT_FILE_UPLOAD.

CASE IT_FILE_UPLOAD-COL.

....................................................

WHEN 1.

WA_TABDATA-ZSLNUM = IT_FILE_UPLOAD-VALUE.

WHEN 2.

WA_TABDATA-ZASSET = IT_FILE_UPLOAD-VALUE.

WHEN 3.

WA_TABDATA-ZYEAR = IT_FILE_UPLOAD-VALUE.

WHEN 4.

WA_TABDATA-ZPERIOD = IT_FILE_UPLOAD-VALUE.

WHEN 5.

WA_TABDATA-ZSHIFT1 = IT_FILE_UPLOAD-VALUE.

WHEN 6.

WA_TABDATA-ZSHIFT2 = IT_FILE_UPLOAD-VALUE.

WHEN 7.

WA_TABDATA-ZSHIFT3 = IT_FILE_UPLOAD-VALUE.

....................................................

ENDCASE.

AT END OF ROW.

WA_TABDATA-MANDT = SY-MANDT.

APPEND WA_TABDATA TO IT_TABDATA.

CLEAR: WA_TABDATA.

ENDAT.

ENDLOOP.

ENDFORM. " ORGANIZE_UPLOADED_DATA

In the subroutine --> ORGANIZE_UPLOADED_DATA, data are organized as per the structure declared above.

Regards,

Abir

***********************************

Don't forget to award points *

Re: Mass Update

Former Member — Fri, 05 Jan 2007 08:59:18 GMT

Hi Venu,

You can make use of this BAPI FM "BAPI_MATERIAL_SAVEDATA" and "BAPI_TRANSACTION_COMMIT".

or you can use Standard Programme RMDATIND by LSMW, there you need to change T.CODE to MM02.

let me know any issues.

P.S Mark helpful answers.

Regards,

Sivaram.

Message was edited by:

Sivaram Prasad Gadde

Re: Mass Update

andreas_mann3 — Fri, 05 Jan 2007 09:29:21 GMT

Hi,

or use report RMDATIND or fm MATERIAL_MAINTAIN_DARK

topic Re: Mass Update in Application Development and Automation Discussions

Mass Update

Re: Mass Update

Re: Mass Update

Re: Mass Update

Re: Mass Update

Re: Mass Update