[Home] [Help]
PACKAGE BODY: APPS.INV_UTIL
Source
1 PACKAGE BODY inv_util AS
2 /* $Header: INVINUTB.pls 115.6 2002/12/31 20:43:02 lplam ship $ */
3 g_pkg_name VARCHAR2(100) := 'inv_util';
4
5 PROCEDURE insert_mmtt(p_api_version IN NUMBER,
6 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
7 p_commit IN VARCHAR2 := FND_API.G_FALSE,
8 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
9 p_mmtt_rec IN mtl_material_transactions_temp%ROWTYPE,
10 x_trx_header_id OUT NOCOPY NUMBER,
11 x_trx_temp_id OUT NOCOPY NUMBER,
12 x_return_status OUT NOCOPY VARCHAR2,
13 x_msg_count OUT NOCOPY NUMBER,
14 x_msg_data OUT NOCOPY VARCHAR2)
15 IS
16 l_api_version CONSTANT NUMBER := 1.0;
17 l_api_name CONSTANT VARCHAR2(30):= g_pkg_name||'.insert_mmtt';
18 l_trx_type_id NUMBER;
19 l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
20 BEGIN
21 x_return_status := fnd_api.g_ret_sts_success;
22 x_trx_header_id := NULL;
23 x_trx_temp_id := NULL;
24
25 IF (l_debug = 1) THEN
26 inv_log_util.trace('Begin insert_mmtt: action_id: ' || p_mmtt_rec.transaction_action_id, g_pkg_name, 9);
27 END IF;
28
29 -- Standard Start of API savepoint
30 SAVEPOINT sp_insert_mmtt;
31 -- Standard call to check for call compatibility.
32 IF NOT FND_API.Compatible_API_Call ( l_api_version,
33 p_api_version,
34 l_api_name,
35 g_pkg_name)
36 THEN
37 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
38 END IF;
39
40 -- Initialize message list if p_init_msg_list is set to TRUE.
41 IF FND_API.to_Boolean( p_init_msg_list ) THEN
42 FND_MSG_PUB.initialize;
43 END IF;
44
45
46 -- validate the transaction_type_id, transaction_action_id and transaction_source_type_id
47 SELECT transaction_type_id
48 INTO l_trx_type_id
49 FROM mtl_transaction_types
50 WHERE transaction_type_id = p_mmtt_rec.TRANSACTION_TYPE_ID
51 and transaction_action_id = p_mmtt_rec.TRANSACTION_ACTION_ID
52 and transaction_source_type_id = p_mmtt_rec.TRANSACTION_SOURCE_TYPE_ID;
53
54 -- get the transaction_header_id
55 SELECT mtl_material_transactions_s.NEXTVAL
56 INTO x_trx_header_id
57 FROM DUAL;
58
59 -- get the transaction_temp_id
60 SELECT mtl_material_transactions_s.NEXTVAL
61 INTO x_trx_temp_id
62 FROM DUAL;
63
64 INSERT INTO mtl_material_transactions_temp
65 (TRANSACTION_HEADER_ID
66 ,TRANSACTION_TEMP_ID
67 ,SOURCE_CODE
68 ,SOURCE_LINE_ID
69 ,TRANSACTION_MODE
70 ,LOCK_FLAG
71 ,LAST_UPDATE_DATE
72 ,LAST_UPDATED_BY
73 ,CREATION_DATE
74 ,CREATED_BY
75 ,LAST_UPDATE_LOGIN
76 ,REQUEST_ID
77 ,PROGRAM_APPLICATION_ID
78 ,PROGRAM_ID
79 ,PROGRAM_UPDATE_DATE
80 ,INVENTORY_ITEM_ID
81 ,REVISION
82 ,ORGANIZATION_ID
83 ,SUBINVENTORY_CODE
84 ,LOCATOR_ID
85 ,TRANSACTION_QUANTITY
86 ,PRIMARY_QUANTITY
87 ,TRANSACTION_UOM
88 ,TRANSACTION_COST
89 ,TRANSACTION_TYPE_ID
90 ,TRANSACTION_ACTION_ID
91 ,TRANSACTION_SOURCE_TYPE_ID
92 ,TRANSACTION_SOURCE_ID
93 ,TRANSACTION_SOURCE_NAME
94 ,TRANSACTION_DATE
95 ,ACCT_PERIOD_ID
96 ,DISTRIBUTION_ACCOUNT_ID
97 ,TRANSACTION_REFERENCE
98 ,REQUISITION_LINE_ID
99 ,REQUISITION_DISTRIBUTION_ID
100 ,REASON_ID
101 ,LOT_NUMBER
102 ,LOT_EXPIRATION_DATE
103 ,SERIAL_NUMBER
104 ,RECEIVING_DOCUMENT
105 ,DEMAND_ID
106 ,RCV_TRANSACTION_ID
107 ,MOVE_TRANSACTION_ID
108 ,COMPLETION_TRANSACTION_ID
109 ,WIP_ENTITY_TYPE
110 ,SCHEDULE_ID
111 ,REPETITIVE_LINE_ID
112 ,EMPLOYEE_CODE
113 ,PRIMARY_SWITCH
114 ,SCHEDULE_UPDATE_CODE
115 ,SETUP_TEARDOWN_CODE
116 ,ITEM_ORDERING
117 ,NEGATIVE_REQ_FLAG
118 ,OPERATION_SEQ_NUM
119 ,PICKING_LINE_ID
120 ,TRX_SOURCE_LINE_ID
121 ,TRX_SOURCE_DELIVERY_ID
122 ,PHYSICAL_ADJUSTMENT_ID
123 ,CYCLE_COUNT_ID
124 ,RMA_LINE_ID
125 ,CUSTOMER_SHIP_ID
126 ,CURRENCY_CODE
127 ,CURRENCY_CONVERSION_RATE
128 ,CURRENCY_CONVERSION_TYPE
129 ,CURRENCY_CONVERSION_DATE
130 ,USSGL_TRANSACTION_CODE
131 ,VENDOR_LOT_NUMBER
132 ,ENCUMBRANCE_ACCOUNT
133 ,ENCUMBRANCE_AMOUNT
134 ,SHIP_TO_LOCATION
135 ,SHIPMENT_NUMBER
136 ,TRANSFER_COST
137 ,TRANSPORTATION_COST
138 ,TRANSPORTATION_ACCOUNT
139 ,FREIGHT_CODE
140 ,CONTAINERS
141 ,WAYBILL_AIRBILL
142 ,EXPECTED_ARRIVAL_DATE
143 ,TRANSFER_SUBINVENTORY
144 ,TRANSFER_ORGANIZATION
145 ,TRANSFER_TO_LOCATION
146 ,NEW_AVERAGE_COST
147 ,VALUE_CHANGE
148 ,PERCENTAGE_CHANGE
149 ,MATERIAL_ALLOCATION_TEMP_ID
150 ,DEMAND_SOURCE_HEADER_ID
151 ,DEMAND_SOURCE_LINE
152 ,DEMAND_SOURCE_DELIVERY
153 ,ITEM_SEGMENTS
154 ,ITEM_DESCRIPTION
155 ,ITEM_TRX_ENABLED_FLAG
156 ,ITEM_LOCATION_CONTROL_CODE
157 ,ITEM_RESTRICT_SUBINV_CODE
158 ,ITEM_RESTRICT_LOCATORS_CODE
159 ,ITEM_REVISION_QTY_CONTROL_CODE
160 ,ITEM_PRIMARY_UOM_CODE
161 ,ITEM_UOM_CLASS
162 ,ITEM_SHELF_LIFE_CODE
163 ,ITEM_SHELF_LIFE_DAYS
164 ,ITEM_LOT_CONTROL_CODE
165 ,ITEM_SERIAL_CONTROL_CODE
166 ,ITEM_INVENTORY_ASSET_FLAG
167 ,ALLOWED_UNITS_LOOKUP_CODE
168 ,DEPARTMENT_ID
169 ,DEPARTMENT_CODE
170 ,WIP_SUPPLY_TYPE
171 ,SUPPLY_SUBINVENTORY
172 ,SUPPLY_LOCATOR_ID
173 ,VALID_SUBINVENTORY_FLAG
174 ,VALID_LOCATOR_FLAG
175 ,LOCATOR_SEGMENTS
176 ,CURRENT_LOCATOR_CONTROL_CODE
177 ,NUMBER_OF_LOTS_ENTERED
178 ,WIP_COMMIT_FLAG
179 ,NEXT_LOT_NUMBER
180 ,LOT_ALPHA_PREFIX
181 ,NEXT_SERIAL_NUMBER
182 ,SERIAL_ALPHA_PREFIX
183 ,SHIPPABLE_FLAG
184 ,POSTING_FLAG
185 ,REQUIRED_FLAG
186 ,PROCESS_FLAG
187 ,ERROR_CODE
188 ,ERROR_EXPLANATION
189 ,ATTRIBUTE_CATEGORY
190 ,ATTRIBUTE1
191 ,ATTRIBUTE2
192 ,ATTRIBUTE3
193 ,ATTRIBUTE4
194 ,ATTRIBUTE5
195 ,ATTRIBUTE6
196 ,ATTRIBUTE7
197 ,ATTRIBUTE8
198 ,ATTRIBUTE9
199 ,ATTRIBUTE10
200 ,ATTRIBUTE11
201 ,ATTRIBUTE12
202 ,ATTRIBUTE13
203 ,ATTRIBUTE14
204 ,ATTRIBUTE15
205 ,MOVEMENT_ID
206 ,RESERVATION_QUANTITY
207 ,SHIPPED_QUANTITY
208 ,TRANSACTION_LINE_NUMBER
209 ,TASK_ID
210 ,TO_TASK_ID
211 ,SOURCE_TASK_ID
212 ,PROJECT_ID
213 ,SOURCE_PROJECT_ID
214 ,PA_EXPENDITURE_ORG_ID
215 ,TO_PROJECT_ID
216 ,EXPENDITURE_TYPE
217 ,FINAL_COMPLETION_FLAG
218 ,TRANSFER_PERCENTAGE
219 ,TRANSACTION_SEQUENCE_ID
220 ,MATERIAL_ACCOUNT
221 ,MATERIAL_OVERHEAD_ACCOUNT
222 ,RESOURCE_ACCOUNT
223 ,OUTSIDE_PROCESSING_ACCOUNT
224 ,OVERHEAD_ACCOUNT
225 ,FLOW_SCHEDULE
226 ,COST_GROUP_ID
227 ,TRANSFER_COST_GROUP_ID
228 ,DEMAND_CLASS
229 ,QA_COLLECTION_ID
230 ,KANBAN_CARD_ID
231 ,OVERCOMPLETION_TRANSACTION_QTY
232 ,OVERCOMPLETION_PRIMARY_QTY
233 ,OVERCOMPLETION_TRANSACTION_ID
234 ,END_ITEM_UNIT_NUMBER
235 ,SCHEDULED_PAYBACK_DATE
236 ,LINE_TYPE_CODE
237 ,PARENT_TRANSACTION_TEMP_ID
238 ,PUT_AWAY_STRATEGY_ID
239 ,PUT_AWAY_RULE_ID
240 ,PICK_STRATEGY_ID
241 ,PICK_RULE_ID
242 ,MOVE_ORDER_LINE_ID
243 ,TASK_GROUP_ID
244 ,PICK_SLIP_NUMBER
245 ,RESERVATION_ID
246 ,COMMON_BOM_SEQ_ID
247 ,COMMON_ROUTING_SEQ_ID
248 ,ORG_COST_GROUP_ID
249 ,COST_TYPE_ID
250 ,TRANSACTION_STATUS
251 ,STANDARD_OPERATION_ID
252 ,TASK_PRIORITY
253 ,WMS_TASK_TYPE
254 ,PARENT_LINE_ID
255 ,LPN_ID
256 ,TRANSFER_LPN_ID
257 ,WMS_TASK_STATUS
258 ,CONTENT_LPN_ID
259 ,CONTAINER_ITEM_ID
260 ,CARTONIZATION_ID
261 ,PICK_SLIP_DATE
262 ,REBUILD_ITEM_ID
263 ,REBUILD_SERIAL_NUMBER
264 ,REBUILD_ACTIVITY_ID
265 ,REBUILD_JOB_NAME
266 ,ORGANIZATION_TYPE
267 ,TRANSFER_ORGANIZATION_TYPE
268 ,OWNING_ORGANIZATION_ID
269 ,OWNING_TP_TYPE
270 ,XFR_OWNING_ORGANIZATION_ID
271 ,TRANSFER_OWNING_TP_TYPE
272 ,PLANNING_ORGANIZATION_ID
273 ,PLANNING_TP_TYPE
274 ,XFR_PLANNING_ORGANIZATION_ID
275 ,TRANSFER_PLANNING_TP_TYPE
276 ,SECONDARY_UOM_CODE
277 ,SECONDARY_TRANSACTION_QUANTITY
278 ,TRANSACTION_BATCH_ID
279 ,TRANSACTION_BATCH_SEQ)
280 VALUES (
281 x_trx_header_id
282 ,x_trx_temp_id
283 ,p_mmtt_rec.SOURCE_CODE
284 ,p_mmtt_rec.SOURCE_LINE_ID
285 ,p_mmtt_rec.TRANSACTION_MODE
286 ,p_mmtt_rec.LOCK_FLAG
287 ,p_mmtt_rec.LAST_UPDATE_DATE
288 ,p_mmtt_rec.LAST_UPDATED_BY
289 ,p_mmtt_rec.CREATION_DATE
290 ,p_mmtt_rec.CREATED_BY
291 ,p_mmtt_rec.LAST_UPDATE_LOGIN
292 ,p_mmtt_rec.REQUEST_ID
293 ,p_mmtt_rec.PROGRAM_APPLICATION_ID
294 ,p_mmtt_rec.PROGRAM_ID
295 ,p_mmtt_rec.PROGRAM_UPDATE_DATE
296 ,p_mmtt_rec.INVENTORY_ITEM_ID
297 ,p_mmtt_rec.REVISION
298 ,p_mmtt_rec.ORGANIZATION_ID
299 ,p_mmtt_rec.SUBINVENTORY_CODE
300 ,p_mmtt_rec.LOCATOR_ID
301 ,p_mmtt_rec.TRANSACTION_QUANTITY
302 ,p_mmtt_rec.PRIMARY_QUANTITY
303 ,p_mmtt_rec.TRANSACTION_UOM
304 ,p_mmtt_rec.TRANSACTION_COST
305 ,p_mmtt_rec.TRANSACTION_TYPE_ID
306 ,p_mmtt_rec.TRANSACTION_ACTION_ID
307 ,p_mmtt_rec.TRANSACTION_SOURCE_TYPE_ID
308 ,p_mmtt_rec.TRANSACTION_SOURCE_ID
309 ,p_mmtt_rec.TRANSACTION_SOURCE_NAME
310 ,p_mmtt_rec.TRANSACTION_DATE
311 ,p_mmtt_rec.ACCT_PERIOD_ID
312 ,p_mmtt_rec.DISTRIBUTION_ACCOUNT_ID
313 ,p_mmtt_rec.TRANSACTION_REFERENCE
314 ,p_mmtt_rec.REQUISITION_LINE_ID
315 ,p_mmtt_rec.REQUISITION_DISTRIBUTION_ID
316 ,p_mmtt_rec.REASON_ID
317 ,p_mmtt_rec.LOT_NUMBER
318 ,p_mmtt_rec.LOT_EXPIRATION_DATE
319 ,p_mmtt_rec.SERIAL_NUMBER
320 ,p_mmtt_rec.RECEIVING_DOCUMENT
321 ,p_mmtt_rec.DEMAND_ID
322 ,p_mmtt_rec.RCV_TRANSACTION_ID
323 ,p_mmtt_rec.MOVE_TRANSACTION_ID
324 ,p_mmtt_rec.COMPLETION_TRANSACTION_ID
325 ,p_mmtt_rec.WIP_ENTITY_TYPE
326 ,p_mmtt_rec.SCHEDULE_ID
327 ,p_mmtt_rec.REPETITIVE_LINE_ID
328 ,p_mmtt_rec.EMPLOYEE_CODE
329 ,p_mmtt_rec.PRIMARY_SWITCH
330 ,p_mmtt_rec.SCHEDULE_UPDATE_CODE
331 ,p_mmtt_rec.SETUP_TEARDOWN_CODE
332 ,p_mmtt_rec.ITEM_ORDERING
333 ,p_mmtt_rec.NEGATIVE_REQ_FLAG
334 ,p_mmtt_rec.OPERATION_SEQ_NUM
335 ,p_mmtt_rec.PICKING_LINE_ID
336 ,p_mmtt_rec.TRX_SOURCE_LINE_ID
337 ,p_mmtt_rec.TRX_SOURCE_DELIVERY_ID
338 ,p_mmtt_rec.PHYSICAL_ADJUSTMENT_ID
339 ,p_mmtt_rec.CYCLE_COUNT_ID
340 ,p_mmtt_rec.RMA_LINE_ID
341 ,p_mmtt_rec.CUSTOMER_SHIP_ID
342 ,p_mmtt_rec.CURRENCY_CODE
343 ,p_mmtt_rec.CURRENCY_CONVERSION_RATE
344 ,p_mmtt_rec.CURRENCY_CONVERSION_TYPE
345 ,p_mmtt_rec.CURRENCY_CONVERSION_DATE
346 ,p_mmtt_rec.USSGL_TRANSACTION_CODE
347 ,p_mmtt_rec.VENDOR_LOT_NUMBER
348 ,p_mmtt_rec.ENCUMBRANCE_ACCOUNT
349 ,p_mmtt_rec.ENCUMBRANCE_AMOUNT
350 ,p_mmtt_rec.SHIP_TO_LOCATION
351 ,p_mmtt_rec.SHIPMENT_NUMBER
352 ,p_mmtt_rec.TRANSFER_COST
353 ,p_mmtt_rec.TRANSPORTATION_COST
354 ,p_mmtt_rec.TRANSPORTATION_ACCOUNT
355 ,p_mmtt_rec.FREIGHT_CODE
356 ,p_mmtt_rec.CONTAINERS
357 ,p_mmtt_rec.WAYBILL_AIRBILL
358 ,p_mmtt_rec.EXPECTED_ARRIVAL_DATE
359 ,p_mmtt_rec.TRANSFER_SUBINVENTORY
360 ,p_mmtt_rec.TRANSFER_ORGANIZATION
361 ,p_mmtt_rec.TRANSFER_TO_LOCATION
362 ,p_mmtt_rec.NEW_AVERAGE_COST
363 ,p_mmtt_rec.VALUE_CHANGE
364 ,p_mmtt_rec.PERCENTAGE_CHANGE
365 ,p_mmtt_rec.MATERIAL_ALLOCATION_TEMP_ID
366 ,p_mmtt_rec.DEMAND_SOURCE_HEADER_ID
367 ,p_mmtt_rec.DEMAND_SOURCE_LINE
368 ,p_mmtt_rec.DEMAND_SOURCE_DELIVERY
369 ,p_mmtt_rec.ITEM_SEGMENTS
370 ,p_mmtt_rec.ITEM_DESCRIPTION
371 ,p_mmtt_rec.ITEM_TRX_ENABLED_FLAG
372 ,p_mmtt_rec.ITEM_LOCATION_CONTROL_CODE
373 ,p_mmtt_rec.ITEM_RESTRICT_SUBINV_CODE
374 ,p_mmtt_rec.ITEM_RESTRICT_LOCATORS_CODE
375 ,p_mmtt_rec.ITEM_REVISION_QTY_CONTROL_CODE
376 ,p_mmtt_rec.ITEM_PRIMARY_UOM_CODE
377 ,p_mmtt_rec.ITEM_UOM_CLASS
378 ,p_mmtt_rec.ITEM_SHELF_LIFE_CODE
379 ,p_mmtt_rec.ITEM_SHELF_LIFE_DAYS
380 ,p_mmtt_rec.ITEM_LOT_CONTROL_CODE
381 ,p_mmtt_rec.ITEM_SERIAL_CONTROL_CODE
382 ,p_mmtt_rec.ITEM_INVENTORY_ASSET_FLAG
383 ,p_mmtt_rec.ALLOWED_UNITS_LOOKUP_CODE
384 ,p_mmtt_rec.DEPARTMENT_ID
385 ,p_mmtt_rec.DEPARTMENT_CODE
386 ,p_mmtt_rec.WIP_SUPPLY_TYPE
387 ,p_mmtt_rec.SUPPLY_SUBINVENTORY
388 ,p_mmtt_rec.SUPPLY_LOCATOR_ID
389 ,p_mmtt_rec.VALID_SUBINVENTORY_FLAG
390 ,p_mmtt_rec.VALID_LOCATOR_FLAG
391 ,p_mmtt_rec.LOCATOR_SEGMENTS
392 ,p_mmtt_rec.CURRENT_LOCATOR_CONTROL_CODE
393 ,p_mmtt_rec.NUMBER_OF_LOTS_ENTERED
394 ,p_mmtt_rec.WIP_COMMIT_FLAG
395 ,p_mmtt_rec.NEXT_LOT_NUMBER
396 ,p_mmtt_rec.LOT_ALPHA_PREFIX
397 ,p_mmtt_rec.NEXT_SERIAL_NUMBER
398 ,p_mmtt_rec.SERIAL_ALPHA_PREFIX
399 ,p_mmtt_rec.SHIPPABLE_FLAG
400 ,p_mmtt_rec.POSTING_FLAG
401 ,p_mmtt_rec.REQUIRED_FLAG
402 ,p_mmtt_rec.PROCESS_FLAG
403 ,p_mmtt_rec.ERROR_CODE
404 ,p_mmtt_rec.ERROR_EXPLANATION
405 ,p_mmtt_rec.ATTRIBUTE_CATEGORY
406 ,p_mmtt_rec.ATTRIBUTE1
407 ,p_mmtt_rec.ATTRIBUTE2
408 ,p_mmtt_rec.ATTRIBUTE3
409 ,p_mmtt_rec.ATTRIBUTE4
410 ,p_mmtt_rec.ATTRIBUTE5
411 ,p_mmtt_rec.ATTRIBUTE6
412 ,p_mmtt_rec.ATTRIBUTE7
413 ,p_mmtt_rec.ATTRIBUTE8
414 ,p_mmtt_rec.ATTRIBUTE9
415 ,p_mmtt_rec.ATTRIBUTE10
416 ,p_mmtt_rec.ATTRIBUTE11
417 ,p_mmtt_rec.ATTRIBUTE12
418 ,p_mmtt_rec.ATTRIBUTE13
419 ,p_mmtt_rec.ATTRIBUTE14
420 ,p_mmtt_rec.ATTRIBUTE15
421 ,p_mmtt_rec.MOVEMENT_ID
422 ,p_mmtt_rec.RESERVATION_QUANTITY
423 ,p_mmtt_rec.SHIPPED_QUANTITY
424 ,p_mmtt_rec.TRANSACTION_LINE_NUMBER
425 ,p_mmtt_rec.TASK_ID
426 ,p_mmtt_rec.TO_TASK_ID
427 ,p_mmtt_rec.SOURCE_TASK_ID
428 ,p_mmtt_rec.PROJECT_ID
429 ,p_mmtt_rec.SOURCE_PROJECT_ID
430 ,p_mmtt_rec.PA_EXPENDITURE_ORG_ID
431 ,p_mmtt_rec.TO_PROJECT_ID
432 ,p_mmtt_rec.EXPENDITURE_TYPE
433 ,p_mmtt_rec.FINAL_COMPLETION_FLAG
434 ,p_mmtt_rec.TRANSFER_PERCENTAGE
435 ,p_mmtt_rec.TRANSACTION_SEQUENCE_ID
436 ,p_mmtt_rec.MATERIAL_ACCOUNT
437 ,p_mmtt_rec.MATERIAL_OVERHEAD_ACCOUNT
438 ,p_mmtt_rec.RESOURCE_ACCOUNT
439 ,p_mmtt_rec.OUTSIDE_PROCESSING_ACCOUNT
440 ,p_mmtt_rec.OVERHEAD_ACCOUNT
441 ,p_mmtt_rec.FLOW_SCHEDULE
442 ,p_mmtt_rec.COST_GROUP_ID
443 ,p_mmtt_rec.TRANSFER_COST_GROUP_ID
444 ,p_mmtt_rec.DEMAND_CLASS
445 ,p_mmtt_rec.QA_COLLECTION_ID
446 ,p_mmtt_rec.KANBAN_CARD_ID
447 ,p_mmtt_rec.OVERCOMPLETION_TRANSACTION_QTY
448 ,p_mmtt_rec.OVERCOMPLETION_PRIMARY_QTY
449 ,p_mmtt_rec.OVERCOMPLETION_TRANSACTION_ID
450 ,p_mmtt_rec.END_ITEM_UNIT_NUMBER
451 ,p_mmtt_rec.SCHEDULED_PAYBACK_DATE
452 ,p_mmtt_rec.LINE_TYPE_CODE
453 ,p_mmtt_rec.PARENT_TRANSACTION_TEMP_ID
454 ,p_mmtt_rec.PUT_AWAY_STRATEGY_ID
455 ,p_mmtt_rec.PUT_AWAY_RULE_ID
456 ,p_mmtt_rec.PICK_STRATEGY_ID
457 ,p_mmtt_rec.PICK_RULE_ID
458 ,p_mmtt_rec.MOVE_ORDER_LINE_ID
459 ,p_mmtt_rec.TASK_GROUP_ID
460 ,p_mmtt_rec.PICK_SLIP_NUMBER
461 ,p_mmtt_rec.RESERVATION_ID
462 ,p_mmtt_rec.COMMON_BOM_SEQ_ID
463 ,p_mmtt_rec.COMMON_ROUTING_SEQ_ID
464 ,p_mmtt_rec.ORG_COST_GROUP_ID
465 ,p_mmtt_rec.COST_TYPE_ID
466 ,p_mmtt_rec.TRANSACTION_STATUS
467 ,p_mmtt_rec.STANDARD_OPERATION_ID
468 ,p_mmtt_rec.TASK_PRIORITY
469 ,p_mmtt_rec.WMS_TASK_TYPE
470 ,p_mmtt_rec.PARENT_LINE_ID
471 ,p_mmtt_rec.LPN_ID
472 ,p_mmtt_rec.TRANSFER_LPN_ID
473 ,p_mmtt_rec.WMS_TASK_STATUS
474 ,p_mmtt_rec.CONTENT_LPN_ID
475 ,p_mmtt_rec.CONTAINER_ITEM_ID
476 ,p_mmtt_rec.CARTONIZATION_ID
477 ,p_mmtt_rec.PICK_SLIP_DATE
478 ,p_mmtt_rec.REBUILD_ITEM_ID
479 ,p_mmtt_rec.REBUILD_SERIAL_NUMBER
480 ,p_mmtt_rec.REBUILD_ACTIVITY_ID
481 ,p_mmtt_rec.REBUILD_JOB_NAME
482 ,p_mmtt_rec.ORGANIZATION_TYPE
483 ,p_mmtt_rec.TRANSFER_ORGANIZATION_TYPE
484 ,p_mmtt_rec.OWNING_ORGANIZATION_ID
485 ,p_mmtt_rec.OWNING_TP_TYPE
486 ,p_mmtt_rec.XFR_OWNING_ORGANIZATION_ID
487 ,p_mmtt_rec.TRANSFER_OWNING_TP_TYPE
488 ,p_mmtt_rec.PLANNING_ORGANIZATION_ID
489 ,p_mmtt_rec.PLANNING_TP_TYPE
490 ,p_mmtt_rec.XFR_PLANNING_ORGANIZATION_ID
491 ,p_mmtt_rec.TRANSFER_PLANNING_TP_TYPE
492 ,p_mmtt_rec.SECONDARY_UOM_CODE
493 ,p_mmtt_rec.SECONDARY_TRANSACTION_QUANTITY
494 ,p_mmtt_rec.TRANSACTION_BATCH_ID
495 ,p_mmtt_rec.TRANSACTION_BATCH_SEQ);
496
497 -- Standard check of p_commit.
498 IF FND_API.To_Boolean( p_commit ) THEN
499 COMMIT WORK;
500 IF (l_debug = 1) THEN
501 inv_log_util.trace('Inserted a New Record in MMTT', g_pkg_name, 9);
502 END IF;
503 END IF;
504
505 -- Standard call to get message count and if count is 1, get message info.
506 FND_MSG_PUB.Count_And_Get
507 (p_count => x_msg_count,
508 p_data => x_msg_data);
509
510 EXCEPTION
511 WHEN NO_DATA_FOUND THEN
512 ROLLBACK TO sp_insert_mmtt;
513 x_return_status := FND_API.G_RET_STS_ERROR;
514 FND_MESSAGE.SET_NAME('INV', 'INV_TRX_TYPE_ERROR');
515 FND_MSG_PUB.ADD;
516 IF (l_debug = 1) THEN
517 inv_log_util.trace('insert mmtt .. EXCEP NO_DATA_FOUND : ', g_pkg_name, 9);
518 END IF;
519 WHEN FND_API.G_EXC_ERROR THEN
520 ROLLBACK TO sp_insert_mmtt;
521 x_return_status := FND_API.G_RET_STS_ERROR ;
522 FND_MSG_PUB.Count_And_Get
523 (p_encoded => FND_API.G_FALSE,
524 p_count => x_msg_count,
525 p_data => x_msg_data);
526 IF (l_debug = 1) THEN
527 inv_log_util.trace('insert_mmtt .. EXCEP G_EXC_ERROR : ', g_pkg_name, 9);
528 END IF;
529 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
530 ROLLBACK TO sp_insert_mmtt;
531 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
532 FND_MSG_PUB.Count_And_Get
533 (p_encoded => FND_API.G_FALSE,
534 p_count => x_msg_count,
535 p_data => x_msg_data);
536 IF (l_debug = 1) THEN
537 inv_log_util.trace('insert_mmtt .. EXCEP G_EXC_UNEXPECTED_ERROR : ', g_pkg_name, 9);
538 END IF;
539 WHEN OTHERS THEN
540 ROLLBACK TO sp_insert_mmtt;
541 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
542 IF FND_MSG_PUB.Check_Msg_Level
543 (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
544 THEN
545 FND_MSG_PUB.Add_Exc_Msg
546 (G_PKG_NAME,
547 l_api_name);
548 END IF;
549 FND_MSG_PUB.Count_And_Get
550 (p_encoded => FND_API.G_FALSE,
551 p_count => x_msg_count,
552 p_data => x_msg_data);
553 IF (l_debug = 1) THEN
554 inv_log_util.trace('insert_mmtt .. EXCEP others: ' || SQLERRM(SQLCODE), g_pkg_name, 9);
555 END IF;
556 END insert_mmtt;
557 --
558
559 PROCEDURE insert_mtlt(p_api_version IN NUMBER,
560 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
561 p_commit IN VARCHAR2 := FND_API.G_FALSE,
562 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
563 p_mtlt_rec IN mtl_transaction_lots_temp%ROWTYPE,
564 x_return_status OUT NOCOPY VARCHAR2,
565 x_msg_count OUT NOCOPY NUMBER,
566 x_msg_data OUT NOCOPY VARCHAR2)
567 IS
568 l_api_version CONSTANT NUMBER := 1.0;
569 l_api_name CONSTANT VARCHAR2(30):= g_pkg_name||'.insert_mtlt';
570 l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
571 BEGIN
572 x_return_status := fnd_api.g_ret_sts_success;
573
574 -- Standard Start of API savepoint
575 SAVEPOINT sp_insert_mtlt;
576 -- Standard call to check for call compatibility.
577 IF NOT FND_API.Compatible_API_Call ( l_api_version,
578 p_api_version,
579 l_api_name,
580 g_pkg_name)
581 THEN
582 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
583 END IF;
584
585 -- Initialize message list if p_init_msg_list is set to TRUE.
586 IF FND_API.to_Boolean( p_init_msg_list ) THEN
587 FND_MSG_PUB.initialize;
588 END IF;
589
590 INSERT INTO mtl_transaction_lots_temp
591 (TRANSACTION_TEMP_ID
592 ,LAST_UPDATE_DATE
593 ,LAST_UPDATED_BY
594 ,CREATION_DATE
595 ,CREATED_BY
596 ,LAST_UPDATE_LOGIN
597 ,REQUEST_ID
598 ,PROGRAM_APPLICATION_ID
599 ,PROGRAM_ID
600 ,PROGRAM_UPDATE_DATE
601 ,TRANSACTION_QUANTITY
602 ,PRIMARY_QUANTITY
603 ,LOT_NUMBER
604 ,LOT_EXPIRATION_DATE
605 ,ERROR_CODE
606 ,SERIAL_TRANSACTION_TEMP_ID
607 ,GROUP_HEADER_ID
608 ,PUT_AWAY_RULE_ID
609 ,PICK_RULE_ID
610 ,DESCRIPTION
611 ,VENDOR_ID
612 ,SUPPLIER_LOT_NUMBER
613 ,TERRITORY_CODE
614 ,ORIGINATION_DATE
615 ,DATE_CODE
616 ,GRADE_CODE
617 ,CHANGE_DATE
618 ,MATURITY_DATE
619 ,STATUS_ID
620 ,RETEST_DATE
621 ,AGE
622 ,ITEM_SIZE
623 ,COLOR
624 ,VOLUME
625 ,VOLUME_UOM
626 ,PLACE_OF_ORIGIN
627 ,BEST_BY_DATE
628 ,LENGTH
629 ,LENGTH_UOM
630 ,RECYCLED_CONTENT
631 ,THICKNESS
632 ,THICKNESS_UOM
633 ,WIDTH
634 ,WIDTH_UOM
635 ,CURL_WRINKLE_FOLD
636 ,LOT_ATTRIBUTE_CATEGORY
637 ,C_ATTRIBUTE1
638 ,C_ATTRIBUTE2
639 ,C_ATTRIBUTE3
640 ,C_ATTRIBUTE4
641 ,C_ATTRIBUTE5
642 ,C_ATTRIBUTE6
643 ,C_ATTRIBUTE7
644 ,C_ATTRIBUTE8
645 ,C_ATTRIBUTE9
646 ,C_ATTRIBUTE10
647 ,C_ATTRIBUTE11
648 ,C_ATTRIBUTE12
649 ,C_ATTRIBUTE13
650 ,C_ATTRIBUTE14
651 ,C_ATTRIBUTE15
652 ,C_ATTRIBUTE16
653 ,C_ATTRIBUTE17
654 ,C_ATTRIBUTE18
655 ,C_ATTRIBUTE19
656 ,C_ATTRIBUTE20
657 ,D_ATTRIBUTE1
658 ,D_ATTRIBUTE2
659 ,D_ATTRIBUTE3
660 ,D_ATTRIBUTE4
661 ,D_ATTRIBUTE5
662 ,D_ATTRIBUTE6
663 ,D_ATTRIBUTE7
664 ,D_ATTRIBUTE8
665 ,D_ATTRIBUTE9
666 ,D_ATTRIBUTE10
667 ,N_ATTRIBUTE1
668 ,N_ATTRIBUTE2
669 ,N_ATTRIBUTE3
670 ,N_ATTRIBUTE4
671 ,N_ATTRIBUTE5
672 ,N_ATTRIBUTE6
673 ,N_ATTRIBUTE7
674 ,N_ATTRIBUTE8
675 ,N_ATTRIBUTE9
676 ,N_ATTRIBUTE10
677 ,VENDOR_NAME
678 ,SUBLOT_NUM
679 ,SECONDARY_QUANTITY
680 ,SECONDARY_UNIT_OF_MEASURE
681 ,QC_GRADE)
682 VALUES (
683 p_mtlt_rec.TRANSACTION_TEMP_ID
684 ,p_mtlt_rec.LAST_UPDATE_DATE
685 ,p_mtlt_rec.LAST_UPDATED_BY
686 ,p_mtlt_rec.CREATION_DATE
687 ,p_mtlt_rec.CREATED_BY
688 ,p_mtlt_rec.LAST_UPDATE_LOGIN
689 ,p_mtlt_rec.REQUEST_ID
690 ,p_mtlt_rec.PROGRAM_APPLICATION_ID
691 ,p_mtlt_rec.PROGRAM_ID
692 ,p_mtlt_rec.PROGRAM_UPDATE_DATE
693 ,ABS(p_mtlt_rec.TRANSACTION_QUANTITY)
694 ,ABS(p_mtlt_rec.PRIMARY_QUANTITY)
695 ,p_mtlt_rec.LOT_NUMBER
696 ,p_mtlt_rec.LOT_EXPIRATION_DATE
697 ,p_mtlt_rec.ERROR_CODE
698 ,p_mtlt_rec.SERIAL_TRANSACTION_TEMP_ID
699 ,p_mtlt_rec.GROUP_HEADER_ID
700 ,p_mtlt_rec.PUT_AWAY_RULE_ID
701 ,p_mtlt_rec.PICK_RULE_ID
702 ,p_mtlt_rec.DESCRIPTION
703 ,p_mtlt_rec.VENDOR_ID
704 ,p_mtlt_rec.SUPPLIER_LOT_NUMBER
705 ,p_mtlt_rec.TERRITORY_CODE
706 ,p_mtlt_rec.ORIGINATION_DATE
707 ,p_mtlt_rec.DATE_CODE
708 ,p_mtlt_rec.GRADE_CODE
709 ,p_mtlt_rec.CHANGE_DATE
710 ,p_mtlt_rec.MATURITY_DATE
711 ,p_mtlt_rec.STATUS_ID
712 ,p_mtlt_rec.RETEST_DATE
713 ,p_mtlt_rec.AGE
714 ,p_mtlt_rec.ITEM_SIZE
715 ,p_mtlt_rec.COLOR
716 ,p_mtlt_rec.VOLUME
717 ,p_mtlt_rec.VOLUME_UOM
718 ,p_mtlt_rec.PLACE_OF_ORIGIN
719 ,p_mtlt_rec.BEST_BY_DATE
720 ,p_mtlt_rec.LENGTH
721 ,p_mtlt_rec.LENGTH_UOM
722 ,p_mtlt_rec.RECYCLED_CONTENT
723 ,p_mtlt_rec.THICKNESS
724 ,p_mtlt_rec.THICKNESS_UOM
725 ,p_mtlt_rec.WIDTH
726 ,p_mtlt_rec.WIDTH_UOM
727 ,p_mtlt_rec.CURL_WRINKLE_FOLD
728 ,p_mtlt_rec.LOT_ATTRIBUTE_CATEGORY
729 ,p_mtlt_rec.C_ATTRIBUTE1
730 ,p_mtlt_rec.C_ATTRIBUTE2
731 ,p_mtlt_rec.C_ATTRIBUTE3
732 ,p_mtlt_rec.C_ATTRIBUTE4
733 ,p_mtlt_rec.C_ATTRIBUTE5
734 ,p_mtlt_rec.C_ATTRIBUTE6
735 ,p_mtlt_rec.C_ATTRIBUTE7
736 ,p_mtlt_rec.C_ATTRIBUTE8
737 ,p_mtlt_rec.C_ATTRIBUTE9
738 ,p_mtlt_rec.C_ATTRIBUTE10
739 ,p_mtlt_rec.C_ATTRIBUTE11
740 ,p_mtlt_rec.C_ATTRIBUTE12
741 ,p_mtlt_rec.C_ATTRIBUTE13
742 ,p_mtlt_rec.C_ATTRIBUTE14
743 ,p_mtlt_rec.C_ATTRIBUTE15
744 ,p_mtlt_rec.C_ATTRIBUTE16
745 ,p_mtlt_rec.C_ATTRIBUTE17
746 ,p_mtlt_rec.C_ATTRIBUTE18
747 ,p_mtlt_rec.C_ATTRIBUTE19
748 ,p_mtlt_rec.C_ATTRIBUTE20
749 ,p_mtlt_rec.D_ATTRIBUTE1
750 ,p_mtlt_rec.D_ATTRIBUTE2
751 ,p_mtlt_rec.D_ATTRIBUTE3
752 ,p_mtlt_rec.D_ATTRIBUTE4
753 ,p_mtlt_rec.D_ATTRIBUTE5
754 ,p_mtlt_rec.D_ATTRIBUTE6
755 ,p_mtlt_rec.D_ATTRIBUTE7
756 ,p_mtlt_rec.D_ATTRIBUTE8
757 ,p_mtlt_rec.D_ATTRIBUTE9
758 ,p_mtlt_rec.D_ATTRIBUTE10
759 ,p_mtlt_rec.N_ATTRIBUTE1
760 ,p_mtlt_rec.N_ATTRIBUTE2
761 ,p_mtlt_rec.N_ATTRIBUTE3
762 ,p_mtlt_rec.N_ATTRIBUTE4
763 ,p_mtlt_rec.N_ATTRIBUTE5
764 ,p_mtlt_rec.N_ATTRIBUTE6
765 ,p_mtlt_rec.N_ATTRIBUTE7
766 ,p_mtlt_rec.N_ATTRIBUTE8
767 ,p_mtlt_rec.N_ATTRIBUTE9
768 ,p_mtlt_rec.N_ATTRIBUTE10
769 ,p_mtlt_rec.VENDOR_NAME
770 ,p_mtlt_rec.SUBLOT_NUM
771 ,p_mtlt_rec.SECONDARY_QUANTITY
772 ,p_mtlt_rec.SECONDARY_UNIT_OF_MEASURE
773 ,p_mtlt_rec.QC_GRADE);
774 EXCEPTION
775 WHEN FND_API.G_EXC_ERROR THEN
776 ROLLBACK TO sp_insert_mtlt;
777 x_return_status := FND_API.G_RET_STS_ERROR ;
778 FND_MSG_PUB.Count_And_Get
779 (p_encoded => FND_API.G_FALSE,
780 p_count => x_msg_count,
781 p_data => x_msg_data);
782 IF (l_debug = 1) THEN
783 inv_log_util.trace('insert_mtlt .. EXCEP G_EXC_ERROR : ', g_pkg_name, 9);
784 END IF;
785 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
786 ROLLBACK TO sp_insert_mtlt;
787 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
788 FND_MSG_PUB.Count_And_Get
789 (p_encoded => FND_API.G_FALSE,
790 p_count => x_msg_count,
791 p_data => x_msg_data);
792 IF (l_debug = 1) THEN
793 inv_log_util.trace('insert_mtlt .. EXCEP G_EXC_UNEXPECTED_ERROR : ', g_pkg_name, 9);
794 END IF;
795 WHEN OTHERS THEN
796 ROLLBACK TO sp_insert_mtlt;
797 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
798 IF FND_MSG_PUB.Check_Msg_Level
799 (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
800 THEN
801 FND_MSG_PUB.Add_Exc_Msg
802 (G_PKG_NAME,
803 l_api_name);
804 END IF;
805 FND_MSG_PUB.Count_And_Get
806 (p_encoded => FND_API.G_FALSE,
807 p_count => x_msg_count,
808 p_data => x_msg_data);
809 IF (l_debug = 1) THEN
810 inv_log_util.trace( 'proc_insert_mtlt .. EXCEP others : ', g_pkg_name, 9);
811 END IF;
812 END insert_mtlt;
813 --
814
815 PROCEDURE insert_msnt(p_api_version IN NUMBER,
816 p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
817 p_commit IN VARCHAR2 := FND_API.G_FALSE,
818 p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
819 p_msnt_rec IN mtl_serial_numbers_temp%ROWTYPE,
820 x_return_status OUT NOCOPY VARCHAR2,
821 x_msg_count OUT NOCOPY NUMBER,
822 x_msg_data OUT NOCOPY VARCHAR2)
823 IS
824 l_api_version CONSTANT NUMBER := 1.0;
825 l_api_name CONSTANT VARCHAR2(30):= g_pkg_name||'.insert_msnt';
826 l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
827 BEGIN
828 x_return_status := fnd_api.g_ret_sts_success;
829
830 -- Standard Start of API savepoint
831 SAVEPOINT sp_insert_mmtt;
832 -- Standard call to check for call compatibility.
833 IF NOT FND_API.Compatible_API_Call ( l_api_version,
834 p_api_version,
835 l_api_name,
836 g_pkg_name)
837 THEN
838 RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
839 END IF;
840
841 -- Initialize message list if p_init_msg_list is set to TRUE.
842 IF FND_API.to_Boolean( p_init_msg_list ) THEN
843 FND_MSG_PUB.initialize;
844 END IF;
845
846 INSERT INTO mtl_serial_numbers_temp
847 (TRANSACTION_TEMP_ID
848 ,LAST_UPDATE_DATE
849 ,LAST_UPDATED_BY
850 ,CREATION_DATE
851 ,CREATED_BY
852 ,LAST_UPDATE_LOGIN
853 ,REQUEST_ID
854 ,PROGRAM_APPLICATION_ID
855 ,PROGRAM_ID
856 ,PROGRAM_UPDATE_DATE
857 ,VENDOR_SERIAL_NUMBER
858 ,VENDOR_LOT_NUMBER
859 ,FM_SERIAL_NUMBER
860 ,TO_SERIAL_NUMBER
861 ,SERIAL_PREFIX
862 ,ERROR_CODE
863 ,PARENT_SERIAL_NUMBER
864 ,GROUP_HEADER_ID
865 ,END_ITEM_UNIT_NUMBER
866 ,SERIAL_ATTRIBUTE_CATEGORY
867 ,TERRITORY_CODE
868 ,ORIGINATION_DATE
869 ,C_ATTRIBUTE1
870 ,C_ATTRIBUTE2
871 ,C_ATTRIBUTE3
872 ,C_ATTRIBUTE4
873 ,C_ATTRIBUTE5
874 ,C_ATTRIBUTE6
875 ,C_ATTRIBUTE7
876 ,C_ATTRIBUTE8
877 ,C_ATTRIBUTE9
878 ,C_ATTRIBUTE10
879 ,C_ATTRIBUTE11
880 ,C_ATTRIBUTE12
881 ,C_ATTRIBUTE13
882 ,C_ATTRIBUTE14
883 ,C_ATTRIBUTE15
884 ,C_ATTRIBUTE16
885 ,C_ATTRIBUTE17
886 ,C_ATTRIBUTE18
887 ,C_ATTRIBUTE19
888 ,C_ATTRIBUTE20
889 ,D_ATTRIBUTE1
890 ,D_ATTRIBUTE2
891 ,D_ATTRIBUTE3
892 ,D_ATTRIBUTE4
893 ,D_ATTRIBUTE5
894 ,D_ATTRIBUTE6
895 ,D_ATTRIBUTE7
896 ,D_ATTRIBUTE8
897 ,D_ATTRIBUTE9
898 ,D_ATTRIBUTE10
899 ,N_ATTRIBUTE1
900 ,N_ATTRIBUTE2
901 ,N_ATTRIBUTE3
902 ,N_ATTRIBUTE4
903 ,N_ATTRIBUTE5
904 ,N_ATTRIBUTE6
905 ,N_ATTRIBUTE7
906 ,N_ATTRIBUTE8
907 ,N_ATTRIBUTE9
908 ,N_ATTRIBUTE10
909 ,STATUS_ID
910 ,TIME_SINCE_NEW
911 ,CYCLES_SINCE_NEW
912 ,TIME_SINCE_OVERHAUL
913 ,CYCLES_SINCE_OVERHAUL
914 ,TIME_SINCE_REPAIR
915 ,CYCLES_SINCE_REPAIR
916 ,TIME_SINCE_VISIT
917 ,CYCLES_SINCE_VISIT
918 ,TIME_SINCE_MARK
919 ,CYCLES_SINCE_MARK
920 ,NUMBER_OF_REPAIRS)
921 VALUES (
922 p_msnt_rec.TRANSACTION_TEMP_ID
923 ,p_msnt_rec.LAST_UPDATE_DATE
924 ,p_msnt_rec.LAST_UPDATED_BY
925 ,p_msnt_rec.CREATION_DATE
926 ,p_msnt_rec.CREATED_BY
927 ,p_msnt_rec.LAST_UPDATE_LOGIN
928 ,p_msnt_rec.REQUEST_ID
929 ,p_msnt_rec.PROGRAM_APPLICATION_ID
930 ,p_msnt_rec.PROGRAM_ID
931 ,p_msnt_rec.PROGRAM_UPDATE_DATE
932 ,p_msnt_rec.VENDOR_SERIAL_NUMBER
933 ,p_msnt_rec.VENDOR_LOT_NUMBER
934 ,p_msnt_rec.FM_SERIAL_NUMBER
935 ,p_msnt_rec.TO_SERIAL_NUMBER
936 ,p_msnt_rec.SERIAL_PREFIX
937 ,p_msnt_rec.ERROR_CODE
938 ,p_msnt_rec.PARENT_SERIAL_NUMBER
939 ,p_msnt_rec.GROUP_HEADER_ID
940 ,p_msnt_rec.END_ITEM_UNIT_NUMBER
941 ,p_msnt_rec.SERIAL_ATTRIBUTE_CATEGORY
942 ,p_msnt_rec.TERRITORY_CODE
943 ,p_msnt_rec.ORIGINATION_DATE
944 ,p_msnt_rec.C_ATTRIBUTE1
945 ,p_msnt_rec.C_ATTRIBUTE2
946 ,p_msnt_rec.C_ATTRIBUTE3
947 ,p_msnt_rec.C_ATTRIBUTE4
948 ,p_msnt_rec.C_ATTRIBUTE5
949 ,p_msnt_rec.C_ATTRIBUTE6
950 ,p_msnt_rec.C_ATTRIBUTE7
951 ,p_msnt_rec.C_ATTRIBUTE8
952 ,p_msnt_rec.C_ATTRIBUTE9
953 ,p_msnt_rec.C_ATTRIBUTE10
954 ,p_msnt_rec.C_ATTRIBUTE11
955 ,p_msnt_rec.C_ATTRIBUTE12
956 ,p_msnt_rec.C_ATTRIBUTE13
957 ,p_msnt_rec.C_ATTRIBUTE14
958 ,p_msnt_rec.C_ATTRIBUTE15
959 ,p_msnt_rec.C_ATTRIBUTE16
960 ,p_msnt_rec.C_ATTRIBUTE17
961 ,p_msnt_rec.C_ATTRIBUTE18
962 ,p_msnt_rec.C_ATTRIBUTE19
963 ,p_msnt_rec.C_ATTRIBUTE20
964 ,p_msnt_rec.D_ATTRIBUTE1
965 ,p_msnt_rec.D_ATTRIBUTE2
966 ,p_msnt_rec.D_ATTRIBUTE3
967 ,p_msnt_rec.D_ATTRIBUTE4
968 ,p_msnt_rec.D_ATTRIBUTE5
969 ,p_msnt_rec.D_ATTRIBUTE6
970 ,p_msnt_rec.D_ATTRIBUTE7
971 ,p_msnt_rec.D_ATTRIBUTE8
972 ,p_msnt_rec.D_ATTRIBUTE9
973 ,p_msnt_rec.D_ATTRIBUTE10
974 ,p_msnt_rec.N_ATTRIBUTE1
975 ,p_msnt_rec.N_ATTRIBUTE2
976 ,p_msnt_rec.N_ATTRIBUTE3
977 ,p_msnt_rec.N_ATTRIBUTE4
978 ,p_msnt_rec.N_ATTRIBUTE5
979 ,p_msnt_rec.N_ATTRIBUTE6
980 ,p_msnt_rec.N_ATTRIBUTE7
981 ,p_msnt_rec.N_ATTRIBUTE8
982 ,p_msnt_rec.N_ATTRIBUTE9
983 ,p_msnt_rec.N_ATTRIBUTE10
984 ,p_msnt_rec.STATUS_ID
985 ,p_msnt_rec.TIME_SINCE_NEW
986 ,p_msnt_rec.CYCLES_SINCE_NEW
987 ,p_msnt_rec.TIME_SINCE_OVERHAUL
988 ,p_msnt_rec.CYCLES_SINCE_OVERHAUL
989 ,p_msnt_rec.TIME_SINCE_REPAIR
990 ,p_msnt_rec.CYCLES_SINCE_REPAIR
991 ,p_msnt_rec.TIME_SINCE_VISIT
992 ,p_msnt_rec.CYCLES_SINCE_VISIT
993 ,p_msnt_rec.TIME_SINCE_MARK
994 ,p_msnt_rec.CYCLES_SINCE_MARK
995 ,p_msnt_rec.number_of_repairs);
996 EXCEPTION
997 WHEN FND_API.G_EXC_ERROR THEN
998 ROLLBACK TO sp_insert_msnt;
999 IF FND_MSG_PUB.Check_Msg_Level
1000 (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1001 THEN
1002 FND_MSG_PUB.Add_Exc_Msg
1003 (G_PKG_NAME,
1004 l_api_name);
1005 END IF;
1006 x_return_status := FND_API.G_RET_STS_ERROR;
1007 IF (l_debug = 1) THEN
1008 inv_log_util.trace('proc_insert_msnt .. EXCEP G_EXC_ERROR : ', g_pkg_name, 9);
1009 END IF;
1010 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1011 ROLLBACK TO sp_insert_msnt;
1012 IF FND_MSG_PUB.Check_Msg_Level
1013 (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1014 THEN
1015 FND_MSG_PUB.Add_Exc_Msg
1016 (G_PKG_NAME,
1017 l_api_name);
1018 END IF;
1019 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1020 IF (l_debug = 1) THEN
1021 inv_log_util.trace('proc_insert_msnt .. EXCEP G_EXC_UNEXPECTED_ERROR : ', g_pkg_name, 9);
1022 END IF;
1023 WHEN OTHERS THEN
1024 ROLLBACK TO sp_insert_msnt;
1025 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1026 IF FND_MSG_PUB.Check_Msg_Level
1027 (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1028 THEN
1029 FND_MSG_PUB.Add_Exc_Msg
1030 (G_PKG_NAME,
1031 l_api_name);
1032 END IF;
1033 FND_MSG_PUB.Count_And_Get
1034 (p_encoded => FND_API.G_FALSE,
1035 p_count => x_msg_count,
1036 p_data => x_msg_data);
1037 IF (l_debug = 1) THEN
1038 inv_log_util.trace('proc_insert_msnt .. EXCEP others: ' || SQLERRM(SQLCODE), g_pkg_name, 9) ;
1039 END IF;
1040 END insert_msnt;
1041
1042 END inv_util;