Code: Alles auswählen.
REPORT ztest678.
DATA: BEGIN OF return OCCURS 0.
INCLUDE STRUCTURE bapiret2.
DATA: END OF return.
DATA: BEGIN OF et_text_lines OCCURS 0.
INCLUDE STRUCTURE bapi_alm_text_lines.
DATA END OF et_text_lines.
Data lines type bapi_alm_text_lines.
DATA: ES_HEADER type BAPI_ALM_ORDER_HEADER_E.
CALL FUNCTION 'BAPI_ALM_ORDER_GET_DETAIL'
EXPORTING
number = '000000821121'
IMPORTING
ES_HEADER = ES_HEADER
* ES_SRVDATA =
* ES_REFORDER_ITEM =
TABLES
* ET_PARTNER =
* ET_OPERATIONS =
* ET_COMPONENTS =
* ET_RELATIONS =
* ET_SRULES =
* ET_OLIST =
* ET_OPROL =
* ET_TEXTS =
et_text_lines = et_text_lines
* ET_PRTS =
* ET_COSTS_SUM =
* ET_COSTS_DETAILS =
return = return
* EXTENSION_IN =
* EXTENSION_OUT =
* ET_REFORDER_SERNO_OLIST =
* ET_SERVICEOUTLINE =
* ET_SERVICELINES =
* ET_SERVICELIMIT =
* ET_SERVICECONTRACTLIMITS =
* ET_PERMIT =
* ET_PERMIT_ISSUE =
.
LOOP AT et_text_lines INTO lines.
write sy-index.
ENDLOOP.
Code: Alles auswählen.
IF sy-subrc <> 0.
LOOP AT return.
WRITE: return-type, return-message.
ENDLOOP.
ENDIF.