12:
13: IS
14: l_api_version CONSTANT NUMBER := 1.0;
15: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_PROVISIONS';
16: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
17: l_pvnv_rec pvnv_rec_type := p_pvnv_rec;
18:
19: BEGIN
20: SAVEPOINT insert_provisions;
33: x_msg_data => x_msg_data,
34: p_pvnv_rec => p_pvnv_rec,
35: x_pvnv_rec => x_pvnv_rec);
36:
37: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
38: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
39: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
40: RAISE OKL_API.G_EXCEPTION_ERROR;
41: END IF;
34: p_pvnv_rec => p_pvnv_rec,
35: x_pvnv_rec => x_pvnv_rec);
36:
37: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
38: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
39: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
40: RAISE OKL_API.G_EXCEPTION_ERROR;
41: END IF;
42:
35: x_pvnv_rec => x_pvnv_rec);
36:
37: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
38: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
39: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
40: RAISE OKL_API.G_EXCEPTION_ERROR;
41: END IF;
42:
43: -- customer post-processing
36:
37: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
38: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
39: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
40: RAISE OKL_API.G_EXCEPTION_ERROR;
41: END IF;
42:
43: -- customer post-processing
44:
48: WHEN FND_API.G_EXC_ERROR THEN
49: ROLLBACK TO insert_provisions;
50: x_return_status := FND_API.G_RET_STS_ERROR;
51:
52: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
53: ,p_count => x_msg_count
54: ,p_data => x_msg_data);
55:
56: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
55:
56: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
57: ROLLBACK TO insert_provisions;
58: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
59: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
60: ,p_count => x_msg_count
61: ,p_data => x_msg_data);
62:
63: WHEN OTHERS THEN
62:
63: WHEN OTHERS THEN
64:
65: FND_MSG_PUB.ADD_EXC_MSG('OKL_PROCESS_PROVISIONS_PUB','CREATE_PROVISIONS');
66: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
67: ,p_count => x_msg_count
68: ,p_data => x_msg_data);
69: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
70:
82:
83: IS
84: l_api_version CONSTANT NUMBER := 1.0;
85: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_PROVISIONS';
86: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
87: l_pvnv_tbl pvnv_tbl_type := p_pvnv_tbl;
88:
89: BEGIN
90: SAVEPOINT insert_provisions;
103: p_pvnv_tbl => p_pvnv_tbl,
104: x_pvnv_tbl => x_pvnv_tbl);
105:
106:
107: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
108: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
109: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
110: RAISE OKL_API.G_EXCEPTION_ERROR;
111: END IF;
104: x_pvnv_tbl => x_pvnv_tbl);
105:
106:
107: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
108: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
109: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
110: RAISE OKL_API.G_EXCEPTION_ERROR;
111: END IF;
112:
105:
106:
107: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
108: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
109: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
110: RAISE OKL_API.G_EXCEPTION_ERROR;
111: END IF;
112:
113: -- customer post-processing
106:
107: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
108: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
109: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
110: RAISE OKL_API.G_EXCEPTION_ERROR;
111: END IF;
112:
113: -- customer post-processing
114:
118: WHEN FND_API.G_EXC_ERROR THEN
119: ROLLBACK TO insert_provisions;
120: x_return_status := FND_API.G_RET_STS_ERROR;
121:
122: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
123: ,p_count => x_msg_count
124: ,p_data => x_msg_data);
125:
126: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
125:
126: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
127: ROLLBACK TO insert_provisions;
128: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
129: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
130: ,p_count => x_msg_count
131: ,p_data => x_msg_data);
132:
133: WHEN OTHERS THEN
132:
133: WHEN OTHERS THEN
134:
135: FND_MSG_PUB.ADD_EXC_MSG('OKL_PROCESS_PROVISIONS_PUB','CREATE_PROVISIONS');
136: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
137: ,p_count => x_msg_count
138: ,p_data => x_msg_data);
139: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
140:
152:
153: IS
154: l_api_version CONSTANT NUMBER := 1.0;
155: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_PROVISIONS';
156: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
157: l_pvnv_rec pvnv_rec_type := p_pvnv_rec;
158:
159: BEGIN
160: SAVEPOINT update_provisions;
168: x_msg_count => x_msg_count,
169: x_msg_data => x_msg_data,
170: p_pvnv_rec => p_pvnv_rec,
171: x_pvnv_rec => x_pvnv_rec);
172: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
173: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
174: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
175: RAISE OKL_API.G_EXCEPTION_ERROR;
176: END IF;
169: x_msg_data => x_msg_data,
170: p_pvnv_rec => p_pvnv_rec,
171: x_pvnv_rec => x_pvnv_rec);
172: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
173: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
174: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
175: RAISE OKL_API.G_EXCEPTION_ERROR;
176: END IF;
177:
170: p_pvnv_rec => p_pvnv_rec,
171: x_pvnv_rec => x_pvnv_rec);
172: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
173: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
174: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
175: RAISE OKL_API.G_EXCEPTION_ERROR;
176: END IF;
177:
178: -- customer post-processing
171: x_pvnv_rec => x_pvnv_rec);
172: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
173: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
174: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
175: RAISE OKL_API.G_EXCEPTION_ERROR;
176: END IF;
177:
178: -- customer post-processing
179:
182: WHEN FND_API.G_EXC_ERROR THEN
183: ROLLBACK TO update_provisions;
184: x_return_status := FND_API.G_RET_STS_ERROR;
185:
186: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
187: ,p_count => x_msg_count
188: ,p_data => x_msg_data);
189:
190: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
189:
190: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
191: ROLLBACK TO update_provisions;
192: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
193: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
194: ,p_count => x_msg_count
195: ,p_data => x_msg_data);
196:
197: WHEN OTHERS THEN
196:
197: WHEN OTHERS THEN
198:
199: FND_MSG_PUB.ADD_EXC_MSG('OKL_PROCESS_PROVISIONS_PUB','CREATE_PROVISIONS');
200: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
201: ,p_count => x_msg_count
202: ,p_data => x_msg_data);
203: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
204:
216:
217: IS
218: l_api_version CONSTANT NUMBER := 1.0;
219: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_PROVISIONS';
220: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
221: l_pvnv_tbl pvnv_tbl_type := p_pvnv_tbl;
222:
223: BEGIN
224: SAVEPOINT update_provisions;
232: x_msg_count => x_msg_count,
233: x_msg_data => x_msg_data,
234: p_pvnv_tbl => p_pvnv_tbl,
235: x_pvnv_tbl => x_pvnv_tbl);
236: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
237: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
238: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
239: RAISE OKL_API.G_EXCEPTION_ERROR;
240: END IF;
233: x_msg_data => x_msg_data,
234: p_pvnv_tbl => p_pvnv_tbl,
235: x_pvnv_tbl => x_pvnv_tbl);
236: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
237: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
238: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
239: RAISE OKL_API.G_EXCEPTION_ERROR;
240: END IF;
241:
234: p_pvnv_tbl => p_pvnv_tbl,
235: x_pvnv_tbl => x_pvnv_tbl);
236: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
237: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
238: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
239: RAISE OKL_API.G_EXCEPTION_ERROR;
240: END IF;
241:
242: -- customer post-processing
235: x_pvnv_tbl => x_pvnv_tbl);
236: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
237: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
238: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
239: RAISE OKL_API.G_EXCEPTION_ERROR;
240: END IF;
241:
242: -- customer post-processing
243:
245: WHEN FND_API.G_EXC_ERROR THEN
246: ROLLBACK TO update_provisions;
247: x_return_status := FND_API.G_RET_STS_ERROR;
248:
249: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
250: ,p_count => x_msg_count
251: ,p_data => x_msg_data);
252:
253: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
252:
253: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
254: ROLLBACK TO update_provisions;
255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
256: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
257: ,p_count => x_msg_count
258: ,p_data => x_msg_data);
259:
260: WHEN OTHERS THEN
259:
260: WHEN OTHERS THEN
261:
262: FND_MSG_PUB.ADD_EXC_MSG('OKL_PROCESS_PROVISIONS_PUB','CREATE_PROVISIONS');
263: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
264: ,p_count => x_msg_count
265: ,p_data => x_msg_data);
266: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
267:
278:
279: IS
280: l_api_version CONSTANT NUMBER := 1.0;
281: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_PROVISIONS';
282: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
283: l_pvnv_rec pvnv_rec_type := p_pvnv_rec;
284:
285: BEGIN
286: SAVEPOINT delete_provisions;
293: x_return_status => x_return_Status,
294: x_msg_count => x_msg_count,
295: x_msg_data => x_msg_data,
296: p_pvnv_rec => p_pvnv_rec);
297: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
298: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
299: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
300: RAISE OKL_API.G_EXCEPTION_ERROR;
301: END IF;
294: x_msg_count => x_msg_count,
295: x_msg_data => x_msg_data,
296: p_pvnv_rec => p_pvnv_rec);
297: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
298: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
299: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
300: RAISE OKL_API.G_EXCEPTION_ERROR;
301: END IF;
302:
295: x_msg_data => x_msg_data,
296: p_pvnv_rec => p_pvnv_rec);
297: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
298: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
299: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
300: RAISE OKL_API.G_EXCEPTION_ERROR;
301: END IF;
302:
303: -- customer post-processing
296: p_pvnv_rec => p_pvnv_rec);
297: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
298: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
299: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
300: RAISE OKL_API.G_EXCEPTION_ERROR;
301: END IF;
302:
303: -- customer post-processing
304:
306: WHEN FND_API.G_EXC_ERROR THEN
307: ROLLBACK TO delete_provisions;
308: x_return_status := FND_API.G_RET_STS_ERROR;
309:
310: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
311: ,p_count => x_msg_count
312: ,p_data => x_msg_data);
313:
314: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
313:
314: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
315: ROLLBACK TO delete_provisions;
316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
317: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
318: ,p_count => x_msg_count
319: ,p_data => x_msg_data);
320:
321: WHEN OTHERS THEN
320:
321: WHEN OTHERS THEN
322:
323: FND_MSG_PUB.ADD_EXC_MSG('OKL_PROCESS_PROVISIONS_PUB','CREATE_PROVISIONS');
324: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
325: ,p_count => x_msg_count
326: ,p_data => x_msg_data);
327: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
328:
339: IS
340:
341: l_api_version CONSTANT NUMBER := 1.0;
342: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_PROVISIONS';
343: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
344: l_pvnv_tbl pvnv_tbl_type := p_pvnv_tbl;
345:
346: BEGIN
347: SAVEPOINT delete_provisions;
354: x_return_status => x_return_Status,
355: x_msg_count => x_msg_count,
356: x_msg_data => x_msg_data,
357: p_pvnv_tbl => p_pvnv_tbl);
358: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
359: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
360: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
361: RAISE OKL_API.G_EXCEPTION_ERROR;
362: END IF;
355: x_msg_count => x_msg_count,
356: x_msg_data => x_msg_data,
357: p_pvnv_tbl => p_pvnv_tbl);
358: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
359: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
360: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
361: RAISE OKL_API.G_EXCEPTION_ERROR;
362: END IF;
363:
356: x_msg_data => x_msg_data,
357: p_pvnv_tbl => p_pvnv_tbl);
358: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
359: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
360: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
361: RAISE OKL_API.G_EXCEPTION_ERROR;
362: END IF;
363:
364: -- customer post-processing
357: p_pvnv_tbl => p_pvnv_tbl);
358: IF x_return_status = OKL_API.G_RET_STS_UNEXP_ERROR THEN
359: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
360: ELSIF x_return_status = OKL_API.G_RET_STS_ERROR THEN
361: RAISE OKL_API.G_EXCEPTION_ERROR;
362: END IF;
363:
364: -- customer post-processing
365:
367: WHEN FND_API.G_EXC_ERROR THEN
368: ROLLBACK TO delete_provisions;
369: x_return_status := FND_API.G_RET_STS_ERROR;
370:
371: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
372: ,p_count => x_msg_count
373: ,p_data => x_msg_data);
374:
375: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
374:
375: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
376: ROLLBACK TO delete_provisions;
377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
378: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
379: ,p_count => x_msg_count
380: ,p_data => x_msg_data);
381:
382: WHEN OTHERS THEN
381:
382: WHEN OTHERS THEN
383:
384: FND_MSG_PUB.ADD_EXC_MSG('OKL_PROCESS_PROVISIONS_PUB','CREATE_PROVISIONS');
385: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
386: ,p_count => x_msg_count
387: ,p_data => x_msg_data);
388: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
389: