1 PACKAGE RCV_LCM_WEB_SERVICE AUTHID CURRENT_USER AS
2 /* $Header: RCVLCMWS.pls 120.2 2011/12/08 21:03:37 vthevark ship $ */
3
4 PROCEDURE Get_Landed_Cost (p_group_id IN NUMBER,p_processing_mode IN VARCHAR2);
5
6 cursor rti_cur(l_group_id IN NUMBER,l_processing_mode IN VARCHAR2) is
7 SELECT distinct rti.lcm_shipment_line_id line_id
8 FROM rcv_transactions_interface rti,
9 mtl_parameters mp
10 WHERE rti.processing_status_code = 'RUNNING'
11 AND rti.transaction_status_code = 'PENDING'
12 AND rti.processing_mode_code = l_processing_mode
13 AND rti.group_id = nvl(l_group_id, group_id)
14 AND mo_global.check_access(rti.org_id) = 'Y'
15 AND rti.source_document_code = 'PO'
16 AND rti.to_organization_id = mp.organization_id
17 AND rti.lcm_shipment_line_id is not null
18 AND mp.lcm_enabled_flag = 'Y'
19 AND EXISTS ( SELECT 'pll is lcm enabled'
20 FROM po_line_locations_all pll
21 WHERE pll.po_line_id = rti.po_line_id
22 AND pll.po_header_id = rti.po_header_id
23 AND pll.line_location_id = rti.po_line_location_id
24 AND pll.lcm_flag = 'Y');
25
26 TYPE rti_cur_table IS table of rti_cur%rowtype;
27
28 END RCV_LCM_WEB_SERVICE;