DBA Data[Home] [Help]

APPS.PA_PROJECTS_MAINT_UTILS dependencies on PA_PROJECTS

Line 1: PACKAGE BODY PA_PROJECTS_MAINT_UTILS AS

1: PACKAGE BODY PA_PROJECTS_MAINT_UTILS AS
2: /* $Header: PARMPRUB.pls 120.4 2005/08/25 02:01:18 avaithia noship $ */
3: -- API name : check_org_name_or_id
4: -- Type : Public
5: -- Pre-reqs : None.

Line 224: -- p_project_type IN pa_projects_all.project_type%TYPE

220: -- Pre-reqs : None.
221: -- Parameters :
222: -- p_probability_member_id IN pa_probability_members.probability_member_id%TYPE Required
223: -- p_probability_percentage IN pa_probability_members.probability_percentage%TYPE Required
224: -- p_project_type IN pa_projects_all.project_type%TYPE
225: -- p_probability_list_id IN pa_probability_lists.probability_list_id%TYPE
226: -- p_check_id_flag IN VARCHAR2 Required
227: -- x_probability_member_id OUT pa_probability_members.probability_member_id%TYPE Required
228: -- x_return_status OUT VARCHAR2 Required

Line 239: , p_project_type IN pa_projects_all.project_type%TYPE

235: --
236: PROCEDURE CHECK_PROBABILITY_CODE_OR_ID
237: (p_probability_member_id IN pa_probability_members.probability_member_id%TYPE
238: ,p_probability_percentage IN pa_probability_members.probability_percentage%TYPE
239: , p_project_type IN pa_projects_all.project_type%TYPE
240: ,p_probability_list_id IN pa_probability_lists.probability_list_id%TYPE:=NULL
241: ,p_check_id_flag IN VARCHAR2
242: ,x_probability_member_id OUT NOCOPY pa_probability_members.probability_member_id%TYPE --File.Sql.39 bug 4440895
243: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

Line 381: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_UTILS', p_procedure_name => 'CHECK_PROBABILITY_CODE_OR_ID');

377: x_error_msg_code := SQLCODE ;
378:
379: x_probability_member_id := NULL;
380: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
381: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_UTILS', p_procedure_name => 'CHECK_PROBABILITY_CODE_OR_ID');
382: RAISE;
383: END CHECK_PROBABILITY_CODE_OR_ID;
384:
385: -- API name : check_calendar_name_or_id

Line 715: IF pa_projects_maint_utils.class_check_mandatory (p_class_category, l_project_id) = 'Y' THEN

711: l_project_id := p_object_id;
712: end if;
713:
714: /* changes for bug 2681127 */
715: IF pa_projects_maint_utils.class_check_mandatory (p_class_category, l_project_id) = 'Y' THEN
716: x_error_msg_code := 'PA_CLASS_CATEGORY_MANDATORY';
717: x_return_status := 'E' ;
718: RETURN;
719: END IF;

Line 722: l_dummy := PA_PROJECTS_MAINT_UTILS.CLASS_CHECK_TRANS(l_project_id);

718: RETURN;
719: END IF;
720: /* changes for bug 2681127 end */
721:
722: l_dummy := PA_PROJECTS_MAINT_UTILS.CLASS_CHECK_TRANS(l_project_id);
723: IF l_dummy ='Y'
724: THEN
725: OPEN class_delrec(p_class_category);
726: FETCH class_delrec INTO l_rec_status_flag;

Line 741: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_UTILS',

737: EXCEPTION
738: WHEN OTHERS THEN
739: x_return_status := 'U';
740: x_error_msg_code := SQLCODE;
741: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_UTILS',
742: p_procedure_name => 'CHECK_CLASS_CATG_CAN_DELETE',
743: p_error_text => SUBSTRB(SQLERRM,1,240));
744: raise;
745: END CHECK_CLASS_CATG_CAN_DELETE;

Line 798: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_UTILS',

794: EXCEPTION
795: WHEN OTHERS THEN
796: x_return_status := 'U';
797: x_error_msg_code := SQLCODE;
798: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_UTILS',
799: p_procedure_name => 'CHECK_DUPLICATE_CLASS_CATG',
800: p_error_text => SUBSTRB(SQLERRM,1,240));
801: raise;
802: END CHECK_DUPLICATE_CLASS_CATG;

Line 855: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_UTILS',

851: EXCEPTION
852: WHEN OTHERS THEN
853: x_return_status := 'U';
854: x_error_msg_code := SQLCODE;
855: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_UTILS',
856: p_procedure_name => 'CHECK_CLASS_CATG_ONE_ONLY_CODE',
857: p_error_text => SUBSTRB(SQLERRM,1,240));
858: raise;
859: END CHECK_CLASS_CATG_ONE_ONLY_CODE;

Line 887: FROM PA_PROJECTS

883: IS
884: CURSOR l_project_template (c_project_id NUMBER)
885: IS
886: SELECT created_from_project_id
887: FROM PA_PROJECTS
888: WHERE project_id = c_project_id;
889:
890: CURSOR l_override (c_created_from_project_id NUMBER, c_class_category VARCHAR2)
891: IS

Line 898: l_created_from_project_id pa_projects.created_from_project_id%TYPE;

894: WHERE pa_source_template_id = c_created_from_project_id
895: AND pa_field_name = 'CLASSIFICATION'
896: AND UPPER(type) = c_class_category;
897: l_dummy VARCHAR2(1);
898: l_created_from_project_id pa_projects.created_from_project_id%TYPE;
899: BEGIN
900: x_return_status := 'S';
901: OPEN l_project_template(p_project_id);
902: FETCH l_project_template INTO l_created_from_project_id;

Line 925: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_UTILS',

921: EXCEPTION
922: WHEN OTHERS THEN
923: x_return_status := 'U';
924: x_error_msg_code := SQLCODE;
925: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_UTILS',
926: p_procedure_name => 'CHECK_CLASS_CATG_CAN_OVERRIDE',
927: p_error_text => SUBSTRB(SQLERRM,1,240));
928: raise;
929: END CHECK_CLASS_CATG_CAN_OVERRIDE;

Line 972: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_UTILS',

968: EXCEPTION
969: WHEN OTHERS THEN
970: x_return_status := 'U';
971: x_error_msg_code := SQLCODE;
972: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_UTILS',
973: p_procedure_name => 'CHECK_PROBABILITY_CAN_CHANGE',
974: p_error_text => SUBSTRB(SQLERRM,1,240));
975: raise;
976: END CHECK_PROBABILITY_CAN_CHANGE;

Line 1023: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_UTILS',

1019: EXCEPTION
1020: WHEN OTHERS THEN
1021: x_return_status := 'U';
1022: x_error_msg_code := SQLCODE;
1023: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_UTILS',
1024: p_procedure_name => 'CHECK_BILL_JOB_GRP_REQ',
1025: p_error_text => SUBSTRB(SQLERRM,1,240));
1026: raise;
1027: END CHECK_BILL_JOB_GRP_REQ;

Line 1087: from pa_projects

1083: Is
1084: Select bill_job_group_id,
1085: labor_std_bill_rate_schdl,
1086: non_labor_std_bill_rate_schdl
1087: from pa_projects
1088: where project_id = c_project_id;
1089:
1090: Cursor c2 (c_bill_job_group_id NUMBER,
1091: c_lab_std_bill_rate_schdl VARCHAR2,

Line 1100: l_bill_job_group_id pa_projects.bill_job_group_id%TYPE;

1096: AND JOB_GROUP_ID = c_bill_job_group_id
1097: AND (STD_BILL_RATE_SCHEDULE = c_lab_std_bill_rate_schdl
1098: or STD_BILL_RATE_SCHEDULE = c_non_lab_std_bill_rate_schdl);
1099:
1100: l_bill_job_group_id pa_projects.bill_job_group_id%TYPE;
1101: l_lab_std_bill_rate_schdl pa_projects.labor_std_bill_rate_schdl%TYPE;
1102: l_non_lab_std_bill_rate_schdl pa_projects.non_labor_std_bill_rate_schdl%TYPE;
1103: l_return VARCHAR2(1) :='N';
1104: BEGIN

Line 1101: l_lab_std_bill_rate_schdl pa_projects.labor_std_bill_rate_schdl%TYPE;

1097: AND (STD_BILL_RATE_SCHEDULE = c_lab_std_bill_rate_schdl
1098: or STD_BILL_RATE_SCHEDULE = c_non_lab_std_bill_rate_schdl);
1099:
1100: l_bill_job_group_id pa_projects.bill_job_group_id%TYPE;
1101: l_lab_std_bill_rate_schdl pa_projects.labor_std_bill_rate_schdl%TYPE;
1102: l_non_lab_std_bill_rate_schdl pa_projects.non_labor_std_bill_rate_schdl%TYPE;
1103: l_return VARCHAR2(1) :='N';
1104: BEGIN
1105: OPEN c1 (p_project_id);

Line 1102: l_non_lab_std_bill_rate_schdl pa_projects.non_labor_std_bill_rate_schdl%TYPE;

1098: or STD_BILL_RATE_SCHEDULE = c_non_lab_std_bill_rate_schdl);
1099:
1100: l_bill_job_group_id pa_projects.bill_job_group_id%TYPE;
1101: l_lab_std_bill_rate_schdl pa_projects.labor_std_bill_rate_schdl%TYPE;
1102: l_non_lab_std_bill_rate_schdl pa_projects.non_labor_std_bill_rate_schdl%TYPE;
1103: l_return VARCHAR2(1) :='N';
1104: BEGIN
1105: OPEN c1 (p_project_id);
1106: FETCH c1 INTO l_bill_job_group_id,l_lab_std_bill_rate_schdl,

