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.8.12020000.2 2012/07/19 09:58:18 admarath 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.8.12020000.2 2012/07/19 09:58:18 admarath 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 2015: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECTS_MAINT_PUB',

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

3120: BEGIN
3121: pa_debug.init_err_stack('PA_PROJECTS_MAINT_PUB.Create_Org_Role');
3122:
3123: if (p_debug_mode = 'Y') then
3124: pa_debug.debug('PA_PROJECTS_MAINT_PUB.Create_Org_Role BEGIN');
3125: end if;
3126:
3127: if p_commit = FND_API.G_TRUE then
3128: savepoint create_org_role;

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

3309: commit work;
3310: end if;
3311:
3312: if (p_debug_mode = 'Y') then
3313: pa_debug.debug('PA_PROJECTS_MAINT_PUB.Create_Org_Role END');
3314: end if;
3315:
3316: EXCEPTION
3317: when FND_API.G_EXC_ERROR then

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

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

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

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

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

3463: ( p_new_status_code IS NULL OR p_new_status_code = FND_API.G_MISS_CHAR )
3464: )
3465: THEN
3466: IF l_debug_mode = 'Y' THEN
3467: Pa_Debug.g_err_stage:= 'PA_PROJECTS_MAINT_PUB : project_status_change :
3468: p_project_id, p_new_status_code are NULL';
3469: Pa_Debug.WRITE(G_PKG_NAME,Pa_Debug.g_err_stage,
3470: l_debug_level3);
3471: END IF;

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

3798:
3799: WHEN Invalid_Arg_Exc THEN
3800: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3801: x_msg_count := 1;
3802: x_msg_data := ' PA_PROJECTS_MAINT_PUB : project_status_change : NULL parameters passed';
3803:
3804: IF p_commit = FND_API.G_TRUE THEN
3805: ROLLBACK TO project_status_change;
3806: END IF;

Line 3809: ( p_pkg_name => 'PA_PROJECTS_MAINT_PUB'

3805: ROLLBACK TO project_status_change;
3806: END IF;
3807:
3808: Fnd_Msg_Pub.add_exc_msg
3809: ( p_pkg_name => 'PA_PROJECTS_MAINT_PUB'
3810: , p_procedure_name => 'project_status_change'
3811: , p_error_text => x_msg_data);
3812:
3813: IF l_debug_mode = 'Y' THEN

Line 3831: ( p_pkg_name => 'PA_PROJECTS_MAINT_PUB'

3827: ROLLBACK TO project_status_change;
3828: END IF;
3829:
3830: Fnd_Msg_Pub.add_exc_msg
3831: ( p_pkg_name => 'PA_PROJECTS_MAINT_PUB'
3832: , p_procedure_name => 'project_status_change'
3833: , p_error_text => x_msg_data);
3834:
3835: IF l_debug_mode = 'Y' THEN

Line 3846: END PA_PROJECTS_MAINT_PUB;

3842:
3843: END project_status_change;
3844:
3845:
3846: END PA_PROJECTS_MAINT_PUB;