更改物料描述的RFC
FUNCTION ZBAPI_MAT_NETWEIGHT_UPDATE.
*"----------------------------------------------------------------------
"“Local Interface:
*” IMPORTING
*" VALUE(IT_NETWEIGHT) TYPE ZBAPIT_NETWEIGHT
*" EXPORTING
*" VALUE(ET_UPD_STATUS) TYPE ZBAPIT_NETWEIGHT_UPD_STATUS
*" VALUE(RETURN) TYPE BAPIRET2_T
*"----------------------------------------------------------------------
DATA :
FT_NETWEIGHT type ZBAPIT_NETWEIGHT,
ls_return like BAPIRET2.
FIELD-SYMBOLS: <FS_NETWEIGHT> LIKE LINE OF FT_NETWEIGHT.
data: HEADData LIKE BAPIMATHEAD ,
MATERIALDESCRIPTION TYPE TABLE OF BAPI_MAKT WITH HEADER LINE.
FT_NETWEIGHT[] = IT_NETWEIGHT[].
SORT FT_NETWEIGHT by MATERIAL.
if FT_NETWEIGHT is INITIAL.
return.
ENDIF.
LOOP AT FT_NETWEIGHT ASSIGNING <FS_NETWEIGHT>.
- WRITE : ‘0’, <FS_NETWEIGHT>-MATERIAL , <FS_NETWEIGHT>-DESCRIPTION .
at NEW Material.
CLEAR HEADData.
HEADData-MATERIAL = <FS_NETWEIGHT>-MATERIAL.
HEADDATA-BASIC_VIEW = 'X'.
- CLEAR MATERIALDESCRIPTION.
REFRESH MATERIALDESCRIPTION.
MATERIALDESCRIPTION-LANGU = ‘ZH’.
MATERIALDESCRIPTION-MATL_DESC = <FS_NETWEIGHT>-DESCRIPTION.
append MATERIALDESCRIPTION.
MATERIALDESCRIPTION-LANGU = ‘EN’.
MATERIALDESCRIPTION-MATL_DESC = <FS_NETWEIGHT>-DESCRIPTION.
append MATERIALDESCRIPTION.
*RETURN.
- BREAK-POINT.
CALL FUNCTION ‘BAPI_MATERIAL_SAVEDATA’
EXPORTING
HEADDATA = HEADDATA
-
CLIENTDATA =
-
CLIENTDATAX =
-
PLANTDATA =
-
PLANTDATAX =
-
FORECASTPARAMETERS =
-
FORECASTPARAMETERSX =
-
PLANNINGDATA =
-
PLANNINGDATAX =
-
STORAGELOCATIONDATA =
-
STORAGELOCATIONDATAX =
-
VALUATIONDATA =
-
VALUATIONDATAX =
-
WAREHOUSENUMBERDATA =
-
WAREHOUSENUMBERDATAX =
-
SALESDATA =
-
SALESDATAX =
-
STORAGETYPEDATA =
-
STORAGETYPEDATAX =
-
FLAG_ONLINE = ' '
-
FLAG_CAD_CALL = ' '
-
NO_DEQUEUE = ' '
-
NO_ROLLBACK_WORK = ' '
-
CLIENTDATACWM =
-
CLIENTDATACWMX =
-
VALUATIONDATACWM =
-
VALUATIONDATACWMX =
IMPORTING
RETURN = ls_return
TABLES
MATERIALDESCRIPTION = materialdescription[] -
UNITSOFMEASURE =
-
UNITSOFMEASUREX =
-
INTERNATIONALARTNOS =
-
MATERIALLONGTEXT =
-
TAXCLASSIFICATIONS =
-
RETURNMESSAGES =
-
PRTDATA =
-
PRTDATAX =
-
EXTENSIONIN =
-
EXTENSIONINX =
-
UNITSOFMEASURECWM =
-
UNITSOFMEASURECWMX =
-
SEGMRPGENERALDATA =
-
SEGMRPGENERALDATAX =
-
SEGMRPQUANTITYDATA =
-
SEGMRPQUANTITYDATAX =
-
SEGVALUATIONTYPE =
-
SEGVALUATIONTYPEX =
-
SEGSALESSTATUS =
-
SEGSALESSTATUSX =
-
SEGWEIGHTVOLUME =
-
SEGWEIGHTVOLUMEX =
-
NFMCHARGEWEIGHTS =
-
NFMCHARGEWEIGHTSX =
-
NFMSTRUCTURALWEIGHTS =
-
NFMSTRUCTURALWEIGHTSX = .
-
IF sy-subrc = 0.
-
CALL FUNCTION ‘BAPI_TRANSACTION_COMMIT’
-
EXPORTING
-
WAIT = 'X'
** IMPORTING
** RETURN =
-
.
- ENDIF.
if ls_return-type = ‘A’ or ls_return-type = ‘E’.
CALL FUNCTION ‘BAPI_TRANSACTION_ROLLBACK’ -
IMPORTING
-
else.RETURN = .
CALL FUNCTION ‘BAPI_TRANSACTION_COMMIT’
EXPORTING
WAIT = abap_true " ‘X’ -
IMPORTING
-
ENDIF.RETURN = .
ENDAT.
ENDLOOP.
ENDFUNCTION.
下一篇: Java 计算两个日期之间相差多少工作日
推荐阅读