DBA Data[Home] [Help]

APPS.PA_PROJECTS_MAINT_PUB dependencies on PA_PROJECTS_MAINT_PUB

Line 1: PACKAGE BODY PA_PROJECTS_MAINT_PUB AS

1: PACKAGE BODY PA_PROJECTS_MAINT_PUB AS
2: /* $Header: PARMPRPB.pls 120.4.12010000.4 2008/09/22 07:17:12 kjai ship $ */
3: G_PKG_NAME CONSTANT VARCHAR2(30) := 'PA_PROJECTS_MAINT_PUB';
4:
5: -- API name : create_project

Line 3: G_PKG_NAME CONSTANT VARCHAR2(30) := 'PA_PROJECTS_MAINT_PUB';

1: PACKAGE BODY PA_PROJECTS_MAINT_PUB AS
2: /* $Header: PARMPRPB.pls 120.4.12010000.4 2008/09/22 07:17:12 kjai ship $ */
3: G_PKG_NAME CONSTANT VARCHAR2(30) := 'PA_PROJECTS_MAINT_PUB';
4:
5: -- API name : create_project
6: -- Type : Public
7: -- Pre-reqs : None.

Line 176: --dbms_output.put_line('Starts here PA_PROJECTS_MAINT_PUB.CREATE_PROJECT ... ');

172: if (p_debug_mode = 'Y') then
173: pa_debug.debug('Create_Project PUB : Checking the api version number.');
174: end if;
175:
176: --dbms_output.put_line('Starts here PA_PROJECTS_MAINT_PUB.CREATE_PROJECT ... ');
177:
178: IF p_commit = FND_API.G_TRUE THEN
179: SAVEPOINT prm_create_project;
180: END IF;

Line 198: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.CREATE_PROJECT');

194: if (p_debug_mode = 'Y') then
195: pa_debug.debug('CREATE_PROJECT PUB : Initializing message stack.');
196: end if;
197:
198: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.CREATE_PROJECT');
199:
200: if FND_API.to_boolean(nvl(p_init_msg_list, FND_API.G_FALSE)) then
201: fnd_msg_pub.initialize;
202: end if;

Line 658: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

654: IF p_commit = FND_API.G_TRUE THEN
655: ROLLBACK TO prm_create_project;
656: END IF;
657: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
658: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
659: p_procedure_name => 'CREATE_PROJECT',
660: p_error_text => SUBSTRB(SQLERRM,1,240));
661: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
662:

Line 674: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

670: IF p_commit = FND_API.G_TRUE THEN
671: ROLLBACK TO prm_create_project;
672: END IF;
673: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
674: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
675: p_procedure_name => 'CREATE_PROJECT',
676: p_error_text => SUBSTRB(SQLERRM,1,240));
677: raise;
678:

Line 755: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.CREATE_CUSTOMER');

751: THEN
752: SAVEPOINT create_customer;
753: END IF;
754:
755: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.CREATE_CUSTOMER');
756:
757: if (p_debug_mode = 'Y') then
758: pa_debug.debug('Create_Customer PUB : checking API compatibility');
759: end if;

Line 876: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

872: IF p_commit = FND_API.G_TRUE THEN
873: ROLLBACK TO create_customer;
874: END IF;
875: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
876: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
877: p_procedure_name => 'CREATE_CUSTOMER',
878: p_error_text => SUBSTRB(SQLERRM,1,240));
879: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
880:

Line 892: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

888: IF p_commit = FND_API.G_TRUE THEN
889: ROLLBACK TO create_customer;
890: END IF;
891: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
892: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
893: p_procedure_name => 'CREATE_CUSTOMER',
894: p_error_text => SUBSTRB(SQLERRM,1,240));
895: raise;
896:

Line 1026: --dbms_output.put_line('Starts here PA_PROJECTS_MAINT_PUB.CREATE_PROJECT ... ');

1022: l_data VARCHAR2(250);
1023:
1024: BEGIN
1025:
1026: --dbms_output.put_line('Starts here PA_PROJECTS_MAINT_PUB.CREATE_PROJECT ... ');
1027:
1028: IF p_commit = FND_API.G_TRUE THEN
1029: SAVEPOINT update_project_basic_info;
1030: END IF;

Line 1032: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.update_project_basic_info');

