DBA Data[Home] [Help]

APPS.PA_SCHEDULE_OBJECTS_PVT dependencies on PA_DEBUG

Line 5: G1_Debug_Mode VARCHAR2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

1: package body PA_SCHEDULE_OBJECTS_PVT as
2: /*$Header: PASCHOBB.pls 120.21.12020000.5 2013/03/22 17:50:08 srakitin ship $*/
3:
4: G_Pkg_Name CONSTANT VARCHAR2(30):= 'PA _SCHEDULE_OBJECTS_PVT';
5: G1_Debug_Mode VARCHAR2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
6: -------------------------------------------------------------
7: PROCEDURE log1
8: (p_msg IN VARCHAR2,
9: p_module IN VARCHAR2 DEFAULT 'PA_SCHEDULE_OBJECTS_PVT')

Line 14: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');

10: IS
11: pragma autonomous_transaction;
12: l_debug_mode varchar2(1);
13: BEGIN
14: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
15:
16: IF l_debug_mode = 'Y' THEN
17: insert into
18: fnd_log_messages

Line 1316: g1_debug_mode := NVL(FND_PROFILE.value_specific('PA_DEBUG_MODE',fnd_global.user_id,fnd_global.login_id,275,null,null), 'N');

1312: dirty_flag6='Y')
1313: order by wbs_level desc;
1314:
1315: BEGIN
1316: g1_debug_mode := NVL(FND_PROFILE.value_specific('PA_DEBUG_MODE',fnd_global.user_id,fnd_global.login_id,275,null,null), 'N');
1317: IF(p_debug_mode = 'Y') and g1_debug_mode = 'Y' THEN
1318: PA_DEBUG.init_err_stack('PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE');
1319: END IF;
1320:

Line 1318: PA_DEBUG.init_err_stack('PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE');

1314:
1315: BEGIN
1316: g1_debug_mode := NVL(FND_PROFILE.value_specific('PA_DEBUG_MODE',fnd_global.user_id,fnd_global.login_id,275,null,null), 'N');
1317: IF(p_debug_mode = 'Y') and g1_debug_mode = 'Y' THEN
1318: PA_DEBUG.init_err_stack('PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE');
1319: END IF;
1320:
1321: -- Initialize the return status to success
1322:

Line 1339: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Start', x_Log_Level=> 3);

1335:
1336: l_data_count := P_Data_Structure.COUNT;
1337:
1338: IF g1_debug_mode = 'Y' THEN
1339: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Start', x_Log_Level=> 3);
1340: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'l_data_count='||l_data_count, x_Log_Level=> 3);
1341: END IF;
1342:
1343:

Line 1340: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'l_data_count='||l_data_count, x_Log_Level=> 3);

1336: l_data_count := P_Data_Structure.COUNT;
1337:
1338: IF g1_debug_mode = 'Y' THEN
1339: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Start', x_Log_Level=> 3);
1340: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'l_data_count='||l_data_count, x_Log_Level=> 3);
1341: END IF;
1342:
1343:
1344: IF l_data_count <= 0 THEN

Line 1415: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After deriving partial rollup flags', x_Log_Level=> 3);

1411: l_partial_rollup6 := FALSE;
1412: END IF;
1413:
1414: IF g1_debug_mode = 'Y' THEN
1415: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After deriving partial rollup flags', x_Log_Level=> 3);
1416: END IF;
1417:
1418:
1419:

Line 1719: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After building the table', x_Log_Level=> 3);

1715:
1716: END LOOP; -- FOR i IN 1..P_Data_Structure.COUNT LOOP
1717:
1718: IF g1_debug_mode = 'Y' THEN
1719: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After building the table', x_Log_Level=> 3);
1720: END IF;
1721:
1722: FORALL i IN 1..P_Data_Structure.COUNT
1723: INSERT INTO PA_PROJ_ROLLUP_BULK_TEMP(

Line 2072: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After insertion into table', x_Log_Level=> 3);

2068: l_SUMMARY_OBJECT_FLAG(i) -- 4370746
2069: );
2070:
2071: IF g1_debug_mode = 'Y' THEN
2072: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After insertion into table', x_Log_Level=> 3);
2073: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before dirty processing', x_Log_Level=> 3);
2074: END IF;
2075:
2076: -- p_process_flag1 to 6 to decide whether to process anything or not....

