5: G_PKG_NAME CONSTANT VARCHAR2(30):='ICX_CAT_POPULATE_ITEM_GRP';
6:
7: PROCEDURE populateVendorNameChanges
8: ( p_api_version IN NUMBER ,
9: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
10: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
11: p_validation_level IN VARCHAR2 := FND_API.G_VALID_LEVEL_FULL ,
12: x_return_status OUT NOCOPY VARCHAR2 ,
13: p_vendor_id IN NUMBER ,
6:
7: PROCEDURE populateVendorNameChanges
8: ( p_api_version IN NUMBER ,
9: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
10: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
11: p_validation_level IN VARCHAR2 := FND_API.G_VALID_LEVEL_FULL ,
12: x_return_status OUT NOCOPY VARCHAR2 ,
13: p_vendor_id IN NUMBER ,
14: p_vendor_name IN VARCHAR2
7: PROCEDURE populateVendorNameChanges
8: ( p_api_version IN NUMBER ,
9: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
10: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
11: p_validation_level IN VARCHAR2 := FND_API.G_VALID_LEVEL_FULL ,
12: x_return_status OUT NOCOPY VARCHAR2 ,
13: p_vendor_id IN NUMBER ,
14: p_vendor_name IN VARCHAR2
15: )
20: l_end_date DATE;
21: l_log_string VARCHAR2(2000);
22:
23: BEGIN
24: x_return_status := FND_API.G_RET_STS_SUCCESS;
25:
26: -- Standard Start of API savepoint
27: SAVEPOINT populateVendorNameChanges_sp;
28:
37: ICX_CAT_UTIL_PVT.logProcBegin(g_pkg_name, l_api_name, l_log_string);
38: END IF;
39:
40: -- Standard call to check for call compatibility.
41: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
42: p_api_version ,
43: l_api_name ,
44: G_PKG_NAME )
45: THEN
42: p_api_version ,
43: l_api_name ,
44: G_PKG_NAME )
45: THEN
46: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
47: END IF;
48:
49: ICX_CAT_UTIL_PVT.setCommitParameter(P_COMMIT);
50:
50:
51: ICX_CAT_POPULATE_ITEM_PVT.populateVendorNameChanges(p_vendor_id, p_vendor_name);
52:
53: -- Standard check of P_COMMIT
54: IF (FND_API.To_Boolean(P_COMMIT)) THEN
55: COMMIT;
56: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
57: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,
58: ICX_CAT_UTIL_PVT.getModuleNameForDebug(g_pkg_name, l_api_name),
84: || SQLERRM);
85: END IF;
86: NULL;
87: END;
88: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
89: END populateVendorNameChanges;
90:
91: PROCEDURE populateVendorMerge
92: ( p_api_version IN NUMBER ,
89: END populateVendorNameChanges;
90:
91: PROCEDURE populateVendorMerge
92: ( p_api_version IN NUMBER ,
93: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
94: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
95: p_validation_level IN VARCHAR2 := FND_API.G_VALID_LEVEL_FULL ,
96: x_return_status OUT NOCOPY VARCHAR2 ,
97: p_from_vendor_id IN NUMBER ,
90:
91: PROCEDURE populateVendorMerge
92: ( p_api_version IN NUMBER ,
93: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
94: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
95: p_validation_level IN VARCHAR2 := FND_API.G_VALID_LEVEL_FULL ,
96: x_return_status OUT NOCOPY VARCHAR2 ,
97: p_from_vendor_id IN NUMBER ,
98: p_from_site_id IN NUMBER ,
91: PROCEDURE populateVendorMerge
92: ( p_api_version IN NUMBER ,
93: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
94: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
95: p_validation_level IN VARCHAR2 := FND_API.G_VALID_LEVEL_FULL ,
96: x_return_status OUT NOCOPY VARCHAR2 ,
97: p_from_vendor_id IN NUMBER ,
98: p_from_site_id IN NUMBER ,
99: p_to_vendor_id IN NUMBER ,
106: l_end_date DATE;
107: l_log_string VARCHAR2(2000);
108:
109: BEGIN
110: x_return_status := FND_API.G_RET_STS_SUCCESS;
111:
112: -- Standard Start of API savepoint
113: SAVEPOINT populateVendorMerge_sp;
114:
125: ICX_CAT_UTIL_PVT.logProcBegin(g_pkg_name, l_api_name, l_log_string);
126: END IF;
127:
128: -- Standard call to check for call compatibility.
129: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
130: p_api_version ,
131: l_api_name ,
132: G_PKG_NAME )
133: THEN
130: p_api_version ,
131: l_api_name ,
132: G_PKG_NAME )
133: THEN
134: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
135: END IF;
136:
137: ICX_CAT_UTIL_PVT.setCommitParameter(P_COMMIT);
138:
138:
139: ICX_CAT_POPULATE_ITEM_PVT.populateVendorMerge(p_from_vendor_id, p_from_site_id, p_to_vendor_id, p_to_site_id);
140:
141: -- Standard check of P_COMMIT
142: IF (FND_API.To_Boolean(P_COMMIT)) THEN
143: COMMIT;
144: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
145: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,
146: ICX_CAT_UTIL_PVT.getModuleNameForDebug(g_pkg_name, l_api_name),
172: || SQLERRM);
173: END IF;
174: NULL;
175: END;
176: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
177: END populateVendorMerge;
178:
179: PROCEDURE rebuildIPIntermediaIndex
180: ( p_api_version IN NUMBER ,
177: END populateVendorMerge;
178:
179: PROCEDURE rebuildIPIntermediaIndex
180: ( p_api_version IN NUMBER ,
181: p_commit IN VARCHAR2 := FND_API.G_TRUE ,
182: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
183: p_validation_level IN VARCHAR2 := FND_API.G_VALID_LEVEL_FULL ,
184: x_return_status OUT NOCOPY VARCHAR2
185: )
178:
179: PROCEDURE rebuildIPIntermediaIndex
180: ( p_api_version IN NUMBER ,
181: p_commit IN VARCHAR2 := FND_API.G_TRUE ,
182: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
183: p_validation_level IN VARCHAR2 := FND_API.G_VALID_LEVEL_FULL ,
184: x_return_status OUT NOCOPY VARCHAR2
185: )
186: IS
179: PROCEDURE rebuildIPIntermediaIndex
180: ( p_api_version IN NUMBER ,
181: p_commit IN VARCHAR2 := FND_API.G_TRUE ,
182: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
183: p_validation_level IN VARCHAR2 := FND_API.G_VALID_LEVEL_FULL ,
184: x_return_status OUT NOCOPY VARCHAR2
185: )
186: IS
187: l_api_name CONSTANT VARCHAR2(30) := 'rebuildIPIntermediaIndex';
192: l_log_string VARCHAR2(2000);
193:
194: BEGIN
195: l_err_loc := 100;
196: x_return_status := FND_API.G_RET_STS_SUCCESS;
197:
198: l_err_loc := 200;
199: l_start_date := sysdate;
200:
206: END IF;
207:
208: l_err_loc := 300;
209: -- Standard call to check for call compatibility.
210: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
211: p_api_version ,
212: l_api_name ,
213: G_PKG_NAME )
214: THEN
212: l_api_name ,
213: G_PKG_NAME )
214: THEN
215: l_err_loc := 400;
216: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
217: END IF;
218:
219: l_err_loc := 500;
220: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
237: WHEN OTHERS THEN
238: ICX_CAT_UTIL_PVT.logUnexpectedException(
239: G_PKG_NAME, l_api_name,
240: ' --> l_err_loc:' ||l_err_loc ||' '|| SQLERRM);
241: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
242: END rebuildIPIntermediaIndex;
243:
244: END ICX_CAT_POPULATE_ITEM_GRP;