点击此处---> 群内免费提供SAP练习系统(在群公告中)
加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)
嗨,
如何编码使用CMD_EI_API更新客户电话和传真。
请在下面的代码中纠正我,这不起作用。
* 读取客户数据
呼叫方法cmd_ei_api_extract => get_data
* 读入结构以在字段中进行更改
阅读表lstr_customers_in-customers索引1 INTO
lstr_customer_in_ad。
* 标头结构以使用MAINTAIN_BAPI方法更新地址
清除:lstr_customer_in_ad-header。
lstr_header_in_ad-object_instance-kunnr = wa_final_tmp-kunnr。
lstr_header_in ='ad-object U'。
lstr_customer_in_ad-header = lstr_header_in_ad。
*将数据传递到通讯-电话和传真
如果已分配
UNASSIGN
ENDIF。
*
ASSIGN lstr_customer_in_ad-central_data-address TO
********电话******************************* ****************************
如果已分配
* lstr_comm =
阅读表
分配
如果sy-subrc EQ 0和
lstr_remark_t-task ='U'。< br> lstr_remark_t-data-langu =
lstr_remark_t-datax-langu ='X'。
lstr_remark_t-data-langu_iso
=
lstr_remark_t-datax-langu_iso ='X'。
lstr_remark_t-data-comm_type ='TEL'。
lstr_remark_t-datax-comm_type ='X'。
lstr_remark_t-data-consnumber =
lstr_remark_t-datax-consnumber ='X'。
lstr_remark_t-datax-updateflag ='U'。
APPEND lstr_remark_t TO
ENDIF。
******* **传真*********************************************** ************
读取表
分配
IF sy-subrc EQ 0 AND < 已分配fstr_fax_t>。
CLEAR:lstr_remark_t。
lstr_remark_t-task ='U'。
lstr_remark_t-data-langu =
lstr_remark_t-datax-langu = 'X'。
lstr_remark_t-data-langu_iso
=
lstr_remark_t-datax-langu_iso ='X'。
lstr_remark_t-data-comm_type ='FAX '。
lstr_remark_t-datax-comm_type ='X'。
lstr_remark_t-data-consnumber =
lstr_remark_t-datax-consnumber ='X'。
lstr_remark_t-datax-updateflag ='U'。
附加lstr_remark_t到
Endif。
********** **********************************************
清除lstr_masterdata-customers。< br> lstr_customer_in_ad-central_data-address-task ='U'。
附加lstr_customer_in_ad到lstr_masterdata-customers。
呼叫方法cmd_ei_api => maintain_bapi
导出
iv_test_run =空间
iv_collect_messages ='X'
is_master_data = lstr_masterdata
IMPORTING
es_master_data_correct = lstr_master_data_correct
es_message_defective = lstr_message_defective。
如果lstr_master_data_defective是初始的。
调用功能'BAPI_TRANSACTION_COMMIT'
导出
等待= abap_true。
ENDIF。
ENDIF。
谢谢
首先添加一些对提取API返回的错误的检查,否则管理更新的情况,或者如果在LOOP期间未找到任何数据,则插入。
致谢,
Raymond
一周热门 更多>