[Home] [Help]
1917:
1918: CURSOR c_iface_line_info(p_resale_line_int_id IN NUMBER) IS
1919: SELECT inventory_item_id,org_id, supplier_item_cost,
1920: nvl(supplier_item_uom,uom_code), currency_code
1921: FROM ozf_resale_lines_int_all
1922: WHERE resale_line_int_id = p_resale_line_int_id;
1923:
1924: CURSOR c_iface_batch_info(p_resale_line_int_id IN NUMBER) IS
1925: SELECT orb.direct_order_flag
1922: WHERE resale_line_int_id = p_resale_line_int_id;
1923:
1924: CURSOR c_iface_batch_info(p_resale_line_int_id IN NUMBER) IS
1925: SELECT orb.direct_order_flag
1926: FROM ozf_resale_lines_int_all orli, ozf_resale_batches_all orb
1927: WHERE orli.resale_line_int_id = p_resale_line_int_id
1928: AND orb.resale_batch_id = orli.resale_batch_id;
1929:
1930: CURSOR c_resale_batch_info(p_resale_line_id IN NUMBER) IS
1969: If not provided during batch upload then get using costing API and store in this column.
1970:
1971: 2.2) If both are diff then get using costing API and store in column Supplier Item Cost.
1972:
1973: 3) If its is iface store in ozf_resale_lines_int_all, if its resale store in ozf_resale_lines_all.
1974:
1975: 4) If exception happens or costing API doesn't return anything then store -1 in respective columns.
1976: */
1977:
2027:
2028: /*If the pricing call is made for a IFACE order through conc. prog
2029: Third Party Accrual from Interface Table, then this code will be executed. */
2030:
2031: l_qry_str := 'UPDATE ozf_resale_lines_int_all SET supplier_item_cost = :1 WHERE resale_line_int_id = :2 AND supplier_item_cost IS NULL';
2032:
2033: --derive interface order information like organization_id, item_id, uom etc.
2034:
2035: OPEN c_iface_line_info(p_line_id);