在生產訂單中,通過訂單號獲取訂單狀態:
select aufnr istat txt04
into corresponding fields of table gt_stat
from aufk as a inner join jest as j
on a~objnr = j~objnr
inner join tj02t as t
on j~stat = t~istat
where aufnr = p_aufnr
and spras = '1'.
根據訂單號獲取訂單序列號:
select single sernr into temp_sernr
from ser05 as s inner join objk as o
on s~obknr = o~obknr
where ppaufnr = p_aufnr.
獲取訂單狀態的函數:
DATA:
LV_OBJNR TYPE AUFK-OBJNR,
LV_LINE TYPE BSVX-STTXT.
LV_OBJNR = 'OR008180010059'.
CALL FUNCTION 'STATUS_TEXT_EDIT'
EXPORTING
OBJNR = LV_OBJNR
SPRAS = SY-LANGU
IMPORTING
LINE = LV_LINE
EXCEPTIONS
OBJECT_NOT_FOUND = 1
OTHERS = 2.