23: BEGIN
24: -- Standard Start of API savepoint
25: SAVEPOINT UPDATE_DEQUEUE_COUNT_PUB;
26: -- Standard call to check for call compatibility.
27: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
28: p_api_version ,
29: l_api_name ,
30: G_PKG_NAME )
31: THEN
28: p_api_version ,
29: l_api_name ,
30: G_PKG_NAME )
31: THEN
32: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
33: END IF;
34: -- Initialize message list if p_init_msg_list is set to TRUE.
35: IF FND_API.To_Boolean( p_init_msg_list ) THEN
36: FND_MSG_PUB.initialize;
31: THEN
32: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
33: END IF;
34: -- Initialize message list if p_init_msg_list is set to TRUE.
35: IF FND_API.To_Boolean( p_init_msg_list ) THEN
36: FND_MSG_PUB.initialize;
37: END IF;
38: -- Initialize API return status to success
39: x_return_status := FND_API.G_RET_STS_SUCCESS;
35: IF FND_API.To_Boolean( p_init_msg_list ) THEN
36: FND_MSG_PUB.initialize;
37: END IF;
38: -- Initialize API return status to success
39: x_return_status := FND_API.G_RET_STS_SUCCESS;
40: -- API body
41:
42:
43: update cct_media_type_dequeue_count
49:
50:
51: -- End of API body.
52: -- Standard check of p_commit.
53: IF FND_API.To_Boolean( p_commit ) THEN
54: COMMIT WORK;
55: END IF;
56: -- Standard call to get message count and if count is 1, get message info.
57: FND_MSG_PUB.Count_And_Get
65: insert into cct_media_type_dequeue_count
66: ( media_type, dequeue_count, server_group_id, created_by, creation_date, last_updated_by, last_update_date, last_update_login )
67: values (p_media_type, p_dequeue_count, p_root_svr_group_id, 1, sysdate, 1, sysdate, 1);
68:
69: IF FND_API.To_Boolean( p_commit ) THEN
70: COMMIT WORK;
71: END IF;
72:
73:
70: COMMIT WORK;
71: END IF;
72:
73:
74: WHEN FND_API.G_EXC_ERROR THEN
75: ROLLBACK TO UPDATE_DEQUEUE_COUNT_PUB;
76: x_return_status := FND_API.G_RET_STS_ERROR ;
77: FND_MSG_PUB.Count_And_Get
78: ( p_count => x_msg_count ,
72:
73:
74: WHEN FND_API.G_EXC_ERROR THEN
75: ROLLBACK TO UPDATE_DEQUEUE_COUNT_PUB;
76: x_return_status := FND_API.G_RET_STS_ERROR ;
77: FND_MSG_PUB.Count_And_Get
78: ( p_count => x_msg_count ,
79: p_data => x_msg_data
80: );
77: FND_MSG_PUB.Count_And_Get
78: ( p_count => x_msg_count ,
79: p_data => x_msg_data
80: );
81: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
82: ROLLBACK TO UPDATE_DEQUEUE_COUNT_PUB;
83: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
84: FND_MSG_PUB.Count_And_Get
85: ( p_count => x_msg_count ,
79: p_data => x_msg_data
80: );
81: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
82: ROLLBACK TO UPDATE_DEQUEUE_COUNT_PUB;
83: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
84: FND_MSG_PUB.Count_And_Get
85: ( p_count => x_msg_count ,
86: p_data => x_msg_data
87: );
86: p_data => x_msg_data
87: );
88: WHEN OTHERS THEN
89: ROLLBACK TO UPDATE_DEQUEUE_COUNT_PUB;
90: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
91: IF FND_MSG_PUB.Check_Msg_Level
92: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
93: THEN
94: FND_MSG_PUB.Add_Exc_Msg
140: BEGIN
141: -- Standard Start of API savepoint
142: SAVEPOINT GET_MEDIA_QUEUE_DETAILS_PUB;
143: -- Standard call to check for call compatibility.
144: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
145: p_api_version ,
146: l_api_name ,
147: G_PKG_NAME )
148: THEN
145: p_api_version ,
146: l_api_name ,
147: G_PKG_NAME )
148: THEN
149: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
150: END IF;
151: -- Initialize message list if p_init_msg_list is set to TRUE.
152: IF FND_API.To_Boolean( p_init_msg_list ) THEN
153: FND_MSG_PUB.initialize;
148: THEN
149: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
150: END IF;
151: -- Initialize message list if p_init_msg_list is set to TRUE.
152: IF FND_API.To_Boolean( p_init_msg_list ) THEN
153: FND_MSG_PUB.initialize;
154: END IF;
155: -- Initialize API return status to success
156: x_return_status := FND_API.G_RET_STS_SUCCESS;
152: IF FND_API.To_Boolean( p_init_msg_list ) THEN
153: FND_MSG_PUB.initialize;
154: END IF;
155: -- Initialize API return status to success
156: x_return_status := FND_API.G_RET_STS_SUCCESS;
157:
158: -- API body
159:
160:
256:
257:
258: -- End of API body.
259: -- Standard check of p_commit.
260: IF FND_API.To_Boolean( p_commit ) THEN
261: COMMIT WORK;
262: END IF;
263: -- Standard call to get message count and if count is 1, get message info.
264: FND_MSG_PUB.Count_And_Get
270: WHEN MEDIA_ITEM_NOT_FOUND THEN
271: ROLLBACK TO GET_MEDIA_QUEUE_DETAILS_PUB;
272: FND_MESSAGE.SET_NAME('CCT','CCT_MEDIA_ITEM_NOT_FOUND');
273: FND_MSG_PUB.Add;
274: x_return_status := FND_API.G_RET_STS_ERROR ;
275:
276: WHEN l_queue_position_undefined THEN
277: ROLLBACK TO GET_MEDIA_QUEUE_DETAILS_PUB;
278: FND_MESSAGE.SET_NAME('CCT','CCT_QUEUE_POSITION_UNDEFINED');
276: WHEN l_queue_position_undefined THEN
277: ROLLBACK TO GET_MEDIA_QUEUE_DETAILS_PUB;
278: FND_MESSAGE.SET_NAME('CCT','CCT_QUEUE_POSITION_UNDEFINED');
279: FND_MSG_PUB.Add;
280: x_return_status := FND_API.G_RET_STS_ERROR ;
281:
282:
283: WHEN l_queue_seq_num_undefined THEN
284: ROLLBACK TO GET_MEDIA_QUEUE_DETAILS_PUB;
283: WHEN l_queue_seq_num_undefined THEN
284: ROLLBACK TO GET_MEDIA_QUEUE_DETAILS_PUB;
285: FND_MESSAGE.SET_NAME('CCT','CCT_QUEUE_SEQ_NUM_UNDEFINED');
286: FND_MSG_PUB.Add;
287: x_return_status := FND_API.G_RET_STS_ERROR ;
288:
289:
290: WHEN FND_API.G_EXC_ERROR THEN
291: ROLLBACK TO GET_MEDIA_QUEUE_DETAILS_PUB;
286: FND_MSG_PUB.Add;
287: x_return_status := FND_API.G_RET_STS_ERROR ;
288:
289:
290: WHEN FND_API.G_EXC_ERROR THEN
291: ROLLBACK TO GET_MEDIA_QUEUE_DETAILS_PUB;
292: x_return_status := FND_API.G_RET_STS_ERROR ;
293: FND_MSG_PUB.Count_And_Get
294: ( p_count => x_msg_count ,
288:
289:
290: WHEN FND_API.G_EXC_ERROR THEN
291: ROLLBACK TO GET_MEDIA_QUEUE_DETAILS_PUB;
292: x_return_status := FND_API.G_RET_STS_ERROR ;
293: FND_MSG_PUB.Count_And_Get
294: ( p_count => x_msg_count ,
295: p_data => x_msg_data
296: );
293: FND_MSG_PUB.Count_And_Get
294: ( p_count => x_msg_count ,
295: p_data => x_msg_data
296: );
297: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
298: ROLLBACK TO GET_MEDIA_QUEUE_DETAILS_PUB;
299: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
300: FND_MSG_PUB.Count_And_Get
301: ( p_count => x_msg_count ,
295: p_data => x_msg_data
296: );
297: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
298: ROLLBACK TO GET_MEDIA_QUEUE_DETAILS_PUB;
299: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
300: FND_MSG_PUB.Count_And_Get
301: ( p_count => x_msg_count ,
302: p_data => x_msg_data
303: );
302: p_data => x_msg_data
303: );
304: WHEN OTHERS THEN
305: ROLLBACK TO GET_MEDIA_QUEUE_DETAILS_PUB;
306: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
307: IF FND_MSG_PUB.Check_Msg_Level
308: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
309: THEN
310: FND_MSG_PUB.Add_Exc_Msg