Chinaunix首页 | 论坛 | 博客
  • 博客访问: 710190
  • 博文数量: 145
  • 博客积分: 3446
  • 博客等级: 中校
  • 技术积分: 1567
  • 用 户 组: 普通用户
  • 注册时间: 2006-08-30 13:58
文章分类

全部博文(145)

文章存档

2021年(1)

2020年(1)

2019年(1)

2018年(6)

2017年(1)

2016年(10)

2015年(12)

2014年(10)

2013年(15)

2012年(33)

2011年(21)

2010年(9)

2009年(18)

2008年(2)

2006年(5)

我的朋友

分类: 系统运维

2012-04-28 17:24:14

问题:     CALL FUNCTION 'MASTER_IDOC_DISTRIBUTE'  发送IDoc时 ,
 
T-code:WE05 中查询,发现IDoc状态为30,等待发送,  必须执行 T-code:WE14 ,才可以正常发送。
 
查询 T-code:SM12 得知,是因为 IDoc表为解锁。
 
解决方法  
 
CALL FUNCTION 'MASTER_IDOC_DISTRIBUTE'

  IF sy-subrc = 0.

    CALL FUNCTION 'DB_COMMIT'.
    CALL FUNCTION 'DEQUEUE_ALL'.
    COMMIT WORK AND WAIT.

    CALL FUNCTION 'EDI_DOCUMENT_DEQUEUE_LATER'
      EXPORTING
        docnum                 = ls_edidc-docnum
      EXCEPTIONS
        idoc_is_not_to_dequeue = 1
        OTHERS                 2.

  ENDIF .
阅读(5411) | 评论(2) | 转发(1) |
给主人留下些什么吧!~~

BOTVINNIK2015-06-26 15:02:24

BOTVINNIK:EDI_DOCUMENT_DEQUEUE_LATER 这个方法有可能无效,可以直接用WE14里面的方式。
FORM EDI_OUTPUT_NEW USING DOCNUM TYPE EDI_DOCNUM.
  DATA: BEGIN OF INT_EDIDC OCCURS 0,
          OUTMOD_SORT LIKE EDIDC-OUTMOD,
          RCVPOR_SORT LIKE EDIDC-RCVPOR.
          INCLUDE STRUCTURE EDIDC.
  DATA: END OF INT_EDIDC,
  

IF INT_EDIDC[] IS NOT INITIAL.
    LOOP AT INT_EDIDC.
      INT_EDIDC-OUTMOD_SORT = INT_EDIDC-OUTMOD.
      INT_EDIDC-RCVPOR_SORT = INT_EDIDC-RCVPOR.
      MODIFY INT_EDIDC.
      CLEAR COM_EDIDC.
      MOVE INT_EDIDC+11 TO COM_EDIDC.
      APPEND COM_EDIDC.
   &nb

回复 | 举报

BOTVINNIK2015-06-26 15:02:04

EDI_DOCUMENT_DEQUEUE_LATER 这个方法有可能无效,可以直接用WE14里面的方式。
FORM EDI_OUTPUT_NEW USING DOCNUM TYPE EDI_DOCNUM.
  DATA: BEGIN OF INT_EDIDC OCCURS 0,
          OUTMOD_SORT LIKE EDIDC-OUTMOD,
          RCVPOR_SORT LIKE EDIDC-RCVPOR.
          INCLUDE STRUCTURE EDIDC.
  DATA: END OF INT_EDIDC,