VBWS_UOM_MAINTAIN_DARK example

Former Member — Tue, 05 Dec 2006 07:43:28 GMT

Hi,

Can you send me an example of FM VBWS_UOM_MAINTAIN_DARK.

Thanks.

Re: VBWS_UOM_MAINTAIN_DARK example

Former Member — Tue, 05 Dec 2006 07:45:53 GMT

chk this FM VBWS_UOM_SAVE_REPLICA where the FM specified by you was used

Re: VBWS_UOM_MAINTAIN_DARK example

Former Member — Tue, 05 Dec 2006 07:52:16 GMT

Hi,


    DATA:
    gt_meinh         TYPE smeinh OCCURS 0 WITH HEADER LINE,
    gt_meinh_ws      TYPE smeinh_ws OCCURS 0 WITH HEADER LINE,
    gt_meinh_ws_upd  TYPE smeinh_wsupd OCCURS 0 WITH HEADER LINE,
    gt_meinh_ws_updx TYPE smeinh_wsupdx OCCURS 0 WITH HEADER LINE,
    gt_message       TYPE matmess OCCURS 0 WITH HEADER LINE,
    gt_return        TYPE bapireturn1 OCCURS 0 WITH HEADER LINE.

    FREE:
      gt_meinh ,gt_meinh_ws, gt_meinh_ws_upd, gt_meinh_ws_updx,
      gt_message,  gt_return.


    CALL FUNCTION 'VBWS_UOM_READ_WITH_MATNR'
           EXPORTING
                i_matnr                  = template-material
*         I_BUFFER_REFRESH         = 'X'
*         I_EXIT_BY_FIRST_ERROR    = 'X'
*         I_LIST_ERRORS_ONLY       = ' '
*         I_ERROR_BY_MISSING_UOM   = 'X'
*         I_ERROR_BY_INCORRECT_UOM = 'X'
*         I_SYSTEM                 =
*    IMPORTING
*         E_KZWSM                  =
*         E_MARA                   =
          TABLES
               e_meinh                  = gt_meinh
               e_meinh_ws               = gt_meinh_ws
               e_meinh_ws_upd           = gt_meinh_ws_upd
               e_meinh_ws_updx          = gt_meinh_ws_updx
               e_message                = gt_message
               e_return                 = gt_return
          EXCEPTIONS
               error                    = 1
               OTHERS                   = 2
                .

With this Function Module 'VBWS_UOM_READ_WITH_MATNR' you will get from an template Material all the necessary internal tables filled. That could help you to understand in what matter the tables have to be filled up to use the function module:

VBWS_UOM_MAINTAIN_DARK.

The next step is to use the filled tables with the function module 'VBWS_UOM_MAINTAIN_DARK'


    FREE: gt_message, gt_return.
    CALL FUNCTION 'VBWS_UOM_MAINTAIN_DARK'
         EXPORTING
            i_matnr               =  new-material
            i_kzwsm               = 'B'
            i_kzwsmx              = 'X'
*         I_TYPE_OF_BLOCK       = 'E'
            i_exit_by_first_error = 'X'
*         I_LIST_ERRORS_ONLY    = ' '
            i_user                = sy-uname
            i_buffer_refresh      = 'X'
*         I_UPDATE_BUFFER_ONLY  = ' '
            i_no_update           = ' '
*         I_RFC_SENDER          =
*         I_CALLING_METHOD      =
*    IMPORTING
*         E_KZWSM               =
*         E_KZWSM_OLD           =
        TABLES
             i_meinh_ws_upd        = gt_meinh_ws_upd
             i_meinh_ws_updx       = gt_meinh_ws_updx
*         I_MEINH_WS_SFN        =
*         I_MEINH_WS_SFNX       =
*            e_meinh_ws            = gt_meinh_ws
*            e_meinh               = gt_meinh
*         E_MEINH_OLD           =
           e_message             = gt_message
           e_return              = gt_return
        EXCEPTIONS
             error                 = 1
             OTHERS                = 2.

I think that could help you.

regards

Thorsten

Re: VBWS_UOM_MAINTAIN_DARK example

Former Member — Tue, 05 Dec 2006 10:46:28 GMT

Thanks. I solved the problem with using VBWS_UOM_SAVE_REPLICA

topic Re: VBWS_UOM_MAINTAIN_DARK example in Application Development and Automation Discussions

VBWS_UOM_MAINTAIN_DARK example

Re: VBWS_UOM_MAINTAIN_DARK example

Re: VBWS_UOM_MAINTAIN_DARK example

Re: VBWS_UOM_MAINTAIN_DARK example