DBA Data[Home] [Help]

APPS.PA_TASKS_MAINT_UTILS dependencies on PA_TASKS_MAINT_UTILS

Line 1: package body PA_TASKS_MAINT_UTILS as

1: package body PA_TASKS_MAINT_UTILS as
2: /*$Header: PATSKSUB.pls 120.4.12010000.3 2008/10/14 10:54:25 bifernan ship $*/
3:
4: --Begin add rtarway FP-M development ,
5: g_module_name VARCHAR2(100) := 'PA_TASKS_MAINT_UTILS';

Line 5: g_module_name VARCHAR2(100) := 'PA_TASKS_MAINT_UTILS';

1: package body PA_TASKS_MAINT_UTILS as
2: /*$Header: PATSKSUB.pls 120.4.12010000.3 2008/10/14 10:54:25 bifernan ship $*/
3:
4: --Begin add rtarway FP-M development ,
5: g_module_name VARCHAR2(100) := 'PA_TASKS_MAINT_UTILS';
6: --End add rtarway FP-M development
7:
8: procedure CHECK_TASK_MGR_NAME_OR_ID
9: (

Line 48: IF (PA_TASKS_MAINT_UTILS.GET_TASK_MANAGER_PROFILE = 'N') THEN

44: IF (p_task_mgr_id IS NULL OR p_task_mgr_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM) THEN
45: -- ID is empty
46: IF (p_task_mgr_name IS NOT NULL AND p_task_mgr_name<> PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR) THEN
47: --Added for task manager changes;
48: IF (PA_TASKS_MAINT_UTILS.GET_TASK_MANAGER_PROFILE = 'N') THEN
49: --select from pa_employees
50: OPEN c;
51: LOOP
52: FETCH c INTO l_current_id;

Line 88: IF (PA_TASKS_MAINT_UTILS.GET_TASK_MANAGER_PROFILE = 'N') THEN

84: ELSE
85: -- ID is not empty;
86: IF (p_check_id_flag = 'Y') THEN
87: --Added for task manager changes;
88: IF (PA_TASKS_MAINT_UTILS.GET_TASK_MANAGER_PROFILE = 'N') THEN
89: --select from pa_employees
90: SELECT person_id
91: INTO x_task_mgr_id
92: FROM pa_employees

Line 112: IF (PA_TASKS_MAINT_UTILS.GET_TASK_MANAGER_PROFILE = 'N') THEN

108: ELSIF (p_check_id_flag = 'N') THEN
109: x_task_mgr_id := p_task_mgr_id;
110: ELSIF (p_check_id_flag = 'A') THEN
111: --Added for task manager changes;
112: IF (PA_TASKS_MAINT_UTILS.GET_TASK_MANAGER_PROFILE = 'N') THEN
113: --select from pa_employees
114: OPEN c;
115: LOOP
116: FETCH c INTO l_current_id;

Line 167: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',

163: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
164: -- 4537865 : RESET x_error_msg_code also
165: x_error_msg_code := SQLCODE;
166:
167: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
168: p_procedure_name => 'CHECK_TASK_MGR_NAME_OR_ID');
169: RAISE;
170: END CHECK_TASK_MGR_NAME_OR_ID;
171:

Line 261: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',

257: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
258: -- 4537865 : RESET x_error_msg_code also
259: x_error_msg_code := SQLCODE ;
260:
261: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
262: p_procedure_name => 'CHECK_PROJECT_NAME_OR_ID');
263: RAISE;
264: END CHECK_PROJECT_NAME_OR_ID;
265:

Line 356: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',

352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
353: -- 4537865 : RESET x_error_msg_code also
354: x_error_msg_code := SQLCODE;
355:
356: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
357: p_procedure_name => 'CHECK_TASK_NAME_OR_ID');
358: RAISE;
359: END CHECK_TASK_NAME_OR_ID;
360:

Line 609: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',

605: -- 4537865 : RESET other OUT params too
606: x_msg_count := 1;
607: x_msg_data := SUBSTRB(SQLERRM ,1,240);
608:
609: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
610: p_procedure_name => 'CHECK_START_DATE',
611: p_error_text => x_msg_data); -- 4537865
612: RAISE;
613: END Check_Start_Date;

Line 766: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',

762: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
763: -- 4537865 : RESET other OUT params too
764: x_msg_count := 1;
765: x_msg_data := SUBSTRB(SQLERRM ,1,240);
766: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
767: p_procedure_name => 'CHECK_END_DATE',
768: p_error_text => x_msg_data); -- 4537865
769: END Check_End_Date;
770:

Line 892: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',

888: -- 4537865 : RESET other OUT params too
889: x_msg_count := 1;
890: x_msg_data := SUBSTRB(SQLERRM ,1,240);
891:
892: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
893: p_procedure_name => 'CHECK_SCHEDULE_DATES',
894: p_error_text => x_msg_data ); -- 4537865
895: END CHECK_SCHEDULE_DATES;
896:

Line 941: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',

