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.9 2009/07/21 14:10:26 anuragar 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.9 2009/07/21 14:10:26 anuragar 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 478: from pa_tasks

474: l_sch_e_date DATE;
475:
476: CURSOR c1(tid NUMBER) IS
477: select min(start_date), max(completion_date) --Bug 6163119
478: from pa_tasks
479: where --parent_task_id = c1.tid --Bug 6163119
480: project_id = p_project_id
481: start with parent_task_id=c1.tid
482: connect by prior task_id= parent_task_id; --Bug 6163119

Line 533: from pa_tasks

529: ELSE -- NOT A TOP TASK, compare with parent task
530: --select parent task start date
531: select start_date, completion_date
532: into l_start_date, l_end_date
533: from pa_tasks
534: where task_id = p_parent_task_id;
535: IF (p_start_date is NOT NULL and
536: l_start_date > p_start_date) THEN
537: -- PA_UTILS.ADD_MESSAGE('PA', 'PA_PARENT_TASK_GREATER');

Line 558: from pa_tasks

554: select max(start_date),
555: min(completion_date)
556: into l_tstart_date,
557: l_tend_date
558: from pa_tasks
559: where project_id=p_project_id
560: start with task_id=p_parent_task_id
561: connect by task_id= prior parent_task_id;
562:

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

630: -- 4537865 : RESET other OUT params too
631: x_msg_count := 1;
632: x_msg_data := SUBSTRB(SQLERRM ,1,240);
633:
634: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
635: p_procedure_name => 'CHECK_START_DATE',
636: p_error_text => x_msg_data); -- 4537865
637: RAISE;
638: END Check_Start_Date;

Line 664: from pa_tasks

660: l_sch_e_date DATE;
661:
662: CURSOR c1(tid NUMBER) IS
663: select min(start_date), max(completion_date) --Bug 6163119
664: from pa_tasks
665: where --parent_task_id = c1.tid --Bug 6163119
666: project_id = p_project_id
667: start with parent_task_id=c1.tid
668: connect by prior task_id= parent_task_id;--Bug 6163119

Line 717: from pa_tasks

713: ELSE -- NOT A TOP TASK, compare with parent task
714: --select parent task completion date
715: select start_date, completion_date
716: into l_start_date, l_end_date
717: from pa_tasks
718: where task_id = p_parent_task_id;
719: IF (p_end_date is NOT NULL and
720: l_end_date < p_end_date) THEN
721: -- PA_UTILS.ADD_MESSAGE('PA', 'PA_PARENT_COMPLETION_EARLIER');

Line 742: from pa_tasks

738: select max(start_date),
739: min(completion_date)
740: into l_tstart_date,
741: l_tend_date
742: from pa_tasks
743: where project_id=p_project_id
744: start with task_id=p_parent_task_id
745: connect by task_id= prior parent_task_id;
746:

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

813: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
814: -- 4537865 : RESET other OUT params too
815: x_msg_count := 1;
816: x_msg_data := SUBSTRB(SQLERRM ,1,240);
817: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
818: p_procedure_name => 'CHECK_END_DATE',
819: p_error_text => x_msg_data); -- 4537865
820: END Check_End_Date;
821:

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

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

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

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

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

1037: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1038: -- 4537865 : RESET other OUT params too
1039: x_msg_count := 1;
1040: x_msg_data := SUBSTRB(SQLERRM ,1,240);
1041: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
1042: p_procedure_name => 'CHECK_ACTUAL_DATES',
1043: p_error_text => x_msg_data ); -- 4537865
1044: END CHECK_ACTUAL_DATES;
1045:

Line 1148: FROM pa_tasks

1144:
1145: CURSOR cur_pa_parent_task
1146: IS
1147: SELECT parent_task_id, project_id
1148: FROM pa_tasks
1149: WHERE task_id = p_reference_task_id;
1150:
1151: l_parent_task_id NUMBER;
1152: l_project_id NUMBER;

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

1238: x_service_type_code := NULL ;
1239: x_service_type_name := NULL ;
1240:
1241: x_error_msg_code := SQLCODE ;
1242: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UILS',
1243: p_procedure_name => 'DEFAULT_TASK_ATTRIBUTES',
1244: p_error_text => SUBSTRB(SQLERRM,1,240));
1245: -- 4537865 : End
1246: RAISE;

