DBA Data[Home] [Help]

APPS.PA_TASKS_MAINT_UTILS dependencies on PA_TASKS

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 283: from pa_tasks

279: l_id_found_flag VARCHAR2(1) := 'N';
280:
281: cursor c IS
282: select task_id
283: from pa_tasks
284: where UPPER(task_name) = UPPER(p_task_name)
285: and project_id = p_project_id;
286: BEGIN
287: IF (p_task_id IS NULL OR p_task_id = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM) THEN

Line 314: FROM pa_tasks

310: -- ID is not empty;
311: IF (p_check_id_flag = 'Y') THEN
312: SELECT task_id
313: INTO x_task_id
314: FROM pa_tasks
315: WHERE task_id = p_task_id and project_id = p_project_id;
316: ELSIF (p_check_id_flag = 'N') THEN
317: x_task_id := p_task_id;
318: ELSIF (p_check_id_flag = 'A') THEN

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 375: from pa_tasks

371: /*HY
372: IF (p_peer_or_sub = 'SUB') THEN
373: select display_sequence
374: into l_s_num
375: from pa_tasks
376: where project_id = p_project_id
377: and task_id = p_task_id;
378:
379: if (l_s_num < 0) then

Line 389: from pa_tasks

385: select max(display_sequence), min(display_sequence)
386: into l_s_num, l_s_num_min
387: from (
388: select display_sequence
389: from pa_tasks
390: where project_id = p_project_id
391: start with task_id = p_task_id
392: connect by prior task_id = parent_task_id
393: );

Line 474: from pa_tasks

470: l_tend_date DATE;
471:
472: CURSOR c1(tid NUMBER) IS
473: select min(start_date), max(completion_date) --Bug 6163119
474: from pa_tasks
475: where --parent_task_id = c1.tid --Bug 6163119
476: project_id = p_project_id
477: start with parent_task_id=c1.tid
478: connect by prior task_id= parent_task_id; --Bug 6163119

Line 508: from pa_tasks

504: ELSE -- NOT A TOP TASK, compare with parent task
505: --select parent task start date
506: select start_date, completion_date
507: into l_start_date, l_end_date
508: from pa_tasks
509: where task_id = p_parent_task_id;
510: IF (p_start_date is NOT NULL and
511: l_start_date > p_start_date) THEN
512: -- PA_UTILS.ADD_MESSAGE('PA', 'PA_PARENT_TASK_GREATER');

Line 533: from pa_tasks

529: select max(start_date),
530: min(completion_date)
531: into l_tstart_date,
532: l_tend_date
533: from pa_tasks
534: where project_id=p_project_id
535: start with task_id=p_parent_task_id
536: connect by task_id= prior parent_task_id;
537:

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 635: from pa_tasks

631: l_tend_date DATE;
632:
633: CURSOR c1(tid NUMBER) IS
634: select min(start_date), max(completion_date) --Bug 6163119
635: from pa_tasks
636: where --parent_task_id = c1.tid --Bug 6163119
637: project_id = p_project_id
638: start with parent_task_id=c1.tid
639: connect by prior task_id= parent_task_id;--Bug 6163119

Line 666: from pa_tasks

662: ELSE -- NOT A TOP TASK, compare with parent task
663: --select parent task completion date
664: select start_date, completion_date
665: into l_start_date, l_end_date
666: from pa_tasks
667: where task_id = p_parent_task_id;
668: IF (p_end_date is NOT NULL and
669: l_end_date < p_end_date) THEN
670: -- PA_UTILS.ADD_MESSAGE('PA', 'PA_PARENT_COMPLETION_EARLIER');

Line 691: from pa_tasks

687: select max(start_date),
688: min(completion_date)
689: into l_tstart_date,
690: l_tend_date
691: from pa_tasks
692: where project_id=p_project_id
693: start with task_id=p_parent_task_id
694: connect by task_id= prior parent_task_id;
695:

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 1097: FROM pa_tasks

1093:
1094: CURSOR cur_pa_parent_task
1095: IS
1096: SELECT parent_task_id, project_id
1097: FROM pa_tasks
1098: WHERE task_id = p_reference_task_id;
1099:
1100: l_parent_task_id NUMBER;
1101: l_project_id NUMBER;

Line 1191: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UILS',

1187: x_service_type_code := NULL ;
1188: x_service_type_name := NULL ;
1189:
1190: x_error_msg_code := SQLCODE ;
1191: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UILS',
1192: p_procedure_name => 'DEFAULT_TASK_ATTRIBUTES',
1193: p_error_text => SUBSTRB(SQLERRM,1,240));
1194: -- 4537865 : End
1195: RAISE;

Line 1234: CURSOR cur_pa_tasks_sub

1230:
1231: /* Bug 2680486 -- Performance changes -- To avoid Non-mergable view issue,
1232: Changed PA_WORK_TYPES_VL to PA_WORK_TYPES_TL and added condition for userenev('lang')*/
1233:
1234: CURSOR cur_pa_tasks_sub
1235: IS
1236: SELECT PT.CARRYING_OUT_ORGANIZATION_ID
1237: ,HOU.NAME CARRYING_OUT_ORGANIZATION_NAME
1238: ,PT.WORK_TYPE_ID

