利用IDOC迁移采购订单.docxVIP

需求将320 系统里面的采购订单迁移到220 系统里面来.方法很多:可以通过写程序将数据download 到本地,然后将数据上传到220 系统用LSMWALE /IDOC现在用第三种方法首先用BD64 配置MODEL VIEW , 在各自的系统里面generate partner profile在220 系统里面有如下的partner prfile这里的inbound process code 是关键, 因为我的理解是标准的SAP 是一个系统建立采购订单后, 另外的系统里面根据这个采购订单来建立一个销售订单,所以在message type orders 下面是没有对应的process code 来创建采购订单的.用T-CODE WE64 ,可以查看message type 下面对应INBOUND, OUTBOUND PROCESS CODE,没有找到合适的,所以自己创建Inbound process code 注意: 在关联inbound process code 和function module 之前,要用T-CODE BD51 将这个函数添加进去,如下图然后在Function module 里面创建采购订单代码如下:FUNCTION?zidoc_input_po.*----------------------------------------------------------------------**Global?Interface:*??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*?????VALUE(EBELN)?LIKE??EKKO-EBELN*??TABLES*??????IDOC_CONTRL?STRUCTURE??EDIDC*??????IDOC_DATA?STRUCTURE??EDIDD*??????IDOC_STATUS?STRUCTURE??BDIDOCSTAT*??????RETURN_VARIABLES?STRUCTURE??BDWFRETVAR*??????SERIALIZATION_INFO?STRUCTURE??BDI_SER*??EXCEPTIONS*??????WF_ERROR_PROCESS*----------------------------------------------------------------------?DATA:poheader?LIKE?bapimepoheader,?exppurchaseorder?LIKEbapimepoheader-po_number,?expheader?LIKEbapimepoheader,?exppoexpimpheader?LIKEbapieikp,?return??TYPE?STANDARD?TABLE?OFbapiret2?WITH?HEADER?LINE,?poitem??TYPE?STANDARD?TABLE?OFbapimepoitem?WITH?HEADER?LINE,?poschedule??TYPE?STANDARD?TABLE?OFbapimeposchedule?WITH?HEADER?LINE,?w_return?LIKE?LINE?OF?return,?poheaderx?LIKEbapimepoheaderx,?poitemx?TYPE?STANDARD?TABLE?OFbapimepoitemx?WITH?HEADER?LINE,?poschedulex?TYPE?STANDARD?TABLE?OFbapimeposchedulx?WITH?HEADER?LINE,?potextheader?TYPE?STANDARD?TABLE?OF?bapimepotextheader?WITH?HEADER?LINE.?DATA:?l_segnum?TYPE?edi_number.?DATA:?lw_idoc_data?TYPE?edidd.?