自定义IDOC
目录
1需求场景
可以通过配置IDOC,在相同系统不同客户端之间传输数据,也可以在不同SAP系统中传输数据。
2配置发送端IDOC
2.1定义段(WE31)
1.定义段类型,包含需要传输的字段
2.创建成功后设置批准
2.2定义基本类型(WE30)
1.创建开发对象
2.将段维护到基本类型
2.3定义消息类型(WE81)
1. 定义消息类型
2.WE82把基本类型分配给消息类型
2.4定义传输结构
1.定义一个表类型
2.定义行类型
2.5创建RFC目标(SM59)
1. 创建RFC目标连接
2输入目标系统账户名密码
2.6创建接收端端口(WE21)
2.7配置发送端逻辑系统(SALE)
1. 定义逻辑系统
2.8分配逻辑系统
1. 将逻辑系统分配到集团
在发送端不需要分配300逻辑系统到集团,但是300逻辑系统需要在接收端配置时分配
输入城市、逻辑系统、货币保存
2.9维护分布模型和视图
创建模型视图
双击检查该维护系统是否正确
添加消息类型
点击生成合作伙伴参数文件
生成成功
点击更改参数文件
2.10发送端程序
1. 创建一个接口,用于程序调用,发送IDOC数据到目标系统
2.源代码
FUNCTION zmakt_idoc_send. *"----------------------------------------------------------------------
*"*"本地接口:
*" TABLES
*" ZTMAKT TYPE ZTMAKT OPTIONAL
*" EXCEPTIONS
*" NO_IDOC
*" NO_MODEL
*"----------------------------------------------------------------------
*常规变量
DATA:
*IDoc的控制记录
idoc_control LIKE edidc,
*IDoc的数据记录
t_idoc_data LIKE edidd OCCURS WITH HEADER LINE,
*MASTER_IDOC_CONTROL创建的IDoc的表
t_comm_control LIKE edidc OCCURS WITH HEADER LINE,
*逻辑系统的伙伴类型
c_partner_type_logical_system LIKE edidc-rcvprt,
*帮助变量检查是否必须创建IDoc
h_create_idoc.
* 特定的变量
DATA:
* IDoc段结构
zsmakt TYPE zsmakt,
* 要输入控制记录的数据
c_message_type LIKE edidc-mestyp VALUE 'ZMAKTMAS',
c_base_idoc_type LIKE edidc-idoctp VALUE 'ZMAKT_TYPE',
* 段类型
c_header_segtyp LIKE edidd-segnam VALUE 'ZMAKT'. CLEAR:zsmakt.
zsmakt-matnr = ''.
zsmakt-maktx = '测试物料描述'.
APPEND zsmakt TO ztmakt. * 检查这个IDOC是否被创建,读取组件
CALL FUNCTION 'ALE_MODEL_DETERMINE_IF_TO_SEND'
EXPORTING
message_type = c_message_type
* SENDING_SYSTEM = ' '
* RECEIVING_SYSTEM = ' '
* VALIDDATE = SY-DATUM
IMPORTING
idoc_must_be_sent = h_create_idoc.
* exceptions
* own_system_not_defined = 1
* others = 2.
IF h_create_idoc IS INITIAL.
RAISE no_model.
* no message flow maintained in the model, nothing to do
EXIT.
ENDIF.
* 将表头放入IDOC
LOOP AT ztmakt.
MOVE-CORRESPONDING ztmakt TO zsmakt.
* 将记录添加到IDOC数据表
t_idoc_data-segnam = c_header_segtyp.
t_idoc_data-sdata = zsmakt.
APPEND t_idoc_data.
ENDLOOP.
idoc_control-mestyp = c_message_type.
idoc_control-idoctp = c_base_idoc_type.
CALL FUNCTION 'MASTER_IDOC_DISTRIBUTE'
* 在更新任务中"如果应用程序文档在更新任务中发布
EXPORTING
master_idoc_control = idoc_control
TABLES
communication_idoc_control = t_comm_control
master_idoc_data = t_idoc_data
EXCEPTIONS
error_in_idoc_control =
error_writing_idoc_status =
error_in_idoc_data =
sending_logical_system_unknown =
OTHERS = .
COMMIT WORK.
READ TABLE t_comm_control INDEX .
IF sy-subrc <> .
RAISE no_idoc.
* no IDoc was created, you can react here, if neccessary
ENDIF.
ENDFUNCTION.
3配置接收端IDOC
以上配置都是在200系统(源系统)中配置,以下配置都是在300系统(目标系统)中配置
该文档记录的是在同一服务器的不通客户端传输数据,又由于段类型、基本类型、消息类型都是跨Client的,所以2.1 、2.2 、2.3不需要在300系统再次配置了(但如果不是在同一服务器上,则需要像上面那样进行配置)
3.1创建接收端RFC目标(SM59)
与发送端一致,可参考上边操作,关联上发送端的目标地址和实例号
3.2创建接收端的端口(WE21)
参照2.6
3.3定义逻辑系统并分配集团(SALE)
参照2.7 、2.8
3.4创建接收端程序
这个函数的参数接口是有规范的,可以从IDOC_INPUT_BBP_IV这些标准函数拷贝参数接口部分
源代码部分:
FUNCTION ZIDOC_PO_PROCESS.
*"----------------------------------------------------------------------
*"*"本地接口:
*" IMPORTING
*" VALUE(INPUT_METHOD) LIKE BDWFAP_PAR-INPUTMETHD
*" VALUE(MASS_PROCESSING) LIKE BDWFAP_PAR-MASS_PROC
*" EXPORTING
*" VALUE(WORKFLOW_RESULT) LIKE BDWF_PARAM-RESULT
*" VALUE(APPLICATION_VARIABLE) LIKE BDWF_PARAM-APPL_VAR
*" VALUE(IN_UPDATE_TASK) LIKE BDWFAP_PAR-UPDATETASK
*" VALUE(CALL_TRANSACTION_DONE) LIKE BDWFAP_PAR-CALLTRANS
*" TABLES
*" IDOC_CONTRL STRUCTURE EDIDC
*" IDOC_DATA STRUCTURE EDIDD
*" IDOC_STATUS STRUCTURE BDIDOCSTAT
*" RETURN_VARIABLES STRUCTURE BDWFRETVAR
*" SERIALIZATION_INFO STRUCTURE BDI_SER
*" EXCEPTIONS
*" WRONG_FUNCTION_CALLED
*" OTHERS
*"----------------------------------------------------------------------
DATA: zsmakt TYPE zsmakt. CLEAR idoc_contrl.
READ TABLE idoc_contrl INDEX .
IF idoc_contrl-mestyp <> 'ZMAKTMAS'.
RAISE wrong_function_called.
ENDIF.
LOOP AT idoc_contrl.
LOOP AT idoc_data WHERE docnum = idoc_contrl-docnum.
"直接将字符赋值给结构,贬值过程中会按照结构中的字段长度来划分各字段
zsmakt = idoc_data-sdata.
WRITE: / 'Head',zsmakt. "此处直接把收到的数据打印出来
ENDLOOP.
"根据数据处理情况设置当前IDoc处理的状态
IF = .
CLEAR idoc_status.
idoc_status-docnum = idoc_contrl-docnum."当前正处理的IDoc
idoc_status-status = ''. "IDOC处理成功
APPEND idoc_status.
ELSE.
CLEAR idoc_status.
idoc_status-docnum = idoc_contrl-docnum.
idoc_status-status = ''. "IDOC不成功
idoc_status-msgty = 'E'. "错误信息
idoc_status-msgid = 'YMSG'.
idoc_status-msgno = ''.
APPEND idoc_status.
ENDIF.
ENDLOOP.
ENDFUNCTION.
3.5注册入站处理函数(BD51)
3.6将入站函数与基本类型/消息类型关联(WE57)
3.7创建进站处理代码(WE42)
3.8创建发送端合作伙伴配置文件(WE20)
1. 创建合作伙伴类型,添加进站消息类型
双击消息类型
4测试IDOC
1.运行程序,调用发送端接口,执行成功之后,运行事务代码BD87查看结果。如果未黄灯,可以点击处理,再次执行。
2.在接收程序里面打上断点,处理接收的IDOC,发现进入断点,数据也传输过去了
自定义IDOC的更多相关文章
- IDoc
声明:原创作品,转载时请注明文章来自SAP师太技术博客( 博/客/园www.cnblogs.com):www.cnblogs.com/jiangzhengjun,并以超链接形式标明文章原始出处,否则将 ...
- [SAP ABAP开发技术总结]IDoc
声明:原创作品,转载时请注明文章来自SAP师太技术博客( 博/客/园www.cnblogs.com):www.cnblogs.com/jiangzhengjun,并以超链接形式标明文章原始出处,否则将 ...
- ABAP开发顾问必备:SAP ABAP开发技术总结
声明:原创作品,转载时请注明文章来自SAP师太技术博客( 博/客/园www.cnblogs.com):www.cnblogs.com/jiangzhengjun,并以超链接形式标明文章原始出处,否则将 ...
- ABAP-IDOC配置
转载路径: http://www.cnblogs.com/jiangzhengjun/p/4292135.html#_Toc411677431 https://wenku.baidu.com/view ...
- ABAP开发顾问必备:SAP ABAP开发技术总结[转载]
转载自SAP师太技术博客,原文链接:http://www.cnblogs.com/jiangzhengjun/p/4260224.html 在原文上增加了链接,此文及此文的链接版权都归SAP师太所有. ...
- UI与开发的必备神器!— iDoc一键适配不同平台尺寸(iDoc201902-2新功能)
一.自动换算不同平台尺寸在一个项目从设计到开发的过程中,为了适配不同设备,一份设计稿,UI需要花大量的时间去制作各种尺寸的切图,耗时耗力. 那有没有一种高效的办法,让UI只需要设计一份设计稿就可以了呢 ...
- 摹客 iDoc 12月上半月新功能点评
转眼就到了2018年的最后一个月,小伙伴们是不是都在奋力拼搏做年底的冲刺呢?摹客也没有放慢脚步,不断地优化,给大家带来一个又一个的惊喜.那么,让小摹来带大家看看12月摹客iDoc更新了哪些特色功能: ...
- java 文档自动生成的神器 idoc
写文档 作为一名开发者,每个人都要写代码. 工作中,几乎每一位开发者都要写文档. 因为工作是人和人的协作,产品要写需求文档,开发要写详细设计文档,接口文档. 可是,作为一个懒人,平时最讨厌的一件事情就 ...
- 关于Unity3D自定义编辑器的学习
被人物编辑器折腾了一个月,最终还是交了点成品上去(还要很多优化都还么做). 刚接手这项工作时觉得没概念,没想法,不知道.后来就去看<<Unity5.X从入门到精通>>中有关于 ...
随机推荐
- 原创zookeeper3.4.6集群安装
tar -zxvf zookeeper-3.4.6.tar.gz -C /home/hadoop/ vi ~/.bash_profile export ZOOKEEPER_HOME=/home/had ...
- C语言二维数组超细讲解
用一维数组处理二维表格,实际是可行的,但是会很复杂,特别是遇到二维表格的输入.处理和输出. 在你绞尽脑汁的时候,二维数组(一维数组的大哥)像电视剧里救美的英雄一样显现在你的面前,初识数组的朋友们还等什 ...
- CoreDNS解析异常记录
CoreDNS解析异常记录 异常情况:集群是用kubespray部署的4个worknode,coredns默认部署2个deployment.今天发现部署了coredns的node上的pod正常解析内部 ...
- Goldeneye 靶机过关记录
注:因记录时间不同,记录中1.111和1.105均为靶机地址. 1信息收集 1.1得到目标,相关界面如下: 1.2简单信息收集 wappalyzer插件显示: web服务器:Apache 2.4.7 ...
- Spring5:事务管理【整合Mybatis】
Spring 整合Mybatis 1:导入依赖 <dependencies> <!--测试依赖--> <dependency> <groupId>jun ...
- Java类的使用
在一个Java文件中写两个类:一个基本的类,一个测试类.注意:文件名称和测试类名称一致. 如何使用呢?创建对象使用.如何创建对象呢?格式:类名 对象名 = new 类名(); Student s = ...
- socket小计
socket,是一个实现了双向通信的链接. 将http比喻为轿车,承载数据.传递数据,那么socket,就是轿车的发动机,它轿车动起来.
- SourceTree for Windows跳过登录解决方法
来源:https://blog.csdn.net/t_332741160/article/details/79611303 SourceTree 是一个强大的git管理客户端,但是在使用最新版需要登录 ...
- thinkphp if便签的使用
<foreach name="list" item='v'> <tr> <td><img class="user" s ...
- ansible的语法的基础应用(二)