16: IS
17:
18: l_api_name CONSTANT VARCHAR2(30) := 'Validate_Organization';
19: l_module varchar2(200);
20: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
21: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
22: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
23: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
24:
17:
18: l_api_name CONSTANT VARCHAR2(30) := 'Validate_Organization';
19: l_module varchar2(200);
20: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
21: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
22: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
23: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
24:
25: BEGIN
18: l_api_name CONSTANT VARCHAR2(30) := 'Validate_Organization';
19: l_module varchar2(200);
20: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
21: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
22: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
23: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
24:
25: BEGIN
26: if(l_ulog) then
19: l_module varchar2(200);
20: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
21: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
22: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
23: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
24:
25: BEGIN
26: if(l_ulog) then
27: l_module := 'eam.plsql.'||g_pkg_name|| '.' || l_api_name;
26: if(l_ulog) then
27: l_module := 'eam.plsql.'||g_pkg_name|| '.' || l_api_name;
28: end if;
29:
30: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
31: '----- Entering EAM_ActivityUtilities_PVT.Validate_Organization -----'
32: || 'p_organization_id=' || p_organization_id
33: || 'p_organization_code=' || p_organization_code);
34: end if;
73: END IF;
74:
75: x_return_status := FND_API.G_RET_STS_SUCCESS;
76:
77: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
78: '----- Exiting EAM_ActivityUtilities_PVT.Validate_Organization -----');
79: end if;
80:
81: EXCEPTION
80:
81: EXCEPTION
82: WHEN FND_API.G_EXC_ERROR THEN
83:
84: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
85: 'EAM_ActivityUtilities_PVT.Validate_Organization: error.' ||
86: 'p_organization_id=' || p_organization_id ||
87: '; p_organization_code=' || p_organization_code);
88: end if;
90: x_return_status := FND_API.G_RET_STS_ERROR;
91:
92: WHEN OTHERS THEN
93:
94: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
95: 'EAM_ActivityUtilities_PVT.Validate_Organization: unexpected error.' ||
96: 'p_organization_id=' || p_organization_id ||
97: '; p_organization_code=' || p_organization_code);
98: end if;
111: IS
112:
113: l_api_name CONSTANT VARCHAR2(30) := 'Validate_Work_Order';
114: l_module varchar2(200);
115: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
116: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
117: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
118: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
119:
112:
113: l_api_name CONSTANT VARCHAR2(30) := 'Validate_Work_Order';
114: l_module varchar2(200);
115: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
116: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
117: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
118: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
119:
120: l_validate_org_ret_sts VARCHAR2(1);
113: l_api_name CONSTANT VARCHAR2(30) := 'Validate_Work_Order';
114: l_module varchar2(200);
115: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
116: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
117: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
118: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
119:
120: l_validate_org_ret_sts VARCHAR2(1);
121: l_x_work_order_rec EAM_Activity_PUB.Work_Order_Rec_Type;
114: l_module varchar2(200);
115: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
116: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
117: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
118: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
119:
120: l_validate_org_ret_sts VARCHAR2(1);
121: l_x_work_order_rec EAM_Activity_PUB.Work_Order_Rec_Type;
122: l_temp_org_id NUMBER;
126: if(l_ulog) then
127: l_module := 'eam.plsql.'||g_pkg_name|| '.' || l_api_name;
128: end if;
129:
130: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
131: '----- Entering EAM_ActivityUtilities_PVT.Validate_Work_Order -----'
132: || 'p_work_order_rec.Organization_Id=' || p_work_order_rec.Organization_Id
133: || 'p_work_order_rec.Organization_Code=' || p_work_order_rec.Organization_Code
134: || 'p_work_order_rec.Wip_Entity_Id=' || p_work_order_rec.Wip_Entity_Id
213:
214: -- Assign output
215: x_work_order_rec := l_x_work_order_rec;
216:
217: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
218: '----- Exiting EAM_ActivityUtilities_PVT.Validate_Work_Order -----');
219: end if;
220:
221: EXCEPTION
220:
221: EXCEPTION
222: WHEN FND_API.G_EXC_ERROR THEN
223:
224: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
225: 'EAM_ActivityUtilities_PVT.Validate_Work_Order: error.'||
226: 'wip_entity_id=' || p_work_order_rec.wip_entity_id ||
227: '; wip_entity_name=' || p_work_order_rec.wip_entity_name ||
228: '; organization_id=' || p_work_order_rec.organization_id ||
232: x_return_status := FND_API.G_RET_STS_ERROR;
233:
234: WHEN OTHERS THEN
235:
236: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
237: 'EAM_ActivityUtilities_PVT.Validate_Work_Order: unexpected error.'||
238: 'wip_entity_id=' || p_work_order_rec.wip_entity_id ||
239: '; wip_entity_name=' || p_work_order_rec.wip_entity_name ||
240: '; organization_id=' || p_work_order_rec.organization_id ||
253: IS
254:
255: l_api_name CONSTANT VARCHAR2(30) := 'Get_Item_Concatenated_Segments';
256: l_module varchar2(200);
257: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
258: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
259: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
260: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
261:
254:
255: l_api_name CONSTANT VARCHAR2(30) := 'Get_Item_Concatenated_Segments';
256: l_module varchar2(200);
257: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
258: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
259: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
260: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
261:
262: l_item_concatenated_segments VARCHAR2(40);
255: l_api_name CONSTANT VARCHAR2(30) := 'Get_Item_Concatenated_Segments';
256: l_module varchar2(200);
257: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
258: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
259: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
260: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
261:
262: l_item_concatenated_segments VARCHAR2(40);
263: BEGIN
256: l_module varchar2(200);
257: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
258: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
259: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
260: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
261:
262: l_item_concatenated_segments VARCHAR2(40);
263: BEGIN
264: if(l_ulog) then
282: FND_MESSAGE.SET_NAME('EAM', 'EAM_ABO_NO_ITEM_NAME');
283: -- FND_MESSAGE.SET_ENCODED('Cannot find concatenated segment Item name.');
284: EAM_ActivityUtilities_PVT.Add_Message(FND_MSG_PUB.G_MSG_LVL_ERROR);
285:
286: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
287: 'EAM_ActivityUtilities_PVT.Get_Item_Concatenated_Segments: error.' ||
288: 'p_organization_id=' || p_organization_id ||
289: '; p_inventory_item_id=' || p_inventory_item_id);
290: end if;
292: RAISE FND_API.G_EXC_ERROR;
293:
294: WHEN OTHERS THEN
295:
296: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
297: 'EAM_ActivityUtilities_PVT.Get_Item_Concatenated_Segments: unexpected error.' ||
298: 'p_organization_id=' || p_organization_id ||
299: '; p_inventory_item_id=' || p_inventory_item_id);
300: end if;
309: RETURN NUMBER
310: IS
311: l_api_name CONSTANT VARCHAR2(30) := 'Get_Act_Id_From_Work_Order';
312: l_module varchar2(200);
313: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
314: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
315: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
316: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
317:
310: IS
311: l_api_name CONSTANT VARCHAR2(30) := 'Get_Act_Id_From_Work_Order';
312: l_module varchar2(200);
313: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
314: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
315: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
316: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
317:
318: l_activity_id NUMBER;
311: l_api_name CONSTANT VARCHAR2(30) := 'Get_Act_Id_From_Work_Order';
312: l_module varchar2(200);
313: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
314: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
315: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
316: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
317:
318: l_activity_id NUMBER;
319: BEGIN
312: l_module varchar2(200);
313: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
314: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
315: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
316: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
317:
318: l_activity_id NUMBER;
319: BEGIN
320: if(l_ulog) then
332: END IF;
333:
334: EXCEPTION
335: WHEN OTHERS THEN
336: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
337: 'EAM_ActivityUtilities_PVT.Get_Act_Id_From_Work_Order: unexpected error.'||
338: 'p_wip_entity_id=' || p_wip_entity_id);
339: end if;
340:
348: RETURN NUMBER
349: IS
350: l_api_name CONSTANT VARCHAR2(30) := 'Get_Org_Id_From_Work_Order';
351: l_module varchar2(200);
352: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
353: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
354: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
355: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
356:
349: IS
350: l_api_name CONSTANT VARCHAR2(30) := 'Get_Org_Id_From_Work_Order';
351: l_module varchar2(200);
352: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
353: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
354: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
355: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
356:
357: l_org_id NUMBER;
350: l_api_name CONSTANT VARCHAR2(30) := 'Get_Org_Id_From_Work_Order';
351: l_module varchar2(200);
352: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
353: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
354: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
355: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
356:
357: l_org_id NUMBER;
358: BEGIN
351: l_module varchar2(200);
352: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
353: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
354: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
355: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
356:
357: l_org_id NUMBER;
358: BEGIN
359: if(l_ulog) then
371: END IF;
372:
373: EXCEPTION
374: WHEN OTHERS THEN
375: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
376: 'EAM_ActivityUtilities_PVT.Get_Org_Id_From_Work_Order: unexpected error.'||
377: 'p_wip_entity_id=' || p_wip_entity_id);
378: end if;
379:
388: RETURN VARCHAR2
389: IS
390: l_api_name CONSTANT VARCHAR2(30) := 'Get_Department_Code';
391: l_module varchar2(200);
392: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
393: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
394: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
395: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
396:
389: IS
390: l_api_name CONSTANT VARCHAR2(30) := 'Get_Department_Code';
391: l_module varchar2(200);
392: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
393: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
394: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
395: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
396:
397: l_department_code VARCHAR2(10);
390: l_api_name CONSTANT VARCHAR2(30) := 'Get_Department_Code';
391: l_module varchar2(200);
392: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
393: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
394: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
395: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
396:
397: l_department_code VARCHAR2(10);
398: BEGIN
391: l_module varchar2(200);
392: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
393: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
394: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
395: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
396:
397: l_department_code VARCHAR2(10);
398: BEGIN
399: if(l_ulog) then
413: END IF;
414:
415: EXCEPTION
416: WHEN OTHERS THEN
417: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
418: 'EAM_ActivityUtilities_PVT.Get_Department_Code: unexpected error.'||
419: 'p_organization_id=' || p_organization_id ||
420: '; p_department_id=' || p_department_id);
421: end if;
431: RETURN VARCHAR2
432: IS
433: l_api_name CONSTANT VARCHAR2(30) := 'Get_Resource_Code';
434: l_module varchar2(200);
435: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
436: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
437: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
438: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
439:
432: IS
433: l_api_name CONSTANT VARCHAR2(30) := 'Get_Resource_Code';
434: l_module varchar2(200);
435: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
436: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
437: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
438: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
439:
440: l_resource_code VARCHAR2(10);
433: l_api_name CONSTANT VARCHAR2(30) := 'Get_Resource_Code';
434: l_module varchar2(200);
435: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
436: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
437: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
438: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
439:
440: l_resource_code VARCHAR2(10);
441: BEGIN
434: l_module varchar2(200);
435: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
436: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
437: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
438: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
439:
440: l_resource_code VARCHAR2(10);
441: BEGIN
442: if(l_ulog) then
456: END IF;
457:
458: EXCEPTION
459: WHEN OTHERS THEN
460: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
461: 'EAM_ActivityUtilities_PVT.Get_Resource_Code: unexpected error.'||
462: 'p_organization_id=' || p_organization_id ||
463: '; p_resource_id=' || p_resource_id);
464: end if;
473: RETURN NUMBER
474: IS
475: l_api_name CONSTANT VARCHAR2(30) := 'Get_Expense_Account_Id';
476: l_module varchar2(200) ;
477: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
478: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
479: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
480: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
481:
474: IS
475: l_api_name CONSTANT VARCHAR2(30) := 'Get_Expense_Account_Id';
476: l_module varchar2(200) ;
477: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
478: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
479: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
480: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
481:
482: l_expense_account_id NUMBER;
475: l_api_name CONSTANT VARCHAR2(30) := 'Get_Expense_Account_Id';
476: l_module varchar2(200) ;
477: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
478: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
479: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
480: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
481:
482: l_expense_account_id NUMBER;
483: BEGIN
476: l_module varchar2(200) ;
477: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
478: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
479: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
480: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
481:
482: l_expense_account_id NUMBER;
483: BEGIN
484: if(l_ulog) then
495: END IF;
496:
497: EXCEPTION
498: WHEN OTHERS THEN
499: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
500: 'EAM_ActivityUtilities_PVT.Get_Expense_Account_Id: unexpected error.'||
501: 'p_organization_id=' || p_organization_id);
502: end if;
503:
512: )
513: IS
514: l_api_name CONSTANT VARCHAR2(30) := 'Get_Asset_From_WO';
515: l_module varchar2(200);
516: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
517: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
518: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
519: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
520: BEGIN
513: IS
514: l_api_name CONSTANT VARCHAR2(30) := 'Get_Asset_From_WO';
515: l_module varchar2(200);
516: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
517: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
518: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
519: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
520: BEGIN
521: if(l_ulog) then
514: l_api_name CONSTANT VARCHAR2(30) := 'Get_Asset_From_WO';
515: l_module varchar2(200);
516: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
517: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
518: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
519: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
520: BEGIN
521: if(l_ulog) then
522: l_module := 'eam.plsql.'||g_pkg_name|| '.' || l_api_name;
515: l_module varchar2(200);
516: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
517: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
518: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
519: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
520: BEGIN
521: if(l_ulog) then
522: l_module := 'eam.plsql.'||g_pkg_name|| '.' || l_api_name;
523: end if;
533: END IF;
534:
535: EXCEPTION
536: WHEN OTHERS THEN
537: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
538: 'EAM_ActivityUtilities_PVT.Get_Asset_From_WO: unexpected error.'||
539: 'p_wip_entity_id=' || p_wip_entity_id);
540: end if;
541:
551: RETURN NUMBER
552: IS
553: l_api_name CONSTANT VARCHAR2(30) := 'Get_Asset_Owning_Dept_Id';
554: l_module varchar2(200);
555: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
556: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
557: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
558: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
559:
552: IS
553: l_api_name CONSTANT VARCHAR2(30) := 'Get_Asset_Owning_Dept_Id';
554: l_module varchar2(200);
555: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
556: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
557: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
558: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
559:
560: l_owning_dept_id NUMBER;
553: l_api_name CONSTANT VARCHAR2(30) := 'Get_Asset_Owning_Dept_Id';
554: l_module varchar2(200);
555: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
556: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
557: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
558: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
559:
560: l_owning_dept_id NUMBER;
561: BEGIN
554: l_module varchar2(200);
555: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
556: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
557: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
558: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
559:
560: l_owning_dept_id NUMBER;
561: BEGIN
562: if(l_ulog) then
575: END IF;
576:
577: EXCEPTION
578: WHEN OTHERS THEN
579: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
580: 'EAM_ActivityUtilities_PVT.Get_Asset_Owning_Dept_Id: unexpected error.'||
581: 'p_organization_id=' || p_organization_id ||
582: '; p_inventory_item_id=' || p_inventory_item_id ||
583: '; p_serial_number=' || p_serial_number);
596: RETURN NUMBER
597: IS
598: l_api_name CONSTANT VARCHAR2(30) := 'Get_WO_Res_Scheduled_Units';
599: l_module varchar2(200);
600: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
601: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
602: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
603: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
604:
597: IS
598: l_api_name CONSTANT VARCHAR2(30) := 'Get_WO_Res_Scheduled_Units';
599: l_module varchar2(200);
600: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
601: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
602: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
603: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
604:
605: l_scheduled_units NUMBER;
598: l_api_name CONSTANT VARCHAR2(30) := 'Get_WO_Res_Scheduled_Units';
599: l_module varchar2(200);
600: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
601: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
602: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
603: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
604:
605: l_scheduled_units NUMBER;
606: BEGIN
599: l_module varchar2(200);
600: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
601: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
602: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
603: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
604:
605: l_scheduled_units NUMBER;
606: BEGIN
607: if(l_ulog) then
623: END IF;
624:
625: EXCEPTION
626: WHEN OTHERS THEN
627: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
628: 'EAM_ActivityUtilities_PVT.Get_WO_Res_Scheduled_Units: unexpected error.'||
629: 'p_organization_id=' || p_organization_id ||
630: '; p_wip_entity_id=' || p_wip_entity_id ||
631: '; p_operation_seq_num=' || p_operation_seq_num ||
642: RETURN NUMBER
643: IS
644: l_api_name CONSTANT VARCHAR2(30) := 'Get_Master_Org_Id';
645: l_module varchar2(200);
646: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
647: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
648: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
649: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
650:
643: IS
644: l_api_name CONSTANT VARCHAR2(30) := 'Get_Master_Org_Id';
645: l_module varchar2(200);
646: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
647: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
648: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
649: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
650:
651: l_master_org_id NUMBER;
644: l_api_name CONSTANT VARCHAR2(30) := 'Get_Master_Org_Id';
645: l_module varchar2(200);
646: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
647: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
648: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
649: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
650:
651: l_master_org_id NUMBER;
652: BEGIN
645: l_module varchar2(200);
646: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
647: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
648: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
649: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
650:
651: l_master_org_id NUMBER;
652: BEGIN
653: if(l_ulog) then
664: END IF;
665:
666: EXCEPTION
667: WHEN OTHERS THEN
668: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
669: 'EAM_ActivityUtilities_PVT.Get_Master_Org_Id: unexpected error.'||
670: 'p_organization_id=' || p_organization_id);
671: end if;
672:
688: )
689: IS
690: l_api_name CONSTANT VARCHAR2(30) := 'Validate_Asset_Number';
691: l_module varchar2(200);
692: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
693: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
694: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
695: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
696:
689: IS
690: l_api_name CONSTANT VARCHAR2(30) := 'Validate_Asset_Number';
691: l_module varchar2(200);
692: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
693: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
694: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
695: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
696:
697: l_x_org_return_status VARCHAR2(1);
690: l_api_name CONSTANT VARCHAR2(30) := 'Validate_Asset_Number';
691: l_module varchar2(200);
692: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
693: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
694: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
695: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
696:
697: l_x_org_return_status VARCHAR2(1);
698: l_x_org_id NUMBER;
691: l_module varchar2(200);
692: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
693: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
694: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
695: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
696:
697: l_x_org_return_status VARCHAR2(1);
698: l_x_org_id NUMBER;
699: l_x_org_code VARCHAR2(3);
718: FND_MESSAGE.SET_NAME('EAM', 'EAM_INVALID_INSTANCE_NUMBER');
719: -- FND_MESSAGE.SET_ENCODED('Instance number is invalid.');
720: l_x_error_mesg := FND_MESSAGE.GET;
721:
722: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
723: l_x_error_mesg ||
724: 'p_instance_number=' || p_instance_number);
725: end if;
726:
739: x_return_status := FND_API.G_RET_STS_ERROR;
740: FND_MESSAGE.SET_NAME('EAM', 'EAM_ABO_INVALID_ORG_ID');
741: l_x_error_mesg := FND_MESSAGE.GET;
742:
743: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
744: l_x_error_mesg ||
745: 'p_instance_number=' || p_instance_number ||
746: 'p_organization_id=' || p_organization_id ||
747: '; p_inventory_item_id=' || p_inventory_item_id ||
768: FND_MESSAGE.SET_NAME('EAM', 'EAM_ABO_INVALID_ASSET_GRP_NUM');
769: -- FND_MESSAGE.SET_ENCODED('Asset Group, Number invalid.');
770: l_x_error_mesg := FND_MESSAGE.GET;
771:
772: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
773: l_x_error_mesg ||
774: 'p_instance_number=' || p_instance_number ||
775: 'p_organization_id=' || p_organization_id ||
776: '; p_inventory_item_id=' || p_inventory_item_id ||
800: FND_MESSAGE.SET_NAME('EAM', 'EAM_ABO_INVALID_INV_ITEM_ID');
801: -- FND_MESSAGE.SET_ENCODED('Invalid Inventory Item Id.');
802: l_x_error_mesg := FND_MESSAGE.GET;
803:
804: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
805: l_x_error_mesg ||
806: 'p_instance_number=' || p_instance_number ||
807: 'p_organization_id=' || p_organization_id ||
808: '; p_inventory_item_id=' || p_inventory_item_id ||
828: RETURN VARCHAR2
829: IS
830: l_api_name CONSTANT VARCHAR2(30) := 'Get_Cost_Activity';
831: l_module varchar2(200);
832: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
833: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
834: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
835: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
836:
829: IS
830: l_api_name CONSTANT VARCHAR2(30) := 'Get_Cost_Activity';
831: l_module varchar2(200);
832: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
833: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
834: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
835: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
836:
837: l_activity cst_activities.activity%TYPE;
830: l_api_name CONSTANT VARCHAR2(30) := 'Get_Cost_Activity';
831: l_module varchar2(200);
832: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
833: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
834: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
835: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
836:
837: l_activity cst_activities.activity%TYPE;
838: BEGIN
831: l_module varchar2(200);
832: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
833: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
834: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
835: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
836:
837: l_activity cst_activities.activity%TYPE;
838: BEGIN
839: if(l_ulog) then
849: RETURN l_activity;
850: END IF;
851: EXCEPTION
852: WHEN OTHERS THEN
853: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
854: 'EAM_ActivityUtilities_PVT.Get_Cost_Activity: unexpected error.' ||
855: 'p_activity_id=' || p_activity_id);
856: end if;
857:
867: RETURN VARCHAR2
868: IS
869: l_api_name CONSTANT VARCHAR2(30) := 'Get_Locator';
870: l_module varchar2(200);
871: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
872: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
873: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
874: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
875:
868: IS
869: l_api_name CONSTANT VARCHAR2(30) := 'Get_Locator';
870: l_module varchar2(200);
871: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
872: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
873: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
874: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
875:
876: l_locator mtl_item_locations_kfv.concatenated_segments%TYPE;
869: l_api_name CONSTANT VARCHAR2(30) := 'Get_Locator';
870: l_module varchar2(200);
871: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
872: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
873: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
874: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
875:
876: l_locator mtl_item_locations_kfv.concatenated_segments%TYPE;
877: BEGIN
870: l_module varchar2(200);
871: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
872: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
873: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
874: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
875:
876: l_locator mtl_item_locations_kfv.concatenated_segments%TYPE;
877: BEGIN
878: if(l_ulog) then
891: RETURN l_locator;
892: END IF;
893: EXCEPTION
894: WHEN OTHERS THEN
895: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
896: 'EAM_ActivityUtilities_PVT.Get_Locator: unexpected error.' ||
897: 'p_organization_id=' || p_organization_id ||
898: '; p_subinventory_code=' || p_subinventory_code ||
899: '; p_locator_id=' || p_locator_id);
913: )
914: IS
915: l_api_name CONSTANT VARCHAR2(30) := 'Get_Op_Coordinates';
916: l_module varchar2(200);
917: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
918: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
919: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
920: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
921:
914: IS
915: l_api_name CONSTANT VARCHAR2(30) := 'Get_Op_Coordinates';
916: l_module varchar2(200);
917: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
918: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
919: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
920: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
921:
922: BEGIN
915: l_api_name CONSTANT VARCHAR2(30) := 'Get_Op_Coordinates';
916: l_module varchar2(200);
917: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
918: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
919: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
920: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
921:
922: BEGIN
923: if(l_ulog) then
916: l_module varchar2(200);
917: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
918: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
919: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
920: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
921:
922: BEGIN
923: if(l_ulog) then
924: l_module := 'eam.plsql.'||g_pkg_name|| '.' || l_api_name;
936: END IF;
937:
938: EXCEPTION
939: WHEN OTHERS THEN
940: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
941: 'EAM_ActivityUtilities_PVT.Get_Op_Coordinates: unexpected error.' ||
942: 'p_organization_id=' || p_organization_id ||
943: '; p_wip_entity_id=' || p_wip_entity_id ||
944: '; p_operation_seq_num=' || p_operation_seq_num);
956: RETURN NUMBER
957: IS
958: l_api_name CONSTANT VARCHAR2(30) := 'Get_Bom_Sequence_Id';
959: l_module varchar2(200);
960: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
961: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
962: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
963: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
964:
957: IS
958: l_api_name CONSTANT VARCHAR2(30) := 'Get_Bom_Sequence_Id';
959: l_module varchar2(200);
960: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
961: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
962: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
963: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
964:
965: l_bom_sequence_id NUMBER;
958: l_api_name CONSTANT VARCHAR2(30) := 'Get_Bom_Sequence_Id';
959: l_module varchar2(200);
960: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
961: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
962: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
963: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
964:
965: l_bom_sequence_id NUMBER;
966: BEGIN
959: l_module varchar2(200);
960: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
961: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level ;
962: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
963: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
964:
965: l_bom_sequence_id NUMBER;
966: BEGIN
967: if(l_ulog) then
983: WHEN NO_DATA_FOUND THEN
984: RETURN NULL;
985:
986: WHEN OTHERS THEN
987: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
988: 'EAM_ActivityUtilities_PVT.Get_Bom_Sequence_Id: unexpected error.' ||
989: 'p_organization_id=' || p_organization_id ||
990: '; p_assembly_item_id=' || p_assembly_item_id ||
991: '; p_alternate_bom_designator=' || p_alternate_bom_designator);
1003: RETURN NUMBER
1004: IS
1005: l_api_name CONSTANT VARCHAR2(30) := 'Get_Rtg_Sequence_Id';
1006: l_module varchar2(200);
1007: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1008: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1009: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1010: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1011:
1004: IS
1005: l_api_name CONSTANT VARCHAR2(30) := 'Get_Rtg_Sequence_Id';
1006: l_module varchar2(200);
1007: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1008: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1009: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1010: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1011:
1012: l_rtg_sequence_id NUMBER;
1005: l_api_name CONSTANT VARCHAR2(30) := 'Get_Rtg_Sequence_Id';
1006: l_module varchar2(200);
1007: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1008: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1009: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1010: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1011:
1012: l_rtg_sequence_id NUMBER;
1013: BEGIN
1006: l_module varchar2(200);
1007: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1008: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1009: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1010: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1011:
1012: l_rtg_sequence_id NUMBER;
1013: BEGIN
1014: if(l_ulog) then
1030: WHEN NO_DATA_FOUND THEN
1031: RETURN NULL;
1032:
1033: WHEN OTHERS THEN
1034: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
1035: 'EAM_ActivityUtilities_PVT.Get_Bom_Sequence_Id: unexpected error.' ||
1036: 'p_organization_id=' || p_organization_id ||
1037: '; p_assembly_item_id=' || p_assembly_item_id ||
1038: '; p_alternate_rtg_designator=' || p_alternate_rtg_designator);
1050: RETURN NUMBER
1051: IS
1052: l_api_name CONSTANT VARCHAR2(30) := 'Get_Gen_Object_Id';
1053: l_module varchar2(200);
1054: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1055: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1056: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1057: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1058:
1051: IS
1052: l_api_name CONSTANT VARCHAR2(30) := 'Get_Gen_Object_Id';
1053: l_module varchar2(200);
1054: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1055: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1056: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1057: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1058:
1059: l_gen_object_id NUMBER;
1052: l_api_name CONSTANT VARCHAR2(30) := 'Get_Gen_Object_Id';
1053: l_module varchar2(200);
1054: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1055: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1056: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1057: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1058:
1059: l_gen_object_id NUMBER;
1060: BEGIN
1053: l_module varchar2(200);
1054: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1055: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1056: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1057: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1058:
1059: l_gen_object_id NUMBER;
1060: BEGIN
1061: if(l_ulog) then
1074: RETURN l_gen_object_id;
1075: END IF;
1076: EXCEPTION
1077: WHEN OTHERS THEN
1078: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
1079: 'EAM_ActivityUtilities_PVT.Get_Gen_Object_Id: unexpected error.' ||
1080: 'p_organization_id=' || p_organization_id ||
1081: '; p_inventory_item_id=' || p_inventory_item_id ||
1082: '; p_serial_number=' || p_serial_number);
1095: )
1096: IS
1097: l_api_name CONSTANT VARCHAR2(30) := 'Get_Item_Info_From_WO';
1098: l_module varchar2(200);
1099: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1100: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1101: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1102: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1103:
1096: IS
1097: l_api_name CONSTANT VARCHAR2(30) := 'Get_Item_Info_From_WO';
1098: l_module varchar2(200);
1099: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1100: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1101: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1102: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1103:
1104: l_organization_id NUMBER;
1097: l_api_name CONSTANT VARCHAR2(30) := 'Get_Item_Info_From_WO';
1098: l_module varchar2(200);
1099: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1100: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1101: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1102: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1103:
1104: l_organization_id NUMBER;
1105: l_primary_item_id NUMBER;
1098: l_module varchar2(200);
1099: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1100: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1101: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1102: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1103:
1104: l_organization_id NUMBER;
1105: l_primary_item_id NUMBER;
1106: l_wo_maint_id NUMBER;
1123: END IF;
1124:
1125: EXCEPTION
1126: WHEN OTHERS THEN
1127: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
1128: 'EAM_ActivityUtilities_PVT.Get_Item_Info_From_WO: unexpected error.'||
1129: 'p_wip_entity_id=' || p_wip_entity_id);
1130: end if;
1131:
1140: RETURN NUMBER
1141: IS
1142: l_api_name CONSTANT VARCHAR2(30) := 'Default_Owning_Department_Id';
1143: l_module varchar2(200) ;
1144: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1145: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1146: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1147: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1148:
1141: IS
1142: l_api_name CONSTANT VARCHAR2(30) := 'Default_Owning_Department_Id';
1143: l_module varchar2(200) ;
1144: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1145: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1146: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1147: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1148:
1149: l_owning_department_id NUMBER;
1142: l_api_name CONSTANT VARCHAR2(30) := 'Default_Owning_Department_Id';
1143: l_module varchar2(200) ;
1144: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1145: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1146: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1147: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1148:
1149: l_owning_department_id NUMBER;
1150: BEGIN
1143: l_module varchar2(200) ;
1144: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1145: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1146: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1147: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1148:
1149: l_owning_department_id NUMBER;
1150: BEGIN
1151: if(l_ulog) then
1198: RETURN NULL;
1199:
1200: EXCEPTION
1201: WHEN OTHERS THEN
1202: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
1203: 'EAM_ActivityUtilities_PVT.Default_Owning_Department_Id: unexpected error.'||
1204: 'p_activity_association_id=' || p_activity_association_id ||
1205: 'p_instance_id=' || p_instance_id ||
1206: 'p_organization_id=' || p_organization_id);
1218: RETURN BOOLEAN
1219: IS
1220: l_api_name CONSTANT VARCHAR2(30) := 'Is_Item_Serialized';
1221: l_module varchar2(200);
1222: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1223: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1224: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1225: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1226:
1219: IS
1220: l_api_name CONSTANT VARCHAR2(30) := 'Is_Item_Serialized';
1221: l_module varchar2(200);
1222: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1223: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1224: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1225: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1226:
1227: l_serial_number_control_code NUMBER;
1220: l_api_name CONSTANT VARCHAR2(30) := 'Is_Item_Serialized';
1221: l_module varchar2(200);
1222: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1223: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1224: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1225: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1226:
1227: l_serial_number_control_code NUMBER;
1228: BEGIN
1221: l_module varchar2(200);
1222: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1223: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1224: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1225: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1226:
1227: l_serial_number_control_code NUMBER;
1228: BEGIN
1229: if(l_ulog) then
1251: END IF;
1252: END IF;
1253: EXCEPTION
1254: WHEN OTHERS THEN
1255: if (l_plog) then FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module,
1256: 'EAM_ActivityUtilities_PVT.Is_Item_Serialized: unexpected error.' ||
1257: 'p_organization_id=' || p_organization_id ||
1258: 'p_maint_id=' || p_maint_id);
1259: end if;
1336: )
1337: IS
1338: l_api_name CONSTANT VARCHAR2(30) := 'Add_Message';
1339: l_module varchar2(200) ;
1340: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1341: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1342: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1343: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1344:
1337: IS
1338: l_api_name CONSTANT VARCHAR2(30) := 'Add_Message';
1339: l_module varchar2(200) ;
1340: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1341: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1342: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1343: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1344:
1345: l_message_text VARCHAR2(20000);
1338: l_api_name CONSTANT VARCHAR2(30) := 'Add_Message';
1339: l_module varchar2(200) ;
1340: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1341: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1342: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1343: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1344:
1345: l_message_text VARCHAR2(20000);
1346:
1339: l_module varchar2(200) ;
1340: l_log_level CONSTANT NUMBER := fnd_log.g_current_runtime_level;
1341: l_uLog CONSTANT BOOLEAN := fnd_log.level_unexpected >= l_log_level;
1342: l_pLog CONSTANT BOOLEAN := l_uLog AND fnd_log.level_procedure >= l_log_level;
1343: l_sLog CONSTANT BOOLEAN := l_pLog AND fnd_log.level_statement >= l_log_level;
1344:
1345: l_message_text VARCHAR2(20000);
1346:
1347: BEGIN
1361: END IF;
1362:
1363: -- Also output message to log file
1364: if (l_plog) then
1365: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, l_module, l_message_text);
1366: end if;
1367:
1368: END;
1369: