How to get price list line id for service contract line(subline)

Question

Does some one know how to find a price list line id for service contracts line (sub line)?
There is actually a column in table okc_k_lines_b which is called price_list_line_id, but it looks like it is never used (all columns values are NULL). I have tried to investigate reprice API's which are used in contracts authoring form, but they are too huge and it didn't lead to nay result. There is a way (bad hack), by calling OKS_QP_INT_PVT.COMPUTE_PRICE it is possible to get price list line id by which contract line is priced, it would be kina fine if I would need to find line id for some rows, but it wont work for thousands!
Is there some proper way how could I get price list line id by which is service contract line priced?

Answer 1

Hi,
Check out the following query that gets the price_list_id on subline_level and more.
The price_list_Id is stored as a rule.
SELECT
chd.contract_number
, par.party_number
, par.party_name
, ldf.pas_nummer
, ldf.pas_houder     
, rh.object1_id1 hdr_price_list_id
, rsl.object1_id1 sl_hdr_price_list_id
, pld.parkeerterrein
, msi.segment1
, sit.description
FROM
okc_k_headers_b chd
, okc_k_lines_b clt
, okc_k_lines_b cls
, okc_k_lines_b_dfv ldf
, okc_k_items cit
, okc_rule_groups_b rgh
, okc_rules_b rh
, okc_rule_groups_b rgt
, okc_rules_b rtl
, okc_line_styles_b lst
, okc_rule_groups_b rgs
, okc_rules_b rsl
, okc_line_styles_b lss
, qp_list_headers_b plh
, qp_list_lines pll
, qp_list_lines_dfv pld
, qp_pricing_attributes pat
, mtl_system_items_b msi
, mtl_system_items_tl sit
, hz_cust_accounts cac
, hz_parties par
WHERE
rgh.chr_id = chd.id
AND rh.rgp_id = rgh.id
AND rh.jtot_object1_code = 'OKX_PRICE'
AND cac.cust_account_id = rtl.object1_id1
AND par.party_id = cac.party_id
AND clt.chr_id = chd.id
AND clt.lse_id = lst.id
AND lst.lty_code = 'SERVICE'
AND rgt.cle_id = clt.id
AND rtl.rgp_id = rgt.id
AND rtl.jtot_object1_code = 'OKX_CUSTACCT'
AND cls.cle_id = clt.id
AND cit.cle_id = cls.cle_id
AND cit.jtot_object1_code = 'OKX_SERVICE'
AND cls.lse_id = lss.id
AND lss.lty_code = 'COVER_ITEM'
AND cls.id = rgs.cle_id
AND rgs.id = rsl.rgp_id
AND rsl.jtot_object1_code = 'OKX_PRICE'
AND plh.list_header_id = rsl.object1_id1
AND plh.list_header_id = pll.list_header_id
AND pll.rowid = pld.row_id
AND pat.list_header_id = pll.list_header_id
AND pat.list_line_id = pll.list_line_id
AND cit.object1_id1 = pat.product_attr_value
AND cit.object1_id2 = chd.authoring_org_id
AND msi.inventory_item_id = cit.object1_id1
AND msi.organization_id = cit.object1_id2
AND sit.inventory_item_id = msi.inventory_item_id
AND sit.organization_id = msi.organization_id
AND sit.language = userenv('LANG')
AND cls.rowid = ldf.row_id
Hth,
Martin
Edited by: mvdons on 4-sep-2008 2:13