通過bapi獲取設備狀態BAPI_EQUI_GETSTATUS

DATA:
  IT_SYSTEM_STATUS TYPE STANDARD TABLE OF BAPI_ITOB_STATUS, "TABLES PARAM
  WA_SYSTEM_STATUS LIKE LINE OF IT_SYSTEM_STATUS,
  IT_USER_STATUS   TYPE STANDARD TABLE OF BAPI_ITOB_STATUS, "TABLES PARAM
  WA_USER_STATUS   LIKE LINE OF IT_USER_STATUS.
"DATA(LD_EQUIPMENT) = '10000007736'.
DATA:  GS_EQUIPMENT  LIKE  BAPI_ITOB_PARMS-EQUIPMENT.

GS_EQUIPMENT ='10000007736'.
CALL FUNCTION 'BAPI_EQUI_GETSTATUS'
  EXPORTING
    " EQUIPMENT     = '10000007736'  設備賬號
    EQUIPMENT     = GS_EQUIPMENT
*   language      = ld_language
*   language_iso  = ld_language_iso
  TABLES
    SYSTEM_STATUS = IT_SYSTEM_STATUS
    USER_STATUS   = IT_USER_STATUS
  .  "  BAPI_EQUI_GETSTATUS

READ TABLE  IT_USER_STATUS INTO DATA(GS_USER_STATUS) INDEX 1.
IF  SY-SUBRC = 0.
  WRITE: GS_USER_STATUS-DESCRIPTION.
ENDIF.