1028: IF p_commit = FND_API.G_TRUE THEN
1029: SAVEPOINT update_project_basic_info;
1030: END IF;
1031:
1032: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.update_project_basic_info');
1033:
1034: --dbms_output.put_line('Starts here FND_API.COMPATIBLE_API_CALL ... ');
1035:
1036: if (p_debug_mode = 'Y') then

Line 1235: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

1231: IF p_commit = FND_API.G_TRUE THEN
1232: ROLLBACK TO update_project_basic_info;
1233: END IF;
1234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1235: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
1236: p_procedure_name => 'UPDATE_PROJECT_BASIC_INFO',
1237: p_error_text => SUBSTRB(SQLERRM,1,240));
1238: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1239:

Line 1251: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

1247: IF p_commit = FND_API.G_TRUE THEN
1248: ROLLBACK TO update_project_basic_info;
1249: END IF;
1250: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1251: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
1252: p_procedure_name => 'UPDATE_PROJECT_BASIC_INFO',
1253: p_error_text => SUBSTRB(SQLERRM,1,240));
1254: raise;
1255:

Line 1349: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.update_project_additional_info');

1345: IF p_commit = FND_API.G_TRUE THEN
1346: SAVEPOINT update_project_additional_info;
1347: END IF;
1348:
1349: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.update_project_additional_info');
1350:
1351: if (p_debug_mode = 'Y') then
1352: pa_debug.debug('Update_project_Additional_info PUB : Checking API Compatibility');
1353: end if;

Line 1523: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

1519: IF p_commit = FND_API.G_TRUE THEN
1520: ROLLBACK TO update_project_additional_info;
1521: END IF;
1522: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1523: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
1524: p_procedure_name => 'UPDATE_PROJECT_ADDITIONAL_INFO',
1525: p_error_text => SUBSTRB(SQLERRM,1,240));
1526: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1527:

Line 1540: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

1536: IF p_commit = FND_API.G_TRUE THEN
1537: ROLLBACK TO update_project_additional_info;
1538: END IF;
1539: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1540: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
1541: p_procedure_name => 'UPDATE_PROJECT_ADDITIONAL_INFO',
1542: p_error_text => SUBSTRB(SQLERRM,1,240));
1543: raise;
1544:

Line 1633: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.update_project_pipeline_info');