Line 1242: FROM PA_TASKS PT

1238: ,PT.WORK_TYPE_ID
1239: ,PWT.NAME WORK_TYPE_NAME
1240: ,PT.SERVICE_TYPE_CODE
1241: ,PL.MEANING SERVICE_TYPE_NAME
1242: FROM PA_TASKS PT
1243: ,HR_ORGANIZATION_UNITS HOU
1244: ,PA_WORK_TYPES_TL PWT
1245: ,PA_LOOKUPS PL
1246: WHERE PT.TASK_ID = p_task_id

Line 1258: OPEN cur_pa_tasks_sub;

1254: l_num_of_records NUMBER;
1255:
1256: BEGIN
1257: x_return_status := FND_API.G_RET_STS_SUCCESS;
1258: OPEN cur_pa_tasks_sub;
1259: LOOP
1260: FETCH cur_pa_tasks_sub INTO x_carrying_out_org_id
1261: ,x_carrying_out_org_name
1262: ,x_work_type_id

Line 1260: FETCH cur_pa_tasks_sub INTO x_carrying_out_org_id

1256: BEGIN
1257: x_return_status := FND_API.G_RET_STS_SUCCESS;
1258: OPEN cur_pa_tasks_sub;
1259: LOOP
1260: FETCH cur_pa_tasks_sub INTO x_carrying_out_org_id
1261: ,x_carrying_out_org_name
1262: ,x_work_type_id
1263: ,x_work_type_name
1264: ,x_service_type_code

Line 1266: IF cur_pa_tasks_sub%NOTFOUND

1262: ,x_work_type_id
1263: ,x_work_type_name
1264: ,x_service_type_code
1265: ,x_service_type_name;
1266: IF cur_pa_tasks_sub%NOTFOUND
1267: THEN
1268: EXIT;
1269: ELSE
1270: l_record_found := 'Y';

Line 1273: l_num_of_records := cur_pa_tasks_sub%ROWCOUNT;

1269: ELSE
1270: l_record_found := 'Y';
1271: END IF;
1272: END LOOP;
1273: l_num_of_records := cur_pa_tasks_sub%ROWCOUNT;
1274: CLOSE cur_pa_tasks_sub;
1275: --more than one row is found
1276: IF l_num_of_records > 1 AND l_record_found = 'Y'
1277: THEN

Line 1274: CLOSE cur_pa_tasks_sub;

1270: l_record_found := 'Y';
1271: END IF;
1272: END LOOP;
1273: l_num_of_records := cur_pa_tasks_sub%ROWCOUNT;
1274: CLOSE cur_pa_tasks_sub;
1275: --more than one row is found
1276: IF l_num_of_records > 1 AND l_record_found = 'Y'
1277: THEN
1278: x_error_msg_code:= 'PA_PRJ_TOO_MANY_TASKS';

Line 1319: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UILS',

1315: x_service_type_code := NULL ;
1316: x_service_type_name := NULL ;
1317:
1318: x_error_msg_code := SQLCODE ;
1319: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UILS',
1320: p_procedure_name => 'FETCH_TASK_ATTIBUTES',
1321: p_error_text => SUBSTRB(SQLERRM,1,240));
1322: -- 4537865 : End
1323: RAISE;

Line 1454: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UILS',

1450: x_service_type_name := NULL ;
1451:
1452:
1453: x_error_msg_code := SQLCODE ;
1454: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UILS',
1455: p_procedure_name => 'FETCH_PROJECT_ATTIBUTES',
1456: p_error_text => SUBSTRB(SQLERRM,1,240));
1457: -- 4537865 :End
1458: RAISE;

Line 1469: from pa_tasks t

1465: IS
1466:
1467: cursor c1 IS
1468: select 'Y'
1469: from pa_tasks t
1470: where t.project_id = p_project_id and
1471: t.parent_task_id = p_task_id;
1472:
1473: l_summary_flag VARCHAR2(1);

