IDOC练习(二、接收端配置)

配置接收方
第一步WE31创建段(SEGMENT):ZLM_SMT01(field字段跟发送端一致)
IDOC练习(二、接收端配置)

第二步WE30创建IDOC基本类型 :ZLM_IDOC_TYPE1
IDOC练习(二、接收端配置)

IDOC练习(二、接收端配置)

IDOC练习(二、接收端配置)

第三步WE81创建IDOC消息类型 :ZLM_IDOC_MSG1
IDOC练习(二、接收端配置)

第四步WE82关联基本类型和消息类型
IDOC练习(二、接收端配置)

第五步WE37创建接受函数     :ZLM_IDOC_RECIVER01
输入输出参数是固定的,从任意一个接收函数copy下就行
IDOC练习(二、接收端配置)

IDOC练习(二、接收端配置)

IDOC练习(二、接收端配置)

第六步BD51注册函数
IDOC练习(二、接收端配置)

第七步WE57关联函数和基本类型消息类型
IDOC练习(二、接收端配置)

第八步WE42创建inbound press code:ZLM_IDOC_PROCESS1
IDOC练习(二、接收端配置)

IDOC练习(二、接收端配置)

第九步BD54创建逻辑系统     :ZLM_DEV21
IDOC练习(二、接收端配置)

第八步WE20配置发送方信息:
IDOC练习(二、接收端配置)

IDOC练习(二、接收端配置)

到此,接收端配置完成

接收端FM:

FUNCTION ZLM_IDOC_RECIVER01 .
*"----------------------------------------------------------------------
*"*"Local interface:
*"  IMPORTING
*"     VALUE(INPUT_METHOD) LIKE  BDWFAP_PAR-INPUTMETHD OPTIONAL
*"     VALUE(MASS_PROCESSING) LIKE  BDWFAP_PAR-MASS_PROC OPTIONAL
*"  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 OPTIONAL
*"      IDOC_DATA STRUCTURE  EDIDD OPTIONAL
*"      IDOC_STATUS STRUCTURE  BDIDOCSTAT OPTIONAL
*"      RETURN_VARIABLES STRUCTURE  BDWFRETVAR OPTIONAL
*"      SERIALIZATION_INFO STRUCTURE  BDI_SER OPTIONAL
*"----------------------------------------------------------------------

   DATA :
        l_wa_idoc_data    like edidd .
   DATA :
        l_data            LIKE ZLM_SMT01 .                                 "WE31配置的那个机构 
 
   LOOP  AT  IDOC_CONTRL .
     LOOP  AT IDOC_DATA  into l_wa_idoc_data  WHERE docnum  = IDOC_CONTRL -docnum .
        "虽然l_wa_idoc_data-SDATA是没结构的,这样赋值后就成有结构的数据了
       l_data  = l_wa_idoc_data -SDATA .
     ENDLOOP .

   ENDLOOP .


   COMMIT  WORK .
   CLEAR IDOC_STATUS .
  IDOC_STATUS -docnum  = IDOC_CONTRL -docnum .
  IDOC_STATUS -status  =  '53' .
  IDOC_STATUS -msgty   =  'S' .
  IDOC_STATUS -msgid   =  '00' .
  IDOC_STATUS -msgno   =  '398' .
  IDOC_STATUS -msgv1   =  'idoc' .
  IDOC_STATUS -msgv2   =  'successfully processed' .

   APPEND IDOC_STATUS .


ENDFUNCTION .

可以在这里打外部断点,然后在执行发送程序

转载于:https://www.cnblogs.com/senlinmu110/p/3802225.html

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值