1.首先是用到的变量。
et_extension2 TYPE crmt_extension2_wrkt,
es_extension2 TYPE crmt_extension2_wrk,
lt_data TYPE REF TO data,
ls_data TYPE LINE OF 增强表类型,
FIELD-SYMBOLS <fs> TYPE 增强表类型 .
2.其次调用函数
CALL FUNCTION 'CRM_ORDER_READ'
EXPORTING
it_header_guid = it_guid
iv_no_auth_check = 'X'
IMPORTING
et_extension2 = et_extension2
EXCEPTIONS
document_not_found = 1
error_occurred = 2
document_locked = 3
no_change_authority = 4
no_display_authority = 5
no_change_allowed = 6
OTHERS = 7.
IF sy-subrc <> 0.
RETURN.
ENDIF.
增强表类型不知道的,debug下这个et_extension2这个结果集,看参考类型定义一样就行。
3.最后就是读取。
READ TABLE et_extension2 INTO es_extension2 WITH KEY object = ‘增强表的对象id 可以在debug中查询'.
IF sy-subrc = 0.
lt_data = es_extension2-data.
ASSIGN lt_data->* TO <fs>.
ENDIF.
READ TABLE <fs> INTO ls_data INDEX 1.“单行,多行用loop
IF sy-subrc = 0 .
***逻辑流
ENDIF.