首页 > 其他 > 详细

【ABAP系列】SAP 获取工单和工序的状态

时间:2019-07-13 18:00:28      阅读:157      评论:0      收藏:0      [点我收藏+]
公众号:SAP Technical
本文作者:matinal
 

技术分享图片

 

前言部分

大家可以关注我的公众号,公众号里的排版更好,阅读更舒适。

正文部分

ABAP 获取订单状态的两个函数 STATUS_TEXT_EDIT 和 STATUS_READ 的简单介绍

?
CONCATENATE  OR  TWK1-AUFNR  INTO  Z_OBJNR.

DATA:objnr TYPE aufk-objnr.

objnr = OR000000100014.
DATA:t_status TYPE TABLE OF jstat WITH HEADER LINE.
"结果存放在STATUS表中
CALL FUNCTION STATUS_READ
  EXPORTING
    client           = sy-mandt
    objnr            = OR000001100154
  TABLES
    status           = t_status
  EXCEPTIONS
    object_not_found = 1
    OTHERS           = 2.
IF sy-subrc <> 0.
  MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
LOOP AT t_status.
  IF t_status-STAT = I0002 AND t_status-INACT = X.
    WRITE:已删除.
    EXIT.
  ENDIF.
ENDLOOP.

DATA:line TYPE bsvx-sttxt.
  CALL FUNCTION STATUS_TEXT_EDIT
     EXPORTING
       FLG_USER_STAT    = X
       OBJNR            = OR000001100154
       ONLY_ACTIVE      = X
       SPRAS            = SY-LANGU
     IMPORTING
       LINE             = line
     EXCEPTIONS
       OBJECT_NOT_FOUND = 01
       OTHERS           = 02.
 WRITE:line.
  SEARCH line FOR CLSD.
IF sy-subrc = 0.
  WRITE:订单已关闭.
ENDIF.

?

在SAP中对于如何获取订单的状态,提供了至少两个函数(我自己知道的),分别是 STATUS_READ 和   STATUS_TEXT_EDIT。下面简单介绍这两个函数 
1.STATUS_READ  改函数的实现原理大概是通过订单的对象好(OR+订单号)到JEST中取出字段STAT INACT.
JEST表中STAT是一串从字面看不出意思的字符,可以根据STAT到表TJ02T中找到具体的描述。

下面是具体用法:

?
DATA:objnr TYPE aufk-objnr.

objnr = OR000000100014.
DATA:t_status TYPE TABLE OF jstat WITH HEADER LINE.
"结果存放在STATUS表中
CALL FUNCTION STATUS_READ
  EXPORTING
    client           = sy-mandt
    objnr            = objnr
  TABLES
    status           = t_status
  EXCEPTIONS
    object_not_found = 1
    OTHERS           = 2.
IF sy-subrc <> 0.
  MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
LOOP AT t_status.
  IF t_status = I0046.
    WRITE:订单已关闭.
    EXIT.
  ENDIF.
ENDLOOP.

?

2.STATUS_TEXT_EDIT 改函数读取的结果是将订单状态拼接到一个字符串中,而且这个字符串是在前台订单上看到的状态,比较直接,这样做的结果就可能由于状态较多导致长度过长,在某些情况下取的数据可能不准。
下面是一段代码:

?
DATA:line TYPE bsvx-sttxt.
CALL FUNCTION STATUS_TEXT_EDIT
  EXPORTING
    client = sy-mandt
    objnr  = objnr
    spras  = sy-langu
  IMPORTING
    line   = line
  EXCEPTIONS
    object_not_found        = 1
    OTHERS  .      "
IF sy-subrc <> 0.
  MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.

SEARCH line FOR CLSD.
IF sy-subrc = 0.
  WRITE:订单已关闭.
ENDIF.

?

下面介绍获取工序状态的方法:

 

状态一般都在JEST这表里面,到AFVC表里面找到对象号 再找TJ02表就可以了!

【ABAP系列】SAP 获取工单和工序的状态

原文:https://www.cnblogs.com/SAPmatinal/p/11181523.html

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!