Uebersetzung von Maßeinheiten

Seite noch in Bearbeitung

Werden im Druckprogramm Maßeinheiten gelesen, müssen diese übersetzt werden.

Maßeinheit lesen

Jedes Material sollte eine Maßeinheit enthalten. Diese lassen sich z.B. mit dem Funktionsbaustein "BAPI_MATERIAL_GET_ALL' lesen.

   CALL FUNCTION 'BAPI_MATERIAL_GET_ALL'
     EXPORTING
       material            = lv_mat18
     IMPORTING
       clientdata          = ls_mara_data
     TABLES
       materialdescription = lt_mat_desc.

Maßeinheit übersetzen

   CALL FUNCTION 'T006A_SINGLE_READ'
     EXPORTING
       pi_spras       = cs_label_data-mat_language
       pi_msehi       = lv_uom "ls_mara_data-base_uom
     IMPORTING
       pe_i_t006a     = ls_t006a
     EXCEPTIONS
       no_entry_found = 1
       OTHERS         = 2.
   IF sy-subrc <> 0 OR ls_t006a IS INITIAL.
     " if error occur, take the UoM from Mara
     cs_label_data-mat_uom = ls_mara_data-base_uom.
   ELSE.
     cs_label_data-mat_uom = ls_t006a-msehi.
   ENDIF.

Links

https://www.erpfixers.com/blog/units-of-measure-and-their-behavior-inside-custom-abap-code