[Home] [Help]
68: INTO l_allocation_basis,
69: l_allocation_uom_code
70: FROM inl_allocation_basis_vl ab,
71: inl_charge_line_types_vl icv,
72: inl_charge_lines icl
73: WHERE ab.allocation_basis_code (+) = icv.allocation_basis
74: AND icv.charge_line_type_id (+) = icl.charge_line_type_id
75: AND icl.charge_line_id = p_from_parent_table_id;
76:
231: p_procedure_name => l_proc_name,
232: p_debug_info => l_debug_info
233: );
234:
235: SELECT inl_charge_lines_s.NEXTVAL
236: INTO l_charge_line_id
237: FROM dual;
238:
239: l_debug_info := 'Get the Charge Line Number';
244: );
245:
246: SELECT NVL(MAX(icl.charge_line_num),0) + 1
247: INTO l_charge_line_num
248: FROM inl_charge_lines icl,
249: inl_associations ias
250: WHERE ias.from_parent_table_name = 'INL_CHARGE_LINES'
251: AND ias.from_parent_table_id = icl.charge_line_id
252: AND ias.ship_header_id = p_ship_header_id;
246: SELECT NVL(MAX(icl.charge_line_num),0) + 1
247: INTO l_charge_line_num
248: FROM inl_charge_lines icl,
249: inl_associations ias
250: WHERE ias.from_parent_table_name = 'INL_CHARGE_LINES'
251: AND ias.from_parent_table_id = icl.charge_line_id
252: AND ias.ship_header_id = p_ship_header_id;
253:
254: l_debug_info := 'Insert into INL Charge Line table.';
255: INL_LOGGING_PVT.Log_Statement (p_module_name => g_module_name,
256: p_procedure_name => l_proc_name,
257: p_debug_info => l_debug_info);
258:
259: INSERT INTO inl_charge_lines(
260: charge_line_id,
261: charge_line_num,
262: charge_line_type_id,
263: landed_cost_flag,
348: );
349:
350: Insert_Association(
351: p_ship_header_id => p_ship_header_id,
352: p_from_parent_table_name => 'INL_CHARGE_LINES', -- from_parent_table_name
353: p_from_parent_table_id => l_charge_line_id, -- from_parent_table_id
354: p_to_parent_table_name => p_to_parent_table_name,
355: p_to_parent_table_id => p_to_parent_table_id,
356: x_return_status => l_return_status
2270: cl.poa_party_id,
2271: cl.poa_party_site_id,
2272: cl.poo_organization_id,
2273: cl.poo_location_id
2274: FROM inl_charge_lines cl,
2275: inl_ship_lines_all sl,
2276: inl_allocations a
2277: WHERE cl.charge_line_id = a.from_parent_table_id
2278: AND sl.ship_line_id = a.ship_line_id
2275: inl_ship_lines_all sl,
2276: inl_allocations a
2277: WHERE cl.charge_line_id = a.from_parent_table_id
2278: AND sl.ship_line_id = a.ship_line_id
2279: AND from_parent_table_name = 'INL_CHARGE_LINES'
2280: AND a.ship_line_id = p_simul_ship_line_id;
2281:
2282: TYPE charge_ln_list_type IS TABLE OF c_charge_ln%ROWTYPE;
2283: charge_ln_list charge_ln_list_type;
2585:
2586: SELECT COUNT(*)
2587: INTO l_count_dual_assoc
2588: FROM inl_associations ias,
2589: inl_charge_lines icl
2590: WHERE ias.from_parent_table_id = icl.charge_line_id
2591: AND ias.from_parent_table_name = 'INL_CHARGE_LINES'
2592: AND ias.ship_header_id = p_ship_header_id
2593: AND EXISTS (SELECT 1
2587: INTO l_count_dual_assoc
2588: FROM inl_associations ias,
2589: inl_charge_lines icl
2590: WHERE ias.from_parent_table_id = icl.charge_line_id
2591: AND ias.from_parent_table_name = 'INL_CHARGE_LINES'
2592: AND ias.ship_header_id = p_ship_header_id
2593: AND EXISTS (SELECT 1
2594: FROM inl_associations ia2
2595: WHERE ia2.from_parent_table_name = 'INL_CHARGE_LINES'
2591: AND ias.from_parent_table_name = 'INL_CHARGE_LINES'
2592: AND ias.ship_header_id = p_ship_header_id
2593: AND EXISTS (SELECT 1
2594: FROM inl_associations ia2
2595: WHERE ia2.from_parent_table_name = 'INL_CHARGE_LINES'
2596: AND ia2.from_parent_table_id = ias.from_parent_table_id
2597: AND ia2.ship_header_id <> p_ship_header_id);
2598: IF NVL(l_count_dual_assoc,0) > 0 THEN
2599: INL_LOGGING_PVT.Log_Variable (
2620: p_procedure_name => l_api_name,
2621: p_debug_info => l_debug_info);
2622: /* --Bug#9660056
2623: DELETE
2624: FROM inl_charge_lines icl
2625: WHERE icl.charge_line_id
2626: IN (SELECT ias.from_parent_table_id
2627: FROM inl_associations ias
2628: WHERE ias.from_parent_table_name = 'INL_CHARGE_LINES'
2624: FROM inl_charge_lines icl
2625: WHERE icl.charge_line_id
2626: IN (SELECT ias.from_parent_table_id
2627: FROM inl_associations ias
2628: WHERE ias.from_parent_table_name = 'INL_CHARGE_LINES'
2629: AND ias.ship_header_id = p_ship_header_id);
2630: */
2631: --Bug#9660056
2632: DELETE
2629: AND ias.ship_header_id = p_ship_header_id);
2630: */
2631: --Bug#9660056
2632: DELETE
2633: FROM inl_charge_lines icl
2634: WHERE
2635: EXISTS ( SELECT 1
2636: FROM inl_associations ias
2637: WHERE ias.from_parent_table_name = 'INL_CHARGE_LINES'
2633: FROM inl_charge_lines icl
2634: WHERE
2635: EXISTS ( SELECT 1
2636: FROM inl_associations ias
2637: WHERE ias.from_parent_table_name = 'INL_CHARGE_LINES'
2638: AND ias.ship_header_id = p_ship_header_id
2639: AND ias.from_parent_table_id = icl.charge_line_id );
2640: --Bug#9660056
2641:
2646: p_debug_info => l_debug_info);
2647:
2648: DELETE
2649: FROM inl_associations ias
2650: WHERE ias.from_parent_table_name = 'INL_CHARGE_LINES'
2651: AND ias.ship_header_id = p_ship_header_id;
2652:
2653: l_debug_info := 'Deleted '|| SQL%ROWCOUNT||' ASSOCIATION LINES.';
2654: INL_LOGGING_PVT.Log_Statement (
2879: RAISE L_FND_EXC_ERROR;
2880: -- Otherwise charges were generated and now we can process them
2881: ELSE
2882: -- Iterate through all generated Charges to insert
2883: -- into INL Charge Lines and INL Associations table
2884: FOR j IN 1 .. l_charge_ln_tbl.COUNT LOOP
2885: l_debug_info := 'Call Insert_ChargeLines(...)';
2886: INL_LOGGING_PVT.Log_Statement (p_module_name => g_module_name,
2887: p_procedure_name => l_api_name,