1) define IDOC structure segment type (WE31) Z1MARC1
2) DEFINE IDOC TYPE EXTENSION (WE30) ZMATMAST
3) Maintain table EDIMSG (SM30)
4) DEFINE LOGICEAL SYSTEM (SALE).
5) port configuration (WE21)
6) PARTNER PROFILE CONFIGURATION (WE20)
7) distribution Model and data filter configuraton (BD64).
8) complete program ZXMGVU03 (CMOD)
9) Send material IDOC to ftp (BD10).
tables: t001, t001k.
data: waers like t001-waers.
if message_type = 'MATMAS'.
idoc_cimtype = 'ZMATMAST'.
if segment_name = 'E1MARCM'.
select single t001~waers into waers
from t001k
inner join t001 on t001~bukrs = t001k~bukrs
where t001k~bwkey = f_marc-werks.
idoc_data-segnam = 'Z1MARC1'.
idoc_data-sdata = waers.
append idoc_data.
endif.
endif.
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/23553902/viewspace-674236/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/23553902/viewspace-674236/