Line 1145: FROM PA_PROJECTS_ALL

1141: RETURN VARCHAR2 IS
1142: CURSOR l_project_template (c_project_id NUMBER)
1143: IS
1144: SELECT created_from_project_id
1145: FROM PA_PROJECTS_ALL
1146: WHERE project_id = p_project_id;
1147:
1148: CURSOR l_project_option (p_template_id NUMBER, p_option_code VARCHAR2)
1149: IS

Line 1153: , PA_PROJECTS_ALL PROJ

1149: IS
1150: SELECT 'x'
1151: FROM PA_OPTIONS OPT1, PA_PROJECT_OPTIONS OPT2
1152: /* Commented for Bug 2499051
1153: , PA_PROJECTS_ALL PROJ
1154: */
1155: WHERE opt1.option_code = opt2.option_code
1156: AND opt1.OPTION_FUNCTION_NAME = p_option_code
1157: AND opt2.project_id = p_template_id;

Line 1161: l_created_from_project_id pa_projects.created_from_project_id%TYPE;

1157: AND opt2.project_id = p_template_id;
1158:
1159: l_dummy VARCHAR2(1);
1160: x_return_status VARCHAR2(1);
1161: l_created_from_project_id pa_projects.created_from_project_id%TYPE;
1162:
1163: BEGIN
1164:
1165: x_return_status := 'S';

Line 1386: PA_PROJECTS_ALL ppa,

1382: CURSOR C2(c_object_id NUMBER, c_class_category VARCHAR2)
1383: IS
1384: SELECT 1
1385: FROM PA_VALID_CATEGORIES vc,
1386: PA_PROJECTS_ALL ppa,
1387: PA_PROJECT_TYPES_ALL ppta
1388: WHERE vc.mandatory_flag = 'Y'
1389: AND vc.class_category = c_class_category
1390: AND ppa.project_id = p_object_id

Line 1408: if(p_object_type = 'PA_PROJECTS') then

1404: LOOP
1405: FETCH C1 INTO l_class_category, l_mandatory_flag;
1406: EXIT WHEN C1%NOTFOUND;
1407:
1408: if(p_object_type = 'PA_PROJECTS') then
1409: OPEN C2(p_object_id, l_class_category);
1410: FETCH C2 INTO l_dummy;
1411: if C2%FOUND then
1412: x_return_status := 'E';

Line 1665: PA_PROJECTS_ALL ppa,

1661: CURSOR C2
1662: IS
1663: SELECT total_100_percent_flag
1664: FROM PA_VALID_CATEGORIES_V vc,
1665: PA_PROJECTS_ALL ppa,
1666: PA_PROJECT_TYPES_ALL ppta
1667: WHERE ppa.project_id = p_object_id
1668: AND ppa.project_type = ppta.project_type
1669: AND nvl(ppa.org_id, -99) = nvl(ppta.org_id, -99)

Line 1737: PA_PROJECTS_ALL ppa

1733: CURSOR C1
1734: IS
1735: SELECT ppta.project_type_id
1736: FROM PA_PROJECT_TYPES_ALL ppta,
1737: PA_PROJECTS_ALL ppa
1738: WHERE ppa.project_id = p_object_id
1739: AND ppa.project_type = ppta.project_type
1740: AND ppa.org_id = ppta.org_id; --MOAC Changes: Bug 4363092: removed nvl usage with org_id
1741:

Line 1744: if p_object_type = 'PA_PROJECTS' then

