329: END IF;
330:
331: -- Initialize Message Stack if required
332: IF fnd_api.to_boolean(p_init_msg_list) THEN
333: fnd_msg_pub.initialize;
334: END IF;
335:
336: -- Initialize Return Status
337: x_return_status := fnd_api.g_ret_sts_success;
586: IF l_debug THEN
587: debug('Exception: SQLCODE = ' || SQLCODE || ' : SQLERRM = ' || SQLERRM, l_api_name, fnd_log.level_unexpected);
588: END IF;
589: x_return_status := fnd_api.g_ret_sts_unexp_error;
590: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
591: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
592: END IF;
593: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
594: ROLLBACK TO resolve_address_pub;
587: debug('Exception: SQLCODE = ' || SQLCODE || ' : SQLERRM = ' || SQLERRM, l_api_name, fnd_log.level_unexpected);
588: END IF;
589: x_return_status := fnd_api.g_ret_sts_unexp_error;
590: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
591: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
592: END IF;
593: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
594: ROLLBACK TO resolve_address_pub;
595: END resolve_address;
589: x_return_status := fnd_api.g_ret_sts_unexp_error;
590: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
591: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
592: END IF;
593: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
594: ROLLBACK TO resolve_address_pub;
595: END resolve_address;
596:
597: FUNCTION are_addresses_equal(
861: END IF;
862:
863: -- Initialize Message Stack if required
864: IF fnd_api.to_boolean(p_init_msg_list) THEN
865: fnd_msg_pub.initialize;
866: END IF;
867:
868: -- Initialize Return Status
869: x_return_status := fnd_api.g_ret_sts_success;
910: , x_location_id => p_address.location_id
911: );
912: IF x_return_status <> fnd_api.g_ret_sts_success THEN
913: IF l_debug THEN
914: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
915: debug('HZ_LOCATION_V2PUB.CREATE returned error: Error = ' || fnd_msg_pub.get(fnd_msg_pub.g_last), l_api_name, fnd_log.level_error);
916: END IF;
917: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
918: RAISE fnd_api.g_exc_unexpected_error;
911: );
912: IF x_return_status <> fnd_api.g_ret_sts_success THEN
913: IF l_debug THEN
914: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
915: debug('HZ_LOCATION_V2PUB.CREATE returned error: Error = ' || fnd_msg_pub.get(fnd_msg_pub.g_last), l_api_name, fnd_log.level_error);
916: END IF;
917: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
918: RAISE fnd_api.g_exc_unexpected_error;
919: END IF;
956: );
957:
958: IF x_return_status <> fnd_api.g_ret_sts_success THEN
959: IF l_debug THEN
960: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
961: debug('HZ_PARTY_V2PUB.CREATE returned error: Error = ' || fnd_msg_pub.get(fnd_msg_pub.g_last), l_api_name, fnd_log.level_error);
962: END IF;
963: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
964: RAISE fnd_api.g_exc_unexpected_error;
957:
958: IF x_return_status <> fnd_api.g_ret_sts_success THEN
959: IF l_debug THEN
960: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
961: debug('HZ_PARTY_V2PUB.CREATE returned error: Error = ' || fnd_msg_pub.get(fnd_msg_pub.g_last), l_api_name, fnd_log.level_error);
962: END IF;
963: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
964: RAISE fnd_api.g_exc_unexpected_error;
965: END IF;
1004: );
1005:
1006: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1007: IF l_debug THEN
1008: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
1009: debug('HZ_PARTY_SITE_V2PUB.CREATE returned error: Error = ' || fnd_msg_pub.get(fnd_msg_pub.g_last), l_api_name, fnd_log.level_error);
1010: END IF;
1011: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
1012: RAISE fnd_api.g_exc_unexpected_error;
1005:
1006: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1007: IF l_debug THEN
1008: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
1009: debug('HZ_PARTY_SITE_V2PUB.CREATE returned error: Error = ' || fnd_msg_pub.get(fnd_msg_pub.g_last), l_api_name, fnd_log.level_error);
1010: END IF;
1011: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
1012: RAISE fnd_api.g_exc_unexpected_error;
1013: END IF;
1023: END IF;
1024: EXCEPTION
1025: WHEN fnd_api.g_exc_error THEN
1026: IF l_debug THEN
1027: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
1028: debug('Expected Error: ' || x_msg_data, l_api_name, fnd_log.level_error);
1029: END IF;
1030:
1031: -- ROLLBACK TO create_party;
1029: END IF;
1030:
1031: -- ROLLBACK TO create_party;
1032: x_return_status := fnd_api.g_ret_sts_error;
1033: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1034: WHEN fnd_api.g_exc_unexpected_error THEN
1035: IF l_debug THEN
1036: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
1037: debug('Unexpected Error: ' || x_msg_data, l_api_name, fnd_log.level_unexpected);
1032: x_return_status := fnd_api.g_ret_sts_error;
1033: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1034: WHEN fnd_api.g_exc_unexpected_error THEN
1035: IF l_debug THEN
1036: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
1037: debug('Unexpected Error: ' || x_msg_data, l_api_name, fnd_log.level_unexpected);
1038: END IF;
1039:
1040: -- ROLLBACK TO create_party;
1038: END IF;
1039:
1040: -- ROLLBACK TO create_party;
1041: x_return_status := fnd_api.g_ret_sts_unexp_error;
1042: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1043: WHEN OTHERS THEN
1044: IF l_debug THEN
1045: debug('Exception: SQLCODE = ' || SQLCODE || ' : SQLERRM = ' || SQLERRM, l_api_name, fnd_log.level_unexpected);
1046: END IF;
1046: END IF;
1047:
1048: -- ROLLBACK TO create_party;
1049: x_return_status := fnd_api.g_ret_sts_unexp_error;
1050: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1051: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
1052: END IF;
1053: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1054: END create_resource_party_link;
1047:
1048: -- ROLLBACK TO create_party;
1049: x_return_status := fnd_api.g_ret_sts_unexp_error;
1050: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1051: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
1052: END IF;
1053: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1054: END create_resource_party_link;
1055:
1049: x_return_status := fnd_api.g_ret_sts_unexp_error;
1050: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1051: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
1052: END IF;
1053: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1054: END create_resource_party_link;
1055:
1056: PROCEDURE get_resource_address(
1057: p_api_version IN NUMBER
1091: END IF;
1092:
1093: -- Initialize Message Stack if required
1094: IF fnd_api.to_boolean(p_init_msg_list) THEN
1095: fnd_msg_pub.initialize;
1096: END IF;
1097:
1098: -- Initialize Return Status
1099: x_return_status := fnd_api.g_ret_sts_success;
1255: END IF;
1256: EXCEPTION
1257: WHEN fnd_api.g_exc_error THEN
1258: IF l_debug THEN
1259: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
1260: debug('Expected Error: ' || x_msg_data, l_api_name, fnd_log.level_error);
1261: END IF;
1262:
1263: -- ROLLBACK TO resource_party_info;
1261: END IF;
1262:
1263: -- ROLLBACK TO resource_party_info;
1264: x_return_status := fnd_api.g_ret_sts_error;
1265: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1266: WHEN fnd_api.g_exc_unexpected_error THEN
1267: IF l_debug THEN
1268: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
1269: debug('Unexpected Error: ' || x_msg_data, l_api_name, fnd_log.level_unexpected);
1264: x_return_status := fnd_api.g_ret_sts_error;
1265: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1266: WHEN fnd_api.g_exc_unexpected_error THEN
1267: IF l_debug THEN
1268: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
1269: debug('Unexpected Error: ' || x_msg_data, l_api_name, fnd_log.level_unexpected);
1270: END IF;
1271:
1272: -- ROLLBACK TO resource_party_info;
1270: END IF;
1271:
1272: -- ROLLBACK TO resource_party_info;
1273: x_return_status := fnd_api.g_ret_sts_unexp_error;
1274: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1275: WHEN OTHERS THEN
1276: IF l_debug THEN
1277: debug('Exception: SQLCODE = ' || SQLCODE || ' : SQLERRM = ' || SQLERRM, l_api_name, fnd_log.level_unexpected);
1278: END IF;
1278: END IF;
1279:
1280: -- ROLLBACK TO resource_party_info;
1281: x_return_status := fnd_api.g_ret_sts_unexp_error;
1282: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1283: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
1284: END IF;
1285: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1286: END get_resource_address;
1279:
1280: -- ROLLBACK TO resource_party_info;
1281: x_return_status := fnd_api.g_ret_sts_unexp_error;
1282: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1283: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
1284: END IF;
1285: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1286: END get_resource_address;
1287:
1281: x_return_status := fnd_api.g_ret_sts_unexp_error;
1282: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1283: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
1284: END IF;
1285: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1286: END get_resource_address;
1287:
1288: PROCEDURE get_resource_party_info(
1289: p_api_version IN NUMBER
1363: END IF;
1364:
1365: -- Initialize Message Stack if required
1366: IF fnd_api.to_boolean(p_init_msg_list) THEN
1367: fnd_msg_pub.initialize;
1368: END IF;
1369:
1370: -- Initialize Return Status
1371: x_return_status := fnd_api.g_ret_sts_success;
1423: );
1424:
1425: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1426: IF l_debug THEN
1427: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
1428: debug('HZ_LOCATION_V2PUB.CREATE returned error: Error = ' || fnd_msg_pub.get(fnd_msg_pub.g_last), l_api_name, fnd_log.level_error);
1429: END IF;
1430:
1431: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
1424:
1425: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1426: IF l_debug THEN
1427: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
1428: debug('HZ_LOCATION_V2PUB.CREATE returned error: Error = ' || fnd_msg_pub.get(fnd_msg_pub.g_last), l_api_name, fnd_log.level_error);
1429: END IF;
1430:
1431: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
1432:
1471: );
1472:
1473: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1474: IF l_debug THEN
1475: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
1476: debug('HZ_PARTY_V2PUB.CREATE returned error: Error = ' || fnd_msg_pub.get(fnd_msg_pub.g_last), l_api_name, fnd_log.level_error);
1477: END IF;
1478: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
1479: RAISE fnd_api.g_exc_unexpected_error;
1472:
1473: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1474: IF l_debug THEN
1475: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
1476: debug('HZ_PARTY_V2PUB.CREATE returned error: Error = ' || fnd_msg_pub.get(fnd_msg_pub.g_last), l_api_name, fnd_log.level_error);
1477: END IF;
1478: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
1479: RAISE fnd_api.g_exc_unexpected_error;
1480: END IF;
1519: );
1520:
1521: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1522: IF l_debug THEN
1523: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
1524: debug('HZ_PARTY_SITE_V2PUB.CREATE returned error: Error = ' || fnd_msg_pub.get(fnd_msg_pub.g_last), l_api_name, fnd_log.level_error);
1525: END IF;
1526: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
1527: RAISE fnd_api.g_exc_unexpected_error;
1520:
1521: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1522: IF l_debug THEN
1523: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
1524: debug('HZ_PARTY_SITE_V2PUB.CREATE returned error: Error = ' || fnd_msg_pub.get(fnd_msg_pub.g_last), l_api_name, fnd_log.level_error);
1525: END IF;
1526: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
1527: RAISE fnd_api.g_exc_unexpected_error;
1528: END IF;
1540:
1541: EXCEPTION
1542: WHEN fnd_api.g_exc_error THEN
1543: IF l_debug THEN
1544: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
1545: debug('Expected Error: ' || x_msg_data, l_api_name, fnd_log.level_error);
1546: END IF;
1547:
1548: ROLLBACK TO create_party;
1546: END IF;
1547:
1548: ROLLBACK TO create_party;
1549: x_return_status := fnd_api.g_ret_sts_error;
1550: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1551: WHEN fnd_api.g_exc_unexpected_error THEN
1552: IF l_debug THEN
1553: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
1554: debug('Unexpected Error: ' || x_msg_data, l_api_name, fnd_log.level_unexpected);
1549: x_return_status := fnd_api.g_ret_sts_error;
1550: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1551: WHEN fnd_api.g_exc_unexpected_error THEN
1552: IF l_debug THEN
1553: fnd_msg_pub.count_and_get(fnd_api.g_false, x_msg_count, x_msg_data);
1554: debug('Unexpected Error: ' || x_msg_data, l_api_name, fnd_log.level_unexpected);
1555: END IF;
1556:
1557: ROLLBACK TO create_party;
1555: END IF;
1556:
1557: ROLLBACK TO create_party;
1558: x_return_status := fnd_api.g_ret_sts_unexp_error;
1559: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1560: WHEN OTHERS THEN
1561: IF l_debug THEN
1562: debug('Exception: SQLCODE = ' || SQLCODE || ' : SQLERRM = ' || SQLERRM, l_api_name, fnd_log.level_unexpected);
1563: END IF;
1563: END IF;
1564:
1565: ROLLBACK TO create_party;
1566: x_return_status := fnd_api.g_ret_sts_unexp_error;
1567: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1568: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
1569: END IF;
1570: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1571: END create_one_time_address;
1564:
1565: ROLLBACK TO create_party;
1566: x_return_status := fnd_api.g_ret_sts_unexp_error;
1567: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1568: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
1569: END IF;
1570: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1571: END create_one_time_address;
1572:
1566: x_return_status := fnd_api.g_ret_sts_unexp_error;
1567: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1568: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
1569: END IF;
1570: fnd_msg_pub.count_and_get(p_data => x_msg_data, p_count => x_msg_count);
1571: END create_one_time_address;
1572:
1573:
1574: procedure create_location(p_api_version in number