使用代码创建SAP CRM服务请求文档的subject测试数据
要求所有创建的Service Request的测试数据必须都维护好Subject:
如何用CRM_ORDER_MAINTAIN维护这个field?
First have a look at how SERVICE_OS is filled by CRM_ORDER_MAINTAIN when choosing one value from drop down list:
I have to figure out where this two REF_GUID come from so that I can do the same thing in my code.
Answer for first guid: CL_CRM_CATEGORY_RUN_BTIL~GET_OSSET_GUID
Answer for second guid:
Test code:
REPORT zcreate_subject.
DATA: lt_input_fields TYPE crmt_input_field_tab,ls_input_field LIKE LINE OF lt_input_fields,ls_field_name LIKE LINE OF ls_input_field-field_names,lv_guid TYPE guid_16,lt_orderadm_h_com TYPE crmt_orderadm_h_comt,ls_orderadm_h_com LIKE LINE OF lt_orderadm_h_com,ls_com_structure TYPE string,lv_selection_needed TYPE crmt_boolean,lt_save TYPE crmt_object_guid_tab,lt_saved TYPE crmt_return_objects,lt_service_os TYPE crmt_srv_osset_comt,ls_service_os TYPE LINE OF crmt_srv_osset_comt,lt_osset TYPE crmt_srv_osset_comt1,ls_osset TYPE LINE OF crmt_srv_osset_comt1,ls_read_oss TYPE crmt_srv_osset_wrk,ls_saved LIKE LINE OF lt_saved,lt_subject TYPE crmt_srv_subject_comt,ls_subject TYPE LINE OF crmt_srv_subject_comt.START-OF-SELECTION.CALL FUNCTION 'GUID_CREATE'IMPORTINGev_guid_16 = lv_guid.PERFORM call_order_maintain.PERFORM call_order_save.FORM prepare_service_os.ls_service_os = VALUE #( ref_guid = lv_guid ref_kind = 'A' ).ls_osset-profile_type = 'A'.CALL FUNCTION 'CRM_GUID_CREATE'IMPORTINGev_guid = ls_osset-ref_guid.CALL FUNCTION 'CRM_GUID_CREATE'IMPORTINGev_guid = ls_subject-ref_guid.ls_subject-asp_id = 'YBP_SERVICE'.ls_subject-katalog_type = 'D'.ls_subject-cat_id = 'CA_7'.ls_subject-mode = 'A'.APPEND ls_subject TO ls_osset-subject.APPEND ls_osset TO lt_osset.APPEND LINES OF lt_osset TO ls_service_os-osset.APPEND ls_service_os TO lt_service_os.CLEAR: ls_input_field.ls_input_field-ref_guid = lv_guid.ls_input_field-ref_kind = 'A'.ls_input_field-objectname = 'SERVICE_OS'.ls_field_name-fieldname = 'ASP_ID'.APPEND ls_field_name TO ls_input_field-field_names.ls_field_name-fieldname = 'CAT_ID'.APPEND ls_field_name TO ls_input_field-field_names.ls_field_name-fieldname = 'CODE'.APPEND ls_field_name TO ls_input_field-field_names.ls_field_name-fieldname = 'CODEGRUPPE'.APPEND ls_field_name TO ls_input_field-field_names.ls_field_name-fieldname = 'KATALOGART'.APPEND ls_field_name TO ls_input_field-field_names.ls_field_name-fieldname = 'MODE'.APPEND ls_field_name TO ls_input_field-field_names.ls_field_name-fieldname = 'REF_GUID'.APPEND ls_field_name TO ls_input_field-field_names.APPEND ls_input_field TO lt_input_fields.ENDFORM.FORM call_order_maintain.CLEAR: ls_orderadm_h_com, ls_input_field, lt_input_fields.ls_orderadm_h_com-guid = lv_guid.ls_orderadm_h_com-description = 'created by code on:' && sy-timlo.ls_orderadm_h_com-process_type = 'SRVR'.ls_orderadm_h_com-mode = 'A'.APPEND ls_orderadm_h_com TO lt_orderadm_h_com.ls_input_field-ref_guid = lv_guid.ls_input_field-ref_kind = 'A'.ls_input_field-objectname = 'ORDERADM_H'.ls_field_name-fieldname = 'DESCRIPTION'.APPEND ls_field_name TO ls_input_field-field_names.ls_field_name-fieldname = 'MODE'.APPEND ls_field_name TO ls_input_field-field_names.ls_field_name-fieldname = 'PROCESS_TYPE'.APPEND ls_field_name TO ls_input_field-field_names.APPEND ls_input_field TO lt_input_fields.PERFORM prepare_service_os.CALL FUNCTION 'CRM_ORDER_MAINTAIN'EXPORTINGit_service_os = lt_service_osCHANGINGct_orderadm_h = lt_orderadm_h_comct_input_fields = lt_input_fieldsEXCEPTIONSOTHERS = 99.IF sy-subrc = 0.WRITE:/ 'Order maintain function is done successfully.'.ENDIF.
ENDFORM.FORM call_order_save.INSERT lv_guid INTO TABLE lt_save.CALL FUNCTION 'CRM_ORDER_SAVE'EXPORTINGit_objects_to_save = lt_saveiv_update_task_local = abap_trueiv_no_bdoc_send = abap_trueIMPORTINGet_saved_objects = lt_savedEXCEPTIONSdocument_not_saved = 1.IF sy-subrc <> 0.WRITE: / 'Service Request created failed'.ELSE.READ TABLE lt_saved INTO ls_saved INDEX 1.WRITE: / 'Service Request created successfully, id: ' , ls_saved-object_id.ENDIF.COMMIT WORK AND WAIT.
ENDFORM.
要获取更多Jerry的原创文章,请关注公众号"汪子熙":
使用代码创建SAP CRM服务请求文档的subject测试数据相关推荐
- SAP ABAP 查找更改文档对象(SCDO)和表关系的在线字典1/2(全)
SAP ABAP 查找更改文档对象(SCDO)和表关系的在线字典1/2(全) 简介: 一个 SAP 更改文档对象(SCDO:SAP Change Document Object )由一组更改表和更改设 ...
- SAP ABAP 查找更改文档对象(SCDO)和表关系的在线字典2/2(全)
SAP ABAP 查找更改文档对象(SCDO)和表关系的在线字典2/2(全) 简介: 一个 SAP 更改文档对象(SCDO:SAP Change Document Object )由一组更改表和更改设 ...
- SAP HANA中文技术文档(跟matinal学HANA)
SAP HANA中文技术文档(跟matinal学HANA) 1. 点击进入:SAP XS HANA专栏 2. 点击进入:SAP UI5上传图片 用XSJS存储在HANA中的方法 3. 点击进入: ...
- SAP CV02N 审批一个文档
SAP CV02N 审批一个文档 在质量通知单里,我们有一个ZN1 type 的附件文档10000000000002284. 根据系统设置,该文档需要经过审批.在SAP系统上审批一个附件文档,需要使用 ...
- 【itext学习之路】--1.创建一个简单的pdf文档
来源:https://blog.csdn.net/tomatocc/article/details/80666011 iText是著名的开放源码的站点sourceforge一个项目,是用于生成PDF文 ...
- SQLServer报表服务研究文档
SQLServer报表服务研究文档. Ø 研究目的 研究CRM4.0中的报表与sqlserver2005中的报表的集成,如何将CRM中已经制作好的报表导出后在SQLSERVER2005中进行修改后再导 ...
- java 生成一个空文件系统_如何使用java创建一个空白的PPT文档?
在Java编程中,如何创建一个空的PPT文档? 注意:需要访问网址: , 下载一个Apache POI软件包.这里下载最新版本:poi-bin-3.17-20170915.tar.gz解压并全部导入 ...
- 谷歌pay服务端文档_米大师服务端说明
1.后台接口说明 1.支付后台接口API 1.1 API 1.1.1 查询余额接口 (1)URL地址 [现网]https:// ysdk.qq.com/mpay/get_balance_m [沙箱]h ...
- ElasticSearch教程——创建索引、类型、文档
ElasticSearch汇总请查看:ElasticSearch教程--汇总篇 介绍 索引是ElasticSearch存放数据的地方,可以理解为关系型数据库中的一个数据库.事实上,我们的数据被存储和索 ...
最新文章
- 基因 ID 匹配利器
- 《C语言程序设计:问题与求解方法》——3.8节不同类型数据之间的类型转换
- vue使用sweetalert2弹窗插件
- openstack vlan配置_为OpenStack和K8s集群提供无缝虚拟网络
- 一家企业为何使用多家公司的防火墙
- 第三次学JAVA再学不好就吃翔(part43)--局部内部类访问局部变量
- 源码包安装mysql5.7.25_centos源码安装mysql5.7.25-boost
- GlideDemo【Glide3.7.0版本的简单使用以及圆角功能】
- 让jquery构造出类
- iOS使用Instruments的工具
- JavaScript里的数组转化新方法Array.From
- 推荐linux视频下载地址分享
- 《企业IT架构转型之道》读书笔记
- java生存pdf资料
- java创建exchange邮箱_创建Exchange邮箱用户
- 判断文本框输入中文超过10个英文数字超过20个
- python#函数,
- 一步控制台编译java_在控制台运行一个 Java 程序 Test . class ,使用的命令正确的是( )_学小易找答案...
- 考试 倒计时 php,PHP实现考试倒计时功能代码
- 一叶知秋:“安全“的野指针、 static函数、成员函数、this 指针、gcc编译器、name mangling...
热门文章
- 我的WCF之旅(1):创建一个简单的WCF程序
- 网银安全恐慌“后遗症”凸显 肉鸡检测器下载量近百万
- 站长手记20100920部署更新
- Expression Blend实例中文教程(4) - 布局控件快速入门Canvas
- 方立勋_30天掌握JavaWeb_国际化开发
- Android中使用的数据单位
- 大型高性能网站的十项规则
- 第四篇 Python循环
- pywinauto二次封装(pywinnat.py)
- 针对sqoop1.99.6 从jdbc向hdfs中抽取数据的几点感想