REPORT order_display_has_ref_obj.
SELECT * INTO TABLE @DATA(lt_refobj) FROM crmd_srv_refobj WHERE type_object = 'A'. " product
CHECK sy-subrc = 0.
SELECT * INTO TABLE @DATA(lt_osset) FROM crmd_srv_osset FOR ALL ENTRIES IN @lt_refobj
WHERE guid = @lt_refobj-guid_ref.
CHECK sy-subrc = 0.
SELECT * INTO TABLE @DATA(lt_link) FROM crmd_link FOR ALL ENTRIES IN @lt_osset
WHERE guid_set = @lt_osset-guid_set.
CHECK sy-subrc = 0.
SELECT * INTO TABLE @DATA(lt_order) FROM crmd_orderadm_h FOR ALL ENTRIES IN @lt_link
WHERE guid = @lt_link-guid_hi.
LOOP AT lt_order ASSIGNING FIELD-SYMBOL(<order>).
WRITE:/ |Order ID: { <order>-object_id }, type: { <order>-process_type }, Description: { <order>-description }| COLOR COL_GROUP.
ENDLOOP.
SELECT * INTO TABLE @DATA(lt_item) FROM crmd_orderadm_i FOR ALL ENTRIES IN @lt_link
WHERE guid = @lt_link-guid_hi.
CLEAR: lt_order.
SELECT * INTO TABLE lt_order FROM crmd_orderadm_h FOR ALL ENTRIES IN lt_item
WHERE guid = lt_item-header.
LOOP AT lt_item ASSIGNING FIELD-SYMBOL(<item>).
READ TABLE lt_order ASSIGNING <order> WITH KEY guid = <item>-header.
ASSERT sy-subrc = 0.
WRITE:/ |Item: { <item>-description }, Order id: { <order>-object_id } | COLOR COL_NEGATIVE.
ENDLOOP.
REPORT ORDER_DISPLAY_REFERENCE_PROD.
PARAMETERS: id TYPE crmd_orderadm_h-object_id OBLIGATORY DEFAULT '8000002271',
ptype TYPE crmd_orderadm_h-process_type OBLIGATORY DEFAULT 'SRVO'.
SELECT SINGLE guid INTO @DATA(guid) FROM crmd_orderadm_h WHERE object_id = @id
AND process_type = @ptype.
IF sy-subrc <> 0.
WRITE:/ |document not found for id: { id }| COLOR COL_NEGATIVE.
RETURN.
ENDIF.
SELECT SINGLE guid_set INTO @DATA(setguid) FROM crmd_link
WHERE guid_hi = @guid AND objtype_set = '29'.
CHECK sy-subrc = 0.
SELECT * INTO TABLE @DATA(lt_osset) FROM crmd_srv_osset
WHERE guid_set = @setguid.
CHECK sy-subrc = 0.
SELECT * INTO TABLE @DATA(lt_refobj) FROM crmd_srv_refobj FOR ALL ENTRIES IN @lt_osset
WHERE guid_ref = @lt_osset-guid.
LOOP AT lt_refobj ASSIGNING FIELD-SYMBOL(<obj>).
cl_crm_1order_set_print_tool=>print_structure( <obj> ).
ENDLOOP.
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
User | Count |
---|---|
3 | |
3 | |
3 | |
2 | |
2 | |
1 | |
1 | |
1 | |
1 | |
1 |