1629: IF p_commit = FND_API.G_TRUE THEN
1630: SAVEPOINT update_project_pipeline_info;
1631: END IF;
1632:
1633: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.update_project_pipeline_info');
1634:
1635: -- Start: Bug 4469624 - check for p_debug_mode before call to PA_DEBUG.WRITE
1636: if (p_debug_mode = 'Y') then
1637: PA_DEBUG.write (x_module => 'pa.plsql.PA_PROJECTS_MAINT_PUB.update_project_pipeline_info'

Line 1637: PA_DEBUG.write (x_module => 'pa.plsql.PA_PROJECTS_MAINT_PUB.update_project_pipeline_info'

1633: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.update_project_pipeline_info');
1634:
1635: -- Start: Bug 4469624 - check for p_debug_mode before call to PA_DEBUG.WRITE
1636: if (p_debug_mode = 'Y') then
1637: PA_DEBUG.write (x_module => 'pa.plsql.PA_PROJECTS_MAINT_PUB.update_project_pipeline_info'
1638: ,x_msg => 'Beginning of update_project_pipeline_info'
1639: ,x_log_level => 3);
1640: end if;
1641: -- End: Bug 4469624 - check for p_debug_mode before call to PA_DEBUG.WRITE

Line 1692: PA_DEBUG.write (x_module => 'pa.plsql.PA_PROJECTS_MAINT_PUB.update_project_pipeline_info'

1688: ,x_error_msg_code => l_error_msg_code);
1689:
1690: -- Start: Bug 4469624 - check for p_debug_mode before call to PA_DEBUG.WRITE
1691: if (p_debug_mode = 'Y') then
1692: PA_DEBUG.write (x_module => 'pa.plsql.PA_PROJECTS_MAINT_PUB.update_project_pipeline_info'
1693: ,x_msg => 'AFTER check probablity ... '||l_return_status
1694: ,x_log_level => 3);
1695: end if;
1696: -- End: Bug 4469624 - check for p_debug_mode before call to PA_DEBUG.WRITE

Line 1734: PA_DEBUG.write (x_module => 'pa.plsql.PA_PROJECTS_MAINT_PUB.update_project_pipeline_info'

1730: end if;
1731:
1732: -- Start: Bug 4469624 - check for p_debug_mode before call to PA_DEBUG.WRITE
1733: if (p_debug_mode = 'Y') then
1734: PA_DEBUG.write (x_module => 'pa.plsql.PA_PROJECTS_MAINT_PUB.update_project_pipeline_info'
1735: ,x_msg => 'Before calling PA_PROJECTS_MAINT_PVT.UPDATE_PROJECT_PIPELINE_INFO'
1736: ,x_log_level => 3);
1737: end if;
1738: -- End: Bug 4469624 - check for p_debug_mode before call to PA_DEBUG.WRITE

Line 1758: PA_DEBUG.write (x_module => 'pa.plsql.PA_PROJECTS_MAINT_PUB.update_project_pipeline_info'

1754: x_msg_data => l_msg_data);
1755:
1756: -- Start: Bug 4469624 - check for p_debug_mode before call to PA_DEBUG.WRITE
1757: if (p_debug_mode = 'Y') then
1758: PA_DEBUG.write (x_module => 'pa.plsql.PA_PROJECTS_MAINT_PUB.update_project_pipeline_info'
1759: ,x_msg => 'After calling PA_PROJECTS_MAINT_PVT.UPDATE_PROJECT_PIPELINE_INFO'
1760: ,x_log_level => 3);
1761: end if;
1762: -- End: Bug 4469624 - check for p_debug_mode before call to PA_DEBUG.WRITE

Line 1825: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

1821: IF p_commit = FND_API.G_TRUE THEN
1822: ROLLBACK TO update_project_pipeline_info;
1823: END IF;
1824: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1825: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
1826: p_procedure_name => 'UPDATE_PROJECT_PIPELINE_INFO',
1827: p_error_text => SUBSTRB(SQLERRM,1,240));
1828: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1829:

Line 1841: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

1837: IF p_commit = FND_API.G_TRUE THEN
1838: ROLLBACK TO update_project_pipeline_info;
1839: END IF;
1840: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1841: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
1842: p_procedure_name => 'UPDATE_PROJECT_PIPELINE_INFO',
1843: p_error_text => SUBSTRB(SQLERRM,1,240));
1844: raise;
1845:

Line 1946: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.create_classifications');

1942: IF p_commit = FND_API.G_TRUE THEN
1943: SAVEPOINT create_classifications;
1944: END IF;
1945:
1946: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.create_classifications');
1947:
1948: if (p_debug_mode = 'Y') then
1949: pa_debug.debug('Create_classifications PUB : Checking API compatibility');
1950: end if;

Line 1989: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

1985: p_msg_name => 'PA_AL_INVALID_CLASS_CATG_PROJE');
1986: x_msg_data := 'PA_AL_INVALID_CLASS_CATG_PROJE';
1987: x_return_status := 'E' ;
1988: WHEN OTHERS THEN
1989: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
1990: p_procedure_name => 'CREATE_CLASSIFICATIONS',
1991: p_error_text => SUBSTRB(SQLERRM,1,240));
1992: raise;
1993: END;

Line 2013: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

2009: p_msg_name => 'PA_CLASS_CATG_CODE_INVALID');
2010: x_msg_data := 'PA_CLASS_CATG_CODE_INVALID';
2011: x_return_status := 'E' ;
2012: WHEN OTHERS THEN
2013: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
2014: p_procedure_name => 'CREATE_CLASSIFICATIONS',
2015: p_error_text => SUBSTRB(SQLERRM,1,240));
2016: raise;
2017: END;

Line 2134: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

2130: IF p_commit = FND_API.G_TRUE THEN
2131: ROLLBACK TO create_classifications;
2132: END IF;
2133: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2134: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
2135: p_procedure_name => 'CREATE_CLASSIFICATIONS',
2136: p_error_text => SUBSTRB(SQLERRM,1,240));
2137: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2138:

Line 2150: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

2146: IF p_commit = FND_API.G_TRUE THEN
2147: ROLLBACK TO CREATE_CLASSIFICATIONS;
2148: END IF;
2149: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2150: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
2151: p_procedure_name => 'CREATE_CLASSIFICATIONS',
2152: p_error_text => SUBSTRB(SQLERRM,1,240));
2153: raise;
2154:

Line 2260: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.update_classifications');

