1 Package body AHL_DI_SUBSCRIPTION_CUHK AS
2 /* $Header: AHLCSUBB.pls 115.2 2002/12/04 08:21:12 pbarman noship $ */
3
4
5
6 PROCEDURE CREATE_SUBSCRIPTION_Pre
7 (
8
9 p_x_subscription_tbl IN OUT NOCOPY AHL_DI_SUBSCRIPTION_PVT.subscription_tbl ,
10 x_return_status OUT NOCOPY VARCHAR2 ,
11 x_msg_count OUT NOCOPY NUMBER ,
12 x_msg_data OUT NOCOPY VARCHAR2)
13
14 AS
15
16 Begin
17
18 x_return_status:=FND_API.G_RET_STS_SUCCESS;
19 Exception
20 When Others Then
21 x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
22 End CREATE_SUBSCRIPTION_Pre;
23
24
25 PROCEDURE CREATE_SUBSCRIPTION_Post
26 (
27
28 p_subscription_tbl IN AHL_DI_SUBSCRIPTION_PVT.subscription_tbl ,
29 x_return_status OUT NOCOPY VARCHAR2 ,
30 x_msg_count OUT NOCOPY NUMBER ,
31 x_msg_data OUT NOCOPY VARCHAR2)
32
33 AS
34
35 Begin
36 x_return_status:=FND_API.G_RET_STS_SUCCESS;
37 Exception
38 When Others Then
39 x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
40 End CREATE_SUBSCRIPTION_Post;
41
42
43 PROCEDURE MODIFY_SUBSCRIPTION_Pre
44 (
45
46 p_x_subscription_tbl IN OUT NOCOPY AHL_DI_SUBSCRIPTION_PVT.subscription_tbl ,
47 x_return_status OUT NOCOPY VARCHAR2 ,
48 x_msg_count OUT NOCOPY NUMBER ,
49 x_msg_data OUT NOCOPY VARCHAR2)
50
51 AS
52
53 Begin
54 x_return_status:=FND_API.G_RET_STS_SUCCESS;
55 Exception
56 When Others Then
57 x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
58 End MODIFY_SUBSCRIPTION_Pre;
59
60
61
62 PROCEDURE MODIFY_SUBSCRIPTION_Post
63 (
64 p_subscription_tbl IN AHL_DI_SUBSCRIPTION_PVT.subscription_tbl ,
65 x_return_status OUT NOCOPY VARCHAR2 ,
66 x_msg_count OUT NOCOPY NUMBER ,
67 x_msg_data OUT NOCOPY VARCHAR2)
68
69 AS
70
71 Begin
72 x_return_status:=FND_API.G_RET_STS_SUCCESS;
73 Exception
74 When Others Then
75 x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
76 End MODIFY_SUBSCRIPTION_Post;
77
78 End AHL_DI_SUBSCRIPTION_CUHK;
79
[Home] [Help]