DBA Data[Home] [Help]

APPS.PA_PROJ_ACCUM_MAIN dependencies on PA_DEBUG

Line 185: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); /* Added Debug Profile Option variable initialization for bug#2674619 */

181:
182: PROCEDURE initialize
183:
184: IS
185: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); /* Added Debug Profile Option variable initialization for bug#2674619 */
186:
187: BEGIN
188:
189: x_old_stack := x_err_stack;

Line 200: Pa_Debug.debug(x_err_stack);

196:
197: -- Get the Accumulation type from PA_IMPLEMENTATIONS
198: -- whether Accumulate by PA_PERIOD or GL_PERIOD
199: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
200: Pa_Debug.debug(x_err_stack);
201: END IF;
202:
203: --- Getting the commit size--------------
204: IF Fnd_Profile.value('PA_NUM_EXP_ITEMS_PER_SET') IS NOT NULL THEN

Line 309: Pa_Debug.debug('proj_accum, Initialize: G_PA_Enhanced_Burdening - '|| Pa_Proj_Accum_Main.G_PA_Enhanced_Burdening );

305: Pa_Proj_Accum_Main.G_PA_Enhanced_Burdening := pa_utils2.IsEnhancedBurdeningEnabled; /*4278940 */
306:
307: IF ( P_DEBUG_MODE = 'Y' )
308: THEN
309: Pa_Debug.debug('proj_accum, Initialize: G_PA_Enhanced_Burdening - '|| Pa_Proj_Accum_Main.G_PA_Enhanced_Burdening );
310: END IF;
311:
312:
313: -- --------------------------------------------------------------------------

Line 333: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); /* Added Debug Profile Option variable initialization for bug#2674619 */

329:
330: PROCEDURE initialize_project (x_project_id IN NUMBER,
331: x_accum_period_type_changed OUT NOCOPY BOOLEAN) --File.Sql.39 bug 4440895
332: IS
333: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); /* Added Debug Profile Option variable initialization for bug#2674619 */
334: l_accum_period_type_changed BOOLEAN;
335:
336:
337: BEGIN

Line 346: Pa_Debug.debug('initialize_project: ' || x_err_stack);

342: x_err_stage :=
343: 'Summary Accumulation Initialization Procedure for Project_id= ' || x_project_id;
344:
345: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
346: Pa_Debug.debug('initialize_project: ' || x_err_stack);
347: END IF;
348:
349: /* Commented for performance bug 3653978
350: -- Initialize the global variables before use for each project

Line 498: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); /* Added Debug Profile Option variable initialization for bug#2674619 */

494: x_err_stack IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
495: x_err_stage IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
496: x_err_code IN OUT NOCOPY NUMBER) --File.Sql.39 bug 4440895
497: IS
498: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); /* Added Debug Profile Option variable initialization for bug#2674619 */
499:
500: BEGIN
501:
502: x_old_stack := x_err_stack;

Line 514: Pa_Debug.debug('check_reporting_period: ' || x_err_stack);

510: -- if the period did moved backward, then we will abort the process
511: -- If the period was moved forward, it is OK
512:
513: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
514: Pa_Debug.debug('check_reporting_period: ' || x_err_stack);
515: END IF;
516:
517: -- Get the information pertaining to the Current PA PERIOD
518:

Line 768: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

764: )
765: IS
766:
767: /* Added Debug Profile Option variable initialization for bug#2674619 */
768: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
769:
770:
771:
772: x_log_summ_mode VARCHAR2(1) := 'N';

Line 957: Pa_Debug.debug('proj_accum: ' || x_err_stack);

953: x_err_stage := 'Project Accumulation Process';
954: x_log_summ_mode := Fnd_Profile.value('PA_LOG_SUMM_MODE');
955:
956: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
957: Pa_Debug.debug('proj_accum: ' || x_err_stack);
958: END IF;
959:
960: -- Grants Management Integrated Commitment Processing ---------------------
961: -- added 30-MAY-2003, jwhite

Line 967: Pa_Debug.debug('proj_accum: G_GMS_Enabled = ' || G_GMS_Enabled);

963: G_GMS_Enabled := GMS_PA_API3.grants_enabled;
964:
965: IF ( P_DEBUG_MODE = 'Y' )
966: THEN
967: Pa_Debug.debug('proj_accum: G_GMS_Enabled = ' || G_GMS_Enabled);
968: END IF;
969:
970:
971: -- -------------------------------------------------------------------------

Line 988: Pa_Debug.debug('proj_accum: ' || 'Nothing selected for accumulation');

984: AND NVL(x_budgets_flag, 'N') = 'N'
985: AND NVL(x_commitments_flag, 'N') = 'N' THEN
986:
987: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
988: Pa_Debug.debug('proj_accum: ' || 'Nothing selected for accumulation');
989: END IF;
990: errbuf := 'Nothing selected for accumulation ';
991: retcode := 2;
992: RETURN;

Line 1206: Pa_Debug.debug('proj_accum: ' || 'No Records to be Summarized');

1202:
1203: EXCEPTION
1204: WHEN NO_DATA_FOUND THEN
1205: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1206: Pa_Debug.debug('proj_accum: ' || 'No Records to be Summarized');
1207: END IF;
1208: NULL ;
1209: WHEN OTHERS THEN
1210: x_err_code := SQLCODE;

