72: l_Organization_Id NUMBER;
73:
74: BEGIN
75:
76: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
77: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item','Begin(+)');
78: END IF;
79:
80: --Print Input Variables
73:
74: BEGIN
75:
76: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
77: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item','Begin(+)');
78: END IF;
79:
80: --Print Input Variables
81: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
77: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item','Begin(+)');
78: END IF;
79:
80: --Print Input Variables
81: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
82: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
83: 'p_Organization_Id :'||p_Organization_Id);
84: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
85: 'p_Item_Description :'||p_Item_Description);
78: END IF;
79:
80: --Print Input Variables
81: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
82: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
83: 'p_Organization_Id :'||p_Organization_Id);
84: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
85: 'p_Item_Description :'||p_Item_Description);
86: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
80: --Print Input Variables
81: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
82: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
83: 'p_Organization_Id :'||p_Organization_Id);
84: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
85: 'p_Item_Description :'||p_Item_Description);
86: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
87: 'p_subinventory :'||p_subinventory);
88: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
82: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
83: 'p_Organization_Id :'||p_Organization_Id);
84: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
85: 'p_Item_Description :'||p_Item_Description);
86: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
87: 'p_subinventory :'||p_subinventory);
88: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
89: 'p_sysdate :'||p_sysdate);
90: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
84: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
85: 'p_Item_Description :'||p_Item_Description);
86: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
87: 'p_subinventory :'||p_subinventory);
88: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
89: 'p_sysdate :'||p_sysdate);
90: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
91: 'p_item_number :'||p_item_number);
92: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
86: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
87: 'p_subinventory :'||p_subinventory);
88: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
89: 'p_sysdate :'||p_sysdate);
90: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
91: 'p_item_number :'||p_item_number);
92: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
93: 'p_item_id :'||p_item_id);
94: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
88: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
89: 'p_sysdate :'||p_sysdate);
90: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
91: 'p_item_number :'||p_item_number);
92: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
93: 'p_item_id :'||p_item_id);
94: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
95: 'p_assign_subinv :'||p_assign_subinv);
96: END IF;
90: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
91: 'p_item_number :'||p_item_number);
92: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
93: 'p_item_id :'||p_item_id);
94: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
95: 'p_assign_subinv :'||p_assign_subinv);
96: END IF;
97:
98: l_validation_level := FND_API.G_VALID_LEVEL_FULL;
181: -- l_Item_rec.ENCUMBRANCE_ACCOUNT := p_distribution_acct_id;
182:
183: l_commit := okl_api.g_FALSE;
184:
185: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
186: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
187: 'before INV_Item_GRP.create_item call sts'||x_return_status);
188: END IF;
189:
182:
183: l_commit := okl_api.g_FALSE;
184:
185: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
186: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
187: 'before INV_Item_GRP.create_item call sts'||x_return_status);
188: END IF;
189:
190: INV_Item_GRP.create_item
196: , x_return_status => x_return_status
197: , x_Error_tbl => x_Error_tbl
198: );
199:
200: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
201: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
202: 'after INV_Item_GRP.create_item call sts'||x_return_status);
203: END IF;
204:
197: , x_Error_tbl => x_Error_tbl
198: );
199:
200: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
201: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
202: 'after INV_Item_GRP.create_item call sts'||x_return_status);
203: END IF;
204:
205: IF ( x_return_status = okl_api.G_RET_STS_SUCCESS ) THEN
259: );
260:
261: END LOOP;
262: END IF;
263: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
264: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
265: 'x_New_Item_Number..'||x_New_Item_Number);
266: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
267: 'x_New_Item_Id..'||x_New_Item_Id);
260:
261: END LOOP;
262: END IF;
263: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
264: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
265: 'x_New_Item_Number..'||x_New_Item_Number);
266: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
267: 'x_New_Item_Id..'||x_New_Item_Id);
268: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
262: END IF;
263: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
264: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
265: 'x_New_Item_Number..'||x_New_Item_Number);
266: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
267: 'x_New_Item_Id..'||x_New_Item_Id);
268: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
269: 'ret status at the end.. '||x_return_status);
270:
264: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
265: 'x_New_Item_Number..'||x_New_Item_Number);
266: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
267: 'x_New_Item_Id..'||x_New_Item_Id);
268: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item.',
269: 'ret status at the end.. '||x_return_status);
270:
271: END IF;
272:
269: 'ret status at the end.. '||x_return_status);
270:
271: END IF;
272:
273: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
274: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item ','End(-)');
275: END IF;
276:
277: EXCEPTION
270:
271: END IF;
272:
273: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
274: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item ','End(-)');
275: END IF;
276:
277: EXCEPTION
278: WHEN OTHERS THEN
275: END IF;
276:
277: EXCEPTION
278: WHEN OTHERS THEN
279: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
280: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item ',
281: 'EXCEPTION :'||sqlerrm);
282: END IF;
283:
276:
277: EXCEPTION
278: WHEN OTHERS THEN
279: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
280: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'OKL_AM_REMARKET_ASSET_PVT.create_inv_item ',
281: 'EXCEPTION :'||sqlerrm);
282: END IF;
283:
284: IF l_seqnextval_csr%ISOPEN THEN
335:
336:
337: BEGIN
338:
339: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
340: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn','Begin(+)');
341: END IF;
342:
343: --Print Input Variables
336:
337: BEGIN
338:
339: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
340: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn','Begin(+)');
341: END IF;
342:
343: --Print Input Variables
344: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
340: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn','Begin(+)');
341: END IF;
342:
343: --Print Input Variables
344: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
345: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
346: 'p_Inventory_Item_id :'||p_Inventory_Item_id);
347:
348: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
341: END IF;
342:
343: --Print Input Variables
344: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
345: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
346: 'p_Inventory_Item_id :'||p_Inventory_Item_id);
347:
348: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
349: 'p_Subinv_Code :'||p_Subinv_Code);
344: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
345: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
346: 'p_Inventory_Item_id :'||p_Inventory_Item_id);
347:
348: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
349: 'p_Subinv_Code :'||p_Subinv_Code);
350: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
351: 'p_Organization_Id :'||p_Organization_Id);
352:
346: 'p_Inventory_Item_id :'||p_Inventory_Item_id);
347:
348: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
349: 'p_Subinv_Code :'||p_Subinv_Code);
350: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
351: 'p_Organization_Id :'||p_Organization_Id);
352:
353: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
354: 'p_quantity :'||p_quantity);
349: 'p_Subinv_Code :'||p_Subinv_Code);
350: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
351: 'p_Organization_Id :'||p_Organization_Id);
352:
353: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
354: 'p_quantity :'||p_quantity);
355: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
356: 'p_trans_type_id :'||p_trans_type_id);
357: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
351: 'p_Organization_Id :'||p_Organization_Id);
352:
353: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
354: 'p_quantity :'||p_quantity);
355: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
356: 'p_trans_type_id :'||p_trans_type_id);
357: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
358: 'p_sysdate :'||p_sysdate);
359: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
353: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
354: 'p_quantity :'||p_quantity);
355: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
356: 'p_trans_type_id :'||p_trans_type_id);
357: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
358: 'p_sysdate :'||p_sysdate);
359: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
360: 'before insert call sts..'||x_return_status);
361: END IF;
355: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
356: 'p_trans_type_id :'||p_trans_type_id);
357: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
358: 'p_sysdate :'||p_sysdate);
359: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn.',
360: 'before insert call sts..'||x_return_status);
361: END IF;
362:
363: -- There is a direct insert into the table here as there is no TAPI with insert procedure to insert into
418: '' /* expenditure_type */
419: );
420: x_return_status := okl_api.g_RET_STS_SUCCESS;
421:
422: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
423: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn ','End(-)');
424: END IF;
425:
426: EXCEPTION
419: );
420: x_return_status := okl_api.g_RET_STS_SUCCESS;
421:
422: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
423: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn ','End(-)');
424: END IF;
425:
426: EXCEPTION
427: WHEN OTHERS THEN
425:
426: EXCEPTION
427: WHEN OTHERS THEN
428: -- unexpected error
429: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
430: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn',
431: 'EXCEPTION :'||sqlerrm);
432: END IF;
433: -- SECHAWLA 16-JAN-03 Bug # 2754280 : Changed the app name from OKL to OKC
426: EXCEPTION
427: WHEN OTHERS THEN
428: -- unexpected error
429: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
430: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'OKL_AM_REMARKET_ASSET_PVT.Create_Inv_Misc_Receipt_Txn',
431: 'EXCEPTION :'||sqlerrm);
432: END IF;
433: -- SECHAWLA 16-JAN-03 Bug # 2754280 : Changed the app name from OKL to OKC
434: OKL_API.set_message(p_app_name => 'OKC',
488: ppr_pricing_attr_tbl QP_PRICE_LIST_PUB.Pricing_Attr_Tbl_Type;
489: ppr_pricing_attr_val_tbl QP_PRICE_LIST_PUB.Pricing_Attr_Val_Tbl_Type;
490: k NUMBER;
491: BEGIN
492: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
493: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List','Begin(+)');
494: END IF;
495:
496: --Print Input Variables
489: ppr_pricing_attr_val_tbl QP_PRICE_LIST_PUB.Pricing_Attr_Val_Tbl_Type;
490: k NUMBER;
491: BEGIN
492: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
493: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List','Begin(+)');
494: END IF;
495:
496: --Print Input Variables
497: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
493: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List','Begin(+)');
494: END IF;
495:
496: --Print Input Variables
497: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
498: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List.',
499: 'p_Price_List_id :'||p_Price_List_id);
500: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List.',
501: 'p_Item_Id :'||p_Item_Id);
494: END IF;
495:
496: --Print Input Variables
497: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
498: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List.',
499: 'p_Price_List_id :'||p_Price_List_id);
500: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List.',
501: 'p_Item_Id :'||p_Item_Id);
502: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List.',
496: --Print Input Variables
497: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
498: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List.',
499: 'p_Price_List_id :'||p_Price_List_id);
500: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List.',
501: 'p_Item_Id :'||p_Item_Id);
502: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List.',
503: 'p_Item_Price :'||p_Item_Price);
504:
498: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List.',
499: 'p_Price_List_id :'||p_Price_List_id);
500: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List.',
501: 'p_Item_Id :'||p_Item_Id);
502: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List.',
503: 'p_Item_Price :'||p_Item_Price);
504:
505: END IF;
506:
528: gpr_pricing_attr_tbl(1).PRICE_LIST_LINE_INDEX := 1;
529: gpr_pricing_attr_tbl(1).operation := QP_GLOBALS.G_OPR_CREATE;
530:
531:
532: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
533: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List.',
534: 'before QP_PRICE_LIST_PUB.Process_Price_List sts..'||x_return_status);
535: END IF;
536: QP_PRICE_LIST_PUB.Process_Price_List
529: gpr_pricing_attr_tbl(1).operation := QP_GLOBALS.G_OPR_CREATE;
530:
531:
532: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
533: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List.',
534: 'before QP_PRICE_LIST_PUB.Process_Price_List sts..'||x_return_status);
535: END IF;
536: QP_PRICE_LIST_PUB.Process_Price_List
537: ( p_api_version_number => p_api_version
555: );
556:
557: -- return status of the above procedure call becomes the return status of the current procedure which is then
558: -- handled in the calling procedure - create_rmk_item
559: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
560: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List.',
561: 'after QP_PRICE_LIST_PUB.Process_Price_List sts..'||x_return_status);
562: END IF;
563:
556:
557: -- return status of the above procedure call becomes the return status of the current procedure which is then
558: -- handled in the calling procedure - create_rmk_item
559: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
560: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List.',
561: 'after QP_PRICE_LIST_PUB.Process_Price_List sts..'||x_return_status);
562: END IF;
563:
564: -- SECHAWLA 08-DEC-04 4047159 : added the following message
571: p_token2 => 'PRICE_LIST',
572: p_token2_value => p_price_list_name);
573: END IF;
574:
575: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
576: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List ','End(-)');
577: END IF;
578: EXCEPTION
579: WHEN OTHERS THEN
572: p_token2_value => p_price_list_name);
573: END IF;
574:
575: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
576: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List ','End(-)');
577: END IF;
578: EXCEPTION
579: WHEN OTHERS THEN
580: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
576: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List ','End(-)');
577: END IF;
578: EXCEPTION
579: WHEN OTHERS THEN
580: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
581: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List ',
582: 'EXCEPTION :'||sqlerrm);
583: END IF;
584: -- unexpected error
577: END IF;
578: EXCEPTION
579: WHEN OTHERS THEN
580: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
581: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'OKL_AM_REMARKET_ASSET_PVT.Create_Item_In_Price_List ',
582: 'EXCEPTION :'||sqlerrm);
583: END IF;
584: -- unexpected error
585: -- SECHAWLA 16-JAN-03 Bug # 2754280 : Changed the app name from OKL to OKC
761: l_item_cnt NUMBER;
762:
763:
764: BEGIN
765: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
766: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item','Begin(+)');
767: END IF;
768:
769: --Print Input Variables
762:
763:
764: BEGIN
765: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
766: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item','Begin(+)');
767: END IF;
768:
769: --Print Input Variables
770: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
766: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item','Begin(+)');
767: END IF;
768:
769: --Print Input Variables
770: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
771: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
772: 'p_init_msg_list :'||p_init_msg_list);
773: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
774: 'p_item_number :'||p_item_number);
767: END IF;
768:
769: --Print Input Variables
770: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
771: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
772: 'p_init_msg_list :'||p_init_msg_list);
773: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
774: 'p_item_number :'||p_item_number);
775: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
769: --Print Input Variables
770: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
771: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
772: 'p_init_msg_list :'||p_init_msg_list);
773: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
774: 'p_item_number :'||p_item_number);
775: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
776: 'p_Item_Description :'||p_Item_Description);
777: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
771: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
772: 'p_init_msg_list :'||p_init_msg_list);
773: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
774: 'p_item_number :'||p_item_number);
775: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
776: 'p_Item_Description :'||p_Item_Description);
777: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
778: 'p_Item_Price :'||p_Item_Price);
779: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
773: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
774: 'p_item_number :'||p_item_number);
775: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
776: 'p_Item_Description :'||p_Item_Description);
777: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
778: 'p_Item_Price :'||p_Item_Price);
779: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
780: 'p_quantity :'||p_quantity);
781:
775: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
776: 'p_Item_Description :'||p_Item_Description);
777: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
778: 'p_Item_Price :'||p_Item_Price);
779: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
780: 'p_quantity :'||p_quantity);
781:
782: END IF;
783:
1079: l_user_profile_name := okl_am_util_pvt.get_user_profile_option_name(
1080: p_profile_option_name => 'ASO_ORDER_TYPE_ID',
1081: x_return_status => x_return_status);
1082:
1083: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1084: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1085: 'l_user_profile_name status'||x_return_status);
1086: END IF;
1087:
1080: p_profile_option_name => 'ASO_ORDER_TYPE_ID',
1081: x_return_status => x_return_status);
1082:
1083: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1084: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1085: 'l_user_profile_name status'||x_return_status);
1086: END IF;
1087:
1088: IF x_return_status = OKL_API.G_RET_STS_ERROR THEN
1109: -- get the warehouse and the Line Type for the Default Order Type
1110: OPEN l_oetranstypesall_csr(l_default_order_type_id);
1111: FETCH l_oetranstypesall_csr INTO l_order_warehouse_id, l_def_outbound_line_type_id, l_order_name;
1112: -- This fetch will definitely find the record in oe_transaction_types_all
1113: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1114: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1115: 'fetched l_oetranstypesall_csr..');
1116: END IF;
1117:
1110: OPEN l_oetranstypesall_csr(l_default_order_type_id);
1111: FETCH l_oetranstypesall_csr INTO l_order_warehouse_id, l_def_outbound_line_type_id, l_order_name;
1112: -- This fetch will definitely find the record in oe_transaction_types_all
1113: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1114: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1115: 'fetched l_oetranstypesall_csr..');
1116: END IF;
1117:
1118: CLOSE l_oetranstypesall_csr;
1116: END IF;
1117:
1118: CLOSE l_oetranstypesall_csr;
1119:
1120: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1121: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1122: 'l_order_warehouse_id..'||l_order_warehouse_id);
1123: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1124: 'l_def_outbound_line_type_id..'||l_def_outbound_line_type_id);
1117:
1118: CLOSE l_oetranstypesall_csr;
1119:
1120: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1121: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1122: 'l_order_warehouse_id..'||l_order_warehouse_id);
1123: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1124: 'l_def_outbound_line_type_id..'||l_def_outbound_line_type_id);
1125: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1119:
1120: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1121: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1122: 'l_order_warehouse_id..'||l_order_warehouse_id);
1123: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1124: 'l_def_outbound_line_type_id..'||l_def_outbound_line_type_id);
1125: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1126: 'l_order_name..'||l_order_name);
1127: END IF;
1121: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1122: 'l_order_warehouse_id..'||l_order_warehouse_id);
1123: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1124: 'l_def_outbound_line_type_id..'||l_def_outbound_line_type_id);
1125: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1126: 'l_order_name..'||l_order_name);
1127: END IF;
1128:
1129:
1154: -- get the warehouse for the Line type corresponding to the Default Order Type
1155: OPEN l_oetranstypesall_csr(l_def_outbound_line_type_id);
1156: FETCH l_oetranstypesall_csr INTO l_line_warehouse_id, l_def_outbound_line_type_id, l_line_name;
1157: -- This fetch will definitely find the record in oe_transaction_types_all
1158: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1159: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1160: 'fetched l_oetranstypesall_csr again');
1161: END IF;
1162:
1155: OPEN l_oetranstypesall_csr(l_def_outbound_line_type_id);
1156: FETCH l_oetranstypesall_csr INTO l_line_warehouse_id, l_def_outbound_line_type_id, l_line_name;
1157: -- This fetch will definitely find the record in oe_transaction_types_all
1158: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1159: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1160: 'fetched l_oetranstypesall_csr again');
1161: END IF;
1162:
1163: CLOSE l_oetranstypesall_csr;
1161: END IF;
1162:
1163: CLOSE l_oetranstypesall_csr;
1164:
1165: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1166: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1167: 'l_line_warehouse_id'||l_line_warehouse_id);
1168: END IF;
1169:
1162:
1163: CLOSE l_oetranstypesall_csr;
1164:
1165: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1166: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1167: 'l_line_warehouse_id'||l_line_warehouse_id);
1168: END IF;
1169:
1170: IF l_line_warehouse_id IS NULL THEN
1238: ELSE
1239: l_iterations := 2;
1240: END IF;
1241:
1242: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1243: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1244: 'l_iterations '||l_iterations);
1245: END IF;
1246:
1239: l_iterations := 2;
1240: END IF;
1241:
1242: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1243: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1244: 'l_iterations '||l_iterations);
1245: END IF;
1246:
1247: -- SECHAWLA Bug# 2679812 :
1261: l_item_number := l_New_Item_Number;
1262: l_item_id := l_New_Item_Id;
1263: END IF;
1264:
1265: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1266: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1267: 'l_current_org'||l_current_org);
1268: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1269: 'l_item_number'||l_item_number);
1262: l_item_id := l_New_Item_Id;
1263: END IF;
1264:
1265: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1266: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1267: 'l_current_org'||l_current_org);
1268: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1269: 'l_item_number'||l_item_number);
1270: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1264:
1265: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1266: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1267: 'l_current_org'||l_current_org);
1268: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1269: 'l_item_number'||l_item_number);
1270: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1271: 'l_item_id'||l_item_id);
1272: END IF;
1266: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1267: 'l_current_org'||l_current_org);
1268: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1269: 'l_item_number'||l_item_number);
1270: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1271: 'l_item_id'||l_item_id);
1272: END IF;
1273: ---------------------
1274: -- SECHAWLA 08-MAR-04 3492490 : Moved the following validation here from the beginning. So it can be
1290: p_token2_value => l_master_org_name,
1291: p_token3 => 'CHILD_ORG',
1292: p_token3_value => l_temp_org_name);
1293: */
1294: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1295: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1296: '(l_inv_org_id <> l_master_org_id AND i = 1) sts'||x_return_status);
1297:
1298: END IF;
1291: p_token3 => 'CHILD_ORG',
1292: p_token3_value => l_temp_org_name);
1293: */
1294: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1295: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1296: '(l_inv_org_id <> l_master_org_id AND i = 1) sts'||x_return_status);
1297:
1298: END IF;
1299:
1329:
1330: ---------------------
1331:
1332: -- Create the Item in Inventory
1333: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1334: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1335: 'before create_inv_item call'||x_return_status);
1336:
1337: END IF;
1330: ---------------------
1331:
1332: -- Create the Item in Inventory
1333: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1334: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1335: 'before create_inv_item call'||x_return_status);
1336:
1337: END IF;
1338: create_inv_item
1350: x_New_Item_Number => l_New_Item_Number,
1351: x_New_Item_Id => l_New_Item_Id,
1352: x_return_Status => x_return_status);
1353:
1354: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1355: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1356: 'after create_inv_item call'||x_return_status);
1357:
1358: END IF;
1351: x_New_Item_Id => l_New_Item_Id,
1352: x_return_Status => x_return_status);
1353:
1354: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1355: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1356: 'after create_inv_item call'||x_return_status);
1357:
1358: END IF;
1359:
1370: --master org OR for the child org
1371:
1372: -- Creating Inventory Receipt Transaction for the Item
1373: -- SECHAWLA Bug # 2620853 : No need to pass distribution account id, as it is optional
1374: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1375: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1376: 'before Create_Inv_Misc_Receipt_Txn call'||x_return_status);
1377:
1378: END IF;
1371:
1372: -- Creating Inventory Receipt Transaction for the Item
1373: -- SECHAWLA Bug # 2620853 : No need to pass distribution account id, as it is optional
1374: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1375: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1376: 'before Create_Inv_Misc_Receipt_Txn call'||x_return_status);
1377:
1378: END IF;
1379: Create_Inv_Misc_Receipt_Txn
1386: p_trans_type_id => 42, --- transaction type ID for Receipt Transactions
1387: p_sysdate => l_sysdate,
1388: x_Return_Status => x_return_status);
1389:
1390: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1391: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1392: 'after Create_Inv_Misc_Receipt_Txn call'||x_return_status);
1393:
1394: END IF;
1387: p_sysdate => l_sysdate,
1388: x_Return_Status => x_return_status);
1389:
1390: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1391: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1392: 'after Create_Inv_Misc_Receipt_Txn call'||x_return_status);
1393:
1394: END IF;
1395:
1401:
1402: END IF;
1403:
1404: IF i = 1 THEN -- SECHAWLA Bug# 2679812 :Create price list only for the master item
1405: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1406: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1407: 'before Create_Item_In_Price_List'||x_return_status);
1408:
1409: END IF;
1402: END IF;
1403:
1404: IF i = 1 THEN -- SECHAWLA Bug# 2679812 :Create price list only for the master item
1405: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1406: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1407: 'before Create_Item_In_Price_List'||x_return_status);
1408:
1409: END IF;
1410: -- Create the Item in the Price List
1416: p_price_list_item => l_New_Item_Number, -- SECHAWLA 08-DEC-04 4047159 : added
1417: p_Item_Id => l_New_Item_Id,
1418: p_Item_Price => p_Item_Price,
1419: x_return_status => x_return_status);
1420: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1421: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1422: 'after Create_Item_In_Price_List'||x_return_status);
1423:
1424: END IF;
1417: p_Item_Id => l_New_Item_Id,
1418: p_Item_Price => p_Item_Price,
1419: x_return_status => x_return_status);
1420: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1421: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1422: 'after Create_Item_In_Price_List'||x_return_status);
1423:
1424: END IF;
1425:
1434:
1435: x_New_Item_Number := l_new_item_number;
1436: x_New_Item_Id := l_new_item_id;
1437:
1438: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1439: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1440: 'x_New_Item_Number '||x_New_Item_Number);
1441: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1442: 'x_New_Item_Id '||x_New_Item_Id);
1435: x_New_Item_Number := l_new_item_number;
1436: x_New_Item_Id := l_new_item_id;
1437:
1438: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1439: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1440: 'x_New_Item_Number '||x_New_Item_Number);
1441: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1442: 'x_New_Item_Id '||x_New_Item_Id);
1443:
1437:
1438: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1439: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1440: 'x_New_Item_Number '||x_New_Item_Number);
1441: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item.',
1442: 'x_New_Item_Id '||x_New_Item_Id);
1443:
1444: END IF;
1445:
1442: 'x_New_Item_Id '||x_New_Item_Id);
1443:
1444: END IF;
1445:
1446: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1447: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item ','End(-)');
1448: END IF;
1449:
1450: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1443:
1444: END IF;
1445:
1446: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1447: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item ','End(-)');
1448: END IF;
1449:
1450: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1451:
1450: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1451:
1452: EXCEPTION
1453: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1454: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1455: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item ',
1456: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
1457: END IF;
1458:
1451:
1452: EXCEPTION
1453: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1454: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1455: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item ',
1456: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_ERROR');
1457: END IF;
1458:
1459: IF l_mtlsystemitems_csr%ISOPEN THEN
1504: x_msg_data,
1505: '_PVT'
1506: );
1507: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1508: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1509: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item ',
1510: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
1511: END IF;
1512:
1505: '_PVT'
1506: );
1507: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1508: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1509: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item ',
1510: 'EXCEPTION :'||'OKL_API.G_EXCEPTION_UNEXPECTED_ERROR');
1511: END IF;
1512:
1513: IF l_mtlsystemitems_csr%ISOPEN THEN
1557: '_PVT'
1558: );
1559: WHEN OTHERS THEN
1560:
1561: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1562: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item',
1563: 'EXCEPTION :'||sqlerrm);
1564: END IF;
1565:
1558: );
1559: WHEN OTHERS THEN
1560:
1561: IF (FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1562: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'OKL_AM_REMARKET_ASSET_PVT.create_rmk_item',
1563: 'EXCEPTION :'||sqlerrm);
1564: END IF;
1565:
1566: IF l_mtlsystemitems_csr%ISOPEN THEN