[Home] [Help]
256: END IF;
257: END choose_address_line;
258:
259: PROCEDURE update_location (
260: p_location_rec IN hz_location_v2pub.LOCATION_REC_TYPE,
261: p_object_version_number IN OUT NOCOPY NUMBER,
262: x_return_status OUT NOCOPY VARCHAR2,
263: x_msg_count OUT NOCOPY NUMBER,
264: x_msg_data OUT NOCOPY VARCHAR2
264: x_msg_data OUT NOCOPY VARCHAR2
265: ) IS
266: pragma autonomous_transaction;
267: BEGIN
268: hz_location_v2pub.update_location(
269: p_location_rec => p_location_rec
270: , p_object_version_number => p_object_version_number
271: , x_return_status => x_return_status
272: , x_msg_count => x_msg_count
307: l_update_geo BOOLEAN := FALSE;
308: l_call_lf BOOLEAN;
309: l_roadname hz_locations.address1%TYPE;
310: l_location_ovn NUMBER;
311: l_location_rec hz_location_v2pub.location_rec_type;
312: l_road VARCHAR2(200);
313: l_geometry MDSYS.SDO_GEOMETRY := NULL;
314: l_geom_status_code hz_locations.geometry_status_code%TYPE := NULL;
315: l_msg_data VARCHAR2(200);
838: l_api_version CONSTANT NUMBER := 1.0;
839: l_api_name CONSTANT VARCHAR2(50) := 'CREATE_RESOURCE_PARTY_LINK';
840: l_debug CONSTANT BOOLEAN := g_debug = 'Y';
841:
842: l_location_rec hz_location_v2pub.location_rec_type;
843: l_person_rec hz_party_v2pub.person_rec_type;
844: l_party_site_rec hz_party_site_v2pub.party_site_rec_type;
845:
846: l_profile_id NUMBER;
900: END IF;
901:
902: l_location_rec.created_by_module := 'CSFDEAR'; -- Calling Module 'CSF: Departure Arrival'
903:
904: hz_location_v2pub.create_location(
905: p_init_msg_list => fnd_api.g_false
906: , p_location_rec => l_location_rec
907: , x_return_status => x_return_status
908: , x_msg_count => x_msg_count
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;
919: END IF;
920: RAISE fnd_api.g_exc_error;
921: ELSE
922: IF l_debug THEN
923: debug('HZ_LOCATION_V2PUB.CREATE was successful. Location ID = ' || p_address.location_id, l_api_name, fnd_log.level_statement);
924: END IF;
925: END IF;
926:
927: IF p_address.party_id IS NULL THEN
1337: l_api_version CONSTANT NUMBER := 1.0;
1338: l_api_name CONSTANT VARCHAR2(50) := 'CREATE_RESOURCE_PARTY_LINK';
1339: l_debug CONSTANT BOOLEAN := g_debug = 'Y';
1340:
1341: l_location_rec hz_location_v2pub.location_rec_type;
1342: l_person_rec hz_party_v2pub.person_rec_type;
1343: l_party_site_rec hz_party_site_v2pub.party_site_rec_type;
1344:
1345: l_profile_id NUMBER;
1412: END IF;
1413:
1414: l_location_rec.created_by_module := 'CSFDEAR'; -- Calling Module 'CSF: Departure Arrival'
1415:
1416: hz_location_v2pub.create_location(
1417: p_init_msg_list => fnd_api.g_false
1418: , p_location_rec => l_location_rec
1419: , x_return_status => x_return_status
1420: , x_msg_count => x_msg_count
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:
1434: END IF;
1435: RAISE fnd_api.g_exc_error;
1436: ELSE
1437: IF l_debug THEN
1438: debug('HZ_LOCATION_V2PUB.CREATE was successful. Location ID = ' || p_address.location_id, l_api_name, fnd_log.level_statement);
1439: END IF;
1440: END IF;
1441:
1442: IF p_address.party_id IS NULL THEN