Commit 85f6c73a authored by ning 宁亚轩's avatar ning 宁亚轩

one

parent 8c682a17
<?xml version="1.0" encoding="utf-8"?>
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<DATA>
<MASTER_LANGUAGE>1</MASTER_LANGUAGE>
<STARTING_FOLDER>/src/</STARTING_FOLDER>
<FOLDER_LOGIC>FULL</FOLDER_LOGIC>
<IGNORE>
<item>/.gitignore</item>
<item>/LICENSE</item>
<item>/README.md</item>
<item>/package.json</item>
<item>/.travis.yml</item>
<item>/.gitlab-ci.yml</item>
<item>/abaplint.json</item>
<item>/azure-pipelines.yml</item>
</IGNORE>
</DATA>
</asx:values>
</asx:abap>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SUSH" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<HEAD>
<NAME>6D99957C7B82E8B5E6CDC48AC2C83C</NAME>
<TYPE>HT</TYPE>
<DISPLAY_NAME>R3TR IWSV ZMM_001 0001</DISPLAY_NAME>
<DEVCLASS>ZZMM</DEVCLASS>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
</HEAD>
<USOBX>
<USOBX>
<NAME>6D99957C7B82E8B5E6CDC48AC2C83C</NAME>
<TYPE>HT</TYPE>
<OBJECT>S_SERVICE</OBJECT>
<OKFLAG>X</OKFLAG>
</USOBX>
</USOBX>
<USOBX_EXT>
<item>
<OBJECT>S_SERVICE</OBJECT>
<TTEXT>在外部服务开始处检查</TTEXT>
<OCLSS>AAAB</OCLSS>
<OKFLAG>X</OKFLAG>
<DEVCLASS>S_PROFGEN</DEVCLASS>
<PS_POSID>BC-SEC-AUT-PFC</PS_POSID>
<CI_TEXT>检查</CI_TEXT>
<CH_TEXT>检查</CH_TEXT>
<PR_TEXT></PR_TEXT>
<EXCEP>3</EXCEP>
<EXCEP_TX>Okay</EXCEP_TX>
<EXCEP_ICON>@08@</EXCEP_ICON>
</item>
</USOBX_EXT>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SUSH" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<HEAD>
<NAME>7AB1453827D9DC105883B045E4E004</NAME>
<TYPE>HT</TYPE>
<DISPLAY_NAME>R3TR IWSG ZCV_KCBB_TEST_0001</DISPLAY_NAME>
<DEVCLASS>ZZMM</DEVCLASS>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
</HEAD>
<USOBX>
<USOBX>
<NAME>7AB1453827D9DC105883B045E4E004</NAME>
<TYPE>HT</TYPE>
<OBJECT>S_SERVICE</OBJECT>
<OKFLAG>X</OKFLAG>
</USOBX>
</USOBX>
<USOBX_EXT>
<item>
<OBJECT>S_SERVICE</OBJECT>
<TTEXT>在外部服务开始处检查</TTEXT>
<OCLSS>AAAB</OCLSS>
<OKFLAG>X</OKFLAG>
<DEVCLASS>S_PROFGEN</DEVCLASS>
<PS_POSID>BC-SEC-AUT-PFC</PS_POSID>
<CI_TEXT>检查</CI_TEXT>
<CH_TEXT>检查</CH_TEXT>
<PR_TEXT></PR_TEXT>
<EXCEP>3</EXCEP>
<EXCEP_TX>Okay</EXCEP_TX>
<EXCEP_ICON>@08@</EXCEP_ICON>
</item>
</USOBX_EXT>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SUSH" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<HEAD>
<NAME>B56809E096CB10DA01A5862FD3720A</NAME>
<TYPE>HT</TYPE>
<DISPLAY_NAME>R3TR IWSG ZCV_KCBB_SUM_0001</DISPLAY_NAME>
<DEVCLASS>ZZMM</DEVCLASS>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
</HEAD>
<USOBX>
<USOBX>
<NAME>B56809E096CB10DA01A5862FD3720A</NAME>
<TYPE>HT</TYPE>
<OBJECT>S_SERVICE</OBJECT>
<OKFLAG>X</OKFLAG>
</USOBX>
</USOBX>
<USOBX_EXT>
<item>
<OBJECT>S_SERVICE</OBJECT>
<TTEXT>在外部服务开始处检查</TTEXT>
<OCLSS>AAAB</OCLSS>
<OKFLAG>X</OKFLAG>
<DEVCLASS>S_PROFGEN</DEVCLASS>
<PS_POSID>BC-SEC-AUT-PFC</PS_POSID>
<CI_TEXT>检查</CI_TEXT>
<CH_TEXT>检查</CH_TEXT>
<PR_TEXT></PR_TEXT>
<EXCEP>3</EXCEP>
<EXCEP_TX>Okay</EXCEP_TX>
<EXCEP_ICON>@08@</EXCEP_ICON>
</item>
</USOBX_EXT>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SUSH" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<HEAD>
<NAME>B879ECFB5B5A3751E09FAE043CC9EE</NAME>
<TYPE>HT</TYPE>
<DISPLAY_NAME>R3TR IWSV ZCV_KCBB 0001</DISPLAY_NAME>
<DEVCLASS>ZZMM</DEVCLASS>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
</HEAD>
<USOBX>
<USOBX>
<NAME>B879ECFB5B5A3751E09FAE043CC9EE</NAME>
<TYPE>HT</TYPE>
<OBJECT>S_SERVICE</OBJECT>
<OKFLAG>X</OKFLAG>
</USOBX>
</USOBX>
<USOBX_EXT>
<item>
<OBJECT>S_SERVICE</OBJECT>
<TTEXT>在外部服务开始处检查</TTEXT>
<OCLSS>AAAB</OCLSS>
<OKFLAG>X</OKFLAG>
<DEVCLASS>S_PROFGEN</DEVCLASS>
<PS_POSID>BC-SEC-AUT-PFC</PS_POSID>
<CI_TEXT>检查</CI_TEXT>
<CH_TEXT>检查</CH_TEXT>
<PR_TEXT></PR_TEXT>
<EXCEP>3</EXCEP>
<EXCEP_TX>Okay</EXCEP_TX>
<EXCEP_ICON>@08@</EXCEP_ICON>
</item>
</USOBX_EXT>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SUSH" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<HEAD>
<NAME>BAF60115A9DF114474387C5BC94D25</NAME>
<TYPE>HT</TYPE>
<DISPLAY_NAME>R3TR IWSV ZCV_KCBB_SUM 0001</DISPLAY_NAME>
<DEVCLASS>ZZMM</DEVCLASS>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
</HEAD>
<USOBX>
<USOBX>
<NAME>BAF60115A9DF114474387C5BC94D25</NAME>
<TYPE>HT</TYPE>
<OBJECT>S_SERVICE</OBJECT>
<OKFLAG>X</OKFLAG>
</USOBX>
</USOBX>
<USOBX_EXT>
<item>
<OBJECT>S_SERVICE</OBJECT>
<TTEXT>在外部服务开始处检查</TTEXT>
<OCLSS>AAAB</OCLSS>
<OKFLAG>X</OKFLAG>
<DEVCLASS>S_PROFGEN</DEVCLASS>
<PS_POSID>BC-SEC-AUT-PFC</PS_POSID>
<CI_TEXT>检查</CI_TEXT>
<CH_TEXT>检查</CH_TEXT>
<PR_TEXT></PR_TEXT>
<EXCEP>3</EXCEP>
<EXCEP_TX>Okay</EXCEP_TX>
<EXCEP_ICON>@08@</EXCEP_ICON>
</item>
</USOBX_EXT>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SUSH" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<HEAD>
<NAME>DD8FCA23B4F2EEC2965CFA38C0EC39</NAME>
<TYPE>HT</TYPE>
<DISPLAY_NAME>R3TR IWSG ZMM_001_0001</DISPLAY_NAME>
<DEVCLASS>ZZMM</DEVCLASS>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
</HEAD>
<USOBX>
<USOBX>
<NAME>DD8FCA23B4F2EEC2965CFA38C0EC39</NAME>
<TYPE>HT</TYPE>
<OBJECT>S_SERVICE</OBJECT>
<OKFLAG>X</OKFLAG>
</USOBX>
</USOBX>
<USOBX_EXT>
<item>
<OBJECT>S_SERVICE</OBJECT>
<TTEXT>在外部服务开始处检查</TTEXT>
<OCLSS>AAAB</OCLSS>
<OKFLAG>X</OKFLAG>
<DEVCLASS>S_PROFGEN</DEVCLASS>
<PS_POSID>BC-SEC-AUT-PFC</PS_POSID>
<CI_TEXT>检查</CI_TEXT>
<CH_TEXT>检查</CH_TEXT>
<PR_TEXT></PR_TEXT>
<EXCEP>3</EXCEP>
<EXCEP_TX>Okay</EXCEP_TX>
<EXCEP_ICON>@08@</EXCEP_ICON>
</item>
</USOBX_EXT>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SUSH" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<HEAD>
<NAME>E701DD9703B659770D57956E16A6DF</NAME>
<TYPE>HT</TYPE>
<DISPLAY_NAME>R3TR IWSV ZCV_KCBB_TEST 0001</DISPLAY_NAME>
<DEVCLASS>ZZMM</DEVCLASS>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
</HEAD>
<USOBX>
<USOBX>
<NAME>E701DD9703B659770D57956E16A6DF</NAME>
<TYPE>HT</TYPE>
<OBJECT>S_SERVICE</OBJECT>
<OKFLAG>X</OKFLAG>
</USOBX>
</USOBX>
<USOBX_EXT>
<item>
<OBJECT>S_SERVICE</OBJECT>
<TTEXT>在外部服务开始处检查</TTEXT>
<OCLSS>AAAB</OCLSS>
<OKFLAG>X</OKFLAG>
<DEVCLASS>S_PROFGEN</DEVCLASS>
<PS_POSID>BC-SEC-AUT-PFC</PS_POSID>
<CI_TEXT>检查</CI_TEXT>
<CH_TEXT>检查</CH_TEXT>
<PR_TEXT></PR_TEXT>
<EXCEP>3</EXCEP>
<EXCEP_TX>Okay</EXCEP_TX>
<EXCEP_ICON>@08@</EXCEP_ICON>
</item>
</USOBX_EXT>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DEVC" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<DEVC>
<CTEXT>物料管理模块</CTEXT>
</DEVC>
</asx:values>
</asx:abap>
</abapGit>
CLASS zbadi_mmim_check_matdoc_item DEFINITION
PUBLIC
FINAL
CREATE PUBLIC .
PUBLIC SECTION.
INTERFACES if_badi_interface .
INTERFACES if_badi_mmim_check_matdoc_item .
PROTECTED SECTION.
PRIVATE SECTION.
ENDCLASS.
CLASS ZBADI_MMIM_CHECK_MATDOC_ITEM IMPLEMENTATION.
METHOD if_badi_mmim_check_matdoc_item~check_item.
**********************************************************************
*FS-FICO-REP002 标准成本为零控制检查增强
**********************************************************************
* IF sy-uname = 'CB9980000041' OR sy-uname = 'CB9980000004' OR sy-uname = 'CB9980000015' OR sy-uname = 'CB9980000013' OR sy-uname = 'CB9980000011'.
IF item_matdoc-manufacturingorder IS NOT INITIAL.
DATA: ls_message TYPE mmpur_s_messages.
SELECT SINGLE product
FROM zcv_gm_cb
WHERE product EQ @item_matdoc-material
AND CompanyCode EQ @item_matdoc-plant
AND PriceDeterminationControl EQ '3'
AND InventoryValuationProcedure EQ 'S'
AND StandardPrice NE 0
INTO @DATA(lv_prod).
IF sy-subrc NE 0.
ls_message-messageid = 'DUMY'.
ls_message-messagetype = 'E'.
ls_message-messagenumber = '001'.
ls_message-messagevariable1 = '请发布产品或半成品标准价格!'.
* ls_message-messagevariable1 = '行' && item_matdoc-MaterialDocumentItem && '请发布产品或半成品标准价格!'.
APPEND ls_message TO messages.
CLEAR ls_message.
ENDIF.
ENDIF.
* TYPES: BEGIN OF ty_pvb,
* product TYPE I_ProductValuationBasic-Product,
* PriceDeterminationControl TYPE I_ProductValuationBasic-PriceDeterminationControl,
* InventoryValuationProcedure TYPE I_ProductValuationBasic-InventoryValuationProcedure,
* StandardPrice TYPE I_ProductValuationBasic-StandardPrice,
* END OF ty_pvb.
* DATA:
* lv_Material TYPE I_ProductValuationBasic-Product,
* lv_Plant TYPE werks_d.
* DATA:
* lt_pvb TYPE STANDARD TABLE OF ty_pvb .
* lv_material = item_matdoc-material. "物料编号
* lv_plant = item_matdoc-plant. "工厂
* SELECT SINGLE
* a~product,
* a~PriceDeterminationControl,
* a~InventoryValuationProcedure,
* a~StandardPrice,
* b~InventorySpecialStockType
* FROM I_ProductValuationBasic AS a
* JOIN i_materialdocumentitem_2 AS b ON b~material = a~Product
* WHERE product = @lv_material
* AND plant = @lv_plant
* INTO @DATA(ls_pvb).
* IF ls_pvb-PriceDeterminationControl EQ '3'
* AND ls_pvb-InventoryValuationProcedure EQ 'S'
* AND ls_pvb-StandardPrice NE 0
* AND ls_pvb-InventorySpecialStockType NE 'M'.
* ELSE.
* ENDIF.
ENDMETHOD.
ENDCLASS.
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<VSEOCLASS>
<CLSNAME>ZBADI_MMIM_CHECK_MATDOC_ITEM</CLSNAME>
<LANGU>1</LANGU>
<DESCRIPT>货物移动Check增强</DESCRIPT>
<STATE>1</STATE>
<CLSCCINCL>X</CLSCCINCL>
<FIXPT>X</FIXPT>
<UNICODE>X</UNICODE>
</VSEOCLASS>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SIA1" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SIA1>
<MAIN_OBJECT>
<DESCRIPTION>旺科自定义App</DESCRIPTION>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</MAIN_OBJECT>
<OBJECT_VISIBILITY>
<IS_BU_CATALOG_TYPE_VISIBLE>X</IS_BU_CATALOG_TYPE_VISIBLE>
<DEFAULT_BU_CATALOG_TYPE>A</DEFAULT_BU_CATALOG_TYPE>
<IS_SCOPE_DEPENDENT_VISIBLE>X</IS_SCOPE_DEPENDENT_VISIBLE>
<IS_SCOPE_DEPENDENT_EDITABLE>X</IS_SCOPE_DEPENDENT_EDITABLE>
<IS_RESTRICTABLE_EDITABLE>X</IS_RESTRICTABLE_EDITABLE>
</OBJECT_VISIBILITY>
<BU_CATALOG_ID>ZBS_WK</BU_CATALOG_ID>
<BU_CATALOG_TYPE>A</BU_CATALOG_TYPE>
<SCOPE_STATUS>3</SCOPE_STATUS>
<SCOPE_STATUS_TEXT></SCOPE_STATUS_TEXT>
<CATALOG_ID>ZBS_WK</CATALOG_ID>
<AGR_NAME>ZBS_WK</AGR_NAME>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
<BUCAPP>
<item>
<BU_CATALOG_APP_ID>ZBS_WK_0002</BU_CATALOG_APP_ID>
<BU_CATALOG_ID>ZBS_WK</BU_CATALOG_ID>
<APP_ID>ZMMR003_EXT</APP_ID>
<ROLE_CHANGE>A</ROLE_CHANGE>
<CATALOG_CHANGE>A</CATALOG_CHANGE>
<GROUP_CHANGE>A</GROUP_CHANGE>
<CHIP_ID>X-SAP-UI2-PAGE:X-SAP-UI2-CATALOGPAGE:ZBS_WK:CRKH8CAGVHPQF1206YPVICXJU</CHIP_ID>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
</item>
<item>
<BU_CATALOG_APP_ID>ZBS_WK_0001</BU_CATALOG_APP_ID>
<BU_CATALOG_ID>ZBS_WK</BU_CATALOG_ID>
<APP_ID>ZMMR001_EXT</APP_ID>
<ROLE_CHANGE>A</ROLE_CHANGE>
<CATALOG_CHANGE>A</CATALOG_CHANGE>
<GROUP_CHANGE>A</GROUP_CHANGE>
<CHIP_ID>X-SAP-UI2-PAGE:X-SAP-UI2-CATALOGPAGE:ZBS_WK:CRKH8CAGVHPQF0ZXF8889YSZU</CHIP_ID>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
</item>
</BUCAPP>
<PUBLISH_STATUS>p</PUBLISH_STATUS>
</SIA1>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SIA7" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SIA7>
<METADATA>
<NAME>ZBS_WK_0001</NAME>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</METADATA>
<CONTENT>
<BU_CATALOG_APP_ID>ZBS_WK_0001</BU_CATALOG_APP_ID>
<BU_CATALOG_ID>ZBS_WK</BU_CATALOG_ID>
<APP_ID>ZMMR001_EXT</APP_ID>
<ROLE_CHANGE>A</ROLE_CHANGE>
<CATALOG_CHANGE>A</CATALOG_CHANGE>
<GROUP_CHANGE>A</GROUP_CHANGE>
<CHIP_ID>X-SAP-UI2-PAGE:X-SAP-UI2-CATALOGPAGE:ZBS_WK:CRKH8CAGVHPQF0ZXF8889YSZU</CHIP_ID>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
</CONTENT>
</SIA7>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SIA7" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SIA7>
<METADATA>
<NAME>ZBS_WK_0002</NAME>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</METADATA>
<CONTENT>
<BU_CATALOG_APP_ID>ZBS_WK_0002</BU_CATALOG_APP_ID>
<BU_CATALOG_ID>ZBS_WK</BU_CATALOG_ID>
<APP_ID>ZMMR003_EXT</APP_ID>
<ROLE_CHANGE>A</ROLE_CHANGE>
<CATALOG_CHANGE>A</CATALOG_CHANGE>
<GROUP_CHANGE>A</GROUP_CHANGE>
<CHIP_ID>X-SAP-UI2-PAGE:X-SAP-UI2-CATALOGPAGE:ZBS_WK:CRKH8CAGVHPQF1206YPVICXJU</CHIP_ID>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
</CONTENT>
</SIA7>
</asx:values>
</asx:abap>
</abapGit>
CLASS zcl_material_stock_jb DEFINITION
PUBLIC
FINAL
CREATE PUBLIC .
PUBLIC SECTION.
INTERFACES if_rap_query_provider.
PROTECTED SECTION.
PRIVATE SECTION.
ENDCLASS.
CLASS ZCL_MATERIAL_STOCK_JB IMPLEMENTATION.
METHOD if_rap_query_provider~select.
TRY.
TRY.
"IF io_request->is_data_requested( ).
"io_request->get_paging( ).
DATA: rt_plant TYPE RANGE OF werks_D,
rt_product TYPE RANGE OF matnr.
DATA(lo_paging) = io_request->get_paging( ).
DATA(lv_skip) = io_request->get_paging( )->get_offset( ).
DATA(lv_top) = io_request->get_paging( )->get_page_size( ).
DATA(lt_sort_elements) = io_request->get_sort_elements( ) .
DATA(lt_ranges) = io_request->get_filter( )->get_as_ranges( )."Basic search term
DATA(lt_filter_cond) = io_request->get_parameters( ). "setting the filter condition, fetching parameter names from data definition
LOOP AT lt_ranges REFERENCE INTO DATA(lr_range).
CASE lr_range->name.
WHEN 'PLANT'.
LOOP AT lr_range->range REFERENCE INTO DATA(lr_range_entry).
INSERT VALUE #( sign = lr_range_entry->sign option = lr_range_entry->option
low = CONV #( lr_range_entry->low ) high = CONV #( lr_range_entry->high ) )
INTO TABLE RT_plant.
ENDLOOP.
WHEN 'PRODUCT'.
LOOP AT lr_range->range REFERENCE INTO lr_range_entry.
INSERT VALUE #( sign = lr_range_entry->sign option = lr_range_entry->option
low = CONV #( lr_range_entry->low ) high = CONV #( lr_range_entry->high ) )
INTO TABLE rt_product.
ENDLOOP.
ENDCASE.
ENDLOOP.
DATA:lt_table TYPE STANDARD TABLE OF zcv_jbkc,
lt_table_out TYPE STANDARD TABLE OF zcv_jbkc,
ls_table TYPE zcv_jbkc.
TRY.
SELECT *
FROM I_StockQuantityCurrentValue_2( P_DisplayCurrency = 'CNY' )
WHERE product IN @rt_product
AND plant IN @rt_plant
INTO TABLE @DATA(lt_stock).
DATA(lt_stock01) = lt_stock.
SORT lt_stock01 BY product plant StorageLocation.
DELETE ADJACENT DUPLICATES FROM lt_stock01 COMPARING product plant StorageLocation.
IF lt_stock01 IS NOT INITIAL.
SELECT *
FROM I_ProductDescription
FOR ALL ENTRIES IN @lt_stock01
WHERE product = @lt_stock01-product
AND Language EQ '1'
INTO TABLE @DATA(lt_makt).
SORT lt_makt BY product.
ENDIF.
LOOP AT lt_stock01 INTO DATA(ls_stock01).
MOVE-CORRESPONDING ls_stock01 TO ls_table.
LOOP AT lt_stock INTO DATA(ls_stock) WHERE product = ls_stock01-product AND plant = ls_stock01-plant AND StorageLocation = ls_stock01-StorageLocation.
"非限制数量
IF ls_stock-ValuationAreaType EQ '1' AND ls_stock-InventoryStockType EQ '01' AND ls_stock-InventorySpecialStockType IS INITIAL.
ls_table-fxzQuantity = ls_stock-MatlWrhsStkQtyInMatlBaseUnit + ls_table-fxzQuantity.
ENDIF.
"质量检验数量
IF ls_stock-ValuationAreaType EQ '1' AND ls_stock-InventoryStockType EQ '02' AND ls_stock-InventorySpecialStockType IS INITIAL.
ls_table-zljyQuantity = ls_stock-MatlWrhsStkQtyInMatlBaseUnit + ls_table-zljyQuantity.
ENDIF.
"客户库存数量
IF ls_stock-ValuationAreaType EQ '1' AND ls_stock-InventoryStockType EQ '01' AND ls_stock-InventorySpecialStockType EQ 'W'.
ls_table-khkcQuantity = ls_stock-MatlWrhsStkQtyInMatlBaseUnit + ls_table-khkcQuantity.
ENDIF.
"委外库存数量
IF ls_stock-ValuationAreaType EQ '1' AND ls_stock-InventoryStockType EQ '01' AND ls_stock-InventorySpecialStockType EQ 'O'.
ls_table-wwkcQuantity = ls_stock-MatlWrhsStkQtyInMatlBaseUnit + ls_table-wwkcQuantity.
ENDIF.
CLEAR ls_stock.
ENDLOOP.
"-物料描述
READ TABLE lt_makt INTO DATA(ls_makt) WITH KEY product = ls_stock01-product BINARY SEARCH.
IF sy-subrc EQ 0.
ls_table-maktx = ls_makt-ProductDescription.
CLEAR ls_makt.
ENDIF.
APPEND ls_table TO lt_table.
CLEAR:ls_stock01,ls_table.
ENDLOOP.
CATCH cx_sy_dynamic_osql_syntax INTO DATA(lx_data). " exception to catch and manage dynamic query errors . must use this in order to work properly
ENDTRY.
"lo_response->get_business_data( IMPORTING et_business_data = lt_table ).
* DATA lv_lines TYPE int8.
* lv_lines = lines( lt_table ).
DATA(lv_start) = lv_skip + 1.
IF lv_top <= 0.
lv_top = 50.
ENDIF.
DATA(lv_end) = lv_skip + lv_top.
APPEND LINES OF lt_table FROM lv_start TO lv_end TO lt_table_out.
io_response->set_total_number_of_records( lines( lt_table ) ).
io_response->set_data( lt_table_out ).
"io_response->set_total_number_of_records( lines( lt_table ) ).
"ENDIF.
CATCH cx_rap_query_provider INTO DATA(lx_exc).
ENDTRY.
CATCH cx_rfc_dest_provider_error INTO DATA(lx_dest).
ENDTRY.
ENDMETHOD.
ENDCLASS.
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<VSEOCLASS>
<CLSNAME>ZCL_MATERIAL_STOCK_JB</CLSNAME>
<LANGU>1</LANGU>
<DESCRIPT>库存报表-基本库存</DESCRIPT>
<STATE>1</STATE>
<CLSCCINCL>X</CLSCCINCL>
<FIXPT>X</FIXPT>
<UNICODE>X</UNICODE>
</VSEOCLASS>
</asx:values>
</asx:abap>
</abapGit>
This diff is collapsed.
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<VSEOCLASS>
<CLSNAME>ZCL_MATERIAL_STOCK_SUM</CLSNAME>
<LANGU>1</LANGU>
<DESCRIPT>库存多维度汇总表</DESCRIPT>
<STATE>1</STATE>
<CLSCCINCL>X</CLSCCINCL>
<FIXPT>X</FIXPT>
<UNICODE>X</UNICODE>
</VSEOCLASS>
</asx:values>
</asx:abap>
</abapGit>
CLASS zcl_material_stock_sx DEFINITION
PUBLIC
FINAL
CREATE PUBLIC .
PUBLIC SECTION.
INTERFACES if_rap_query_provider.
PROTECTED SECTION.
PRIVATE SECTION.
ENDCLASS.
CLASS ZCL_MATERIAL_STOCK_SX IMPLEMENTATION.
METHOD if_rap_query_provider~select.
TRY.
TRY.
"IF io_request->is_data_requested( ).
"io_request->get_paging( ).
DATA: rt_plant TYPE RANGE OF werks_D,
rt_product TYPE RANGE OF matnr.
DATA(lo_paging) = io_request->get_paging( ).
DATA(lv_skip) = io_request->get_paging( )->get_offset( ).
DATA(lv_top) = io_request->get_paging( )->get_page_size( ).
DATA(lt_sort_elements) = io_request->get_sort_elements( ) .
DATA(lt_ranges) = io_request->get_filter( )->get_as_ranges( )."Basic search term
DATA(lt_filter_cond) = io_request->get_parameters( ). "setting the filter condition, fetching parameter names from data definition
LOOP AT lt_ranges REFERENCE INTO DATA(lr_range).
CASE lr_range->name.
WHEN 'PLANT'.
LOOP AT lr_range->range REFERENCE INTO DATA(lr_range_entry).
INSERT VALUE #( sign = lr_range_entry->sign option = lr_range_entry->option
low = CONV #( lr_range_entry->low ) high = CONV #( lr_range_entry->high ) )
INTO TABLE RT_plant.
ENDLOOP.
WHEN 'PRODUCT'.
LOOP AT lr_range->range REFERENCE INTO lr_range_entry.
INSERT VALUE #( sign = lr_range_entry->sign option = lr_range_entry->option
low = CONV #( lr_range_entry->low ) high = CONV #( lr_range_entry->high ) )
INTO TABLE rt_product.
ENDLOOP.
ENDCASE.
ENDLOOP.
DATA:lt_table TYPE STANDARD TABLE OF zcv_xskc,
lt_table_out TYPE STANDARD TABLE OF zcv_xskc.
TRY.
SELECT
a~product,
SoldToPartyName,
a~Plant,
OrderQuantityUnit,
SUM( OrderQuantity ) AS OrderQuantity,
SUM( ActualDeliveryQuantity ) AS DNQuantity,
SUM( OrderQuantity ) - SUM( ActualDeliveryQuantity ) AS wfhquantity
FROM I_SlsOrdConfAnalyticsCube( P_ExchangeRateType = 'M', P_DisplayCurrency = 'CNY' ) AS a
JOIN I_DeliveryDocumentItem AS b ON a~SalesOrder = b~referencesddocument AND a~salesorderitem = b~ReferenceSDDocumentItem
WHERE a~product IN @rt_product
AND a~plant IN @rt_plant
AND SalesOrderType IN ( 'CCFU','CBFD' )
GROUP BY a~product,a~SoldToPartyName,a~Plant,OrderQuantityUnit
INTO CORRESPONDING FIELDS OF TABLE @lt_table.
DELETE lt_table WHERE wfhquantity = 0.
IF lt_table IS NOT INITIAL.
SELECT *
FROM I_ProductDescription
FOR ALL ENTRIES IN @lt_table
WHERE product = @lt_table-product
AND Language EQ '1'
INTO TABLE @DATA(lt_makt).
SORT lt_makt BY product.
ENDIF.
LOOP AT lt_table INTO DATA(ls_data).
"-未发货数量
ls_data-WFHQuantity = ls_data-OrderQuantity - ls_data-DNQuantity.
"-物料描述
READ TABLE lt_makt INTO DATA(ls_makt) WITH KEY product = ls_data-product BINARY SEARCH.
IF sy-subrc EQ 0.
ls_data-maktx = ls_makt-ProductDescription.
CLEAR ls_makt.
ENDIF.
MODIFY lt_table FROM ls_data.
CLEAR ls_data.
ENDLOOP.
SORT lt_table BY product.
CATCH cx_sy_dynamic_osql_syntax INTO DATA(lx_data). " exception to catch and manage dynamic query errors . must use this in order to work properly
ENDTRY.
DATA(lv_start) = lv_skip + 1.
IF lv_top <= 0.
lv_top = 50.
ENDIF.
DATA(lv_end) = lv_skip + lv_top.
APPEND LINES OF lt_table FROM lv_start TO lv_end TO lt_table_out.
io_response->set_total_number_of_records( lines( lt_table ) ).
io_response->set_data( lt_table ).
"io_response->set_total_number_of_records( lines( lt_table ) ).
"ENDIF.
CATCH cx_rap_query_provider INTO DATA(lx_exc).
ENDTRY.
CATCH cx_rfc_dest_provider_error INTO DATA(lx_dest).
ENDTRY.
ENDMETHOD.
ENDCLASS.
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<VSEOCLASS>
<CLSNAME>ZCL_MATERIAL_STOCK_SX</CLSNAME>
<LANGU>1</LANGU>
<DESCRIPT>库存报表-销售库存</DESCRIPT>
<STATE>1</STATE>
<CLSCCINCL>X</CLSCCINCL>
<FIXPT>X</FIXPT>
<UNICODE>X</UNICODE>
</VSEOCLASS>
</asx:values>
</asx:abap>
</abapGit>
@AccessControl.authorizationCheck: #NOT_REQUIRED
@EndUserText.label: '库存报表-采购库存'
define root view entity ZCV_CGKC as select from I_PurchaseOrderItemAPI01 as a
association [1] to I_ProductDescription as b
on b.Language = '1' and $projection.Material = b.Product
association [0..1] to I_PurOrdScheduleLineAPI01 as c
on $projection.PurchaseOrder = c.PurchaseOrder and $projection.PurchaseOrderItem = c.PurchaseOrderItem
association [0..1] to ZCV_SUPName as d
on $projection.PurchaseOrder = d.PurchaseOrder
{
//采购订单
key a.PurchaseOrder as PurchaseOrder,
//采购订单行
key a.PurchaseOrderItem,
//物料号
a.Material,
@Consumption.valueHelpDefinition: [
{ entity: { name: 'I_ProductstdVH',
element: 'Product' }
}]
b.Product as Product,
//物料描述
b.ProductDescription,
//工厂
@Consumption.valueHelpDefinition: [
{ entity: { name: 'I_PlantstdVH',
element: 'Plant' }
}]
a.Plant,
//采购订单日期
d.CreationDate,
//采购订单数量
cast( c.RoughGoodsReceiptQty as abap.char( 20 ) ) as Zcgsl,
//供应商名称
d.Supplier,
//供应商描述
// cast( e.SupplierName as abap.char( 20 ) ) as SupplierName,
d.SupplierName,
//到货日期
c.ScheduleLineDeliveryDate,
//采购订单未收货数量
cast( ( c.ScheduleLineOrderQuantity - c.RoughGoodsReceiptQty ) as abap.char( 20 ) ) as Zwshsl,
//单位
PurchaseOrderQuantityUnit,
/* Associations */
_PurchaseOrder
}where b.Product is not initial
and c.ScheduleLineOrderQuantity <> c.RoughGoodsReceiptQty
{
"BASEINFO":
{
"FROM":
[
"I_PRODUCTDESCRIPTION",
"I_PURCHASEORDERITEMAPI01",
"I_PURORDSCHEDULELINEAPI01",
"ZCV_SUPNAME"
],
"ASSOCIATED":
[
"I_PURCHASEORDERAPI01"
],
"BASE":
[
"I_PURCHASEORDERITEMAPI01"
],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}
\ No newline at end of file
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DDLS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<DDLS>
<DDLNAME>ZCV_CGKC</DDLNAME>
<DDLANGUAGE>1</DDLANGUAGE>
<DDTEXT>库存报表-采购库存</DDTEXT>
<SOURCE_TYPE>W</SOURCE_TYPE>
</DDLS>
</asx:values>
</asx:abap>
</abapGit>
@AccessControl.authorizationCheck: #NOT_REQUIRED
@EndUserText.label: '产品半成品标准价格-货物移动增强使用'
define root view entity ZCV_GM_CB as select from I_ProductValuationBasic
{
key Product,
key ValuationArea,
key ValuationType,
CompanyCode,
PriceDeterminationControl,
InventoryValuationProcedure,
@Semantics.amount.currencyCode: 'Currency'
StandardPrice,
Currency
}
{
"BASEINFO":
{
"FROM":
[
"I_PRODUCTVALUATIONBASIC"
],
"ASSOCIATED":
[],
"BASE":
[],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}
\ No newline at end of file
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DDLS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<DDLS>
<DDLNAME>ZCV_GM_CB</DDLNAME>
<DDLANGUAGE>1</DDLANGUAGE>
<DDTEXT>产品半成品标准价格-货物移动增强使用</DDTEXT>
<SOURCE_TYPE>W</SOURCE_TYPE>
</DDLS>
</asx:values>
</asx:abap>
</abapGit>
@EndUserText.label: '库存报表-销售库存'
@ObjectModel.query.implementedBy: 'ABAP:ZCL_MATERIAL_STOCK_JB'
define custom entity ZCV_JBKC
{
@Search : { defaultSearchElement: true, ranking: #HIGH, fuzzinessThreshold: 0.8 }
@UI.lineItem : [ { position: 10, label: '物料编码'} ]
@Consumption.valueHelpDefinition: [{ entity : {name: 'I_ProductstdVH', element: 'Product' } }]
key Product : matnr;
@Search.defaultSearchElement: true
@UI.lineItem : [ { position: 30, label: '工厂'} ]
@Consumption.valueHelpDefinition: [{ entity: { name: 'I_PlantstdVH', element: 'Plant' } }]
key Plant : werks_d;
@UI.lineItem : [ { position: 40, label: '库存地点'} ]
key StorageLocation : abap.char(4);
@UI.lineItem : [ { position: 20, label: '物料描述'} ]
maktx : abap.char(40);
@UI.lineItem : [ { position: 50, label: '非限制数量'} ]
fxzQuantity : abap.dec(17,3);
@UI.lineItem : [ { position: 60, label: '质量检验数量'} ]
zljyQuantity : abap.dec(17,3);
@UI.lineItem : [ { position: 70, label: '客户库存数量'} ]
khkcQuantity : abap.dec(17,3);
@UI.lineItem : [ { position: 80, label: '客户名称'} ]
CustomerName : abap.char(70);
@UI.lineItem : [ { position: 90, label: '委外库存数量'} ]
wwkcQuantity : abap.dec(17,3);
@UI.lineItem : [ { position: 100, label: '委外名称'} ]
SupplierName : abap.char(80);
@UI.lineItem : [ { position: 110, label: '单位'} ]
MaterialBaseUnit : meins;
}
//as select from I_ProductStorageLocationBasic as a
//association [1] to I_ProductDescription as b
//on b.Language = '1' and $projection.Product = b.Product
//{
// key a.Product,
// key a.Plant,
// key a.StorageLocation,
// b.ProductDescription,
// /* Associations */
// _Plant,
// _Product,
// _Stock
//}
{
"BASEINFO":
{
"FROM":
[],
"ASSOCIATED":
[],
"BASE":
[],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}
\ No newline at end of file
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DDLS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<DDLS>
<DDLNAME>ZCV_JBKC</DDLNAME>
<DDLANGUAGE>1</DDLANGUAGE>
<DDTEXT>基本库存</DDTEXT>
<SOURCE_TYPE>Q</SOURCE_TYPE>
</DDLS>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SRVB" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SRVB>
<METADATA>
<NAME>ZCV_KCBB</NAME>
<TYPE>SRVB/SVB</TYPE>
<DESCRIPTION>库存报表</DESCRIPTION>
<LANGUAGE>ZH</LANGUAGE>
<LINKS>
<item>
<HREF>versions</HREF>
<REL>http://www.sap.com/adt/relations/versions</REL>
<TITLE>Historic versions</TITLE>
</item>
<item>
<HREF>/sap/bc/adt/businessservices/odatav2/ZCV_KCBB</HREF>
<REL>http://www.sap.com/categories/odatav2</REL>
<TYPE>application/vnd.sap.adt.businessservices.odatav2.v2+xml</TYPE>
<TITLE>ODATAV2</TITLE>
</item>
<item>
<HREF>/sap/bc/adt/businessservices/testclass</HREF>
<REL>http://www.sap.com/categories/testclass</REL>
<TYPE>application/vnd.sap.adt.businessservices.testclass.v1+xml</TYPE>
<TITLE>TESTCLASS</TITLE>
</item>
<item>
<HREF>/sap/bc/adt/businessservices/testclass</HREF>
<REL>http://www.sap.com/categories/testclass</REL>
<TYPE>application/vnd.sap.adt.businessservices.testclassv4.v1+xml</TYPE>
<TITLE>TESTCLASSV4</TITLE>
</item>
<item>
<HREF>/sap/bc/adt/businessservices/semanticversion</HREF>
<REL>http://www.sap.com/categories/semanticversion</REL>
<TYPE>application/vnd.sap.adt.businessservices.semanticversion.v1+xml</TYPE>
<TITLE>SemanticVersion</TITLE>
</item>
</LINKS>
<MASTER_LANGUAGE>ZH</MASTER_LANGUAGE>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</METADATA>
<CONTENT>
<BIND_TYPE_IMPL>
<NAME>ZCV_KCBB</NAME>
</BIND_TYPE_IMPL>
<BIND_TYPE>ODATA</BIND_TYPE>
<BIND_TYPE_CATEGORY>1</BIND_TYPE_CATEGORY>
<BIND_TYPE_VERSION>V2</BIND_TYPE_VERSION>
<SERVICES>
<item>
<SERVICE_NAME>ZCV_KCBB</SERVICE_NAME>
<SERVICE_CONTENT>
<item>
<SERVICE_VERSION>0001</SERVICE_VERSION>
<RELEASE_STATE>NOT_RELEASED</RELEASE_STATE>
<SRVD_REF>
<URI>/sap/bc/adt/ddic/srvd/sources/zcv_kcbb</URI>
<TYPE>SRVD/SRV</TYPE>
<NAME>ZCV_KCBB</NAME>
</SRVD_REF>
<BIND_TYPE_DATA>
<CONTENT>
<ENCODING>base64</ENCODING>
</CONTENT>
</BIND_TYPE_DATA>
</item>
</SERVICE_CONTENT>
</item>
</SERVICES>
</CONTENT>
<CONTRACT>C2</CONTRACT>
<RELEASE_SUPPORTED>true</RELEASE_SUPPORTED>
<PUBLISHED>true</PUBLISHED>
<BINDING_CREATED>true</BINDING_CREATED>
</SRVB>
</asx:values>
</asx:abap>
</abapGit>
@EndUserText.label: '库存多维度报表明细报表'
define service ZCV_KCBB {
expose I_PlantStdVH;
expose I_ProductStdVH;
expose ZCV_CGKC as Cgkc;
expose ZCV_SCKC as Sckc;
expose ZCV_XSKC as Xskc;
expose ZCV_JBKC as Jbkc;
}
\ No newline at end of file
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SRVD" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SRVD>
<NAME>ZCV_KCBB</NAME>
<TYPE>SRVD/SRV</TYPE>
<DESCRIPTION> 库存报表</DESCRIPTION>
<LANGUAGE>ZH</LANGUAGE>
<MASTER_LANGUAGE>ZH</MASTER_LANGUAGE>
<SOURCE_URI>./zcv_kcbb/source/main</SOURCE_URI>
<SOURCE_TYPE>ABAP_SOURCE</SOURCE_TYPE>
<SOURCE_ORIGIN_DESCRIPTION>ABAP Development Tools</SOURCE_ORIGIN_DESCRIPTION>
<SRVD_SOURCE_TYPE>S</SRVD_SOURCE_TYPE>
<SRVD_SOURCE_TYPE_DESC>Definition</SRVD_SOURCE_TYPE_DESC>
</SRVD>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SCO2" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SCO2>
<IBS_ID>ZCV_KCBB_IWSG</IBS_ID>
<IBS_TYPE>IWSG</IBS_TYPE>
<ODATA_SRV_IDENTIFIER>ZCV_KCBB_0001</ODATA_SRV_IDENTIFIER>
<REL_FOR_CUST_CSCN>X</REL_FOR_CUST_CSCN>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
<NAME>ZCV_KCBB_IWSG</NAME>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</SCO2>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SIA6" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SIA6>
<MAIN_OBJECT>
<NAME>ZCV_KCBB_IWSG_IBS</NAME>
<TYPE>SIA6</TYPE>
<RESPONSIBLE>CB9980000012</RESPONSIBLE>
<MASTER_LANGUAGE>EN</MASTER_LANGUAGE>
<MASTER_SYSTEM>Z43</MASTER_SYSTEM>
<PACKAGE_REF>
<PACKAGE_NAME>ZZMM</PACKAGE_NAME>
</PACKAGE_REF>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</MAIN_OBJECT>
<APP_ID>ZCV_KCBB_IWSG_IBS</APP_ID>
<APP_TYPE>IBS</APP_TYPE>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
<SECONDARY_ID>ZCV_KCBB_IWSG</SECONDARY_ID>
<PUBLISH_STATUS>u</PUBLISH_STATUS>
</SIA6>
</asx:values>
</asx:abap>
</abapGit>
@EndUserText.label: '库存多维度汇总表'
@ObjectModel.query.implementedBy: 'ABAP:ZCL_MATERIAL_STOCK_SUM'
define custom entity ZCV_KCBB_SUM
{
@Search.defaultSearchElement: true
@UI.lineItem : [ { position: 10, label: '工厂'} ]
@Consumption.valueHelpDefinition: [{ entity: { name: 'I_PlantstdVH', element: 'Plant' } }]
key Plant : werks_d;
@Search : { defaultSearchElement: true, ranking: #HIGH, fuzzinessThreshold: 0.8 }
@UI.lineItem : [ { position: 20, label: '物料编码'} ]
@Consumption.valueHelpDefinition: [{ entity : {name: 'I_ProductstdVH', element: 'Product' } }]
key Product : matnr;
@UI.lineItem : [ { label: '客户编号'} ]
@Consumption.valueHelpDefinition: [{ entity : {name: 'I_Customer_VH', element: 'Customer' } }]
key SoldToParty : zdxm;
@UI.lineItem : [ { position: 30, label: '物料描述'} ]
maktx : abap.char(40);
// @UI.lineItem : [ { position: 40, label: '客户描述'} ]
// SoldToPartyName : abap.char(40);
@UI.lineItem : [ { position: 40, label: '项目总需求'} ]
xmzQuantity : abap.dec(17,3);
@UI.lineItem : [ { position: 50, label: '成品库存'} ]
cpQuantity : abap.dec(17,3);
@UI.lineItem : [ { position: 60, label: '未翻新库存'} ]
wfxQuantity : abap.dec(17,3);
@UI.lineItem : [ { position: 70, label: '质检库存'} ]
zjQuantity : abap.dec(17,3);
@UI.lineItem : [ { position: 90, label: '生产供应'} ]
scQuantity : abap.dec(17,3);
@UI.lineItem : [ { position: 100, label: '采购供应'} ]
cgQuantity : abap.dec(17,3);
@UI.lineItem : [ { position: 110, label: '客户库存'} ]
khQuantity : abap.dec(17,3);
@UI.lineItem : [ { position: 120, label: '委外库存'} ]
wwQuantity : abap.dec(17,3);
@UI.lineItem : [ { position: 130, label: '供需差额'} ]
gxQuantity : abap.dec(17,3);
@UI.lineItem : [ { position: 140, label: '单位'} ]
MaterialBaseUnit : meins;
}
{
"BASEINFO":
{
"FROM":
[],
"ASSOCIATED":
[],
"BASE":
[],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}
\ No newline at end of file
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DDLS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<DDLS>
<DDLNAME>ZCV_KCBB_SUM</DDLNAME>
<DDLANGUAGE>1</DDLANGUAGE>
<DDTEXT>库存多维度汇总表</DDTEXT>
<SOURCE_TYPE>Q</SOURCE_TYPE>
</DDLS>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SRVB" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SRVB>
<METADATA>
<NAME>ZCV_KCBB_SUM</NAME>
<TYPE>SRVB/SVB</TYPE>
<DESCRIPTION>库存多维度报表汇总表</DESCRIPTION>
<LANGUAGE>ZH</LANGUAGE>
<LINKS>
<item>
<HREF>versions</HREF>
<REL>http://www.sap.com/adt/relations/versions</REL>
<TITLE>Historic versions</TITLE>
</item>
<item>
<HREF>/sap/bc/adt/businessservices/odatav2/ZCV_KCBB_SUM</HREF>
<REL>http://www.sap.com/categories/odatav2</REL>
<TYPE>application/vnd.sap.adt.businessservices.odatav2.v2+xml</TYPE>
<TITLE>ODATAV2</TITLE>
</item>
<item>
<HREF>/sap/bc/adt/businessservices/testclass</HREF>
<REL>http://www.sap.com/categories/testclass</REL>
<TYPE>application/vnd.sap.adt.businessservices.testclass.v1+xml</TYPE>
<TITLE>TESTCLASS</TITLE>
</item>
<item>
<HREF>/sap/bc/adt/businessservices/testclass</HREF>
<REL>http://www.sap.com/categories/testclass</REL>
<TYPE>application/vnd.sap.adt.businessservices.testclassv4.v1+xml</TYPE>
<TITLE>TESTCLASSV4</TITLE>
</item>
<item>
<HREF>/sap/bc/adt/businessservices/semanticversion</HREF>
<REL>http://www.sap.com/categories/semanticversion</REL>
<TYPE>application/vnd.sap.adt.businessservices.semanticversion.v1+xml</TYPE>
<TITLE>SemanticVersion</TITLE>
</item>
</LINKS>
<MASTER_LANGUAGE>ZH</MASTER_LANGUAGE>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</METADATA>
<CONTENT>
<BIND_TYPE_IMPL>
<NAME>ZCV_KCBB_SUM</NAME>
</BIND_TYPE_IMPL>
<BIND_TYPE>ODATA</BIND_TYPE>
<BIND_TYPE_VERSION>V2</BIND_TYPE_VERSION>
<SERVICES>
<item>
<SERVICE_NAME>ZCV_KCBB_SUM</SERVICE_NAME>
<SERVICE_CONTENT>
<item>
<SERVICE_VERSION>0001</SERVICE_VERSION>
<RELEASE_STATE>NOT_RELEASED</RELEASE_STATE>
<SRVD_REF>
<URI>/sap/bc/adt/ddic/srvd/sources/zcv_kcbb_sum</URI>
<TYPE>SRVD/SRV</TYPE>
<NAME>ZCV_KCBB_SUM</NAME>
</SRVD_REF>
<BIND_TYPE_DATA>
<CONTENT>
<ENCODING>base64</ENCODING>
</CONTENT>
</BIND_TYPE_DATA>
</item>
</SERVICE_CONTENT>
</item>
</SERVICES>
</CONTENT>
<CONTRACT>C1</CONTRACT>
<RELEASE_SUPPORTED>true</RELEASE_SUPPORTED>
<PUBLISHED>true</PUBLISHED>
<BINDING_CREATED>true</BINDING_CREATED>
</SRVB>
</asx:values>
</asx:abap>
</abapGit>
@EndUserText.label: '库存多维度报表汇总表'
define service ZCV_KCBB_SUM {
expose ZCV_KCBB_SUM as Kcbb_sum;
}
\ No newline at end of file
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SRVD" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SRVD>
<NAME>ZCV_KCBB_SUM</NAME>
<TYPE>SRVD/SRV</TYPE>
<DESCRIPTION>库存多维度报表汇总表</DESCRIPTION>
<LANGUAGE>ZH</LANGUAGE>
<MASTER_LANGUAGE>ZH</MASTER_LANGUAGE>
<SOURCE_URI>./zcv_kcbb_sum/source/main</SOURCE_URI>
<SOURCE_TYPE>ABAP_SOURCE</SOURCE_TYPE>
<SOURCE_ORIGIN_DESCRIPTION>ABAP Development Tools</SOURCE_ORIGIN_DESCRIPTION>
<SRVD_SOURCE_TYPE>S</SRVD_SOURCE_TYPE>
<SRVD_SOURCE_TYPE_DESC>Definition</SRVD_SOURCE_TYPE_DESC>
</SRVD>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SCO2" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SCO2>
<IBS_ID>ZCV_KCBB_SUM_IWSG</IBS_ID>
<IBS_TYPE>IWSG</IBS_TYPE>
<ODATA_SRV_IDENTIFIER>ZCV_KCBB_SUM_0001</ODATA_SRV_IDENTIFIER>
<REL_FOR_CUST_CSCN>X</REL_FOR_CUST_CSCN>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
<NAME>ZCV_KCBB_SUM_IWSG</NAME>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</SCO2>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SIA6" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SIA6>
<MAIN_OBJECT>
<NAME>ZCV_KCBB_SUM_IWSG_IBS</NAME>
<TYPE>SIA6</TYPE>
<RESPONSIBLE>CB9980000012</RESPONSIBLE>
<MASTER_LANGUAGE>EN</MASTER_LANGUAGE>
<MASTER_SYSTEM>Z43</MASTER_SYSTEM>
<PACKAGE_REF>
<PACKAGE_NAME>ZZMM</PACKAGE_NAME>
</PACKAGE_REF>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</MAIN_OBJECT>
<APP_ID>ZCV_KCBB_SUM_IWSG_IBS</APP_ID>
<APP_TYPE>IBS</APP_TYPE>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
<SECONDARY_ID>ZCV_KCBB_SUM_IWSG</SECONDARY_ID>
<PUBLISH_STATUS>u</PUBLISH_STATUS>
</SIA6>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SRVB" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SRVB>
<METADATA>
<NAME>ZCV_KCBB_TEST</NAME>
<TYPE>SRVB/SVB</TYPE>
<DESCRIPTION>库存报表UI测试</DESCRIPTION>
<LANGUAGE>ZH</LANGUAGE>
<LINKS>
<item>
<HREF>versions</HREF>
<REL>http://www.sap.com/adt/relations/versions</REL>
<TITLE>Historic versions</TITLE>
</item>
<item>
<HREF>/sap/bc/adt/businessservices/odatav2/ZCV_KCBB_TEST</HREF>
<REL>http://www.sap.com/categories/odatav2</REL>
<TYPE>application/vnd.sap.adt.businessservices.odatav2.v2+xml</TYPE>
<TITLE>ODATAV2</TITLE>
</item>
<item>
<HREF>/sap/bc/adt/businessservices/testclass</HREF>
<REL>http://www.sap.com/categories/testclass</REL>
<TYPE>application/vnd.sap.adt.businessservices.testclass.v1+xml</TYPE>
<TITLE>TESTCLASS</TITLE>
</item>
<item>
<HREF>/sap/bc/adt/businessservices/testclass</HREF>
<REL>http://www.sap.com/categories/testclass</REL>
<TYPE>application/vnd.sap.adt.businessservices.testclassv4.v1+xml</TYPE>
<TITLE>TESTCLASSV4</TITLE>
</item>
<item>
<HREF>/sap/bc/adt/businessservices/semanticversion</HREF>
<REL>http://www.sap.com/categories/semanticversion</REL>
<TYPE>application/vnd.sap.adt.businessservices.semanticversion.v1+xml</TYPE>
<TITLE>SemanticVersion</TITLE>
</item>
</LINKS>
<MASTER_LANGUAGE>ZH</MASTER_LANGUAGE>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</METADATA>
<CONTENT>
<BIND_TYPE_IMPL>
<NAME>ZCV_KCBB_TEST</NAME>
</BIND_TYPE_IMPL>
<BIND_TYPE>ODATA</BIND_TYPE>
<BIND_TYPE_VERSION>V2</BIND_TYPE_VERSION>
<SERVICES>
<item>
<SERVICE_NAME>ZCV_KCBB_TEST</SERVICE_NAME>
<SERVICE_CONTENT>
<item>
<SERVICE_VERSION>0001</SERVICE_VERSION>
<RELEASE_STATE>NOT_RELEASED</RELEASE_STATE>
<SRVD_REF>
<URI>/sap/bc/adt/ddic/srvd/sources/zcv_kcbb</URI>
<TYPE>SRVD/SRV</TYPE>
<NAME>ZCV_KCBB</NAME>
</SRVD_REF>
<BIND_TYPE_DATA>
<CONTENT>
<ENCODING>base64</ENCODING>
</CONTENT>
</BIND_TYPE_DATA>
</item>
</SERVICE_CONTENT>
</item>
</SERVICES>
</CONTENT>
<CONTRACT>C1</CONTRACT>
<RELEASE_SUPPORTED>true</RELEASE_SUPPORTED>
<PUBLISHED>true</PUBLISHED>
<BINDING_CREATED>true</BINDING_CREATED>
</SRVB>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SCO2" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SCO2>
<IBS_ID>ZCV_KCBB_TEST_IWSG</IBS_ID>
<IBS_TYPE>IWSG</IBS_TYPE>
<ODATA_SRV_IDENTIFIER>ZCV_KCBB_TEST_0001</ODATA_SRV_IDENTIFIER>
<REL_FOR_CUST_CSCN>X</REL_FOR_CUST_CSCN>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
<NAME>ZCV_KCBB_TEST_IWSG</NAME>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</SCO2>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SIA6" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SIA6>
<MAIN_OBJECT>
<NAME>ZCV_KCBB_TEST_IWSG_IBS</NAME>
<TYPE>SIA6</TYPE>
<RESPONSIBLE>CB9980000012</RESPONSIBLE>
<MASTER_LANGUAGE>EN</MASTER_LANGUAGE>
<MASTER_SYSTEM>Z43</MASTER_SYSTEM>
<PACKAGE_REF>
<PACKAGE_NAME>ZZMM</PACKAGE_NAME>
</PACKAGE_REF>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</MAIN_OBJECT>
<APP_ID>ZCV_KCBB_TEST_IWSG_IBS</APP_ID>
<APP_TYPE>IBS</APP_TYPE>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
<SECONDARY_ID>ZCV_KCBB_TEST_IWSG</SECONDARY_ID>
<PUBLISH_STATUS>u</PUBLISH_STATUS>
</SIA6>
</asx:values>
</asx:abap>
</abapGit>
@AccessControl.authorizationCheck: #NOT_REQUIRED
@EndUserText.label: '库存报表-生产库存'
define root view entity ZCV_SCKC as select from I_MfgOrderWithStatus
association [1] to I_ProductDescription as b
on b.Language = '1' and $projection.Product = b.Product
{
key ManufacturingOrder,
Product,
b.ProductDescription,
ProductionPlant as Plant,
CreationDate,
cast( ( MfgOrderPlannedTotalQty - ActualDeliveredQuantity ) as abap.char( 20 ) ) as Zwrksl,
ProductionUnit,
/* Associations */
_Product
}where Product is not initial
and MfgOrderPlannedTotalQty <> ActualDeliveredQuantity
{
"BASEINFO":
{
"FROM":
[
"I_MFGORDERWITHSTATUS",
"I_PRODUCTDESCRIPTION"
],
"ASSOCIATED":
[
"I_PRODUCT"
],
"BASE":
[
"I_MFGORDERWITHSTATUS"
],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}
\ No newline at end of file
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DDLS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<DDLS>
<DDLNAME>ZCV_SCKC</DDLNAME>
<DDLANGUAGE>1</DDLANGUAGE>
<DDTEXT>生产库存</DDTEXT>
<SOURCE_TYPE>W</SOURCE_TYPE>
</DDLS>
</asx:values>
</asx:abap>
</abapGit>
@AccessControl.authorizationCheck: #NOT_REQUIRED
@EndUserText.label: '库存报表-采购库存-供应商名称'
define root view entity ZCV_SUPName as select from I_PurchaseOrderAPI01
association [1] to I_Supplier as e
on $projection.Supplier = e.Supplier
{
key PurchaseOrder,
CreatedByUser,
CreationDate,
CompanyCode,
Supplier,
e.SupplierName,
/* Associations */
_PurchaseOrderItem
}
{
"BASEINFO":
{
"FROM":
[
"I_PURCHASEORDERAPI01",
"I_SUPPLIER"
],
"ASSOCIATED":
[
"I_PURCHASEORDERITEMAPI01"
],
"BASE":
[
"I_PURCHASEORDERAPI01"
],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}
\ No newline at end of file
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DDLS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<DDLS>
<DDLNAME>ZCV_SUPNAME</DDLNAME>
<DDLANGUAGE>1</DDLANGUAGE>
<DDTEXT>库存报表-采购库存-供应商名称</DDTEXT>
<SOURCE_TYPE>W</SOURCE_TYPE>
</DDLS>
</asx:values>
</asx:abap>
</abapGit>
@EndUserText.label: '库存报表-销售库存'
define root abstract entity ZCV_TEST001
{
product : abap.char( 18 );
maktx : text40;
}
{
"BASEINFO":
{
"FROM":
[],
"ASSOCIATED":
[],
"BASE":
[],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}
\ No newline at end of file
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DDLS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<DDLS>
<DDLNAME>ZCV_TEST001</DDLNAME>
<DDLANGUAGE>1</DDLANGUAGE>
<DDTEXT>测试</DDTEXT>
<SOURCE_TYPE>A</SOURCE_TYPE>
</DDLS>
</asx:values>
</asx:abap>
</abapGit>
//@AccessControl.authorizationCheck: #NOT_REQUIRED
@EndUserText.label: '库存报表-销售库存'
@ObjectModel.query.implementedBy: 'ABAP:ZCL_MATERIAL_STOCK_SX'
define custom entity ZCV_XSKC
// with parameters
// matnr : matnr,
// plant : werks_d
{
@Search : { defaultSearchElement: true, ranking: #HIGH, fuzzinessThreshold: 0.8 }
@UI.lineItem : [ { position: 10, label: '物料编码'} ]
@Consumption.valueHelpDefinition: [{ entity : {name: 'I_ProductstdVH', element: 'Product' } }]
key Product : matnr;
@UI.lineItem : [ { position: 40, label: '项目描述'} ]
key SoldToPartyName : abap.char(40);
@Search.defaultSearchElement: true
@UI.lineItem : [ { position: 30, label: '工厂'} ]
@Consumption.valueHelpDefinition: [{ entity: { name: 'I_PlantstdVH', element: 'Plant' } }]
Plant : werks_d;
@UI.lineItem : [ { position: 20, label: '物料描述'} ]
maktx : abap.char(40);
@Semantics.quantity.unitOfMeasure: 'OrderQuantityUnit'
OrderQuantity : abap.dec(15,3);
@Semantics.quantity.unitOfMeasure: 'OrderQuantityUnit'
DNQuantity : abap.dec(15,3);
@UI.lineItem : [ { position: 50, label: '未发货数量'} ]
// @Semantics.quantity.unitOfMeasure: 'OrderQuantityUnit'
WFHQuantity : abap.dec(15,3);
@UI.lineItem : [ { position: 60, label: '单位'} ]
OrderQuantityUnit : meins;
}
//where ( P_EXCHANGERATETYPE = 'M' and
// P_DISPLAYCURRENCY = 'CNY' )
{
"BASEINFO":
{
"FROM":
[],
"ASSOCIATED":
[],
"BASE":
[],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}
\ No newline at end of file
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DDLS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<DDLS>
<DDLNAME>ZCV_XSKC</DDLNAME>
<DDLANGUAGE>1</DDLANGUAGE>
<DDTEXT>库存报表-销售库存</DDTEXT>
<SOURCE_TYPE>Q</SOURCE_TYPE>
</DDLS>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DTEL" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<DD04V>
<ROLLNAME>ZDXM</ROLLNAME>
<DDLANGUAGE>1</DDLANGUAGE>
<DOMNAME>CHAR10</DOMNAME>
<HEADLEN>55</HEADLEN>
<SCRLEN1>10</SCRLEN1>
<SCRLEN2>20</SCRLEN2>
<SCRLEN3>40</SCRLEN3>
<DDTEXT>项目</DDTEXT>
<REPTEXT>项目</REPTEXT>
<SCRTEXT_S>项目</SCRTEXT_S>
<SCRTEXT_M>项目</SCRTEXT_M>
<SCRTEXT_L>项目</SCRTEXT_L>
<DTELMASTER>1</DTELMASTER>
<REFKIND>D</REFKIND>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
</DD04V>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_ENHO" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<TOOL>BADI_IMPL</TOOL>
<SHORTTEXT>货物移动过账增强</SHORTTEXT>
<SPOT_NAME>MMIM_CREATE_GOODS_MOVEMENT</SPOT_NAME>
<IMPL>
<ENH_BADI_IMPL_DATA>
<SPOT_NAME>MMIM_CREATE_GOODS_MOVEMENT</SPOT_NAME>
<BADI_NAME>BADI_MMIM_CHECK_MATDOC_ITEM</BADI_NAME>
<IMPL_NAME>ZBADI_MMIM_CHECK_MATDOC_ITEM</IMPL_NAME>
<IMPL_CLASS>ZBADI_MMIM_CHECK_MATDOC_ITEM</IMPL_CLASS>
<ACTIVE>X</ACTIVE>
<IMPL_SHORTTEXT>货物移动行项目Check</IMPL_SHORTTEXT>
<LOCKED_IN_CUSTOMIZING>X</LOCKED_IN_CUSTOMIZING>
</ENH_BADI_IMPL_DATA>
</IMPL>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SCO1" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SCO1>
<COMMUNICATION_SCENARIO_ID>ZMM001</COMMUNICATION_SCENARIO_ID>
<COMMUNICATION_SCENARIO_TYPE>1</COMMUNICATION_SCENARIO_TYPE>
<ALLOWED_CA_INSTANCES>1</ALLOWED_CA_INSTANCES>
<CONTAINS_INBOUND>X</CONTAINS_INBOUND>
<IB_TRUST_PSE_ID>SSLC_CUSTOMER_DEFAULT</IB_TRUST_PSE_ID>
<IB_BASIC_AUTH>X</IB_BASIC_AUTH>
<IB_X509_AUTH>X</IB_X509_AUTH>
<INBOUND_ROLE_ID>ZCR_JWNNCJGW4EPO5ENKNT4LZFYFYQ</INBOUND_ROLE_ID>
<OB_AUTH_PSE_ID>SSLC_CUSTOMER_DEFAULT</OB_AUTH_PSE_ID>
<OB_TRUST_PSE_ID>SSLC_CUSTOMER_DEFAULT</OB_TRUST_PSE_ID>
<OB_BASIC_AUTH>X</OB_BASIC_AUTH>
<OB_X509_AUTH>X</OB_X509_AUTH>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
<MAIN_OBJECT>
<NAME>ZMM001</NAME>
<TYPE>SCO1</TYPE>
<DESCRIPTION>测试接口</DESCRIPTION>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</MAIN_OBJECT>
<SCOPE_STATUS>3</SCOPE_STATUS>
<SCOPE_STATUS_TEXT></SCOPE_STATUS_TEXT>
<INBOUND>
<item>
<COMMUNICATION_SCENARIO_ID>ZMM001</COMMUNICATION_SCENARIO_ID>
<INBOUND_ID>0001</INBOUND_ID>
<IBS_ID>ZMM_001_IWSG</IBS_ID>
<RELEASE_STATUS>1</RELEASE_STATUS>
<IBS_TYPE>IWSG</IBS_TYPE>
<IBS_TYPE_TEXT>OData V2</IBS_TYPE_TEXT>
<SRVC_TYPE>HT</SRVC_TYPE>
<SRVC_NAME>DD8FCA23B4F2EEC2965CFA38C0EC39</SRVC_NAME>
</item>
</INBOUND>
<PUBLISH_STATUS>p</PUBLISH_STATUS>
<PLUGIN_CONFIG>
<item>
<UI_OBJECT>cscn_type_selection</UI_OBJECT>
<IS_VISIBLE>X</IS_VISIBLE>
<IS_ENABLED>X</IS_ENABLED>
</item>
<item>
<UI_OBJECT>cscn_allow_create_by_key_checkbox</UI_OBJECT>
</item>
<item>
<UI_OBJECT>cscn_badi_impl_class_input</UI_OBJECT>
</item>
<item>
<UI_OBJECT>cscn_scope_status</UI_OBJECT>
</item>
</PLUGIN_CONFIG>
</SCO1>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SRVB" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SRVB>
<METADATA>
<NAME>ZMM_001</NAME>
<TYPE>SRVB/SVB</TYPE>
<DESCRIPTION>测试接口</DESCRIPTION>
<LANGUAGE>ZH</LANGUAGE>
<LINKS>
<item>
<HREF>versions</HREF>
<REL>http://www.sap.com/adt/relations/versions</REL>
<TITLE>Historic versions</TITLE>
</item>
<item>
<HREF>/sap/bc/adt/businessservices/odatav2/ZMM_001</HREF>
<REL>http://www.sap.com/categories/odatav2</REL>
<TYPE>application/vnd.sap.adt.businessservices.odatav2.v2+xml</TYPE>
<TITLE>ODATAV2</TITLE>
</item>
<item>
<HREF>/sap/bc/adt/businessservices/testclass</HREF>
<REL>http://www.sap.com/categories/testclass</REL>
<TYPE>application/vnd.sap.adt.businessservices.testclass.v1+xml</TYPE>
<TITLE>TESTCLASS</TITLE>
</item>
<item>
<HREF>/sap/bc/adt/businessservices/testclass</HREF>
<REL>http://www.sap.com/categories/testclass</REL>
<TYPE>application/vnd.sap.adt.businessservices.testclassv4.v1+xml</TYPE>
<TITLE>TESTCLASSV4</TITLE>
</item>
<item>
<HREF>/sap/bc/adt/businessservices/semanticversion</HREF>
<REL>http://www.sap.com/categories/semanticversion</REL>
<TYPE>application/vnd.sap.adt.businessservices.semanticversion.v1+xml</TYPE>
<TITLE>SemanticVersion</TITLE>
</item>
</LINKS>
<MASTER_LANGUAGE>ZH</MASTER_LANGUAGE>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</METADATA>
<CONTENT>
<BIND_TYPE_IMPL>
<NAME>ZMM_001</NAME>
</BIND_TYPE_IMPL>
<BIND_TYPE>ODATA</BIND_TYPE>
<BIND_TYPE_CATEGORY>1</BIND_TYPE_CATEGORY>
<BIND_TYPE_VERSION>V2</BIND_TYPE_VERSION>
<SERVICES>
<item>
<SERVICE_NAME>ZMM_001</SERVICE_NAME>
<SERVICE_CONTENT>
<item>
<SERVICE_VERSION>0001</SERVICE_VERSION>
<RELEASE_STATE>NOT_RELEASED</RELEASE_STATE>
<SRVD_REF>
<URI>/sap/bc/adt/ddic/srvd/sources/zmm_001</URI>
<TYPE>SRVD/SRV</TYPE>
<NAME>ZMM_001</NAME>
</SRVD_REF>
<BIND_TYPE_DATA>
<CONTENT>
<ENCODING>base64</ENCODING>
</CONTENT>
</BIND_TYPE_DATA>
</item>
</SERVICE_CONTENT>
</item>
</SERVICES>
</CONTENT>
<CONTRACT>C2</CONTRACT>
<RELEASE_SUPPORTED>true</RELEASE_SUPPORTED>
<PUBLISHED>true</PUBLISHED>
<BINDING_CREATED>true</BINDING_CREATED>
</SRVB>
</asx:values>
</asx:abap>
</abapGit>
@EndUserText.label: '测试接口'
define service ZMM_001 {
expose ZMM_001_CDS as zmm001;
}
\ No newline at end of file
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SRVD" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SRVD>
<NAME>ZMM_001</NAME>
<TYPE>SRVD/SRV</TYPE>
<DESCRIPTION>测试接口</DESCRIPTION>
<LANGUAGE>ZH</LANGUAGE>
<MASTER_LANGUAGE>ZH</MASTER_LANGUAGE>
<SOURCE_URI>./zmm_001/source/main</SOURCE_URI>
<SOURCE_TYPE>ABAP_SOURCE</SOURCE_TYPE>
<SOURCE_ORIGIN_DESCRIPTION>ABAP Development Tools</SOURCE_ORIGIN_DESCRIPTION>
<SRVD_SOURCE_TYPE>S</SRVD_SOURCE_TYPE>
<SRVD_SOURCE_TYPE_DESC>Definition</SRVD_SOURCE_TYPE_DESC>
</SRVD>
</asx:values>
</asx:abap>
</abapGit>
abstract;
strict ( 2 );
define behavior for ZMM_001_CDS //alias <alias_name>
{
}
\ No newline at end of file
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_BDEF" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<BDEF>
<NAME>ZMM_001_CDS</NAME>
<TYPE>BDEF/BDO</TYPE>
<DESCRIPTION>基本库存</DESCRIPTION>
<DESCRIPTION_TEXT_LIMIT>60</DESCRIPTION_TEXT_LIMIT>
<LANGUAGE>ZH</LANGUAGE>
<LINKS>
<item>
<HREF>./zmm_001_cds/source/main/versions</HREF>
<REL>http://www.sap.com/adt/relations/versions</REL>
<TITLE>Historic versions</TITLE>
</item>
<item>
<HREF>./zmm_001_cds/source/main</HREF>
<REL>http://www.sap.com/adt/relations/source</REL>
<TYPE>text/plain</TYPE>
<TITLE>Source Content</TITLE>
</item>
<item>
<HREF>./zmm_001_cds/source/main</HREF>
<REL>http://www.sap.com/adt/relations/source</REL>
<TYPE>text/html</TYPE>
<TITLE>Source Content (HTML)</TITLE>
</item>
</LINKS>
<MASTER_LANGUAGE>ZH</MASTER_LANGUAGE>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
<SOURCE_URI>./zmm_001_cds/source/main</SOURCE_URI>
<SOURCE_TYPE>ABAP_SOURCE</SOURCE_TYPE>
<SOURCE_FIXED_POINT_ARITHMETIC>true</SOURCE_FIXED_POINT_ARITHMETIC>
<SOURCE_UNICODE_CHECKS_ACTIVE>true</SOURCE_UNICODE_CHECKS_ACTIVE>
</BDEF>
</asx:values>
</asx:abap>
</abapGit>
@EndUserText.label: '基本库存'
define root abstract entity ZMM_001_CDS
{
key matnr : matnr;
key werks : werks_d;
key lgort : abap.char(4);
maktx : abap.char(40);
labst : abap.dec(13,3);
zzljq : abap.dec(13,3);
zkhkc : abap.dec(13,3);
kunnr : abap.char(10);
zwwkc : abap.dec(13,3);
zwwmc : abap.char(20);
meins : meins;
}
//@AccessControl.authorizationCheck: #CHECK
//@EndUserText.label: '基本库存'
//define root view entity ZMM_001_CDS as select from ztmm_001
//{
// key matnr as Matnr,
// key werks as Werks,
// key lgort as Lgort,
// maktx as Maktx,
// labst as Labst,
// zzljq as Zzljq,
// zkhkc as Zkhkc,
// kunnr as Kunnr,
// zwwkc as Zwwkc,
// zwwmc as Zwwmc,
// meins as Meins
//}
{
"BASEINFO":
{
"FROM":
[],
"ASSOCIATED":
[],
"BASE":
[],
"ANNO_REF":
[],
"SCALAR_FUNCTION":
[],
"VERSION":0,
"ANNOREF_EVALUATION_ERROR":""
}
}
\ No newline at end of file
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DDLS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<DDLS>
<DDLNAME>ZMM_001_CDS</DDLNAME>
<DDLANGUAGE>1</DDLANGUAGE>
<DDTEXT>基本库存</DDTEXT>
<SOURCE_TYPE>A</SOURCE_TYPE>
</DDLS>
</asx:values>
</asx:abap>
</abapGit>
CLASS zmm_001_cls DEFINITION
PUBLIC
ABSTRACT FINAL FOR BEHAVIOR OF ZMM_001_CDS.
PUBLIC SECTION.
CLASS-METHODS:
GET
RETURNING
VALUE(RESULT) type ZTMM_001.
PROTECTED SECTION.
PRIVATE SECTION.
* METHODS: read FOR BEHAVIOR IMPORTING roots_to_read FOR READ room RESULT et_room.
ENDCLASS.
CLASS ZMM_001_CLS IMPLEMENTATION.
METHOD get.
DATA: ls_ztmm001 TYPE ztmm_001,
lt_ztmm001 TYPE STANDARD TABLE OF ztmm_001.
SELECT SINGLE Product as matnr, Plant as werks, StorageLocation as lgort
from i_productstoragelocationbasic
into CORRESPONDING FIELDS OF @ls_ztmm001.
* APPEND ls_ztmm001 to result.
result = ls_ztmm001 .
ENDMETHOD.
ENDCLASS.
This diff is collapsed.
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<VSEOCLASS>
<CLSNAME>ZMM_001_CLS</CLSNAME>
<LANGU>1</LANGU>
<DESCRIPT>基本库存</DESCRIPT>
<CATEGORY>06</CATEGORY>
<STATE>1</STATE>
<CLSCCINCL>X</CLSCCINCL>
<FIXPT>X</FIXPT>
<UNICODE>X</UNICODE>
<CLSDEFINT>ZMM_001_CDS</CLSDEFINT>
</VSEOCLASS>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SCO2" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SCO2>
<IBS_ID>ZMM_001_IWSG</IBS_ID>
<IBS_TYPE>IWSG</IBS_TYPE>
<ODATA_SRV_IDENTIFIER>ZMM_001_0001</ODATA_SRV_IDENTIFIER>
<REL_FOR_CUST_CSCN>X</REL_FOR_CUST_CSCN>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
<NAME>ZMM_001_IWSG</NAME>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</SCO2>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SIA6" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SIA6>
<MAIN_OBJECT>
<NAME>ZMM_001_IWSG_IBS</NAME>
<TYPE>SIA6</TYPE>
<RESPONSIBLE>CB9980000012</RESPONSIBLE>
<MASTER_LANGUAGE>EN</MASTER_LANGUAGE>
<MASTER_SYSTEM>Z43</MASTER_SYSTEM>
<PACKAGE_REF>
<PACKAGE_NAME>ZZMM</PACKAGE_NAME>
</PACKAGE_REF>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</MAIN_OBJECT>
<APP_ID>ZMM_001_IWSG_IBS</APP_ID>
<APP_TYPE>IBS</APP_TYPE>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
<SECONDARY_ID>ZMM_001_IWSG</SECONDARY_ID>
<PUBLISH_STATUS>u</PUBLISH_STATUS>
</SIA6>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SIA6" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SIA6>
<MAIN_OBJECT>
<NAME>ZMMR001_EXT</NAME>
<TYPE>SIA6</TYPE>
<DESCRIPTION>库存多维度汇总分析报表</DESCRIPTION>
<RESPONSIBLE>CB9980000012</RESPONSIBLE>
<MASTER_LANGUAGE>ZH</MASTER_LANGUAGE>
<MASTER_SYSTEM>Z43</MASTER_SYSTEM>
<PACKAGE_REF>
<PACKAGE_NAME>ZZMM</PACKAGE_NAME>
</PACKAGE_REF>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</MAIN_OBJECT>
<APP_ID>ZMMR001_EXT</APP_ID>
<APP_TYPE>EXT</APP_TYPE>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
<UI_APP_ID>ZMMR001_UI5R</UI_APP_ID>
<SERVICE>
<item>
<REL_NAME>ZCV_KCBB 0001</REL_NAME>
<REL_TYPE>IWSV</REL_TYPE>
<APP_ID>ZMMR001_EXT</APP_ID>
<SRVC_NAME>B879ECFB5B5A3751E09FAE043CC9EE</SRVC_NAME>
<SRVC_TYPE>HT</SRVC_TYPE>
<UIAD_SRC>ZMMR001_UI5R</UIAD_SRC>
<TYPE_TEXT>OData V2</TYPE_TEXT>
</item>
</SERVICE>
<PUBLISH_STATUS>p</PUBLISH_STATUS>
</SIA6>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_SIA6" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<SIA6>
<MAIN_OBJECT>
<NAME>ZMMR003_EXT</NAME>
<TYPE>SIA6</TYPE>
<DESCRIPTION>库存多维度报表总表</DESCRIPTION>
<RESPONSIBLE>CB9980000012</RESPONSIBLE>
<MASTER_LANGUAGE>ZH</MASTER_LANGUAGE>
<MASTER_SYSTEM>Z43</MASTER_SYSTEM>
<PACKAGE_REF>
<PACKAGE_NAME>ZZMM</PACKAGE_NAME>
</PACKAGE_REF>
<ABAP_LANGU_VERSION>5</ABAP_LANGU_VERSION>
</MAIN_OBJECT>
<APP_ID>ZMMR003_EXT</APP_ID>
<APP_TYPE>EXT</APP_TYPE>
<ABAP_LANGUAGE_VERSION>5</ABAP_LANGUAGE_VERSION>
<UI_APP_ID>ZMMR003_UI5R</UI_APP_ID>
<SERVICE>
<item>
<REL_NAME>ZCV_KCBB_SUM 0001</REL_NAME>
<REL_TYPE>IWSV</REL_TYPE>
<APP_ID>ZMMR003_EXT</APP_ID>
<SRVC_NAME>BAF60115A9DF114474387C5BC94D25</SRVC_NAME>
<SRVC_TYPE>HT</SRVC_TYPE>
<UIAD_SRC>ZMMR003_UI5R</UIAD_SRC>
<TYPE_TEXT>OData V2</TYPE_TEXT>
</item>
</SERVICE>
<PUBLISH_STATUS>p</PUBLISH_STATUS>
</SIA6>
</asx:values>
</asx:abap>
</abapGit>
CLASS ztest001 DEFINITION
PUBLIC
FINAL
CREATE PUBLIC .
PUBLIC SECTION.
INTERFACES if_oo_adt_classrun.
PROTECTED SECTION.
PRIVATE SECTION.
ENDCLASS.
CLASS ZTEST001 IMPLEMENTATION.
METHOD if_oo_adt_classrun~main.
** Create a new PR via EML
* DATA lv_mater TYPE char18 VALUE '10100012'.
** CALL FUNCTION 'CONVERSION_EXIT_MATN1_INPUT'
** EXPORTING
** input = lv_mater
** IMPORTING
** output = lv_mater
** EXCEPTIONS
** length_error = 1
** OTHERS = 2.
* lv_mater = |{ '10100012' ALPHA = IN }|.
* MODIFY ENTITIES OF i_purchaserequisitiontp
* ENTITY purchaserequisition
* CREATE FIELDS ( purchaserequisitiontype )
* WITH VALUE #( ( %cid = 'My%CID_1'
* purchaserequisitiontype = 'NB' ) )
* CREATE BY \_purchaserequisitionitem
* FIELDS ( plant
* purchaserequisitionitemtext
* accountassignmentcategory
* requestedquantity
* baseunit
* purchaserequisitionprice
* purreqnitemcurrency
* material
* materialgroup
* purchasinggroup
* purchasingorganization
** MultipleAcctAssgmtDistribution
* )
* WITH VALUE #(
* ( %cid_ref = 'My%CID_1'
* %target = VALUE #(
* ( %cid = 'My%ItemCID_1'
* plant = '1010'
* purchaserequisitionitemtext = 'created from Nick'
* accountassignmentcategory = ''
* requestedquantity = '10'
* baseunit = 'KG'
* purchaserequisitionprice = '10'
* purreqnitemcurrency = 'CNY'
* material = lv_mater"'000000000010100012'
* materialgroup = 'Z00101'
* purchasinggroup = '001'
* purchasingorganization = '1010'
** MultipleAcctAssgmtDistribution = '1'
* )
* )
* )
* )
* ENTITY purchaserequisitionitem
* CREATE BY \_purchasereqnitemtext
* FIELDS ( plainlongtext )
* WITH VALUE #(
* ( %cid_ref = 'My%ItemCID_1'
* %target = VALUE #(
* (
* %cid = 'My%CCT_1'
* textobjecttype = 'B01'
* language = 'ZH'
* plainlongtext = 'item text created from PAAS API'
* )
* (
* %cid = 'My%CCT_2'
* textobjecttype = 'B02'
* language = 'ZH'
* plainlongtext = 'item2 text created from PAAS API'
* )
* )
* )
* )
* REPORTED DATA(ls_reported)
* MAPPED DATA(ls_mapped)
* FAILED DATA(ls_failed).
*
* COMMIT ENTITIES BEGIN RESPONSE OF i_purchaserequisitiontp FAILED DATA(lt_res_failed)
* REPORTED DATA(lt_res_reported1).
** "Special processing for Late numbering to determine the generated document number.
** LOOP AT ls_mapped-purchaserequisition ASSIGNING FIELD-SYMBOL(<fs_pr_mapped>).
** CONVERT KEY OF i_purchaserequisitiontp FROM <fs_pr_mapped>-%key TO DATA(ls_pr_key).
** <fs_pr_mapped>-purchaserequisition = ls_pr_key-purchaserequisition.
** ENDLOOP.
** LOOP AT ls_mapped-purchaserequisitionitem ASSIGNING FIELD-SYMBOL(<fs_pri_mapped>).
** CONVERT KEY OF I_PurchaseReqnItemTP FROM <fs_pri_mapped>-%key TO DATA(ls_pri_key).
** <fs_pri_mapped>-PurchaseRequisitionItem = ls_pri_key-PurchaseRequisitionItem.
** ENDLOOP.
* COMMIT ENTITIES END.
TYPES: BEGIN OF ty_ms,
vbeln TYPE i_materialdocumentitem_2-SalesOrder,
vbelp TYPE i_materialdocumentitem_2-SalesOrderItem,
erfmg TYPE i_materialdocumentitem_2-QuantityInBaseUnit,
END OF ty_ms.
DATA: lt_mseg TYPE STANDARD TABLE OF ty_ms,
ls_mseg TYPE ty_ms,
lv_mblnr TYPE mblnr.
SELECT SalesOrder AS vbeln,
SalesOrderItem AS vbelp,
SUM( QuantityInEntryUnit ) AS erfmg
FROM i_materialdocumentitem_2
WHERE SalesOrder IS NOT INITIAL
GROUP BY SalesOrder, SalesOrderItem
INTO CORRESPONDING FIELDS OF TABLE @lt_mseg.
SELECT SINGLE
a~product as product
* a~PriceDeterminationControl,
* a~InventoryValuationProcedure,
* a~StandardPrice
FROM I_ProductValuationBasic AS a
* WHERE product = @lv_material
* AND CompanyCode = @lv_plant
INTO @DATA(lv_prd).
LOOP AT lt_mseg INTO ls_mseg.
out->write( ls_mseg-vbeln && '-' && ls_mseg-vbelp && '-' && ls_mseg-erfmg ).
ENDLOOP.
* out->write( ls_pr_key-PurchaseRequisition ).
* out->write( ls_pri_key-PurchaseRequisitionItem ).
ENDMETHOD.
ENDCLASS.
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<VSEOCLASS>
<CLSNAME>ZTEST001</CLSNAME>
<LANGU>1</LANGU>
<DESCRIPT>测试</DESCRIPT>
<STATE>1</STATE>
<CLSCCINCL>X</CLSCCINCL>
<FIXPT>X</FIXPT>
<UNICODE>X</UNICODE>
</VSEOCLASS>
</asx:values>
</asx:abap>
</abapGit>
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_TABL" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<DD02V>
<TABNAME>ZTMM_001</TABNAME>
<DDLANGUAGE>1</DDLANGUAGE>
<TABCLASS>TRANSP</TABCLASS>
<DDTEXT>基本库存</DDTEXT>
<MASTERLANG>1</MASTERLANG>
<CONTFLAG>A</CONTFLAG>
<EXCLASS>1</EXCLASS>
</DD02V>
<DD09L>
<TABNAME>ZTMM_001</TABNAME>
<AS4LOCAL>A</AS4LOCAL>
<TABKAT>0</TABKAT>
<TABART>APPL0</TABART>
<BUFALLOW>N</BUFALLOW>
</DD09L>
<DD03P_TABLE>
<DD03P>
<FIELDNAME>MATNR</FIELDNAME>
<KEYFLAG>X</KEYFLAG>
<ROLLNAME>MATNR</ROLLNAME>
<ADMINFIELD>0</ADMINFIELD>
<NOTNULL>X</NOTNULL>
<SHLPORIGIN>D</SHLPORIGIN>
<COMPTYPE>E</COMPTYPE>
</DD03P>
<DD03P>
<FIELDNAME>WERKS</FIELDNAME>
<KEYFLAG>X</KEYFLAG>
<ROLLNAME>WERKS_D</ROLLNAME>
<ADMINFIELD>0</ADMINFIELD>
<NOTNULL>X</NOTNULL>
<SHLPORIGIN>D</SHLPORIGIN>
<COMPTYPE>E</COMPTYPE>
</DD03P>
<DD03P>
<FIELDNAME>LGORT</FIELDNAME>
<KEYFLAG>X</KEYFLAG>
<ADMINFIELD>0</ADMINFIELD>
<INTTYPE>C</INTTYPE>
<INTLEN>000008</INTLEN>
<NOTNULL>X</NOTNULL>
<DATATYPE>CHAR</DATATYPE>
<LENG>000004</LENG>
<MASK> CHAR</MASK>
</DD03P>
<DD03P>
<FIELDNAME>MAKTX</FIELDNAME>
<ADMINFIELD>0</ADMINFIELD>
<INTTYPE>C</INTTYPE>
<INTLEN>000080</INTLEN>
<DATATYPE>CHAR</DATATYPE>
<LENG>000040</LENG>
<MASK> CHAR</MASK>
</DD03P>
<DD03P>
<FIELDNAME>LABST</FIELDNAME>
<ADMINFIELD>0</ADMINFIELD>
<INTTYPE>P</INTTYPE>
<INTLEN>000007</INTLEN>
<DATATYPE>DEC</DATATYPE>
<LENG>000013</LENG>
<DECIMALS>000003</DECIMALS>
<MASK> DEC</MASK>
</DD03P>
<DD03P>
<FIELDNAME>ZZLJQ</FIELDNAME>
<ADMINFIELD>0</ADMINFIELD>
<INTTYPE>P</INTTYPE>
<INTLEN>000007</INTLEN>
<DATATYPE>DEC</DATATYPE>
<LENG>000013</LENG>
<DECIMALS>000003</DECIMALS>
<MASK> DEC</MASK>
</DD03P>
<DD03P>
<FIELDNAME>ZKHKC</FIELDNAME>
<ADMINFIELD>0</ADMINFIELD>
<INTTYPE>P</INTTYPE>
<INTLEN>000007</INTLEN>
<DATATYPE>DEC</DATATYPE>
<LENG>000013</LENG>
<DECIMALS>000003</DECIMALS>
<MASK> DEC</MASK>
</DD03P>
<DD03P>
<FIELDNAME>KUNNR</FIELDNAME>
<ADMINFIELD>0</ADMINFIELD>
<INTTYPE>C</INTTYPE>
<INTLEN>000020</INTLEN>
<DATATYPE>CHAR</DATATYPE>
<LENG>000010</LENG>
<MASK> CHAR</MASK>
</DD03P>
<DD03P>
<FIELDNAME>ZWWKC</FIELDNAME>
<ADMINFIELD>0</ADMINFIELD>
<INTTYPE>P</INTTYPE>
<INTLEN>000007</INTLEN>
<DATATYPE>DEC</DATATYPE>
<LENG>000013</LENG>
<DECIMALS>000003</DECIMALS>
<MASK> DEC</MASK>
</DD03P>
<DD03P>
<FIELDNAME>ZWWMC</FIELDNAME>
<ADMINFIELD>0</ADMINFIELD>
<INTTYPE>C</INTTYPE>
<INTLEN>000040</INTLEN>
<DATATYPE>CHAR</DATATYPE>
<LENG>000020</LENG>
<MASK> CHAR</MASK>
</DD03P>
<DD03P>
<FIELDNAME>MEINS</FIELDNAME>
<ROLLNAME>MEINS</ROLLNAME>
<ADMINFIELD>0</ADMINFIELD>
<COMPTYPE>E</COMPTYPE>
</DD03P>
</DD03P_TABLE>
<TABL_EXTRAS>
<TDDAT>
<TABNAME>ZTMM_001</TABNAME>
<CCLASS>CUS_DEV_SUP_RO</CCLASS>
</TDDAT>
</TABL_EXTRAS>
</asx:values>
</asx:abap>
</abapGit>
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment