[Home] [Help]
641: -- Get Inventory Organization. It will be used when getting Item info.
642: --
643: SELECT organization_id
644: INTO l_inv_org_id
645: FROM inl_ship_headers
646: WHERE ship_header_id = p_ship_header_id;
647:
648: l_total_amt := 0;
649:
704: LOOP
705: FETCH assoc INTO rec_assoc;
706: EXIT WHEN assoc%NOTFOUND;
707:
708: IF rec_assoc.to_parent_table_name = 'INL_SHIP_HEADERS' THEN
709: SELECT SUM(DECODE(l_allocation_basis,'VALUE',NVL(NVL(ol.primary_qty,0)*NVL(ol.fc_primary_unit_price,0),0),
710: Converted_Qty (l_inv_org_id,
711: ol.inventory_item_id,
712: NVL(ol.primary_qty,0),
797: ol.primary_uom_code,
798: p_allocation_uom_code))) + l_total_amt
799: INTO l_total_amt
800: FROM inl_adj_ship_lines_v ol
801: WHERE ol.ship_header_id = DECODE(p_from_component_name,'INL_SHIP_HEADERS',p_from_component_id,ol.ship_header_id)
802: --- bug 7654293
803: AND ol.ship_line_group_id = DECODE(p_from_component_name,'INL_SHIP_LINE_GROUPS',p_from_component_id,ol.ship_line_group_id)
804: AND ol.ship_line_id = DECODE(p_from_component_name,'INL_SHIP_LINES',p_from_component_id,ol.ship_line_id)
805: AND ol.ship_header_id = p_ship_header_id;
809: p_var_name => l_debug_info,
810: p_var_value => TO_CHAR(l_total_amt));
811:
812: END IF;
813: IF p_to_component_name = 'INL_SHIP_HEADERS' THEN
814: SELECT SUM(DECODE(l_allocation_basis,'VALUE',NVL(NVL(ol.primary_qty,0)*NVL(ol.fc_primary_unit_price,0),0),
815: Converted_Qty (l_inv_org_id,
816: ol.inventory_item_id,
817: NVL(ol.primary_qty,0),
1539: WHERE ol.ship_header_id = p_ship_header_id
1540: AND ol.ship_line_id = DECODE(p_to_component_name, 'INL_SHIP_LINES', p_to_component_id, -1)
1541: UNION
1542: SELECT 2 SEQ_NUM,
1543: 'INL_SHIP_HEADERS' COMPONENT_NAME,
1544: ol.ship_header_id COMPONENT_ID
1545: FROM inl_adj_ship_lines_v ol
1546: WHERE ol.ship_header_id = p_ship_header_id
1547: AND ol.ship_line_id = DECODE(p_to_component_name, 'INL_SHIP_LINES', p_to_component_id, -1)
1949: FROM inl_adj_associations_v
1950: WHERE ship_header_id = p_ship_header_id
1951: AND ((p_calc_scope_code = 3 AND from_parent_table_name = 'INL_TAX_LINES') OR
1952: (p_calc_scope_code = 2 AND from_parent_table_name = 'INL_CHARGE_LINES') OR
1953: (p_calc_scope_code = 1 AND from_parent_table_name IN ('INL_SHIP_HEADERS','INL_SHIP_LINES')) OR
1954: p_calc_scope_code = 0)
1955: ORDER BY association_id;
1956: rec_assoc assoc%ROWTYPE;
1957:
2086: --
2087:
2088: SELECT adjustment_num
2089: INTO l_adjustment_num
2090: FROM inl_ship_headers
2091: WHERE ship_header_id = p_ship_header_id;
2092:
2093: --
2094: -- For not adjusted shipments, check for Associations in Loop
2141: WHERE ship_header_id = p_ship_header_id
2142: AND adjustment_num = l_adjustment_num
2143: AND ((p_calc_scope_code = 3 AND from_parent_table_name = 'INL_TAX_LINES') OR
2144: (p_calc_scope_code = 2 AND from_parent_table_name = 'INL_CHARGE_LINES') OR
2145: (p_calc_scope_code = 1 AND from_parent_table_name IN ('INL_SHIP_HEADERS',
2146: 'INL_SHIP_LINES',
2147: 'INL_SHIP_DISTS')) OR
2148: p_calc_scope_code = 0);
2149:
2160: SELECT DISTINCT gl.currency_code
2161: INTO l_le_currency_code
2162: FROM gl_ledgers gl,
2163: xle_fp_ou_ledger_v l,
2164: inl_ship_headers oh
2165: WHERE gl.ledger_id = l.ledger_id
2166: AND l.legal_entity_id = oh.legal_entity_id
2167: AND oh.ship_header_id = p_ship_header_id;
2168:
2235: SELECT NVL(SUM(nrec_tax_amt),0)
2236: INTO l_from_amount
2237: FROM INL_tax_lines
2238: WHERE tax_line_id = rec_assoc.from_parent_table_id;
2239: ELSIF rec_assoc.from_parent_table_name = 'INL_SHIP_HEADERS' THEN
2240: SELECT SUM(NVL(primary_qty,0)*NVL(fc_primary_unit_price,0))
2241: INTO l_from_amount
2242: FROM inl_adj_ship_lines_v
2243: WHERE ship_header_id = rec_assoc.from_parent_table_id;
2351:
2352: SELECT COUNT(*) + l_count
2353: INTO l_count
2354: FROM INL_adj_associations_v
2355: WHERE from_parent_table_name = 'INL_SHIP_HEADERS'
2356: AND from_parent_table_id = rec_dist.ship_header_id;
2357:
2358: SELECT DECODE(l_count,0,'Y','N') INTO l_lc_flag FROM DUAL;
2359: