41: END IF;
42:
43: -- Initialize message list if p_init_msg_list is set to TRUE.
44: IF FND_API.To_Boolean( p_init_msg_list ) THEN
45: FND_MSG_PUB.initialize;
46: END IF;
47:
48: -- Initialize API return status to success
49: x_return_status := FND_API.G_RET_STS_SUCCESS;
78: IF FND_API.To_Boolean( p_commit ) THEN
79: COMMIT WORK;
80: END IF;
81: -- Standard call to get message count and if count is 1, get message info.
82: FND_MSG_PUB.Count_And_Get
83: (
84: p_count => x_msg_count,
85: p_data => x_msg_data
86: );
88:
89: WHEN xml_data_null THEN
90: ROLLBACK TO ENQUEUE_REQUEST_PUB;
91: FND_MESSAGE.SET_NAME('IEO','IEO_AQ_XML_DATA_NULL');
92: FND_MSG_PUB.Add;
93: x_return_status := FND_API.G_RET_STS_ERROR ;
94: WHEN FND_API.G_EXC_ERROR THEN
95: ROLLBACK TO ENQUEUE_REQUEST_PUB;
96: x_return_status := FND_API.G_RET_STS_ERROR ;
93: x_return_status := FND_API.G_RET_STS_ERROR ;
94: WHEN FND_API.G_EXC_ERROR THEN
95: ROLLBACK TO ENQUEUE_REQUEST_PUB;
96: x_return_status := FND_API.G_RET_STS_ERROR ;
97: FND_MSG_PUB.Count_And_Get
98: (
99: p_count => x_msg_count,
100: p_data => x_msg_data
101: );
101: );
102: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
103: ROLLBACK TO ENQUEUE_REQUEST_PUB;
104: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
105: FND_MSG_PUB.Count_And_Get
106: (
107: p_count => x_msg_count,
108: p_data => x_msg_data
109: );
109: );
110: /* WHEN OTHERS THEN
111: ROLLBACK TO ENQUEUE_REQUEST_PUB;
112: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
113: IF FND_MSG_PUB.Check_Msg_Level
114: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
115: THEN
116: FND_MSG_PUB.Add_Exc_Msg
117: (
110: /* WHEN OTHERS THEN
111: ROLLBACK TO ENQUEUE_REQUEST_PUB;
112: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
113: IF FND_MSG_PUB.Check_Msg_Level
114: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
115: THEN
116: FND_MSG_PUB.Add_Exc_Msg
117: (
118: G_PKG_NAME,
112: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
113: IF FND_MSG_PUB.Check_Msg_Level
114: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
115: THEN
116: FND_MSG_PUB.Add_Exc_Msg
117: (
118: G_PKG_NAME,
119: l_api_name
120: );
118: G_PKG_NAME,
119: l_api_name
120: );
121: END IF;
122: FND_MSG_PUB.Count_And_Get
123: (
124: p_count => x_msg_count,
125: p_data => x_msg_data
126: );*/
165: END IF;
166:
167: -- Initialize message list if p_init_msg_list is set to TRUE.
168: IF FND_API.To_Boolean( p_init_msg_list ) THEN
169: FND_MSG_PUB.initialize;
170: END IF;
171:
172: -- Initialize API return status to success
173: x_return_status := FND_API.G_RET_STS_SUCCESS;
198: IF FND_API.To_Boolean( p_commit ) THEN
199: COMMIT WORK;
200: END IF;
201: -- Standard call to get message count and if count is 1, get message info.
202: FND_MSG_PUB.Count_And_Get
203: (
204: p_count => x_msg_count,
205: p_data => x_msg_data
206: );
208:
209: WHEN xml_data_null THEN
210: ROLLBACK TO ENQUEUE_RESPONSE_PUB;
211: FND_MESSAGE.SET_NAME('IEO','IEO_AQ_XML_DATA_NULL');
212: FND_MSG_PUB.Add;
213: x_return_status := FND_API.G_RET_STS_ERROR ;
214: WHEN FND_API.G_EXC_ERROR THEN
215: ROLLBACK TO ENQUEUE_RESPONSE_PUB;
216: x_return_status := FND_API.G_RET_STS_ERROR ;
213: x_return_status := FND_API.G_RET_STS_ERROR ;
214: WHEN FND_API.G_EXC_ERROR THEN
215: ROLLBACK TO ENQUEUE_RESPONSE_PUB;
216: x_return_status := FND_API.G_RET_STS_ERROR ;
217: FND_MSG_PUB.Count_And_Get
218: (
219: p_count => x_msg_count,
220: p_data => x_msg_data
221: );
221: );
222: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
223: ROLLBACK TO ENQUEUE_RESPONSE_PUB;
224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
225: FND_MSG_PUB.Count_And_Get
226: (
227: p_count => x_msg_count,
228: p_data => x_msg_data
229: );
229: );
230: /* WHEN OTHERS THEN
231: ROLLBACK TO ENQUEUE_RESPONSE_PUB;
232: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
233: IF FND_MSG_PUB.Check_Msg_Level
234: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
235: THEN
236: FND_MSG_PUB.Add_Exc_Msg
237: (
230: /* WHEN OTHERS THEN
231: ROLLBACK TO ENQUEUE_RESPONSE_PUB;
232: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
233: IF FND_MSG_PUB.Check_Msg_Level
234: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
235: THEN
236: FND_MSG_PUB.Add_Exc_Msg
237: (
238: G_PKG_NAME,
232: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
233: IF FND_MSG_PUB.Check_Msg_Level
234: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
235: THEN
236: FND_MSG_PUB.Add_Exc_Msg
237: (
238: G_PKG_NAME,
239: l_api_name
240: );
238: G_PKG_NAME,
239: l_api_name
240: );
241: END IF;
242: FND_MSG_PUB.Count_And_Get
243: (
244: p_count => x_msg_count,
245: p_data => x_msg_data
246: );*/
287: END IF;
288:
289: -- Initialize message list if p_init_msg_list is set to TRUE.
290: IF FND_API.To_Boolean( p_init_msg_list ) THEN
291: FND_MSG_PUB.initialize;
292: END IF;
293:
294: -- Initialize API return status to success
295: x_return_status := FND_API.G_RET_STS_SUCCESS;
318: x_return_status := G_TIMEOUT ;
319: WHEN FND_API.G_EXC_ERROR THEN
320: ROLLBACK TO DEQUEUE_REQUEST_PUB;
321: x_return_status := FND_API.G_RET_STS_ERROR ;
322: FND_MSG_PUB.Count_And_Get
323: (
324: p_count => x_msg_count,
325: p_data => x_msg_data
326: );
326: );
327: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
328: ROLLBACK TO DEQUEUE_REQUEST_PUB;
329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
330: FND_MSG_PUB.Count_And_Get
331: (
332: p_count => x_msg_count,
333: p_data => x_msg_data
334: );
334: );
335: /* WHEN OTHERS THEN
336: ROLLBACK TO DEQUEUE_REQUEST_PUB;
337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
338: IF FND_MSG_PUB.Check_Msg_Level
339: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
340: THEN
341: FND_MSG_PUB.Add_Exc_Msg
342: (
335: /* WHEN OTHERS THEN
336: ROLLBACK TO DEQUEUE_REQUEST_PUB;
337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
338: IF FND_MSG_PUB.Check_Msg_Level
339: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
340: THEN
341: FND_MSG_PUB.Add_Exc_Msg
342: (
343: G_PKG_NAME,
337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
338: IF FND_MSG_PUB.Check_Msg_Level
339: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
340: THEN
341: FND_MSG_PUB.Add_Exc_Msg
342: (
343: G_PKG_NAME,
344: l_api_name
345: );
343: G_PKG_NAME,
344: l_api_name
345: );
346: END IF;
347: FND_MSG_PUB.Count_And_Get
348: (
349: p_count => x_msg_count,
350: p_data => x_msg_data
351: );*/
392: END IF;
393:
394: -- Initialize message list if p_init_msg_list is set to TRUE.
395: IF FND_API.To_Boolean( p_init_msg_list ) THEN
396: FND_MSG_PUB.initialize;
397: END IF;
398:
399: -- Initialize API return status to success
400: x_return_status := FND_API.G_RET_STS_SUCCESS;
426: x_return_status := G_TIMEOUT;
427: WHEN FND_API.G_EXC_ERROR THEN
428: ROLLBACK TO DEQUEUE_RESPONSE_PUB;
429: x_return_status := FND_API.G_RET_STS_ERROR ;
430: FND_MSG_PUB.Count_And_Get
431: (
432: p_count => x_msg_count,
433: p_data => x_msg_data
434: );
434: );
435: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
436: ROLLBACK TO DEQUEUE_RESPONSE_PUB;
437: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
438: FND_MSG_PUB.Count_And_Get
439: (
440: p_count => x_msg_count,
441: p_data => x_msg_data
442: );
442: );
443: /* WHEN OTHERS THEN
444: ROLLBACK TO DEQUEUE_RESPONSE_PUB;
445: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
446: IF FND_MSG_PUB.Check_Msg_Level
447: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
448: THEN
449: FND_MSG_PUB.Add_Exc_Msg
450: (
443: /* WHEN OTHERS THEN
444: ROLLBACK TO DEQUEUE_RESPONSE_PUB;
445: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
446: IF FND_MSG_PUB.Check_Msg_Level
447: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
448: THEN
449: FND_MSG_PUB.Add_Exc_Msg
450: (
451: G_PKG_NAME,
445: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
446: IF FND_MSG_PUB.Check_Msg_Level
447: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
448: THEN
449: FND_MSG_PUB.Add_Exc_Msg
450: (
451: G_PKG_NAME,
452: l_api_name
453: );
451: G_PKG_NAME,
452: l_api_name
453: );
454: END IF;
455: FND_MSG_PUB.Count_And_Get
456: (
457: p_count => x_msg_count,
458: p_data => x_msg_data
459: );*/