Line 1285: CURSOR cur_pa_tasks_sub

1281:
1282: /* Bug 2680486 -- Performance changes -- To avoid Non-mergable view issue,
1283: Changed PA_WORK_TYPES_VL to PA_WORK_TYPES_TL and added condition for userenev('lang')*/
1284:
1285: CURSOR cur_pa_tasks_sub
1286: IS
1287: SELECT PT.CARRYING_OUT_ORGANIZATION_ID
1288: ,HOU.NAME CARRYING_OUT_ORGANIZATION_NAME
1289: ,PT.WORK_TYPE_ID

Line 1293: FROM PA_TASKS PT

1289: ,PT.WORK_TYPE_ID
1290: ,PWT.NAME WORK_TYPE_NAME
1291: ,PT.SERVICE_TYPE_CODE
1292: ,PL.MEANING SERVICE_TYPE_NAME
1293: FROM PA_TASKS PT
1294: ,HR_ORGANIZATION_UNITS HOU
1295: ,PA_WORK_TYPES_TL PWT
1296: ,PA_LOOKUPS PL
1297: WHERE PT.TASK_ID = p_task_id

Line 1309: OPEN cur_pa_tasks_sub;

1305: l_num_of_records NUMBER;
1306:
1307: BEGIN
1308: x_return_status := FND_API.G_RET_STS_SUCCESS;
1309: OPEN cur_pa_tasks_sub;
1310: LOOP
1311: FETCH cur_pa_tasks_sub INTO x_carrying_out_org_id
1312: ,x_carrying_out_org_name
1313: ,x_work_type_id

Line 1311: FETCH cur_pa_tasks_sub INTO x_carrying_out_org_id

1307: BEGIN
1308: x_return_status := FND_API.G_RET_STS_SUCCESS;
1309: OPEN cur_pa_tasks_sub;
1310: LOOP
1311: FETCH cur_pa_tasks_sub INTO x_carrying_out_org_id
1312: ,x_carrying_out_org_name
1313: ,x_work_type_id
1314: ,x_work_type_name
1315: ,x_service_type_code

Line 1317: IF cur_pa_tasks_sub%NOTFOUND

1313: ,x_work_type_id
1314: ,x_work_type_name
1315: ,x_service_type_code
1316: ,x_service_type_name;
1317: IF cur_pa_tasks_sub%NOTFOUND
1318: THEN
1319: EXIT;
1320: ELSE
1321: l_record_found := 'Y';

Line 1324: l_num_of_records := cur_pa_tasks_sub%ROWCOUNT;

1320: ELSE
1321: l_record_found := 'Y';
1322: END IF;
1323: END LOOP;
1324: l_num_of_records := cur_pa_tasks_sub%ROWCOUNT;
1325: CLOSE cur_pa_tasks_sub;
1326: --more than one row is found
1327: IF l_num_of_records > 1 AND l_record_found = 'Y'
1328: THEN

Line 1325: CLOSE cur_pa_tasks_sub;

1321: l_record_found := 'Y';
1322: END IF;
1323: END LOOP;
1324: l_num_of_records := cur_pa_tasks_sub%ROWCOUNT;
1325: CLOSE cur_pa_tasks_sub;
1326: --more than one row is found
1327: IF l_num_of_records > 1 AND l_record_found = 'Y'
1328: THEN
1329: x_error_msg_code:= 'PA_PRJ_TOO_MANY_TASKS';

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

1366: x_service_type_code := NULL ;
1367: x_service_type_name := NULL ;
1368:
1369: x_error_msg_code := SQLCODE ;
1370: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UILS',
1371: p_procedure_name => 'FETCH_TASK_ATTIBUTES',
1372: p_error_text => SUBSTRB(SQLERRM,1,240));
1373: -- 4537865 : End
1374: RAISE;

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

1501: x_service_type_name := NULL ;
1502:
1503:
1504: x_error_msg_code := SQLCODE ;
1505: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UILS',
1506: p_procedure_name => 'FETCH_PROJECT_ATTIBUTES',
1507: p_error_text => SUBSTRB(SQLERRM,1,240));
1508: -- 4537865 :End
1509: RAISE;

Line 1520: from pa_tasks t

1516: IS
1517:
1518: cursor c1 IS
1519: select 'Y'
1520: from pa_tasks t
1521: where t.project_id = p_project_id and
1522: t.parent_task_id = p_task_id;
1523:
1524: l_summary_flag VARCHAR2(1);

Line 1584: FROM pa_tasks

1580: --Get wbs of the task shown above the indenting task.
1581: /* CURSOR cur_wbs_above
1582: IS
1583: SELECT wbs_level, task_id, top_task_id, parent_task_id, display_sequence
1584: FROM pa_tasks
1585: WHERE project_id = p_project_id
1586: AND display_sequence = ( SELECT max( display_sequence )
1587: FROM pa_tasks
1588: WHERE project_id = p_project_id

Line 1587: FROM pa_tasks

1583: SELECT wbs_level, task_id, top_task_id, parent_task_id, display_sequence
1584: FROM pa_tasks
1585: WHERE project_id = p_project_id
1586: AND display_sequence = ( SELECT max( display_sequence )
1587: FROM pa_tasks
1588: WHERE project_id = p_project_id
1589: AND display_sequence < ( SELECT display_sequence
1590: FROM pa_tasks
1591: WHERE project_id = p_project_id

Line 1590: FROM pa_tasks

1586: AND display_sequence = ( SELECT max( display_sequence )
1587: FROM pa_tasks
1588: WHERE project_id = p_project_id
1589: AND display_sequence < ( SELECT display_sequence
1590: FROM pa_tasks
1591: WHERE project_id = p_project_id
1592: AND task_id = p_task_id ) );*/
1593:
1594: --WITH THE CHANGE IN THE DATA MODEL p_task_id will from now act as p_task_version_id

Line 1598: FROM pa_tasks pt, pa_proj_element_versions ppev

1594: --WITH THE CHANGE IN THE DATA MODEL p_task_id will from now act as p_task_version_id
1595: CURSOR cur_wbs_above
1596: IS
1597: SELECT pt.wbs_level, pt.task_id, pt.top_task_id, pt.parent_task_id, ppev.display_sequence
1598: FROM pa_tasks pt, pa_proj_element_versions ppev
1599: WHERE pt.project_id = p_project_id
1600: AND ppev.proj_element_id = pt.task_id
1601: AND ppev.display_sequence = ( SELECT max( display_sequence )
1602: FROM pa_proj_element_versions

Line 1612: FROM pa_tasks

1608: ---Get the wbs of the task being indented.
1609: /* CURSOR cur_wbs
1610: IS
1611: SELECT wbs_level, top_task_id, parent_task_id, display_sequence
1612: FROM pa_tasks
1613: WHERE project_id = p_project_id
1614: AND task_id = p_task_id;*/
1615:
1616: CURSOR cur_wbs

Line 1619: FROM pa_tasks pt, pa_proj_element_versions ppev

1615:
1616: CURSOR cur_wbs
1617: IS
1618: SELECT pt.wbs_level, pt.top_task_id, pt.parent_task_id, ppev.display_sequence
1619: FROM pa_tasks pt, pa_proj_element_versions ppev
1620: WHERE pt.project_id = p_project_id
1621: AND ppev.proj_element_id = p_task_id
1622: AND ppev.proj_element_id = pt.task_id;
1623:

Line 2028: ( p_pkg_name => 'PA_TASKS_MAINT_UTILS'

2024:
2025: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2026: THEN
2027: FND_MSG_PUB.add_exc_msg
2028: ( p_pkg_name => 'PA_TASKS_MAINT_UTILS'
2029: , p_procedure_name => l_api_name );
2030:
2031: END IF;
2032:

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

2245: p_debug_mode => l_debug_mode );
2246: END IF;
2247:
2248: IF l_debug_mode = 'Y' THEN
2249: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_UTILS : CHECK_MOVE_FINANCIAL_TASK_OK : Printing Input parameters';
2250: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
2251: l_debug_level3);
2252:
2253: Pa_Debug.WRITE(g_module_name,'p_task_version_id'||':'||p_task_version_id,

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

2258: END IF;
2259:
2260:
2261: IF l_debug_mode = 'Y' THEN
2262: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_UTILS : CHECK_MOVE_FINANCIAL_TASK_OK : Checking whether p_task_version_id is Financial or WorkPlan';
2263: Pa_Debug.WRITE(g_module_name , Pa_Debug.g_err_stage , l_debug_level3);
2264: END IF;
2265:
2266:

Line 2300: ( p_pkg_name => 'PA_TASKS_MAINT_UTILS'

2296: -- 4537865 : RESET x_error_message_code also
2297: x_error_msg_code := SQLCODE ;
2298:
2299: Fnd_Msg_Pub.add_exc_msg
2300: ( p_pkg_name => 'PA_TASKS_MAINT_UTILS'
2301: ,p_procedure_name => 'CHECK_MOVE_FINANCIAL_TASK_OK'
2302: ,p_error_text => x_msg_data);
2303:
2304: IF l_debug_mode = 'Y' THEN

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

2389: p_debug_mode => l_debug_mode );
2390: END IF;
2391:
2392: IF l_debug_mode = 'Y' THEN
2393: Pa_Debug.g_err_stage:= 'PA_TASKS_MAINT_UTILS : CHECK_WORKPLAN_TASK_EXISTS : Printing Input parameters';
2394: Pa_Debug.WRITE(g_module_name,Pa_Debug.g_err_stage,
2395: l_debug_level3);
2396:
2397: Pa_Debug.WRITE(g_module_name,'p_task_version_id'||':'||p_task_version_id,

Line 2435: ( p_pkg_name => 'PA_TASKS_MAINT_UTILS'

2431: CLOSE c_get_WP_rec;
2432: END IF;
2433:
2434: Fnd_Msg_Pub.add_exc_msg
2435: ( p_pkg_name => 'PA_TASKS_MAINT_UTILS'
2436: ,p_procedure_name => 'CHECK_WORKPLAN_TASK_EXISTS'
2437: ,p_error_text => x_msg_data);
2438:
2439: IF l_debug_mode = 'Y' THEN

Line 2467: FROM pa_tasks p

2463: CURSOR cur_date(l_task_id NUMBER, l_project_id NUMBER ) IS
2464: SELECT MAX(pe.expenditure_item_date) ei_date
2465: FROM pa_expenditure_items_all pe
2466: WHERE pe.task_id IN (SELECT p.task_id
2467: FROM pa_tasks p
2468: where p.project_id = l_project_id
2469: --Added by rtarway for bug 4242216
2470: AND not exists
2471: (

Line 2473: from pa_tasks pt

2469: --Added by rtarway for bug 4242216
2470: AND not exists
2471: (
2472: select parent_task_id
2473: from pa_tasks pt
2474: where pt.parent_task_id =p.task_id
2475: and pt.project_id=l_project_id
2476: )
2477: --Added by rtarway for bug 4242216

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

2531: -- 4537865 : RESET x_msg_count, x_msg_data also
2532: x_msg_count := 1 ;
2533: x_msg_data := SUBSTRB(SQLERRM,1,240);
2534:
2535: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
2536: p_procedure_name => 'Check_End_Date_EI',
2537: p_error_text => x_msg_data); -- 4537865
2538: END Check_End_Date_EI;
2539: /*Check_Start_Date_EI

Line 2556: FROM pa_tasks p

2552: SELECT MIN(pe.expenditure_item_date) ei_date
2553: FROM pa_expenditure_items_all pe
2554: WHERE pe.task_id IN (
2555: SELECT p.task_id
2556: FROM pa_tasks p
2557: WHERE p.project_id = l_project_id
2558: --Added by rtarway for bug 4242216
2559: AND not exists
2560: (

Line 2562: from pa_tasks pt

2558: --Added by rtarway for bug 4242216
2559: AND not exists
2560: (
2561: select parent_task_id
2562: from pa_tasks pt
2563: where pt.parent_task_id =p.task_id
2564: and pt.project_id=l_project_id
2565: )
2566: --Added by rtarway for bug 4242216

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

2621: -- 4537865 : RESET x_msg_count, x_msg_data also
2622: x_msg_count := 1 ;
2623: x_msg_data := SUBSTRB(SQLERRM,1,240);
2624:
2625: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
2626: p_procedure_name => 'Check_Start_Date_EI',
2627: p_error_text => x_msg_data); -- 4537865
2628: END Check_Start_Date_EI;
2629: --Added by rtarway for BUG 4081329

Line 2631: end PA_TASKS_MAINT_UTILS;

2627: p_error_text => x_msg_data); -- 4537865
2628: END Check_Start_Date_EI;
2629: --Added by rtarway for BUG 4081329
2630:
2631: end PA_TASKS_MAINT_UTILS;