937: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
938: -- 4537865 : RESET other OUT params too
939: x_msg_count := 1;
940: x_msg_data := SUBSTRB(SQLERRM ,1,240);
941: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
942: p_procedure_name => 'CHECK_ESTIMATE_DATES',
943: p_error_text => x_msg_data ); -- 4537865
944: END CHECK_ESTIMATE_DATES;
945:

Line 990: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',

986: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
987: -- 4537865 : RESET other OUT params too
988: x_msg_count := 1;
989: x_msg_data := SUBSTRB(SQLERRM ,1,240);
990: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
991: p_procedure_name => 'CHECK_ACTUAL_DATES',
992: p_error_text => x_msg_data ); -- 4537865
993: END CHECK_ACTUAL_DATES;
994:

Line 1977: ( p_pkg_name => 'PA_TASKS_MAINT_UTILS'

1973:
1974: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1975: THEN
1976: FND_MSG_PUB.add_exc_msg
1977: ( p_pkg_name => 'PA_TASKS_MAINT_UTILS'
1978: , p_procedure_name => l_api_name );
1979:
1980: END IF;
1981:

Line 2198: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_UTILS : CHECK_MOVE_FINANCIAL_TASK_OK : Printing Input parameters';

2194: p_debug_mode => l_debug_mode );
2195: END IF;
2196:
2197: IF l_debug_mode = 'Y' THEN
2198: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_UTILS : CHECK_MOVE_FINANCIAL_TASK_OK : Printing Input parameters';
2199: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
2200: l_debug_level3);
2201:
2202: Pa_Debug.WRITE(g_module_name,'p_task_version_id'||':'||p_task_version_id,

Line 2211: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_UTILS : CHECK_MOVE_FINANCIAL_TASK_OK : Checking whether p_task_version_id is Financial or WorkPlan';

2207: END IF;
2208:
2209:
2210: IF l_debug_mode = 'Y' THEN
2211: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_UTILS : CHECK_MOVE_FINANCIAL_TASK_OK : Checking whether p_task_version_id is Financial or WorkPlan';
2212: Pa_Debug.WRITE(g_module_name , Pa_Debug.g_err_stage , l_debug_level3);
2213: END IF;
2214:
2215:

Line 2249: ( p_pkg_name => 'PA_TASKS_MAINT_UTILS'

2245: -- 4537865 : RESET x_error_message_code also
2246: x_error_msg_code := SQLCODE ;
2247:
2248: Fnd_Msg_Pub.add_exc_msg
2249: ( p_pkg_name => 'PA_TASKS_MAINT_UTILS'
2250: ,p_procedure_name => 'CHECK_MOVE_FINANCIAL_TASK_OK'
2251: ,p_error_text => x_msg_data);
2252:
2253: IF l_debug_mode = 'Y' THEN

Line 2342: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_UTILS : CHECK_WORKPLAN_TASK_EXISTS : Printing Input parameters';

2338: p_debug_mode => l_debug_mode );
2339: END IF;
2340:
2341: IF l_debug_mode = 'Y' THEN
2342: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_UTILS : CHECK_WORKPLAN_TASK_EXISTS : Printing Input parameters';
2343: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
2344: l_debug_level3);
2345:
2346: Pa_Debug.WRITE(g_module_name,'p_task_version_id'||':'||p_task_version_id,

Line 2384: ( p_pkg_name => 'PA_TASKS_MAINT_UTILS'

2380: CLOSE c_get_WP_rec;
2381: END IF;
2382:
2383: Fnd_Msg_Pub.add_exc_msg
2384: ( p_pkg_name => 'PA_TASKS_MAINT_UTILS'
2385: ,p_procedure_name => 'CHECK_WORKPLAN_TASK_EXISTS'
2386: ,p_error_text => x_msg_data);
2387:
2388: IF l_debug_mode = 'Y' THEN

Line 2468: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',

2464: -- 4537865 : RESET x_msg_count, x_msg_data also
2465: x_msg_count := 1 ;
2466: x_msg_data := SUBSTRB(SQLERRM,1,240);
2467:
2468: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
2469: p_procedure_name => 'Check_End_Date_EI',
2470: p_error_text => x_msg_data); -- 4537865
2471: END Check_End_Date_EI;
2472: /*Check_Start_Date_EI

Line 2542: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',

2538: -- 4537865 : RESET x_msg_count, x_msg_data also
2539: x_msg_count := 1 ;
2540: x_msg_data := SUBSTRB(SQLERRM,1,240);
2541:
2542: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
2543: p_procedure_name => 'Check_Start_Date_EI',
2544: p_error_text => x_msg_data); -- 4537865
2545: END Check_Start_Date_EI;
2546: --Added by rtarway for BUG 4081329

Line 2548: end PA_TASKS_MAINT_UTILS;

2544: p_error_text => x_msg_data); -- 4537865
2545: END Check_Start_Date_EI;
2546: --Added by rtarway for BUG 4081329
2547:
2548: end PA_TASKS_MAINT_UTILS;