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
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for 
Search instead for 
Did you mean: 
Read only

update with MATERIAL_MAINTAIN_DARK

Former Member

‎2009 Mar 06 10:18 AM

0 Kudos
1,553

Hallo

I want to update 4 fields of mara with function MATERIAL_MAINTAIN_DARK. can somebody give me a sample code.

Thanks a lot.

3 REPLIES 3
Read only

Former Member

‎2009 Mar 06 10:26 AM

0 Kudos
474

Hello

Look at report RMDATIND

Read only

Former Member
In response to Former Member

‎2009 Mar 06 10:34 AM

0 Kudos
474

Thanks a lot Durga. Bundel of Thanks

Read only

Former Member

‎2009 Mar 06 10:29 AM

0 Kudos
474

Hi,

Plesae find this code

CALL FUNCTION 'MATERIAL_MAINTAIN_DARK'
   EXPORTING
    flag_muss_pruefen               = 'X'
*    SPERRMODUS                      = 'E'
    max_errors                      = 0
    p_kz_no_warn                    = 'E'
    kz_prf                          = ' '
    kz_verw                         = 'X'
    kz_aend                         = 'X'
    kz_dispo                        = 'X'
    kz_test                         =  kz_test
    no_database_update              = ' '
    call_mode                       = 'ACT'
*   CALL_MODE2                      = ' '
    user                            = sy-uname
*   SUPPRESS_ARRAY_READ             = ' '
*   FLG_MASS                        = 'X'
*   DONT_PROCESS_HEADERS            =
 IMPORTING
    matnr_last                      = g_f_matnr_last
    number_errors_transaction       = g_f_number_err
   TABLES
     amara_ueb                       = gt_mara_ueb
     amakt_ueb                       = gt_makt_ueb
     amarc_ueb                       = gt_marc_ueb
     amard_ueb                       = gt_mard_ueb
*   AMFHM_UEB                       =
*   AMARM_UEB                       =
*   AMEA1_UEB                       =
     ambew_ueb                      = gt_mbew_ueb
     asteu_ueb                      = gt_steu_ueb
*   ASTMM_UEB                       =
*   AMLGN_UEB                       =
     amlgt_ueb                       = gt_mlgt_ueb
*   AMPGD_UEB                       =
*   AMPOP_UEB                       =
*   AMVEG_UEB                       =
*   AMVEU_UEB                       =
     amvke_ueb                       = gt_mvke_ueb
*   ALTX1_UEB                       =
*   AMPRW_UEB                       =
*   AMFIELDRES                      =
     amerrdat                        = gt_errs
 EXCEPTIONS
   kstatus_empty                   = 1
   tkstatus_empty                  = 2
   t130m_error                     = 3
   internal_error                  = 4
   too_many_errors                 = 5
   update_error                    = 6
   error_propagate_header          = 7
   OTHERS                          = 8.
  IF NOT ( sy-subrc IS INITIAL ).
    ROLLBACK WORK.
  ELSE.
    COMMIT WORK.

and check this link

http://www.sapnet.ru/viewtopic.php?t=457

Thanks and regards

Durga.K