[Home] [Help]
PACKAGE BODY: APPS.BSC_CAUSE_EFFECT_REL_PUB
Source
1 PACKAGE BODY BSC_CAUSE_EFFECT_REL_PUB AS
2 /* $Header: BSCPCAEB.pls 120.0 2005/06/01 16:00:39 appldev noship $ */
3
4 G_PKG_NAME CONSTANT VARCHAR2(30) := 'BSC_CAUSE_EFFECT_REL_PUB';
5
6
7 PROCEDURE Create_Cause_Effect_Rel(
8 p_commit IN VARCHAR2 := FND_API.G_FALSE
9 ,p_Bsc_Cause_Effect_Rel_Rec IN BSC_CAUSE_EFFECT_REL_PUB.Bsc_Cause_Effect_Rel_Rec
10 ,x_return_status OUT NOCOPY VARCHAR2
11 ,x_msg_count OUT NOCOPY NUMBER
12 ,x_msg_data OUT NOCOPY VARCHAR2
13 ) IS
14
15 BEGIN
16
17 BSC_CAUSE_EFFECT_REL_PVT.Create_Cause_Effect_Rel(p_commit
18 ,p_Bsc_Cause_Effect_Rel_Rec
19 ,x_return_status
20 ,x_msg_count
21 ,x_msg_data);
22
23 EXCEPTION
24 WHEN FND_API.G_EXC_ERROR THEN
25 rollback;
26 x_return_status := FND_API.G_RET_STS_ERROR;
27 FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
28 ,p_data => x_msg_data);
29 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
30 rollback;
31 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
32 FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
33 ,p_data => x_msg_data);
34 WHEN NO_DATA_FOUND THEN
35 rollback;
36 x_return_status := FND_API.G_RET_STS_ERROR;
37 FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
38 ,p_data => x_msg_data);
39 WHEN OTHERS THEN
40 rollback;
41 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
42 FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
43 ,p_data => x_msg_data);
44
45 END Create_Cause_Effect_Rel;
46
47 /************************************************************************************
48 ************************************************************************************/
49
50 PROCEDURE Delete_Cause_Effect_Rel(
51 p_commit IN VARCHAR2 := FND_API.G_FALSE
52 ,p_Bsc_Cause_Effect_Rel_Rec IN BSC_CAUSE_EFFECT_REL_PUB.Bsc_Cause_Effect_Rel_Rec
53 ,x_return_status OUT NOCOPY VARCHAR2
54 ,x_msg_count OUT NOCOPY NUMBER
55 ,x_msg_data OUT NOCOPY VARCHAR2
56 ) IS
57
58 BEGIN
59
60 BSC_CAUSE_EFFECT_REL_PVT.Delete_Cause_Effect_Rel(p_commit
61 ,p_Bsc_Cause_Effect_Rel_Rec
62 ,x_return_status
63 ,x_msg_count
64 ,x_msg_data);
65
66 EXCEPTION
67 WHEN FND_API.G_EXC_ERROR THEN
68 rollback;
69 x_return_status := FND_API.G_RET_STS_ERROR;
70 FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
71 ,p_data => x_msg_data);
72 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
73 rollback;
74 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
75 FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
76 ,p_data => x_msg_data);
77 WHEN NO_DATA_FOUND THEN
78 rollback;
79 x_return_status := FND_API.G_RET_STS_ERROR;
80 FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
81 ,p_data => x_msg_data);
82 WHEN OTHERS THEN
83 rollback;
84 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
85 FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
86 ,p_data => x_msg_data);
87
88 END Delete_Cause_Effect_Rel;
89
90 /************************************************************************************
91 ************************************************************************************/
92
93 PROCEDURE Delete_All_Cause_Effect_Rels(
94 p_commit IN VARCHAR2 := FND_API.G_FALSE
95 ,p_indicator IN NUMBER
96 ,p_level IN VARCHAR2
97 ,x_return_status OUT NOCOPY VARCHAR2
98 ,x_msg_count OUT NOCOPY NUMBER
99 ,x_msg_data OUT NOCOPY VARCHAR2
100 ) IS
101
102 BEGIN
103
104 BSC_CAUSE_EFFECT_REL_PVT.Delete_All_Cause_Effect_Rels(p_commit
105 ,p_indicator
106 ,p_level
107 ,x_return_status
108 ,x_msg_count
109 ,x_msg_data);
110
111 EXCEPTION
112 WHEN FND_API.G_EXC_ERROR THEN
113 rollback;
114 x_return_status := FND_API.G_RET_STS_ERROR;
115 FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
116 ,p_data => x_msg_data);
117 WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
118 rollback;
119 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
120 FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
121 ,p_data => x_msg_data);
122 WHEN NO_DATA_FOUND THEN
123 rollback;
124 x_return_status := FND_API.G_RET_STS_ERROR;
125 FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
126 ,p_data => x_msg_data);
127 WHEN OTHERS THEN
128 rollback;
129 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
130 FND_MSG_PUB.Count_And_Get( p_count => x_msg_count
131 ,p_data => x_msg_data);
132
133 END Delete_All_Cause_Effect_Rels;
134
135 /************************************************************************************
136 ************************************************************************************/
137
138 END BSC_CAUSE_EFFECT_REL_PUB;