1: PACKAGE BODY cs_servicerequest_cuhk AS
2: /* $Header: cscsrb.pls 120.0 2006/02/09 17:06:59 spusegao noship $ */
3:
4: /*****************************************************************************************
5: This is the Customer User Hook API.
4: /*****************************************************************************************
5: This is the Customer User Hook API.
6: The Customers can add customization procedures here for Pre and Post Processing.
7: ******************************************************************************************/
8: G_PKG_NAME CONSTANT VARCHAR2(30) := 'CS_ServiceRequest_CUHK';
9:
10: PROCEDURE Create_ServiceRequest_Pre
11: ( p_api_version IN NUMBER,
12: p_init_msg_list IN VARCHAR2 ,
36: l_api_name_full CONSTANT VARCHAR2(61) := G_PKG_NAME||'.'||l_api_name;
37:
38: Begin
39:
40: Savepoint CS_ServiceRequest_CUHK;
41:
42: x_return_status := fnd_api.g_ret_sts_success;
43: /*
44: -- Call to ISupport Package
116: p_data => x_msg_data );
117:
118: EXCEPTION
119: WHEN FND_API.G_EXC_ERROR THEN
120: ROLLBACK TO CS_ServiceRequest_CUHK;
121: x_return_status := FND_API.G_RET_STS_ERROR;
122: FND_MSG_PUB.Count_And_Get
123: ( p_count => x_msg_count,
124: p_data => x_msg_data );
122: FND_MSG_PUB.Count_And_Get
123: ( p_count => x_msg_count,
124: p_data => x_msg_data );
125: WHEN OTHERS THEN
126: ROLLBACK TO CS_ServiceRequest_CUHK;
127: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
128: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
129: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
130: END IF;
162: l_api_name VARCHAR2(30) := 'Create_ServiceRequest_Post';
163: l_api_name_full CONSTANT VARCHAR2(61) := G_PKG_NAME||'.'||l_api_name;
164: BEGIN
165:
166: Savepoint CS_ServiceRequest_CUHK;
167:
168: x_return_status := fnd_api.g_ret_sts_success;
169: /*
170: IBU_SR_CUHK.Create_ServiceRequest_Post(
221: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
222: p_data => x_msg_data );
223: EXCEPTION
224: WHEN FND_API.G_EXC_ERROR THEN
225: ROLLBACK TO CS_ServiceRequest_CUHK;
226: x_return_status := FND_API.G_RET_STS_ERROR;
227: FND_MSG_PUB.Count_And_Get
228: ( p_count => x_msg_count,
229: p_data => x_msg_data );
227: FND_MSG_PUB.Count_And_Get
228: ( p_count => x_msg_count,
229: p_data => x_msg_data );
230: WHEN OTHERS THEN
231: ROLLBACK TO CS_ServiceRequest_CUHK;
232: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
233: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
234: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
235: END IF;
285: l_api_name VARCHAR2(30) := 'Update_ServiceRequest_Post';
286: l_api_name_full CONSTANT VARCHAR2(61) := G_PKG_NAME||'.'||l_api_name;
287: Begin
288:
289: Savepoint CS_ServiceRequest_CUHK;
290:
291: x_return_status := fnd_api.g_ret_sts_success;
292: /*
293: -- Call to ISupport Package
362: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
363: p_data => x_msg_data );
364: EXCEPTION
365: WHEN FND_API.G_EXC_ERROR THEN
366: ROLLBACK TO CS_ServiceRequest_CUHK;
367: x_return_status := FND_API.G_RET_STS_ERROR;
368: FND_MSG_PUB.Count_And_Get
369: ( p_count => x_msg_count,
370: p_data => x_msg_data );
368: FND_MSG_PUB.Count_And_Get
369: ( p_count => x_msg_count,
370: p_data => x_msg_data );
371: WHEN OTHERS THEN
372: ROLLBACK TO CS_ServiceRequest_CUHK;
373: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
374: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
375: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
376: END IF;
424: l_api_name VARCHAR2(30) := 'Update_ServiceRequest_Post';
425: l_api_name_full CONSTANT VARCHAR2(61) := G_PKG_NAME||'.'||l_api_name;
426: BEGIN
427:
428: Savepoint CS_ServiceRequest_CUHK;
429:
430: x_return_status := fnd_api.g_ret_sts_success;
431: /*
432: IBU_SR_CUHK.Update_ServiceRequest_Post(
484: p_data => x_msg_data );
485:
486: EXCEPTION
487: WHEN FND_API.G_EXC_ERROR THEN
488: ROLLBACK TO CS_ServiceRequest_CUHK;
489: x_return_status := FND_API.G_RET_STS_ERROR;
490: FND_MSG_PUB.Count_And_Get
491: ( p_count => x_msg_count,
492: p_data => x_msg_data );
490: FND_MSG_PUB.Count_And_Get
491: ( p_count => x_msg_count,
492: p_data => x_msg_data );
493: WHEN OTHERS THEN
494: ROLLBACK TO CS_ServiceRequest_CUHK;
495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
496: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
497: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
498: END IF;
519: return false;
520: End;
521:
522:
523: END cs_servicerequest_cuhk;