APPS.AHL_VENDORMERGE_GRP dependencies on FND_API

Line 12: -- Default = FND_API.G_FALSE

8: -- Pre-reqs :None
9: -- Parameters :
10: -- IN : p_api_version IN NUMBER Required
11: -- p_init_msg_list IN VARCHAR2 Optional
12: -- Default = FND_API.G_FALSE
13: -- p_commit IN VARCHAR2 Optional
14: -- Default = FND_API.G_FALSE
15: -- p_validation_level IN NUMBER Optional
16: -- Default = FND_API.G_VALID_LEVEL_FULL

Line 14: -- Default = FND_API.G_FALSE

10: -- IN : p_api_version IN NUMBER Required
11: -- p_init_msg_list IN VARCHAR2 Optional
12: -- Default = FND_API.G_FALSE
13: -- p_commit IN VARCHAR2 Optional
14: -- Default = FND_API.G_FALSE
15: -- p_validation_level IN NUMBER Optional
16: -- Default = FND_API.G_VALID_LEVEL_FULL
17: -- p_vendor_id --> Represents Merge To Vendor
18: -- p_dup_vendor_id --> Represents Merge From Vendor

Line 16: -- Default = FND_API.G_VALID_LEVEL_FULL

12: -- Default = FND_API.G_FALSE
13: -- p_commit IN VARCHAR2 Optional
14: -- Default = FND_API.G_FALSE
15: -- p_validation_level IN NUMBER Optional
16: -- Default = FND_API.G_VALID_LEVEL_FULL
17: -- p_vendor_id --> Represents Merge To Vendor
18: -- p_dup_vendor_id --> Represents Merge From Vendor
19: -- p_vendor_site_id --> Represents Merge To Vendor Site
20: -- p_dup_vendor_site_id --> Represents Merge From Vendor Site

Line 41: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,

37: G_PKG_NAME CONSTANT VARCHAR2(30):='AHL_VENDORMERGE_GRP';
38:
39: PROCEDURE MERGE_VENDOR(
40: p_api_version IN NUMBER,
41: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
42: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
43: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
44: x_return_status OUT NOCOPY VARCHAR2,
45: x_msg_count OUT NOCOPY NUMBER,

Line 42: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,

38:
39: PROCEDURE MERGE_VENDOR(
40: p_api_version IN NUMBER,
41: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
42: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
43: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
44: x_return_status OUT NOCOPY VARCHAR2,
45: x_msg_count OUT NOCOPY NUMBER,
46: x_msg_data OUT NOCOPY VARCHAR2,

Line 43: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

39: PROCEDURE MERGE_VENDOR(
40: p_api_version IN NUMBER,
41: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE,
42: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE,
43: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
44: x_return_status OUT NOCOPY VARCHAR2,
45: x_msg_count OUT NOCOPY NUMBER,
46: x_msg_data OUT NOCOPY VARCHAR2,
47: p_vendor_id IN NUMBER,

Line 60: x_return_status := FND_API.G_RET_STS_SUCCESS;

56: l_api_name CONSTANT VARCHAR2(30) := 'MERGE_VENDOR';
57: l_api_version CONSTANT NUMBER := 1.0;
58: BEGIN
59: -- Initialize API return status to success
60: x_return_status := FND_API.G_RET_STS_SUCCESS;
61:
62: -- Check for call compatibility.
63: IF NOT FND_API.Compatible_API_Call (l_api_version,
64: p_api_version,

Line 63: IF NOT FND_API.Compatible_API_Call (l_api_version,

59: -- Initialize API return status to success
60: x_return_status := FND_API.G_RET_STS_SUCCESS;
61:
62: -- Check for call compatibility.
63: IF NOT FND_API.Compatible_API_Call (l_api_version,
64: p_api_version,
65: l_api_name,
66: G_PKG_NAME) THEN
67: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 67: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

63: IF NOT FND_API.Compatible_API_Call (l_api_version,
64: p_api_version,
65: l_api_name,
66: G_PKG_NAME) THEN
67: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
68: END IF;
69:
70: -- Initialize API message list if necessary.
71: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 72: IF FND_API.to_Boolean( p_init_msg_list) THEN

68: END IF;
69:
70: -- Initialize API message list if necessary.
71: -- Initialize message list if p_init_msg_list is set to TRUE.
72: IF FND_API.to_Boolean( p_init_msg_list) THEN
73: FND_MSG_PUB.initialize;
74: END IF;
75:
76: -- OSP Order Table

Line 103: IF FND_API.To_Boolean(p_commit) THEN

99: -- Parameter party_id and party_site_id are included, but not sure whether we need to
100: -- update table ahl_vendor_customer_rels(vendor_site_id, customer_site_id).
101:
102: -- Standard check of p_commit.
103: IF FND_API.To_Boolean(p_commit) THEN
104: COMMIT WORK;
105: END IF;
106:
107: EXCEPTION

Line 110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

106:
107: EXCEPTION
108: WHEN OTHERS THEN
109: ROLLBACK;
110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
111: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
112: THEN
113: FND_MSG_PUB.add_exc_msg(
114: p_pkg_name => G_PKG_NAME,

Line 119: p_encoded => FND_API.G_FALSE,

115: p_procedure_name => l_api_name,
116: p_error_text => SUBSTRB(SQLERRM,1,240));
117: END IF;
118: FND_MSG_PUB.count_and_get(
119: p_encoded => FND_API.G_FALSE,
120: p_count => x_msg_count,
121: p_data => x_msg_data);
122:
123: END MERGE_VENDOR;