Line 1533: FROM pa_tasks

1529: --Get wbs of the task shown above the indenting task.
1530: /* CURSOR cur_wbs_above
1531: IS
1532: SELECT wbs_level, task_id, top_task_id, parent_task_id, display_sequence
1533: FROM pa_tasks
1534: WHERE project_id = p_project_id
1535: AND display_sequence = ( SELECT max( display_sequence )
1536: FROM pa_tasks
1537: WHERE project_id = p_project_id

Line 1536: FROM pa_tasks

1532: SELECT wbs_level, task_id, top_task_id, parent_task_id, display_sequence
1533: FROM pa_tasks
1534: WHERE project_id = p_project_id
1535: AND display_sequence = ( SELECT max( display_sequence )
1536: FROM pa_tasks
1537: WHERE project_id = p_project_id
1538: AND display_sequence < ( SELECT display_sequence
1539: FROM pa_tasks
1540: WHERE project_id = p_project_id

Line 1539: FROM pa_tasks

1535: AND display_sequence = ( SELECT max( display_sequence )
1536: FROM pa_tasks
1537: WHERE project_id = p_project_id
1538: AND display_sequence < ( SELECT display_sequence
1539: FROM pa_tasks
1540: WHERE project_id = p_project_id
1541: AND task_id = p_task_id ) );*/
1542:
1543: --WITH THE CHANGE IN THE DATA MODEL p_task_id will from now act as p_task_version_id

Line 1547: FROM pa_tasks pt, pa_proj_element_versions ppev

1543: --WITH THE CHANGE IN THE DATA MODEL p_task_id will from now act as p_task_version_id
1544: CURSOR cur_wbs_above
1545: IS
1546: SELECT pt.wbs_level, pt.task_id, pt.top_task_id, pt.parent_task_id, ppev.display_sequence
1547: FROM pa_tasks pt, pa_proj_element_versions ppev
1548: WHERE pt.project_id = p_project_id
1549: AND ppev.proj_element_id = pt.task_id
1550: AND ppev.display_sequence = ( SELECT max( display_sequence )
1551: FROM pa_proj_element_versions

Line 1561: FROM pa_tasks

1557: ---Get the wbs of the task being indented.
1558: /* CURSOR cur_wbs
1559: IS
1560: SELECT wbs_level, top_task_id, parent_task_id, display_sequence
1561: FROM pa_tasks
1562: WHERE project_id = p_project_id
1563: AND task_id = p_task_id;*/
1564:
1565: CURSOR cur_wbs

Line 1568: FROM pa_tasks pt, pa_proj_element_versions ppev

1564:
1565: CURSOR cur_wbs
1566: IS
1567: SELECT pt.wbs_level, pt.top_task_id, pt.parent_task_id, ppev.display_sequence
1568: FROM pa_tasks pt, pa_proj_element_versions ppev
1569: WHERE pt.project_id = p_project_id
1570: AND ppev.proj_element_id = p_task_id
1571: AND ppev.proj_element_id = pt.task_id;
1572:

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 2416: FROM pa_tasks p

2412: CURSOR cur_date(l_task_id NUMBER, l_project_id NUMBER ) IS
2413: SELECT MAX(pe.expenditure_item_date) ei_date
2414: FROM pa_expenditure_items_all pe
2415: WHERE pe.task_id IN (SELECT p.task_id
2416: FROM pa_tasks p
2417: where p.project_id = l_project_id
2418: --Added by rtarway for bug 4242216
2419: AND not exists
2420: (

Line 2422: from pa_tasks pt

2418: --Added by rtarway for bug 4242216
2419: AND not exists
2420: (
2421: select parent_task_id
2422: from pa_tasks pt
2423: where pt.parent_task_id =p.task_id
2424: and pt.project_id=l_project_id
2425: )
2426: --Added by rtarway for bug 4242216

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 2489: FROM pa_tasks p

2485: SELECT MIN(pe.expenditure_item_date) ei_date
2486: FROM pa_expenditure_items_all pe
2487: WHERE pe.task_id IN (
2488: SELECT p.task_id
2489: FROM pa_tasks p
2490: WHERE p.project_id = l_project_id
2491: --Added by rtarway for bug 4242216
2492: AND not exists
2493: (

Line 2495: from pa_tasks pt

2491: --Added by rtarway for bug 4242216
2492: AND not exists
2493: (
2494: select parent_task_id
2495: from pa_tasks pt
2496: where pt.parent_task_id =p.task_id
2497: and pt.project_id=l_project_id
2498: )
2499: --Added by rtarway for bug 4242216

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;