DBA Data[Home] [Help]

APPS.PA_CUSTOMERS_CONTACTS_PVT dependencies on PA_CUSTOMERS_CONTACTS_PVT

Line 1: PACKAGE BODY PA_CUSTOMERS_CONTACTS_PVT AS

1: PACKAGE BODY PA_CUSTOMERS_CONTACTS_PVT AS
2: /* $Header: PARPCCVB.pls 120.6 2007/02/06 09:55:26 dthakker ship $ */
3:
4:
5: -- Global constant

Line 6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'PA_CUSTOMERS_CONTACTS_PVT';

2: /* $Header: PARPCCVB.pls 120.6 2007/02/06 09:55:26 dthakker ship $ */
3:
4:
5: -- Global constant
6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'PA_CUSTOMERS_CONTACTS_PVT';
7:
8:
9: -- API name : Create_Project_Customer
10: -- Type : Private

Line 102: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Create_Project_Customer BEGIN');

98:
99: l_temp NUMBER;
100: BEGIN
101: if (p_debug_mode = 'Y') then
102: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Create_Project_Customer BEGIN');
103: end if;
104:
105: if p_commit = FND_API.G_TRUE then
106: savepoint create_project_customer_pvt;

Line 114: PA_CUSTOMERS_CONTACTS_PVT.VALIDATE_CUSTOMER

110: if (p_debug_mode = 'Y') then
111: pa_debug.debug('Performing validation...');
112: end if;
113: --dbms_output.put_line('Before calling VALIDATE_CUSTOMER p_customer_id '||p_customer_id);
114: PA_CUSTOMERS_CONTACTS_PVT.VALIDATE_CUSTOMER
115: ( p_validation_level => p_validation_level
116: ,p_calling_module => p_calling_module
117: ,p_debug_mode => p_debug_mode
118: ,p_max_msg_count => p_max_msg_count

Line 304: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Create_Project_Customer END');

300: commit work;
301: end if;
302:
303: if (p_debug_mode = 'Y') then
304: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Create_Project_Customer END');
305: end if;
306:
307: EXCEPTION
308: when FND_API.G_EXC_ERROR then

Line 318: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',

314: if p_commit = FND_API.G_TRUE then
315: rollback to create_project_customer_pvt;
316: end if;
317: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
318: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',
319: p_procedure_name => 'Create_Project_Customer',
320: p_error_text => SUBSTRB(SQLERRM,1,240));
321: raise;
322: END CREATE_PROJECT_CUSTOMER;

Line 412: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Update_Project_Customer BEGIN');

408: --dbms_output.put_line('Value of p_validate_only'||p_validate_only);
409: --dbms_output.put_line('Value of p_validation_level'||p_validation_level);
410:
411: if (p_debug_mode = 'Y') then
412: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Update_Project_Customer BEGIN');
413: end if;
414:
415: if p_commit = FND_API.G_TRUE then
416: savepoint update_project_customer_pvt;

Line 510: PA_CUSTOMERS_CONTACTS_PVT.VALIDATE_CUSTOMER

506: pa_debug.debug('Performing validation...');
507: end if;
508: --dbms_output.put_line('value of p_project_relationship_code in pvt '||p_project_relationship_code);
509: --dbms_output.put_line('value of p_calling_module passed from pvt to validate'||p_calling_module);
510: PA_CUSTOMERS_CONTACTS_PVT.VALIDATE_CUSTOMER
511: ( p_validation_level => p_validation_level
512: ,p_calling_module => p_calling_module
513: ,p_debug_mode => p_debug_mode
514: ,p_max_msg_count => p_max_msg_count

Line 633: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Update_Project_Customer END');

629: commit work;
630: end if;
631:
632: if (p_debug_mode = 'Y') then
633: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Update_Project_Customer END');
634: end if;
635:
636: EXCEPTION
637: when FND_API.G_EXC_ERROR then

Line 647: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',

643: if p_commit = FND_API.G_TRUE then
644: rollback to update_project_customer_pvt;
645: end if;
646: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
647: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',
648: p_procedure_name => 'Update_Project_Customer',
649: p_error_text => SUBSTRB(SQLERRM,1,240));
650: raise;
651: END UPDATE_PROJECT_CUSTOMER;

Line 761: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Delete_Project_Customer BEGIN');

757: /* End of cursors added for bug 3101990 */
758:
759: BEGIN
760: if (p_debug_mode = 'Y') then
761: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Delete_Project_Customer BEGIN');
762: end if;
763:
764: if p_commit = FND_API.G_TRUE then
765: savepoint delete_project_customer_pvt;

Line 841: PA_CUSTOMERS_CONTACTS_PVT.VALIDATE_CUSTOMER

