1 PACKAGE BODY RCV_TRX_INTERFACE_LOCK_PKG as
2 /* $Header: RCVTIR2B.pls 120.2 2005/06/21 18:55:08 wkunz noship $ */
3
4
5 PROCEDURE Lock_Row(X_Rowid VARCHAR2,
6 X_Interface_Transaction_Id NUMBER,
7 X_Group_Id NUMBER,
8 X_Transaction_Type VARCHAR2,
9 X_Transaction_Date DATE,
10 X_Processing_Status_Code VARCHAR2,
11 X_Processing_Mode_Code VARCHAR2,
12 X_Processing_Request_Id NUMBER,
13 X_Transaction_Status_Code VARCHAR2,
14 X_Category_Id NUMBER,
15 X_Quantity NUMBER,
16 X_Unit_Of_Measure VARCHAR2,
17 X_Interface_Source_Code VARCHAR2,
18 X_Interface_Source_Line_Id NUMBER,
19 X_Inv_Transaction_Id NUMBER,
20 X_Item_Id NUMBER,
21 X_Item_Description VARCHAR2,
22 X_Item_Revision VARCHAR2,
23 X_Uom_Code VARCHAR2,
24 X_Employee_Id NUMBER,
25 X_Auto_Transact_Code VARCHAR2,
26 X_Shipment_Header_Id NUMBER,
27 X_Shipment_Line_Id NUMBER,
28 X_Ship_To_Location_Id NUMBER,
29 X_Primary_Quantity NUMBER,
30 X_Primary_Unit_Of_Measure VARCHAR2,
31 X_Receipt_Source_Code VARCHAR2,
32 X_Vendor_Id NUMBER,
33 X_Vendor_Site_Id NUMBER,
34 X_From_Organization_Id NUMBER,
35 X_To_Organization_Id NUMBER,
36 X_Routing_Header_Id NUMBER,
37 X_Routing_Step_Id NUMBER,
38 X_Source_Document_Code VARCHAR2,
39 X_Parent_Transaction_Id NUMBER,
40 X_Po_Header_Id NUMBER,
41 X_Po_Revision_Num NUMBER,
42 X_Po_Release_Id NUMBER,
43 X_Po_Line_Id NUMBER,
44 X_Po_Line_Location_Id NUMBER,
45 X_Po_Unit_Price NUMBER,
46 X_Currency_Code VARCHAR2,
47 X_Currency_Conversion_Type VARCHAR2,
48 X_Currency_Conversion_Rate NUMBER,
49 X_Currency_Conversion_Date DATE,
50 X_Po_Distribution_Id NUMBER,
51 X_Requisition_Line_Id NUMBER,
52 X_Req_Distribution_Id NUMBER,
53 X_Charge_Account_Id NUMBER,
54 X_Substitute_Unordered_Code VARCHAR2,
55 X_Receipt_Exception_Flag VARCHAR2,
56 X_Accrual_Status_Code VARCHAR2,
57 X_Inspection_Status_Code VARCHAR2,
58 X_Inspection_Quality_Code VARCHAR2,
59 X_Destination_Type_Code VARCHAR2,
60 X_Deliver_To_Person_Id NUMBER,
61 X_Location_Id NUMBER,
62 X_Deliver_To_Location_Id NUMBER,
63 X_Subinventory VARCHAR2,
64 X_Locator_Id NUMBER,
65 X_Wip_Entity_Id NUMBER,
66 X_Wip_Line_Id NUMBER,
67 X_Department_Code VARCHAR2,
68 X_Wip_Repetitive_Schedule_Id NUMBER,
69 X_Wip_Operation_Seq_Num NUMBER,
70 X_Wip_Resource_Seq_Num NUMBER,
71 X_Bom_Resource_Id NUMBER,
72 X_Shipment_Num VARCHAR2,
73 X_Freight_Carrier_Code VARCHAR2,
74 X_Bill_Of_Lading VARCHAR2,
75 X_Packing_Slip VARCHAR2,
76 X_Shipped_Date DATE,
77 X_Expected_Receipt_Date DATE,
78 X_Actual_Cost NUMBER,
79 X_Transfer_Cost NUMBER,
80 X_Transportation_Cost NUMBER,
81 X_Transportation_Account_Id NUMBER,
82 X_Num_Of_Containers NUMBER,
83 X_Waybill_Airbill_Num VARCHAR2,
84 X_Vendor_Item_Num VARCHAR2,
85 X_Vendor_Lot_Num VARCHAR2,
86 X_Rma_Reference VARCHAR2,
87 X_Comments VARCHAR2,
88 X_Attribute_Category VARCHAR2,
89 X_Attribute1 VARCHAR2,
90 X_Attribute2 VARCHAR2,
91 X_Attribute3 VARCHAR2,
92 X_Attribute4 VARCHAR2,
93 X_Attribute5 VARCHAR2,
94 X_Attribute6 VARCHAR2,
95 X_Attribute7 VARCHAR2,
96 X_Attribute8 VARCHAR2,
97 X_Attribute9 VARCHAR2,
98 X_Attribute10 VARCHAR2,
99 X_Attribute11 VARCHAR2,
100 X_Attribute12 VARCHAR2,
101 X_Attribute13 VARCHAR2,
102 X_Attribute14 VARCHAR2,
103 X_Attribute15 VARCHAR2,
104 X_Ship_Head_Attribute_Category VARCHAR2,
105 X_Ship_Head_Attribute1 VARCHAR2,
106 X_Ship_Head_Attribute2 VARCHAR2,
107 X_Ship_Head_Attribute3 VARCHAR2,
108 X_Ship_Head_Attribute4 VARCHAR2,
109 X_Ship_Head_Attribute5 VARCHAR2,
110 X_Ship_Head_Attribute6 VARCHAR2,
111 X_Ship_Head_Attribute7 VARCHAR2,
112 X_Ship_Head_Attribute8 VARCHAR2,
113 X_Ship_Head_Attribute9 VARCHAR2,
114 X_Ship_Head_Attribute10 VARCHAR2,
115 X_Ship_Head_Attribute11 VARCHAR2,
116 X_Ship_Head_Attribute12 VARCHAR2,
117 X_Ship_Head_Attribute13 VARCHAR2,
118 X_Ship_Head_Attribute14 VARCHAR2,
119 X_Ship_Head_Attribute15 VARCHAR2,
120 X_Ship_Line_Attribute_Category VARCHAR2,
121 X_Ship_Line_Attribute1 VARCHAR2,
122 X_Ship_Line_Attribute2 VARCHAR2,
123 X_Ship_Line_Attribute3 VARCHAR2,
124 X_Ship_Line_Attribute4 VARCHAR2,
125 X_Ship_Line_Attribute5 VARCHAR2,
126 X_Ship_Line_Attribute6 VARCHAR2,
127 X_Ship_Line_Attribute7 VARCHAR2,
128 X_Ship_Line_Attribute8 VARCHAR2,
129 X_Ship_Line_Attribute9 VARCHAR2,
130 X_Ship_Line_Attribute10 VARCHAR2,
131 X_Ship_Line_Attribute11 VARCHAR2,
132 X_Ship_Line_Attribute12 VARCHAR2,
133 X_Ship_Line_Attribute13 VARCHAR2,
134 X_Ship_Line_Attribute14 VARCHAR2,
135 X_Ship_Line_Attribute15 VARCHAR2,
136 X_Ussgl_Transaction_Code VARCHAR2,
137 X_Government_Context VARCHAR2,
138 X_Reason_Id NUMBER,
139 X_Destination_Context VARCHAR2,
140 X_Source_Doc_Quantity NUMBER,
141 X_Source_Doc_Unit_Of_Measure VARCHAR2
142
143 ) IS
144 CURSOR C IS
145 SELECT *
146 FROM RCV_TRANSACTIONS_INTERFACE
147 WHERE rowid = X_Rowid
148 FOR UPDATE of Interface_Transaction_Id NOWAIT;
149 Recinfo C%ROWTYPE;
150 BEGIN
151 OPEN C;
152 FETCH C INTO Recinfo;
153 if (C%NOTFOUND) then
154 CLOSE C;
155 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
156 APP_EXCEPTION.Raise_Exception;
157 end if;
158 CLOSE C;
159 if ((Recinfo.interface_transaction_id = X_Interface_Transaction_Id)
160 AND ( (Recinfo.group_id = X_Group_Id)
161 OR ( (Recinfo.group_id IS NULL)
162
163 AND (X_Group_Id IS NULL)))
164 AND (Recinfo.transaction_type = X_Transaction_Type)
165 AND (Recinfo.transaction_date = X_Transaction_Date)
166 AND (Recinfo.processing_status_code = X_Processing_Status_Code)
167 AND (Recinfo.processing_mode_code = X_Processing_Mode_Code)
168 AND ( (Recinfo.processing_request_id = X_Processing_Request_Id)
169 OR ( (Recinfo.processing_request_id IS NULL)
170 AND (X_Processing_Request_Id IS NULL)))
171 AND (Recinfo.transaction_status_code = X_Transaction_Status_Code)
172 AND ( (Recinfo.category_id = X_Category_Id)
173 OR ( (Recinfo.category_id IS NULL)
174 AND (X_Category_Id IS NULL)))
175 AND (Recinfo.quantity = X_Quantity)
176 AND (Recinfo.unit_of_measure = X_Unit_Of_Measure)
177 AND ( (Recinfo.interface_source_code = X_Interface_Source_Code)
178 OR ( (Recinfo.interface_source_code IS NULL)
179 AND (X_Interface_Source_Code IS NULL)))
180 AND ( (Recinfo.interface_source_line_id = X_Interface_Source_Line_Id)
181 OR ( (Recinfo.interface_source_line_id IS NULL)
182 AND (X_Interface_Source_Line_Id IS NULL)))
183 AND ( (Recinfo.inv_transaction_id = X_Inv_Transaction_Id)
184 OR ( (Recinfo.inv_transaction_id IS NULL)
185 AND (X_Inv_Transaction_Id IS NULL)))
186 AND ( (Recinfo.item_id = X_Item_Id)
187 OR ( (Recinfo.item_id IS NULL)
188 AND (X_Item_Id IS NULL)))
189 AND ( (Recinfo.item_description = X_Item_Description)
190 OR ( (Recinfo.item_description IS NULL)
191 AND (X_Item_Description IS NULL)))
192 AND ( (Recinfo.item_revision = X_Item_Revision)
193 OR ( (Recinfo.item_revision IS NULL)
194 AND (X_Item_Revision IS NULL)))
195 AND ( (Recinfo.uom_code = X_Uom_Code)
196 OR ( (Recinfo.uom_code IS NULL)
197 AND (X_Uom_Code IS NULL)))
198 AND ( (Recinfo.employee_id = X_Employee_Id)
199 OR ( (Recinfo.employee_id IS NULL)
200 AND (X_Employee_Id IS NULL)))) THEN
201 IF ( (Recinfo.auto_transact_code = X_Auto_Transact_Code)
202 OR ( (Recinfo.auto_transact_code IS NULL)
203 AND (X_Auto_Transact_Code IS NULL)))
204 AND ( (Recinfo.shipment_header_id = X_Shipment_Header_Id)
205 OR ( (Recinfo.shipment_header_id IS NULL)
206 AND (X_Shipment_Header_Id IS NULL)))
207 AND ( (Recinfo.shipment_line_id = X_Shipment_Line_Id)
208 OR ( (Recinfo.shipment_line_id IS NULL)
209 AND (X_Shipment_Line_Id IS NULL)))
210 AND ( (Recinfo.ship_to_location_id = X_Ship_To_Location_Id)
211 OR ( (Recinfo.ship_to_location_id IS NULL)
212 AND (X_Ship_To_Location_Id IS NULL)))
213 AND ( (Recinfo.primary_quantity = X_Primary_Quantity)
214 OR ( (Recinfo.primary_quantity IS NULL)
215 AND (X_Primary_Quantity IS NULL)))
216 AND ( (Recinfo.primary_unit_of_measure = X_Primary_Unit_Of_Measure)
217 OR ( (Recinfo.primary_unit_of_measure IS NULL)
218 AND (X_Primary_Unit_Of_Measure IS NULL)))
219 AND ( (Recinfo.receipt_source_code = X_Receipt_Source_Code)
220 OR ( (Recinfo.receipt_source_code IS NULL)
221 AND (X_Receipt_Source_Code IS NULL)))
222 AND ( (Recinfo.vendor_id = X_Vendor_Id)
223 OR ( (Recinfo.vendor_id IS NULL)
224 AND (X_Vendor_Id IS NULL)))
225 AND ( (Recinfo.vendor_site_id = X_Vendor_Site_Id)
226 OR ( (Recinfo.vendor_site_id IS NULL)
227 AND (X_Vendor_Site_Id IS NULL)))
228 AND ( (Recinfo.from_organization_id = X_From_Organization_Id)
229 OR ( (Recinfo.from_organization_id IS NULL)
230 AND (X_From_Organization_Id IS NULL)))
231 AND ( (Recinfo.to_organization_id = X_To_Organization_Id)
232 OR ( (Recinfo.to_organization_id IS NULL)
233 AND (X_To_Organization_Id IS NULL)))
234 AND ( (Recinfo.routing_header_id = X_Routing_Header_Id)
235 OR ( (Recinfo.routing_header_id IS NULL)
236 AND (X_Routing_Header_Id IS NULL)))
237 AND ( (Recinfo.routing_step_id = X_Routing_Step_Id)
238 OR ( (Recinfo.routing_step_id IS NULL)
239 AND (X_Routing_Step_Id IS NULL)))
240 AND ( (Recinfo.source_document_code = X_Source_Document_Code)
241 OR ( (Recinfo.source_document_code IS NULL)
242 AND (X_Source_Document_Code IS NULL)))
243 AND ( (Recinfo.parent_transaction_id = X_Parent_Transaction_Id)
244 OR ( (Recinfo.parent_transaction_id IS NULL)
245 AND (X_Parent_Transaction_Id IS NULL))) THEN
246 IF ( (Recinfo.po_header_id = X_Po_Header_Id)
247 OR ( (Recinfo.po_header_id IS NULL)
248 AND (X_Po_Header_Id IS NULL)))
249 AND ( (Recinfo.po_revision_num = X_Po_Revision_Num)
250 OR ( (Recinfo.po_revision_num IS NULL)
251 AND (X_Po_Revision_Num IS NULL)))
252 AND ( (Recinfo.po_release_id = X_Po_Release_Id)
253 OR ( (Recinfo.po_release_id IS NULL)
254 AND (X_Po_Release_Id IS NULL)))
255 AND ( (Recinfo.po_line_id = X_Po_Line_Id)
256 OR ( (Recinfo.po_line_id IS NULL)
257 AND (X_Po_Line_Id IS NULL)))
258 AND ( (Recinfo.po_line_location_id = X_Po_Line_Location_Id)
259 OR ( (Recinfo.po_line_location_id IS NULL)
260 AND (X_Po_Line_Location_Id IS NULL)))
261 AND ( (Recinfo.po_unit_price = X_Po_Unit_Price)
262 OR ( (Recinfo.po_unit_price IS NULL)
263 AND (X_Po_Unit_Price IS NULL)))
264 AND ( (Recinfo.currency_code = X_Currency_Code)
265 OR ( (Recinfo.currency_code IS NULL)
266 AND (X_Currency_Code IS NULL)))
267 AND ( (Recinfo.currency_conversion_type = X_Currency_Conversion_Type)
268 OR ( (Recinfo.currency_conversion_type IS NULL)
269 AND (X_Currency_Conversion_Type IS NULL)))
270 AND ( (Recinfo.currency_conversion_rate = X_Currency_Conversion_Rate)
271 OR ( (Recinfo.currency_conversion_rate IS NULL)
272 AND (X_Currency_Conversion_Rate IS NULL)))
273 AND ( (Recinfo.currency_conversion_date = X_Currency_Conversion_Date)
274 OR ( (Recinfo.currency_conversion_date IS NULL)
275 AND (X_Currency_Conversion_Date IS NULL)))
276 AND ( (Recinfo.po_distribution_id = X_Po_Distribution_Id)
277 OR ( (Recinfo.po_distribution_id IS NULL)
278 AND (X_Po_Distribution_Id IS NULL)))
279 AND ( (Recinfo.requisition_line_id = X_Requisition_Line_Id)
283 OR ( (Recinfo.req_distribution_id IS NULL)
280 OR ( (Recinfo.requisition_line_id IS NULL)
281 AND (X_Requisition_Line_Id IS NULL)))
282 AND ( (Recinfo.req_distribution_id = X_Req_Distribution_Id)
284 AND (X_Req_Distribution_Id IS NULL)))
285 AND ( (Recinfo.charge_account_id = X_Charge_Account_Id)
286 OR ( (Recinfo.charge_account_id IS NULL)
287 AND (X_Charge_Account_Id IS NULL)))
288 AND ( (Recinfo.substitute_unordered_code = X_Substitute_Unordered_Code)
289 OR ( (Recinfo.substitute_unordered_code IS NULL)
290 AND (X_Substitute_Unordered_Code IS NULL))) THEN
291 IF ( (Recinfo.receipt_exception_flag = X_Receipt_Exception_Flag)
292 OR ( (Recinfo.receipt_exception_flag IS NULL)
293 AND (X_Receipt_Exception_Flag IS NULL)))
294 AND ( (Recinfo.accrual_status_code = X_Accrual_Status_Code)
295 OR ( (Recinfo.accrual_status_code IS NULL)
296 AND (X_Accrual_Status_Code IS NULL)))
297 AND ( (Recinfo.inspection_status_code = X_Inspection_Status_Code)
298 OR ( (Recinfo.inspection_status_code IS NULL)
299 AND (X_Inspection_Status_Code IS NULL)))
300 AND ( (Recinfo.inspection_quality_code = X_Inspection_Quality_Code)
301 OR ( (Recinfo.inspection_quality_code IS NULL)
302 AND (X_Inspection_Quality_Code IS NULL)))
303 AND ( (Recinfo.destination_type_code = X_Destination_Type_Code)
304 OR ( (Recinfo.destination_type_code IS NULL)
305 AND (X_Destination_Type_Code IS NULL)))
306 AND ( (Recinfo.deliver_to_person_id = X_Deliver_To_Person_Id)
307 OR ( (Recinfo.deliver_to_person_id IS NULL)
308 AND (X_Deliver_To_Person_Id IS NULL)))
309 AND ( (Recinfo.location_id = X_Location_Id)
310 OR ( (Recinfo.location_id IS NULL)
311 AND (X_Location_Id IS NULL)))
312 AND ( (Recinfo.deliver_to_location_id = X_Deliver_To_Location_Id)
313 OR ( (Recinfo.deliver_to_location_id IS NULL)
314 AND (X_Deliver_To_Location_Id IS NULL)))
315 AND ( (Recinfo.subinventory = X_Subinventory)
316 OR ( (Recinfo.subinventory IS NULL)
317 AND (X_Subinventory IS NULL)))
318 AND ( (Recinfo.locator_id = X_Locator_Id)
319 OR ( (Recinfo.locator_id IS NULL)
320 AND (X_Locator_Id IS NULL)))
321 AND ( (Recinfo.wip_entity_id = X_Wip_Entity_Id)
322 OR ( (Recinfo.wip_entity_id IS NULL)
323 AND (X_Wip_Entity_Id IS NULL)))
324 AND ( (Recinfo.wip_line_id = X_Wip_Line_Id)
325 OR ( (Recinfo.wip_line_id IS NULL)
326 AND (X_Wip_Line_Id IS NULL)))
327 AND ( (Recinfo.department_code = X_Department_Code)
328 OR ( (Recinfo.department_code IS NULL)
329 AND (X_Department_Code IS NULL)))
330 AND ( (Recinfo.wip_repetitive_schedule_id = X_Wip_Repetitive_Schedule_Id)
331 OR ( (Recinfo.wip_repetitive_schedule_id IS NULL)
332 AND (X_Wip_Repetitive_Schedule_Id IS NULL)))
333 AND ( (Recinfo.wip_operation_seq_num = X_Wip_Operation_Seq_Num)
334 OR ( (Recinfo.wip_operation_seq_num IS NULL)
335 AND (X_Wip_Operation_Seq_Num IS NULL)))
336 AND ( (Recinfo.wip_resource_seq_num = X_Wip_Resource_Seq_Num)
337 OR ( (Recinfo.wip_resource_seq_num IS NULL)
338 AND (X_Wip_Resource_Seq_Num IS NULL))) THEN
339 IF ( (Recinfo.bom_resource_id = X_Bom_Resource_Id)
340 OR ( (Recinfo.bom_resource_id IS NULL)
341 AND (X_Bom_Resource_Id IS NULL)))
342 AND ( (Recinfo.shipment_num = X_Shipment_Num)
343 OR ( (Recinfo.shipment_num IS NULL)
344 AND (X_Shipment_Num IS NULL)))
345 AND ( (Recinfo.freight_carrier_code = X_Freight_Carrier_Code)
346 OR ( (Recinfo.freight_carrier_code IS NULL)
347 AND (X_Freight_Carrier_Code IS NULL)))
348 AND ( (Recinfo.bill_of_lading = X_Bill_Of_Lading)
349 OR ( (Recinfo.bill_of_lading IS NULL)
350 AND (X_Bill_Of_Lading IS NULL)))
351 AND ( (Recinfo.packing_slip = X_Packing_Slip)
352 OR ( (Recinfo.packing_slip IS NULL)
353 AND (X_Packing_Slip IS NULL)))
354 AND ( (Recinfo.shipped_date = X_Shipped_Date)
355 OR ( (Recinfo.shipped_date IS NULL)
356 AND (X_Shipped_Date IS NULL)))
357 AND ( (Recinfo.expected_receipt_date = X_Expected_Receipt_Date)
358 OR ( (Recinfo.expected_receipt_date IS NULL)
359 AND (X_Expected_Receipt_Date IS NULL)))
360 AND ( (Recinfo.actual_cost = X_Actual_Cost)
361 OR ( (Recinfo.actual_cost IS NULL)
362 AND (X_Actual_Cost IS NULL)))
363 AND ( (Recinfo.transfer_cost = X_Transfer_Cost)
364 OR ( (Recinfo.transfer_cost IS NULL)
365 AND (X_Transfer_Cost IS NULL)))
369 AND ( (Recinfo.transportation_account_id = X_Transportation_Account_Id)
366 AND ( (Recinfo.transportation_cost = X_Transportation_Cost)
367 OR ( (Recinfo.transportation_cost IS NULL)
368 AND (X_Transportation_Cost IS NULL)))
370 OR ( (Recinfo.transportation_account_id IS NULL)
371 AND (X_Transportation_Account_Id IS NULL)))
372 AND ( (Recinfo.num_of_containers = X_Num_Of_Containers)
373 OR ( (Recinfo.num_of_containers IS NULL)
374 AND (X_Num_Of_Containers IS NULL))) THEN
375 IF ( (Recinfo.waybill_airbill_num = X_Waybill_Airbill_Num)
376 OR ( (Recinfo.waybill_airbill_num IS NULL)
377 AND (X_Waybill_Airbill_Num IS NULL)))
378 AND ( (Recinfo.vendor_item_num = X_Vendor_Item_Num)
379 OR ( (Recinfo.vendor_item_num IS NULL)
380 AND (X_Vendor_Item_Num IS NULL)))
381 AND ( (Recinfo.vendor_lot_num = X_Vendor_Lot_Num)
382 OR ( (Recinfo.vendor_lot_num IS NULL)
383 AND (X_Vendor_Lot_Num IS NULL)))
384 AND ( (Recinfo.rma_reference = X_Rma_Reference)
385 OR ( (Recinfo.rma_reference IS NULL)
386 AND (X_Rma_Reference IS NULL)))
387 AND ( (Recinfo.comments = X_Comments)
388 OR ( (Recinfo.comments IS NULL)
389 AND (X_Comments IS NULL)))
390 AND ( (Recinfo.attribute_category = X_Attribute_Category)
391 OR ( (Recinfo.attribute_category IS NULL)
392 AND (X_Attribute_Category IS NULL)))
393 AND ( (Recinfo.attribute1 = X_Attribute1)
394 OR ( (Recinfo.attribute1 IS NULL)
395 AND (X_Attribute1 IS NULL)))
396 AND ( (Recinfo.attribute2 = X_Attribute2)
397 OR ( (Recinfo.attribute2 IS NULL)
398 AND (X_Attribute2 IS NULL)))
399 AND ( (Recinfo.attribute3 = X_Attribute3)
400 OR ( (Recinfo.attribute3 IS NULL)
401 AND (X_Attribute3 IS NULL)))
402 AND ( (Recinfo.attribute4 = X_Attribute4)
403 OR ( (Recinfo.attribute4 IS NULL)
404 AND (X_Attribute4 IS NULL)))
405 AND ( (Recinfo.attribute5 = X_Attribute5)
406 OR ( (Recinfo.attribute5 IS NULL)
407 AND (X_Attribute5 IS NULL)))
408 AND ( (Recinfo.attribute6 = X_Attribute6)
409 OR ( (Recinfo.attribute6 IS NULL)
410 AND (X_Attribute6 IS NULL)))
411 AND ( (Recinfo.attribute7 = X_Attribute7)
412 OR ( (Recinfo.attribute7 IS NULL)
413 AND (X_Attribute7 IS NULL)))
414 AND ( (Recinfo.attribute8 = X_Attribute8)
415 OR ( (Recinfo.attribute8 IS NULL)
416 AND (X_Attribute8 IS NULL)))
417 AND ( (Recinfo.attribute9 = X_Attribute9)
418 OR ( (Recinfo.attribute9 IS NULL)
419 AND (X_Attribute9 IS NULL)))
420 AND ( (Recinfo.attribute10 = X_Attribute10)
421 OR ( (Recinfo.attribute10 IS NULL)
422 AND (X_Attribute10 IS NULL)))
423 AND ( (Recinfo.attribute11 = X_Attribute11)
424 OR ( (Recinfo.attribute11 IS NULL)
425 AND (X_Attribute11 IS NULL)))
426 AND ( (Recinfo.attribute12 = X_Attribute12)
427 OR ( (Recinfo.attribute12 IS NULL)
428 AND (X_Attribute12 IS NULL)))
429 AND ( (Recinfo.attribute13 = X_Attribute13)
430 OR ( (Recinfo.attribute13 IS NULL)
431 AND (X_Attribute13 IS NULL)))
432 AND ( (Recinfo.attribute14 = X_Attribute14)
433 OR ( (Recinfo.attribute14 IS NULL)
434 AND (X_Attribute14 IS NULL)))
435 AND ( (Recinfo.attribute15 = X_Attribute15)
436 OR ( (Recinfo.attribute15 IS NULL)
437 AND (X_Attribute15 IS NULL))) THEN
438 IF ( (Recinfo.ship_head_attribute_category = X_Ship_Head_Attribute_Category)
439 OR ( (Recinfo.ship_head_attribute_category IS NULL)
440 AND (X_Ship_Head_Attribute_Category IS NULL)))
441 AND ( (Recinfo.ship_head_attribute1 = X_Ship_Head_Attribute1)
442 OR ( (Recinfo.ship_head_attribute1 IS NULL)
443 AND (X_Ship_Head_Attribute1 IS NULL)))
444 AND ( (Recinfo.ship_head_attribute2 = X_Ship_Head_Attribute2)
445 OR ( (Recinfo.ship_head_attribute2 IS NULL)
446 AND (X_Ship_Head_Attribute2 IS NULL)))
447 AND ( (Recinfo.ship_head_attribute3 = X_Ship_Head_Attribute3)
448 OR ( (Recinfo.ship_head_attribute3 IS NULL)
449 AND (X_Ship_Head_Attribute3 IS NULL)))
450 AND ( (Recinfo.ship_head_attribute4 = X_Ship_Head_Attribute4)
454 OR ( (Recinfo.ship_head_attribute5 IS NULL)
451 OR ( (Recinfo.ship_head_attribute4 IS NULL)
452 AND (X_Ship_Head_Attribute4 IS NULL)))
453 AND ( (Recinfo.ship_head_attribute5 = X_Ship_Head_Attribute5)
455 AND (X_Ship_Head_Attribute5 IS NULL)))
456 AND ( (Recinfo.ship_head_attribute6 = X_Ship_Head_Attribute6)
457 OR ( (Recinfo.ship_head_attribute6 IS NULL)
458 AND (X_Ship_Head_Attribute6 IS NULL)))
459 AND ( (Recinfo.ship_head_attribute7 = X_Ship_Head_Attribute7)
460 OR ( (Recinfo.ship_head_attribute7 IS NULL)
461 AND (X_Ship_Head_Attribute7 IS NULL)))
462 AND ( (Recinfo.ship_head_attribute8 = X_Ship_Head_Attribute8)
463 OR ( (Recinfo.ship_head_attribute8 IS NULL)
464 AND (X_Ship_Head_Attribute8 IS NULL)))
465 AND ( (Recinfo.ship_head_attribute9 = X_Ship_Head_Attribute9)
466 OR ( (Recinfo.ship_head_attribute9 IS NULL)
467 AND (X_Ship_Head_Attribute9 IS NULL)))
468 AND ( (Recinfo.ship_head_attribute10 = X_Ship_Head_Attribute10)
469 OR ( (Recinfo.ship_head_attribute10 IS NULL)
470 AND (X_Ship_Head_Attribute10 IS NULL)))
471 AND ( (Recinfo.ship_head_attribute11 = X_Ship_Head_Attribute11)
472 OR ( (Recinfo.ship_head_attribute11 IS NULL)
473 AND (X_Ship_Head_Attribute11 IS NULL)))
474 AND ( (Recinfo.ship_head_attribute12 = X_Ship_Head_Attribute12)
475 OR ( (Recinfo.ship_head_attribute12 IS NULL)
476 AND (X_Ship_Head_Attribute12 IS NULL)))
477 AND ( (Recinfo.ship_head_attribute13 = X_Ship_Head_Attribute13)
478 OR ( (Recinfo.ship_head_attribute13 IS NULL)
479 AND (X_Ship_Head_Attribute13 IS NULL)))
480 AND ( (Recinfo.ship_head_attribute14 = X_Ship_Head_Attribute14)
481 OR ( (Recinfo.ship_head_attribute14 IS NULL)
482 AND (X_Ship_Head_Attribute14 IS NULL)))
483 AND ( (Recinfo.ship_head_attribute15 = X_Ship_Head_Attribute15)
484 OR ( (Recinfo.ship_head_attribute15 IS NULL)
485 AND (X_Ship_Head_Attribute15 IS NULL)))
486 AND ( (Recinfo.ship_line_attribute_category = X_Ship_Line_Attribute_Category)
487 OR ( (Recinfo.ship_line_attribute_category IS NULL)
488 AND (X_Ship_Line_Attribute_Category IS NULL))) THEN
489 IF ( (Recinfo.ship_line_attribute1 = X_Ship_Line_Attribute1)
490 OR ( (Recinfo.ship_line_attribute1 IS NULL)
491 AND (X_Ship_Line_Attribute1 IS NULL)))
492 AND ( (Recinfo.ship_line_attribute2 = X_Ship_Line_Attribute2)
493 OR ( (Recinfo.ship_line_attribute2 IS NULL)
494 AND (X_Ship_Line_Attribute2 IS NULL)))
495 AND ( (Recinfo.ship_line_attribute3 = X_Ship_Line_Attribute3)
496 OR ( (Recinfo.ship_line_attribute3 IS NULL)
497 AND (X_Ship_Line_Attribute3 IS NULL)))
498 AND ( (Recinfo.ship_line_attribute4 = X_Ship_Line_Attribute4)
499 OR ( (Recinfo.ship_line_attribute4 IS NULL)
500 AND (X_Ship_Line_Attribute4 IS NULL)))
501 AND ( (Recinfo.ship_line_attribute5 = X_Ship_Line_Attribute5)
502 OR ( (Recinfo.ship_line_attribute5 IS NULL)
503 AND (X_Ship_Line_Attribute5 IS NULL)))
504 AND ( (Recinfo.ship_line_attribute6 = X_Ship_Line_Attribute6)
505 OR ( (Recinfo.ship_line_attribute6 IS NULL)
506 AND (X_Ship_Line_Attribute6 IS NULL)))
507 AND ( (Recinfo.ship_line_attribute7 = X_Ship_Line_Attribute7)
508 OR ( (Recinfo.ship_line_attribute7 IS NULL)
509 AND (X_Ship_Line_Attribute7 IS NULL)))
510 AND ( (Recinfo.ship_line_attribute8 = X_Ship_Line_Attribute8)
511 OR ( (Recinfo.ship_line_attribute8 IS NULL)
512 AND (X_Ship_Line_Attribute8 IS NULL)))
513 AND ( (Recinfo.ship_line_attribute9 = X_Ship_Line_Attribute9)
514 OR ( (Recinfo.ship_line_attribute9 IS NULL)
515 AND (X_Ship_Line_Attribute9 IS NULL)))
516 AND ( (Recinfo.ship_line_attribute10 = X_Ship_Line_Attribute10)
517 OR ( (Recinfo.ship_line_attribute10 IS NULL)
518 AND (X_Ship_Line_Attribute10 IS NULL)))
519 AND ( (Recinfo.ship_line_attribute11 = X_Ship_Line_Attribute11)
520 OR ( (Recinfo.ship_line_attribute11 IS NULL)
521 AND (X_Ship_Line_Attribute11 IS NULL)))
522 AND ( (Recinfo.ship_line_attribute12 = X_Ship_Line_Attribute12)
523 OR ( (Recinfo.ship_line_attribute12 IS NULL)
524 AND (X_Ship_Line_Attribute12 IS NULL)))
525 AND ( (Recinfo.ship_line_attribute13 = X_Ship_Line_Attribute13)
526 OR ( (Recinfo.ship_line_attribute13 IS NULL)
527 AND (X_Ship_Line_Attribute13 IS NULL)))
528 AND ( (Recinfo.ship_line_attribute14 = X_Ship_Line_Attribute14)
529 OR ( (Recinfo.ship_line_attribute14 IS NULL)
530 AND (X_Ship_Line_Attribute14 IS NULL)))
531 AND ( (Recinfo.ship_line_attribute15 = X_Ship_Line_Attribute15)
532 OR ( (Recinfo.ship_line_attribute15 IS NULL)
533 AND (X_Ship_Line_Attribute15 IS NULL))) THEN
534 IF ( (Recinfo.ussgl_transaction_code = X_Ussgl_Transaction_Code)
535 OR ( (Recinfo.ussgl_transaction_code IS NULL)
536 AND (X_Ussgl_Transaction_Code IS NULL)))
537 AND ( (Recinfo.government_context = X_Government_Context)
538 OR ( (Recinfo.government_context IS NULL)
539 AND (X_Government_Context IS NULL)))
540 AND ( (Recinfo.reason_id = X_Reason_Id)
541 OR ( (Recinfo.reason_id IS NULL)
542 AND (X_Reason_Id IS NULL)))
543 AND ( (Recinfo.destination_context = X_Destination_Context)
544 OR ( (Recinfo.destination_context IS NULL)
545 AND (X_Destination_Context IS NULL)))
546 AND ( (Recinfo.source_doc_quantity = X_Source_Doc_Quantity)
547 OR ( (Recinfo.source_doc_quantity IS NULL)
548 AND (X_Source_Doc_Quantity IS NULL)))
549 AND ( (Recinfo.source_doc_unit_of_measure = X_Source_Doc_Unit_Of_Measure)
550 OR ( (Recinfo.source_doc_unit_of_measure IS NULL)
551 AND (X_Source_Doc_Unit_Of_Measure IS NULL))) then
552 return;
553 else
554 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
555 APP_EXCEPTION.RAISE_EXCEPTION;
556 end if;
557 else
558 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
559 APP_EXCEPTION.RAISE_EXCEPTION;
560 end if;
561 else
562 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
563 APP_EXCEPTION.RAISE_EXCEPTION;
564 end if;
565 else
566 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
567 APP_EXCEPTION.RAISE_EXCEPTION;
568 end if;
569 else
570 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
571 APP_EXCEPTION.RAISE_EXCEPTION;
572 end if;
573 else
574 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
575 APP_EXCEPTION.RAISE_EXCEPTION;
576 end if;
577 else
578 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
579 APP_EXCEPTION.RAISE_EXCEPTION;
580 end if;
581 else
582 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
583 APP_EXCEPTION.RAISE_EXCEPTION;
584 end if;
585 else
586 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
587 APP_EXCEPTION.RAISE_EXCEPTION;
588 end if;
589 END Lock_Row;
590
591 END RCV_TRX_INTERFACE_LOCK_PKG;
[Home] [Help]