Line 2073: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before dirty processing', x_Log_Level=> 3);

2069: );
2070:
2071: IF g1_debug_mode = 'Y' THEN
2072: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After insertion into table', x_Log_Level=> 3);
2073: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before dirty processing', x_Log_Level=> 3);
2074: END IF;
2075:
2076: -- p_process_flag1 to 6 to decide whether to process anything or not....
2077: -- p_process_rollup_flag1 to 6 determine whether the following processing is required

Line 2368: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After dirty processing', x_Log_Level=> 3);

2364:
2365: -- ********* DIRTY PROCESSING END ***********
2366:
2367: IF g1_debug_mode = 'Y' THEN
2368: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After dirty processing', x_Log_Level=> 3);
2369: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before Date processing', x_Log_Level=> 3);
2370: END IF;
2371:
2372: -- ********* NEW DATES PROCESSING BEGIN **********

Line 2369: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before Date processing', x_Log_Level=> 3);

2365: -- ********* DIRTY PROCESSING END ***********
2366:
2367: IF g1_debug_mode = 'Y' THEN
2368: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After dirty processing', x_Log_Level=> 3);
2369: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before Date processing', x_Log_Level=> 3);
2370: END IF;
2371:
2372: -- ********* NEW DATES PROCESSING BEGIN **********
2373:

Line 4031: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After Date processing', x_Log_Level=> 3);

4027:
4028: -- ********* DATES PROCESSING END ***********
4029: */
4030: IF g1_debug_mode = 'Y' THEN
4031: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After Date processing', x_Log_Level=> 3);
4032: END IF;
4033:
4034:
4035: -- ********* EFFORT PROCESSING BEGIN **********

Line 4043: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before Progress Status processing', x_Log_Level=> 3);

