SAP S/4HANA使用ABAP获得生产订单的状态

METHOD get_prod_order_status.
DATA: lt_status TYPE TABLE OF j_status,
lt_text   TYPE TABLE OF tj02t,
lv_id     LIKE iv_prod_order_id,
ls_result LIKE LINE OF rt_status_in_s4_format.

lv_id = iv_prod_order_id.

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
input  = lv_id
IMPORTING
output = lv_id.

SELECT stat INTO TABLE lt_status FROM vsaufk WHERE inact = space AND
aufnr = lv_id.

CHECK sy-subrc = 0.

SELECT * INTO TABLE lt_text FROM tj02t FOR ALL ENTRIES IN lt_status
WHERE istat = lt_status-table_line AND spras = 'EN'.


LOOP AT lt_text ASSIGNING FIELD-SYMBOL(<text>).
CLEAR: ls_result.

ls_result-status_id = <text>-istat.
ls_result-status_code = <text>-txt04.
ls_result-status_text = <text>-txt30.
APPEND ls_result TO rt_status_in_s4_format.
ENDLOOP.

ENDMETHOD.