31: -- Standard Start of API savepoint
32: SAVEPOINT get_unique_name_for_component;
33:
34: -- Initialize API return status to success
35: x_return_status := FND_API.G_RET_STS_SUCCESS;
36:
37:
38: -- ******* All the code needs to be written here *****
39: -- PLAN ELEMENT Name : 80 characters
83: -- Standard call to get message count and if count is 1, get message info.
84: FND_MSG_PUB.Count_And_Get
85: (p_count => x_msg_count ,
86: p_data => x_msg_data ,
87: p_encoded => FND_API.G_FALSE );
88: EXCEPTION
89: WHEN FND_API.G_EXC_ERROR THEN
90: ROLLBACK TO get_unique_name_for_component;
91: x_return_status := FND_API.G_RET_STS_ERROR ;
85: (p_count => x_msg_count ,
86: p_data => x_msg_data ,
87: p_encoded => FND_API.G_FALSE );
88: EXCEPTION
89: WHEN FND_API.G_EXC_ERROR THEN
90: ROLLBACK TO get_unique_name_for_component;
91: x_return_status := FND_API.G_RET_STS_ERROR ;
92: FND_MSG_PUB.count_and_get
93: (p_count => x_msg_count ,
87: p_encoded => FND_API.G_FALSE );
88: EXCEPTION
89: WHEN FND_API.G_EXC_ERROR THEN
90: ROLLBACK TO get_unique_name_for_component;
91: x_return_status := FND_API.G_RET_STS_ERROR ;
92: FND_MSG_PUB.count_and_get
93: (p_count => x_msg_count ,
94: p_data => x_msg_data ,
95: p_encoded => FND_API.G_FALSE );
91: x_return_status := FND_API.G_RET_STS_ERROR ;
92: FND_MSG_PUB.count_and_get
93: (p_count => x_msg_count ,
94: p_data => x_msg_data ,
95: p_encoded => FND_API.G_FALSE );
96: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
97: ROLLBACK TO get_unique_name_for_component;
98: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
99: FND_MSG_PUB.count_and_get
92: FND_MSG_PUB.count_and_get
93: (p_count => x_msg_count ,
94: p_data => x_msg_data ,
95: p_encoded => FND_API.G_FALSE );
96: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
97: ROLLBACK TO get_unique_name_for_component;
98: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
99: FND_MSG_PUB.count_and_get
100: (p_count => x_msg_count ,
94: p_data => x_msg_data ,
95: p_encoded => FND_API.G_FALSE );
96: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
97: ROLLBACK TO get_unique_name_for_component;
98: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
99: FND_MSG_PUB.count_and_get
100: (p_count => x_msg_count ,
101: p_data => x_msg_data ,
102: p_encoded => FND_API.G_FALSE );
98: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
99: FND_MSG_PUB.count_and_get
100: (p_count => x_msg_count ,
101: p_data => x_msg_data ,
102: p_encoded => FND_API.G_FALSE );
103: WHEN OTHERS THEN
104: ROLLBACK TO get_unique_name_for_component;
105: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
106: IF FND_MSG_PUB.check_msg_level
101: p_data => x_msg_data ,
102: p_encoded => FND_API.G_FALSE );
103: WHEN OTHERS THEN
104: ROLLBACK TO get_unique_name_for_component;
105: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
106: IF FND_MSG_PUB.check_msg_level
107: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
108: THEN
109: FND_MSG_PUB.add_exc_msg
112: END IF;
113: FND_MSG_PUB.count_and_get
114: (p_count => x_msg_count ,
115: p_data => x_msg_data ,
116: p_encoded => FND_API.G_FALSE );
117: END get_unique_name_for_component;
118:
119:
120: FUNCTION blob_to_clob (blob_in IN BLOB)
148: END clob_to_xmltype;
149:
150: PROCEDURE convert_blob_to_clob
151: ( p_api_version IN NUMBER ,
152: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
153: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
154: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
155: p_exp_imp_id IN CN_COPY_REQUESTS_ALL.EXP_IMP_REQUEST_ID%TYPE,
156: x_return_status OUT NOCOPY VARCHAR2,
149:
150: PROCEDURE convert_blob_to_clob
151: ( p_api_version IN NUMBER ,
152: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
153: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
154: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
155: p_exp_imp_id IN CN_COPY_REQUESTS_ALL.EXP_IMP_REQUEST_ID%TYPE,
156: x_return_status OUT NOCOPY VARCHAR2,
157: x_msg_count OUT NOCOPY NUMBER,
150: PROCEDURE convert_blob_to_clob
151: ( p_api_version IN NUMBER ,
152: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
153: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
154: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
155: p_exp_imp_id IN CN_COPY_REQUESTS_ALL.EXP_IMP_REQUEST_ID%TYPE,
156: x_return_status OUT NOCOPY VARCHAR2,
157: x_msg_count OUT NOCOPY NUMBER,
158: x_msg_data OUT NOCOPY VARCHAR2
168: -- Standard Start of API savepoint
169: SAVEPOINT convert_blob_to_clob;
170:
171: -- Standard call to check for call compatibility.
172: IF NOT FND_API.Compatible_API_Call
173: (l_api_version ,
174: p_api_version ,
175: l_api_name ,
176: G_PKG_NAME )
174: p_api_version ,
175: l_api_name ,
176: G_PKG_NAME )
177: THEN
178: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
179: END IF;
180: -- Initialize message list if p_init_msg_list is set to TRUE.
181: IF FND_API.to_Boolean( p_init_msg_list ) THEN
182: FND_MSG_PUB.initialize;
177: THEN
178: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
179: END IF;
180: -- Initialize message list if p_init_msg_list is set to TRUE.
181: IF FND_API.to_Boolean( p_init_msg_list ) THEN
182: FND_MSG_PUB.initialize;
183: END IF;
184:
185: -- Initialize API return status to success
182: FND_MSG_PUB.initialize;
183: END IF;
184:
185: -- Initialize API return status to success
186: x_return_status := FND_API.G_RET_STS_SUCCESS;
187:
188: -- ******* API Begins ************
189: -- TODO : Error handling
190:
197: update cn_copy_requests_all set file_content_clob = l_clob where EXP_IMP_REQUEST_ID = p_exp_imp_id;
198:
199: -- ******* End of API body. ********
200: -- Standard check of p_commit.
201: IF FND_API.To_Boolean( p_commit ) THEN
202: COMMIT WORK;
203: END IF;
204:
205: -- Standard call to get message count and if count is 1, get message info.
205: -- Standard call to get message count and if count is 1, get message info.
206: FND_MSG_PUB.Count_And_Get
207: (p_count => x_msg_count ,
208: p_data => x_msg_data ,
209: p_encoded => FND_API.G_FALSE );
210:
211: EXCEPTION
212: WHEN FND_API.G_EXC_ERROR THEN
213: ROLLBACK TO convert_blob_to_clob;
208: p_data => x_msg_data ,
209: p_encoded => FND_API.G_FALSE );
210:
211: EXCEPTION
212: WHEN FND_API.G_EXC_ERROR THEN
213: ROLLBACK TO convert_blob_to_clob;
214: x_return_status := FND_API.G_RET_STS_ERROR ;
215: FND_MSG_PUB.count_and_get
216: (p_count => x_msg_count ,
210:
211: EXCEPTION
212: WHEN FND_API.G_EXC_ERROR THEN
213: ROLLBACK TO convert_blob_to_clob;
214: x_return_status := FND_API.G_RET_STS_ERROR ;
215: FND_MSG_PUB.count_and_get
216: (p_count => x_msg_count ,
217: p_data => x_msg_data ,
218: p_encoded => FND_API.G_FALSE );
214: x_return_status := FND_API.G_RET_STS_ERROR ;
215: FND_MSG_PUB.count_and_get
216: (p_count => x_msg_count ,
217: p_data => x_msg_data ,
218: p_encoded => FND_API.G_FALSE );
219: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
220: ROLLBACK TO convert_blob_to_clob;
221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
222: FND_MSG_PUB.count_and_get
215: FND_MSG_PUB.count_and_get
216: (p_count => x_msg_count ,
217: p_data => x_msg_data ,
218: p_encoded => FND_API.G_FALSE );
219: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
220: ROLLBACK TO convert_blob_to_clob;
221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
222: FND_MSG_PUB.count_and_get
223: (p_count => x_msg_count ,
217: p_data => x_msg_data ,
218: p_encoded => FND_API.G_FALSE );
219: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
220: ROLLBACK TO convert_blob_to_clob;
221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
222: FND_MSG_PUB.count_and_get
223: (p_count => x_msg_count ,
224: p_data => x_msg_data ,
225: p_encoded => FND_API.G_FALSE );
221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
222: FND_MSG_PUB.count_and_get
223: (p_count => x_msg_count ,
224: p_data => x_msg_data ,
225: p_encoded => FND_API.G_FALSE );
226: WHEN OTHERS THEN
227: ROLLBACK TO convert_blob_to_clob;
228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
229: IF FND_MSG_PUB.check_msg_level
224: p_data => x_msg_data ,
225: p_encoded => FND_API.G_FALSE );
226: WHEN OTHERS THEN
227: ROLLBACK TO convert_blob_to_clob;
228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
229: IF FND_MSG_PUB.check_msg_level
230: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
231: THEN
232: FND_MSG_PUB.add_exc_msg
235: END IF;
236: FND_MSG_PUB.count_and_get
237: (p_count => x_msg_count ,
238: p_data => x_msg_data ,
239: p_encoded => FND_API.G_FALSE );
240: END convert_blob_to_clob;
241:
242:
243:
242:
243:
244: PROCEDURE convert_clob_to_xmltype
245: ( p_api_version IN NUMBER ,
246: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
247: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
248: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
249: p_exp_imp_id IN CN_COPY_REQUESTS_ALL.EXP_IMP_REQUEST_ID%TYPE,
250: x_return_status OUT NOCOPY VARCHAR2,
243:
244: PROCEDURE convert_clob_to_xmltype
245: ( p_api_version IN NUMBER ,
246: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
247: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
248: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
249: p_exp_imp_id IN CN_COPY_REQUESTS_ALL.EXP_IMP_REQUEST_ID%TYPE,
250: x_return_status OUT NOCOPY VARCHAR2,
251: x_msg_count OUT NOCOPY NUMBER,
244: PROCEDURE convert_clob_to_xmltype
245: ( p_api_version IN NUMBER ,
246: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
247: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
248: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
249: p_exp_imp_id IN CN_COPY_REQUESTS_ALL.EXP_IMP_REQUEST_ID%TYPE,
250: x_return_status OUT NOCOPY VARCHAR2,
251: x_msg_count OUT NOCOPY NUMBER,
252: x_msg_data OUT NOCOPY VARCHAR2
262: -- Standard Start of API savepoint
263: SAVEPOINT convert_clob_to_xmltype;
264:
265: -- Standard call to check for call compatibility.
266: IF NOT FND_API.Compatible_API_Call
267: (l_api_version ,
268: p_api_version ,
269: l_api_name ,
270: G_PKG_NAME )
268: p_api_version ,
269: l_api_name ,
270: G_PKG_NAME )
271: THEN
272: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
273: END IF;
274: -- Initialize message list if p_init_msg_list is set to TRUE.
275: IF FND_API.to_Boolean( p_init_msg_list ) THEN
276: FND_MSG_PUB.initialize;
271: THEN
272: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
273: END IF;
274: -- Initialize message list if p_init_msg_list is set to TRUE.
275: IF FND_API.to_Boolean( p_init_msg_list ) THEN
276: FND_MSG_PUB.initialize;
277: END IF;
278:
279: -- Initialize API return status to success
276: FND_MSG_PUB.initialize;
277: END IF;
278:
279: -- Initialize API return status to success
280: x_return_status := FND_API.G_RET_STS_SUCCESS;
281:
282: -- ******* API Begins ************
283: -- TODO : Error handling, waiting for xmltype to be added
284:
290: update cn_copy_requests_all set file_content_xmltype = l_xmltype where EXP_IMP_REQUEST_ID = p_exp_imp_id;
291:
292: -- ******* End of API body. ********
293: -- Standard check of p_commit.
294: IF FND_API.To_Boolean( p_commit ) THEN
295: COMMIT WORK;
296: END IF;
297:
298: -- Standard call to get message count and if count is 1, get message info.
298: -- Standard call to get message count and if count is 1, get message info.
299: FND_MSG_PUB.Count_And_Get
300: (p_count => x_msg_count ,
301: p_data => x_msg_data ,
302: p_encoded => FND_API.G_FALSE );
303:
304: EXCEPTION
305: WHEN FND_API.G_EXC_ERROR THEN
306: ROLLBACK TO convert_clob_to_xmltype;
301: p_data => x_msg_data ,
302: p_encoded => FND_API.G_FALSE );
303:
304: EXCEPTION
305: WHEN FND_API.G_EXC_ERROR THEN
306: ROLLBACK TO convert_clob_to_xmltype;
307: x_return_status := FND_API.G_RET_STS_ERROR ;
308: FND_MSG_PUB.count_and_get
309: (p_count => x_msg_count ,
303:
304: EXCEPTION
305: WHEN FND_API.G_EXC_ERROR THEN
306: ROLLBACK TO convert_clob_to_xmltype;
307: x_return_status := FND_API.G_RET_STS_ERROR ;
308: FND_MSG_PUB.count_and_get
309: (p_count => x_msg_count ,
310: p_data => x_msg_data ,
311: p_encoded => FND_API.G_FALSE );
307: x_return_status := FND_API.G_RET_STS_ERROR ;
308: FND_MSG_PUB.count_and_get
309: (p_count => x_msg_count ,
310: p_data => x_msg_data ,
311: p_encoded => FND_API.G_FALSE );
312: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
313: ROLLBACK TO convert_clob_to_xmltype;
314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
315: FND_MSG_PUB.count_and_get
308: FND_MSG_PUB.count_and_get
309: (p_count => x_msg_count ,
310: p_data => x_msg_data ,
311: p_encoded => FND_API.G_FALSE );
312: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
313: ROLLBACK TO convert_clob_to_xmltype;
314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
315: FND_MSG_PUB.count_and_get
316: (p_count => x_msg_count ,
310: p_data => x_msg_data ,
311: p_encoded => FND_API.G_FALSE );
312: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
313: ROLLBACK TO convert_clob_to_xmltype;
314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
315: FND_MSG_PUB.count_and_get
316: (p_count => x_msg_count ,
317: p_data => x_msg_data ,
318: p_encoded => FND_API.G_FALSE );
314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
315: FND_MSG_PUB.count_and_get
316: (p_count => x_msg_count ,
317: p_data => x_msg_data ,
318: p_encoded => FND_API.G_FALSE );
319: WHEN OTHERS THEN
320: ROLLBACK TO convert_clob_to_xmltype;
321: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
322: IF FND_MSG_PUB.check_msg_level
317: p_data => x_msg_data ,
318: p_encoded => FND_API.G_FALSE );
319: WHEN OTHERS THEN
320: ROLLBACK TO convert_clob_to_xmltype;
321: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
322: IF FND_MSG_PUB.check_msg_level
323: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
324: THEN
325: FND_MSG_PUB.add_exc_msg
328: END IF;
329: FND_MSG_PUB.count_and_get
330: (p_count => x_msg_count ,
331: p_data => x_msg_data ,
332: p_encoded => FND_API.G_FALSE );
333: END convert_clob_to_xmltype;
334:
335:
336: PROCEDURE convert_blob_to_xmltype
334:
335:
336: PROCEDURE convert_blob_to_xmltype
337: ( p_api_version IN NUMBER ,
338: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
339: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
340: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
341: p_exp_imp_id IN CN_COPY_REQUESTS_ALL.EXP_IMP_REQUEST_ID%TYPE,
342: x_return_status OUT NOCOPY VARCHAR2,
335:
336: PROCEDURE convert_blob_to_xmltype
337: ( p_api_version IN NUMBER ,
338: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
339: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
340: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
341: p_exp_imp_id IN CN_COPY_REQUESTS_ALL.EXP_IMP_REQUEST_ID%TYPE,
342: x_return_status OUT NOCOPY VARCHAR2,
343: x_msg_count OUT NOCOPY NUMBER,
336: PROCEDURE convert_blob_to_xmltype
337: ( p_api_version IN NUMBER ,
338: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
339: p_commit IN VARCHAR2 := FND_API.G_FALSE ,
340: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
341: p_exp_imp_id IN CN_COPY_REQUESTS_ALL.EXP_IMP_REQUEST_ID%TYPE,
342: x_return_status OUT NOCOPY VARCHAR2,
343: x_msg_count OUT NOCOPY NUMBER,
344: x_msg_data OUT NOCOPY VARCHAR2
355: -- Standard Start of API savepoint
356: SAVEPOINT convert_blob_to_xmltype;
357:
358: -- Standard call to check for call compatibility.
359: IF NOT FND_API.Compatible_API_Call
360: (l_api_version ,
361: p_api_version ,
362: l_api_name ,
363: G_PKG_NAME )
361: p_api_version ,
362: l_api_name ,
363: G_PKG_NAME )
364: THEN
365: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
366: END IF;
367: -- Initialize message list if p_init_msg_list is set to TRUE.
368: IF FND_API.to_Boolean( p_init_msg_list ) THEN
369: FND_MSG_PUB.initialize;
364: THEN
365: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
366: END IF;
367: -- Initialize message list if p_init_msg_list is set to TRUE.
368: IF FND_API.to_Boolean( p_init_msg_list ) THEN
369: FND_MSG_PUB.initialize;
370: END IF;
371:
372:
370: END IF;
371:
372:
373: -- Initialize API return status to success
374: x_return_status := FND_API.G_RET_STS_SUCCESS;
375:
376: -- ******* API Begins ************
377: -- TODO : Error handling, calling the other two procedures
378: convert_blob_to_clob(p_api_version,
383: l_return_status,
384: l_msg_count,
385: l_msg_data);
386:
387: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
388: RAISE fnd_api.g_exc_error;
389: END IF;
390:
391: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
384: l_msg_count,
385: l_msg_data);
386:
387: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
388: RAISE fnd_api.g_exc_error;
389: END IF;
390:
391: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
392: RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;
387: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
388: RAISE fnd_api.g_exc_error;
389: END IF;
390:
391: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
392: RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;
393: END IF;
394:
395:
388: RAISE fnd_api.g_exc_error;
389: END IF;
390:
391: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
392: RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;
393: END IF;
394:
395:
396: convert_clob_to_xmltype(p_api_version,
401: l_return_status,
402: l_msg_count,
403: l_msg_data);
404:
405: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
406: RAISE fnd_api.g_exc_error;
407: END IF;
408:
409: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
402: l_msg_count,
403: l_msg_data);
404:
405: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
406: RAISE fnd_api.g_exc_error;
407: END IF;
408:
409: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
410: RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;
405: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
406: RAISE fnd_api.g_exc_error;
407: END IF;
408:
409: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
410: RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;
411: END IF;
412:
413: -- ******* End of API body. ********
406: RAISE fnd_api.g_exc_error;
407: END IF;
408:
409: IF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
410: RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;
411: END IF;
412:
413: -- ******* End of API body. ********
414: -- Standard check of p_commit.
411: END IF;
412:
413: -- ******* End of API body. ********
414: -- Standard check of p_commit.
415: IF FND_API.To_Boolean(p_commit) THEN
416: COMMIT WORK;
417: END IF;
418:
419: -- Standard call to get message count and if count is 1, get message info.
419: -- Standard call to get message count and if count is 1, get message info.
420: FND_MSG_PUB.Count_And_Get
421: (p_count => x_msg_count ,
422: p_data => x_msg_data ,
423: p_encoded => FND_API.G_FALSE );
424:
425: EXCEPTION
426: WHEN FND_API.G_EXC_ERROR THEN
427: ROLLBACK TO convert_blob_to_xmltype;
422: p_data => x_msg_data ,
423: p_encoded => FND_API.G_FALSE );
424:
425: EXCEPTION
426: WHEN FND_API.G_EXC_ERROR THEN
427: ROLLBACK TO convert_blob_to_xmltype;
428: x_return_status := FND_API.G_RET_STS_ERROR ;
429: FND_MSG_PUB.count_and_get
430: (p_count => x_msg_count ,
424:
425: EXCEPTION
426: WHEN FND_API.G_EXC_ERROR THEN
427: ROLLBACK TO convert_blob_to_xmltype;
428: x_return_status := FND_API.G_RET_STS_ERROR ;
429: FND_MSG_PUB.count_and_get
430: (p_count => x_msg_count ,
431: p_data => x_msg_data ,
432: p_encoded => FND_API.G_FALSE );
428: x_return_status := FND_API.G_RET_STS_ERROR ;
429: FND_MSG_PUB.count_and_get
430: (p_count => x_msg_count ,
431: p_data => x_msg_data ,
432: p_encoded => FND_API.G_FALSE );
433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
434: ROLLBACK TO convert_blob_to_xmltype;
435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
436: FND_MSG_PUB.count_and_get
429: FND_MSG_PUB.count_and_get
430: (p_count => x_msg_count ,
431: p_data => x_msg_data ,
432: p_encoded => FND_API.G_FALSE );
433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
434: ROLLBACK TO convert_blob_to_xmltype;
435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
436: FND_MSG_PUB.count_and_get
437: (p_count => x_msg_count ,
431: p_data => x_msg_data ,
432: p_encoded => FND_API.G_FALSE );
433: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
434: ROLLBACK TO convert_blob_to_xmltype;
435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
436: FND_MSG_PUB.count_and_get
437: (p_count => x_msg_count ,
438: p_data => x_msg_data ,
439: p_encoded => FND_API.G_FALSE );
435: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
436: FND_MSG_PUB.count_and_get
437: (p_count => x_msg_count ,
438: p_data => x_msg_data ,
439: p_encoded => FND_API.G_FALSE );
440: WHEN OTHERS THEN
441: ROLLBACK TO convert_blob_to_xmltype;
442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
443: IF FND_MSG_PUB.check_msg_level
438: p_data => x_msg_data ,
439: p_encoded => FND_API.G_FALSE );
440: WHEN OTHERS THEN
441: ROLLBACK TO convert_blob_to_xmltype;
442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
443: IF FND_MSG_PUB.check_msg_level
444: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
445: THEN
446: FND_MSG_PUB.add_exc_msg
449: END IF;
450: FND_MSG_PUB.count_and_get
451: (p_count => x_msg_count ,
452: p_data => x_msg_data ,
453: p_encoded => FND_API.G_FALSE );
454: END convert_blob_to_xmltype;
455:
456:
457: FUNCTION check_name_length (p_name VARCHAR2, p_org_id NUMBER,p_type varchar2,p_prefix varchar2)