idoc两台机器的数据传输配置以及完整操作截图.docx
- 文档编号:71150
- 上传时间:2023-04-28
- 格式:DOCX
- 页数:15
- 大小:593.68KB
idoc两台机器的数据传输配置以及完整操作截图.docx
《idoc两台机器的数据传输配置以及完整操作截图.docx》由会员分享,可在线阅读,更多相关《idoc两台机器的数据传输配置以及完整操作截图.docx(15页珍藏版)》请在冰点文库上搜索。
idoc两台机器的数据传输配置以及完整操作截图
1.创建记录发送时间的表:
2.定义自定义段:
WE31
3.定义基本类型WE30
将段挂在基本类型下:
4.定义消息类型we81
5.基本类型分配给消息类型:
6.定义自定义结构zmkpf_line.(即数据库表mkpf的前五个字段)
7.表结构,ZMKpf_TYP,对应行类型结构为ZMKpf_LINE
8.创建发送idoc的函数:
FUNCTION ZMKPF_IDOC_SEND .
*"----------------------------------------------------------------------
*"*"Local interface:
*" TABLES
*" ZMKPF TYPE ZMKPF_TYP
*" EXCEPTIONS
*" NO_IDOC
*" NO_MODEL
*"----------------------------------------------------------------------
*variables of general interest
DATA:
*control record for the IDoc
idoc_control LIKE edidc,
*data records for the IDoc
t_idoc_data LIKE edidd OCCURS 0 WITH HEADER LINE,
*table for the IDocs created by MASTER_IDOC_CONTROL
t_comm_control LIKE edidc OCCURS 0 WITH HEADER LINE,
*partner type for logical system
c_partner_type_logical_system LIKE edidc-rcvprt,
*help variable for the check if an IDoc has to be created
h_create_idoc.
* variables specific for this example
DATA:
* field strings with IDoc segment structure
e1xmkal TYPE ZMKPF_line,
* data to be put to the control record
c_message_type LIKE edidc-mestyp VALUE 'ZMKPF_IDOC',
c_base_idoc_type LIKE edidc-idoctp VALUE 'ZMKPF_IDOC',
* segment types to be put to the data record table
c_header_segtyp LIKE edidd-segnam VALUE 'ZMKPF'.
* check if an IDoc has to be created, read the distribution model
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.
* put the application header record to the IDoc
LOOP AT zmkpf.
MOVE-CORRESPONDING zmkpf TO e1xmkal.
* append record to IDoc data table
t_idoc_data-segnam = c_header_segtyp.
t_idoc_data-sdata = e1xmkal.
APPEND t_idoc_data.
ENDLOOP.
idoc_control-mestyp = c_message_type.
idoc_control-idoctp = c_base_idoc_type.
CALL FUNCTION 'MASTER_IDOC_DISTRIBUTE'
* in update task "if application document is posted in update task
EXPORTING
master_idoc_control = idoc_control
TABLES
communication_idoc_control = t_comm_control
master_idoc_data = t_idoc_data
EXCEPTIONS
error_in_idoc_control = 1
error_writing_idoc_status = 2
error_in_idoc_data = 3
sending_logical_system_unknown = 4
OTHERS = 5.
* A commit work has to be done. It could also be done in the calling
* application.
COMMIT WORK.
READ TABLE t_comm_control INDEX 1.
IF sy-subrc <> 0.
raise no_idoc.
* no IDoc was created, you can react here, if neccessary
ENDIF.
ENDFUNCTION.
函数截图:
11.定义逻辑系统:
分配到集团:
12.定义目标系统:
13连接与权限测试:
14配置分布模型:
生成伙伴参数文件:
更改伙伴参数文件:
新建端口we21
新建出站参数:
执行函数ZMKPF_IDOC_SEND:
发送数据:
查看结果we02
消息的状态监视:
bd87
点击处理按钮:
端口xml文件:
(发送了三次,xml文件有点大)
xmlversion="1.0"encoding="UTF-8"?
>
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- idoc 机器 数据传输 配置 以及 完整 操作 截图