4039:
4040: -- ********* PROGRESS STATUS PROCESSING BEGIN ***********
4041:
4042: IF g1_debug_mode = 'Y' THEN
4043: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before Progress Status processing', x_Log_Level=> 3);
4044: END IF;
4045:
4046:
4047: IF ((p_process_flag1 = 'Y' OR p_process_flag2 = 'Y' OR p_process_flag3 = 'Y' OR p_process_flag4 = 'Y'

Line 4064: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before data fetch', x_Log_Level=> 3);

4060: l_update_required := 'N';
4061:
4062:
4063: IF g1_debug_mode = 'Y' THEN
4064: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before data fetch', x_Log_Level=> 3);
4065: END IF;
4066:
4067: OPEN Parent_Objects_List_prog_sts;
4068: FETCH Parent_Objects_List_prog_sts BULK COLLECT INTO l_object_ids_tab, l_object_types_tab

Line 4073: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Afetr data fetch', x_Log_Level=> 3);

4069: , l_sum_tab1, l_sum_tab2, l_sum_tab3, l_sum_tab4, l_sum_tab5, l_sum_tab6;
4070: CLOSE Parent_Objects_List_prog_sts;
4071:
4072: IF g1_debug_mode = 'Y' THEN
4073: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Afetr data fetch', x_Log_Level=> 3);
4074: END IF;
4075:
4076: FOR i IN 1..l_object_ids_tab.count LOOP
4077: l_Weight1 := null;

Line 4216: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After Progress Status processing', x_Log_Level=> 3);

4212: */
4213: END IF; -- ((p_process_flag1 = 'Y' OR p_process_flag2 = 'Y' OR p_process_flag3 = 'Y' OR p_process_flag4 = 'Y'
4214:
4215: IF g1_debug_mode = 'Y' THEN
4216: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After Progress Status processing', x_Log_Level=> 3);
4217: END IF;
4218:
4219: -- ********* PROGRESS STATUS PROCESSING END **************
4220:

Line 4224: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before Task Status processing', x_Log_Level=> 3);

4220:
4221: -- ********* TASK STATUS PROCESSING BEGIN **************
4222:
4223: IF g1_debug_mode = 'Y' THEN
4224: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before Task Status processing', x_Log_Level=> 3);
4225: END IF;
4226:
4227:
4228: IF ((p_process_flag1 = 'Y' OR p_process_flag2 = 'Y' OR p_process_flag3 = 'Y' OR p_process_flag4 = 'Y'

Line 4485: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After Task Status processing', x_Log_Level=> 3);

4481: */
4482: END IF; -- ((p_process_flag1 = 'Y' OR p_process_flag2 = 'Y' OR p_process_flag3 = 'Y' OR p_process_flag4 = 'Y'
4483:
4484: IF g1_debug_mode = 'Y' THEN
4485: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After Task Status processing', x_Log_Level=> 3);
4486: END IF;
4487:
4488:
4489: -- ********* TASK STATUS PROCESSING END **************

Line 4494: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before % Complete processing', x_Log_Level=> 3);

4490:
4491: -- ********* PERCENT COMPLETE PROCESSING BEGIN ***********
4492:
4493: IF g1_debug_mode = 'Y' THEN
4494: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before % Complete processing', x_Log_Level=> 3);
4495: END IF;
4496:
4497: IF ((p_process_flag1 = 'Y' OR p_process_flag2 = 'Y' OR p_process_flag3 = 'Y' OR p_process_flag4 = 'Y'
4498: OR p_process_flag5 = 'Y' OR p_process_flag6 = 'Y')

Line 5446: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After % Complete processing', x_Log_Level=> 3);

5442: */
5443: END IF; -- ((p_process_flag1 = 'Y' OR p_process_flag2 = 'Y' OR p_process_flag3 = 'Y' OR p_process_flag4 = 'Y'
5444:
5445: IF g1_debug_mode = 'Y' THEN
5446: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After % Complete processing', x_Log_Level=> 3);
5447: END IF;
5448:
5449: -- ********* PERCENT COMPLETE PROCESSING END ******************
5450:

Line 5453: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before ETC Cost processing', x_Log_Level=> 3);

5449: -- ********* PERCENT COMPLETE PROCESSING END ******************
5450:
5451: -- ********* ETC COST ROLLUP BEGIN ****************
5452: IF g1_debug_mode = 'Y' THEN
5453: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before ETC Cost processing', x_Log_Level=> 3);
5454: END IF;
5455:
5456:
5457: -- Bug 4218507 : To do effort or ETC processing, atleast one of the flags p_process_ETC_Flag1 or p_process_effort_flag1

Line 5939: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After ETC Cost processing', x_Log_Level=> 3);

5935: */
5936: END IF; -- ((p_process_flag1 = 'Y' OR p_process_flag2 = 'Y' OR p_process_flag3 = 'Y' OR p_process_flag4 = 'Y'
5937:
5938: IF g1_debug_mode = 'Y' THEN
5939: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After ETC Cost processing', x_Log_Level=> 3);
5940: END IF;
5941:
5942: -- ********* ETC COST ROLLUP END *************
5943:

Line 5947: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before Assigning data back to plsql table', x_Log_Level=> 3);

5943:
5944:
5945:
5946: IF g1_debug_mode = 'Y' THEN
5947: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'Before Assigning data back to plsql table', x_Log_Level=> 3);
5948: END IF;
5949:
5950: l_data_count := 1;
5951:

Line 5973: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After Assigning data back to plsql table', x_Log_Level=> 3);

5969: CLOSE processed_data_structure;
5970: END IF;
5971:
5972: IF g1_debug_mode = 'Y' THEN
5973: pa_debug.write(x_Module=>'PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE', x_Msg => 'After Assigning data back to plsql table', x_Log_Level=> 3);
5974: END IF;
5975:
5976: -- Bug 4289748 : removed rollback, used delete instead
5977: --ROLLBACK TO SAVEPOINT GENERATE_SCHEDULE_SP;

Line 5996: pa_debug.debug('PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE END');

5992: -- x_return_status := FND_API.G_RET_STS_ERROR;
5993: --END IF;
5994:
5995: IF (p_debug_mode = 'Y') AND g1_debug_mode = 'Y' THEN
5996: pa_debug.debug('PA_SCHEDULE_OBJECTS_PVT.GENERATE_SCHEDULE END');
5997: END IF;
5998:
5999: EXCEPTION
6000: WHEN API_ERROR THEN