DATA : ls_selopt TYPE /bobf/s_frw_query_selparam,
lt_selopt TYPE /bobf/t_frw_query_selparam.
--- set Invoice date coming from selection to Query selection
lt_selopt = VALUE #( FOR ls_date IN gt_freight_inv_date
( attribute_name = /scmtms/if_suppfreightinvreq_c=>sc_node_attribute-root-inv_dt
option = ls_date-option
sign = ls_date-sign
low = ls_date-low
high = ls_date-high )
).
*--- set Lifecycle = 04 ((accruals posted)
APPEND VALUE /bobf/s_frw_query_selparam( attribute_name = /scmtms/if_suppfreightinvreq_c=>sc_query_attribute-root-query_by_elements-lifecycle
sign = /bobf/if_conf_c=>sc_sign_option_including
option = /bobf/if_conf_c=>sc_sign_equal
low = gc_lifecycle_accrualsposted ) TO lt_selopt.
*-- Create service manager
DATA(lo_srv_mgr_tor) = /bobf/cl_tra_serv_mgr_factory=>get_service_manager
( iv_bo_key = /scmtms/if_suppfreightinvreq_c=>sc_bo_key ).
*-- Execute the query
data LT_FSD_HEADER_DATA
TYPE /SCMTMS/T_SFIR_ROOT_K.
lo_srv_mgr_tor->query(
EXPORTING
iv_query_key = /scmtms/if_suppfreightinvreq_c=>sc_query-root-query_by_elements " Query
it_selection_parameters = lt_selopt "Query Selection Parameters
iv_fill_data = abap_true "Data element for domain BOOLE: TRUE (='X') and FALSE (=' ')
IMPORTING
et_data = lt_fsd_header_data "FSD data is here
et_key = DATA(lt_tor_item_key)
eo_message = DATA(lo_message)
).
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
User | Count |
---|---|
2 | |
1 | |
1 | |
1 | |
1 | |
1 | |
1 | |
1 | |
1 | |
1 |