837: if (p_debug_mode = 'Y') then
838: pa_debug.debug('Performing validation...');
839: end if;
840:
841: PA_CUSTOMERS_CONTACTS_PVT.VALIDATE_CUSTOMER
842: ( p_validation_level => p_validation_level
843: ,p_calling_module => p_calling_module
844: ,p_debug_mode => p_debug_mode
845: ,p_max_msg_count => p_max_msg_count

Line 859: PA_CUSTOMERS_CONTACTS_PVT.DELETE_ALL_CONTACTS

855: raise FND_API.G_EXC_ERROR;
856: end if;
857: end if;
858:
859: PA_CUSTOMERS_CONTACTS_PVT.DELETE_ALL_CONTACTS
860: ( p_commit => FND_API.G_FALSE
861: ,p_validate_only => p_validate_only
862: ,p_validation_level => p_validation_level
863: ,p_calling_module => p_calling_module

Line 952: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Delete_Project_Customer END');

948: commit work;
949: end if;
950:
951: if (p_debug_mode = 'Y') then
952: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Delete_Project_Customer END');
953: end if;
954:
955: EXCEPTION
956: when FND_API.G_EXC_ERROR then

Line 966: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',

962: if p_commit = FND_API.G_TRUE then
963: rollback to delete_project_customer_pvt;
964: end if;
965: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
966: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',
967: p_procedure_name => 'Delete_Project_Customer',
968: p_error_text => SUBSTRB(SQLERRM,1,240));
969: raise;
970: END DELETE_PROJECT_CUSTOMER;

Line 1018: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Create_Customer_Contact BEGIN');

1014: l_last_update_login NUMBER(15);
1015: l_rowid VARCHAR2(250);
1016: BEGIN
1017: if (p_debug_mode = 'Y') then
1018: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Create_Customer_Contact BEGIN');
1019: end if;
1020:
1021: if p_commit = FND_API.G_TRUE then
1022: savepoint create_customer_contact_pvt;

Line 1030: PA_CUSTOMERS_CONTACTS_PVT.VALIDATE_CONTACT

1026: if (p_debug_mode = 'Y') then
1027: pa_debug.debug('Performing validation...');
1028: end if;
1029:
1030: PA_CUSTOMERS_CONTACTS_PVT.VALIDATE_CONTACT
1031: ( p_validation_level => p_validation_level
1032: ,p_calling_module => p_calling_module
1033: ,p_debug_mode => p_debug_mode
1034: ,p_max_msg_count => p_max_msg_count

Line 1079: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Create_Customer_Contact END');

1075: commit work;
1076: end if;
1077:
1078: if (p_debug_mode = 'Y') then
1079: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Create_Customer_Contact END');
1080: end if;
1081:
1082: EXCEPTION
1083: when FND_API.G_EXC_ERROR then

Line 1093: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',

1089: if p_commit = FND_API.G_TRUE then
1090: rollback to create_customer_contact_pvt;
1091: end if;
1092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1093: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',
1094: p_procedure_name => 'Create_Customer_Contact',
1095: p_error_text => SUBSTRB(SQLERRM,1,240));
1096: raise;
1097: END CREATE_CUSTOMER_CONTACT;

Line 1152: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Update_Customer_Contact BEGIN');

1148: l_last_updated_by NUMBER(15);
1149: l_last_update_login NUMBER(15);
1150: BEGIN
1151: if (p_debug_mode = 'Y') then
1152: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Update_Customer_Contact BEGIN');
1153: end if;
1154:
1155: if p_commit = FND_API.G_TRUE then
1156: savepoint update_customer_contact_pvt;

Line 1230: PA_CUSTOMERS_CONTACTS_PVT.VALIDATE_CONTACT

1226: if (p_debug_mode = 'Y') then
1227: pa_debug.debug('Performing validation...');
1228: end if;
1229:
1230: PA_CUSTOMERS_CONTACTS_PVT.VALIDATE_CONTACT
1231: ( p_validation_level => p_validation_level
1232: ,p_calling_module => p_calling_module
1233: ,p_debug_mode => p_debug_mode
1234: ,p_max_msg_count => p_max_msg_count

Line 1276: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Update_Customer_Contact END');

1272: commit work;
1273: end if;
1274:
1275: if (p_debug_mode = 'Y') then
1276: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Update_Customer_Contact END');
1277: end if;
1278:
1279: EXCEPTION
1280: when FND_API.G_EXC_ERROR then

Line 1290: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',

1286: if p_commit = FND_API.G_TRUE then
1287: rollback to update_customer_contact_pvt;
1288: end if;
1289: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1290: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',
1291: p_procedure_name => 'Update_Customer_Contact',
1292: p_error_text => SUBSTRB(SQLERRM,1,240));
1293: raise;
1294: END UPDATE_CUSTOMER_CONTACT;

Line 1348: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Delete_Customer_Contact BEGIN');

1344: contact_id = c_contact_id AND
1345: project_contact_type_code = c_project_contact_type_code;
1346: BEGIN
1347: if (p_debug_mode = 'Y') then
1348: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Delete_Customer_Contact BEGIN');
1349: end if;
1350:
1351: if p_commit = FND_API.G_TRUE then
1352: savepoint delete_customer_contact_pvt;

Line 1442: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Delete_Customer_Contact END');

1438: commit work;
1439: end if;
1440:
1441: if (p_debug_mode = 'Y') then
1442: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Delete_Customer_Contact END');
1443: end if;
1444:
1445: EXCEPTION
1446: when FND_API.G_EXC_ERROR then

Line 1456: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',

1452: if p_commit = FND_API.G_TRUE then
1453: rollback to delete_customer_contact_pvt;
1454: end if;
1455: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1456: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',
1457: p_procedure_name => 'Delete_Customer_Contact',
1458: p_error_text => SUBSTRB(SQLERRM,1,240));
1459: raise;
1460: END DELETE_CUSTOMER_CONTACT;

