[Home] [Help]
PACKAGE BODY: APPS.MTL_TXNS_TEMP_PKG
Source
1 PACKAGE BODY MTL_TXNS_TEMP_PKG as
2 /* $Header: INVTVTMB.pls 120.2.12000000.2 2007/02/21 06:51:50 rkatoori ship $ */
3 /* 31-May-2000 Added three column lpn_id, transfer_lpn_id and transfer_cost_group_id
4 to take care of 11i related inventory enhancements */
5
6 PROCEDURE Lock_Row(
7 X_ROWID VARCHAR2,
8 X_TRANSACTION_HEADER_ID NUMBER,
9 X_TRANSACTION_TEMP_ID NUMBER,
10 X_SOURCE_CODE VARCHAR2,
11 X_SOURCE_LINE_ID NUMBER,
12 X_TRANSACTION_MODE NUMBER,
13 X_LOCK_FLAG VARCHAR2,
14 X_LAST_UPDATE_DATE DATE,
15 X_LAST_UPDATED_BY NUMBER,
16 X_CREATION_DATE DATE,
17 X_CREATED_BY NUMBER,
18 X_LAST_UPDATE_LOGIN NUMBER,
19 X_REQUEST_ID NUMBER,
20 X_PROGRAM_APPLICATION_ID NUMBER,
21 X_PROGRAM_ID NUMBER,
22 X_PROGRAM_UPDATE_DATE DATE,
23 X_INVENTORY_ITEM_ID NUMBER,
24 X_REVISION VARCHAR2,
25 X_ORGANIZATION_ID NUMBER,
26 X_SUBINVENTORY_CODE VARCHAR2,
27 X_LOCATOR_ID NUMBER,
28 X_TRANSACTION_QUANTITY NUMBER,
29 X_PRIMARY_QUANTITY NUMBER,
30 X_TRANSACTION_UOM VARCHAR2,
31 X_TRANSACTION_COST NUMBER,
32 X_COST_GROUP_ID NUMBER,
33 X_TRANSACTION_TYPE_ID NUMBER,
34 X_TRANSACTION_ACTION_ID NUMBER,
35 X_TRANSACTION_SOURCE_TYPE_ID NUMBER,
36 X_TRANSACTION_SOURCE_ID NUMBER,
37 X_TRANSACTION_SOURCE_NAME VARCHAR2,
38 X_TRANSACTION_DATE DATE,
39 X_ACCT_PERIOD_ID NUMBER,
40 X_DISTRIBUTION_ACCOUNT_ID NUMBER,
41 X_TRANSACTION_REFERENCE VARCHAR2,
42 X_REASON_ID NUMBER,
43 X_LOT_NUMBER VARCHAR2,
44 X_LOT_EXPIRATION_DATE DATE,
45 X_SERIAL_NUMBER VARCHAR2,
46 X_RECEIVING_DOCUMENT VARCHAR2,
47 X_RCV_TRANSACTION_ID NUMBER,
48 X_MOVE_TRANSACTION_ID NUMBER,
49 X_COMPLETION_TRANSACTION_ID NUMBER,
50 X_WIP_ENTITY_TYPE NUMBER,
51 X_SCHEDULE_ID NUMBER,
52 X_EMPLOYEE_CODE VARCHAR2,
53 X_SCHEDULE_UPDATE_CODE NUMBER,
54 X_SETUP_TEARDOWN_CODE NUMBER,
55 X_OPERATION_SEQ_NUM NUMBER,
56 X_PICKING_LINE_ID NUMBER,
57 X_TRX_SOURCE_LINE_ID NUMBER,
58 X_TRX_SOURCE_DELIVERY_ID NUMBER,
59 X_PHYSICAL_ADJUSTMENT_ID NUMBER,
60 X_CYCLE_COUNT_ID NUMBER,
61 X_RMA_LINE_ID NUMBER,
62 X_CUSTOMER_SHIP_ID NUMBER,
63 X_CURRENCY_CODE VARCHAR2,
64 X_CURRENCY_CONVERSION_RATE NUMBER,
65 X_CURRENCY_CONVERSION_TYPE VARCHAR2,
66 X_CURRENCY_CONVERSION_DATE DATE,
67 X_USSGL_TRANSACTION_CODE VARCHAR2,
68 X_VENDOR_LOT_NUMBER VARCHAR2,
69 X_ENCUMBRANCE_ACCOUNT NUMBER,
70 X_ENCUMBRANCE_AMOUNT NUMBER,
71 X_SHIPMENT_NUMBER VARCHAR2,
72 X_TRANSFER_COST NUMBER,
73 X_TRANSPORTATION_COST NUMBER,
74 X_TRANSPORTATION_ACCOUNT NUMBER,
75 X_FREIGHT_CODE VARCHAR2,
76 X_CONTAINERS NUMBER,
77 X_WAYBILL_AIRBILL VARCHAR2,
78 X_EXPECTED_ARRIVAL_DATE DATE,
79 X_TRANSFER_SUBINVENTORY VARCHAR2,
80 X_TRANSFER_ORGANIZATION NUMBER,
81 X_TRANSFER_TO_LOCATION NUMBER,
82 X_NEW_AVERAGE_COST NUMBER,
83 X_VALUE_CHANGE NUMBER,
84 X_PERCENTAGE_CHANGE NUMBER,
85 X_MATERIAL_ALLOCATION_TEMP_ID NUMBER,
86 X_DEMAND_SOURCE_HEADER_ID NUMBER,
87 X_DEMAND_SOURCE_LINE VARCHAR2,
88 X_DEMAND_SOURCE_DELIVERY VARCHAR2,
89 X_ITEM_DESCRIPTION VARCHAR2,
90 X_WIP_SUPPLY_TYPE NUMBER,
91 X_POSTING_FLAG VARCHAR2,
92 X_PROCESS_FLAG VARCHAR2,
93 X_ERROR_CODE VARCHAR2,
94 X_ATTRIBUTE_CATEGORY VARCHAR2,
95 X_ATTRIBUTE1 VARCHAR2,
96 X_ATTRIBUTE2 VARCHAR2,
97 X_ATTRIBUTE3 VARCHAR2,
98 X_ATTRIBUTE4 VARCHAR2,
99 X_ATTRIBUTE5 VARCHAR2,
100 X_ATTRIBUTE6 VARCHAR2,
101 X_ATTRIBUTE7 VARCHAR2,
102 X_ATTRIBUTE8 VARCHAR2,
103 X_ATTRIBUTE9 VARCHAR2,
104 X_ATTRIBUTE10 VARCHAR2,
105 X_ATTRIBUTE11 VARCHAR2,
106 X_ATTRIBUTE12 VARCHAR2,
107 X_ATTRIBUTE13 VARCHAR2,
108 X_ATTRIBUTE14 VARCHAR2,
109 X_ATTRIBUTE15 VARCHAR2,
110 X_PRIMARY_SWITCH NUMBER,
111 X_DEPARTMENT_CODE VARCHAR2,
112 X_ERROR_EXPLANATION VARCHAR2,
113 X_DEMAND_ID NUMBER,
114 X_REQUISITION_LINE_ID NUMBER,
115 X_REQUISITION_DISTRIBUTION_ID NUMBER,
116 X_MOVEMENT_ID NUMBER,
117 X_SOURCE_PROJECT_ID NUMBER,
118 X_SOURCE_TASK_ID NUMBER,
119 X_PROJECT_ID NUMBER,
120 X_TASK_ID NUMBER,
121 X_TO_PROJECT_ID NUMBER,
122 X_TO_TASK_ID NUMBER,
123 X_PA_EXPENDITURE_ORG_ID NUMBER,
124 X_EXPENDITURE_TYPE VARCHAR2,
125 X_LPN_ID NUMBER,
126 X_TRANSFER_LPN_ID NUMBER,
127 X_TRANSFER_COST_GROUP_ID NUMBER,
128 X_CONTENT_LPN_ID NUMBER
129 ) IS
130 CURSOR C IS
131 SELECT *
132 FROM mtl_material_transactions_temp
133 WHERE rowid = X_Rowid
134 FOR UPDATE of Transaction_Header_Id NOWAIT;
135 Recinfo C%ROWTYPE;
136 RECORD_CHANGED EXCEPTION;
137
138 BEGIN
139 OPEN C;
140 FETCH C INTO Recinfo;
141 if (C%NOTFOUND) then
142 CLOSE C;
143 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
144 APP_EXCEPTION.Raise_Exception;
145 end if;
146 CLOSE C;
147 if not (
148 ( (Recinfo.transaction_header_id = X_Transaction_Header_Id)
149 OR ( (Recinfo.transaction_header_id IS NULL)
150 AND (X_Transaction_Header_Id IS NULL)))
151 AND ( (Recinfo.transaction_temp_id = X_Transaction_Temp_Id)
152 OR ( (Recinfo.transaction_temp_id IS NULL)
153 AND (X_Transaction_Temp_Id IS NULL)))
154 AND ( (Recinfo.source_code = X_Source_Code)
155 OR ( (Recinfo.source_code IS NULL)
156 AND (X_Source_Code IS NULL)))
157 AND ( (Recinfo.source_line_id = X_Source_Line_Id)
158 OR ( (Recinfo.source_line_id IS NULL)
159 AND (X_Source_Line_Id IS NULL)))
160 AND ( (Recinfo.transaction_mode = X_Transaction_Mode)
161 OR ( (Recinfo.transaction_mode IS NULL)
162 AND (X_Transaction_Mode IS NULL)))
163 AND ( (Recinfo.lock_flag = X_Lock_Flag)
164 OR ( (Recinfo.lock_flag IS NULL)
165 AND (X_Lock_Flag IS NULL)))
166 AND (Recinfo.inventory_item_id = X_Inventory_Item_Id)
167 AND ( (Recinfo.revision = X_Revision)
168 OR ( (Recinfo.revision IS NULL)
169 AND (X_Revision IS NULL)))
170 AND (Recinfo.organization_id = X_Organization_Id)
171 AND ( (Recinfo.subinventory_code = X_Subinventory_Code)
172 OR ( (Recinfo.subinventory_code IS NULL)
173 AND (X_Subinventory_Code IS NULL)))
174 AND ( (Recinfo.locator_id = X_Locator_Id)
175 OR ( (Recinfo.locator_id IS NULL)
176 AND (X_Locator_Id IS NULL)))
177 AND (Recinfo.transaction_quantity = X_Transaction_Quantity)
178 AND (Recinfo.primary_quantity = X_Primary_Quantity)
179 AND (Recinfo.transaction_uom = X_Transaction_Uom)
180 AND ( (Recinfo.transaction_cost = X_Transaction_Cost)
181 OR ( (Recinfo.transaction_cost IS NULL)
182 AND (X_Transaction_Cost IS NULL)))
183 AND ( (Recinfo.cost_group_id = X_cost_group_id)
184 OR ( (Recinfo.cost_group_id IS NULL)
185 AND (X_cost_group_id IS NULL)))
186 AND (Recinfo.transaction_type_id = X_Transaction_Type_Id)
187 AND (Recinfo.transaction_action_id = X_Transaction_Action_Id)
188 AND (Recinfo.transaction_source_type_id = X_Transaction_Source_Type_Id)
189 AND ( (Recinfo.transaction_source_id = X_Transaction_Source_Id)
190 OR ( (Recinfo.transaction_source_id IS NULL)
191 AND (X_Transaction_Source_Id IS NULL)))
192 AND ( (Recinfo.transaction_source_name = X_Transaction_Source_Name)
193 OR ( (Recinfo.transaction_source_name IS NULL)
194 AND (X_Transaction_Source_Name IS NULL)))
195 AND (Recinfo.transaction_date = X_Transaction_Date)
196 AND (Recinfo.acct_period_id = X_Acct_Period_Id)
197 AND ( (Recinfo.distribution_account_id = X_Distribution_Account_Id)
198 OR ( (Recinfo.distribution_account_id IS NULL)
199 AND (X_Distribution_Account_Id IS NULL)))
200 AND ( (Recinfo.transaction_reference = X_Transaction_Reference)
201 OR ( (Recinfo.transaction_reference IS NULL)
202 AND (X_Transaction_Reference IS NULL)))
203 AND ( (Recinfo.reason_id = X_Reason_Id)
204 OR ( (Recinfo.reason_id IS NULL)
205 AND (X_Reason_Id IS NULL)))
206 AND ( (Recinfo.lot_number = X_Lot_Number)
207 OR ( (Recinfo.lot_number IS NULL)
208 AND (X_Lot_Number IS NULL)))
209 AND ( (Recinfo.lot_expiration_date = X_Lot_Expiration_Date)
210 OR ( (Recinfo.lot_expiration_date IS NULL)
211 AND (X_Lot_Expiration_Date IS NULL)))
212 AND ( (Recinfo.serial_number = X_Serial_Number)
213 OR ( (Recinfo.serial_number IS NULL)
214 AND (X_Serial_Number IS NULL)))
215 AND ( (Recinfo.receiving_document = X_Receiving_Document)
216 OR ( (Recinfo.receiving_document IS NULL)
217 AND (X_Receiving_Document IS NULL)))
218 AND ( (Recinfo.rcv_transaction_id = X_Rcv_Transaction_Id)
219 OR ( (Recinfo.rcv_transaction_id IS NULL)
220 AND (X_Rcv_Transaction_Id IS NULL)))
221 AND ( (Recinfo.move_transaction_id = X_Move_Transaction_Id)
222 OR ( (Recinfo.move_transaction_id IS NULL)
223 AND (X_Move_Transaction_Id IS NULL)))
224 AND ( (Recinfo.completion_transaction_id = X_Completion_Transaction_Id)
225 OR ( (Recinfo.completion_transaction_id IS NULL)
226 AND (X_Completion_Transaction_Id IS NULL)))
227 AND ( (Recinfo.wip_entity_type = X_Wip_Entity_Type)
228 OR ( (Recinfo.wip_entity_type IS NULL)
229 AND (X_Wip_Entity_Type IS NULL)))
230 AND ( (Recinfo.schedule_id = X_Schedule_Id)
231 OR ( (Recinfo.schedule_id IS NULL)
232 AND (X_Schedule_Id IS NULL)))
233 AND ( (Recinfo.employee_code = X_Employee_Code)
234 OR ( (Recinfo.employee_code IS NULL)
235 AND (X_Employee_Code IS NULL)))
236 AND ( (Recinfo.schedule_update_code = X_Schedule_Update_Code)
237 OR ( (Recinfo.schedule_update_code IS NULL)
238 AND (X_Schedule_Update_Code IS NULL)))
239 AND ( (Recinfo.lpn_id = X_lpn_id)
240 OR ( (Recinfo.lpn_id IS NULL)
241 AND (X_lpn_id IS NULL)))
242 AND ( (Recinfo.content_lpn_id = X_content_lpn_id)
243 OR ( (Recinfo.content_lpn_id IS NULL)
244 AND (X_content_lpn_id IS NULL)))
245 AND ( (Recinfo.transfer_lpn_id = X_transfer_lpn_id)
246 OR ( (Recinfo.transfer_lpn_id IS NULL)
247 AND (X_transfer_lpn_id IS NULL)))
248 AND ( (Recinfo.transfer_cost_group_id = X_transfer_cost_group_id)
249 OR ( (Recinfo.transfer_cost_group_id IS NULL)
250 AND (X_transfer_cost_group_id IS NULL)))
251 ) then
252 RAISE RECORD_CHANGED;
253 end if;
254 if not (
255 ( (Recinfo.setup_teardown_code = X_Setup_Teardown_Code)
256 OR ( (Recinfo.setup_teardown_code IS NULL)
257 AND (X_Setup_Teardown_Code IS NULL)))
258 AND ( (Recinfo.operation_seq_num = X_Operation_Seq_Num)
259 OR ( (Recinfo.operation_seq_num IS NULL)
260 AND (X_Operation_Seq_Num IS NULL)))
261 AND ( (Recinfo.picking_line_id = X_Picking_Line_Id)
262 OR ( (Recinfo.picking_line_id IS NULL)
263 AND (X_Picking_Line_Id IS NULL)))
264 AND ( (Recinfo.trx_source_line_id = X_Trx_Source_Line_Id)
265 OR ( (Recinfo.trx_source_line_id IS NULL)
266 AND (X_Trx_Source_Line_Id IS NULL)))
267 AND ( (Recinfo.trx_source_delivery_id = X_Trx_Source_Delivery_Id)
268 OR ( (Recinfo.trx_source_delivery_id IS NULL)
269 AND (X_Trx_Source_Delivery_Id IS NULL)))
270 AND ( (Recinfo.physical_adjustment_id = X_Physical_Adjustment_Id)
271 OR ( (Recinfo.physical_adjustment_id IS NULL)
272 AND (X_Physical_Adjustment_Id IS NULL)))
273 AND ( (Recinfo.cycle_count_id = X_Cycle_Count_Id)
274 OR ( (Recinfo.cycle_count_id IS NULL)
275 AND (X_Cycle_Count_Id IS NULL)))
276 AND ( (Recinfo.rma_line_id = X_Rma_Line_Id)
277 OR ( (Recinfo.rma_line_id IS NULL)
278 AND (X_Rma_Line_Id IS NULL)))
279 AND ( (Recinfo.customer_ship_id = X_Customer_Ship_Id)
280 OR ( (Recinfo.customer_ship_id IS NULL)
281 AND (X_Customer_Ship_Id IS NULL)))
282 AND ( (Recinfo.currency_code = X_Currency_Code)
283 OR ( (Recinfo.currency_code IS NULL)
284 AND (X_Currency_Code IS NULL)))
285 AND ( (Recinfo.currency_conversion_rate = X_Currency_Conversion_Rate)
286 OR ( (Recinfo.currency_conversion_rate IS NULL)
287 AND (X_Currency_Conversion_Rate IS NULL)))
288 AND ( (Recinfo.currency_conversion_type = X_Currency_Conversion_Type)
289 OR ( (Recinfo.currency_conversion_type IS NULL)
290 AND (X_Currency_Conversion_Type IS NULL)))
291 AND ( (Recinfo.currency_conversion_date = X_Currency_Conversion_Date)
295 OR ( (Recinfo.ussgl_transaction_code IS NULL)
292 OR ( (Recinfo.currency_conversion_date IS NULL)
293 AND (X_Currency_Conversion_Date IS NULL)))
294 AND ( (Recinfo.ussgl_transaction_code = X_Ussgl_Transaction_Code)
296 AND (X_Ussgl_Transaction_Code IS NULL)))
297 AND ( (Recinfo.vendor_lot_number = X_Vendor_Lot_Number)
298 OR ( (Recinfo.vendor_lot_number IS NULL)
299 AND (X_Vendor_Lot_Number IS NULL)))
300 AND ( (Recinfo.encumbrance_account = X_Encumbrance_Account)
301 OR ( (Recinfo.encumbrance_account IS NULL)
302 AND (X_Encumbrance_Account IS NULL)))
303 AND ( (Recinfo.encumbrance_amount = X_Encumbrance_Amount)
304 OR ( (Recinfo.encumbrance_amount IS NULL)
305 AND (X_Encumbrance_Amount IS NULL)))
306 AND ( (Recinfo.shipment_number = X_Shipment_Number)
307 OR ( (Recinfo.shipment_number IS NULL)
308 AND (X_Shipment_Number IS NULL)))
309 AND ( (Recinfo.transfer_cost = X_Transfer_Cost)
310 OR ( (Recinfo.transfer_cost IS NULL)
311 AND (X_Transfer_Cost IS NULL)))
312 AND ( (Recinfo.transportation_cost = X_Transportation_Cost)
313 OR ( (Recinfo.transportation_cost IS NULL)
314 AND (X_Transportation_Cost IS NULL)))
315 AND ( (Recinfo.transportation_account = X_Transportation_Account)
316 OR ( (Recinfo.transportation_account IS NULL)
317 AND (X_Transportation_Account IS NULL)))
318 AND ( (Recinfo.freight_code = X_Freight_Code)
319 OR ( (Recinfo.freight_code IS NULL)
320 AND (X_Freight_Code IS NULL)))
321 AND ( (Recinfo.containers = X_Containers)
322 OR ( (Recinfo.containers IS NULL)
323 AND (X_Containers IS NULL)))
324 AND ( (Recinfo.waybill_airbill = X_Waybill_Airbill)
325 OR ( (Recinfo.waybill_airbill IS NULL)
326 AND (X_Waybill_Airbill IS NULL)))
327 AND ( (Recinfo.expected_arrival_date = X_Expected_Arrival_Date)
328 OR ( (Recinfo.expected_arrival_date IS NULL)
329 AND (X_Expected_Arrival_Date IS NULL)))
330 AND ( (Recinfo.transfer_subinventory = X_Transfer_Subinventory)
331 OR ( (Recinfo.transfer_subinventory IS NULL)
332 AND (X_Transfer_Subinventory IS NULL)))
333 AND ( (Recinfo.transfer_organization = X_Transfer_Organization)
334 OR ( (Recinfo.transfer_organization IS NULL)
335 AND (X_Transfer_Organization IS NULL)))
336 AND ( (Recinfo.transfer_to_location = X_Transfer_To_Location)
337 OR ( (Recinfo.transfer_to_location IS NULL)
338 AND (X_Transfer_To_Location IS NULL)))
339 ) then
340 RAISE RECORD_CHANGED;
341 end if;
342 if not (
343 ( (Recinfo.new_average_cost = X_New_Average_Cost)
344 OR ( (Recinfo.new_average_cost IS NULL)
345 AND (X_New_Average_Cost IS NULL)))
346 AND ( (Recinfo.value_change = X_Value_Change)
347 OR ( (Recinfo.value_change IS NULL)
348 AND (X_Value_Change IS NULL)))
349 AND ( (Recinfo.percentage_change = X_Percentage_Change)
350 OR ( (Recinfo.percentage_change IS NULL)
351 AND (X_Percentage_Change IS NULL)))
352 AND ( (Recinfo.material_allocation_temp_id = X_Material_Allocation_Temp_Id)
353 OR ( (Recinfo.material_allocation_temp_id IS NULL)
354 AND (X_Material_Allocation_Temp_Id IS NULL)))
355 AND ( (Recinfo.demand_source_header_id = X_Demand_Source_Header_Id)
356 OR ( (Recinfo.demand_source_header_id IS NULL)
357 AND (X_Demand_Source_Header_Id IS NULL)))
358 AND ( (Recinfo.demand_source_line = X_Demand_Source_Line)
359 OR ( (Recinfo.demand_source_line IS NULL)
360 AND (X_Demand_Source_Line IS NULL)))
361 AND ( (Recinfo.demand_source_delivery = X_Demand_Source_Delivery)
362 OR ( (Recinfo.demand_source_delivery IS NULL)
363 AND (X_Demand_Source_Delivery IS NULL)))
364 -- AND ( (Recinfo.item_description = X_Item_Description)
365 -- OR ( (Recinfo.item_description IS NULL)
366 -- AND (X_Item_Description IS NULL)))
367 -- commented the above code for the bug # 5842519
368 AND ( (Recinfo.wip_supply_type = X_Wip_Supply_Type)
369 OR ( (Recinfo.wip_supply_type IS NULL)
370 AND (X_Wip_Supply_Type IS NULL)))
371 AND ( (Recinfo.posting_flag = X_Posting_Flag)
372 OR ( (Recinfo.posting_flag IS NULL)
373 AND (X_Posting_Flag IS NULL)))
374 AND ( (Recinfo.process_flag = X_Process_Flag)
375 OR ( (Recinfo.process_flag IS NULL)
376 AND (X_Process_Flag IS NULL)))
377 AND ( (trim(Recinfo.error_code) = X_Error_Code)
378 OR ( (Recinfo.error_code IS NULL)
379 AND (X_Error_Code IS NULL)))
380 AND ( (Recinfo.attribute_category = X_Attribute_Category)
381 OR ( (Recinfo.attribute_category IS NULL)
382 AND (X_Attribute_Category IS NULL)))
386 AND ( (Recinfo.attribute2 = X_Attribute2)
383 AND ( (Recinfo.attribute1 = X_Attribute1)
384 OR ( (Recinfo.attribute1 IS NULL)
385 AND (X_Attribute1 IS NULL)))
387 OR ( (Recinfo.attribute2 IS NULL)
388 AND (X_Attribute2 IS NULL)))
389 AND ( (Recinfo.attribute3 = X_Attribute3)
390 OR ( (Recinfo.attribute3 IS NULL)
391 AND (X_Attribute3 IS NULL)))
392 AND ( (Recinfo.attribute4 = X_Attribute4)
393 OR ( (Recinfo.attribute4 IS NULL)
394 AND (X_Attribute4 IS NULL)))
395 AND ( (Recinfo.attribute5 = X_Attribute5)
396 OR ( (Recinfo.attribute5 IS NULL)
397 AND (X_Attribute5 IS NULL)))
398 AND ( (Recinfo.attribute6 = X_Attribute6)
399 OR ( (Recinfo.attribute6 IS NULL)
400 AND (X_Attribute6 IS NULL)))
401 AND ( (Recinfo.attribute7 = X_Attribute7)
402 OR ( (Recinfo.attribute7 IS NULL)
403 AND (X_Attribute7 IS NULL)))
404 AND ( (Recinfo.attribute8 = X_Attribute8)
405 OR ( (Recinfo.attribute8 IS NULL)
406 AND (X_Attribute8 IS NULL)))
407 AND ( (Recinfo.attribute9 = X_Attribute9)
408 OR ( (Recinfo.attribute9 IS NULL)
409 AND (X_Attribute9 IS NULL)))
410 AND ( (Recinfo.attribute10 = X_Attribute10)
411 OR ( (Recinfo.attribute10 IS NULL)
412 AND (X_Attribute10 IS NULL)))
413 AND ( (Recinfo.attribute11 = X_Attribute11)
414 OR ( (Recinfo.attribute11 IS NULL)
415 AND (X_Attribute11 IS NULL)))
416 AND ( (Recinfo.attribute12 = X_Attribute12)
417 OR ( (Recinfo.attribute12 IS NULL)
418 AND (X_Attribute12 IS NULL)))
419 AND ( (Recinfo.attribute13 = X_Attribute13)
420 OR ( (Recinfo.attribute13 IS NULL)
421 AND (X_Attribute13 IS NULL)))
422 AND ( (Recinfo.attribute14 = X_Attribute14)
423 OR ( (Recinfo.attribute14 IS NULL)
424 AND (X_Attribute14 IS NULL)))
425 AND ( (Recinfo.attribute15 = X_Attribute15)
426 OR ( (Recinfo.attribute15 IS NULL)
427 AND (X_Attribute15 IS NULL)))
428 AND ( (Recinfo.primary_switch = X_Primary_Switch)
429 OR ( (Recinfo.primary_switch IS NULL)
430 AND (X_Primary_Switch IS NULL)))
431 AND ( (Recinfo.department_code = X_Department_Code)
432 OR ( (Recinfo.department_code IS NULL)
433 AND (X_Department_Code IS NULL)))
434 AND ( (trim(Recinfo.error_explanation) = X_Error_Explanation)
435 OR ( (Recinfo.error_explanation IS NULL)
436 AND (X_Error_Explanation IS NULL)))
437 AND ( (Recinfo.demand_id = X_Demand_Id)
438 OR ( (Recinfo.demand_id IS NULL)
439 AND (X_Demand_Id IS NULL)))
440 AND ( (Recinfo.requisition_line_id = X_Requisition_Line_Id)
441 OR ( (Recinfo.requisition_line_id IS NULL)
442 AND (X_Requisition_Line_Id IS NULL)))
443 AND ( (Recinfo.requisition_distribution_id = X_Requisition_Distribution_Id)
444 OR ( (Recinfo.requisition_distribution_id IS NULL)
445 AND (X_Requisition_Distribution_Id IS NULL)))
446 AND ( (Recinfo.movement_id = X_Movement_Id)
447 OR ( (Recinfo.movement_id IS NULL)
448 AND (X_Movement_Id IS NULL)))
449 ) then
450 RAISE RECORD_CHANGED;
451 end if;
452 if not (
453 ( (Recinfo.source_project_id = X_Source_Project_Id)
454 OR ( (Recinfo.source_project_id IS NULL)
455 AND (X_Source_Project_Id IS NULL)))
456 AND ( (Recinfo.source_task_id = X_Source_Task_Id)
457 OR ( (Recinfo.source_task_id IS NULL)
458 AND (X_Source_Task_Id IS NULL)))
459 AND ( (Recinfo.project_id = X_Project_Id)
460 OR ( (Recinfo.project_id IS NULL)
461 AND (X_Project_Id IS NULL)))
462 AND ( (Recinfo.task_id = X_Task_Id)
463 OR ( (Recinfo.task_id IS NULL)
464 AND (X_Task_Id IS NULL)))
465 AND ( (Recinfo.to_project_id = X_To_Project_Id)
466 OR ( (Recinfo.to_project_id IS NULL)
467 AND (X_To_Project_Id IS NULL)))
468 AND ( (Recinfo.to_task_id = X_To_Task_Id)
469 OR ( (Recinfo.to_task_id IS NULL)
470 AND (X_To_Task_Id IS NULL)))
471 AND ( (Recinfo.pa_expenditure_org_id = X_Pa_Expenditure_Org_Id)
472 OR ( (Recinfo.pa_expenditure_org_id IS NULL)
473 AND (X_Pa_Expenditure_Org_Id IS NULL)))
474 AND ( (Recinfo.expenditure_type = X_Expenditure_Type)
475 OR ( (Recinfo.expenditure_type IS NULL)
476 AND (X_Expenditure_Type IS NULL)))
477 ) then
478 RAISE RECORD_CHANGED;
479 end if;
480 exception
481 WHEN RECORD_CHANGED then
482 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
483 APP_EXCEPTION.Raise_Exception;
484 WHEN OTHERS then
485 raise;
486 END Lock_Row;
490
487
488
489
491 PROCEDURE Update_Row(
492 X_ROWID VARCHAR2,
493 X_TRANSACTION_HEADER_ID NUMBER,
494 X_TRANSACTION_TEMP_ID NUMBER,
495 X_SOURCE_CODE VARCHAR2,
496 X_SOURCE_LINE_ID NUMBER,
497 X_TRANSACTION_MODE NUMBER,
498 X_LOCK_FLAG VARCHAR2,
499 X_LAST_UPDATE_DATE DATE,
500 X_LAST_UPDATED_BY NUMBER,
501 X_CREATION_DATE DATE,
502 X_CREATED_BY NUMBER,
503 X_LAST_UPDATE_LOGIN NUMBER,
504 X_REQUEST_ID NUMBER,
505 X_PROGRAM_APPLICATION_ID NUMBER,
506 X_PROGRAM_ID NUMBER,
507 X_PROGRAM_UPDATE_DATE DATE,
508 X_INVENTORY_ITEM_ID NUMBER,
509 X_REVISION VARCHAR2,
510 X_ORGANIZATION_ID NUMBER,
511 X_SUBINVENTORY_CODE VARCHAR2,
512 X_LOCATOR_ID NUMBER,
513 X_TRANSACTION_QUANTITY NUMBER,
514 X_PRIMARY_QUANTITY NUMBER,
515 X_TRANSACTION_UOM VARCHAR2,
516 X_TRANSACTION_COST NUMBER,
517 X_COST_GROUP_ID NUMBER,
518 X_TRANSACTION_TYPE_ID NUMBER,
519 X_TRANSACTION_ACTION_ID NUMBER,
520 X_TRANSACTION_SOURCE_TYPE_ID NUMBER,
521 X_TRANSACTION_SOURCE_ID NUMBER,
522 X_TRANSACTION_SOURCE_NAME VARCHAR2,
523 X_TRANSACTION_DATE DATE,
524 X_ACCT_PERIOD_ID NUMBER,
525 X_DISTRIBUTION_ACCOUNT_ID NUMBER,
526 X_TRANSACTION_REFERENCE VARCHAR2,
527 X_REASON_ID NUMBER,
528 X_LOT_NUMBER VARCHAR2,
529 X_LOT_EXPIRATION_DATE DATE,
530 X_SERIAL_NUMBER VARCHAR2,
531 X_RECEIVING_DOCUMENT VARCHAR2,
532 X_RCV_TRANSACTION_ID NUMBER,
533 X_MOVE_TRANSACTION_ID NUMBER,
534 X_COMPLETION_TRANSACTION_ID NUMBER,
535 X_WIP_ENTITY_TYPE NUMBER,
536 X_SCHEDULE_ID NUMBER,
537 X_EMPLOYEE_CODE VARCHAR2,
538 X_SCHEDULE_UPDATE_CODE NUMBER,
539 X_SETUP_TEARDOWN_CODE NUMBER,
540 X_OPERATION_SEQ_NUM NUMBER,
541 X_PICKING_LINE_ID NUMBER,
542 X_TRX_SOURCE_LINE_ID NUMBER,
543 X_TRX_SOURCE_DELIVERY_ID NUMBER,
544 X_PHYSICAL_ADJUSTMENT_ID NUMBER,
545 X_CYCLE_COUNT_ID NUMBER,
546 X_RMA_LINE_ID NUMBER,
547 X_CUSTOMER_SHIP_ID NUMBER,
548 X_CURRENCY_CODE VARCHAR2,
549 X_CURRENCY_CONVERSION_RATE NUMBER,
550 X_CURRENCY_CONVERSION_TYPE VARCHAR2,
551 X_CURRENCY_CONVERSION_DATE DATE,
552 X_USSGL_TRANSACTION_CODE VARCHAR2,
553 X_VENDOR_LOT_NUMBER VARCHAR2,
554 X_ENCUMBRANCE_ACCOUNT NUMBER,
555 X_ENCUMBRANCE_AMOUNT NUMBER,
556 X_SHIPMENT_NUMBER VARCHAR2,
557 X_TRANSFER_COST NUMBER,
558 X_TRANSPORTATION_COST NUMBER,
559 X_TRANSPORTATION_ACCOUNT NUMBER,
560 X_FREIGHT_CODE VARCHAR2,
561 X_CONTAINERS NUMBER,
562 X_WAYBILL_AIRBILL VARCHAR2,
563 X_EXPECTED_ARRIVAL_DATE DATE,
564 X_TRANSFER_SUBINVENTORY VARCHAR2,
565 X_TRANSFER_ORGANIZATION NUMBER,
566 X_TRANSFER_TO_LOCATION NUMBER,
567 X_NEW_AVERAGE_COST NUMBER,
568 X_VALUE_CHANGE NUMBER,
569 X_PERCENTAGE_CHANGE NUMBER,
570 X_MATERIAL_ALLOCATION_TEMP_ID NUMBER,
571 X_DEMAND_SOURCE_HEADER_ID NUMBER,
572 X_DEMAND_SOURCE_LINE VARCHAR2,
573 X_DEMAND_SOURCE_DELIVERY VARCHAR2,
574 X_ITEM_DESCRIPTION VARCHAR2,
575 X_WIP_SUPPLY_TYPE NUMBER,
576 X_POSTING_FLAG VARCHAR2,
577 X_PROCESS_FLAG VARCHAR2,
578 X_ERROR_CODE VARCHAR2,
579 X_ATTRIBUTE_CATEGORY VARCHAR2,
580 X_ATTRIBUTE1 VARCHAR2,
581 X_ATTRIBUTE2 VARCHAR2,
582 X_ATTRIBUTE3 VARCHAR2,
583 X_ATTRIBUTE4 VARCHAR2,
584 X_ATTRIBUTE5 VARCHAR2,
585 X_ATTRIBUTE6 VARCHAR2,
586 X_ATTRIBUTE7 VARCHAR2,
587 X_ATTRIBUTE8 VARCHAR2,
588 X_ATTRIBUTE9 VARCHAR2,
589 X_ATTRIBUTE10 VARCHAR2,
590 X_ATTRIBUTE11 VARCHAR2,
591 X_ATTRIBUTE12 VARCHAR2,
592 X_ATTRIBUTE13 VARCHAR2,
593 X_ATTRIBUTE14 VARCHAR2,
594 X_ATTRIBUTE15 VARCHAR2,
595 X_PRIMARY_SWITCH NUMBER,
596 X_DEPARTMENT_CODE VARCHAR2,
597 X_ERROR_EXPLANATION VARCHAR2,
598 X_DEMAND_ID NUMBER,
599 X_REQUISITION_LINE_ID NUMBER,
600 X_REQUISITION_DISTRIBUTION_ID NUMBER,
601 X_MOVEMENT_ID NUMBER,
602 X_SOURCE_PROJECT_ID NUMBER,
603 X_SOURCE_TASK_ID NUMBER,
604 X_PROJECT_ID NUMBER,
605 X_TASK_ID NUMBER,
606 X_TO_PROJECT_ID NUMBER,
607 X_TO_TASK_ID NUMBER,
608 X_PA_EXPENDITURE_ORG_ID NUMBER,
609 X_EXPENDITURE_TYPE VARCHAR2,
610 X_LPN_ID NUMBER,
611 X_TRANSFER_LPN_ID NUMBER,
612 X_TRANSFER_COST_GROUP_ID NUMBER,
613 X_CONTENT_LPN_ID NUMBER
614 ) IS
615 BEGIN
616 UPDATE mtl_material_transactions_temp
617 SET
618 transaction_header_id = X_Transaction_Header_Id,
619 transaction_temp_id = X_Transaction_Temp_Id,
620 source_code = X_Source_Code,
621 source_line_id = X_Source_Line_Id,
622 transaction_mode = X_Transaction_Mode,
623 lock_flag = X_Lock_Flag,
624 last_update_date = X_Last_Update_Date,
625 last_updated_by = X_Last_Updated_By,
626 last_update_login = X_Last_Update_Login,
627 inventory_item_id = X_Inventory_Item_Id,
628 revision = X_Revision,
629 organization_id = X_Organization_Id,
630 subinventory_code = X_Subinventory_Code,
631 locator_id = X_Locator_Id,
632 transaction_quantity = X_Transaction_Quantity,
633 primary_quantity = X_Primary_Quantity,
634 transaction_uom = X_Transaction_Uom,
635 transaction_cost = X_Transaction_Cost,
636 cost_group_id = X_cost_group_id,
637 transaction_type_id = X_Transaction_Type_Id,
638 transaction_action_id = X_Transaction_Action_Id,
639 transaction_source_type_id = X_Transaction_Source_Type_Id,
640 transaction_source_id = X_Transaction_Source_Id,
641 transaction_source_name = X_Transaction_Source_Name,
642 transaction_date = X_Transaction_Date,
643 acct_period_id = X_Acct_Period_Id,
644 distribution_account_id = X_Distribution_Account_Id,
645 transaction_reference = X_Transaction_Reference,
649 serial_number = X_Serial_Number,
646 reason_id = X_Reason_Id,
647 lot_number = X_Lot_Number,
648 lot_expiration_date = X_Lot_Expiration_Date,
650 receiving_document = X_Receiving_Document,
651 rcv_transaction_id = X_Rcv_Transaction_Id,
652 move_transaction_id = X_Move_Transaction_Id,
653 completion_transaction_id = X_Completion_Transaction_Id,
654 wip_entity_type = X_Wip_Entity_Type,
655 schedule_id = X_Schedule_Id,
656 employee_code = X_Employee_Code,
657 schedule_update_code = X_Schedule_Update_Code,
658 setup_teardown_code = X_Setup_Teardown_Code,
659 operation_seq_num = X_Operation_Seq_Num,
660 picking_line_id = X_Picking_Line_Id,
661 trx_source_line_id = X_Trx_Source_Line_Id,
662 trx_source_delivery_id = X_Trx_Source_Delivery_Id,
663 physical_adjustment_id = X_Physical_Adjustment_Id,
664 cycle_count_id = X_Cycle_Count_Id,
665 rma_line_id = X_Rma_Line_Id,
666 customer_ship_id = X_Customer_Ship_Id,
667 currency_code = X_Currency_Code,
668 currency_conversion_rate = X_Currency_Conversion_Rate,
669 currency_conversion_type = X_Currency_Conversion_Type,
670 currency_conversion_date = X_Currency_Conversion_Date,
671 ussgl_transaction_code = X_Ussgl_Transaction_Code,
672 vendor_lot_number = X_Vendor_Lot_Number,
673 encumbrance_account = X_Encumbrance_Account,
674 encumbrance_amount = X_Encumbrance_Amount,
675 shipment_number = X_Shipment_Number,
676 transfer_cost = X_Transfer_Cost,
677 transportation_cost = X_Transportation_Cost,
678 transportation_account = X_Transportation_Account,
679 freight_code = X_Freight_Code,
680 containers = X_Containers,
681 waybill_airbill = X_Waybill_Airbill,
682 expected_arrival_date = X_Expected_Arrival_Date,
683 transfer_subinventory = X_Transfer_Subinventory,
684 transfer_organization = X_Transfer_Organization,
685 transfer_to_location = X_Transfer_To_Location,
686 new_average_cost = X_New_Average_Cost,
687 value_change = X_Value_Change,
688 percentage_change = X_Percentage_Change,
689 material_allocation_temp_id = X_Material_Allocation_Temp_Id,
690 demand_source_header_id = X_Demand_Source_Header_Id,
691 demand_source_line = X_Demand_Source_Line,
692 demand_source_delivery = X_Demand_Source_Delivery,
693 item_description = X_Item_Description,
694 wip_supply_type = X_Wip_Supply_Type,
695 posting_flag = X_Posting_Flag,
696 process_flag = X_Process_Flag,
697 error_code = X_Error_Code,
698 attribute_category = X_Attribute_Category,
699 attribute1 = X_Attribute1,
700 attribute2 = X_Attribute2,
701 attribute3 = X_Attribute3,
702 attribute4 = X_Attribute4,
703 attribute5 = X_Attribute5,
704 attribute6 = X_Attribute6,
705 attribute7 = X_Attribute7,
706 attribute8 = X_Attribute8,
707 attribute9 = X_Attribute9,
708 attribute10 = X_Attribute10,
709 attribute11 = X_Attribute11,
710 attribute12 = X_Attribute12,
711 attribute13 = X_Attribute13,
712 attribute14 = X_Attribute14,
713 attribute15 = X_Attribute15,
714 primary_switch = X_Primary_Switch,
715 department_code = X_Department_Code,
716 error_explanation = X_Error_Explanation,
717 demand_id = X_Demand_Id,
718 requisition_line_id = X_Requisition_Line_Id,
719 requisition_distribution_id = X_Requisition_Distribution_Id,
720 movement_id = X_Movement_Id,
721 source_project_id = X_Source_Project_Id,
722 source_task_id = X_Source_Task_Id,
723 project_id = X_Project_Id,
724 task_id = X_Task_Id,
725 to_project_id = X_To_Project_Id,
726 to_task_id = X_To_Task_Id,
727 pa_expenditure_org_id = X_Pa_Expenditure_Org_Id,
728 expenditure_type = X_Expenditure_Type,
729 lpn_id = X_lpn_id,
730 transfer_lpn_id = X_transfer_lpn_id,
731 transfer_cost_group_id = X_transfer_cost_group_id,
732 content_lpn_id = X_content_lpn_id
733 WHERE rowid = X_Rowid;
734
735 if (SQL%NOTFOUND) then
736 Raise NO_DATA_FOUND;
737 end if;
738 END Update_Row;
739
740 END MTL_TXNS_TEMP_PKG;