2256: IF p_commit = FND_API.G_TRUE THEN
2257: SAVEPOINT update_classifications;
2258: END IF;
2259:
2260: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.update_classifications');
2261:
2262: if (p_debug_mode = 'Y') then
2263: pa_debug.debug('Update_classifications PUB : Checking API compatibility');
2264: end if;

Line 2303: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

2299: p_msg_name => 'PA_AL_INVALID_CLASS_CATG_PROJE');
2300: x_msg_data := 'PA_AL_INVALID_CLASS_CATG_PROJE';
2301: x_return_status := 'E' ;
2302: WHEN OTHERS THEN
2303: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
2304: p_procedure_name => 'UPDATE_CLASSIFICATIONS',
2305: p_error_text => SUBSTRB(SQLERRM,1,240));
2306: raise;
2307: END;

Line 2327: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

2323: p_msg_name => 'PA_CLASS_CATG_CODE_INVALID');
2324: x_msg_data := 'PA_CLASS_CATG_CODE_INVALID';
2325: x_return_status := 'E' ;
2326: WHEN OTHERS THEN
2327: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
2328: p_procedure_name => 'UPDATE_CLASSIFICATIONS',
2329: p_error_text => SUBSTRB(SQLERRM,1,240));
2330: raise;
2331: END;

Line 2411: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

2407: IF p_commit = FND_API.G_TRUE THEN
2408: ROLLBACK TO update_classifications;
2409: END IF;
2410: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2411: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
2412: p_procedure_name => 'UPDATE_CLASSIFICATIONS',
2413: p_error_text => SUBSTRB(SQLERRM,1,240));
2414: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2415:

Line 2427: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

2423: IF p_commit = FND_API.G_TRUE THEN
2424: ROLLBACK TO UPDATE_CLASSIFICATIONS;
2425: END IF;
2426: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2427: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
2428: p_procedure_name => 'UPDATE_CLASSIFICATIONS',
2429: p_error_text => SUBSTRB(SQLERRM,1,240));
2430: raise;
2431:

Line 2503: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.delete_classifications');

2499: IF p_commit = FND_API.G_TRUE THEN
2500: SAVEPOINT delete_classifications;
2501: END IF;
2502:
2503: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.delete_classifications');
2504:
2505: if (p_debug_mode = 'Y') then
2506: pa_debug.debug('delete_classifications PUB : Checking API Compatibility');
2507: end if;

Line 2588: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

2584: IF p_commit = FND_API.G_TRUE THEN
2585: ROLLBACK TO delete_classifications;
2586: END IF;
2587: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2588: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
2589: p_procedure_name => 'DELETE_CLASSIFICATIONS',
2590: p_error_text => SUBSTRB(SQLERRM,1,240));
2591: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2592:

Line 2604: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

2600: IF p_commit = FND_API.G_TRUE THEN
2601: ROLLBACK TO delete_classifications;
2602: END IF;
2603: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2604: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
2605: p_procedure_name => 'DELETE_CLASSIFICATIONS',
2606: p_error_text => SUBSTRB(SQLERRM,1,240));
2607: raise;
2608:

Line 2700: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.update_project_staffing_info');

2696: IF p_commit = FND_API.G_TRUE THEN
2697: SAVEPOINT update_project_staffing_info;
2698: END IF;
2699:
2700: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.update_project_staffing_info');
2701:
2702: if (p_debug_mode = 'Y') then
2703: pa_debug.debug('Update_project_staffing_info PUB : Checking API Compatibility');
2704: end if;

Line 2997: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

2993: EXCEPTION WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2994: IF p_commit = FND_API.G_TRUE THEN
2995: ROLLBACK TO update_project_staffing_info;
2996: END IF;
2997: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
2998: p_procedure_name => 'UPDATE_PROJECT_STAFFING_INFO',
2999: p_error_text => SUBSTRB(SQLERRM,1,240));
3000: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3001:

Line 3013: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

3009: IF p_commit = FND_API.G_TRUE THEN
3010: ROLLBACK TO update_project_staffing_info;
3011: END IF;
3012: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3013: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
3014: p_procedure_name => 'UPDATE_PROJECT_STAFFING_INFO',
3015: p_error_text => SUBSTRB(SQLERRM,1,240));
3016: raise;
3017:

Line 3117: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.Create_Org_Role');

