[Home] [Help]
PACKAGE BODY: APPS.OKS_SRVAVLEXC_PVT
Source
1 Package Body OKS_SRVAVLEXC_PVT AS
2 /* $Header: OKSRSVEB.pls 120.0 2005/05/25 18:30:21 appldev noship $ */
3
4 PROCEDURE insert_serv_avail_exc(
5 p_api_version IN NUMBER,
6 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
7 x_return_status OUT NOCOPY VARCHAR2,
8 x_msg_count OUT NOCOPY NUMBER,
9 x_msg_data OUT NOCOPY VARCHAR2,
10 p_saxv_rec IN saxv_rec_type,
11 x_saxv_rec OUT NOCOPY saxv_rec_type)
12
13 Is
14
15 l_api_name CONSTANT VARCHAR2(30) := 'insert_serv_avail_exc';
16 l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
17
18 Begin
19
20 oks_avlexc_pvt.insert_row
21 (
22 p_api_version ,
23 p_init_msg_list ,
24 x_return_status ,
25 x_msg_count ,
26 x_msg_data ,
27 p_saxv_rec ,
28 x_saxv_rec
29 );
30
31
32 Exception
33 When OKC_API.G_EXCEPTION_ERROR THEN
34 x_return_status := OKC_API.HANDLE_EXCEPTIONS
35 (
36 l_api_name,
37 G_PKG_NAME,
38 'OKC_API.G_RET_STS_ERROR',
39 x_msg_count,
40 x_msg_data,
41 '_PVT'
42 );
43
44 When OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
45 x_return_status := OKC_API.HANDLE_EXCEPTIONS
46 (
47 l_api_name,
48 G_PKG_NAME,
49 'OKC_API.G_RET_STS_UNEXP_ERROR',
50 x_msg_count,
51 x_msg_data,
52 '_PVT'
53 );
54
55 When OTHERS THEN
56 x_return_status := OKC_API.HANDLE_EXCEPTIONS
57 (
58 l_api_name,
59 G_PKG_NAME,
60 'OTHERS',
61 x_msg_count,
62 x_msg_data,
63 '_PVT'
64 );
65
66 End;
67
68
69
70 PROCEDURE lock_serv_avail_exc(
71 p_api_version IN NUMBER,
72 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
73 x_return_status OUT NOCOPY VARCHAR2,
74 x_msg_count OUT NOCOPY NUMBER,
75 x_msg_data OUT NOCOPY VARCHAR2,
76 p_saxv_rec IN saxv_rec_type)
77 Is
78 l_api_name CONSTANT VARCHAR2(30) := 'lock_serv_avail_exc';
79 l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
80
81 Begin
82
83 oks_avlexc_pvt.lock_row
84 (
85 p_api_version ,
86 p_init_msg_list ,
87 x_return_status ,
88 x_msg_count ,
89 x_msg_data ,
90 p_saxv_rec
91 );
92
93 Exception
94 When OKC_API.G_EXCEPTION_ERROR THEN
95 x_return_status := OKC_API.HANDLE_EXCEPTIONS
96 (
97 l_api_name,
98 G_PKG_NAME,
99 'OKC_API.G_RET_STS_ERROR',
100 x_msg_count,
101 x_msg_data,
102 '_PVT'
103 );
104
105 When OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
106 x_return_status := OKC_API.HANDLE_EXCEPTIONS
107 (
108 l_api_name,
109 G_PKG_NAME,
110 'OKC_API.G_RET_STS_UNEXP_ERROR',
111 x_msg_count,
112 x_msg_data,
113 '_PVT'
114 );
115
116 When OTHERS THEN
117 x_return_status := OKC_API.HANDLE_EXCEPTIONS
118 (
119 l_api_name,
120 G_PKG_NAME,
121 'OTHERS',
122 x_msg_count,
123 x_msg_data,
124 '_PVT'
125 );
126
127 End;
128
129
130
131 PROCEDURE update_serv_avail_exc(
132 p_api_version IN NUMBER,
133 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
134 x_return_status OUT NOCOPY VARCHAR2,
135 x_msg_count OUT NOCOPY NUMBER,
136 x_msg_data OUT NOCOPY VARCHAR2,
137 p_saxv_rec IN saxv_rec_type,
138 x_saxv_rec OUT NOCOPY saxv_rec_type)
139 Is
140 l_api_name CONSTANT VARCHAR2(30) := 'update_serv_avail_exc';
141 l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
142
143 Begin
144
145 oks_avlexc_pvt.update_row
146 (
147 p_api_version ,
148 p_init_msg_list ,
149 x_return_status ,
150 x_msg_count ,
151 x_msg_data ,
152 p_saxv_rec ,
153 x_saxv_rec
154 );
155
156 Exception
157 When OKC_API.G_EXCEPTION_ERROR THEN
158 x_return_status := OKC_API.HANDLE_EXCEPTIONS
159 (
160 l_api_name,
161 G_PKG_NAME,
162 'OKC_API.G_RET_STS_ERROR',
163 x_msg_count,
164 x_msg_data,
165 '_PVT'
166 );
167
168 When OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
169 x_return_status := OKC_API.HANDLE_EXCEPTIONS
170 (
171 l_api_name,
172 G_PKG_NAME,
173 'OKC_API.G_RET_STS_UNEXP_ERROR',
174 x_msg_count,
175 x_msg_data,
176 '_PVT'
177 );
178
179 When OTHERS THEN
180 x_return_status := OKC_API.HANDLE_EXCEPTIONS
181 (
182 l_api_name,
183 G_PKG_NAME,
184 'OTHERS',
185 x_msg_count,
186 x_msg_data,
187 '_PVT'
188 );
189
190 End;
191
192
193
194 PROCEDURE delete_serv_avail_exc(
195 p_api_version IN NUMBER,
196 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
197 x_return_status OUT NOCOPY VARCHAR2,
198 x_msg_count OUT NOCOPY NUMBER,
199 x_msg_data OUT NOCOPY VARCHAR2,
200 p_saxv_rec IN saxv_rec_type)
201 Is
202 l_api_name CONSTANT VARCHAR2(30) := 'delete_serv_avail_exc';
203 l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
204
205 Begin
206
207 oks_avlexc_pvt.delete_row
208 (
209 p_api_version ,
210 p_init_msg_list ,
211 x_return_status ,
212 x_msg_count ,
213 x_msg_data ,
214 p_saxv_rec
215 );
216
217 Exception
218 When OKC_API.G_EXCEPTION_ERROR THEN
219 x_return_status := OKC_API.HANDLE_EXCEPTIONS
220 (
221 l_api_name,
222 G_PKG_NAME,
223 'OKC_API.G_RET_STS_ERROR',
224 x_msg_count,
225 x_msg_data,
226 '_PVT'
227 );
228
229 When OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
230 x_return_status := OKC_API.HANDLE_EXCEPTIONS
231 (
232 l_api_name,
233 G_PKG_NAME,
234 'OKC_API.G_RET_STS_UNEXP_ERROR',
235 x_msg_count,
236 x_msg_data,
237 '_PVT'
238 );
239
240 When OTHERS THEN
241 x_return_status := OKC_API.HANDLE_EXCEPTIONS
242 (
243 l_api_name,
244 G_PKG_NAME,
245 'OTHERS',
246 x_msg_count,
247 x_msg_data,
248 '_PVT'
249 );
250
251 End;
252
253
254
255 PROCEDURE validate_serv_avail_exc(
256 p_api_version IN NUMBER,
257 p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
258 x_return_status OUT NOCOPY VARCHAR2,
259 x_msg_count OUT NOCOPY NUMBER,
260 x_msg_data OUT NOCOPY VARCHAR2,
261 p_saxv_rec IN saxv_rec_type)
262 Is
263 l_api_name CONSTANT VARCHAR2(30) := 'validate_serv_avail_exc';
264 l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
265
266 Begin
267
268 oks_avlexc_pvt.validate_row
269 (
270 p_api_version ,
271 p_init_msg_list ,
272 x_return_status ,
273 x_msg_count ,
274 x_msg_data ,
275 p_saxv_rec
276 );
277
278
279 Exception
280 When OKC_API.G_EXCEPTION_ERROR THEN
281 x_return_status := OKC_API.HANDLE_EXCEPTIONS
282 (
283 l_api_name,
284 G_PKG_NAME,
285 'OKC_API.G_RET_STS_ERROR',
286 x_msg_count,
287 x_msg_data,
288 '_PVT'
289 );
290
291 When OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
292 x_return_status := OKC_API.HANDLE_EXCEPTIONS
293 (
294 l_api_name,
295 G_PKG_NAME,
296 'OKC_API.G_RET_STS_UNEXP_ERROR',
297 x_msg_count,
298 x_msg_data,
299 '_PVT'
300 );
301
302 When OTHERS THEN
303 x_return_status := OKC_API.HANDLE_EXCEPTIONS
304 (
305 l_api_name,
306 G_PKG_NAME,
307 'OTHERS',
308 x_msg_count,
309 x_msg_data,
310 '_PVT'
311 );
312
313 End;
314
315 END OKS_SRVAVLEXC_PVT;