269: BEGIN
270:
271: pa_tasks_maint_utils.set_org_id(p_project_id);
272:
273: pa_debug.init_err_stack('PA_TASKS_MAINT_PUB.CREATE_TASK');
274:
275: IF (p_debug_mode = 'Y') THEN
276: pa_debug.debug('PA_TASKS_MAINT_PUB.CREATE_TASK begin');
277: END IF;
272:
273: pa_debug.init_err_stack('PA_TASKS_MAINT_PUB.CREATE_TASK');
274:
275: IF (p_debug_mode = 'Y') THEN
276: pa_debug.debug('PA_TASKS_MAINT_PUB.CREATE_TASK begin');
277: END IF;
278:
279: IF p_commit = FND_API.G_TRUE THEN
280: savepoint CREATE_TASK;
284: raise FND_API.G_EXC_UNEXPECTED_ERROR;
285: END IF;
286:
287: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list, FND_API.G_FALSE)) THEN
288: pa_debug.debug('Performing ID validations and conversions');
289: FND_MSG_PUB.initialize;
290: END IF;
291:
292: --BEGIN VALIDATIONS
597: commit;
598: END IF;
599:
600: IF (p_debug_mode = 'Y') THEN
601: pa_debug.debug('PA_TASKS_MAINT_PUB.CREATE_TASK END');
602: END IF;
603:
604: EXCEPTION
605: WHEN FND_API.G_EXC_ERROR THEN
925:
926: BEGIN
927: pa_tasks_maint_utils.set_org_id(p_project_id);
928:
929: pa_debug.init_err_stack('PA_TASKS_MAINT_PUB.UPDATE_TASK');
930:
931: IF (p_debug_mode = 'Y') THEN
932: pa_debug.debug('PA_TASKS_MAINT_PUB.UPDATE_TASK begin');
933: END IF;
928:
929: pa_debug.init_err_stack('PA_TASKS_MAINT_PUB.UPDATE_TASK');
930:
931: IF (p_debug_mode = 'Y') THEN
932: pa_debug.debug('PA_TASKS_MAINT_PUB.UPDATE_TASK begin');
933: END IF;
934:
935: IF p_commit = FND_API.G_TRUE THEN
936: savepoint UPDATE_TASK;
940: raise FND_API.G_EXC_UNEXPECTED_ERROR;
941: END IF;
942:
943: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list, FND_API.G_FALSE)) THEN
944: pa_debug.debug('Performing ID validations and conversions');
945: FND_MSG_PUB.initialize;
946: END IF;
947:
948: -- Bug 8273954 : Commenting off the below code as it does not do any validations
1234: commit;
1235: END IF;
1236:
1237: IF (p_debug_mode = 'Y') THEN
1238: pa_debug.debug('PA_TASKS_MAINT_PUB.UPDATE_TASK END');
1239: END IF;
1240:
1241: EXCEPTION
1242: WHEN FND_API.G_EXC_ERROR THEN
1340: BEGIN
1341: pa_tasks_maint_utils.set_org_id(p_project_id);
1342:
1343:
1344: pa_debug.init_err_stack('PA_TASKS_MAINT_PUB.DELETE_TASK');
1345:
1346: IF (p_debug_mode = 'Y') THEN
1347: pa_debug.debug('PA_TASKS_MAINT_PUB.DELETE_TASK begin');
1348: END IF;
1343:
1344: pa_debug.init_err_stack('PA_TASKS_MAINT_PUB.DELETE_TASK');
1345:
1346: IF (p_debug_mode = 'Y') THEN
1347: pa_debug.debug('PA_TASKS_MAINT_PUB.DELETE_TASK begin');
1348: END IF;
1349:
1350: IF (p_commit = FND_API.G_TRUE) THEN
1351: savepoint DELETE_TASK;
1356: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1357: END IF;
1358:
1359: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list, FND_API.G_FALSE)) THEN
1360: pa_debug.debug('Performing ID validations and conversions');
1361: FND_MSG_PUB.initialize;
1362: END IF;
1363:
1364: --Check if there is any error
1465: commit;
1466: END IF;
1467:
1468: IF (p_debug_mode = 'Y') THEN
1469: pa_debug.debug('PA_TASKS_MAINT_PUB.DELETE_TASK END');
1470: END IF;
1471:
1472: EXCEPTION
1473: WHEN FND_API.G_EXC_ERROR THEN
1556:
1557: -- Standard call to check for call compatibility
1558: IF (p_debug_mode = 'Y')
1559: THEN
1560: pa_debug.debug('Edit Task Structure PUB : Checking the api version number.');
1561: END IF;
1562:
1563: IF p_commit = FND_API.G_TRUE
1564: THEN
1574: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1575: END IF;
1576:
1577: if (p_debug_mode = 'Y') then
1578: pa_debug.debug('Edit Task Structure PUB : Initializing message stack.');
1579: end if;
1580:
1581: pa_debug.init_err_stack('PA_TASK_MAINT_PUB.Edit_Task_Structure');
1582:
1577: if (p_debug_mode = 'Y') then
1578: pa_debug.debug('Edit Task Structure PUB : Initializing message stack.');
1579: end if;
1580:
1581: pa_debug.init_err_stack('PA_TASK_MAINT_PUB.Edit_Task_Structure');
1582:
1583: if FND_API.to_boolean(nvl(p_init_msg_list, FND_API.G_FALSE)) then
1584: fnd_msg_pub.initialize;
1585: end if;
1719: --dbms_output.put_line( 'After Edit Task structure. ' );
1720:
1721:
1722: if (p_debug_mode = 'Y') then
1723: pa_debug.debug('Edit Task Structure PUB : checking message count');
1724: end if;
1725: l_msg_count := FND_MSG_PUB.count_msg;
1726:
1727: If l_msg_count > 0 THEN
1860:
1861: -- Standard call to check for call compatibility
1862: IF (p_debug_mode = 'Y')
1863: THEN
1864: pa_debug.debug('Move Task PUB : Checking the api version number.');
1865: END IF;
1866: IF p_commit = FND_API.G_TRUE
1867: THEN
1868: SAVEPOINT Move;
1874: THEN
1875: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1876: END IF;
1877: if (p_debug_mode = 'Y') then
1878: pa_debug.debug('Move Task PUB : Initializing message stack.');
1879: end if;
1880: pa_debug.init_err_stack('PA_TASK_MAINT_PUB.MOVE_TASK');
1881: if FND_API.to_boolean(nvl(p_init_msg_list, FND_API.G_FALSE)) then
1882: fnd_msg_pub.initialize;
1876: END IF;
1877: if (p_debug_mode = 'Y') then
1878: pa_debug.debug('Move Task PUB : Initializing message stack.');
1879: end if;
1880: pa_debug.init_err_stack('PA_TASK_MAINT_PUB.MOVE_TASK');
1881: if FND_API.to_boolean(nvl(p_init_msg_list, FND_API.G_FALSE)) then
1882: fnd_msg_pub.initialize;
1883: end if;
1884:
2002:
2003: --dbms_output.put_line( 'After locking 2 ' );
2004:
2005: if (p_debug_mode = 'Y') then
2006: pa_debug.debug('Move Task PUB : checking message count');
2007: end if;
2008:
2009: l_msg_count := FND_MSG_PUB.count_msg;
2010:
2044: ,x_msg_count => l_msg_count
2045: ,x_msg_data => l_msg_data );
2046:
2047: if (p_debug_mode = 'Y') then
2048: pa_debug.debug('Move Task PUB : checking message count');
2049: end if;
2050: l_msg_count := FND_MSG_PUB.count_msg;
2051:
2052:
2193: pa_tasks_maint_utils.set_org_id(p_project_id);
2194: -- Standard call to check for call compatibility
2195: IF (p_debug_mode = 'Y')
2196: THEN
2197: pa_debug.debug('Copy Task PUB : Checking the api version number.');
2198: END IF;
2199: IF p_commit = FND_API.G_TRUE
2200: THEN
2201: SAVEPOINT Copy;
2207: THEN
2208: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2209: END IF;
2210: if (p_debug_mode = 'Y') then
2211: pa_debug.debug('Copy Task PUB : Initializing message stack.');
2212: end if;
2213: pa_debug.init_err_stack('PA_TASK_MAINT_PUB.COPY_TASK');
2214: if FND_API.to_boolean(nvl(p_init_msg_list, FND_API.G_FALSE)) then
2215: fnd_msg_pub.initialize;
2209: END IF;
2210: if (p_debug_mode = 'Y') then
2211: pa_debug.debug('Copy Task PUB : Initializing message stack.');
2212: end if;
2213: pa_debug.init_err_stack('PA_TASK_MAINT_PUB.COPY_TASK');
2214: if FND_API.to_boolean(nvl(p_init_msg_list, FND_API.G_FALSE)) then
2215: fnd_msg_pub.initialize;
2216: end if;
2217:
2390:
2391: END IF;
2392:
2393: if (p_debug_mode = 'Y') then
2394: pa_debug.debug('Edit Task Structure PUB : checking message count');
2395: end if;
2396: l_msg_count := FND_MSG_PUB.count_msg;
2397:
2398:
2670: --Delete the elements from the table, if any
2671: l_task_version_id_tbl.DELETE;
2672:
2673: --Bug 3735089 - instead of fnd_profile.value use fnd_profile.value_specific
2674: --l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
2675: l_user_id := fnd_global.user_id;
2676: l_login_id := fnd_global.login_id;
2677: l_debug_mode := NVL(FND_PROFILE.value_specific('PA_DEBUG_MODE',l_user_id, l_login_id,275,null,null),'N');
2678:
2673: --Bug 3735089 - instead of fnd_profile.value use fnd_profile.value_specific
2674: --l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
2675: l_user_id := fnd_global.user_id;
2676: l_login_id := fnd_global.login_id;
2677: l_debug_mode := NVL(FND_PROFILE.value_specific('PA_DEBUG_MODE',l_user_id, l_login_id,275,null,null),'N');
2678:
2679: --l_debug_mode := NVL(p_debug_mode,'N');
2680: IF l_debug_mode = 'Y' THEN
2681: PA_DEBUG.set_curr_function( p_function => 'SET_FINANCIAL_FLAG_WRAPPER',
2677: l_debug_mode := NVL(FND_PROFILE.value_specific('PA_DEBUG_MODE',l_user_id, l_login_id,275,null,null),'N');
2678:
2679: --l_debug_mode := NVL(p_debug_mode,'N');
2680: IF l_debug_mode = 'Y' THEN
2681: PA_DEBUG.set_curr_function( p_function => 'SET_FINANCIAL_FLAG_WRAPPER',
2682: p_debug_mode => l_debug_mode );
2683: END IF;
2684:
2685: IF l_debug_mode = 'Y' THEN
2683: END IF;
2684:
2685: IF l_debug_mode = 'Y' THEN
2686:
2687: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SET_FINANCIAL_FLAG_WRAPPER : Printing Input parameters';
2688:
2689: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
2690: l_debug_level3);
2691: Pa_Debug.WRITE(g_pkg_name,'p_task_version_id'||':'||p_task_version_id,
2685: IF l_debug_mode = 'Y' THEN
2686:
2687: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SET_FINANCIAL_FLAG_WRAPPER : Printing Input parameters';
2688:
2689: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
2690: l_debug_level3);
2691: Pa_Debug.WRITE(g_pkg_name,'p_task_version_id'||':'||p_task_version_id,
2692: l_debug_level3);
2693: Pa_Debug.WRITE(g_pkg_name,'p_checked_flag'||':'||p_checked_flag,
2687: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SET_FINANCIAL_FLAG_WRAPPER : Printing Input parameters';
2688:
2689: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
2690: l_debug_level3);
2691: Pa_Debug.WRITE(g_pkg_name,'p_task_version_id'||':'||p_task_version_id,
2692: l_debug_level3);
2693: Pa_Debug.WRITE(g_pkg_name,'p_checked_flag'||':'||p_checked_flag,
2694: l_debug_level3);
2695: Pa_Debug.WRITE(g_pkg_name,'p_record_version_number'||':'||p_record_version_number,
2689: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
2690: l_debug_level3);
2691: Pa_Debug.WRITE(g_pkg_name,'p_task_version_id'||':'||p_task_version_id,
2692: l_debug_level3);
2693: Pa_Debug.WRITE(g_pkg_name,'p_checked_flag'||':'||p_checked_flag,
2694: l_debug_level3);
2695: Pa_Debug.WRITE(g_pkg_name,'p_record_version_number'||':'||p_record_version_number,
2696: l_debug_level3);
2697: Pa_Debug.WRITE(g_pkg_name,'p_project_id'||':'||p_project_id,
2691: Pa_Debug.WRITE(g_pkg_name,'p_task_version_id'||':'||p_task_version_id,
2692: l_debug_level3);
2693: Pa_Debug.WRITE(g_pkg_name,'p_checked_flag'||':'||p_checked_flag,
2694: l_debug_level3);
2695: Pa_Debug.WRITE(g_pkg_name,'p_record_version_number'||':'||p_record_version_number,
2696: l_debug_level3);
2697: Pa_Debug.WRITE(g_pkg_name,'p_project_id'||':'||p_project_id,
2698: l_debug_level3);
2699: Pa_Debug.WRITE(g_pkg_name,'p_published_version_exists'||':'||p_published_version_exists,
2693: Pa_Debug.WRITE(g_pkg_name,'p_checked_flag'||':'||p_checked_flag,
2694: l_debug_level3);
2695: Pa_Debug.WRITE(g_pkg_name,'p_record_version_number'||':'||p_record_version_number,
2696: l_debug_level3);
2697: Pa_Debug.WRITE(g_pkg_name,'p_project_id'||':'||p_project_id,
2698: l_debug_level3);
2699: Pa_Debug.WRITE(g_pkg_name,'p_published_version_exists'||':'||p_published_version_exists,
2700: l_debug_level3);
2701: END IF;
2695: Pa_Debug.WRITE(g_pkg_name,'p_record_version_number'||':'||p_record_version_number,
2696: l_debug_level3);
2697: Pa_Debug.WRITE(g_pkg_name,'p_project_id'||':'||p_project_id,
2698: l_debug_level3);
2699: Pa_Debug.WRITE(g_pkg_name,'p_published_version_exists'||':'||p_published_version_exists,
2700: l_debug_level3);
2701: END IF;
2702:
2703: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
2708: savepoint SET_FIN_FLAG_WRAPPER_PUBLIC;
2709: END IF;
2710:
2711: IF l_debug_mode = 'Y' THEN
2712: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SET_FINANCIAL_FLAG_WRAPPER : Validating Input parameters';
2713: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
2714: l_debug_level3);
2715: END IF;
2716:
2709: END IF;
2710:
2711: IF l_debug_mode = 'Y' THEN
2712: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SET_FINANCIAL_FLAG_WRAPPER : Validating Input parameters';
2713: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
2714: l_debug_level3);
2715: END IF;
2716:
2717: IF (
2722: p_published_version_exists IS NULL
2723: )
2724: THEN
2725: IF l_debug_mode = 'Y' THEN
2726: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SET_FINANCIAL_FLAG_WRAPPER : At least one of the mandatory IN parameters are passed as NULL';
2727: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
2728: l_debug_level3);
2729: END IF;
2730: RAISE Invalid_Arg_Exc_WP;
2723: )
2724: THEN
2725: IF l_debug_mode = 'Y' THEN
2726: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SET_FINANCIAL_FLAG_WRAPPER : At least one of the mandatory IN parameters are passed as NULL';
2727: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
2728: l_debug_level3);
2729: END IF;
2730: RAISE Invalid_Arg_Exc_WP;
2731: END IF;
2730: RAISE Invalid_Arg_Exc_WP;
2731: END IF;
2732:
2733: IF l_debug_mode = 'Y' THEN
2734: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SET_FINANCIAL_FLAG_WRAPPER : Calling set_unset_financial_task';
2735: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
2736: l_debug_level3);
2737: END IF;
2738: --This part of code is common whether p_checked_flag is 'Y' or 'N'
2731: END IF;
2732:
2733: IF l_debug_mode = 'Y' THEN
2734: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SET_FINANCIAL_FLAG_WRAPPER : Calling set_unset_financial_task';
2735: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
2736: l_debug_level3);
2737: END IF;
2738: --This part of code is common whether p_checked_flag is 'Y' or 'N'
2739: --Call API to set/unset financial_flag for p_task_version_id depending on p_checked_flag.
2986: END IF;
2987: -- Bug 3735089 : using reset_curr_function too, just using set_curr_function may overflow it after several recursive calls
2988: -- and it gives ORA 06512 numeric or value error
2989: IF l_debug_mode = 'Y' THEN
2990: Pa_Debug.reset_curr_function;
2991: END IF;
2992:
2993: EXCEPTION
2994:
3031: x_msg_count := l_msg_count;
3032: END IF;
3033:
3034: IF l_debug_mode = 'Y' THEN
3035: Pa_Debug.reset_curr_function;
3036: END IF;
3037:
3038: WHEN Invalid_Arg_Exc_WP THEN
3039:
3062: , p_procedure_name => 'SET_FINANCIAL_FLAG_WRAPPER'
3063: , p_error_text => x_msg_data);
3064:
3065: IF l_debug_mode = 'Y' THEN
3066: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3067: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3068: l_debug_level5);
3069: Pa_Debug.reset_curr_function;
3070: END IF;
3063: , p_error_text => x_msg_data);
3064:
3065: IF l_debug_mode = 'Y' THEN
3066: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3067: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3068: l_debug_level5);
3069: Pa_Debug.reset_curr_function;
3070: END IF;
3071: RAISE;
3065: IF l_debug_mode = 'Y' THEN
3066: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3067: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3068: l_debug_level5);
3069: Pa_Debug.reset_curr_function;
3070: END IF;
3071: RAISE;
3072:
3073: WHEN OTHERS THEN
3099: , p_procedure_name => 'SET_FINANCIAL_FLAG_WRAPPER'
3100: , p_error_text => x_msg_data);
3101:
3102: IF l_debug_mode = 'Y' THEN
3103: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3104: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3105: l_debug_level5);
3106:
3107: Pa_Debug.reset_curr_function;
3100: , p_error_text => x_msg_data);
3101:
3102: IF l_debug_mode = 'Y' THEN
3103: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3104: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3105: l_debug_level5);
3106:
3107: Pa_Debug.reset_curr_function;
3108:
3103: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3104: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3105: l_debug_level5);
3106:
3107: Pa_Debug.reset_curr_function;
3108:
3109: END IF;
3110: RAISE;
3111: END SET_FINANCIAL_FLAG_WRAPPER ;
3256:
3257: x_msg_count := 0;
3258: x_return_status := FND_API.G_RET_STS_SUCCESS;
3259:
3260: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
3261: --l_debug_mode := NVL(p_debug_mode,'N');
3262: IF l_debug_mode = 'Y' THEN
3263: PA_DEBUG.set_curr_function( p_function => 'POPULATE_TEMP_TABLE',
3264: p_debug_mode => l_debug_mode );
3259:
3260: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
3261: --l_debug_mode := NVL(p_debug_mode,'N');
3262: IF l_debug_mode = 'Y' THEN
3263: PA_DEBUG.set_curr_function( p_function => 'POPULATE_TEMP_TABLE',
3264: p_debug_mode => l_debug_mode );
3265: END IF;
3266:
3267:
3266:
3267:
3268:
3269: IF l_debug_mode = 'Y' THEN
3270: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB:POPULATE_TEMP_TABLE:Printing Input parameters';
3271: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3272: l_debug_level3);
3273: Pa_Debug.WRITE(g_pkg_name,'p_structure_version_id'||':'||p_structure_version_id,
3274: l_debug_level3);
3267:
3268:
3269: IF l_debug_mode = 'Y' THEN
3270: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB:POPULATE_TEMP_TABLE:Printing Input parameters';
3271: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3272: l_debug_level3);
3273: Pa_Debug.WRITE(g_pkg_name,'p_structure_version_id'||':'||p_structure_version_id,
3274: l_debug_level3);
3275: Pa_Debug.WRITE(g_pkg_name,'p_project_id'||':'||p_project_id,
3269: IF l_debug_mode = 'Y' THEN
3270: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB:POPULATE_TEMP_TABLE:Printing Input parameters';
3271: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3272: l_debug_level3);
3273: Pa_Debug.WRITE(g_pkg_name,'p_structure_version_id'||':'||p_structure_version_id,
3274: l_debug_level3);
3275: Pa_Debug.WRITE(g_pkg_name,'p_project_id'||':'||p_project_id,
3276: l_debug_level3);
3277: END IF;
3271: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3272: l_debug_level3);
3273: Pa_Debug.WRITE(g_pkg_name,'p_structure_version_id'||':'||p_structure_version_id,
3274: l_debug_level3);
3275: Pa_Debug.WRITE(g_pkg_name,'p_project_id'||':'||p_project_id,
3276: l_debug_level3);
3277: END IF;
3278:
3279: --Delete all elements from temporary table first.
3308: savepoint POPULATE_TEMP_TBL_PUB;
3309: END IF;
3310:
3311: IF l_debug_mode = 'Y' THEN
3312: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : POPULATE_TEMP_TABLE : Validating Input parameters';
3313: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3314: l_debug_level3);
3315: END IF;
3316:
3309: END IF;
3310:
3311: IF l_debug_mode = 'Y' THEN
3312: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : POPULATE_TEMP_TABLE : Validating Input parameters';
3313: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3314: l_debug_level3);
3315: END IF;
3316:
3317: IF (
3320: ( p_project_id IS NULL )
3321: )
3322: THEN
3323: IF l_debug_mode = 'Y' THEN
3324: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : POPULATE_TEMP_TABLE : At least one of the mandatory IN parameters are passed as NULL';
3325: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3326: l_debug_level3);
3327: END IF;
3328: RAISE Invalid_Arg_Exc_WP;
3321: )
3322: THEN
3323: IF l_debug_mode = 'Y' THEN
3324: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : POPULATE_TEMP_TABLE : At least one of the mandatory IN parameters are passed as NULL';
3325: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3326: l_debug_level3);
3327: END IF;
3328: RAISE Invalid_Arg_Exc_WP;
3329: END IF;
3459: ELSE
3460: x_msg_count := l_msg_count;
3461: END IF;
3462: IF l_debug_mode = 'Y' THEN
3463: Pa_Debug.reset_curr_function;
3464: END IF;
3465:
3466: WHEN Invalid_Arg_Exc_WP THEN
3467:
3484: , p_procedure_name => 'POPULATE_TEMP_TABLE'
3485: , p_error_text => x_msg_data);
3486:
3487: IF l_debug_mode = 'Y' THEN
3488: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3489: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3490: l_debug_level5);
3491: Pa_Debug.reset_curr_function;
3492: END IF;
3485: , p_error_text => x_msg_data);
3486:
3487: IF l_debug_mode = 'Y' THEN
3488: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3489: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3490: l_debug_level5);
3491: Pa_Debug.reset_curr_function;
3492: END IF;
3493: RAISE;
3487: IF l_debug_mode = 'Y' THEN
3488: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3489: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3490: l_debug_level5);
3491: Pa_Debug.reset_curr_function;
3492: END IF;
3493: RAISE;
3494:
3495: WHEN OTHERS THEN
3514: , p_procedure_name => 'POPULATE_TEMP_TABLE'
3515: , p_error_text => x_msg_data);
3516:
3517: IF l_debug_mode = 'Y' THEN
3518: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3519: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3520: l_debug_level5);
3521: Pa_Debug.reset_curr_function;
3522: END IF;
3515: , p_error_text => x_msg_data);
3516:
3517: IF l_debug_mode = 'Y' THEN
3518: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3519: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3520: l_debug_level5);
3521: Pa_Debug.reset_curr_function;
3522: END IF;
3523: RAISE;
3517: IF l_debug_mode = 'Y' THEN
3518: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3519: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3520: l_debug_level5);
3521: Pa_Debug.reset_curr_function;
3522: END IF;
3523: RAISE;
3524: END POPULATE_TEMP_TABLE ;
3525:
3587: x_msg_count := 0;
3588: x_return_status := FND_API.G_RET_STS_SUCCESS;
3589:
3590: --Bug 3735089 - instead of fnd_profile.value use fnd_profile.value_specific
3591: --l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
3592: l_user_id := fnd_global.user_id;
3593: l_login_id := fnd_global.login_id;
3594: l_debug_mode := NVL(FND_PROFILE.value_specific('PA_DEBUG_MODE',l_user_id, l_login_id,275,null,null),'N');
3595:
3590: --Bug 3735089 - instead of fnd_profile.value use fnd_profile.value_specific
3591: --l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
3592: l_user_id := fnd_global.user_id;
3593: l_login_id := fnd_global.login_id;
3594: l_debug_mode := NVL(FND_PROFILE.value_specific('PA_DEBUG_MODE',l_user_id, l_login_id,275,null,null),'N');
3595:
3596: --l_debug_mode := NVL(p_debug_mode,'N');
3597: IF l_debug_mode = 'Y' THEN
3598: PA_DEBUG.set_curr_function( p_function => 'SYNC_UP_WP_TASKS_WITH_FIN',
3594: l_debug_mode := NVL(FND_PROFILE.value_specific('PA_DEBUG_MODE',l_user_id, l_login_id,275,null,null),'N');
3595:
3596: --l_debug_mode := NVL(p_debug_mode,'N');
3597: IF l_debug_mode = 'Y' THEN
3598: PA_DEBUG.set_curr_function( p_function => 'SYNC_UP_WP_TASKS_WITH_FIN',
3599: p_debug_mode => l_debug_mode );
3600: END IF;
3601:
3602: IF l_debug_mode = 'Y' THEN
3599: p_debug_mode => l_debug_mode );
3600: END IF;
3601:
3602: IF l_debug_mode = 'Y' THEN
3603: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SYNC_UP_WP_TASKS_WITH_FIN : Printing Input parameters';
3604: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3605: l_debug_level3);
3606: Pa_Debug.WRITE(g_pkg_name,'p_project_id '||':'||p_project_id ,
3607: l_debug_level3);
3600: END IF;
3601:
3602: IF l_debug_mode = 'Y' THEN
3603: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SYNC_UP_WP_TASKS_WITH_FIN : Printing Input parameters';
3604: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3605: l_debug_level3);
3606: Pa_Debug.WRITE(g_pkg_name,'p_project_id '||':'||p_project_id ,
3607: l_debug_level3);
3608: Pa_Debug.WRITE(g_pkg_name,'p_syncup_all_tasks'||':'||p_syncup_all_tasks,
3602: IF l_debug_mode = 'Y' THEN
3603: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SYNC_UP_WP_TASKS_WITH_FIN : Printing Input parameters';
3604: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3605: l_debug_level3);
3606: Pa_Debug.WRITE(g_pkg_name,'p_project_id '||':'||p_project_id ,
3607: l_debug_level3);
3608: Pa_Debug.WRITE(g_pkg_name,'p_syncup_all_tasks'||':'||p_syncup_all_tasks,
3609: l_debug_level3);
3610: Pa_Debug.WRITE(g_pkg_name,'p_task_version_id'||':'|| p_task_version_id ,
3604: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3605: l_debug_level3);
3606: Pa_Debug.WRITE(g_pkg_name,'p_project_id '||':'||p_project_id ,
3607: l_debug_level3);
3608: Pa_Debug.WRITE(g_pkg_name,'p_syncup_all_tasks'||':'||p_syncup_all_tasks,
3609: l_debug_level3);
3610: Pa_Debug.WRITE(g_pkg_name,'p_task_version_id'||':'|| p_task_version_id ,
3611: l_debug_level3);
3612: Pa_Debug.WRITE(g_pkg_name,'p_structure_version_id'||':'|| p_structure_version_id,
3606: Pa_Debug.WRITE(g_pkg_name,'p_project_id '||':'||p_project_id ,
3607: l_debug_level3);
3608: Pa_Debug.WRITE(g_pkg_name,'p_syncup_all_tasks'||':'||p_syncup_all_tasks,
3609: l_debug_level3);
3610: Pa_Debug.WRITE(g_pkg_name,'p_task_version_id'||':'|| p_task_version_id ,
3611: l_debug_level3);
3612: Pa_Debug.WRITE(g_pkg_name,'p_structure_version_id'||':'|| p_structure_version_id,
3613: l_debug_level3);
3614: Pa_Debug.WRITE(g_pkg_name,'p_checked_flag '||':'||p_checked_flag ,
3608: Pa_Debug.WRITE(g_pkg_name,'p_syncup_all_tasks'||':'||p_syncup_all_tasks,
3609: l_debug_level3);
3610: Pa_Debug.WRITE(g_pkg_name,'p_task_version_id'||':'|| p_task_version_id ,
3611: l_debug_level3);
3612: Pa_Debug.WRITE(g_pkg_name,'p_structure_version_id'||':'|| p_structure_version_id,
3613: l_debug_level3);
3614: Pa_Debug.WRITE(g_pkg_name,'p_checked_flag '||':'||p_checked_flag ,
3615: l_debug_level3);
3616: Pa_Debug.WRITE(g_pkg_name,'p_mode'||':'||p_mode,
3610: Pa_Debug.WRITE(g_pkg_name,'p_task_version_id'||':'|| p_task_version_id ,
3611: l_debug_level3);
3612: Pa_Debug.WRITE(g_pkg_name,'p_structure_version_id'||':'|| p_structure_version_id,
3613: l_debug_level3);
3614: Pa_Debug.WRITE(g_pkg_name,'p_checked_flag '||':'||p_checked_flag ,
3615: l_debug_level3);
3616: Pa_Debug.WRITE(g_pkg_name,'p_mode'||':'||p_mode,
3617: l_debug_level3);
3618: Pa_Debug.WRITE(g_pkg_name,'p_parent_task_version_id'||':'||p_parent_task_version_id,
3612: Pa_Debug.WRITE(g_pkg_name,'p_structure_version_id'||':'|| p_structure_version_id,
3613: l_debug_level3);
3614: Pa_Debug.WRITE(g_pkg_name,'p_checked_flag '||':'||p_checked_flag ,
3615: l_debug_level3);
3616: Pa_Debug.WRITE(g_pkg_name,'p_mode'||':'||p_mode,
3617: l_debug_level3);
3618: Pa_Debug.WRITE(g_pkg_name,'p_parent_task_version_id'||':'||p_parent_task_version_id,
3619: l_debug_level3);
3620: Pa_Debug.WRITE(g_pkg_name,'p_patask_record_version_number'||':'||p_patask_record_version_number,
3614: Pa_Debug.WRITE(g_pkg_name,'p_checked_flag '||':'||p_checked_flag ,
3615: l_debug_level3);
3616: Pa_Debug.WRITE(g_pkg_name,'p_mode'||':'||p_mode,
3617: l_debug_level3);
3618: Pa_Debug.WRITE(g_pkg_name,'p_parent_task_version_id'||':'||p_parent_task_version_id,
3619: l_debug_level3);
3620: Pa_Debug.WRITE(g_pkg_name,'p_patask_record_version_number'||':'||p_patask_record_version_number,
3621: l_debug_level3);
3622: END IF;
3616: Pa_Debug.WRITE(g_pkg_name,'p_mode'||':'||p_mode,
3617: l_debug_level3);
3618: Pa_Debug.WRITE(g_pkg_name,'p_parent_task_version_id'||':'||p_parent_task_version_id,
3619: l_debug_level3);
3620: Pa_Debug.WRITE(g_pkg_name,'p_patask_record_version_number'||':'||p_patask_record_version_number,
3621: l_debug_level3);
3622: END IF;
3623:
3624: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
3629: savepoint SYNC_UP_WITH_FIN_PUBLIC;
3630: END IF;
3631:
3632: IF l_debug_mode = 'Y' THEN
3633: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SYNC_UP_WP_TASKS_WITH_FIN : Validating Input parameters';
3634: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3635: l_debug_level3);
3636: END IF;
3637:
3630: END IF;
3631:
3632: IF l_debug_mode = 'Y' THEN
3633: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SYNC_UP_WP_TASKS_WITH_FIN : Validating Input parameters';
3634: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3635: l_debug_level3);
3636: END IF;
3637:
3638: IF ( p_project_id IS NULL)
3637:
3638: IF ( p_project_id IS NULL)
3639: THEN
3640: IF l_debug_mode = 'Y' THEN
3641: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SYNC_UP_WP_TASKS_WITH_FIN : Mandatory parameters are null';
3642: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3643: l_debug_level3);
3644: END IF;
3645: RAISE Invalid_Arg_Exc_WP;
3638: IF ( p_project_id IS NULL)
3639: THEN
3640: IF l_debug_mode = 'Y' THEN
3641: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SYNC_UP_WP_TASKS_WITH_FIN : Mandatory parameters are null';
3642: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3643: l_debug_level3);
3644: END IF;
3645: RAISE Invalid_Arg_Exc_WP;
3646: END IF;
3648: --Validating for p_mode, it shopuld be either SINGLE or ALL
3649: /*IF (p_mode <> 'SINGLE' OR p_mode <> 'ALL')
3650: THEN
3651: IF l_debug_mode = 'Y' THEN
3652: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SYNC_UP_WP_TASKS_WITH_FIN : p_mode is invalid';
3653: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3654: l_debug_level3);
3655: END IF;
3656: RAISE Invalid_Arg_Exc_WP;
3649: /*IF (p_mode <> 'SINGLE' OR p_mode <> 'ALL')
3650: THEN
3651: IF l_debug_mode = 'Y' THEN
3652: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SYNC_UP_WP_TASKS_WITH_FIN : p_mode is invalid';
3653: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3654: l_debug_level3);
3655: END IF;
3656: RAISE Invalid_Arg_Exc_WP;
3657: END IF;*/
3663: )
3664: )
3665: THEN
3666: IF l_debug_mode = 'Y' THEN
3667: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SYNC_UP_WP_TASKS_WITH_FIN : Manadatory parameters with mode '||p_mode||'are not passed';
3668: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3669: l_debug_level3);
3670: END IF;
3671: RAISE Invalid_Arg_Exc_WP;
3664: )
3665: THEN
3666: IF l_debug_mode = 'Y' THEN
3667: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SYNC_UP_WP_TASKS_WITH_FIN : Manadatory parameters with mode '||p_mode||'are not passed';
3668: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3669: l_debug_level3);
3670: END IF;
3671: RAISE Invalid_Arg_Exc_WP;
3672: ELSIF ( ( p_mode = 'ALL')
3674: ( p_structure_version_id IS NULL OR p_structure_version_id = FND_API.G_MISS_NUM )
3675: )
3676: THEN
3677: IF l_debug_mode = 'Y' THEN
3678: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SYNC_UP_WP_TASKS_WITH_FIN : Manadatory parameters with mode '||p_mode||'are not passed';
3679: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3680: l_debug_level3);
3681: END IF;
3682: RAISE Invalid_Arg_Exc_WP;
3675: )
3676: THEN
3677: IF l_debug_mode = 'Y' THEN
3678: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_PUB : SYNC_UP_WP_TASKS_WITH_FIN : Manadatory parameters with mode '||p_mode||'are not passed';
3679: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3680: l_debug_level3);
3681: END IF;
3682: RAISE Invalid_Arg_Exc_WP;
3683: END IF;
3711:
3712: -- Bug 3735089 : using reset_curr_function too, just using set_curr_function may overflow it after several recursive calls
3713: -- and it gives ORA 06512 numeric or value error
3714: IF l_debug_mode = 'Y' THEN
3715: Pa_Debug.reset_curr_function;
3716: END IF;
3717:
3718: EXCEPTION
3719:
3741: ELSE
3742: x_msg_count := l_msg_count;
3743: END IF;
3744: IF l_debug_mode = 'Y' THEN
3745: Pa_Debug.reset_curr_function;
3746: END IF;
3747:
3748: WHEN Invalid_Arg_Exc_WP THEN
3749:
3760: ( p_pkg_name => 'PA_TASKS_MAINT_PUB'
3761: , p_procedure_name => 'SYNC_UP_WP_TASKS_WITH_FIN'
3762: , p_error_text => x_msg_data);
3763: IF l_debug_mode = 'Y' THEN
3764: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3765: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3766: l_debug_level5);
3767:
3768: Pa_Debug.reset_curr_function;
3761: , p_procedure_name => 'SYNC_UP_WP_TASKS_WITH_FIN'
3762: , p_error_text => x_msg_data);
3763: IF l_debug_mode = 'Y' THEN
3764: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3765: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3766: l_debug_level5);
3767:
3768: Pa_Debug.reset_curr_function;
3769: END IF;
3764: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3765: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3766: l_debug_level5);
3767:
3768: Pa_Debug.reset_curr_function;
3769: END IF;
3770: RAISE;
3771:
3772: WHEN OTHERS THEN
3786: , p_procedure_name => 'SYNC_UP_WP_TASKS_WITH_FIN'
3787: , p_error_text => x_msg_data);
3788:
3789: IF l_debug_mode = 'Y' THEN
3790: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3791: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3792: l_debug_level5);
3793: Pa_Debug.reset_curr_function;
3794: END IF;
3787: , p_error_text => x_msg_data);
3788:
3789: IF l_debug_mode = 'Y' THEN
3790: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3791: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3792: l_debug_level5);
3793: Pa_Debug.reset_curr_function;
3794: END IF;
3795: RAISE;
3789: IF l_debug_mode = 'Y' THEN
3790: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
3791: Pa_Debug.WRITE(g_pkg_name,Pa_Debug.g_err_stage,
3792: l_debug_level5);
3793: Pa_Debug.reset_curr_function;
3794: END IF;
3795: RAISE;
3796: END SYNC_UP_WP_TASKS_WITH_FIN ;
3797: