[Home] [Help]
1: package body PA_TASK_UTILS as
2: -- $Header: PAXTUTLB.pls 120.11.12010000.4 2008/10/23 05:24:29 paljain ship $
3:
4:
5: --
239: if (x_task_id is null) then
240: return(null);
241: end if;
242:
243: x_parent_task_id := pa_task_utils.get_parent_task_id(x_task_id);
244:
245: open c1;
246: fetch c1 into c1_rec;
247: if c1%notfound then
935: end if;
936:
937: EXCEPTION WHEN OTHERS THEN
938:
939: x_err_stage := 'pa_task_utils.check_task_has_sub_proj FAILED';
940:
941: END;
942:
943: -- End fix for Bug # 4266540.
1264: -- PROCEDURE
1265: -- change_task_org_ok2
1266: -- PURPOSE
1267: -- This procedure receives a table of task Ids and org Ids along with other,
1268: -- other parameters , then in turn calls Procedure pa_task_utils.change_task_org_ok1
1269: -- for each set of task Id and org Id.
1270: --
1271: --
1272: -- HISTORY
1286: IF p_task_id_tbl IS NOT NULL AND p_org_id_tbl IS NOT NULL THEN
1287:
1288: FOR i IN p_task_id_tbl.FIRST .. p_task_id_tbl.LAST
1289: LOOP
1290: pa_task_utils.change_task_org_ok1(p_task_id_tbl(i),
1291: p_project_id,
1292: p_org_id_tbl(i),
1293: p_commit,
1294: x_err_stage);
1658: end if;
1659:
1660: -- get top task id
1661: x_err_stage := 'get top task id for task '|| x_task_id;
1662: x_top_task_id := pa_task_utils.get_top_task_id(x_task_id);
1663:
1664: if ( x_top_task_id < 0 ) then -- Oracle error
1665: x_err_code := x_top_task_id;
1666: return;
2296: EXCEPTION -- 4537865
2297: WHEN OTHERS THEN
2298: p_validate_status := 'N';
2299: Fnd_Msg_Pub.add_exc_msg
2300: ( p_pkg_name => 'PA_TASK_UTILS'
2301: , p_procedure_name => 'validate_flex_fields'
2302: , p_error_text => substrb(sqlerrm,1,100));
2303: RAISE ;
2304: END validate_flex_fields;
2418: x_err_code := SQLCODE;
2419: return;
2420: end check_set_nonchargeable_ok;
2421:
2422: END PA_TASK_UTILS;