54:
55: l_api_name CONSTANT VARCHAR2(30) := 'insert_item';
56:
57: l_module varchar2(200);
58: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
59: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
60: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
61: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
62:
55: l_api_name CONSTANT VARCHAR2(30) := 'insert_item';
56:
57: l_module varchar2(200);
58: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
59: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
60: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
61: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
62:
63: -- output variables of inv package
56:
57: l_module varchar2(200);
58: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
59: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
60: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
61: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
62:
63: -- output variables of inv package
64: l_x_curr_item_rec INV_Item_GRP.Item_Rec_Type;
57: l_module varchar2(200);
58: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
59: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
60: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
61: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
62:
63: -- output variables of inv package
64: l_x_curr_item_rec INV_Item_GRP.Item_Rec_Type;
65: l_x_curr_item_return_status VARCHAR2(1);
80: l_asset_group.AUTO_SERIAL_ALPHA_PREFIX := p_prefix_text;
81: l_asset_group.START_AUTO_SERIAL_NUMBER := p_prefix_number;
82:
83: IF (l_plog) THEN
84: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
85: '==================== Entered EAM_ITEM_PVT.Insert_item ===================='
86: || 'p_organization_id = ' || p_organization_id
87: || 'p_eam_item_type = ' || p_eam_item_type||
88: 'Comms_NL_Trackable_Flag: '||l_asset_group.comms_nl_trackable_flag||
142:
143: l_asset_group.organization_id := l_master_org_id;
144:
145: IF (l_plog) THEN
146: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
147: 'l_asset_group.organization_id'||l_asset_group.organization_id);
148: END IF;
149:
150: -- Set EAM attributes
161: end if;
162:
163:
164: IF (l_plog) THEN
165: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
166: 'Calling INV_ITEM_GRP.Create_Item...'||
167: 'Comms_NL_Trackable_Flag: '||l_asset_group.comms_nl_trackable_flag||
168: ' Inventory_Item_Flag: '||l_asset_group.Inventory_item_flag);
169: END IF;
178: x_Error_tbl => l_x_master_item_error_tbl
179: );
180:
181: IF (l_plog) THEN
182: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
183: 'Returned from INV_ITEM_GRP.Create_Item...'||
184: 'Comms_NL_Trackable_Flag: '||l_x_master_item_rec.comms_nl_trackable_flag||
185: ' Inventory_Item_Flag: '||l_x_master_item_rec.Inventory_item_flag);
186: END IF;
190: IF (l_master_org_id <> p_organization_id) THEN
191: l_asset_group.organization_id := p_organization_id;
192:
193: IF (l_plog) THEN
194: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
195: 'Calling INV_ITEM_GRP.Create_Item...'||
196: 'Comms_NL_Trackable_Flag: '||l_asset_group.comms_nl_trackable_flag||
197: ' Inventory_Item_Flag: '||l_asset_group.Inventory_item_flag);
198: END IF;
206: p_Template_Id => p_source_tmpl_id
207: );
208:
209: IF (l_plog) THEN
210: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
211: 'Returned from INV_ITEM_GRP.Create_Item...'||
212: 'Comms_NL_Trackable_Flag: '||l_x_curr_item_rec.comms_nl_trackable_flag||
213: ' Inventory_Item_Flag: '||l_x_curr_item_rec.Inventory_item_flag);
214: END IF;
253:
254: x_item_id := l_x_curr_item_rec.inventory_item_id;
255:
256: IF (l_plog) THEN
257: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
258: '==================== Exiting EAM_ITEM_PVT.Insert_item ====================');
259: END IF;
260: END INSERT_ITEM;
261:
288:
289: l_api_name CONSTANT VARCHAR2(30) := 'Update_item';
290:
291: l_module varchar2(200);
292: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
293: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
294: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
295: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
296:
289: l_api_name CONSTANT VARCHAR2(30) := 'Update_item';
290:
291: l_module varchar2(200);
292: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
293: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
294: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
295: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
296:
297: -- output variables of inv package
290:
291: l_module varchar2(200);
292: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
293: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
294: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
295: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
296:
297: -- output variables of inv package
298: l_x_curr_item_rec INV_Item_GRP.Item_Rec_Type;
291: l_module varchar2(200);
292: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
293: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
294: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
295: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
296:
297: -- output variables of inv package
298: l_x_curr_item_rec INV_Item_GRP.Item_Rec_Type;
299: l_x_curr_item_return_status VARCHAR2(1);
314: l_asset_group.organization_id := p_organization_id;
315: l_asset_group.inventory_item_id := p_inventory_item_id;
316:
317: IF (l_plog) THEN
318: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
319: '==================== Entered EAM_ITEM_PVT.Update_item ===================='||
320: 'Comms_NL_Trackable_Flag: '||l_asset_group.comms_nl_trackable_flag||
321: ' Inventory_Item_Flag: '||l_asset_group.Inventory_item_flag);
322:
319: '==================== Entered EAM_ITEM_PVT.Update_item ===================='||
320: 'Comms_NL_Trackable_Flag: '||l_asset_group.comms_nl_trackable_flag||
321: ' Inventory_Item_Flag: '||l_asset_group.Inventory_item_flag);
322:
323: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
324: 'Calling INV_ITEM_GRP.Update_Item...');
325: END IF;
326:
327: if p_source_tmpl_id is not null or p_template_name is not null then
370: x_Error_tbl => l_x_curr_item_error_tbl
371: );
372:
373: IF (l_plog) THEN
374: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
375: 'Returned from INV_ITEM_GRP.Update_Item...'||
376: 'Comms_NL_Trackable_Flag: '||l_x_curr_item_rec.comms_nl_trackable_flag||
377: ' Inventory_Item_Flag: '||l_x_curr_item_rec.Inventory_item_flag);
378: END IF;
398: commit;
399: END IF;
400:
401: IF (l_plog) THEN
402: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
403: '==================== Exiting EAM_ITEM_PVT.Update_item ====================');
404: END IF;
405: END UPDATE_ITEM;
406:
419: l_x_return_status VARCHAR2(1);
420: l_api_name CONSTANT VARCHAR2(30) := 'Lock_item';
421:
422: l_module varchar2(200);
423: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
424: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
425: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
426: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
427:
420: l_api_name CONSTANT VARCHAR2(30) := 'Lock_item';
421:
422: l_module varchar2(200);
423: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
424: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
425: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
426: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
427:
428:
421:
422: l_module varchar2(200);
423: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
424: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
425: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
426: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
427:
428:
429: BEGIN
422: l_module varchar2(200);
423: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
424: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
425: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
426: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
427:
428:
429: BEGIN
430:
434: l_module := 'eam.plsql.'||g_pkg_name|| '.' || l_api_name;
435: end if;
436:
437: IF (l_plog) THEN
438: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
439: '==================== Entered EAM_ITEM_PVT.Lock_item ===================='
440: || 'p_organization_id = ' || p_organization_id
441: || 'p_inventory_item_id = ' ||p_inventory_item_id);
442:
439: '==================== Entered EAM_ITEM_PVT.Lock_item ===================='
440: || 'p_organization_id = ' || p_organization_id
441: || 'p_inventory_item_id = ' ||p_inventory_item_id);
442:
443: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
444: 'Calling INV_ITEM_GRP.Lock_Item...');
445: END IF;
446:
447: INV_ITEM_GRP.Lock_Item
454:
455: x_return_status := l_x_return_status;
456:
457: IF (l_plog) THEN
458: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
459: 'Returned from INV_ITEM_GRP.Lock_Item with l_x_return_status '||l_x_return_status);
460: END IF;
461: if nvl(l_x_return_status, 'S') not in ('E','U') then
462: return;
469: -- Standard check of p_commit.
470: IF fnd_api.to_boolean(p_commit) THEN
471: COMMIT WORK;
472: IF (l_plog) THEN
473: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
474: 'Commiting Work');
475: END IF;
476: END IF;
477:
481: EXCEPTION
482: WHEN fnd_api.g_exc_error THEN
483: ROLLBACK TO lock_ITEM;
484: IF (l_plog) THEN
485: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
486: 'Rollback To Lock_Item.....');
487: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
488: '==============INV_ITEM_GRP.Lock_Item :EXPECTED ERROR===================');
489: END IF;
483: ROLLBACK TO lock_ITEM;
484: IF (l_plog) THEN
485: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
486: 'Rollback To Lock_Item.....');
487: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
488: '==============INV_ITEM_GRP.Lock_Item :EXPECTED ERROR===================');
489: END IF;
490: x_return_status := fnd_api.g_ret_sts_error;
491: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
491: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
492: WHEN fnd_api.g_exc_unexpected_error THEN
493: ROLLBACK TO lock_ITEM;
494: IF (l_plog) THEN
495: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
496: 'Rollback To Lock_Item.....');
497: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
498: '==============INV_ITEM_GRP.Lock_Item :UNEXPECTED ERROR===================');
499: END IF;
493: ROLLBACK TO lock_ITEM;
494: IF (l_plog) THEN
495: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
496: 'Rollback To Lock_Item.....');
497: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
498: '==============INV_ITEM_GRP.Lock_Item :UNEXPECTED ERROR===================');
499: END IF;
500: x_return_status := fnd_api.g_ret_sts_unexp_error;
501: fnd_msg_pub.count_and_get(
503: ,p_data => x_msg_data);
504: WHEN OTHERS THEN
505: ROLLBACK TO lock_ITEM;
506: IF (l_plog) THEN
507: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
508: 'Rollback To Lock_Item.....');
509: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
510: '==============INV_ITEM_GRP.Lock_Item :OTHER ERROR===================');
511: END IF;
505: ROLLBACK TO lock_ITEM;
506: IF (l_plog) THEN
507: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
508: 'Rollback To Lock_Item.....');
509: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
510: '==============INV_ITEM_GRP.Lock_Item :OTHER ERROR===================');
511: END IF;
512: x_return_status := fnd_api.g_ret_sts_unexp_error;
513:
517:
518: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
519:
520: IF (l_plog) THEN
521: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
522: '==================== Exiting EAM_ITEM_PVT.Lock_item ====================');
523: END IF;
524:
525: END LOCK_ITEM;