3113: FROM pa_project_role_types_b /* Bug#2788814-Changed pa_project_role_types_vl to pa_project_role_types_b */
3114: WHERE project_role_id = c_project_role_id;
3115:
3116: BEGIN
3117: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.Create_Org_Role');
3118:
3119: if (p_debug_mode = 'Y') then
3120: pa_debug.debug('PA_PROJECTS_MAINT_PUB.Create_Org_Role BEGIN');
3121: end if;

Line 3120: pa_debug.debug('PA_PROJECTS_MAINT_PUB.Create_Org_Role BEGIN');

3116: BEGIN
3117: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.Create_Org_Role');
3118:
3119: if (p_debug_mode = 'Y') then
3120: pa_debug.debug('PA_PROJECTS_MAINT_PUB.Create_Org_Role BEGIN');
3121: end if;
3122:
3123: if p_commit = FND_API.G_TRUE then
3124: savepoint create_org_role;

Line 3309: pa_debug.debug('PA_PROJECTS_MAINT_PUB.Create_Org_Role END');

3305: commit work;
3306: end if;
3307:
3308: if (p_debug_mode = 'Y') then
3309: pa_debug.debug('PA_PROJECTS_MAINT_PUB.Create_Org_Role END');
3310: end if;
3311:
3312: EXCEPTION
3313: when FND_API.G_EXC_ERROR then

Line 3323: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

3319: if p_commit = FND_API.G_TRUE then
3320: rollback to create_org_role;
3321: end if;
3322: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3323: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
3324: p_procedure_name => 'Create_Org_Role',
3325: p_error_text => SUBSTRB(SQLERRM,1,240));
3326: when OTHERS then
3327: if p_commit = FND_API.G_TRUE then

Line 3331: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

3327: if p_commit = FND_API.G_TRUE then
3328: rollback to create_org_role;
3329: end if;
3330: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3331: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',
3332: p_procedure_name => 'Create_Org_Role',
3333: p_error_text => SUBSTRB(SQLERRM,1,240));
3334: raise;
3335: END CREATE_ORG_ROLE;

Line 3462: Pa_Debug.g_err_stage:= 'PA_PROJECTS_MAINT_PUB : project_status_change :

3458: ( p_new_status_code IS NULL OR p_new_status_code = FND_API.G_MISS_CHAR )
3459: )
3460: THEN
3461: IF l_debug_mode = 'Y' THEN
3462: Pa_Debug.g_err_stage:= 'PA_PROJECTS_MAINT_PUB : project_status_change :
3463: p_project_id, p_new_status_code are NULL';
3464: Pa_Debug.WRITE(G_PKG_NAME,Pa_Debug.g_err_stage,
3465: l_debug_level3);
3466: END IF;

Line 3775: x_msg_data := ' PA_PROJECTS_MAINT_PUB : project_status_change : NULL parameters passed';

3771:
3772: WHEN Invalid_Arg_Exc THEN
3773: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3774: x_msg_count := 1;
3775: x_msg_data := ' PA_PROJECTS_MAINT_PUB : project_status_change : NULL parameters passed';
3776:
3777: IF p_commit = FND_API.G_TRUE THEN
3778: ROLLBACK TO project_status_change;
3779: END IF;

Line 3782: ( p_pkg_name => 'PA_PROJECTS_MAINT_PUB'

3778: ROLLBACK TO project_status_change;
3779: END IF;
3780:
3781: Fnd_Msg_Pub.add_exc_msg
3782: ( p_pkg_name => 'PA_PROJECTS_MAINT_PUB'
3783: , p_procedure_name => 'project_status_change'
3784: , p_error_text => x_msg_data);
3785:
3786: IF l_debug_mode = 'Y' THEN

Line 3804: ( p_pkg_name => 'PA_PROJECTS_MAINT_PUB'

3800: ROLLBACK TO project_status_change;
3801: END IF;
3802:
3803: Fnd_Msg_Pub.add_exc_msg
3804: ( p_pkg_name => 'PA_PROJECTS_MAINT_PUB'
3805: , p_procedure_name => 'project_status_change'
3806: , p_error_text => x_msg_data);
3807:
3808: IF l_debug_mode = 'Y' THEN

Line 3819: END PA_PROJECTS_MAINT_PUB;

3815:
3816: END project_status_change;
3817:
3818:
3819: END PA_PROJECTS_MAINT_PUB;