1740: AND ppa.org_id = ppta.org_id; --MOAC Changes: Bug 4363092: removed nvl usage with org_id
1741:
1742: l_object_type_id NUMBER;
1743: BEGIN
1744: if p_object_type = 'PA_PROJECTS' then
1745: OPEN C1;
1746: FETCH C1 INTO l_object_type_id;
1747: CLOSE C1;
1748: end if;

Line 1856: FROM pa_projects_all

1852:
1853: cursor template_csr
1854: IS
1855: SELECT template_flag
1856: FROM pa_projects_all
1857: WHERE project_id = p_project_id;
1858:
1859: cursor org_csr
1860: IS

Line 1862: FROM PA_PROJECTS_ALL

1858:
1859: cursor org_csr
1860: IS
1861: SELECT carrying_out_organization_id
1862: FROM PA_PROJECTS_ALL
1863: WHERE project_id = p_project_id;
1864:
1865: l_cdl_exist NUMBER;
1866: l_template_flag VARCHAR2(1);

Line 1936: FROM PA_PROJECTS_ALL

1932: RETURN VARCHAR2
1933: IS
1934: CURSOR C1 IS
1935: SELECT probability_member_id, expected_approval_date
1936: FROM PA_PROJECTS_ALL
1937: WHERE project_id = p_project_id;
1938:
1939: l_probability_member_id NUMBER;
1940: l_expected_approval_date DATE;

Line 1993: pa_debug.init_err_stack ('pa_projects_maint_utils.Check_ClassCode_Name_Or_Id');

1989: l_id_found_flag VARCHAR(1) := 'N';
1990:
1991: BEGIN
1992:
1993: pa_debug.init_err_stack ('pa_projects_maint_utils.Check_ClassCode_Name_Or_Id');
1994:
1995: IF p_classcode_id IS NOT NULL AND p_classcode_id <> FND_API.G_MISS_NUM THEN
1996:
1997: IF p_check_id_flag = 'Y' THEN

Line 2072: (p_pkg_name => 'PA_PROJECTS_MAINT_UTILS',

2068:
2069: WHEN OTHERS THEN
2070: x_classcode_id := null;
2071: fnd_msg_pub.add_exc_msg
2072: (p_pkg_name => 'PA_PROJECTS_MAINT_UTILS',
2073: p_procedure_name => pa_debug.g_err_stack );
2074: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2075: -- 4537865
2076: x_error_message_code := SQLCODE ;

Line 2111: pa_debug.init_err_stack ('pa_projects_maint_utils.Check_ClassCategory_Name_Or_Id');

2107: l_id_found_flag VARCHAR(1) := 'N';
2108:
2109: BEGIN
2110:
2111: pa_debug.init_err_stack ('pa_projects_maint_utils.Check_ClassCategory_Name_Or_Id');
2112:
2113: IF p_class_category_id IS NOT NULL AND p_class_category_id <> FND_API.G_MISS_NUM THEN
2114:
2115: IF p_check_id_flag = 'Y' THEN

Line 2188: (p_pkg_name => 'PA_PROJECTS_MAINT_UTILS',

2184:
2185: WHEN OTHERS THEN
2186: x_class_category_id := null;
2187: fnd_msg_pub.add_exc_msg
2188: (p_pkg_name => 'PA_PROJECTS_MAINT_UTILS',
2189: p_procedure_name => pa_debug.g_err_stack );
2190: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
2191: -- 4537865
2192: x_error_message_code := SQLCODE ;

Line 2218: FROM pa_project_statuses ps, pa_projects_all pp

2214: WHERE class_category = p_class_category;
2215:
2216: CURSOR C2 IS
2217: SELECT ps.project_system_status_code
2218: FROM pa_project_statuses ps, pa_projects_all pp
2219: WHERE pp.project_id = p_project_id
2220: AND pp.project_status_code = ps.project_status_code;
2221:
2222: /* added cursor c3 for bug 2784433 */

Line 2231: FROM pa_projects_all ppa

2227: AND EXISTS (SELECT 'X'
2228: FROM pa_project_types_all pta
2229: WHERE pta.project_type_id = pvc.object_type_id
2230: AND EXISTS (SELECT 'X'
2231: FROM pa_projects_all ppa
2232: WHERE pta.project_type = ppa.project_type
2233: AND project_id = p_project_id));
2234:
2235: x_mandatory_flag VARCHAR2(1);

Line 2260: END PA_PROJECTS_MAINT_UTILS;

2256: RETURN x_mandatory_flag;
2257: END CLASS_CHECK_MANDATORY;
2258:
2259:
2260: END PA_PROJECTS_MAINT_UTILS;