Line 1505: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Delete_All_Contacts BEGIN');

1501: customer_id = c_customer_id;
1502: l_recinfo C%ROWTYPE;
1503: BEGIN
1504: if (p_debug_mode = 'Y') then
1505: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Delete_All_Contacts BEGIN');
1506: end if;
1507:
1508: if p_commit = FND_API.G_TRUE then
1509: savepoint delete_all_contacts_pvt;

Line 1513: PA_CUSTOMERS_CONTACTS_PVT.DELETE_CUSTOMER_CONTACT

1509: savepoint delete_all_contacts_pvt;
1510: end if;
1511:
1512: for l_recinfo in C(p_project_id, p_customer_id) loop
1513: PA_CUSTOMERS_CONTACTS_PVT.DELETE_CUSTOMER_CONTACT
1514: ( p_commit => FND_API.G_FALSE
1515: ,p_validate_only => p_validate_only
1516: ,p_validation_level => p_validation_level
1517: ,p_calling_module => p_calling_module

Line 1545: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Delete_All_Contacts END');

1541: commit work;
1542: end if;
1543:
1544: if (p_debug_mode = 'Y') then
1545: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Delete_All_Contacts END');
1546: end if;
1547:
1548: EXCEPTION
1549: when FND_API.G_EXC_ERROR then

Line 1559: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',

1555: if p_commit = FND_API.G_TRUE then
1556: rollback to delete_all_contacts_pvt;
1557: end if;
1558: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1559: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',
1560: p_procedure_name => 'Delete_All_Contacts',
1561: p_error_text => SUBSTRB(SQLERRM,1,240));
1562: raise;
1563: END DELETE_ALL_CONTACTS;

Line 1613: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Validate_Customer BEGIN');

1609: l_error_msg_code VARCHAR2(250);
1610: l_bill_another_project_flag VARCHAR2(1);
1611: BEGIN
1612: if (p_debug_mode = 'Y') then
1613: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Validate_Customer BEGIN');
1614: end if;
1615: --dbms_output.put_line('value of p_action'||p_action);
1616: --dbms_output.put_line('value of p_customer_id'||p_customer_id);
1617:

Line 1758: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Validate_Customer END');

1754: end if;
1755: end if;
1756:
1757: if (p_debug_mode = 'Y') then
1758: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Validate_Customer END');
1759: end if;
1760:
1761: EXCEPTION
1762: when others then

Line 1763: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',

1759: end if;
1760:
1761: EXCEPTION
1762: when others then
1763: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',
1764: p_procedure_name => 'Validate_Customer',
1765: p_error_text => SUBSTRB(SQLERRM,1,240));
1766: raise;
1767: END VALIDATE_CUSTOMER;

Line 1812: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Validate_Contact BEGIN');

1808: contact_id = c_contact_id AND
1809: project_contact_type_code = c_project_contact_type_code;
1810: BEGIN
1811: if (p_debug_mode = 'Y') then
1812: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Validate_Contact BEGIN');
1813: end if;
1814:
1815: if ((p_action = 'INSERT') OR (p_action = 'UPDATE')) then
1816: if p_action = 'UPDATE' then

Line 1844: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Validate_Contact END');

1840: end if;
1841: end if;
1842:
1843: if (p_debug_mode = 'Y') then
1844: pa_debug.debug('PA_CUSTOMERS_CONTACTS_PVT.Validate_Contact END');
1845: end if;
1846:
1847: EXCEPTION
1848: when FND_API.G_EXC_UNEXPECTED_ERROR then

Line 1849: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',

1845: end if;
1846:
1847: EXCEPTION
1848: when FND_API.G_EXC_UNEXPECTED_ERROR then
1849: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',
1850: p_procedure_name => 'Validate_Contact',
1851: p_error_text => SUBSTRB(SQLERRM,1,240));
1852: when others then
1853: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',

Line 1853: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',

1849: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',
1850: p_procedure_name => 'Validate_Contact',
1851: p_error_text => SUBSTRB(SQLERRM,1,240));
1852: when others then
1853: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_CUSTOMERS_CONTACTS_PVT',
1854: p_procedure_name => 'Validate_Contact',
1855: p_error_text => SUBSTRB(SQLERRM,1,240));
1856: raise;
1857: END VALIDATE_CONTACT;

Line 1859: END PA_CUSTOMERS_CONTACTS_PVT;

1855: p_error_text => SUBSTRB(SQLERRM,1,240));
1856: raise;
1857: END VALIDATE_CONTACT;
1858:
1859: END PA_CUSTOMERS_CONTACTS_PVT;