[Home] [Help]
PACKAGE: APPS.INL_INTEGRATION_GRP
Source
1 PACKAGE INL_INTEGRATION_GRP AS
2 /* $Header: INLGITGS.pls 120.0.12010000.20 2008/12/17 11:25:08 ksivasa noship $ */
3
4 g_module_name VARCHAR2(100) := 'INL_INTEGRATION_GRP';
5 g_pkg_name CONSTANT VARCHAR2(30) := 'INL_INTEGRATION_GRP';
6
7 TYPE lci_rec IS RECORD (
8 shipment_header_id NUMBER,
9 transaction_type VARCHAR2(25),
10 processing_status_code VARCHAR2(25),
11 interface_source_code VARCHAR2(25),
12 hdr_interface_source_table VARCHAR2(30),
13 hdr_interface_source_line_id NUMBER,
14 validation_flag VARCHAR2(1),
15 receipt_num VARCHAR2(500),
16 ship_date DATE,
17 ship_type_id NUMBER,
18 ship_type_code VARCHAR2(15),
19 legal_entity_id NUMBER,
20 legal_entity_name VARCHAR2(50),
21 organization_id NUMBER,
22 organization_code VARCHAR2(3),
23 location_id NUMBER,
24 location_code VARCHAR2(60),
25 org_id NUMBER,
26 taxation_country VARCHAR2(30),
27 document_sub_type VARCHAR2(150),
28 ship_header_id NUMBER,
29 last_task_code VARCHAR2(25),
30 ship_line_group_reference VARCHAR2(30),
31 party_id NUMBER,
32 party_number VARCHAR2(30),
33 party_site_id NUMBER,
34 party_site_number VARCHAR2(30),
35 source_organization_id NUMBER,
36 source_organization_code VARCHAR2(3),
37 ship_line_num NUMBER,
38 ship_line_type_id NUMBER,
39 ship_line_type_code VARCHAR2(15),
40 ship_line_src_type_code VARCHAR2(30),
41 ship_line_source_id NUMBER,
42 currency_code VARCHAR2(15),
43 currency_conversion_type VARCHAR2(30),
44 currency_conversion_date DATE,
45 currency_conversion_rate NUMBER,
46 inventory_item_id NUMBER,
47 txn_qty NUMBER,
48 txn_uom_code VARCHAR2(3),
49 txn_unit_price NUMBER,
50 primary_qty NUMBER,
51 primary_uom_code VARCHAR2(3),
52 primary_unit_price NUMBER,
53 secondary_qty NUMBER,
54 secondary_uom_code VARCHAR2(3),
55 secondary_unit_price NUMBER,
56 landed_cost_flag VARCHAR2(1),
57 allocation_enabled_flag VARCHAR2(1),
58 trx_business_category VARCHAR2(240),
59 intended_use VARCHAR2(30),
60 product_fiscal_class VARCHAR2(240),
61 product_category VARCHAR2(240),
62 product_type VARCHAR2(240),
63 user_def_fiscal_class VARCHAR2(240),
64 tax_classification_code VARCHAR2(30),
65 assessable_value NUMBER,
66 ship_from_party_id NUMBER,
67 ship_from_party_number VARCHAR2(30),
68 ship_from_party_site_id NUMBER,
69 ship_from_party_site_number VARCHAR2(30),
70 ship_to_organization_id NUMBER,
71 ship_to_organization_code VARCHAR2(3),
72 ship_to_location_id NUMBER,
73 ship_to_location_code VARCHAR2(60),
74 bill_from_party_id NUMBER,
75 bill_from_party_number VARCHAR2(30),
76 bill_from_party_site_id NUMBER,
77 bill_from_party_site_number VARCHAR2(30),
78 bill_to_organization_id NUMBER,
79 bill_to_organization_code VARCHAR2(3),
80 bill_to_location_id NUMBER,
81 bill_to_location_code VARCHAR2(60),
82 poa_party_id NUMBER,
83 poa_party_number VARCHAR2(30),
84 poa_party_site_id NUMBER,
85 poa_party_site_number VARCHAR2(30),
86 poo_organization_id NUMBER,
87 poo_to_organization_code VARCHAR2(3),
88 poo_location_id NUMBER,
89 poo_location_code VARCHAR2(60),
90 ship_line_id NUMBER,
91 line_interface_source_table VARCHAR2(30),
92 line_interface_source_line_id NUMBER,
93 header_interface_id NUMBER
94 );
95
96 TYPE lci_table IS TABLE OF lci_rec INDEX BY BINARY_INTEGER;
97
98 CURSOR c_ship_lines(l_ship_header_id IN NUMBER,
99 l_src_type_code IN VARCHAR2,
100 l_interface_source_table IN VARCHAR2) IS
101 SELECT sl.ship_line_id,
102 sl.ship_line_source_id,
103 sl.inventory_item_id,
104 sl.txn_qty,
105 sl.txn_uom_code,
106 sl.primary_qty,
107 sl.primary_uom_code,
108 sl.currency_code,
109 sl.currency_conversion_type,
110 sl.currency_conversion_date,
111 sl.currency_conversion_rate,
112 slg.party_id,
113 slg.party_site_id,
114 slg.src_type_code,
115 slg.ship_line_group_id,
116 sh.organization_id,
117 sh.location_id,
118 sh.org_id,
119 msi.description AS item_description,
120 msi.segment1 AS item,
121 sh.interface_source_code,
122 sl.interface_source_table,
123 sl.interface_source_line_id,
124 lc.unit_landed_cost
125 FROM inl_ship_lines sl,
126 inl_ship_line_groups slg,
127 inl_ship_headers sh,
128 inl_shipln_landed_costs_v lc,
129 mtl_system_items msi
130 WHERE msi.inventory_item_id = sl.inventory_item_id
131 AND msi.organization_id = sh.organization_id
132 AND sl.ship_header_id = slg.ship_header_id
133 AND sl.ship_line_group_id = slg.ship_line_group_id
134 AND slg.ship_header_id = sh.ship_header_id
135 AND lc.ship_line_id = sl.ship_line_id
136 AND sh.ship_header_id = l_ship_header_id
137 AND slg.src_type_code = l_src_type_code
138 AND (sl.interface_source_table = l_interface_source_table
139 OR l_interface_source_table IS NULL)
140 ORDER BY slg.ship_line_group_id;
141
142 TYPE ship_lines_table IS TABLE OF c_ship_lines%ROWTYPE;
143
144 PROCEDURE Import_FromRCV (
145 p_int_rec IN RCV_CALL_LCM_WS.rti_rec
146 );
147
148 PROCEDURE Get_LandedCost (
149 p_rti_rec IN RCV_LCM_WEB_SERVICE.rti_cur_table,
150 p_group_id IN NUMBER,
151 p_processing_mode IN VARCHAR2
152 );
153
154 PROCEDURE Call_StampLC (
155 p_api_version IN NUMBER,
156 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
157 p_commit IN VARCHAR2 := FND_API.G_FALSE,
158 p_ship_header_id IN NUMBER,
159 x_return_status OUT NOCOPY VARCHAR2,
160 x_msg_count OUT NOCOPY NUMBER,
161 x_msg_data OUT NOCOPY VARCHAR2
162 );
163
164 PROCEDURE Export_ToRCV (
165 p_api_version IN NUMBER,
166 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
167 p_commit IN VARCHAR2 := FND_API.G_FALSE,
168 p_ship_header_id IN NUMBER,
169 x_return_status OUT NOCOPY VARCHAR2,
170 x_msg_count OUT NOCOPY NUMBER,
171 x_msg_data OUT NOCOPY VARCHAR2
172 );
173
174 PROCEDURE Export_ToCST (
175 p_api_version IN NUMBER,
176 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
177 p_commit IN VARCHAR2 := FND_API.G_FALSE,
178 p_ship_header_id IN NUMBER,
179 x_return_status OUT NOCOPY VARCHAR2,
180 x_msg_count OUT NOCOPY NUMBER,
181 x_msg_data OUT NOCOPY VARCHAR2
182 );
183
184 PROCEDURE Insert_LCMInterface (
185 p_api_version IN NUMBER,
186 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
187 p_commit IN VARCHAR2 := FND_API.G_FALSE,
188 p_lci_table IN OUT NOCOPY lci_table,
189 x_return_status OUT NOCOPY VARCHAR2,
190 x_msg_count OUT NOCOPY NUMBER,
191 x_msg_data OUT NOCOPY VARCHAR2
192 );
193
194 PROCEDURE Get_CurrencyInfo(
195 p_api_version IN NUMBER,
196 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
197 p_commit IN VARCHAR2 := FND_API.G_FALSE,
198 p_ship_line_id IN NUMBER,
199 x_return_status OUT NOCOPY VARCHAR2,
200 x_msg_count OUT NOCOPY NUMBER,
201 x_msg_data OUT NOCOPY VARCHAR2,
202 x_currency_code OUT NOCOPY VARCHAR2,
203 x_currency_conversion_type OUT NOCOPY VARCHAR2,
204 x_currency_conversion_date OUT NOCOPY DATE,
205 x_currency_conversion_rate OUT NOCOPY NUMBER
206 );
207
208 END INL_INTEGRATION_GRP;