Line 1230: Pa_Debug.debug('proj_accum: ' || '**** PLEASE REFRESH THE PROJECT '

1226: Pa_Proj_Accum_Main.lock_proj_level_header_record
1227: (filter_proj.project_id);
1228:
1229: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1230: Pa_Debug.debug('proj_accum: ' || '**** PLEASE REFRESH THE PROJECT '
1231: || filter_proj.segment1 || ' ****',
1232: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
1233: END IF;
1234:

Line 1232: Pa_Debug.DEBUG_LEVEL_EXCEPTION);

1228:
1229: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1230: Pa_Debug.debug('proj_accum: ' || '**** PLEASE REFRESH THE PROJECT '
1231: || filter_proj.segment1 || ' ****',
1232: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
1233: END IF;
1234:
1235: IF filter_proj.action_flag = 'PT' THEN
1236: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 1237: Pa_Debug.debug('proj_accum: ' || '***** THE ACCUMULATION PERIOD ' ||

1233: END IF;
1234:
1235: IF filter_proj.action_flag = 'PT' THEN
1236: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1237: Pa_Debug.debug('proj_accum: ' || '***** THE ACCUMULATION PERIOD ' ||
1238: 'TYPE HAS CHANGED SINCE THE LAST TIME '||
1239: 'THE PROJECT WAS ACCUMULATED *****',
1240: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
1241: END IF;

Line 1240: Pa_Debug.DEBUG_LEVEL_EXCEPTION);

1236: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1237: Pa_Debug.debug('proj_accum: ' || '***** THE ACCUMULATION PERIOD ' ||
1238: 'TYPE HAS CHANGED SINCE THE LAST TIME '||
1239: 'THE PROJECT WAS ACCUMULATED *****',
1240: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
1241: END IF;
1242: errbuf := 'Accumulation Period Type has changed' ;
1243: l_sum_exception_code := 'PA_SUM_ACCUM_PERIOD_CHANGED';
1244:

Line 1247: Pa_Debug.debug('proj_accum: ' || '************* TASKS ARE ' ||

1243: l_sum_exception_code := 'PA_SUM_ACCUM_PERIOD_CHANGED';
1244:
1245: ELSIF filter_proj.action_flag = 'TR' THEN
1246: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1247: Pa_Debug.debug('proj_accum: ' || '************* TASKS ARE ' ||
1248: 'RESTRUCTURED FOR THE PROJECT *************',
1249: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
1250: END IF;
1251: errbuf := 'Tasks have been Restructured' ;

Line 1249: Pa_Debug.DEBUG_LEVEL_EXCEPTION);

1245: ELSIF filter_proj.action_flag = 'TR' THEN
1246: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1247: Pa_Debug.debug('proj_accum: ' || '************* TASKS ARE ' ||
1248: 'RESTRUCTURED FOR THE PROJECT *************',
1249: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
1250: END IF;
1251: errbuf := 'Tasks have been Restructured' ;
1252: l_sum_exception_code := 'PA_SUM_TASKS_RESTRUCTURED';
1253:

Line 1256: Pa_Debug.debug('proj_accum: ' || '********** REPORTING PERIOD ' ||

1252: l_sum_exception_code := 'PA_SUM_TASKS_RESTRUCTURED';
1253:
1254: ELSIF filter_proj.action_flag = 'BK' THEN
1255: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1256: Pa_Debug.debug('proj_accum: ' || '********** REPORTING PERIOD ' ||
1257: 'WAS MOVED BACKWARDS IN TIME **********',
1258: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
1259: END IF;
1260: errbuf := 'Reporting Period has moved backwards' ;

Line 1258: Pa_Debug.DEBUG_LEVEL_EXCEPTION);

1254: ELSIF filter_proj.action_flag = 'BK' THEN
1255: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1256: Pa_Debug.debug('proj_accum: ' || '********** REPORTING PERIOD ' ||
1257: 'WAS MOVED BACKWARDS IN TIME **********',
1258: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
1259: END IF;
1260: errbuf := 'Reporting Period has moved backwards' ;
1261: l_sum_exception_code := 'PA_SUM_RPT_PERIOD_BACKWARD';
1262:

Line 1265: Pa_Debug.debug('proj_accum: ' || '****** PROJECT IS CLOSED AND ' ||

1261: l_sum_exception_code := 'PA_SUM_RPT_PERIOD_BACKWARD';
1262:
1263: ELSIF filter_proj.action_flag = 'CL' THEN
1264: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1265: Pa_Debug.debug('proj_accum: ' || '****** PROJECT IS CLOSED AND ' ||
1266: 'NOT ELIGIBLE FOR ACCUMULATION *******',
1267: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
1268: END IF;
1269: errbuf := 'Project is closed' ;

Line 1267: Pa_Debug.DEBUG_LEVEL_EXCEPTION);

1263: ELSIF filter_proj.action_flag = 'CL' THEN
1264: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1265: Pa_Debug.debug('proj_accum: ' || '****** PROJECT IS CLOSED AND ' ||
1266: 'NOT ELIGIBLE FOR ACCUMULATION *******',
1267: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
1268: END IF;
1269: errbuf := 'Project is closed' ;
1270: l_sum_exception_code := 'PA_SUM_PROJECT_CLOSED';
1271:

Line 1275: Pa_Debug.debug('proj_accum: ' || 'Cannot update summarization exception for project'||

1271:
1272: END IF ;
1273: IF (x_proj_header_locked = TRUE) THEN
1274: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1275: Pa_Debug.debug('proj_accum: ' || 'Cannot update summarization exception for project'||
1276: filter_proj.segment1,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
1277: END IF;
1278: ELSE
1279: UPDATE pa_project_accum_headers

Line 1276: filter_proj.segment1,Pa_Debug.DEBUG_LEVEL_EXCEPTION);

1272: END IF ;
1273: IF (x_proj_header_locked = TRUE) THEN
1274: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1275: Pa_Debug.debug('proj_accum: ' || 'Cannot update summarization exception for project'||
1276: filter_proj.segment1,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
1277: END IF;
1278: ELSE
1279: UPDATE pa_project_accum_headers
1280: SET sum_exception_code = l_sum_exception_code

Line 1302: Pa_Debug.debug('proj_accum: ' || 'Exception Generated By Oracle Error: ' ||

1298: x_err_code := SQLCODE;
1299: DELETE FROM pa_projects_for_accum
1300: WHERE request_id = x_request_id ;
1301: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1302: Pa_Debug.debug('proj_accum: ' || 'Exception Generated By Oracle Error: ' ||
1303: errbuf,Pa_Debug.DEBUG_LEVEL_EXCEPTION );
1304: Pa_Debug.debug('proj_accum: ' || 'Skipping the accumulation for project ' ||
1305: filter_proj.segment1,
1306: Pa_Debug.DEBUG_LEVEL_EXCEPTION);

Line 1303: errbuf,Pa_Debug.DEBUG_LEVEL_EXCEPTION );

1299: DELETE FROM pa_projects_for_accum
1300: WHERE request_id = x_request_id ;
1301: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1302: Pa_Debug.debug('proj_accum: ' || 'Exception Generated By Oracle Error: ' ||
1303: errbuf,Pa_Debug.DEBUG_LEVEL_EXCEPTION );
1304: Pa_Debug.debug('proj_accum: ' || 'Skipping the accumulation for project ' ||
1305: filter_proj.segment1,
1306: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
1307: END IF;

Line 1304: Pa_Debug.debug('proj_accum: ' || 'Skipping the accumulation for project ' ||

1300: WHERE request_id = x_request_id ;
1301: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1302: Pa_Debug.debug('proj_accum: ' || 'Exception Generated By Oracle Error: ' ||
1303: errbuf,Pa_Debug.DEBUG_LEVEL_EXCEPTION );
1304: Pa_Debug.debug('proj_accum: ' || 'Skipping the accumulation for project ' ||
1305: filter_proj.segment1,
1306: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
1307: END IF;
1308: RAISE;

Line 1306: Pa_Debug.DEBUG_LEVEL_EXCEPTION);

1302: Pa_Debug.debug('proj_accum: ' || 'Exception Generated By Oracle Error: ' ||
1303: errbuf,Pa_Debug.DEBUG_LEVEL_EXCEPTION );
1304: Pa_Debug.debug('proj_accum: ' || 'Skipping the accumulation for project ' ||
1305: filter_proj.segment1,
1306: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
1307: END IF;
1308: RAISE;
1309:
1310: END ;

Line 1336: Pa_Debug.debug('proj_accum: ' || 'Processing Project Id = ' ||

1332:
1333: FOR valid_proj IN all_projs LOOP
1334:
1335: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1336: Pa_Debug.debug('proj_accum: ' || 'Processing Project Id = ' ||
1337: TO_CHAR(valid_proj.project_id));
1338: END IF;
1339: tmp_bud_type_code := x_budget_type_code;
1340: ------------Acquire lock on the project-----------

Line 1341: IF Pa_Debug.acquire_user_lock('PA_SUMM:'||TO_CHAR(valid_proj.project_id)) <> 0 THEN

1337: TO_CHAR(valid_proj.project_id));
1338: END IF;
1339: tmp_bud_type_code := x_budget_type_code;
1340: ------------Acquire lock on the project-----------
1341: IF Pa_Debug.acquire_user_lock('PA_SUMM:'||TO_CHAR(valid_proj.project_id)) <> 0 THEN
1342: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1343: Pa_Debug.debug('proj_accum: ' || 'Could not acquire lock on the Project. Skipping ...');
1344: END IF;
1345: GOTO skip_project;

Line 1343: Pa_Debug.debug('proj_accum: ' || 'Could not acquire lock on the Project. Skipping ...');

1339: tmp_bud_type_code := x_budget_type_code;
1340: ------------Acquire lock on the project-----------
1341: IF Pa_Debug.acquire_user_lock('PA_SUMM:'||TO_CHAR(valid_proj.project_id)) <> 0 THEN
1342: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1343: Pa_Debug.debug('proj_accum: ' || 'Could not acquire lock on the Project. Skipping ...');
1344: END IF;
1345: GOTO skip_project;
1346: ELSE
1347: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 1348: Pa_Debug.debug('proj_accum: ' || 'Locking the project for summarization ...');

1344: END IF;
1345: GOTO skip_project;
1346: ELSE
1347: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1348: Pa_Debug.debug('proj_accum: ' || 'Locking the project for summarization ...');
1349: END IF;
1350: END IF;
1351: -------------------------------------------------
1352:

Line 1377: Pa_Debug.debug('proj_accum: ' || 'Refreshing new resource lists assigned '||

1373: WHERE project_accum_id=x_proj_level_accum_id;
1374:
1375:
1376: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1377: Pa_Debug.debug('proj_accum: ' || 'Refreshing new resource lists assigned '||
1378: 'to the project, If any');
1379: END IF;
1380:
1381: IF Pa_Proj_Accum_Main.action_exists

Line 1389: Pa_Debug.debug('proj_accum: ' || 'Refreshing resource list id = ' ||

1385:
1386: FOR new_resource_list_rec IN
1387: new_resource_list(l_project_id) LOOP
1388: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1389: Pa_Debug.debug('proj_accum: ' || 'Refreshing resource list id = ' ||
1390: TO_CHAR(new_resource_list_rec.resource_list_id) );
1391: END IF;
1392:
1393: IF ( x_prev_accum_period IS NOT NULL ) THEN

Line 1495: Pa_Debug.debug('proj_accum: Call Accum_Cdls with x_cdl_line_type = I' );

1491: THEN
1492:
1493: IF ( P_DEBUG_MODE = 'Y' )
1494: THEN
1495: Pa_Debug.debug('proj_accum: Call Accum_Cdls with x_cdl_line_type = I' );
1496: END IF;
1497:
1498:
1499: Pa_Txn_Accums.accum_cdls

Line 1610: Pa_Debug.debug('proj_accum: ' || 'Accumulation Period has changed'||

1606: x_actions_in => x_actions_in,
1607: x_actions_cnt => x_actions_cnt) = 'Y' THEN
1608:
1609: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1610: Pa_Debug.debug('proj_accum: ' || 'Accumulation Period has changed'||
1611: ', since last accumulation');
1612: END IF;
1613:
1614: -- Initialize summary level numbers

Line 1984: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(valid_proj.project_id)) = 0 THEN

1980: END IF;
1981:
1982: COMMIT WORK; -- we are done with this project now
1983:
1984: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(valid_proj.project_id)) = 0 THEN
1985: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1986: Pa_Debug.debug('proj_accum: ' || 'Releasing the lock on project ...');
1987: END IF;
1988: END IF;

Line 1986: Pa_Debug.debug('proj_accum: ' || 'Releasing the lock on project ...');

1982: COMMIT WORK; -- we are done with this project now
1983:
1984: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(valid_proj.project_id)) = 0 THEN
1985: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1986: Pa_Debug.debug('proj_accum: ' || 'Releasing the lock on project ...');
1987: END IF;
1988: END IF;
1989:
1990: -- Re-Initializing start and end variables

Line 2033: rel_lock := Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(l_project_id));

2029:
2030: EXCEPTION
2031:
2032: WHEN OTHERS THEN
2033: rel_lock := Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(l_project_id));
2034: x_err_code := SQLCODE;
2035: retcode := x_err_code;
2036: errbuf := SUBSTR(SQLERRM(SQLCODE),1,512);
2037: ROLLBACK WORK;

Line 2041: Pa_Debug.debug('proj_accum: ' || 'Exception Generated By Oracle Error: ' ||

2037: ROLLBACK WORK;
2038: DELETE FROM pa_projects_for_accum
2039: WHERE request_id = x_request_id ;
2040: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2041: Pa_Debug.debug('proj_accum: ' || 'Exception Generated By Oracle Error: ' ||
2042: errbuf ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2043: END IF;
2044: COMMIT WORK;
2045: --raise;

Line 2042: errbuf ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2038: DELETE FROM pa_projects_for_accum
2039: WHERE request_id = x_request_id ;
2040: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2041: Pa_Debug.debug('proj_accum: ' || 'Exception Generated By Oracle Error: ' ||
2042: errbuf ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2043: END IF;
2044: COMMIT WORK;
2045: --raise;
2046: RETURN;

Line 2066: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

2062: IS
2063:
2064: /* Added Debug Profile Option variable initialization for bug#2674619 */
2065:
2066: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
2067:
2068:
2069:
2070: l_accum_period_type_changed BOOLEAN;

Line 2148: Pa_Debug.debug('proj_refresh: ' || x_err_stack);

2144: x_date_through := x_end_date_through;
2145: END IF;
2146:
2147: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2148: Pa_Debug.debug('proj_refresh: ' || x_err_stack);
2149: END IF;
2150:
2151:
2152: -- Grants Management Integrated Commitment Processing ---------------------

Line 2159: Pa_Debug.debug('proj_accum: G_GMS_Enabled = ' || G_GMS_Enabled);

2155: G_GMS_Enabled := GMS_PA_API3.grants_enabled;
2156:
2157: IF ( P_DEBUG_MODE = 'Y' )
2158: THEN
2159: Pa_Debug.debug('proj_accum: G_GMS_Enabled = ' || G_GMS_Enabled);
2160: END IF;
2161:
2162:
2163: -- -------------------------------------------------------------------------

Line 2196: Pa_Debug.debug('proj_refresh: ' || 'Refreshing accumulation for Project Id = '

2192: -- This PL/SQL block corresponds to processing for each project
2193:
2194: l_project_id := projrec.project_id;
2195: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2196: Pa_Debug.debug('proj_refresh: ' || 'Refreshing accumulation for Project Id = '
2197: || TO_CHAR(projrec.project_id));
2198: END IF;
2199:
2200: -- Initialize the Global variable in the loop for each project

Line 2207: IF Pa_Debug.acquire_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) <> 0 THEN

2203: Pa_Proj_Accum_Main.initialize_project(projrec.project_id,
2204: l_accum_period_type_changed);
2205:
2206: -- Try to Lock the project level record
2207: IF Pa_Debug.acquire_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) <> 0 THEN
2208: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2209: Pa_Debug.debug('proj_refresh: ' || 'Could not acquire lock on the Project. Skipping ...');
2210: END IF;
2211: GOTO next_project;

Line 2209: Pa_Debug.debug('proj_refresh: ' || 'Could not acquire lock on the Project. Skipping ...');

2205:
2206: -- Try to Lock the project level record
2207: IF Pa_Debug.acquire_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) <> 0 THEN
2208: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2209: Pa_Debug.debug('proj_refresh: ' || 'Could not acquire lock on the Project. Skipping ...');
2210: END IF;
2211: GOTO next_project;
2212: ELSE
2213: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 2214: Pa_Debug.debug('proj_refresh: ' || 'Locking the project for summarization ...');

2210: END IF;
2211: GOTO next_project;
2212: ELSE
2213: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2214: Pa_Debug.debug('proj_refresh: ' || 'Locking the project for summarization ...');
2215: END IF;
2216: END IF;
2217: -------------------------------------------------
2218:

Line 2331: Pa_Debug.debug('proj_accum: Call Accum_Cdls with x_cdl_line_type = I' );

2327: THEN
2328:
2329: IF ( P_DEBUG_MODE = 'Y' )
2330: THEN
2331: Pa_Debug.debug('proj_accum: Call Accum_Cdls with x_cdl_line_type = I' );
2332: END IF;
2333:
2334: Pa_Txn_Accums.accum_cdls
2335: (projrec.project_id, -- start_project_id

Line 2497: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2493:
2494: -- Stop processing and exit the procedure return from the procedure
2495: -- after a rollback;
2496: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2497: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2498: Pa_Debug.debug('proj_refresh: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2499: Pa_Debug.debug('proj_refresh: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2500: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2501: END IF;

Line 2498: Pa_Debug.debug('proj_refresh: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2494: -- Stop processing and exit the procedure return from the procedure
2495: -- after a rollback;
2496: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2497: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2498: Pa_Debug.debug('proj_refresh: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2499: Pa_Debug.debug('proj_refresh: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2500: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2501: END IF;
2502: IF Pa_Debug.release_user_lock( 'PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN

Line 2499: Pa_Debug.debug('proj_refresh: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2495: -- after a rollback;
2496: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2497: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2498: Pa_Debug.debug('proj_refresh: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2499: Pa_Debug.debug('proj_refresh: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2500: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2501: END IF;
2502: IF Pa_Debug.release_user_lock( 'PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
2503: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 2500: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2496: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2497: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2498: Pa_Debug.debug('proj_refresh: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2499: Pa_Debug.debug('proj_refresh: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2500: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2501: END IF;
2502: IF Pa_Debug.release_user_lock( 'PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
2503: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2504: Pa_Debug.debug('proj_refresh: ' || 'Released lock on project ...');

Line 2502: IF Pa_Debug.release_user_lock( 'PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN

2498: Pa_Debug.debug('proj_refresh: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2499: Pa_Debug.debug('proj_refresh: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2500: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2501: END IF;
2502: IF Pa_Debug.release_user_lock( 'PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
2503: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2504: Pa_Debug.debug('proj_refresh: ' || 'Released lock on project ...');
2505: END IF;
2506: END IF;

Line 2504: Pa_Debug.debug('proj_refresh: ' || 'Released lock on project ...');

2500: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2501: END IF;
2502: IF Pa_Debug.release_user_lock( 'PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
2503: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2504: Pa_Debug.debug('proj_refresh: ' || 'Released lock on project ...');
2505: END IF;
2506: END IF;
2507: errbuf := 'Reporting Period Moved Backward In Time During Process Run';
2508: retcode := 2;

Line 2598: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2594: IF(x_reporting_period_status = 'Y') THEN
2595: -- Stop processing and exit the procedure return from the procedure
2596: -- after a rollback;
2597: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2598: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2599: Pa_Debug.debug('proj_refresh: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2600: Pa_Debug.debug('proj_refresh: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2601: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2602: END IF;

Line 2599: Pa_Debug.debug('proj_refresh: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2595: -- Stop processing and exit the procedure return from the procedure
2596: -- after a rollback;
2597: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2598: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2599: Pa_Debug.debug('proj_refresh: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2600: Pa_Debug.debug('proj_refresh: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2601: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2602: END IF;
2603: IF Pa_Debug.release_user_lock( 'PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN

Line 2600: Pa_Debug.debug('proj_refresh: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2596: -- after a rollback;
2597: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2598: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2599: Pa_Debug.debug('proj_refresh: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2600: Pa_Debug.debug('proj_refresh: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2601: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2602: END IF;
2603: IF Pa_Debug.release_user_lock( 'PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
2604: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 2601: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2597: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2598: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2599: Pa_Debug.debug('proj_refresh: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2600: Pa_Debug.debug('proj_refresh: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2601: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2602: END IF;
2603: IF Pa_Debug.release_user_lock( 'PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
2604: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2605: Pa_Debug.debug('proj_refresh: ' || 'Released lock on project ...');

Line 2603: IF Pa_Debug.release_user_lock( 'PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN

2599: Pa_Debug.debug('proj_refresh: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2600: Pa_Debug.debug('proj_refresh: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2601: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2602: END IF;
2603: IF Pa_Debug.release_user_lock( 'PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
2604: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2605: Pa_Debug.debug('proj_refresh: ' || 'Released lock on project ...');
2606: END IF;
2607: END IF;

Line 2605: Pa_Debug.debug('proj_refresh: ' || 'Released lock on project ...');

2601: Pa_Debug.debug('proj_refresh: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2602: END IF;
2603: IF Pa_Debug.release_user_lock( 'PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
2604: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2605: Pa_Debug.debug('proj_refresh: ' || 'Released lock on project ...');
2606: END IF;
2607: END IF;
2608: errbuf := 'Reporting Period Moved Backward In Time During Process Run';
2609: retcode := 2;

Line 2611: Pa_Debug.debug('proj_refresh: ' || 'Here');

2607: END IF;
2608: errbuf := 'Reporting Period Moved Backward In Time During Process Run';
2609: retcode := 2;
2610: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2611: Pa_Debug.debug('proj_refresh: ' || 'Here');
2612: END IF;
2613: ROLLBACK WORK;
2614: RETURN;
2615: END IF; -- IF(x_reporting_period_status = 'Y')

Line 2674: IF Pa_Debug.release_user_lock( 'PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN

2670: );
2671: END IF;
2672:
2673: COMMIT WORK; -- we are done with this project now
2674: IF Pa_Debug.release_user_lock( 'PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
2675: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2676: Pa_Debug.debug('proj_refresh: ' || 'Released lock on project ...');
2677: END IF;
2678: END IF;

Line 2676: Pa_Debug.debug('proj_refresh: ' || 'Released lock on project ...');

2672:
2673: COMMIT WORK; -- we are done with this project now
2674: IF Pa_Debug.release_user_lock( 'PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
2675: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2676: Pa_Debug.debug('proj_refresh: ' || 'Released lock on project ...');
2677: END IF;
2678: END IF;
2679:
2680: -- Re-initializing start and end variables

Line 2712: rel_lock := Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(l_project_id));

2708:
2709: EXCEPTION
2710:
2711: WHEN OTHERS THEN
2712: rel_lock := Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(l_project_id));
2713: x_err_code := SQLCODE;
2714: retcode := x_err_code;
2715: errbuf := SUBSTR(SQLERRM(SQLCODE),1,512);
2716: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 2717: Pa_Debug.debug('proj_refresh: ' || 'Exception Generated By Oracle Error: ' || errbuf,Pa_Debug.DEBUG_LEVEL_EXCEPTION );

2713: x_err_code := SQLCODE;
2714: retcode := x_err_code;
2715: errbuf := SUBSTR(SQLERRM(SQLCODE),1,512);
2716: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2717: Pa_Debug.debug('proj_refresh: ' || 'Exception Generated By Oracle Error: ' || errbuf,Pa_Debug.DEBUG_LEVEL_EXCEPTION );
2718: Pa_Debug.debug('proj_refresh: ' || 'Skipping the accumulation for project ' || projrec.segment1 ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2719: END IF;
2720:
2721: -- Exception handling for database errors (other than 1400 and 1489)

Line 2718: Pa_Debug.debug('proj_refresh: ' || 'Skipping the accumulation for project ' || projrec.segment1 ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2714: retcode := x_err_code;
2715: errbuf := SUBSTR(SQLERRM(SQLCODE),1,512);
2716: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2717: Pa_Debug.debug('proj_refresh: ' || 'Exception Generated By Oracle Error: ' || errbuf,Pa_Debug.DEBUG_LEVEL_EXCEPTION );
2718: Pa_Debug.debug('proj_refresh: ' || 'Skipping the accumulation for project ' || projrec.segment1 ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2719: END IF;
2720:
2721: -- Exception handling for database errors (other than 1400 and 1489)
2722: IF x_err_code*-1 BETWEEN 1400 AND 1489 THEN

Line 2738: rel_lock := Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(l_project_id));

2734:
2735: EXCEPTION
2736:
2737: WHEN OTHERS THEN
2738: rel_lock := Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(l_project_id));
2739: x_err_code := SQLCODE;
2740: retcode := x_err_code;
2741: errbuf := SUBSTR(SQLERRM(SQLCODE),1,512);
2742: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 2743: Pa_Debug.debug('proj_refresh: ' || 'Exception Generated By Oracle Error: ' || errbuf ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2739: x_err_code := SQLCODE;
2740: retcode := x_err_code;
2741: errbuf := SUBSTR(SQLERRM(SQLCODE),1,512);
2742: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2743: Pa_Debug.debug('proj_refresh: ' || 'Exception Generated By Oracle Error: ' || errbuf ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2744: END IF;
2745: ROLLBACK WORK;
2746: RETURN;
2747: END proj_refresh;

Line 2761: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); /* Added Debug Profile Option variable initialization for bug#2674619 */

2757: x_project_num_to IN VARCHAR2,
2758: x_resource_list_id IN NUMBER
2759: )
2760: IS
2761: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); /* Added Debug Profile Option variable initialization for bug#2674619 */
2762: l_accum_period_type_changed BOOLEAN;
2763: l_sum_exception_code pa_project_accum_headers.sum_exception_code%TYPE := NULL;
2764: l_current_start_date DATE := NULL;
2765: l_current_end_date DATE := NULL;

Line 2798: Pa_Debug.debug('ref_rl_accum: ' || x_err_stack);

2794: x_err_stack := x_err_stack || '->pa_proj_accum_main.ref_rl_accum';
2795: x_err_stage := 'Refresh Resource List accumulation Process';
2796:
2797: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2798: Pa_Debug.debug('ref_rl_accum: ' || x_err_stack);
2799: END IF;
2800:
2801: -- Validate Parameters
2802: Get_Project_Num_Range( x_project_num_from,

Line 2823: IF Pa_Debug.acquire_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) <> 0 THEN

2819: l_project_id := projrec.project_id;
2820: -- This PL/SQL block corresponds to processing for each project
2821:
2822: ------------Acquire lock on the project-----------
2823: IF Pa_Debug.acquire_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) <> 0 THEN
2824: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2825: Pa_Debug.debug('ref_rl_accum: ' || 'Could not acquire lock on the Project. Skipping ...');
2826: END IF;
2827: GOTO next_project;

Line 2825: Pa_Debug.debug('ref_rl_accum: ' || 'Could not acquire lock on the Project. Skipping ...');

2821:
2822: ------------Acquire lock on the project-----------
2823: IF Pa_Debug.acquire_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) <> 0 THEN
2824: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2825: Pa_Debug.debug('ref_rl_accum: ' || 'Could not acquire lock on the Project. Skipping ...');
2826: END IF;
2827: GOTO next_project;
2828: ELSE
2829: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 2830: Pa_Debug.debug('ref_rl_accum: ' || 'Locking the project for summarization ...');

2826: END IF;
2827: GOTO next_project;
2828: ELSE
2829: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2830: Pa_Debug.debug('ref_rl_accum: ' || 'Locking the project for summarization ...');
2831: END IF;
2832: END IF;
2833: -------------------------------------------------
2834:

Line 2836: Pa_Debug.debug('ref_rl_accum: ' || 'Refreshing resource list id = ' ||

2832: END IF;
2833: -------------------------------------------------
2834:
2835: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2836: Pa_Debug.debug('ref_rl_accum: ' || 'Refreshing resource list id = ' ||
2837: NVL(TO_CHAR(x_resource_list_id),'ALL') || ' For Project Id = '
2838: || TO_CHAR(projrec.project_id));
2839: END IF;
2840:

Line 2859: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2855: --
2856: IF (Pa_Proj_Accum_Main.check_period_flags(projrec.project_id,x_impl_option,l_current_end_date,
2857: 'PT',projrec.closed_date,l_current_start_date)='Y') THEN
2858: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2859: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2860: Pa_Debug.debug('ref_rl_accum: ' || '*****THE ACCUMULATION PERIOD TYPE HAS CHANGED SINCE THE LAST TIME PROJECT ' || projrec.segment1 || ' WAS ACCUMULATED '|| '******',
2861: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2862: Pa_Debug.debug('ref_rl_accum: ' || '*****PLEASE REFRESH THE PROJECT ******', Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2863: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

Line 2860: Pa_Debug.debug('ref_rl_accum: ' || '*****THE ACCUMULATION PERIOD TYPE HAS CHANGED SINCE THE LAST TIME PROJECT ' || projrec.segment1 || ' WAS ACCUMULATED '|| '******',

2856: IF (Pa_Proj_Accum_Main.check_period_flags(projrec.project_id,x_impl_option,l_current_end_date,
2857: 'PT',projrec.closed_date,l_current_start_date)='Y') THEN
2858: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2859: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2860: Pa_Debug.debug('ref_rl_accum: ' || '*****THE ACCUMULATION PERIOD TYPE HAS CHANGED SINCE THE LAST TIME PROJECT ' || projrec.segment1 || ' WAS ACCUMULATED '|| '******',
2861: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2862: Pa_Debug.debug('ref_rl_accum: ' || '*****PLEASE REFRESH THE PROJECT ******', Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2863: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2864: END IF;

Line 2861: Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2857: 'PT',projrec.closed_date,l_current_start_date)='Y') THEN
2858: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2859: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2860: Pa_Debug.debug('ref_rl_accum: ' || '*****THE ACCUMULATION PERIOD TYPE HAS CHANGED SINCE THE LAST TIME PROJECT ' || projrec.segment1 || ' WAS ACCUMULATED '|| '******',
2861: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2862: Pa_Debug.debug('ref_rl_accum: ' || '*****PLEASE REFRESH THE PROJECT ******', Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2863: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2864: END IF;
2865: -- Stop processing and exit the procedure return from the procedure

Line 2862: Pa_Debug.debug('ref_rl_accum: ' || '*****PLEASE REFRESH THE PROJECT ******', Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2858: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2859: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2860: Pa_Debug.debug('ref_rl_accum: ' || '*****THE ACCUMULATION PERIOD TYPE HAS CHANGED SINCE THE LAST TIME PROJECT ' || projrec.segment1 || ' WAS ACCUMULATED '|| '******',
2861: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2862: Pa_Debug.debug('ref_rl_accum: ' || '*****PLEASE REFRESH THE PROJECT ******', Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2863: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2864: END IF;
2865: -- Stop processing and exit the procedure return from the procedure
2866: -- after a rollback;

Line 2863: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2859: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2860: Pa_Debug.debug('ref_rl_accum: ' || '*****THE ACCUMULATION PERIOD TYPE HAS CHANGED SINCE THE LAST TIME PROJECT ' || projrec.segment1 || ' WAS ACCUMULATED '|| '******',
2861: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2862: Pa_Debug.debug('ref_rl_accum: ' || '*****PLEASE REFRESH THE PROJECT ******', Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2863: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2864: END IF;
2865: -- Stop processing and exit the procedure return from the procedure
2866: -- after a rollback;
2867: errbuf := 'The Project ' || projrec.segment1 || 'Must Be Refreshed, Because the accumulation period type has changed since the last time the project was summarized';

Line 2890: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2886:
2887: IF ( x_tasks_restructured_flag = 'Y') THEN
2888: -- Add a message into the Log file
2889: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2890: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2891: Pa_Debug.debug('ref_rl_accum: ' || '*****THE PROJECT ' || projrec.segment1 || ' TASKS ARE RESTRUCTURED, PLEASE REFRESH THE PROJECT ******',
2892: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2893: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2894: END IF;

Line 2891: Pa_Debug.debug('ref_rl_accum: ' || '*****THE PROJECT ' || projrec.segment1 || ' TASKS ARE RESTRUCTURED, PLEASE REFRESH THE PROJECT ******',

2887: IF ( x_tasks_restructured_flag = 'Y') THEN
2888: -- Add a message into the Log file
2889: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2890: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2891: Pa_Debug.debug('ref_rl_accum: ' || '*****THE PROJECT ' || projrec.segment1 || ' TASKS ARE RESTRUCTURED, PLEASE REFRESH THE PROJECT ******',
2892: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2893: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2894: END IF;
2895: -- Stop processing and exit the procedure return from the procedure

Line 2892: Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2888: -- Add a message into the Log file
2889: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2890: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2891: Pa_Debug.debug('ref_rl_accum: ' || '*****THE PROJECT ' || projrec.segment1 || ' TASKS ARE RESTRUCTURED, PLEASE REFRESH THE PROJECT ******',
2892: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2893: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2894: END IF;
2895: -- Stop processing and exit the procedure return from the procedure
2896: -- after a rollback;

Line 2893: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2889: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2890: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2891: Pa_Debug.debug('ref_rl_accum: ' || '*****THE PROJECT ' || projrec.segment1 || ' TASKS ARE RESTRUCTURED, PLEASE REFRESH THE PROJECT ******',
2892: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2893: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2894: END IF;
2895: -- Stop processing and exit the procedure return from the procedure
2896: -- after a rollback;
2897: errbuf := 'The Project ' || projrec.segment1 || 'Must Be Refreshed, Because the Tasks for this Project were Restructured';

Line 2909: Pa_Debug.debug('ref_rl_accum: ' || 'Cannot update summarization exception for project'||projrec.segment1,Pa_Debug.DEBUG_LEVEL_EXCEPTION);

2905: END;
2906: IF (l_sum_exception_code IS NOT NULL) THEN
2907: IF (x_proj_header_locked = TRUE) THEN
2908: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2909: Pa_Debug.debug('ref_rl_accum: ' || 'Cannot update summarization exception for project'||projrec.segment1,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
2910: END IF;
2911: ELSE
2912: UPDATE pa_project_accum_headers
2913: SET sum_exception_code = l_sum_exception_code

Line 2919: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN

2915: AND task_id = 0
2916: AND resource_list_member_id = 0;
2917: COMMIT WORK;
2918: END IF;
2919: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
2920: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2921: Pa_Debug.debug('ref_rl_accum: ' || 'Releasing the lock on project ...');
2922: END IF;
2923: END IF;

Line 2921: Pa_Debug.debug('ref_rl_accum: ' || 'Releasing the lock on project ...');

2917: COMMIT WORK;
2918: END IF;
2919: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
2920: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2921: Pa_Debug.debug('ref_rl_accum: ' || 'Releasing the lock on project ...');
2922: END IF;
2923: END IF;
2924: GOTO next_project;
2925: END IF;

Line 3037: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

3033:
3034: -- Stop processing and exit the procedure return from the procedure
3035: -- after a rollback;
3036: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3037: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3038: Pa_Debug.debug('ref_rl_accum: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3039: Pa_Debug.debug('ref_rl_accum: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3040: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3041: END IF;

Line 3038: Pa_Debug.debug('ref_rl_accum: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

3034: -- Stop processing and exit the procedure return from the procedure
3035: -- after a rollback;
3036: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3037: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3038: Pa_Debug.debug('ref_rl_accum: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3039: Pa_Debug.debug('ref_rl_accum: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3040: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3041: END IF;
3042: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN

Line 3039: Pa_Debug.debug('ref_rl_accum: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

3035: -- after a rollback;
3036: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3037: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3038: Pa_Debug.debug('ref_rl_accum: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3039: Pa_Debug.debug('ref_rl_accum: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3040: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3041: END IF;
3042: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
3043: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 3040: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

3036: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3037: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3038: Pa_Debug.debug('ref_rl_accum: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3039: Pa_Debug.debug('ref_rl_accum: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3040: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3041: END IF;
3042: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
3043: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3044: Pa_Debug.debug('ref_rl_accum: ' || 'Releasing the lock on project ...');

Line 3042: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN

3038: Pa_Debug.debug('ref_rl_accum: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3039: Pa_Debug.debug('ref_rl_accum: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3040: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3041: END IF;
3042: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
3043: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3044: Pa_Debug.debug('ref_rl_accum: ' || 'Releasing the lock on project ...');
3045: END IF;
3046: END IF;

Line 3044: Pa_Debug.debug('ref_rl_accum: ' || 'Releasing the lock on project ...');

3040: Pa_Debug.debug('ref_rl_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3041: END IF;
3042: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
3043: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3044: Pa_Debug.debug('ref_rl_accum: ' || 'Releasing the lock on project ...');
3045: END IF;
3046: END IF;
3047: errbuf := 'Reporting Period Moved Backward In Time During Process Run';
3048: retcode := 2;

Line 3054: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN

3050: RETURN;
3051: END IF; -- IF(x_reporting_period_status = 'Y')
3052:
3053: COMMIT WORK; -- we are done with this project now
3054: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
3055: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3056: Pa_Debug.debug('ref_rl_accum: ' || 'Releasing the lock on project ...');
3057: END IF;
3058: END IF;

Line 3056: Pa_Debug.debug('ref_rl_accum: ' || 'Releasing the lock on project ...');

3052:
3053: COMMIT WORK; -- we are done with this project now
3054: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
3055: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3056: Pa_Debug.debug('ref_rl_accum: ' || 'Releasing the lock on project ...');
3057: END IF;
3058: END IF;
3059:
3060:

Line 3064: rel_lock := Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(l_project_id));

3060:
3061: EXCEPTION
3062:
3063: WHEN OTHERS THEN
3064: rel_lock := Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(l_project_id));
3065: x_err_code := SQLCODE;
3066: retcode := x_err_code;
3067: errbuf := SUBSTR(SQLERRM(SQLCODE),1,512);
3068: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 3069: Pa_Debug.debug('ref_rl_accum: ' || 'Exception Generated By Oracle Error: ' || errbuf ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);

3065: x_err_code := SQLCODE;
3066: retcode := x_err_code;
3067: errbuf := SUBSTR(SQLERRM(SQLCODE),1,512);
3068: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3069: Pa_Debug.debug('ref_rl_accum: ' || 'Exception Generated By Oracle Error: ' || errbuf ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3070: Pa_Debug.debug('ref_rl_accum: ' || 'Skipping the accumulation for project ' || projrec.segment1 ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3071: END IF;
3072:
3073: -- Exception handling for database errors (other than 1400 and 1489)

Line 3070: Pa_Debug.debug('ref_rl_accum: ' || 'Skipping the accumulation for project ' || projrec.segment1 ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);

3066: retcode := x_err_code;
3067: errbuf := SUBSTR(SQLERRM(SQLCODE),1,512);
3068: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3069: Pa_Debug.debug('ref_rl_accum: ' || 'Exception Generated By Oracle Error: ' || errbuf ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3070: Pa_Debug.debug('ref_rl_accum: ' || 'Skipping the accumulation for project ' || projrec.segment1 ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3071: END IF;
3072:
3073: -- Exception handling for database errors (other than 1400 and 1489)
3074: IF x_err_code*-1 BETWEEN 1400 AND 1489 THEN

Line 3090: rel_lock := Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(l_project_id));

3086:
3087: EXCEPTION
3088:
3089: WHEN OTHERS THEN
3090: rel_lock := Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(l_project_id));
3091: x_err_code := SQLCODE;
3092: retcode := x_err_code;
3093: errbuf := SUBSTR(SQLERRM(SQLCODE),1,512);
3094: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 3095: Pa_Debug.debug('ref_rl_accum: ' || 'Exception Generated By Oracle Error: ' || errbuf ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);

3091: x_err_code := SQLCODE;
3092: retcode := x_err_code;
3093: errbuf := SUBSTR(SQLERRM(SQLCODE),1,512);
3094: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3095: Pa_Debug.debug('ref_rl_accum: ' || 'Exception Generated By Oracle Error: ' || errbuf ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3096: END IF;
3097: ROLLBACK WORK;
3098: RETURN;
3099: END ref_rl_accum;

Line 3119: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); /* Added Debug Profile Option variable initialization for bug#2674619 */

3115: x_end_pa_period IN VARCHAR2,
3116: x_system_linkage_function IN VARCHAR2
3117: )
3118: IS
3119: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); /* Added Debug Profile Option variable initialization for bug#2674619 */
3120: l_accum_period_type_changed BOOLEAN;
3121: -- Declare cursor for Projects
3122:
3123: l_project_num_from VARCHAR2(25);

Line 3156: Pa_Debug.debug('build_txn_accum: ' || x_err_stack);

3152:
3153: x_mode := 'F';
3154:
3155: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3156: Pa_Debug.debug('build_txn_accum: ' || x_err_stack);
3157: END IF;
3158:
3159: -- Validate Parameters
3160: Get_Project_Num_Range( x_project_num_from,

Line 3220: IF Pa_Debug.acquire_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) <> 0 THEN

3216: BEGIN
3217:
3218: -- This PL/SQL block corresponds to processing for each project
3219: ------------Acquire lock on the project-----------
3220: IF Pa_Debug.acquire_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) <> 0 THEN
3221: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3222: Pa_Debug.debug('build_txn_accum: ' || 'Could not acquire lock on the Project. Skipping ...');
3223: END IF;
3224: GOTO next_project;

Line 3222: Pa_Debug.debug('build_txn_accum: ' || 'Could not acquire lock on the Project. Skipping ...');

3218: -- This PL/SQL block corresponds to processing for each project
3219: ------------Acquire lock on the project-----------
3220: IF Pa_Debug.acquire_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) <> 0 THEN
3221: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3222: Pa_Debug.debug('build_txn_accum: ' || 'Could not acquire lock on the Project. Skipping ...');
3223: END IF;
3224: GOTO next_project;
3225: ELSE
3226: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 3227: Pa_Debug.debug('build_txn_accum: ' || 'Locking the project for summarization ...');

3223: END IF;
3224: GOTO next_project;
3225: ELSE
3226: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3227: Pa_Debug.debug('build_txn_accum: ' || 'Locking the project for summarization ...');
3228: END IF;
3229: END IF;
3230: -------------------------------------------------
3231: l_project_id := projrec.project_id;

Line 3233: Pa_Debug.debug('build_txn_accum: ' || 'Refreshing Transaction Accumulation for the Project Id = '

3229: END IF;
3230: -------------------------------------------------
3231: l_project_id := projrec.project_id;
3232: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3233: Pa_Debug.debug('build_txn_accum: ' || 'Refreshing Transaction Accumulation for the Project Id = '
3234: || TO_CHAR(projrec.project_id));
3235: END IF;
3236:
3237: -- Initialize the Global variable in the loop for each project

Line 3334: Pa_Debug.debug('build_txn_accum: Call Accum_Cdls with x_cdl_line_type = I' );

3330:
3331:
3332: IF ( P_DEBUG_MODE = 'Y' )
3333: THEN
3334: Pa_Debug.debug('build_txn_accum: Call Accum_Cdls with x_cdl_line_type = I' );
3335: END IF;
3336:
3337: Pa_Txn_Accums.accum_cdls
3338: (projrec.project_id, -- start_project_id

Line 3436: Pa_Debug.debug('build_txn_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

3432:
3433: -- Stop processing and exit the procedure return from the procedure
3434: -- after a rollback;
3435: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3436: Pa_Debug.debug('build_txn_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3437: Pa_Debug.debug('build_txn_accum: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3438: Pa_Debug.debug('build_txn_accum: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3439: Pa_Debug.debug('build_txn_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3440: END IF;

Line 3437: Pa_Debug.debug('build_txn_accum: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

3433: -- Stop processing and exit the procedure return from the procedure
3434: -- after a rollback;
3435: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3436: Pa_Debug.debug('build_txn_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3437: Pa_Debug.debug('build_txn_accum: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3438: Pa_Debug.debug('build_txn_accum: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3439: Pa_Debug.debug('build_txn_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3440: END IF;
3441: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN

Line 3438: Pa_Debug.debug('build_txn_accum: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

3434: -- after a rollback;
3435: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3436: Pa_Debug.debug('build_txn_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3437: Pa_Debug.debug('build_txn_accum: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3438: Pa_Debug.debug('build_txn_accum: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3439: Pa_Debug.debug('build_txn_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3440: END IF;
3441: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
3442: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 3439: Pa_Debug.debug('build_txn_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

3435: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3436: Pa_Debug.debug('build_txn_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3437: Pa_Debug.debug('build_txn_accum: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3438: Pa_Debug.debug('build_txn_accum: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3439: Pa_Debug.debug('build_txn_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3440: END IF;
3441: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
3442: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3443: Pa_Debug.debug('build_txn_accum: ' || 'Releasing the lock on project ...');

Line 3441: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN

3437: Pa_Debug.debug('build_txn_accum: ' || '******Reporting Period Moved Backward In Time During Process Run',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3438: Pa_Debug.debug('build_txn_accum: ' || '******The Accumulation for the project '|| projrec.segment1 || ' Rolled Back',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3439: Pa_Debug.debug('build_txn_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3440: END IF;
3441: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
3442: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3443: Pa_Debug.debug('build_txn_accum: ' || 'Releasing the lock on project ...');
3444: END IF;
3445: END IF;

Line 3443: Pa_Debug.debug('build_txn_accum: ' || 'Releasing the lock on project ...');

3439: Pa_Debug.debug('build_txn_accum: ' || '*********************************************************************************',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3440: END IF;
3441: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
3442: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3443: Pa_Debug.debug('build_txn_accum: ' || 'Releasing the lock on project ...');
3444: END IF;
3445: END IF;
3446: errbuf := 'Reporting Period Moved Backward In Time During Process Run';
3447: retcode := 5;

Line 3453: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN

3449: RETURN;
3450: END IF; -- IF(x_reporting_period_status = 'Y')
3451:
3452: COMMIT WORK; -- we are done with this project now
3453: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
3454: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3455: Pa_Debug.debug('build_txn_accum: ' || 'Releasing the lock on project ...');
3456: END IF;
3457: END IF;

Line 3455: Pa_Debug.debug('build_txn_accum: ' || 'Releasing the lock on project ...');

3451:
3452: COMMIT WORK; -- we are done with this project now
3453: IF Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(projrec.project_id)) = 0 THEN
3454: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3455: Pa_Debug.debug('build_txn_accum: ' || 'Releasing the lock on project ...');
3456: END IF;
3457: END IF;
3458:
3459: EXCEPTION

Line 3462: rel_lock := Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(l_project_id));

3458:
3459: EXCEPTION
3460:
3461: WHEN OTHERS THEN
3462: rel_lock := Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(l_project_id));
3463: x_err_code := SQLCODE;
3464: retcode := x_err_code;
3465: errbuf := SUBSTR(SQLERRM(SQLCODE),1,512);
3466: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 3467: Pa_Debug.debug('build_txn_accum: ' || 'Exception Generated By Oracle Error: ' || errbuf ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);

3463: x_err_code := SQLCODE;
3464: retcode := x_err_code;
3465: errbuf := SUBSTR(SQLERRM(SQLCODE),1,512);
3466: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3467: Pa_Debug.debug('build_txn_accum: ' || 'Exception Generated By Oracle Error: ' || errbuf ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3468: Pa_Debug.debug('build_txn_accum: ' || 'Skipping the accumulation for project ' || projrec.segment1 ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3469: END IF;
3470:
3471: -- Exception handling for database errors (other than 1400 and 1489)

Line 3468: Pa_Debug.debug('build_txn_accum: ' || 'Skipping the accumulation for project ' || projrec.segment1 ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);

3464: retcode := x_err_code;
3465: errbuf := SUBSTR(SQLERRM(SQLCODE),1,512);
3466: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3467: Pa_Debug.debug('build_txn_accum: ' || 'Exception Generated By Oracle Error: ' || errbuf ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3468: Pa_Debug.debug('build_txn_accum: ' || 'Skipping the accumulation for project ' || projrec.segment1 ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3469: END IF;
3470:
3471: -- Exception handling for database errors (other than 1400 and 1489)
3472: IF x_err_code*-1 BETWEEN 1400 AND 1489 THEN

Line 3488: rel_lock := Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(l_project_id));

3484:
3485: EXCEPTION
3486:
3487: WHEN OTHERS THEN
3488: rel_lock := Pa_Debug.release_user_lock('PA_SUMM:'||TO_CHAR(l_project_id));
3489: x_err_code := SQLCODE;
3490: retcode := x_err_code;
3491: errbuf := SUBSTR(SQLERRM(SQLCODE),1,512);
3492: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 3493: Pa_Debug.debug('build_txn_accum: ' || 'Exception Generated By Oracle Error: ' || errbuf ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);

3489: x_err_code := SQLCODE;
3490: retcode := x_err_code;
3491: errbuf := SUBSTR(SQLERRM(SQLCODE),1,512);
3492: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3493: Pa_Debug.debug('build_txn_accum: ' || 'Exception Generated By Oracle Error: ' || errbuf ,Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3494: END IF;
3495: ROLLBACK WORK;
3496: RETURN;
3497: END build_txn_accum;

Line 3502: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); /* Added Debug Profile Option variable initialization for bug#2674619 */

3498:
3499: PROCEDURE lock_proj_level_header_record
3500: (x_project_id IN NUMBER)
3501: IS
3502: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); /* Added Debug Profile Option variable initialization for bug#2674619 */
3503: dummy_project_id NUMBER;
3504: BEGIN
3505: x_old_stack := x_err_stack;
3506: x_err_stack :=

Line 3516: Pa_Debug.debug('lock_proj_level_header_record: ' || x_err_stack);

3512: -- Try to Lock the project level header record with NOWAIT. If some
3513: -- other process is locking the record then raise an exception.
3514:
3515: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3516: Pa_Debug.debug('lock_proj_level_header_record: ' || x_err_stack);
3517: END IF;
3518:
3519: x_proj_header_locked := FALSE; -- Assume project header is not locked
3520:

Line 3546: Pa_Debug.debug('lock_proj_level_header_record: ' || '******************************************************************************************************',

3542: x_proj_header_locked := TRUE;
3543: x_err_stack := x_old_stack;
3544:
3545: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3546: Pa_Debug.debug('lock_proj_level_header_record: ' || '******************************************************************************************************',
3547: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3548: Pa_Debug.debug('lock_proj_level_header_record: ' || '****Unable to lock the Project Level Header Record for the Project_id '|| TO_CHAR(x_project_id) ||
3549: ' Skipping this Project for processing ****',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3550: Pa_Debug.debug('lock_proj_level_header_record: ' || '******************************************************************************************************',

Line 3547: Pa_Debug.DEBUG_LEVEL_EXCEPTION);

3543: x_err_stack := x_old_stack;
3544:
3545: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3546: Pa_Debug.debug('lock_proj_level_header_record: ' || '******************************************************************************************************',
3547: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3548: Pa_Debug.debug('lock_proj_level_header_record: ' || '****Unable to lock the Project Level Header Record for the Project_id '|| TO_CHAR(x_project_id) ||
3549: ' Skipping this Project for processing ****',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3550: Pa_Debug.debug('lock_proj_level_header_record: ' || '******************************************************************************************************',
3551: Pa_Debug.DEBUG_LEVEL_EXCEPTION);

Line 3548: Pa_Debug.debug('lock_proj_level_header_record: ' || '****Unable to lock the Project Level Header Record for the Project_id '|| TO_CHAR(x_project_id) ||

3544:
3545: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3546: Pa_Debug.debug('lock_proj_level_header_record: ' || '******************************************************************************************************',
3547: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3548: Pa_Debug.debug('lock_proj_level_header_record: ' || '****Unable to lock the Project Level Header Record for the Project_id '|| TO_CHAR(x_project_id) ||
3549: ' Skipping this Project for processing ****',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3550: Pa_Debug.debug('lock_proj_level_header_record: ' || '******************************************************************************************************',
3551: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3552: END IF;

Line 3549: ' Skipping this Project for processing ****',Pa_Debug.DEBUG_LEVEL_EXCEPTION);

3545: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
3546: Pa_Debug.debug('lock_proj_level_header_record: ' || '******************************************************************************************************',
3547: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3548: Pa_Debug.debug('lock_proj_level_header_record: ' || '****Unable to lock the Project Level Header Record for the Project_id '|| TO_CHAR(x_project_id) ||
3549: ' Skipping this Project for processing ****',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3550: Pa_Debug.debug('lock_proj_level_header_record: ' || '******************************************************************************************************',
3551: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3552: END IF;
3553:

Line 3550: Pa_Debug.debug('lock_proj_level_header_record: ' || '******************************************************************************************************',

3546: Pa_Debug.debug('lock_proj_level_header_record: ' || '******************************************************************************************************',
3547: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3548: Pa_Debug.debug('lock_proj_level_header_record: ' || '****Unable to lock the Project Level Header Record for the Project_id '|| TO_CHAR(x_project_id) ||
3549: ' Skipping this Project for processing ****',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3550: Pa_Debug.debug('lock_proj_level_header_record: ' || '******************************************************************************************************',
3551: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3552: END IF;
3553:
3554: WHEN OTHERS THEN

Line 3551: Pa_Debug.DEBUG_LEVEL_EXCEPTION);

3547: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3548: Pa_Debug.debug('lock_proj_level_header_record: ' || '****Unable to lock the Project Level Header Record for the Project_id '|| TO_CHAR(x_project_id) ||
3549: ' Skipping this Project for processing ****',Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3550: Pa_Debug.debug('lock_proj_level_header_record: ' || '******************************************************************************************************',
3551: Pa_Debug.DEBUG_LEVEL_EXCEPTION);
3552: END IF;
3553:
3554: WHEN OTHERS THEN
3555: x_err_code := SQLCODE;