DBA Data[Home] [Help]

APPS.OKL_IRK_PVT dependencies on OKC_API

Line 44: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

40: -- in a OKL_API.ERROR_TBL_TYPE, and returns it.
41: FUNCTION find_highest_exception(
42: p_error_tbl IN OKL_API.ERROR_TBL_TYPE
43: ) RETURN VARCHAR2 IS
44: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
45: i INTEGER := 1;
46: BEGIN
47: IF (p_error_tbl.COUNT > 0) THEN
48: i := p_error_tbl.FIRST;

Line 50: IF (p_error_tbl(i).error_type <> OKC_API.G_RET_STS_SUCCESS) THEN

46: BEGIN
47: IF (p_error_tbl.COUNT > 0) THEN
48: i := p_error_tbl.FIRST;
49: LOOP
50: IF (p_error_tbl(i).error_type <> OKC_API.G_RET_STS_SUCCESS) THEN
51: IF (l_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN
52: l_return_status := p_error_tbl(i).error_type;
53: END IF;
54: END IF;

Line 51: IF (l_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN

47: IF (p_error_tbl.COUNT > 0) THEN
48: i := p_error_tbl.FIRST;
49: LOOP
50: IF (p_error_tbl(i).error_type <> OKC_API.G_RET_STS_SUCCESS) THEN
51: IF (l_return_status <> OKC_API.G_RET_STS_UNEXP_ERROR) THEN
52: l_return_status := p_error_tbl(i).error_type;
53: END IF;
54: END IF;
55: EXIT WHEN (i = p_error_tbl.LAST);

Line 182: x_return_status := OKC_API.G_RET_STS_SUCCESS;

178: ) RETURN irkv_rec_type IS
179: l_irkv_rec irkv_rec_type;
180: l_row_notfound BOOLEAN := TRUE;
181: BEGIN
182: x_return_status := OKC_API.G_RET_STS_SUCCESS;
183: l_irkv_rec := get_rec(p_irkv_rec, l_row_notfound);
184: IF (l_row_notfound) THEN
185: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
186: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 185: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');

181: BEGIN
182: x_return_status := OKC_API.G_RET_STS_SUCCESS;
183: l_irkv_rec := get_rec(p_irkv_rec, l_row_notfound);
184: IF (l_row_notfound) THEN
185: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
186: x_return_status := OKC_API.G_RET_STS_ERROR;
187: END IF;
188: RETURN(l_irkv_rec);
189: END get_rec;

Line 186: x_return_status := OKC_API.G_RET_STS_ERROR;

182: x_return_status := OKC_API.G_RET_STS_SUCCESS;
183: l_irkv_rec := get_rec(p_irkv_rec, l_row_notfound);
184: IF (l_row_notfound) THEN
185: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
186: x_return_status := OKC_API.G_RET_STS_ERROR;
187: END IF;
188: RETURN(l_irkv_rec);
189: END get_rec;
190: -----------------------------------------------------------

Line 289: x_return_status := OKC_API.G_RET_STS_SUCCESS;

285: ) RETURN irk_rec_type IS
286: l_irk_rec irk_rec_type;
287: l_row_notfound BOOLEAN := TRUE;
288: BEGIN
289: x_return_status := OKC_API.G_RET_STS_SUCCESS;
290: l_irk_rec := get_rec(p_irk_rec, l_row_notfound);
291: IF (l_row_notfound) THEN
292: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
293: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 292: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');

288: BEGIN
289: x_return_status := OKC_API.G_RET_STS_SUCCESS;
290: l_irk_rec := get_rec(p_irk_rec, l_row_notfound);
291: IF (l_row_notfound) THEN
292: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
293: x_return_status := OKC_API.G_RET_STS_ERROR;
294: END IF;
295: RETURN(l_irk_rec);
296: END get_rec;

Line 293: x_return_status := OKC_API.G_RET_STS_ERROR;

289: x_return_status := OKC_API.G_RET_STS_SUCCESS;
290: l_irk_rec := get_rec(p_irk_rec, l_row_notfound);
291: IF (l_row_notfound) THEN
292: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
293: x_return_status := OKC_API.G_RET_STS_ERROR;
294: END IF;
295: RETURN(l_irk_rec);
296: END get_rec;
297: -----------------------------------------------------------

Line 315: IF (l_irkv_rec.id = OKC_API.G_MISS_NUM ) THEN

311: p_irkv_rec IN irkv_rec_type
312: ) RETURN irkv_rec_type IS
313: l_irkv_rec irkv_rec_type := p_irkv_rec;
314: BEGIN
315: IF (l_irkv_rec.id = OKC_API.G_MISS_NUM ) THEN
316: l_irkv_rec.id := NULL;
317: END IF;
318: IF (l_irkv_rec.ranking_seq = OKC_API.G_MISS_NUM ) THEN
319: l_irkv_rec.ranking_seq := NULL;

Line 318: IF (l_irkv_rec.ranking_seq = OKC_API.G_MISS_NUM ) THEN

314: BEGIN
315: IF (l_irkv_rec.id = OKC_API.G_MISS_NUM ) THEN
316: l_irkv_rec.id := NULL;
317: END IF;
318: IF (l_irkv_rec.ranking_seq = OKC_API.G_MISS_NUM ) THEN
319: l_irkv_rec.ranking_seq := NULL;
320: END IF;
321: IF (l_irkv_rec.object_version_number = OKC_API.G_MISS_NUM ) THEN
322: l_irkv_rec.object_version_number := NULL;

Line 321: IF (l_irkv_rec.object_version_number = OKC_API.G_MISS_NUM ) THEN

317: END IF;
318: IF (l_irkv_rec.ranking_seq = OKC_API.G_MISS_NUM ) THEN
319: l_irkv_rec.ranking_seq := NULL;
320: END IF;
321: IF (l_irkv_rec.object_version_number = OKC_API.G_MISS_NUM ) THEN
322: l_irkv_rec.object_version_number := NULL;
323: END IF;
324: IF (l_irkv_rec.date_from = OKC_API.G_MISS_DATE ) THEN
325: l_irkv_rec.date_from := NULL;

Line 324: IF (l_irkv_rec.date_from = OKC_API.G_MISS_DATE ) THEN

320: END IF;
321: IF (l_irkv_rec.object_version_number = OKC_API.G_MISS_NUM ) THEN
322: l_irkv_rec.object_version_number := NULL;
323: END IF;
324: IF (l_irkv_rec.date_from = OKC_API.G_MISS_DATE ) THEN
325: l_irkv_rec.date_from := NULL;
326: END IF;
327: IF (l_irkv_rec.date_to = OKC_API.G_MISS_DATE ) THEN
328: l_irkv_rec.date_to := NULL;

Line 327: IF (l_irkv_rec.date_to = OKC_API.G_MISS_DATE ) THEN

323: END IF;
324: IF (l_irkv_rec.date_from = OKC_API.G_MISS_DATE ) THEN
325: l_irkv_rec.date_from := NULL;
326: END IF;
327: IF (l_irkv_rec.date_to = OKC_API.G_MISS_DATE ) THEN
328: l_irkv_rec.date_to := NULL;
329: END IF;
330: IF (l_irkv_rec.isu_id = OKC_API.G_MISS_NUM ) THEN
331: l_irkv_rec.isu_id := NULL;

Line 330: IF (l_irkv_rec.isu_id = OKC_API.G_MISS_NUM ) THEN

326: END IF;
327: IF (l_irkv_rec.date_to = OKC_API.G_MISS_DATE ) THEN
328: l_irkv_rec.date_to := NULL;
329: END IF;
330: IF (l_irkv_rec.isu_id = OKC_API.G_MISS_NUM ) THEN
331: l_irkv_rec.isu_id := NULL;
332: END IF;
333: IF (l_irkv_rec.ic_code = OKC_API.G_MISS_CHAR ) THEN
334: l_irkv_rec.ic_code := NULL;

Line 333: IF (l_irkv_rec.ic_code = OKC_API.G_MISS_CHAR ) THEN

329: END IF;
330: IF (l_irkv_rec.isu_id = OKC_API.G_MISS_NUM ) THEN
331: l_irkv_rec.isu_id := NULL;
332: END IF;
333: IF (l_irkv_rec.ic_code = OKC_API.G_MISS_CHAR ) THEN
334: l_irkv_rec.ic_code := NULL;
335: END IF;
336: IF (l_irkv_rec.attribute_category = OKC_API.G_MISS_CHAR ) THEN
337: l_irkv_rec.attribute_category := NULL;

Line 336: IF (l_irkv_rec.attribute_category = OKC_API.G_MISS_CHAR ) THEN

332: END IF;
333: IF (l_irkv_rec.ic_code = OKC_API.G_MISS_CHAR ) THEN
334: l_irkv_rec.ic_code := NULL;
335: END IF;
336: IF (l_irkv_rec.attribute_category = OKC_API.G_MISS_CHAR ) THEN
337: l_irkv_rec.attribute_category := NULL;
338: END IF;
339: IF (l_irkv_rec.attribute1 = OKC_API.G_MISS_CHAR ) THEN
340: l_irkv_rec.attribute1 := NULL;

Line 339: IF (l_irkv_rec.attribute1 = OKC_API.G_MISS_CHAR ) THEN

335: END IF;
336: IF (l_irkv_rec.attribute_category = OKC_API.G_MISS_CHAR ) THEN
337: l_irkv_rec.attribute_category := NULL;
338: END IF;
339: IF (l_irkv_rec.attribute1 = OKC_API.G_MISS_CHAR ) THEN
340: l_irkv_rec.attribute1 := NULL;
341: END IF;
342: IF (l_irkv_rec.attribute2 = OKC_API.G_MISS_CHAR ) THEN
343: l_irkv_rec.attribute2 := NULL;

Line 342: IF (l_irkv_rec.attribute2 = OKC_API.G_MISS_CHAR ) THEN

338: END IF;
339: IF (l_irkv_rec.attribute1 = OKC_API.G_MISS_CHAR ) THEN
340: l_irkv_rec.attribute1 := NULL;
341: END IF;
342: IF (l_irkv_rec.attribute2 = OKC_API.G_MISS_CHAR ) THEN
343: l_irkv_rec.attribute2 := NULL;
344: END IF;
345: IF (l_irkv_rec.attribute3 = OKC_API.G_MISS_CHAR ) THEN
346: l_irkv_rec.attribute3 := NULL;

Line 345: IF (l_irkv_rec.attribute3 = OKC_API.G_MISS_CHAR ) THEN

341: END IF;
342: IF (l_irkv_rec.attribute2 = OKC_API.G_MISS_CHAR ) THEN
343: l_irkv_rec.attribute2 := NULL;
344: END IF;
345: IF (l_irkv_rec.attribute3 = OKC_API.G_MISS_CHAR ) THEN
346: l_irkv_rec.attribute3 := NULL;
347: END IF;
348: IF (l_irkv_rec.attribute4 = OKC_API.G_MISS_CHAR ) THEN
349: l_irkv_rec.attribute4 := NULL;

Line 348: IF (l_irkv_rec.attribute4 = OKC_API.G_MISS_CHAR ) THEN

344: END IF;
345: IF (l_irkv_rec.attribute3 = OKC_API.G_MISS_CHAR ) THEN
346: l_irkv_rec.attribute3 := NULL;
347: END IF;
348: IF (l_irkv_rec.attribute4 = OKC_API.G_MISS_CHAR ) THEN
349: l_irkv_rec.attribute4 := NULL;
350: END IF;
351: IF (l_irkv_rec.attribute5 = OKC_API.G_MISS_CHAR ) THEN
352: l_irkv_rec.attribute5 := NULL;

Line 351: IF (l_irkv_rec.attribute5 = OKC_API.G_MISS_CHAR ) THEN

347: END IF;
348: IF (l_irkv_rec.attribute4 = OKC_API.G_MISS_CHAR ) THEN
349: l_irkv_rec.attribute4 := NULL;
350: END IF;
351: IF (l_irkv_rec.attribute5 = OKC_API.G_MISS_CHAR ) THEN
352: l_irkv_rec.attribute5 := NULL;
353: END IF;
354: IF (l_irkv_rec.attribute6 = OKC_API.G_MISS_CHAR ) THEN
355: l_irkv_rec.attribute6 := NULL;

Line 354: IF (l_irkv_rec.attribute6 = OKC_API.G_MISS_CHAR ) THEN

350: END IF;
351: IF (l_irkv_rec.attribute5 = OKC_API.G_MISS_CHAR ) THEN
352: l_irkv_rec.attribute5 := NULL;
353: END IF;
354: IF (l_irkv_rec.attribute6 = OKC_API.G_MISS_CHAR ) THEN
355: l_irkv_rec.attribute6 := NULL;
356: END IF;
357: IF (l_irkv_rec.attribute7 = OKC_API.G_MISS_CHAR ) THEN
358: l_irkv_rec.attribute7 := NULL;

Line 357: IF (l_irkv_rec.attribute7 = OKC_API.G_MISS_CHAR ) THEN

353: END IF;
354: IF (l_irkv_rec.attribute6 = OKC_API.G_MISS_CHAR ) THEN
355: l_irkv_rec.attribute6 := NULL;
356: END IF;
357: IF (l_irkv_rec.attribute7 = OKC_API.G_MISS_CHAR ) THEN
358: l_irkv_rec.attribute7 := NULL;
359: END IF;
360: IF (l_irkv_rec.attribute8 = OKC_API.G_MISS_CHAR ) THEN
361: l_irkv_rec.attribute8 := NULL;

Line 360: IF (l_irkv_rec.attribute8 = OKC_API.G_MISS_CHAR ) THEN

356: END IF;
357: IF (l_irkv_rec.attribute7 = OKC_API.G_MISS_CHAR ) THEN
358: l_irkv_rec.attribute7 := NULL;
359: END IF;
360: IF (l_irkv_rec.attribute8 = OKC_API.G_MISS_CHAR ) THEN
361: l_irkv_rec.attribute8 := NULL;
362: END IF;
363: IF (l_irkv_rec.attribute9 = OKC_API.G_MISS_CHAR ) THEN
364: l_irkv_rec.attribute9 := NULL;

Line 363: IF (l_irkv_rec.attribute9 = OKC_API.G_MISS_CHAR ) THEN

359: END IF;
360: IF (l_irkv_rec.attribute8 = OKC_API.G_MISS_CHAR ) THEN
361: l_irkv_rec.attribute8 := NULL;
362: END IF;
363: IF (l_irkv_rec.attribute9 = OKC_API.G_MISS_CHAR ) THEN
364: l_irkv_rec.attribute9 := NULL;
365: END IF;
366: IF (l_irkv_rec.attribute10 = OKC_API.G_MISS_CHAR ) THEN
367: l_irkv_rec.attribute10 := NULL;

Line 366: IF (l_irkv_rec.attribute10 = OKC_API.G_MISS_CHAR ) THEN

362: END IF;
363: IF (l_irkv_rec.attribute9 = OKC_API.G_MISS_CHAR ) THEN
364: l_irkv_rec.attribute9 := NULL;
365: END IF;
366: IF (l_irkv_rec.attribute10 = OKC_API.G_MISS_CHAR ) THEN
367: l_irkv_rec.attribute10 := NULL;
368: END IF;
369: IF (l_irkv_rec.attribute11 = OKC_API.G_MISS_CHAR ) THEN
370: l_irkv_rec.attribute11 := NULL;

Line 369: IF (l_irkv_rec.attribute11 = OKC_API.G_MISS_CHAR ) THEN

365: END IF;
366: IF (l_irkv_rec.attribute10 = OKC_API.G_MISS_CHAR ) THEN
367: l_irkv_rec.attribute10 := NULL;
368: END IF;
369: IF (l_irkv_rec.attribute11 = OKC_API.G_MISS_CHAR ) THEN
370: l_irkv_rec.attribute11 := NULL;
371: END IF;
372: IF (l_irkv_rec.attribute12 = OKC_API.G_MISS_CHAR ) THEN
373: l_irkv_rec.attribute12 := NULL;

Line 372: IF (l_irkv_rec.attribute12 = OKC_API.G_MISS_CHAR ) THEN

368: END IF;
369: IF (l_irkv_rec.attribute11 = OKC_API.G_MISS_CHAR ) THEN
370: l_irkv_rec.attribute11 := NULL;
371: END IF;
372: IF (l_irkv_rec.attribute12 = OKC_API.G_MISS_CHAR ) THEN
373: l_irkv_rec.attribute12 := NULL;
374: END IF;
375: IF (l_irkv_rec.attribute13 = OKC_API.G_MISS_CHAR ) THEN
376: l_irkv_rec.attribute13 := NULL;

Line 375: IF (l_irkv_rec.attribute13 = OKC_API.G_MISS_CHAR ) THEN

371: END IF;
372: IF (l_irkv_rec.attribute12 = OKC_API.G_MISS_CHAR ) THEN
373: l_irkv_rec.attribute12 := NULL;
374: END IF;
375: IF (l_irkv_rec.attribute13 = OKC_API.G_MISS_CHAR ) THEN
376: l_irkv_rec.attribute13 := NULL;
377: END IF;
378: IF (l_irkv_rec.attribute14 = OKC_API.G_MISS_CHAR ) THEN
379: l_irkv_rec.attribute14 := NULL;

Line 378: IF (l_irkv_rec.attribute14 = OKC_API.G_MISS_CHAR ) THEN

374: END IF;
375: IF (l_irkv_rec.attribute13 = OKC_API.G_MISS_CHAR ) THEN
376: l_irkv_rec.attribute13 := NULL;
377: END IF;
378: IF (l_irkv_rec.attribute14 = OKC_API.G_MISS_CHAR ) THEN
379: l_irkv_rec.attribute14 := NULL;
380: END IF;
381: IF (l_irkv_rec.attribute15 = OKC_API.G_MISS_CHAR ) THEN
382: l_irkv_rec.attribute15 := NULL;

Line 381: IF (l_irkv_rec.attribute15 = OKC_API.G_MISS_CHAR ) THEN

377: END IF;
378: IF (l_irkv_rec.attribute14 = OKC_API.G_MISS_CHAR ) THEN
379: l_irkv_rec.attribute14 := NULL;
380: END IF;
381: IF (l_irkv_rec.attribute15 = OKC_API.G_MISS_CHAR ) THEN
382: l_irkv_rec.attribute15 := NULL;
383: END IF;
384: IF (l_irkv_rec.created_by = OKC_API.G_MISS_NUM ) THEN
385: l_irkv_rec.created_by := NULL;

Line 384: IF (l_irkv_rec.created_by = OKC_API.G_MISS_NUM ) THEN

380: END IF;
381: IF (l_irkv_rec.attribute15 = OKC_API.G_MISS_CHAR ) THEN
382: l_irkv_rec.attribute15 := NULL;
383: END IF;
384: IF (l_irkv_rec.created_by = OKC_API.G_MISS_NUM ) THEN
385: l_irkv_rec.created_by := NULL;
386: END IF;
387: IF (l_irkv_rec.creation_date = OKC_API.G_MISS_DATE ) THEN
388: l_irkv_rec.creation_date := NULL;

Line 387: IF (l_irkv_rec.creation_date = OKC_API.G_MISS_DATE ) THEN

383: END IF;
384: IF (l_irkv_rec.created_by = OKC_API.G_MISS_NUM ) THEN
385: l_irkv_rec.created_by := NULL;
386: END IF;
387: IF (l_irkv_rec.creation_date = OKC_API.G_MISS_DATE ) THEN
388: l_irkv_rec.creation_date := NULL;
389: END IF;
390: IF (l_irkv_rec.last_updated_by = OKC_API.G_MISS_NUM ) THEN
391: l_irkv_rec.last_updated_by := NULL;

Line 390: IF (l_irkv_rec.last_updated_by = OKC_API.G_MISS_NUM ) THEN

386: END IF;
387: IF (l_irkv_rec.creation_date = OKC_API.G_MISS_DATE ) THEN
388: l_irkv_rec.creation_date := NULL;
389: END IF;
390: IF (l_irkv_rec.last_updated_by = OKC_API.G_MISS_NUM ) THEN
391: l_irkv_rec.last_updated_by := NULL;
392: END IF;
393: IF (l_irkv_rec.last_update_date = OKC_API.G_MISS_DATE ) THEN
394: l_irkv_rec.last_update_date := NULL;

Line 393: IF (l_irkv_rec.last_update_date = OKC_API.G_MISS_DATE ) THEN

389: END IF;
390: IF (l_irkv_rec.last_updated_by = OKC_API.G_MISS_NUM ) THEN
391: l_irkv_rec.last_updated_by := NULL;
392: END IF;
393: IF (l_irkv_rec.last_update_date = OKC_API.G_MISS_DATE ) THEN
394: l_irkv_rec.last_update_date := NULL;
395: END IF;
396: IF (l_irkv_rec.last_update_login = OKC_API.G_MISS_NUM ) THEN
397: l_irkv_rec.last_update_login := NULL;

Line 396: IF (l_irkv_rec.last_update_login = OKC_API.G_MISS_NUM ) THEN

392: END IF;
393: IF (l_irkv_rec.last_update_date = OKC_API.G_MISS_DATE ) THEN
394: l_irkv_rec.last_update_date := NULL;
395: END IF;
396: IF (l_irkv_rec.last_update_login = OKC_API.G_MISS_NUM ) THEN
397: l_irkv_rec.last_update_login := NULL;
398: END IF;
399: RETURN(l_irkv_rec);
400: END null_out_defaults;

Line 408: x_return_status := OKC_API.G_RET_STS_SUCCESS;

404: PROCEDURE validate_id(
405: x_return_status OUT NOCOPY VARCHAR2,
406: p_id IN NUMBER) IS
407: BEGIN
408: x_return_status := OKC_API.G_RET_STS_SUCCESS;
409: IF (p_id = OKC_API.G_MISS_NUM OR
410: p_id IS NULL)
411: THEN
412: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');

Line 409: IF (p_id = OKC_API.G_MISS_NUM OR

405: x_return_status OUT NOCOPY VARCHAR2,
406: p_id IN NUMBER) IS
407: BEGIN
408: x_return_status := OKC_API.G_RET_STS_SUCCESS;
409: IF (p_id = OKC_API.G_MISS_NUM OR
410: p_id IS NULL)
411: THEN
412: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');
413: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 412: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');

408: x_return_status := OKC_API.G_RET_STS_SUCCESS;
409: IF (p_id = OKC_API.G_MISS_NUM OR
410: p_id IS NULL)
411: THEN
412: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');
413: x_return_status := OKC_API.G_RET_STS_ERROR;
414: RAISE G_EXCEPTION_HALT_VALIDATION;
415: END IF;
416:

Line 413: x_return_status := OKC_API.G_RET_STS_ERROR;

409: IF (p_id = OKC_API.G_MISS_NUM OR
410: p_id IS NULL)
411: THEN
412: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');
413: x_return_status := OKC_API.G_RET_STS_ERROR;
414: RAISE G_EXCEPTION_HALT_VALIDATION;
415: END IF;
416:
417: -- Verify the value fits the length of the column in the database

Line 423: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

419: ,p_col_name => 'id'
420: ,p_col_value => p_id
421: ,x_return_status => x_return_status);
422: -- verify that length is within allowed limits
423: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
424: x_return_status := OKC_API.G_RET_STS_ERROR;
425: RAISE G_EXCEPTION_HALT_VALIDATION;
426: END IF;
427: EXCEPTION

Line 424: x_return_status := OKC_API.G_RET_STS_ERROR;

420: ,p_col_value => p_id
421: ,x_return_status => x_return_status);
422: -- verify that length is within allowed limits
423: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
424: x_return_status := OKC_API.G_RET_STS_ERROR;
425: RAISE G_EXCEPTION_HALT_VALIDATION;
426: END IF;
427: EXCEPTION
428: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 431: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

427: EXCEPTION
428: WHEN G_EXCEPTION_HALT_VALIDATION THEN
429: null;
430: WHEN OTHERS THEN
431: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
432: ,p_msg_name => G_UNEXPECTED_ERROR
433: ,p_token1 => G_SQLCODE_TOKEN
434: ,p_token1_value => SQLCODE
435: ,p_token2 => G_SQLERRM_TOKEN

Line 437: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

433: ,p_token1 => G_SQLCODE_TOKEN
434: ,p_token1_value => SQLCODE
435: ,p_token2 => G_SQLERRM_TOKEN
436: ,p_token2_value => SQLERRM);
437: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
438: END validate_id;
439: ------------------------------------------
440: -- Validate_Attributes for: RANKING_SEQ --
441: ------------------------------------------

Line 446: x_return_status := OKC_API.G_RET_STS_SUCCESS;

442: PROCEDURE validate_ranking_seq(
443: x_return_status OUT NOCOPY VARCHAR2,
444: p_ranking_seq IN NUMBER) IS
445: BEGIN
446: x_return_status := OKC_API.G_RET_STS_SUCCESS;
447: IF (p_ranking_seq = OKC_API.G_MISS_NUM OR
448: p_ranking_seq IS NULL)
449: THEN
450: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ranking_seq');

Line 447: IF (p_ranking_seq = OKC_API.G_MISS_NUM OR

443: x_return_status OUT NOCOPY VARCHAR2,
444: p_ranking_seq IN NUMBER) IS
445: BEGIN
446: x_return_status := OKC_API.G_RET_STS_SUCCESS;
447: IF (p_ranking_seq = OKC_API.G_MISS_NUM OR
448: p_ranking_seq IS NULL)
449: THEN
450: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ranking_seq');
451: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 450: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ranking_seq');

446: x_return_status := OKC_API.G_RET_STS_SUCCESS;
447: IF (p_ranking_seq = OKC_API.G_MISS_NUM OR
448: p_ranking_seq IS NULL)
449: THEN
450: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ranking_seq');
451: x_return_status := OKC_API.G_RET_STS_ERROR;
452: RAISE G_EXCEPTION_HALT_VALIDATION;
453: END IF;
454:

Line 451: x_return_status := OKC_API.G_RET_STS_ERROR;

447: IF (p_ranking_seq = OKC_API.G_MISS_NUM OR
448: p_ranking_seq IS NULL)
449: THEN
450: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'ranking_seq');
451: x_return_status := OKC_API.G_RET_STS_ERROR;
452: RAISE G_EXCEPTION_HALT_VALIDATION;
453: END IF;
454:
455: -- Verify the value fits the length of the column in the database

Line 461: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

457: ,p_col_name => 'ranking_seq'
458: ,p_col_value => p_ranking_seq
459: ,x_return_status => x_return_status);
460: -- verify that length is within allowed limits
461: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
462: x_return_status := OKC_API.G_RET_STS_ERROR;
463: RAISE G_EXCEPTION_HALT_VALIDATION;
464: END IF;
465: EXCEPTION

Line 462: x_return_status := OKC_API.G_RET_STS_ERROR;

458: ,p_col_value => p_ranking_seq
459: ,x_return_status => x_return_status);
460: -- verify that length is within allowed limits
461: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
462: x_return_status := OKC_API.G_RET_STS_ERROR;
463: RAISE G_EXCEPTION_HALT_VALIDATION;
464: END IF;
465: EXCEPTION
466: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 469: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

465: EXCEPTION
466: WHEN G_EXCEPTION_HALT_VALIDATION THEN
467: null;
468: WHEN OTHERS THEN
469: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
470: ,p_msg_name => G_UNEXPECTED_ERROR
471: ,p_token1 => G_SQLCODE_TOKEN
472: ,p_token1_value => SQLCODE
473: ,p_token2 => G_SQLERRM_TOKEN

Line 475: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

471: ,p_token1 => G_SQLCODE_TOKEN
472: ,p_token1_value => SQLCODE
473: ,p_token2 => G_SQLERRM_TOKEN
474: ,p_token2_value => SQLERRM);
475: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
476: END validate_ranking_seq;
477: ----------------------------------------------------
478: -- Validate_Attributes for: OBJECT_VERSION_NUMBER --
479: ----------------------------------------------------

Line 484: x_return_status := OKC_API.G_RET_STS_SUCCESS;

480: PROCEDURE validate_object_version_number(
481: x_return_status OUT NOCOPY VARCHAR2,
482: p_object_version_number IN NUMBER) IS
483: BEGIN
484: x_return_status := OKC_API.G_RET_STS_SUCCESS;
485: IF (p_object_version_number = OKC_API.G_MISS_NUM OR
486: p_object_version_number IS NULL)
487: THEN
488: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');

Line 485: IF (p_object_version_number = OKC_API.G_MISS_NUM OR

481: x_return_status OUT NOCOPY VARCHAR2,
482: p_object_version_number IN NUMBER) IS
483: BEGIN
484: x_return_status := OKC_API.G_RET_STS_SUCCESS;
485: IF (p_object_version_number = OKC_API.G_MISS_NUM OR
486: p_object_version_number IS NULL)
487: THEN
488: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');
489: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 488: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');

484: x_return_status := OKC_API.G_RET_STS_SUCCESS;
485: IF (p_object_version_number = OKC_API.G_MISS_NUM OR
486: p_object_version_number IS NULL)
487: THEN
488: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');
489: x_return_status := OKC_API.G_RET_STS_ERROR;
490: RAISE G_EXCEPTION_HALT_VALIDATION;
491: END IF;
492:

Line 489: x_return_status := OKC_API.G_RET_STS_ERROR;

485: IF (p_object_version_number = OKC_API.G_MISS_NUM OR
486: p_object_version_number IS NULL)
487: THEN
488: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');
489: x_return_status := OKC_API.G_RET_STS_ERROR;
490: RAISE G_EXCEPTION_HALT_VALIDATION;
491: END IF;
492:
493: -- Verify the value fits the length of the column in the database

Line 499: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

495: ,p_col_name => 'object_version_number'
496: ,p_col_value => p_object_version_number
497: ,x_return_status => x_return_status);
498: -- verify that length is within allowed limits
499: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
500: x_return_status := OKC_API.G_RET_STS_ERROR;
501: RAISE G_EXCEPTION_HALT_VALIDATION;
502: END IF;
503: EXCEPTION

Line 500: x_return_status := OKC_API.G_RET_STS_ERROR;

496: ,p_col_value => p_object_version_number
497: ,x_return_status => x_return_status);
498: -- verify that length is within allowed limits
499: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
500: x_return_status := OKC_API.G_RET_STS_ERROR;
501: RAISE G_EXCEPTION_HALT_VALIDATION;
502: END IF;
503: EXCEPTION
504: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 507: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

503: EXCEPTION
504: WHEN G_EXCEPTION_HALT_VALIDATION THEN
505: null;
506: WHEN OTHERS THEN
507: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
508: ,p_msg_name => G_UNEXPECTED_ERROR
509: ,p_token1 => G_SQLCODE_TOKEN
510: ,p_token1_value => SQLCODE
511: ,p_token2 => G_SQLERRM_TOKEN

Line 513: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

509: ,p_token1 => G_SQLCODE_TOKEN
510: ,p_token1_value => SQLCODE
511: ,p_token2 => G_SQLERRM_TOKEN
512: ,p_token2_value => SQLERRM);
513: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
514: END validate_object_version_number;
515: ----------------------------------------
516: -- Validate_Attributes for: DATE_FROM --
517: ----------------------------------------

Line 524: x_return_status := OKC_API.G_RET_STS_SUCCESS;

520: p_date_from IN DATE,
521: p_object_version_number IN NUMBER
522: ) IS
523: BEGIN
524: x_return_status := OKC_API.G_RET_STS_SUCCESS;
525: IF (p_date_from = OKC_API.G_MISS_DATE OR
526: p_date_from IS NULL)
527: THEN
528: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Effective From');

Line 525: IF (p_date_from = OKC_API.G_MISS_DATE OR

521: p_object_version_number IN NUMBER
522: ) IS
523: BEGIN
524: x_return_status := OKC_API.G_RET_STS_SUCCESS;
525: IF (p_date_from = OKC_API.G_MISS_DATE OR
526: p_date_from IS NULL)
527: THEN
528: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Effective From');
529: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 528: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Effective From');

524: x_return_status := OKC_API.G_RET_STS_SUCCESS;
525: IF (p_date_from = OKC_API.G_MISS_DATE OR
526: p_date_from IS NULL)
527: THEN
528: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Effective From');
529: x_return_status := OKC_API.G_RET_STS_ERROR;
530: RAISE G_EXCEPTION_HALT_VALIDATION;
531:
532:

Line 529: x_return_status := OKC_API.G_RET_STS_ERROR;

525: IF (p_date_from = OKC_API.G_MISS_DATE OR
526: p_date_from IS NULL)
527: THEN
528: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Effective From');
529: x_return_status := OKC_API.G_RET_STS_ERROR;
530: RAISE G_EXCEPTION_HALT_VALIDATION;
531:
532:
533: ELSIF(p_object_version_number < 2 ) THEN

Line 537: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN

533: ELSIF(p_object_version_number < 2 ) THEN
534:
535: x_return_status := Okl_Util.check_from_to_date_range(trunc(sysdate), p_date_from ); --Fix for bug 3924176
536: -- store the highest degree of error
537: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
538: Okc_Api.set_message(
539: p_app_name => g_app_name,
540: p_msg_name => 'OKL_INVALID_DATE_RANGE',
541: p_token1 => 'COL_NAME1',

Line 538: Okc_Api.set_message(

534:
535: x_return_status := Okl_Util.check_from_to_date_range(trunc(sysdate), p_date_from ); --Fix for bug 3924176
536: -- store the highest degree of error
537: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
538: Okc_Api.set_message(
539: p_app_name => g_app_name,
540: p_msg_name => 'OKL_INVALID_DATE_RANGE',
541: p_token1 => 'COL_NAME1',
542: p_token1_value => 'Effective From Date'

Line 544: IF(x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN

540: p_msg_name => 'OKL_INVALID_DATE_RANGE',
541: p_token1 => 'COL_NAME1',
542: p_token1_value => 'Effective From Date'
543: );
544: IF(x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
545:
546: RAISE G_EXCEPTION_HALT_VALIDATION;
547: END IF;
548: END IF;

Line 558: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

554: EXCEPTION
555: WHEN G_EXCEPTION_HALT_VALIDATION THEN
556: null;
557: WHEN OTHERS THEN
558: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
559: ,p_msg_name => G_UNEXPECTED_ERROR
560: ,p_token1 => G_SQLCODE_TOKEN
561: ,p_token1_value => SQLCODE
562: ,p_token2 => G_SQLERRM_TOKEN

Line 564: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

560: ,p_token1 => G_SQLCODE_TOKEN
561: ,p_token1_value => SQLCODE
562: ,p_token2 => G_SQLERRM_TOKEN
563: ,p_token2_value => SQLERRM);
564: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
565: END validate_date_from;
566: -------------------------------------
567: -- Validate_Attributes for: ISU_ID --
568: -------------------------------------

Line 573: x_return_status := OKC_API.G_RET_STS_SUCCESS;

569: PROCEDURE validate_isu_id(
570: x_return_status OUT NOCOPY VARCHAR2,
571: p_isu_id IN NUMBER) IS
572: BEGIN
573: x_return_status := OKC_API.G_RET_STS_SUCCESS;
574: IF (p_isu_id = OKC_API.G_MISS_NUM OR
575: p_isu_id IS NULL)
576: THEN
577: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Provider');

Line 574: IF (p_isu_id = OKC_API.G_MISS_NUM OR

570: x_return_status OUT NOCOPY VARCHAR2,
571: p_isu_id IN NUMBER) IS
572: BEGIN
573: x_return_status := OKC_API.G_RET_STS_SUCCESS;
574: IF (p_isu_id = OKC_API.G_MISS_NUM OR
575: p_isu_id IS NULL)
576: THEN
577: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Provider');
578: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 577: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Provider');

573: x_return_status := OKC_API.G_RET_STS_SUCCESS;
574: IF (p_isu_id = OKC_API.G_MISS_NUM OR
575: p_isu_id IS NULL)
576: THEN
577: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Provider');
578: x_return_status := OKC_API.G_RET_STS_ERROR;
579: RAISE G_EXCEPTION_HALT_VALIDATION;
580: END IF;
581:

Line 578: x_return_status := OKC_API.G_RET_STS_ERROR;

574: IF (p_isu_id = OKC_API.G_MISS_NUM OR
575: p_isu_id IS NULL)
576: THEN
577: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Provider');
578: x_return_status := OKC_API.G_RET_STS_ERROR;
579: RAISE G_EXCEPTION_HALT_VALIDATION;
580: END IF;
581:
582: -- Verify the value fits the length of the column in the database

Line 588: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

584: ,p_col_name => 'isu_id'
585: ,p_col_value => p_isu_id
586: ,x_return_status => x_return_status);
587: -- verify that length is within allowed limits
588: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
589: x_return_status := OKC_API.G_RET_STS_ERROR;
590: RAISE G_EXCEPTION_HALT_VALIDATION;
591: END IF;
592: EXCEPTION

Line 589: x_return_status := OKC_API.G_RET_STS_ERROR;

585: ,p_col_value => p_isu_id
586: ,x_return_status => x_return_status);
587: -- verify that length is within allowed limits
588: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
589: x_return_status := OKC_API.G_RET_STS_ERROR;
590: RAISE G_EXCEPTION_HALT_VALIDATION;
591: END IF;
592: EXCEPTION
593: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 596: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

592: EXCEPTION
593: WHEN G_EXCEPTION_HALT_VALIDATION THEN
594: null;
595: WHEN OTHERS THEN
596: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
597: ,p_msg_name => G_UNEXPECTED_ERROR
598: ,p_token1 => G_SQLCODE_TOKEN
599: ,p_token1_value => SQLCODE
600: ,p_token2 => G_SQLERRM_TOKEN

Line 602: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

598: ,p_token1 => G_SQLCODE_TOKEN
599: ,p_token1_value => SQLCODE
600: ,p_token2 => G_SQLERRM_TOKEN
601: ,p_token2_value => SQLERRM);
602: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
603: END validate_isu_id;
604: --------------------------------------
605: -- Validate_Attributes for: IC_CODE --
606: --------------------------------------

Line 611: x_return_status := OKC_API.G_RET_STS_SUCCESS;

607: PROCEDURE validate_ic_code(
608: x_return_status OUT NOCOPY VARCHAR2,
609: p_ic_code IN VARCHAR2) IS
610: BEGIN
611: x_return_status := OKC_API.G_RET_STS_SUCCESS;
612: IF (p_ic_code = OKC_API.G_MISS_CHAR OR
613: p_ic_code IS NULL)
614: THEN
615: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Country');

Line 612: IF (p_ic_code = OKC_API.G_MISS_CHAR OR

608: x_return_status OUT NOCOPY VARCHAR2,
609: p_ic_code IN VARCHAR2) IS
610: BEGIN
611: x_return_status := OKC_API.G_RET_STS_SUCCESS;
612: IF (p_ic_code = OKC_API.G_MISS_CHAR OR
613: p_ic_code IS NULL)
614: THEN
615: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Country');
616: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 615: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Country');

611: x_return_status := OKC_API.G_RET_STS_SUCCESS;
612: IF (p_ic_code = OKC_API.G_MISS_CHAR OR
613: p_ic_code IS NULL)
614: THEN
615: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Country');
616: x_return_status := OKC_API.G_RET_STS_ERROR;
617: RAISE G_EXCEPTION_HALT_VALIDATION;
618: END IF;
619:

Line 616: x_return_status := OKC_API.G_RET_STS_ERROR;

612: IF (p_ic_code = OKC_API.G_MISS_CHAR OR
613: p_ic_code IS NULL)
614: THEN
615: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'Country');
616: x_return_status := OKC_API.G_RET_STS_ERROR;
617: RAISE G_EXCEPTION_HALT_VALIDATION;
618: END IF;
619:
620: /*

Line 628: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

624: ,p_col_name => 'ic_code'
625: ,p_col_value => p_ic_code
626: ,x_return_status => x_return_status);
627: -- verify that length is within allowed limits
628: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
629: x_return_status := OKC_API.G_RET_STS_ERROR;
630: RAISE G_EXCEPTION_HALT_VALIDATION;
631: END IF;
632: */

Line 629: x_return_status := OKC_API.G_RET_STS_ERROR;

625: ,p_col_value => p_ic_code
626: ,x_return_status => x_return_status);
627: -- verify that length is within allowed limits
628: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
629: x_return_status := OKC_API.G_RET_STS_ERROR;
630: RAISE G_EXCEPTION_HALT_VALIDATION;
631: END IF;
632: */
633:

Line 638: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

634: EXCEPTION
635: WHEN G_EXCEPTION_HALT_VALIDATION THEN
636: null;
637: WHEN OTHERS THEN
638: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
639: ,p_msg_name => G_UNEXPECTED_ERROR
640: ,p_token1 => G_SQLCODE_TOKEN
641: ,p_token1_value => SQLCODE
642: ,p_token2 => G_SQLERRM_TOKEN

Line 644: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

640: ,p_token1 => G_SQLCODE_TOKEN
641: ,p_token1_value => SQLCODE
642: ,p_token2 => G_SQLERRM_TOKEN
643: ,p_token2_value => SQLERRM);
644: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
645: END validate_ic_code;
646: ---------------------------------------------------------------------------
647: -- FUNCTION Validate_Attributes
648: ---------------------------------------------------------------------------

Line 655: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

651: ----------------------------------------------------
652: FUNCTION Validate_Attributes (
653: p_irkv_rec IN irkv_rec_type
654: ) RETURN VARCHAR2 IS
655: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
656: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
657: BEGIN
658: -- Call OKC_UTIL.ADD_VIEW to prepare the PL/SQL table to hold columns of view
659: OKC_UTIL.ADD_VIEW('OKL_INSURER_RANKINGS_V', x_return_status);

Line 656: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

652: FUNCTION Validate_Attributes (
653: p_irkv_rec IN irkv_rec_type
654: ) RETURN VARCHAR2 IS
655: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
656: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
657: BEGIN
658: -- Call OKC_UTIL.ADD_VIEW to prepare the PL/SQL table to hold columns of view
659: OKC_UTIL.ADD_VIEW('OKL_INSURER_RANKINGS_V', x_return_status);
660: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

Line 660: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

656: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
657: BEGIN
658: -- Call OKC_UTIL.ADD_VIEW to prepare the PL/SQL table to hold columns of view
659: OKC_UTIL.ADD_VIEW('OKL_INSURER_RANKINGS_V', x_return_status);
660: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
661: l_return_status := x_return_status;
662: RAISE G_EXCEPTION_HALT_VALIDATION;
663: END IF;
664: -----------------------------

Line 671: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

667: -- ***
668: -- id
669: -- ***
670: validate_id(x_return_status, p_irkv_rec.id);
671: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
672: l_return_status := x_return_status;
673: RAISE G_EXCEPTION_HALT_VALIDATION;
674: END IF;
675:

Line 680: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

676: -- ***
677: -- ranking_seq
678: -- ***
679: validate_ranking_seq(x_return_status, p_irkv_rec.ranking_seq);
680: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
681: l_return_status := x_return_status;
682: RAISE G_EXCEPTION_HALT_VALIDATION;
683: END IF;
684:

Line 689: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

685: -- ***
686: -- object_version_number
687: -- ***
688: validate_object_version_number(x_return_status, p_irkv_rec.object_version_number);
689: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
690: l_return_status := x_return_status;
691: RAISE G_EXCEPTION_HALT_VALIDATION;
692: END IF;
693:

Line 698: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

694: -- ***
695: -- date_from
696: -- ***
697: validate_date_from(x_return_status, p_irkv_rec.date_from,p_irkv_rec.object_version_number );
698: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
699: l_return_status := x_return_status;
700: RAISE G_EXCEPTION_HALT_VALIDATION;
701: END IF;
702:

Line 707: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

703: -- ***
704: -- isu_id
705: -- ***
706: validate_isu_id(x_return_status, p_irkv_rec.isu_id);
707: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
708: l_return_status := x_return_status;
709: RAISE G_EXCEPTION_HALT_VALIDATION;
710: END IF;
711:

Line 716: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

712: -- ***
713: -- ic_code
714: -- ***
715: validate_ic_code(x_return_status, p_irkv_rec.ic_code);
716: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
717: l_return_status := x_return_status;
718: RAISE G_EXCEPTION_HALT_VALIDATION;
719: END IF;
720:

Line 726: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

722: EXCEPTION
723: WHEN G_EXCEPTION_HALT_VALIDATION THEN
724: RETURN(l_return_status);
725: WHEN OTHERS THEN
726: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
727: ,p_msg_name => G_UNEXPECTED_ERROR
728: ,p_token1 => G_SQLCODE_TOKEN
729: ,p_token1_value => SQLCODE
730: ,p_token2 => G_SQLERRM_TOKEN

Line 732: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

728: ,p_token1 => G_SQLCODE_TOKEN
729: ,p_token1_value => SQLCODE
730: ,p_token2 => G_SQLERRM_TOKEN
731: ,p_token2_value => SQLERRM);
732: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
733: RETURN(l_return_status);
734: END Validate_Attributes;
735: ---------------------------------------------------------------------------
736: -- PROCEDURE Validate_Record

Line 781: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

777: AND ( p_irkv_rec.date_from <= nvl(okl_insurer_rankings.date_to,p_irkv_rec.date_from)) ;
778:
779: -- AND p_irkv_rec.date_from between okl_insurer_rankings.date_from and nvl(okl_insurer_rankings.date_to,SYSDATE) ;
780:
781: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
782: l_row_notfound BOOLEAN := TRUE;
783: l_dummy_var VARCHAR2(1) := '?';
784: BEGIN
785: -------------------------------------------------------------------------------------------------------------

Line 794: OKC_API.set_message(p_app_name => G_APP_NAME,

790: FETCH okx_countries_v_pk_csr INTO l_dummy_var;
791: CLOSE okx_countries_v_pk_csr;
792: -- if l_dummy_var is still set to default ,data was not found
793: IF (l_dummy_var ='?') THEN
794: OKC_API.set_message(p_app_name => G_APP_NAME,
795: p_msg_name => G_NO_PARENT_RECORD,
796: p_token1 => G_COL_NAME_TOKEN,
797: p_token1_value => 'Country',
798: p_token2 => g_parent_table_token,

Line 803: l_return_status := OKC_API.G_RET_STS_ERROR;

799: p_token2_value => 'OKX_COUNTRIES_V',
800: p_token3 => g_child_table_token,
801: p_token3_value => 'OKL_INSURER_RANKINGS');
802: -- notify caller of an error
803: l_return_status := OKC_API.G_RET_STS_ERROR;
804: return (l_return_status);
805: END IF;
806: END IF;
807: ---------------------------------------------------------------------------------

Line 816: OKC_API.set_message(p_app_name => G_APP_NAME,

812: FETCH okx_insurer_v_pk_csr INTO l_dummy_var;
813: CLOSE okx_insurer_v_pk_csr;
814: -- if l_dummy_var is still set to default ,data was not found
815: IF (l_dummy_var ='?') THEN
816: OKC_API.set_message(p_app_name => G_APP_NAME,
817: p_msg_name => G_NO_PARENT_RECORD,
818: p_token1 => G_COL_NAME_TOKEN,
819: p_token1_value => 'Provider',
820: p_token2 => g_parent_table_token,

Line 825: l_return_status := OKC_API.G_RET_STS_ERROR;

821: p_token2_value => 'OKX_INS_PROVIDER_V',
822: p_token3 => g_child_table_token,
823: p_token3_value => 'OKL_INSURER_RANKINGS');
824: -- notify caller of an error
825: l_return_status := OKC_API.G_RET_STS_ERROR;
826: return (l_return_status);
827: END IF;
828: END IF;
829: ---------------------------------------------------------------------------------

Line 837: OKC_API.set_message(p_app_name => G_APP_NAME,

833: FETCH okl_insurer_rankings_v_pk_csr INTO l_dummy_var;
834: CLOSE okl_insurer_rankings_v_pk_csr;
835: -- if l_dummy_var is still set to default ,data was not found
836: IF (l_dummy_var ='x') THEN
837: OKC_API.set_message(p_app_name => G_APP_NAME,
838: p_msg_name => 'OKL_INS_RANK_UNIQUE'
839: );
840: -- notify caller of an error
841: l_return_status := OKC_API.G_RET_STS_ERROR;

Line 841: l_return_status := OKC_API.G_RET_STS_ERROR;

837: OKC_API.set_message(p_app_name => G_APP_NAME,
838: p_msg_name => 'OKL_INS_RANK_UNIQUE'
839: );
840: -- notify caller of an error
841: l_return_status := OKC_API.G_RET_STS_ERROR;
842: return (l_return_status);
843: END IF;
844:
845: l_dummy_var := '?' ;

Line 851: OKC_API.set_message(p_app_name => G_APP_NAME,

847: FETCH okl_insurer_rank_v_pk_csr INTO l_dummy_var;
848: CLOSE okl_insurer_rank_v_pk_csr;
849: -- if l_dummy_var is still set to default ,data was not found
850: IF (l_dummy_var ='x') THEN
851: OKC_API.set_message(p_app_name => G_APP_NAME,
852: p_msg_name => 'OKL_INS_TWO_RANKS'
853: );
854: -- notify caller of an error
855: l_return_status := OKC_API.G_RET_STS_ERROR;

Line 855: l_return_status := OKC_API.G_RET_STS_ERROR;

851: OKC_API.set_message(p_app_name => G_APP_NAME,
852: p_msg_name => 'OKL_INS_TWO_RANKS'
853: );
854: -- notify caller of an error
855: l_return_status := OKC_API.G_RET_STS_ERROR;
856: return (l_return_status);
857: END IF;
858:
859: return (l_return_status);

Line 870: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

866: FUNCTION Validate_Record (
867: p_irkv_rec IN irkv_rec_type,
868: p_db_irkv_rec IN irkv_rec_type
869: ) RETURN VARCHAR2 IS
870: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
871: BEGIN
872: l_return_status := validate_foreign_keys(p_irkv_rec, p_db_irkv_rec);
873: RETURN (l_return_status);
874: END Validate_Record ;

Line 881: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

877:
878: FUNCTION Validate_Record (
879: p_irkv_rec IN irkv_rec_type
880: ) RETURN VARCHAR2 IS
881: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
882: l_db_irkv_rec irkv_rec_type := get_rec(p_irkv_rec);
883: BEGIN
884: --Validate whether start date is less than the end date only if enddate is not null
885: IF (p_irkv_rec.date_to IS NOT NULL)THEN

Line 889: IF (l_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN

885: IF (p_irkv_rec.date_to IS NOT NULL)THEN
886: l_return_status:= OKL_UTIL.check_from_to_date_range(p_from_date => p_irkv_rec.date_from
887: ,p_to_date => p_irkv_rec.date_to );
888: END IF;
889: IF (l_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
890: Okc_Api.set_message(
891: p_app_name => g_app_name,
892: p_msg_name => 'OKL_GREATER_THAN',
893: p_token1 => 'COL_NAME1',

Line 890: Okc_Api.set_message(

886: l_return_status:= OKL_UTIL.check_from_to_date_range(p_from_date => p_irkv_rec.date_from
887: ,p_to_date => p_irkv_rec.date_to );
888: END IF;
889: IF (l_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
890: Okc_Api.set_message(
891: p_app_name => g_app_name,
892: p_msg_name => 'OKL_GREATER_THAN',
893: p_token1 => 'COL_NAME1',
894: p_token1_value => 'Effective To',

Line 900: IF(l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN

896: p_token2_value => 'Effective From'
897: );
898: return (l_return_status);
899: END IF;
900: IF(l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
901: return (l_return_status);
902: END IF;
903:
904: --Validate whether end date is less than the SYSDATE

Line 907: IF (p_irkv_rec.date_to IS NOT NULL OR p_irkv_rec.date_to <> OKC_API.G_MISS_DATE )THEN

903:
904: --Validate whether end date is less than the SYSDATE
905:
906:
907: IF (p_irkv_rec.date_to IS NOT NULL OR p_irkv_rec.date_to <> OKC_API.G_MISS_DATE )THEN
908: l_return_status:= OKL_UTIL.check_from_to_date_range(p_from_date => trunc(SYSDATE) -- Fix for Bug 3924176.
909: ,p_to_date => p_irkv_rec.date_to);
910:
911: END IF;

Line 912: IF (l_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN

908: l_return_status:= OKL_UTIL.check_from_to_date_range(p_from_date => trunc(SYSDATE) -- Fix for Bug 3924176.
909: ,p_to_date => p_irkv_rec.date_to);
910:
911: END IF;
912: IF (l_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
913: Okc_Api.set_message(
914: p_app_name => g_app_name,
915: p_msg_name => 'OKL_INVALID_DATE_RANGE',
916: p_token1 => 'COL_NAME1',

Line 913: Okc_Api.set_message(

909: ,p_to_date => p_irkv_rec.date_to);
910:
911: END IF;
912: IF (l_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
913: Okc_Api.set_message(
914: p_app_name => g_app_name,
915: p_msg_name => 'OKL_INVALID_DATE_RANGE',
916: p_token1 => 'COL_NAME1',
917: p_token1_value => 'Effective To');

Line 920: IF(l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN

916: p_token1 => 'COL_NAME1',
917: p_token1_value => 'Effective To');
918: return (l_return_status);
919: END IF;
920: IF(l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
921: return (l_return_status);
922: END IF;
923:
924:

Line 1013: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1009: -- validate_row for:OKL_INSURER_RANKINGS_V --
1010: ---------------------------------------------
1011: PROCEDURE validate_row(
1012: p_api_version IN NUMBER,
1013: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1014: x_return_status OUT NOCOPY VARCHAR2,
1015: x_msg_count OUT NOCOPY NUMBER,
1016: x_msg_data OUT NOCOPY VARCHAR2,
1017: p_irkv_rec IN irkv_rec_type) IS

Line 1021: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1017: p_irkv_rec IN irkv_rec_type) IS
1018:
1019: l_api_version CONSTANT NUMBER := 1;
1020: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
1021: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1022: l_irkv_rec irkv_rec_type := p_irkv_rec;
1023: l_irk_rec irk_rec_type;
1024: l_irk_rec irk_rec_type;
1025: BEGIN

Line 1026: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1022: l_irkv_rec irkv_rec_type := p_irkv_rec;
1023: l_irk_rec irk_rec_type;
1024: l_irk_rec irk_rec_type;
1025: BEGIN
1026: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1027: G_PKG_NAME,
1028: p_init_msg_list,
1029: l_api_version,
1030: p_api_version,

Line 1033: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1029: l_api_version,
1030: p_api_version,
1031: '_PVT',
1032: x_return_status);
1033: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1034: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1035: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1036: RAISE OKC_API.G_EXCEPTION_ERROR;
1037: END IF;

Line 1034: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1030: p_api_version,
1031: '_PVT',
1032: x_return_status);
1033: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1034: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1035: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1036: RAISE OKC_API.G_EXCEPTION_ERROR;
1037: END IF;
1038: --- Validate all non-missing attributes (Item Level Validation)

Line 1035: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1031: '_PVT',
1032: x_return_status);
1033: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1034: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1035: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1036: RAISE OKC_API.G_EXCEPTION_ERROR;
1037: END IF;
1038: --- Validate all non-missing attributes (Item Level Validation)
1039: l_return_status := Validate_Attributes(l_irkv_rec);

Line 1036: RAISE OKC_API.G_EXCEPTION_ERROR;

1032: x_return_status);
1033: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1034: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1035: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1036: RAISE OKC_API.G_EXCEPTION_ERROR;
1037: END IF;
1038: --- Validate all non-missing attributes (Item Level Validation)
1039: l_return_status := Validate_Attributes(l_irkv_rec);
1040: --- If any errors happen abort API

Line 1041: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1037: END IF;
1038: --- Validate all non-missing attributes (Item Level Validation)
1039: l_return_status := Validate_Attributes(l_irkv_rec);
1040: --- If any errors happen abort API
1041: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1042: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1043: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1044: RAISE OKC_API.G_EXCEPTION_ERROR;
1045: END IF;

Line 1042: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1038: --- Validate all non-missing attributes (Item Level Validation)
1039: l_return_status := Validate_Attributes(l_irkv_rec);
1040: --- If any errors happen abort API
1041: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1042: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1043: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1044: RAISE OKC_API.G_EXCEPTION_ERROR;
1045: END IF;
1046: l_return_status := Validate_Record(l_irkv_rec);

Line 1043: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1039: l_return_status := Validate_Attributes(l_irkv_rec);
1040: --- If any errors happen abort API
1041: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1042: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1043: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1044: RAISE OKC_API.G_EXCEPTION_ERROR;
1045: END IF;
1046: l_return_status := Validate_Record(l_irkv_rec);
1047: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1044: RAISE OKC_API.G_EXCEPTION_ERROR;

1040: --- If any errors happen abort API
1041: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1042: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1043: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1044: RAISE OKC_API.G_EXCEPTION_ERROR;
1045: END IF;
1046: l_return_status := Validate_Record(l_irkv_rec);
1047: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1048: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1047: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1043: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1044: RAISE OKC_API.G_EXCEPTION_ERROR;
1045: END IF;
1046: l_return_status := Validate_Record(l_irkv_rec);
1047: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1048: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1049: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1050: RAISE OKC_API.G_EXCEPTION_ERROR;
1051: END IF;

Line 1048: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1044: RAISE OKC_API.G_EXCEPTION_ERROR;
1045: END IF;
1046: l_return_status := Validate_Record(l_irkv_rec);
1047: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1048: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1049: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1050: RAISE OKC_API.G_EXCEPTION_ERROR;
1051: END IF;
1052: x_return_status := l_return_status;

Line 1049: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1045: END IF;
1046: l_return_status := Validate_Record(l_irkv_rec);
1047: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1048: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1049: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1050: RAISE OKC_API.G_EXCEPTION_ERROR;
1051: END IF;
1052: x_return_status := l_return_status;
1053: EXCEPTION

Line 1050: RAISE OKC_API.G_EXCEPTION_ERROR;

1046: l_return_status := Validate_Record(l_irkv_rec);
1047: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1048: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1049: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1050: RAISE OKC_API.G_EXCEPTION_ERROR;
1051: END IF;
1052: x_return_status := l_return_status;
1053: EXCEPTION
1054: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 1054: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1050: RAISE OKC_API.G_EXCEPTION_ERROR;
1051: END IF;
1052: x_return_status := l_return_status;
1053: EXCEPTION
1054: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1055: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1056: (
1057: l_api_name,
1058: G_PKG_NAME,

Line 1055: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1051: END IF;
1052: x_return_status := l_return_status;
1053: EXCEPTION
1054: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1055: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1056: (
1057: l_api_name,
1058: G_PKG_NAME,
1059: 'OKC_API.G_RET_STS_ERROR',

Line 1059: 'OKC_API.G_RET_STS_ERROR',

1055: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1056: (
1057: l_api_name,
1058: G_PKG_NAME,
1059: 'OKC_API.G_RET_STS_ERROR',
1060: x_msg_count,
1061: x_msg_data,
1062: '_PVT'
1063: );

Line 1064: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1060: x_msg_count,
1061: x_msg_data,
1062: '_PVT'
1063: );
1064: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1065: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1066: (
1067: l_api_name,
1068: G_PKG_NAME,

Line 1065: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1061: x_msg_data,
1062: '_PVT'
1063: );
1064: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1065: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1066: (
1067: l_api_name,
1068: G_PKG_NAME,
1069: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1069: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1065: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1066: (
1067: l_api_name,
1068: G_PKG_NAME,
1069: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1070: x_msg_count,
1071: x_msg_data,
1072: '_PVT'
1073: );

Line 1075: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1071: x_msg_data,
1072: '_PVT'
1073: );
1074: WHEN OTHERS THEN
1075: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1076: (
1077: l_api_name,
1078: G_PKG_NAME,
1079: 'OTHERS',

Line 1090: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1086: -- PL/SQL TBL validate_row for:OKL_INSURER_RANKINGS_V --
1087: --------------------------------------------------------
1088: PROCEDURE validate_row(
1089: p_api_version IN NUMBER,
1090: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1091: x_return_status OUT NOCOPY VARCHAR2,
1092: x_msg_count OUT NOCOPY NUMBER,
1093: x_msg_data OUT NOCOPY VARCHAR2,
1094: p_irkv_tbl IN irkv_tbl_type,

Line 1101: OKC_API.init_msg_list(p_init_msg_list);

1097: l_api_version CONSTANT NUMBER := 1;
1098: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_validate_row';
1099: i NUMBER := 0;
1100: BEGIN
1101: OKC_API.init_msg_list(p_init_msg_list);
1102: -- Make sure PL/SQL table has records in it before passing
1103: IF (p_irkv_tbl.COUNT > 0) THEN
1104: i := p_irkv_tbl.FIRST;
1105: LOOP

Line 1114: p_init_msg_list => OKC_API.G_FALSE,

1110: l_error_rec.api_package := G_PKG_NAME;
1111: l_error_rec.idx := i;
1112: validate_row (
1113: p_api_version => p_api_version,
1114: p_init_msg_list => OKC_API.G_FALSE,
1115: x_return_status => l_error_rec.error_type,
1116: x_msg_count => l_error_rec.msg_count,
1117: x_msg_data => l_error_rec.msg_data,
1118: p_irkv_rec => p_irkv_tbl(i));

Line 1119: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN

1115: x_return_status => l_error_rec.error_type,
1116: x_msg_count => l_error_rec.msg_count,
1117: x_msg_data => l_error_rec.msg_data,
1118: p_irkv_rec => p_irkv_tbl(i));
1119: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN
1120: l_error_rec.sqlcode := SQLCODE;
1121: load_error_tbl(l_error_rec, px_error_tbl);
1122: ELSE
1123: x_msg_count := l_error_rec.msg_count;

Line 1127: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1123: x_msg_count := l_error_rec.msg_count;
1124: x_msg_data := l_error_rec.msg_data;
1125: END IF;
1126: EXCEPTION
1127: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1128: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1129: l_error_rec.sqlcode := SQLCODE;
1130: load_error_tbl(l_error_rec, px_error_tbl);
1131: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1128: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;

1124: x_msg_data := l_error_rec.msg_data;
1125: END IF;
1126: EXCEPTION
1127: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1128: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1129: l_error_rec.sqlcode := SQLCODE;
1130: load_error_tbl(l_error_rec, px_error_tbl);
1131: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1132: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 1131: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1127: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1128: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1129: l_error_rec.sqlcode := SQLCODE;
1130: load_error_tbl(l_error_rec, px_error_tbl);
1131: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1132: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
1133: l_error_rec.sqlcode := SQLCODE;
1134: load_error_tbl(l_error_rec, px_error_tbl);
1135: WHEN OTHERS THEN

Line 1132: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

1128: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1129: l_error_rec.sqlcode := SQLCODE;
1130: load_error_tbl(l_error_rec, px_error_tbl);
1131: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1132: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
1133: l_error_rec.sqlcode := SQLCODE;
1134: load_error_tbl(l_error_rec, px_error_tbl);
1135: WHEN OTHERS THEN
1136: l_error_rec.error_type := 'OTHERS';

Line 1147: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1143: END IF;
1144: -- Loop through the error_tbl to find the error with the highest severity
1145: -- and return it.
1146: x_return_status := find_highest_exception(px_error_tbl);
1147: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1148: EXCEPTION
1149: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1150: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1151: (

Line 1149: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1145: -- and return it.
1146: x_return_status := find_highest_exception(px_error_tbl);
1147: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1148: EXCEPTION
1149: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1150: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1151: (
1152: l_api_name,
1153: G_PKG_NAME,

Line 1150: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1146: x_return_status := find_highest_exception(px_error_tbl);
1147: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1148: EXCEPTION
1149: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1150: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1151: (
1152: l_api_name,
1153: G_PKG_NAME,
1154: 'OKC_API.G_RET_STS_ERROR',

Line 1154: 'OKC_API.G_RET_STS_ERROR',

1150: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1151: (
1152: l_api_name,
1153: G_PKG_NAME,
1154: 'OKC_API.G_RET_STS_ERROR',
1155: x_msg_count,
1156: x_msg_data,
1157: '_PVT'
1158: );

Line 1159: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1155: x_msg_count,
1156: x_msg_data,
1157: '_PVT'
1158: );
1159: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1160: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1161: (
1162: l_api_name,
1163: G_PKG_NAME,

Line 1160: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1156: x_msg_data,
1157: '_PVT'
1158: );
1159: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1160: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1161: (
1162: l_api_name,
1163: G_PKG_NAME,
1164: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1164: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1160: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1161: (
1162: l_api_name,
1163: G_PKG_NAME,
1164: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1165: x_msg_count,
1166: x_msg_data,
1167: '_PVT'
1168: );

Line 1170: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1166: x_msg_data,
1167: '_PVT'
1168: );
1169: WHEN OTHERS THEN
1170: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1171: (
1172: l_api_name,
1173: G_PKG_NAME,
1174: 'OTHERS',

Line 1186: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1182: -- PL/SQL TBL validate_row for:OKL_INSURER_RANKINGS_V --
1183: --------------------------------------------------------
1184: PROCEDURE validate_row(
1185: p_api_version IN NUMBER,
1186: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1187: x_return_status OUT NOCOPY VARCHAR2,
1188: x_msg_count OUT NOCOPY NUMBER,
1189: x_msg_data OUT NOCOPY VARCHAR2,
1190: p_irkv_tbl IN irkv_tbl_type) IS

Line 1194: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1190: p_irkv_tbl IN irkv_tbl_type) IS
1191:
1192: l_api_version CONSTANT NUMBER := 1;
1193: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
1194: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1195: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1196: BEGIN
1197: OKC_API.init_msg_list(p_init_msg_list);
1198: -- Make sure PL/SQL table has records in it before passing

Line 1197: OKC_API.init_msg_list(p_init_msg_list);

1193: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
1194: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1195: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1196: BEGIN
1197: OKC_API.init_msg_list(p_init_msg_list);
1198: -- Make sure PL/SQL table has records in it before passing
1199: IF (p_irkv_tbl.COUNT > 0) THEN
1200: validate_row (
1201: p_api_version => p_api_version,

Line 1202: p_init_msg_list => OKC_API.G_FALSE,

1198: -- Make sure PL/SQL table has records in it before passing
1199: IF (p_irkv_tbl.COUNT > 0) THEN
1200: validate_row (
1201: p_api_version => p_api_version,
1202: p_init_msg_list => OKC_API.G_FALSE,
1203: x_return_status => x_return_status,
1204: x_msg_count => x_msg_count,
1205: x_msg_data => x_msg_data,
1206: p_irkv_tbl => p_irkv_tbl,

Line 1209: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1205: x_msg_data => x_msg_data,
1206: p_irkv_tbl => p_irkv_tbl,
1207: px_error_tbl => l_error_tbl);
1208: END IF;
1209: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1210: EXCEPTION
1211: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1212: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1213: (

Line 1211: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1207: px_error_tbl => l_error_tbl);
1208: END IF;
1209: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1210: EXCEPTION
1211: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1212: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1213: (
1214: l_api_name,
1215: G_PKG_NAME,

Line 1212: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1208: END IF;
1209: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1210: EXCEPTION
1211: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1212: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1213: (
1214: l_api_name,
1215: G_PKG_NAME,
1216: 'OKC_API.G_RET_STS_ERROR',

Line 1216: 'OKC_API.G_RET_STS_ERROR',

1212: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1213: (
1214: l_api_name,
1215: G_PKG_NAME,
1216: 'OKC_API.G_RET_STS_ERROR',
1217: x_msg_count,
1218: x_msg_data,
1219: '_PVT'
1220: );

Line 1221: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1217: x_msg_count,
1218: x_msg_data,
1219: '_PVT'
1220: );
1221: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1222: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1223: (
1224: l_api_name,
1225: G_PKG_NAME,

Line 1222: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1218: x_msg_data,
1219: '_PVT'
1220: );
1221: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1222: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1223: (
1224: l_api_name,
1225: G_PKG_NAME,
1226: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1226: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1222: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1223: (
1224: l_api_name,
1225: G_PKG_NAME,
1226: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1227: x_msg_count,
1228: x_msg_data,
1229: '_PVT'
1230: );

Line 1232: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1228: x_msg_data,
1229: '_PVT'
1230: );
1231: WHEN OTHERS THEN
1232: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1233: (
1234: l_api_name,
1235: G_PKG_NAME,
1236: 'OTHERS',

Line 1250: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1246: -----------------------------------------
1247: -- insert_row for:OKL_INSURER_RANKINGS --
1248: -----------------------------------------
1249: PROCEDURE insert_row(
1250: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1251: x_return_status OUT NOCOPY VARCHAR2,
1252: x_msg_count OUT NOCOPY NUMBER,
1253: x_msg_data OUT NOCOPY VARCHAR2,
1254: p_irk_rec IN irk_rec_type,

Line 1259: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1255: x_irk_rec OUT NOCOPY irk_rec_type) IS
1256:
1257: l_api_version CONSTANT NUMBER := 1;
1258: l_api_name CONSTANT VARCHAR2(30) := 'B_insert_row';
1259: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1260: l_irk_rec irk_rec_type := p_irk_rec;
1261: l_def_irk_rec irk_rec_type;
1262: ---------------------------------------------
1263: -- Set_Attributes for:OKL_INSURER_RANKINGS --

Line 1269: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1265: FUNCTION Set_Attributes (
1266: p_irk_rec IN irk_rec_type,
1267: x_irk_rec OUT NOCOPY irk_rec_type
1268: ) RETURN VARCHAR2 IS
1269: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1270: BEGIN
1271: x_irk_rec := p_irk_rec;
1272: RETURN(l_return_status);
1273: END Set_Attributes;

Line 1275: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1271: x_irk_rec := p_irk_rec;
1272: RETURN(l_return_status);
1273: END Set_Attributes;
1274: BEGIN
1275: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1276: p_init_msg_list,
1277: '_PVT',
1278: x_return_status);
1279: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1279: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1275: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1276: p_init_msg_list,
1277: '_PVT',
1278: x_return_status);
1279: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1280: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1281: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1282: RAISE OKC_API.G_EXCEPTION_ERROR;
1283: END IF;

Line 1280: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1276: p_init_msg_list,
1277: '_PVT',
1278: x_return_status);
1279: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1280: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1281: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1282: RAISE OKC_API.G_EXCEPTION_ERROR;
1283: END IF;
1284: --- Setting item atributes

Line 1281: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1277: '_PVT',
1278: x_return_status);
1279: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1280: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1281: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1282: RAISE OKC_API.G_EXCEPTION_ERROR;
1283: END IF;
1284: --- Setting item atributes
1285: l_return_status := Set_Attributes(

Line 1282: RAISE OKC_API.G_EXCEPTION_ERROR;

1278: x_return_status);
1279: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1280: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1281: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1282: RAISE OKC_API.G_EXCEPTION_ERROR;
1283: END IF;
1284: --- Setting item atributes
1285: l_return_status := Set_Attributes(
1286: p_irk_rec, -- IN

Line 1289: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1285: l_return_status := Set_Attributes(
1286: p_irk_rec, -- IN
1287: l_irk_rec); -- OUT
1288: --- If any errors happen abort API
1289: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1290: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1291: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1292: RAISE OKC_API.G_EXCEPTION_ERROR;
1293: END IF;

Line 1290: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1286: p_irk_rec, -- IN
1287: l_irk_rec); -- OUT
1288: --- If any errors happen abort API
1289: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1290: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1291: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1292: RAISE OKC_API.G_EXCEPTION_ERROR;
1293: END IF;
1294: INSERT INTO OKL_INSURER_RANKINGS(

Line 1291: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1287: l_irk_rec); -- OUT
1288: --- If any errors happen abort API
1289: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1290: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1291: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1292: RAISE OKC_API.G_EXCEPTION_ERROR;
1293: END IF;
1294: INSERT INTO OKL_INSURER_RANKINGS(
1295: id,

Line 1292: RAISE OKC_API.G_EXCEPTION_ERROR;

1288: --- If any errors happen abort API
1289: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1290: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1291: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1292: RAISE OKC_API.G_EXCEPTION_ERROR;
1293: END IF;
1294: INSERT INTO OKL_INSURER_RANKINGS(
1295: id,
1296: object_version_number,

Line 1355: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1351: l_irk_rec.last_update_login);
1352: -- Set OUT values
1353: x_irk_rec := l_irk_rec;
1354: x_return_status := l_return_status;
1355: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1356: EXCEPTION
1357: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1358: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1359: (

Line 1357: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1353: x_irk_rec := l_irk_rec;
1354: x_return_status := l_return_status;
1355: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1356: EXCEPTION
1357: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1358: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1359: (
1360: l_api_name,
1361: G_PKG_NAME,

Line 1358: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1354: x_return_status := l_return_status;
1355: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1356: EXCEPTION
1357: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1358: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1359: (
1360: l_api_name,
1361: G_PKG_NAME,
1362: 'OKC_API.G_RET_STS_ERROR',

Line 1362: 'OKC_API.G_RET_STS_ERROR',

1358: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1359: (
1360: l_api_name,
1361: G_PKG_NAME,
1362: 'OKC_API.G_RET_STS_ERROR',
1363: x_msg_count,
1364: x_msg_data,
1365: '_PVT'
1366: );

Line 1367: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1363: x_msg_count,
1364: x_msg_data,
1365: '_PVT'
1366: );
1367: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1368: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1369: (
1370: l_api_name,
1371: G_PKG_NAME,

Line 1368: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1364: x_msg_data,
1365: '_PVT'
1366: );
1367: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1368: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1369: (
1370: l_api_name,
1371: G_PKG_NAME,
1372: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1372: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1368: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1369: (
1370: l_api_name,
1371: G_PKG_NAME,
1372: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1373: x_msg_count,
1374: x_msg_data,
1375: '_PVT'
1376: );

Line 1378: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1374: x_msg_data,
1375: '_PVT'
1376: );
1377: WHEN OTHERS THEN
1378: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1379: (
1380: l_api_name,
1381: G_PKG_NAME,
1382: 'OTHERS',

Line 1393: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1389: -- insert_row for :OKL_INSURER_RANKINGS_V --
1390: --------------------------------------------
1391: PROCEDURE insert_row(
1392: p_api_version IN NUMBER,
1393: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1394: x_return_status OUT NOCOPY VARCHAR2,
1395: x_msg_count OUT NOCOPY NUMBER,
1396: x_msg_data OUT NOCOPY VARCHAR2,
1397: p_irkv_rec IN irkv_rec_type,

Line 1402: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1398: x_irkv_rec OUT NOCOPY irkv_rec_type) IS
1399:
1400: l_api_version CONSTANT NUMBER := 1;
1401: l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
1402: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1403: l_irkv_rec irkv_rec_type := p_irkv_rec;
1404: l_def_irkv_rec irkv_rec_type;
1405: l_irk_rec irk_rec_type;
1406: lx_irk_rec irk_rec_type;

Line 1429: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1425: FUNCTION Set_Attributes (
1426: p_irkv_rec IN irkv_rec_type,
1427: x_irkv_rec OUT NOCOPY irkv_rec_type
1428: ) RETURN VARCHAR2 IS
1429: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1430: BEGIN
1431: x_irkv_rec := p_irkv_rec;
1432: x_irkv_rec.OBJECT_VERSION_NUMBER := 1;
1433: RETURN(l_return_status);

Line 1436: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1432: x_irkv_rec.OBJECT_VERSION_NUMBER := 1;
1433: RETURN(l_return_status);
1434: END Set_Attributes;
1435: BEGIN
1436: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1437: G_PKG_NAME,
1438: p_init_msg_list,
1439: l_api_version,
1440: p_api_version,

Line 1443: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1439: l_api_version,
1440: p_api_version,
1441: '_PVT',
1442: x_return_status);
1443: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1444: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1445: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1446: RAISE OKC_API.G_EXCEPTION_ERROR;
1447: END IF;

Line 1444: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1440: p_api_version,
1441: '_PVT',
1442: x_return_status);
1443: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1444: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1445: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1446: RAISE OKC_API.G_EXCEPTION_ERROR;
1447: END IF;
1448: l_irkv_rec := null_out_defaults(p_irkv_rec);

Line 1445: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1441: '_PVT',
1442: x_return_status);
1443: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1444: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1445: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1446: RAISE OKC_API.G_EXCEPTION_ERROR;
1447: END IF;
1448: l_irkv_rec := null_out_defaults(p_irkv_rec);
1449: -- Set primary key value

Line 1446: RAISE OKC_API.G_EXCEPTION_ERROR;

1442: x_return_status);
1443: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1444: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1445: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1446: RAISE OKC_API.G_EXCEPTION_ERROR;
1447: END IF;
1448: l_irkv_rec := null_out_defaults(p_irkv_rec);
1449: -- Set primary key value
1450: l_irkv_rec.ID := get_seq_id;

Line 1456: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1452: l_return_Status := Set_Attributes(
1453: l_irkv_rec, -- IN
1454: l_def_irkv_rec); -- OUT
1455: --- If any errors happen abort API
1456: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1457: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1458: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1459: RAISE OKC_API.G_EXCEPTION_ERROR;
1460: END IF;

Line 1457: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1453: l_irkv_rec, -- IN
1454: l_def_irkv_rec); -- OUT
1455: --- If any errors happen abort API
1456: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1457: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1458: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1459: RAISE OKC_API.G_EXCEPTION_ERROR;
1460: END IF;
1461: l_def_irkv_rec := fill_who_columns(l_def_irkv_rec);

Line 1458: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1454: l_def_irkv_rec); -- OUT
1455: --- If any errors happen abort API
1456: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1457: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1458: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1459: RAISE OKC_API.G_EXCEPTION_ERROR;
1460: END IF;
1461: l_def_irkv_rec := fill_who_columns(l_def_irkv_rec);
1462: --- Validate all non-missing attributes (Item Level Validation)

Line 1459: RAISE OKC_API.G_EXCEPTION_ERROR;

1455: --- If any errors happen abort API
1456: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1457: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1458: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1459: RAISE OKC_API.G_EXCEPTION_ERROR;
1460: END IF;
1461: l_def_irkv_rec := fill_who_columns(l_def_irkv_rec);
1462: --- Validate all non-missing attributes (Item Level Validation)
1463: l_return_status := Validate_Attributes(l_def_irkv_rec);

Line 1465: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1461: l_def_irkv_rec := fill_who_columns(l_def_irkv_rec);
1462: --- Validate all non-missing attributes (Item Level Validation)
1463: l_return_status := Validate_Attributes(l_def_irkv_rec);
1464: --- If any errors happen abort API
1465: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1466: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1467: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1468: RAISE OKC_API.G_EXCEPTION_ERROR;
1469: END IF;

Line 1466: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1462: --- Validate all non-missing attributes (Item Level Validation)
1463: l_return_status := Validate_Attributes(l_def_irkv_rec);
1464: --- If any errors happen abort API
1465: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1466: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1467: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1468: RAISE OKC_API.G_EXCEPTION_ERROR;
1469: END IF;
1470: l_return_status := Validate_Record(l_def_irkv_rec);

Line 1467: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1463: l_return_status := Validate_Attributes(l_def_irkv_rec);
1464: --- If any errors happen abort API
1465: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1466: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1467: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1468: RAISE OKC_API.G_EXCEPTION_ERROR;
1469: END IF;
1470: l_return_status := Validate_Record(l_def_irkv_rec);
1471: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1468: RAISE OKC_API.G_EXCEPTION_ERROR;

1464: --- If any errors happen abort API
1465: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1466: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1467: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1468: RAISE OKC_API.G_EXCEPTION_ERROR;
1469: END IF;
1470: l_return_status := Validate_Record(l_def_irkv_rec);
1471: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1472: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1471: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1467: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1468: RAISE OKC_API.G_EXCEPTION_ERROR;
1469: END IF;
1470: l_return_status := Validate_Record(l_def_irkv_rec);
1471: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1472: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1473: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1474: RAISE OKC_API.G_EXCEPTION_ERROR;
1475: END IF;

Line 1472: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1468: RAISE OKC_API.G_EXCEPTION_ERROR;
1469: END IF;
1470: l_return_status := Validate_Record(l_def_irkv_rec);
1471: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1472: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1473: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1474: RAISE OKC_API.G_EXCEPTION_ERROR;
1475: END IF;
1476: -----------------------------------------

Line 1473: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1469: END IF;
1470: l_return_status := Validate_Record(l_def_irkv_rec);
1471: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1472: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1473: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1474: RAISE OKC_API.G_EXCEPTION_ERROR;
1475: END IF;
1476: -----------------------------------------
1477: -- Move VIEW record to "Child" records --

Line 1474: RAISE OKC_API.G_EXCEPTION_ERROR;

1470: l_return_status := Validate_Record(l_def_irkv_rec);
1471: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1472: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1473: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1474: RAISE OKC_API.G_EXCEPTION_ERROR;
1475: END IF;
1476: -----------------------------------------
1477: -- Move VIEW record to "Child" records --
1478: -----------------------------------------

Line 1491: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1487: x_msg_data,
1488: l_irk_rec,
1489: lx_irk_rec
1490: );
1491: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1492: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1493: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1494: RAISE OKC_API.G_EXCEPTION_ERROR;
1495: END IF;

Line 1492: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1488: l_irk_rec,
1489: lx_irk_rec
1490: );
1491: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1492: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1493: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1494: RAISE OKC_API.G_EXCEPTION_ERROR;
1495: END IF;
1496: migrate(lx_irk_rec, l_def_irkv_rec);

Line 1493: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1489: lx_irk_rec
1490: );
1491: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1492: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1493: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1494: RAISE OKC_API.G_EXCEPTION_ERROR;
1495: END IF;
1496: migrate(lx_irk_rec, l_def_irkv_rec);
1497: -- Set OUT values

Line 1494: RAISE OKC_API.G_EXCEPTION_ERROR;

1490: );
1491: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1492: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1493: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1494: RAISE OKC_API.G_EXCEPTION_ERROR;
1495: END IF;
1496: migrate(lx_irk_rec, l_def_irkv_rec);
1497: -- Set OUT values
1498: x_irkv_rec := l_def_irkv_rec;

Line 1500: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1496: migrate(lx_irk_rec, l_def_irkv_rec);
1497: -- Set OUT values
1498: x_irkv_rec := l_def_irkv_rec;
1499: x_return_status := l_return_status;
1500: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1501: EXCEPTION
1502: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1503: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1504: (

Line 1502: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1498: x_irkv_rec := l_def_irkv_rec;
1499: x_return_status := l_return_status;
1500: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1501: EXCEPTION
1502: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1503: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1504: (
1505: l_api_name,
1506: G_PKG_NAME,

Line 1503: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1499: x_return_status := l_return_status;
1500: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1501: EXCEPTION
1502: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1503: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1504: (
1505: l_api_name,
1506: G_PKG_NAME,
1507: 'OKC_API.G_RET_STS_ERROR',

Line 1507: 'OKC_API.G_RET_STS_ERROR',

1503: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1504: (
1505: l_api_name,
1506: G_PKG_NAME,
1507: 'OKC_API.G_RET_STS_ERROR',
1508: x_msg_count,
1509: x_msg_data,
1510: '_PVT'
1511: );

Line 1512: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1508: x_msg_count,
1509: x_msg_data,
1510: '_PVT'
1511: );
1512: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1513: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1514: (
1515: l_api_name,
1516: G_PKG_NAME,

Line 1513: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1509: x_msg_data,
1510: '_PVT'
1511: );
1512: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1513: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1514: (
1515: l_api_name,
1516: G_PKG_NAME,
1517: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1517: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1513: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1514: (
1515: l_api_name,
1516: G_PKG_NAME,
1517: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1518: x_msg_count,
1519: x_msg_data,
1520: '_PVT'
1521: );

Line 1523: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1519: x_msg_data,
1520: '_PVT'
1521: );
1522: WHEN OTHERS THEN
1523: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1524: (
1525: l_api_name,
1526: G_PKG_NAME,
1527: 'OTHERS',

Line 1538: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1534: -- PL/SQL TBL insert_row for:IRKV_TBL --
1535: ----------------------------------------
1536: PROCEDURE insert_row(
1537: p_api_version IN NUMBER,
1538: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1539: x_return_status OUT NOCOPY VARCHAR2,
1540: x_msg_count OUT NOCOPY NUMBER,
1541: x_msg_data OUT NOCOPY VARCHAR2,
1542: p_irkv_tbl IN irkv_tbl_type,

Line 1550: OKC_API.init_msg_list(p_init_msg_list);

1546: l_api_version CONSTANT NUMBER := 1;
1547: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_insert_row';
1548: i NUMBER := 0;
1549: BEGIN
1550: OKC_API.init_msg_list(p_init_msg_list);
1551: -- Make sure PL/SQL table has records in it before passing
1552: IF (p_irkv_tbl.COUNT > 0) THEN
1553: i := p_irkv_tbl.FIRST;
1554: LOOP

Line 1563: p_init_msg_list => OKC_API.G_FALSE,

1559: l_error_rec.api_package := G_PKG_NAME;
1560: l_error_rec.idx := i;
1561: insert_row (
1562: p_api_version => p_api_version,
1563: p_init_msg_list => OKC_API.G_FALSE,
1564: x_return_status => l_error_rec.error_type,
1565: x_msg_count => l_error_rec.msg_count,
1566: x_msg_data => l_error_rec.msg_data,
1567: p_irkv_rec => p_irkv_tbl(i),

Line 1569: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN

1565: x_msg_count => l_error_rec.msg_count,
1566: x_msg_data => l_error_rec.msg_data,
1567: p_irkv_rec => p_irkv_tbl(i),
1568: x_irkv_rec => x_irkv_tbl(i));
1569: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN
1570: l_error_rec.sqlcode := SQLCODE;
1571: load_error_tbl(l_error_rec, px_error_tbl);
1572: ELSE
1573: x_msg_count := l_error_rec.msg_count;

Line 1577: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1573: x_msg_count := l_error_rec.msg_count;
1574: x_msg_data := l_error_rec.msg_data;
1575: END IF;
1576: EXCEPTION
1577: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1578: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1579: l_error_rec.sqlcode := SQLCODE;
1580: load_error_tbl(l_error_rec, px_error_tbl);
1581: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1578: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;

1574: x_msg_data := l_error_rec.msg_data;
1575: END IF;
1576: EXCEPTION
1577: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1578: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1579: l_error_rec.sqlcode := SQLCODE;
1580: load_error_tbl(l_error_rec, px_error_tbl);
1581: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1582: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 1581: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1577: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1578: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1579: l_error_rec.sqlcode := SQLCODE;
1580: load_error_tbl(l_error_rec, px_error_tbl);
1581: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1582: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
1583: l_error_rec.sqlcode := SQLCODE;
1584: load_error_tbl(l_error_rec, px_error_tbl);
1585: WHEN OTHERS THEN

Line 1582: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

1578: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1579: l_error_rec.sqlcode := SQLCODE;
1580: load_error_tbl(l_error_rec, px_error_tbl);
1581: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1582: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
1583: l_error_rec.sqlcode := SQLCODE;
1584: load_error_tbl(l_error_rec, px_error_tbl);
1585: WHEN OTHERS THEN
1586: l_error_rec.error_type := 'OTHERS';

Line 1597: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1593: END IF;
1594: -- Loop through the error_tbl to find the error with the highest severity
1595: -- and return it.
1596: x_return_status := find_highest_exception(px_error_tbl);
1597: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1598: EXCEPTION
1599: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1600: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1601: (

Line 1599: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1595: -- and return it.
1596: x_return_status := find_highest_exception(px_error_tbl);
1597: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1598: EXCEPTION
1599: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1600: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1601: (
1602: l_api_name,
1603: G_PKG_NAME,

Line 1600: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1596: x_return_status := find_highest_exception(px_error_tbl);
1597: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1598: EXCEPTION
1599: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1600: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1601: (
1602: l_api_name,
1603: G_PKG_NAME,
1604: 'OKC_API.G_RET_STS_ERROR',

Line 1604: 'OKC_API.G_RET_STS_ERROR',

1600: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1601: (
1602: l_api_name,
1603: G_PKG_NAME,
1604: 'OKC_API.G_RET_STS_ERROR',
1605: x_msg_count,
1606: x_msg_data,
1607: '_PVT'
1608: );

Line 1609: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1605: x_msg_count,
1606: x_msg_data,
1607: '_PVT'
1608: );
1609: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1610: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1611: (
1612: l_api_name,
1613: G_PKG_NAME,

Line 1610: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1606: x_msg_data,
1607: '_PVT'
1608: );
1609: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1610: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1611: (
1612: l_api_name,
1613: G_PKG_NAME,
1614: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1614: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1610: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1611: (
1612: l_api_name,
1613: G_PKG_NAME,
1614: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1615: x_msg_count,
1616: x_msg_data,
1617: '_PVT'
1618: );

Line 1620: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1616: x_msg_data,
1617: '_PVT'
1618: );
1619: WHEN OTHERS THEN
1620: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1621: (
1622: l_api_name,
1623: G_PKG_NAME,
1624: 'OTHERS',

Line 1636: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1632: -- PL/SQL TBL insert_row for:IRKV_TBL --
1633: ----------------------------------------
1634: PROCEDURE insert_row(
1635: p_api_version IN NUMBER,
1636: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1637: x_return_status OUT NOCOPY VARCHAR2,
1638: x_msg_count OUT NOCOPY NUMBER,
1639: x_msg_data OUT NOCOPY VARCHAR2,
1640: p_irkv_tbl IN irkv_tbl_type,

Line 1645: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1641: x_irkv_tbl OUT NOCOPY irkv_tbl_type) IS
1642:
1643: l_api_version CONSTANT NUMBER := 1;
1644: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1645: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1646: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1647: BEGIN
1648: OKC_API.init_msg_list(p_init_msg_list);
1649: -- Make sure PL/SQL table has records in it before passing

Line 1648: OKC_API.init_msg_list(p_init_msg_list);

1644: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1645: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1646: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1647: BEGIN
1648: OKC_API.init_msg_list(p_init_msg_list);
1649: -- Make sure PL/SQL table has records in it before passing
1650: IF (p_irkv_tbl.COUNT > 0) THEN
1651: insert_row (
1652: p_api_version => p_api_version,

Line 1653: p_init_msg_list => OKC_API.G_FALSE,

1649: -- Make sure PL/SQL table has records in it before passing
1650: IF (p_irkv_tbl.COUNT > 0) THEN
1651: insert_row (
1652: p_api_version => p_api_version,
1653: p_init_msg_list => OKC_API.G_FALSE,
1654: x_return_status => x_return_status,
1655: x_msg_count => x_msg_count,
1656: x_msg_data => x_msg_data,
1657: p_irkv_tbl => p_irkv_tbl,

Line 1661: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1657: p_irkv_tbl => p_irkv_tbl,
1658: x_irkv_tbl => x_irkv_tbl,
1659: px_error_tbl => l_error_tbl);
1660: END IF;
1661: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1662: EXCEPTION
1663: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1664: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1665: (

Line 1663: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1659: px_error_tbl => l_error_tbl);
1660: END IF;
1661: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1662: EXCEPTION
1663: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1664: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1665: (
1666: l_api_name,
1667: G_PKG_NAME,

Line 1664: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1660: END IF;
1661: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1662: EXCEPTION
1663: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1664: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1665: (
1666: l_api_name,
1667: G_PKG_NAME,
1668: 'OKC_API.G_RET_STS_ERROR',

Line 1668: 'OKC_API.G_RET_STS_ERROR',

1664: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1665: (
1666: l_api_name,
1667: G_PKG_NAME,
1668: 'OKC_API.G_RET_STS_ERROR',
1669: x_msg_count,
1670: x_msg_data,
1671: '_PVT'
1672: );

Line 1673: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1669: x_msg_count,
1670: x_msg_data,
1671: '_PVT'
1672: );
1673: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1674: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1675: (
1676: l_api_name,
1677: G_PKG_NAME,

Line 1674: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1670: x_msg_data,
1671: '_PVT'
1672: );
1673: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1674: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1675: (
1676: l_api_name,
1677: G_PKG_NAME,
1678: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1678: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1674: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1675: (
1676: l_api_name,
1677: G_PKG_NAME,
1678: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1679: x_msg_count,
1680: x_msg_data,
1681: '_PVT'
1682: );

Line 1684: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1680: x_msg_data,
1681: '_PVT'
1682: );
1683: WHEN OTHERS THEN
1684: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1685: (
1686: l_api_name,
1687: G_PKG_NAME,
1688: 'OTHERS',

Line 1702: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1698: ---------------------------------------
1699: -- lock_row for:OKL_INSURER_RANKINGS --
1700: ---------------------------------------
1701: PROCEDURE lock_row(
1702: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1703: x_return_status OUT NOCOPY VARCHAR2,
1704: x_msg_count OUT NOCOPY NUMBER,
1705: x_msg_data OUT NOCOPY VARCHAR2,
1706: p_irk_rec IN irk_rec_type) IS

Line 1723: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1719: FROM OKL_INSURER_RANKINGS
1720: WHERE ID = p_irk_rec.id;
1721: l_api_version CONSTANT NUMBER := 1;
1722: l_api_name CONSTANT VARCHAR2(30) := 'B_lock_row';
1723: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1724: l_object_version_number OKL_INSURER_RANKINGS.OBJECT_VERSION_NUMBER%TYPE;
1725: lc_object_version_number OKL_INSURER_RANKINGS.OBJECT_VERSION_NUMBER%TYPE;
1726: l_row_notfound BOOLEAN := FALSE;
1727: lc_row_notfound BOOLEAN := FALSE;

Line 1729: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1725: lc_object_version_number OKL_INSURER_RANKINGS.OBJECT_VERSION_NUMBER%TYPE;
1726: l_row_notfound BOOLEAN := FALSE;
1727: lc_row_notfound BOOLEAN := FALSE;
1728: BEGIN
1729: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1730: p_init_msg_list,
1731: '_PVT',
1732: x_return_status);
1733: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1733: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1729: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1730: p_init_msg_list,
1731: '_PVT',
1732: x_return_status);
1733: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1734: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1735: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1736: RAISE OKC_API.G_EXCEPTION_ERROR;
1737: END IF;

Line 1734: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1730: p_init_msg_list,
1731: '_PVT',
1732: x_return_status);
1733: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1734: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1735: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1736: RAISE OKC_API.G_EXCEPTION_ERROR;
1737: END IF;
1738: BEGIN

Line 1735: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1731: '_PVT',
1732: x_return_status);
1733: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1734: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1735: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1736: RAISE OKC_API.G_EXCEPTION_ERROR;
1737: END IF;
1738: BEGIN
1739: OPEN lock_csr(p_irk_rec);

Line 1736: RAISE OKC_API.G_EXCEPTION_ERROR;

1732: x_return_status);
1733: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1734: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1735: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1736: RAISE OKC_API.G_EXCEPTION_ERROR;
1737: END IF;
1738: BEGIN
1739: OPEN lock_csr(p_irk_rec);
1740: FETCH lock_csr INTO l_object_version_number;

Line 1748: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);

1744: WHEN E_Resource_Busy THEN
1745: IF (lock_csr%ISOPEN) THEN
1746: CLOSE lock_csr;
1747: END IF;
1748: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
1749: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1750: END;
1751:
1752: IF ( l_row_notfound ) THEN

Line 1759: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);

1755: lc_row_notfound := lchk_csr%NOTFOUND;
1756: CLOSE lchk_csr;
1757: END IF;
1758: IF (lc_row_notfound) THEN
1759: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1760: RAISE OKC_API.G_EXCEPTION_ERROR;
1761: ELSIF lc_object_version_number > p_irk_rec.object_version_number THEN
1762: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1763: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1760: RAISE OKC_API.G_EXCEPTION_ERROR;

1756: CLOSE lchk_csr;
1757: END IF;
1758: IF (lc_row_notfound) THEN
1759: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1760: RAISE OKC_API.G_EXCEPTION_ERROR;
1761: ELSIF lc_object_version_number > p_irk_rec.object_version_number THEN
1762: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1763: RAISE OKC_API.G_EXCEPTION_ERROR;
1764: ELSIF lc_object_version_number <> p_irk_rec.object_version_number THEN

Line 1762: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);

1758: IF (lc_row_notfound) THEN
1759: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1760: RAISE OKC_API.G_EXCEPTION_ERROR;
1761: ELSIF lc_object_version_number > p_irk_rec.object_version_number THEN
1762: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1763: RAISE OKC_API.G_EXCEPTION_ERROR;
1764: ELSIF lc_object_version_number <> p_irk_rec.object_version_number THEN
1765: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1766: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1763: RAISE OKC_API.G_EXCEPTION_ERROR;

1759: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1760: RAISE OKC_API.G_EXCEPTION_ERROR;
1761: ELSIF lc_object_version_number > p_irk_rec.object_version_number THEN
1762: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1763: RAISE OKC_API.G_EXCEPTION_ERROR;
1764: ELSIF lc_object_version_number <> p_irk_rec.object_version_number THEN
1765: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1766: RAISE OKC_API.G_EXCEPTION_ERROR;
1767: ELSIF lc_object_version_number = -1 THEN

Line 1765: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);

1761: ELSIF lc_object_version_number > p_irk_rec.object_version_number THEN
1762: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1763: RAISE OKC_API.G_EXCEPTION_ERROR;
1764: ELSIF lc_object_version_number <> p_irk_rec.object_version_number THEN
1765: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1766: RAISE OKC_API.G_EXCEPTION_ERROR;
1767: ELSIF lc_object_version_number = -1 THEN
1768: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1769: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1766: RAISE OKC_API.G_EXCEPTION_ERROR;

1762: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1763: RAISE OKC_API.G_EXCEPTION_ERROR;
1764: ELSIF lc_object_version_number <> p_irk_rec.object_version_number THEN
1765: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1766: RAISE OKC_API.G_EXCEPTION_ERROR;
1767: ELSIF lc_object_version_number = -1 THEN
1768: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1769: RAISE OKC_API.G_EXCEPTION_ERROR;
1770: END IF;

Line 1768: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);

1764: ELSIF lc_object_version_number <> p_irk_rec.object_version_number THEN
1765: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1766: RAISE OKC_API.G_EXCEPTION_ERROR;
1767: ELSIF lc_object_version_number = -1 THEN
1768: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1769: RAISE OKC_API.G_EXCEPTION_ERROR;
1770: END IF;
1771: x_return_status := l_return_status;
1772: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1769: RAISE OKC_API.G_EXCEPTION_ERROR;

1765: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1766: RAISE OKC_API.G_EXCEPTION_ERROR;
1767: ELSIF lc_object_version_number = -1 THEN
1768: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1769: RAISE OKC_API.G_EXCEPTION_ERROR;
1770: END IF;
1771: x_return_status := l_return_status;
1772: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1773: EXCEPTION

Line 1772: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1768: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1769: RAISE OKC_API.G_EXCEPTION_ERROR;
1770: END IF;
1771: x_return_status := l_return_status;
1772: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1773: EXCEPTION
1774: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1775: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1776: (

Line 1774: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1770: END IF;
1771: x_return_status := l_return_status;
1772: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1773: EXCEPTION
1774: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1775: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1776: (
1777: l_api_name,
1778: G_PKG_NAME,

Line 1775: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1771: x_return_status := l_return_status;
1772: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1773: EXCEPTION
1774: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1775: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1776: (
1777: l_api_name,
1778: G_PKG_NAME,
1779: 'OKC_API.G_RET_STS_ERROR',

Line 1779: 'OKC_API.G_RET_STS_ERROR',

1775: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1776: (
1777: l_api_name,
1778: G_PKG_NAME,
1779: 'OKC_API.G_RET_STS_ERROR',
1780: x_msg_count,
1781: x_msg_data,
1782: '_PVT'
1783: );

Line 1784: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1780: x_msg_count,
1781: x_msg_data,
1782: '_PVT'
1783: );
1784: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1785: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1786: (
1787: l_api_name,
1788: G_PKG_NAME,

Line 1785: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1781: x_msg_data,
1782: '_PVT'
1783: );
1784: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1785: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1786: (
1787: l_api_name,
1788: G_PKG_NAME,
1789: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1789: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1785: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1786: (
1787: l_api_name,
1788: G_PKG_NAME,
1789: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1790: x_msg_count,
1791: x_msg_data,
1792: '_PVT'
1793: );

Line 1795: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1791: x_msg_data,
1792: '_PVT'
1793: );
1794: WHEN OTHERS THEN
1795: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1796: (
1797: l_api_name,
1798: G_PKG_NAME,
1799: 'OTHERS',

Line 1810: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1806: -- lock_row for: OKL_INSURER_RANKINGS_V --
1807: ------------------------------------------
1808: PROCEDURE lock_row(
1809: p_api_version IN NUMBER,
1810: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1811: x_return_status OUT NOCOPY VARCHAR2,
1812: x_msg_count OUT NOCOPY NUMBER,
1813: x_msg_data OUT NOCOPY VARCHAR2,
1814: p_irkv_rec IN irkv_rec_type) IS

Line 1818: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1814: p_irkv_rec IN irkv_rec_type) IS
1815:
1816: l_api_version CONSTANT NUMBER := 1;
1817: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1818: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1819: l_irk_rec irk_rec_type;
1820: BEGIN
1821: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1822: G_PKG_NAME,

Line 1821: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1817: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1818: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1819: l_irk_rec irk_rec_type;
1820: BEGIN
1821: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1822: G_PKG_NAME,
1823: p_init_msg_list,
1824: l_api_version,
1825: p_api_version,

Line 1828: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1824: l_api_version,
1825: p_api_version,
1826: '_PVT',
1827: x_return_status);
1828: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1829: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1830: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1831: RAISE OKC_API.G_EXCEPTION_ERROR;
1832: END IF;

Line 1829: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1825: p_api_version,
1826: '_PVT',
1827: x_return_status);
1828: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1829: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1830: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1831: RAISE OKC_API.G_EXCEPTION_ERROR;
1832: END IF;
1833: -----------------------------------------

Line 1830: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1826: '_PVT',
1827: x_return_status);
1828: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1829: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1830: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1831: RAISE OKC_API.G_EXCEPTION_ERROR;
1832: END IF;
1833: -----------------------------------------
1834: -- Move VIEW record to "Child" records --

Line 1831: RAISE OKC_API.G_EXCEPTION_ERROR;

1827: x_return_status);
1828: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1829: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1830: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1831: RAISE OKC_API.G_EXCEPTION_ERROR;
1832: END IF;
1833: -----------------------------------------
1834: -- Move VIEW record to "Child" records --
1835: -----------------------------------------

Line 1847: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1843: x_msg_count,
1844: x_msg_data,
1845: l_irk_rec
1846: );
1847: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1848: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1849: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1850: RAISE OKC_API.G_EXCEPTION_ERROR;
1851: END IF;

Line 1848: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1844: x_msg_data,
1845: l_irk_rec
1846: );
1847: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1848: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1849: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1850: RAISE OKC_API.G_EXCEPTION_ERROR;
1851: END IF;
1852: x_return_status := l_return_status;

Line 1849: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1845: l_irk_rec
1846: );
1847: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1848: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1849: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1850: RAISE OKC_API.G_EXCEPTION_ERROR;
1851: END IF;
1852: x_return_status := l_return_status;
1853: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1850: RAISE OKC_API.G_EXCEPTION_ERROR;

1846: );
1847: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1848: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1849: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1850: RAISE OKC_API.G_EXCEPTION_ERROR;
1851: END IF;
1852: x_return_status := l_return_status;
1853: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1854: EXCEPTION

Line 1853: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1849: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1850: RAISE OKC_API.G_EXCEPTION_ERROR;
1851: END IF;
1852: x_return_status := l_return_status;
1853: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1854: EXCEPTION
1855: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1856: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1857: (

Line 1855: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1851: END IF;
1852: x_return_status := l_return_status;
1853: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1854: EXCEPTION
1855: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1856: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1857: (
1858: l_api_name,
1859: G_PKG_NAME,

Line 1856: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1852: x_return_status := l_return_status;
1853: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1854: EXCEPTION
1855: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1856: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1857: (
1858: l_api_name,
1859: G_PKG_NAME,
1860: 'OKC_API.G_RET_STS_ERROR',

Line 1860: 'OKC_API.G_RET_STS_ERROR',

1856: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1857: (
1858: l_api_name,
1859: G_PKG_NAME,
1860: 'OKC_API.G_RET_STS_ERROR',
1861: x_msg_count,
1862: x_msg_data,
1863: '_PVT'
1864: );

Line 1865: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1861: x_msg_count,
1862: x_msg_data,
1863: '_PVT'
1864: );
1865: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1866: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1867: (
1868: l_api_name,
1869: G_PKG_NAME,

Line 1866: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1862: x_msg_data,
1863: '_PVT'
1864: );
1865: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1866: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1867: (
1868: l_api_name,
1869: G_PKG_NAME,
1870: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1870: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1866: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1867: (
1868: l_api_name,
1869: G_PKG_NAME,
1870: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1871: x_msg_count,
1872: x_msg_data,
1873: '_PVT'
1874: );

Line 1876: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1872: x_msg_data,
1873: '_PVT'
1874: );
1875: WHEN OTHERS THEN
1876: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1877: (
1878: l_api_name,
1879: G_PKG_NAME,
1880: 'OTHERS',

Line 1891: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1887: -- PL/SQL TBL lock_row for:IRKV_TBL --
1888: --------------------------------------
1889: PROCEDURE lock_row(
1890: p_api_version IN NUMBER,
1891: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1892: x_return_status OUT NOCOPY VARCHAR2,
1893: x_msg_count OUT NOCOPY NUMBER,
1894: x_msg_data OUT NOCOPY VARCHAR2,
1895: p_irkv_tbl IN irkv_tbl_type,

Line 1902: OKC_API.init_msg_list(p_init_msg_list);

1898: l_api_version CONSTANT NUMBER := 1;
1899: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_lock_row';
1900: i NUMBER := 0;
1901: BEGIN
1902: OKC_API.init_msg_list(p_init_msg_list);
1903: -- Make sure PL/SQL table has recrods in it before passing
1904: IF (p_irkv_tbl.COUNT > 0) THEN
1905: i := p_irkv_tbl.FIRST;
1906: LOOP

Line 1915: p_init_msg_list => OKC_API.G_FALSE,

1911: l_error_rec.api_package := G_PKG_NAME;
1912: l_error_rec.idx := i;
1913: lock_row(
1914: p_api_version => p_api_version,
1915: p_init_msg_list => OKC_API.G_FALSE,
1916: x_return_status => l_error_rec.error_type,
1917: x_msg_count => l_error_rec.msg_count,
1918: x_msg_data => l_error_rec.msg_data,
1919: p_irkv_rec => p_irkv_tbl(i));

Line 1920: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN

1916: x_return_status => l_error_rec.error_type,
1917: x_msg_count => l_error_rec.msg_count,
1918: x_msg_data => l_error_rec.msg_data,
1919: p_irkv_rec => p_irkv_tbl(i));
1920: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN
1921: l_error_rec.sqlcode := SQLCODE;
1922: load_error_tbl(l_error_rec, px_error_tbl);
1923: ELSE
1924: x_msg_count := l_error_rec.msg_count;

Line 1928: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1924: x_msg_count := l_error_rec.msg_count;
1925: x_msg_data := l_error_rec.msg_data;
1926: END IF;
1927: EXCEPTION
1928: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1929: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1930: l_error_rec.sqlcode := SQLCODE;
1931: load_error_tbl(l_error_rec, px_error_tbl);
1932: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1929: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;

1925: x_msg_data := l_error_rec.msg_data;
1926: END IF;
1927: EXCEPTION
1928: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1929: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1930: l_error_rec.sqlcode := SQLCODE;
1931: load_error_tbl(l_error_rec, px_error_tbl);
1932: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1933: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 1932: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1928: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1929: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1930: l_error_rec.sqlcode := SQLCODE;
1931: load_error_tbl(l_error_rec, px_error_tbl);
1932: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1933: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
1934: l_error_rec.sqlcode := SQLCODE;
1935: load_error_tbl(l_error_rec, px_error_tbl);
1936: WHEN OTHERS THEN

Line 1933: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

1929: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1930: l_error_rec.sqlcode := SQLCODE;
1931: load_error_tbl(l_error_rec, px_error_tbl);
1932: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1933: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
1934: l_error_rec.sqlcode := SQLCODE;
1935: load_error_tbl(l_error_rec, px_error_tbl);
1936: WHEN OTHERS THEN
1937: l_error_rec.error_type := 'OTHERS';

Line 1948: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1944: END IF;
1945: -- Loop through the error_tbl to find the error with the highest severity
1946: -- and return it.
1947: x_return_status := find_highest_exception(px_error_tbl);
1948: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1949: EXCEPTION
1950: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1951: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1952: (

Line 1950: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1946: -- and return it.
1947: x_return_status := find_highest_exception(px_error_tbl);
1948: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1949: EXCEPTION
1950: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1951: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1952: (
1953: l_api_name,
1954: G_PKG_NAME,

Line 1951: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1947: x_return_status := find_highest_exception(px_error_tbl);
1948: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1949: EXCEPTION
1950: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1951: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1952: (
1953: l_api_name,
1954: G_PKG_NAME,
1955: 'OKC_API.G_RET_STS_ERROR',

Line 1955: 'OKC_API.G_RET_STS_ERROR',

1951: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1952: (
1953: l_api_name,
1954: G_PKG_NAME,
1955: 'OKC_API.G_RET_STS_ERROR',
1956: x_msg_count,
1957: x_msg_data,
1958: '_PVT'
1959: );

Line 1960: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1956: x_msg_count,
1957: x_msg_data,
1958: '_PVT'
1959: );
1960: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1961: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1962: (
1963: l_api_name,
1964: G_PKG_NAME,

Line 1961: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1957: x_msg_data,
1958: '_PVT'
1959: );
1960: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1961: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1962: (
1963: l_api_name,
1964: G_PKG_NAME,
1965: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1965: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1961: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1962: (
1963: l_api_name,
1964: G_PKG_NAME,
1965: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1966: x_msg_count,
1967: x_msg_data,
1968: '_PVT'
1969: );

Line 1971: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1967: x_msg_data,
1968: '_PVT'
1969: );
1970: WHEN OTHERS THEN
1971: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1972: (
1973: l_api_name,
1974: G_PKG_NAME,
1975: 'OTHERS',

Line 1986: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1982: -- PL/SQL TBL lock_row for:IRKV_TBL --
1983: --------------------------------------
1984: PROCEDURE lock_row(
1985: p_api_version IN NUMBER,
1986: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1987: x_return_status OUT NOCOPY VARCHAR2,
1988: x_msg_count OUT NOCOPY NUMBER,
1989: x_msg_data OUT NOCOPY VARCHAR2,
1990: p_irkv_tbl IN irkv_tbl_type) IS

Line 1994: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1990: p_irkv_tbl IN irkv_tbl_type) IS
1991:
1992: l_api_version CONSTANT NUMBER := 1;
1993: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1994: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1995: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1996: BEGIN
1997: OKC_API.init_msg_list(p_init_msg_list);
1998: -- Make sure PL/SQL table has recrods in it before passing

Line 1997: OKC_API.init_msg_list(p_init_msg_list);

1993: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1994: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1995: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1996: BEGIN
1997: OKC_API.init_msg_list(p_init_msg_list);
1998: -- Make sure PL/SQL table has recrods in it before passing
1999: IF (p_irkv_tbl.COUNT > 0) THEN
2000: lock_row(
2001: p_api_version => p_api_version,

Line 2002: p_init_msg_list => OKC_API.G_FALSE,

1998: -- Make sure PL/SQL table has recrods in it before passing
1999: IF (p_irkv_tbl.COUNT > 0) THEN
2000: lock_row(
2001: p_api_version => p_api_version,
2002: p_init_msg_list => OKC_API.G_FALSE,
2003: x_return_status => x_return_status,
2004: x_msg_count => x_msg_count,
2005: x_msg_data => x_msg_data,
2006: p_irkv_tbl => p_irkv_tbl,

Line 2009: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

2005: x_msg_data => x_msg_data,
2006: p_irkv_tbl => p_irkv_tbl,
2007: px_error_tbl => l_error_tbl);
2008: END IF;
2009: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2010: EXCEPTION
2011: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2012: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2013: (

Line 2011: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2007: px_error_tbl => l_error_tbl);
2008: END IF;
2009: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2010: EXCEPTION
2011: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2012: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2013: (
2014: l_api_name,
2015: G_PKG_NAME,

Line 2012: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2008: END IF;
2009: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2010: EXCEPTION
2011: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2012: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2013: (
2014: l_api_name,
2015: G_PKG_NAME,
2016: 'OKC_API.G_RET_STS_ERROR',

Line 2016: 'OKC_API.G_RET_STS_ERROR',

2012: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2013: (
2014: l_api_name,
2015: G_PKG_NAME,
2016: 'OKC_API.G_RET_STS_ERROR',
2017: x_msg_count,
2018: x_msg_data,
2019: '_PVT'
2020: );

Line 2021: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2017: x_msg_count,
2018: x_msg_data,
2019: '_PVT'
2020: );
2021: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2022: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2023: (
2024: l_api_name,
2025: G_PKG_NAME,

Line 2022: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2018: x_msg_data,
2019: '_PVT'
2020: );
2021: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2022: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2023: (
2024: l_api_name,
2025: G_PKG_NAME,
2026: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2026: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2022: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2023: (
2024: l_api_name,
2025: G_PKG_NAME,
2026: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2027: x_msg_count,
2028: x_msg_data,
2029: '_PVT'
2030: );

Line 2032: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2028: x_msg_data,
2029: '_PVT'
2030: );
2031: WHEN OTHERS THEN
2032: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2033: (
2034: l_api_name,
2035: G_PKG_NAME,
2036: 'OTHERS',

Line 2049: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2045: -----------------------------------------
2046: -- update_row for:OKL_INSURER_RANKINGS --
2047: -----------------------------------------
2048: PROCEDURE update_row(
2049: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2050: x_return_status OUT NOCOPY VARCHAR2,
2051: x_msg_count OUT NOCOPY NUMBER,
2052: x_msg_data OUT NOCOPY VARCHAR2,
2053: p_irk_rec IN irk_rec_type,

Line 2058: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2054: x_irk_rec OUT NOCOPY irk_rec_type) IS
2055:
2056: l_api_version CONSTANT NUMBER := 1;
2057: l_api_name CONSTANT VARCHAR2(30) := 'B_update_row';
2058: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2059: l_irk_rec irk_rec_type := p_irk_rec;
2060: l_def_irk_rec irk_rec_type;
2061: l_row_notfound BOOLEAN := TRUE;
2062: ----------------------------------

Line 2071: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2067: x_irk_rec OUT NOCOPY irk_rec_type
2068: ) RETURN VARCHAR2 IS
2069: l_irk_rec irk_rec_type;
2070: l_row_notfound BOOLEAN := TRUE;
2071: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2072: BEGIN
2073: x_irk_rec := p_irk_rec;
2074: -- Get current database values
2075: l_irk_rec := get_rec(p_irk_rec, l_return_status);

Line 2076: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN

2072: BEGIN
2073: x_irk_rec := p_irk_rec;
2074: -- Get current database values
2075: l_irk_rec := get_rec(p_irk_rec, l_return_status);
2076: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
2077: IF (x_irk_rec.id = OKC_API.G_MISS_NUM)
2078: THEN
2079: x_irk_rec.id := l_irk_rec.id;
2080: END IF;

Line 2077: IF (x_irk_rec.id = OKC_API.G_MISS_NUM)

2073: x_irk_rec := p_irk_rec;
2074: -- Get current database values
2075: l_irk_rec := get_rec(p_irk_rec, l_return_status);
2076: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
2077: IF (x_irk_rec.id = OKC_API.G_MISS_NUM)
2078: THEN
2079: x_irk_rec.id := l_irk_rec.id;
2080: END IF;
2081: IF (x_irk_rec.object_version_number = OKC_API.G_MISS_NUM)

Line 2081: IF (x_irk_rec.object_version_number = OKC_API.G_MISS_NUM)

2077: IF (x_irk_rec.id = OKC_API.G_MISS_NUM)
2078: THEN
2079: x_irk_rec.id := l_irk_rec.id;
2080: END IF;
2081: IF (x_irk_rec.object_version_number = OKC_API.G_MISS_NUM)
2082: THEN
2083: x_irk_rec.object_version_number := l_irk_rec.object_version_number;
2084: END IF;
2085: IF (x_irk_rec.ranking_seq = OKC_API.G_MISS_NUM)

Line 2085: IF (x_irk_rec.ranking_seq = OKC_API.G_MISS_NUM)

2081: IF (x_irk_rec.object_version_number = OKC_API.G_MISS_NUM)
2082: THEN
2083: x_irk_rec.object_version_number := l_irk_rec.object_version_number;
2084: END IF;
2085: IF (x_irk_rec.ranking_seq = OKC_API.G_MISS_NUM)
2086: THEN
2087: x_irk_rec.ranking_seq := l_irk_rec.ranking_seq;
2088: END IF;
2089: IF (x_irk_rec.date_from = OKC_API.G_MISS_DATE)

Line 2089: IF (x_irk_rec.date_from = OKC_API.G_MISS_DATE)

2085: IF (x_irk_rec.ranking_seq = OKC_API.G_MISS_NUM)
2086: THEN
2087: x_irk_rec.ranking_seq := l_irk_rec.ranking_seq;
2088: END IF;
2089: IF (x_irk_rec.date_from = OKC_API.G_MISS_DATE)
2090: THEN
2091: x_irk_rec.date_from := l_irk_rec.date_from;
2092: END IF;
2093: IF (x_irk_rec.date_to = OKC_API.G_MISS_DATE)

Line 2093: IF (x_irk_rec.date_to = OKC_API.G_MISS_DATE)

2089: IF (x_irk_rec.date_from = OKC_API.G_MISS_DATE)
2090: THEN
2091: x_irk_rec.date_from := l_irk_rec.date_from;
2092: END IF;
2093: IF (x_irk_rec.date_to = OKC_API.G_MISS_DATE)
2094: THEN
2095: x_irk_rec.date_to := l_irk_rec.date_to;
2096: END IF;
2097: IF (x_irk_rec.isu_id = OKC_API.G_MISS_NUM)

Line 2097: IF (x_irk_rec.isu_id = OKC_API.G_MISS_NUM)

2093: IF (x_irk_rec.date_to = OKC_API.G_MISS_DATE)
2094: THEN
2095: x_irk_rec.date_to := l_irk_rec.date_to;
2096: END IF;
2097: IF (x_irk_rec.isu_id = OKC_API.G_MISS_NUM)
2098: THEN
2099: x_irk_rec.isu_id := l_irk_rec.isu_id;
2100: END IF;
2101: IF (x_irk_rec.ic_code = OKC_API.G_MISS_CHAR)

Line 2101: IF (x_irk_rec.ic_code = OKC_API.G_MISS_CHAR)

2097: IF (x_irk_rec.isu_id = OKC_API.G_MISS_NUM)
2098: THEN
2099: x_irk_rec.isu_id := l_irk_rec.isu_id;
2100: END IF;
2101: IF (x_irk_rec.ic_code = OKC_API.G_MISS_CHAR)
2102: THEN
2103: x_irk_rec.ic_code := l_irk_rec.ic_code;
2104: END IF;
2105: IF (x_irk_rec.attribute_category = OKC_API.G_MISS_CHAR)

Line 2105: IF (x_irk_rec.attribute_category = OKC_API.G_MISS_CHAR)

2101: IF (x_irk_rec.ic_code = OKC_API.G_MISS_CHAR)
2102: THEN
2103: x_irk_rec.ic_code := l_irk_rec.ic_code;
2104: END IF;
2105: IF (x_irk_rec.attribute_category = OKC_API.G_MISS_CHAR)
2106: THEN
2107: x_irk_rec.attribute_category := l_irk_rec.attribute_category;
2108: END IF;
2109: IF (x_irk_rec.attribute1 = OKC_API.G_MISS_CHAR)

Line 2109: IF (x_irk_rec.attribute1 = OKC_API.G_MISS_CHAR)

2105: IF (x_irk_rec.attribute_category = OKC_API.G_MISS_CHAR)
2106: THEN
2107: x_irk_rec.attribute_category := l_irk_rec.attribute_category;
2108: END IF;
2109: IF (x_irk_rec.attribute1 = OKC_API.G_MISS_CHAR)
2110: THEN
2111: x_irk_rec.attribute1 := l_irk_rec.attribute1;
2112: END IF;
2113: IF (x_irk_rec.attribute2 = OKC_API.G_MISS_CHAR)

Line 2113: IF (x_irk_rec.attribute2 = OKC_API.G_MISS_CHAR)

2109: IF (x_irk_rec.attribute1 = OKC_API.G_MISS_CHAR)
2110: THEN
2111: x_irk_rec.attribute1 := l_irk_rec.attribute1;
2112: END IF;
2113: IF (x_irk_rec.attribute2 = OKC_API.G_MISS_CHAR)
2114: THEN
2115: x_irk_rec.attribute2 := l_irk_rec.attribute2;
2116: END IF;
2117: IF (x_irk_rec.attribute3 = OKC_API.G_MISS_CHAR)

Line 2117: IF (x_irk_rec.attribute3 = OKC_API.G_MISS_CHAR)

2113: IF (x_irk_rec.attribute2 = OKC_API.G_MISS_CHAR)
2114: THEN
2115: x_irk_rec.attribute2 := l_irk_rec.attribute2;
2116: END IF;
2117: IF (x_irk_rec.attribute3 = OKC_API.G_MISS_CHAR)
2118: THEN
2119: x_irk_rec.attribute3 := l_irk_rec.attribute3;
2120: END IF;
2121: IF (x_irk_rec.attribute4 = OKC_API.G_MISS_CHAR)

Line 2121: IF (x_irk_rec.attribute4 = OKC_API.G_MISS_CHAR)

2117: IF (x_irk_rec.attribute3 = OKC_API.G_MISS_CHAR)
2118: THEN
2119: x_irk_rec.attribute3 := l_irk_rec.attribute3;
2120: END IF;
2121: IF (x_irk_rec.attribute4 = OKC_API.G_MISS_CHAR)
2122: THEN
2123: x_irk_rec.attribute4 := l_irk_rec.attribute4;
2124: END IF;
2125: IF (x_irk_rec.attribute5 = OKC_API.G_MISS_CHAR)

Line 2125: IF (x_irk_rec.attribute5 = OKC_API.G_MISS_CHAR)

2121: IF (x_irk_rec.attribute4 = OKC_API.G_MISS_CHAR)
2122: THEN
2123: x_irk_rec.attribute4 := l_irk_rec.attribute4;
2124: END IF;
2125: IF (x_irk_rec.attribute5 = OKC_API.G_MISS_CHAR)
2126: THEN
2127: x_irk_rec.attribute5 := l_irk_rec.attribute5;
2128: END IF;
2129: IF (x_irk_rec.attribute6 = OKC_API.G_MISS_CHAR)

Line 2129: IF (x_irk_rec.attribute6 = OKC_API.G_MISS_CHAR)

2125: IF (x_irk_rec.attribute5 = OKC_API.G_MISS_CHAR)
2126: THEN
2127: x_irk_rec.attribute5 := l_irk_rec.attribute5;
2128: END IF;
2129: IF (x_irk_rec.attribute6 = OKC_API.G_MISS_CHAR)
2130: THEN
2131: x_irk_rec.attribute6 := l_irk_rec.attribute6;
2132: END IF;
2133: IF (x_irk_rec.attribute7 = OKC_API.G_MISS_CHAR)

Line 2133: IF (x_irk_rec.attribute7 = OKC_API.G_MISS_CHAR)

2129: IF (x_irk_rec.attribute6 = OKC_API.G_MISS_CHAR)
2130: THEN
2131: x_irk_rec.attribute6 := l_irk_rec.attribute6;
2132: END IF;
2133: IF (x_irk_rec.attribute7 = OKC_API.G_MISS_CHAR)
2134: THEN
2135: x_irk_rec.attribute7 := l_irk_rec.attribute7;
2136: END IF;
2137: IF (x_irk_rec.attribute8 = OKC_API.G_MISS_CHAR)

Line 2137: IF (x_irk_rec.attribute8 = OKC_API.G_MISS_CHAR)

2133: IF (x_irk_rec.attribute7 = OKC_API.G_MISS_CHAR)
2134: THEN
2135: x_irk_rec.attribute7 := l_irk_rec.attribute7;
2136: END IF;
2137: IF (x_irk_rec.attribute8 = OKC_API.G_MISS_CHAR)
2138: THEN
2139: x_irk_rec.attribute8 := l_irk_rec.attribute8;
2140: END IF;
2141: IF (x_irk_rec.attribute9 = OKC_API.G_MISS_CHAR)

Line 2141: IF (x_irk_rec.attribute9 = OKC_API.G_MISS_CHAR)

2137: IF (x_irk_rec.attribute8 = OKC_API.G_MISS_CHAR)
2138: THEN
2139: x_irk_rec.attribute8 := l_irk_rec.attribute8;
2140: END IF;
2141: IF (x_irk_rec.attribute9 = OKC_API.G_MISS_CHAR)
2142: THEN
2143: x_irk_rec.attribute9 := l_irk_rec.attribute9;
2144: END IF;
2145: IF (x_irk_rec.attribute10 = OKC_API.G_MISS_CHAR)

Line 2145: IF (x_irk_rec.attribute10 = OKC_API.G_MISS_CHAR)

2141: IF (x_irk_rec.attribute9 = OKC_API.G_MISS_CHAR)
2142: THEN
2143: x_irk_rec.attribute9 := l_irk_rec.attribute9;
2144: END IF;
2145: IF (x_irk_rec.attribute10 = OKC_API.G_MISS_CHAR)
2146: THEN
2147: x_irk_rec.attribute10 := l_irk_rec.attribute10;
2148: END IF;
2149: IF (x_irk_rec.attribute11 = OKC_API.G_MISS_CHAR)

Line 2149: IF (x_irk_rec.attribute11 = OKC_API.G_MISS_CHAR)

2145: IF (x_irk_rec.attribute10 = OKC_API.G_MISS_CHAR)
2146: THEN
2147: x_irk_rec.attribute10 := l_irk_rec.attribute10;
2148: END IF;
2149: IF (x_irk_rec.attribute11 = OKC_API.G_MISS_CHAR)
2150: THEN
2151: x_irk_rec.attribute11 := l_irk_rec.attribute11;
2152: END IF;
2153: IF (x_irk_rec.attribute12 = OKC_API.G_MISS_CHAR)

Line 2153: IF (x_irk_rec.attribute12 = OKC_API.G_MISS_CHAR)

2149: IF (x_irk_rec.attribute11 = OKC_API.G_MISS_CHAR)
2150: THEN
2151: x_irk_rec.attribute11 := l_irk_rec.attribute11;
2152: END IF;
2153: IF (x_irk_rec.attribute12 = OKC_API.G_MISS_CHAR)
2154: THEN
2155: x_irk_rec.attribute12 := l_irk_rec.attribute12;
2156: END IF;
2157: IF (x_irk_rec.attribute13 = OKC_API.G_MISS_CHAR)

Line 2157: IF (x_irk_rec.attribute13 = OKC_API.G_MISS_CHAR)

2153: IF (x_irk_rec.attribute12 = OKC_API.G_MISS_CHAR)
2154: THEN
2155: x_irk_rec.attribute12 := l_irk_rec.attribute12;
2156: END IF;
2157: IF (x_irk_rec.attribute13 = OKC_API.G_MISS_CHAR)
2158: THEN
2159: x_irk_rec.attribute13 := l_irk_rec.attribute13;
2160: END IF;
2161: IF (x_irk_rec.attribute14 = OKC_API.G_MISS_CHAR)

Line 2161: IF (x_irk_rec.attribute14 = OKC_API.G_MISS_CHAR)

2157: IF (x_irk_rec.attribute13 = OKC_API.G_MISS_CHAR)
2158: THEN
2159: x_irk_rec.attribute13 := l_irk_rec.attribute13;
2160: END IF;
2161: IF (x_irk_rec.attribute14 = OKC_API.G_MISS_CHAR)
2162: THEN
2163: x_irk_rec.attribute14 := l_irk_rec.attribute14;
2164: END IF;
2165: IF (x_irk_rec.attribute15 = OKC_API.G_MISS_CHAR)

Line 2165: IF (x_irk_rec.attribute15 = OKC_API.G_MISS_CHAR)

2161: IF (x_irk_rec.attribute14 = OKC_API.G_MISS_CHAR)
2162: THEN
2163: x_irk_rec.attribute14 := l_irk_rec.attribute14;
2164: END IF;
2165: IF (x_irk_rec.attribute15 = OKC_API.G_MISS_CHAR)
2166: THEN
2167: x_irk_rec.attribute15 := l_irk_rec.attribute15;
2168: END IF;
2169: IF (x_irk_rec.created_by = OKC_API.G_MISS_NUM)

Line 2169: IF (x_irk_rec.created_by = OKC_API.G_MISS_NUM)

2165: IF (x_irk_rec.attribute15 = OKC_API.G_MISS_CHAR)
2166: THEN
2167: x_irk_rec.attribute15 := l_irk_rec.attribute15;
2168: END IF;
2169: IF (x_irk_rec.created_by = OKC_API.G_MISS_NUM)
2170: THEN
2171: x_irk_rec.created_by := l_irk_rec.created_by;
2172: END IF;
2173: IF (x_irk_rec.creation_date = OKC_API.G_MISS_DATE)

Line 2173: IF (x_irk_rec.creation_date = OKC_API.G_MISS_DATE)

2169: IF (x_irk_rec.created_by = OKC_API.G_MISS_NUM)
2170: THEN
2171: x_irk_rec.created_by := l_irk_rec.created_by;
2172: END IF;
2173: IF (x_irk_rec.creation_date = OKC_API.G_MISS_DATE)
2174: THEN
2175: x_irk_rec.creation_date := l_irk_rec.creation_date;
2176: END IF;
2177: IF (x_irk_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 2177: IF (x_irk_rec.last_updated_by = OKC_API.G_MISS_NUM)

2173: IF (x_irk_rec.creation_date = OKC_API.G_MISS_DATE)
2174: THEN
2175: x_irk_rec.creation_date := l_irk_rec.creation_date;
2176: END IF;
2177: IF (x_irk_rec.last_updated_by = OKC_API.G_MISS_NUM)
2178: THEN
2179: x_irk_rec.last_updated_by := l_irk_rec.last_updated_by;
2180: END IF;
2181: IF (x_irk_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 2181: IF (x_irk_rec.last_update_date = OKC_API.G_MISS_DATE)

2177: IF (x_irk_rec.last_updated_by = OKC_API.G_MISS_NUM)
2178: THEN
2179: x_irk_rec.last_updated_by := l_irk_rec.last_updated_by;
2180: END IF;
2181: IF (x_irk_rec.last_update_date = OKC_API.G_MISS_DATE)
2182: THEN
2183: x_irk_rec.last_update_date := l_irk_rec.last_update_date;
2184: END IF;
2185: IF (x_irk_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 2185: IF (x_irk_rec.last_update_login = OKC_API.G_MISS_NUM)

2181: IF (x_irk_rec.last_update_date = OKC_API.G_MISS_DATE)
2182: THEN
2183: x_irk_rec.last_update_date := l_irk_rec.last_update_date;
2184: END IF;
2185: IF (x_irk_rec.last_update_login = OKC_API.G_MISS_NUM)
2186: THEN
2187: x_irk_rec.last_update_login := l_irk_rec.last_update_login;
2188: END IF;
2189: END IF;

Line 2199: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2195: FUNCTION Set_Attributes (
2196: p_irk_rec IN irk_rec_type,
2197: x_irk_rec OUT NOCOPY irk_rec_type
2198: ) RETURN VARCHAR2 IS
2199: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2200: BEGIN
2201: x_irk_rec := p_irk_rec;
2202: x_irk_rec.OBJECT_VERSION_NUMBER := p_irk_rec.OBJECT_VERSION_NUMBER + 1;
2203: RETURN(l_return_status);

Line 2206: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

2202: x_irk_rec.OBJECT_VERSION_NUMBER := p_irk_rec.OBJECT_VERSION_NUMBER + 1;
2203: RETURN(l_return_status);
2204: END Set_Attributes;
2205: BEGIN
2206: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2207: p_init_msg_list,
2208: '_PVT',
2209: x_return_status);
2210: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2210: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2206: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2207: p_init_msg_list,
2208: '_PVT',
2209: x_return_status);
2210: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2211: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2212: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2213: RAISE OKC_API.G_EXCEPTION_ERROR;
2214: END IF;

Line 2211: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2207: p_init_msg_list,
2208: '_PVT',
2209: x_return_status);
2210: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2211: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2212: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2213: RAISE OKC_API.G_EXCEPTION_ERROR;
2214: END IF;
2215: --- Setting item attributes

Line 2212: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2208: '_PVT',
2209: x_return_status);
2210: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2211: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2212: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2213: RAISE OKC_API.G_EXCEPTION_ERROR;
2214: END IF;
2215: --- Setting item attributes
2216: l_return_status := Set_Attributes(

Line 2213: RAISE OKC_API.G_EXCEPTION_ERROR;

2209: x_return_status);
2210: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2211: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2212: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2213: RAISE OKC_API.G_EXCEPTION_ERROR;
2214: END IF;
2215: --- Setting item attributes
2216: l_return_status := Set_Attributes(
2217: p_irk_rec, -- IN

Line 2220: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2216: l_return_status := Set_Attributes(
2217: p_irk_rec, -- IN
2218: l_irk_rec); -- OUT
2219: --- If any errors happen abort API
2220: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2221: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2222: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2223: RAISE OKC_API.G_EXCEPTION_ERROR;
2224: END IF;

Line 2221: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2217: p_irk_rec, -- IN
2218: l_irk_rec); -- OUT
2219: --- If any errors happen abort API
2220: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2221: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2222: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2223: RAISE OKC_API.G_EXCEPTION_ERROR;
2224: END IF;
2225: l_return_status := populate_new_record(l_irk_rec, l_def_irk_rec);

Line 2222: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2218: l_irk_rec); -- OUT
2219: --- If any errors happen abort API
2220: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2221: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2222: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2223: RAISE OKC_API.G_EXCEPTION_ERROR;
2224: END IF;
2225: l_return_status := populate_new_record(l_irk_rec, l_def_irk_rec);
2226: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2223: RAISE OKC_API.G_EXCEPTION_ERROR;

2219: --- If any errors happen abort API
2220: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2221: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2222: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2223: RAISE OKC_API.G_EXCEPTION_ERROR;
2224: END IF;
2225: l_return_status := populate_new_record(l_irk_rec, l_def_irk_rec);
2226: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2227: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2226: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2222: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2223: RAISE OKC_API.G_EXCEPTION_ERROR;
2224: END IF;
2225: l_return_status := populate_new_record(l_irk_rec, l_def_irk_rec);
2226: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2227: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2228: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2229: RAISE OKC_API.G_EXCEPTION_ERROR;
2230: END IF;

Line 2227: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2223: RAISE OKC_API.G_EXCEPTION_ERROR;
2224: END IF;
2225: l_return_status := populate_new_record(l_irk_rec, l_def_irk_rec);
2226: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2227: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2228: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2229: RAISE OKC_API.G_EXCEPTION_ERROR;
2230: END IF;
2231: UPDATE OKL_INSURER_RANKINGS

Line 2228: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2224: END IF;
2225: l_return_status := populate_new_record(l_irk_rec, l_def_irk_rec);
2226: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2227: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2228: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2229: RAISE OKC_API.G_EXCEPTION_ERROR;
2230: END IF;
2231: UPDATE OKL_INSURER_RANKINGS
2232: SET OBJECT_VERSION_NUMBER = l_def_irk_rec.object_version_number,

Line 2229: RAISE OKC_API.G_EXCEPTION_ERROR;

2225: l_return_status := populate_new_record(l_irk_rec, l_def_irk_rec);
2226: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2227: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2228: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2229: RAISE OKC_API.G_EXCEPTION_ERROR;
2230: END IF;
2231: UPDATE OKL_INSURER_RANKINGS
2232: SET OBJECT_VERSION_NUMBER = l_def_irk_rec.object_version_number,
2233: RANKING_SEQ = l_def_irk_rec.ranking_seq,

Line 2263: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

2259: WHERE ID = l_def_irk_rec.id;
2260:
2261: x_irk_rec := l_irk_rec;
2262: x_return_status := l_return_status;
2263: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2264: EXCEPTION
2265: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2266: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2267: (

Line 2265: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2261: x_irk_rec := l_irk_rec;
2262: x_return_status := l_return_status;
2263: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2264: EXCEPTION
2265: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2266: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2267: (
2268: l_api_name,
2269: G_PKG_NAME,

Line 2266: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2262: x_return_status := l_return_status;
2263: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2264: EXCEPTION
2265: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2266: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2267: (
2268: l_api_name,
2269: G_PKG_NAME,
2270: 'OKC_API.G_RET_STS_ERROR',

Line 2270: 'OKC_API.G_RET_STS_ERROR',

2266: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2267: (
2268: l_api_name,
2269: G_PKG_NAME,
2270: 'OKC_API.G_RET_STS_ERROR',
2271: x_msg_count,
2272: x_msg_data,
2273: '_PVT'
2274: );

Line 2275: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2271: x_msg_count,
2272: x_msg_data,
2273: '_PVT'
2274: );
2275: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2276: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2277: (
2278: l_api_name,
2279: G_PKG_NAME,

Line 2276: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2272: x_msg_data,
2273: '_PVT'
2274: );
2275: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2276: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2277: (
2278: l_api_name,
2279: G_PKG_NAME,
2280: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2280: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2276: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2277: (
2278: l_api_name,
2279: G_PKG_NAME,
2280: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2281: x_msg_count,
2282: x_msg_data,
2283: '_PVT'
2284: );

Line 2286: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2282: x_msg_data,
2283: '_PVT'
2284: );
2285: WHEN OTHERS THEN
2286: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2287: (
2288: l_api_name,
2289: G_PKG_NAME,
2290: 'OTHERS',

Line 2301: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2297: -- update_row for:OKL_INSURER_RANKINGS_V --
2298: -------------------------------------------
2299: PROCEDURE update_row(
2300: p_api_version IN NUMBER,
2301: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2302: x_return_status OUT NOCOPY VARCHAR2,
2303: x_msg_count OUT NOCOPY NUMBER,
2304: x_msg_data OUT NOCOPY VARCHAR2,
2305: p_irkv_rec IN irkv_rec_type,

Line 2310: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2306: x_irkv_rec OUT NOCOPY irkv_rec_type) IS
2307:
2308: l_api_version CONSTANT NUMBER := 1;
2309: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
2310: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2311: l_irkv_rec irkv_rec_type := p_irkv_rec;
2312: l_def_irkv_rec irkv_rec_type;
2313: l_def_irkv_rec2 irkv_rec_type;
2314: l_db_irkv_rec irkv_rec_type;

Line 2338: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2334: p_irkv_rec IN irkv_rec_type,
2335: x_irkv_rec OUT NOCOPY irkv_rec_type
2336: ) RETURN VARCHAR2 IS
2337: l_row_notfound BOOLEAN := TRUE;
2338: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2339: BEGIN
2340: x_irkv_rec := p_irkv_rec;
2341: -- Get current database values
2342: -- NOTE: Never assign the OBJECT_VERSION_NUMBER. Force the user to pass it

Line 2345: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN

2341: -- Get current database values
2342: -- NOTE: Never assign the OBJECT_VERSION_NUMBER. Force the user to pass it
2343: -- so it may be verified through LOCK_ROW.
2344: l_db_irkv_rec := get_rec(p_irkv_rec, l_return_status);
2345: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
2346: IF (x_irkv_rec.id = OKC_API.G_MISS_NUM)
2347: THEN
2348: x_irkv_rec.id := l_db_irkv_rec.id;
2349: END IF;

Line 2346: IF (x_irkv_rec.id = OKC_API.G_MISS_NUM)

2342: -- NOTE: Never assign the OBJECT_VERSION_NUMBER. Force the user to pass it
2343: -- so it may be verified through LOCK_ROW.
2344: l_db_irkv_rec := get_rec(p_irkv_rec, l_return_status);
2345: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
2346: IF (x_irkv_rec.id = OKC_API.G_MISS_NUM)
2347: THEN
2348: x_irkv_rec.id := l_db_irkv_rec.id;
2349: END IF;
2350: IF (x_irkv_rec.ranking_seq = OKC_API.G_MISS_NUM)

Line 2350: IF (x_irkv_rec.ranking_seq = OKC_API.G_MISS_NUM)

2346: IF (x_irkv_rec.id = OKC_API.G_MISS_NUM)
2347: THEN
2348: x_irkv_rec.id := l_db_irkv_rec.id;
2349: END IF;
2350: IF (x_irkv_rec.ranking_seq = OKC_API.G_MISS_NUM)
2351: THEN
2352: x_irkv_rec.ranking_seq := l_db_irkv_rec.ranking_seq;
2353: END IF;
2354: IF (x_irkv_rec.date_from = OKC_API.G_MISS_DATE)

Line 2354: IF (x_irkv_rec.date_from = OKC_API.G_MISS_DATE)

2350: IF (x_irkv_rec.ranking_seq = OKC_API.G_MISS_NUM)
2351: THEN
2352: x_irkv_rec.ranking_seq := l_db_irkv_rec.ranking_seq;
2353: END IF;
2354: IF (x_irkv_rec.date_from = OKC_API.G_MISS_DATE)
2355: THEN
2356: x_irkv_rec.date_from := l_db_irkv_rec.date_from;
2357: END IF;
2358: IF (x_irkv_rec.date_to = OKC_API.G_MISS_DATE)

Line 2358: IF (x_irkv_rec.date_to = OKC_API.G_MISS_DATE)

2354: IF (x_irkv_rec.date_from = OKC_API.G_MISS_DATE)
2355: THEN
2356: x_irkv_rec.date_from := l_db_irkv_rec.date_from;
2357: END IF;
2358: IF (x_irkv_rec.date_to = OKC_API.G_MISS_DATE)
2359: THEN
2360: x_irkv_rec.date_to := l_db_irkv_rec.date_to;
2361: END IF;
2362: IF (x_irkv_rec.isu_id = OKC_API.G_MISS_NUM)

Line 2362: IF (x_irkv_rec.isu_id = OKC_API.G_MISS_NUM)

2358: IF (x_irkv_rec.date_to = OKC_API.G_MISS_DATE)
2359: THEN
2360: x_irkv_rec.date_to := l_db_irkv_rec.date_to;
2361: END IF;
2362: IF (x_irkv_rec.isu_id = OKC_API.G_MISS_NUM)
2363: THEN
2364: x_irkv_rec.isu_id := l_db_irkv_rec.isu_id;
2365: END IF;
2366: IF (x_irkv_rec.ic_code = OKC_API.G_MISS_CHAR)

Line 2366: IF (x_irkv_rec.ic_code = OKC_API.G_MISS_CHAR)

2362: IF (x_irkv_rec.isu_id = OKC_API.G_MISS_NUM)
2363: THEN
2364: x_irkv_rec.isu_id := l_db_irkv_rec.isu_id;
2365: END IF;
2366: IF (x_irkv_rec.ic_code = OKC_API.G_MISS_CHAR)
2367: THEN
2368: x_irkv_rec.ic_code := l_db_irkv_rec.ic_code;
2369: END IF;
2370: IF (x_irkv_rec.attribute_category = OKC_API.G_MISS_CHAR)

Line 2370: IF (x_irkv_rec.attribute_category = OKC_API.G_MISS_CHAR)

2366: IF (x_irkv_rec.ic_code = OKC_API.G_MISS_CHAR)
2367: THEN
2368: x_irkv_rec.ic_code := l_db_irkv_rec.ic_code;
2369: END IF;
2370: IF (x_irkv_rec.attribute_category = OKC_API.G_MISS_CHAR)
2371: THEN
2372: x_irkv_rec.attribute_category := l_db_irkv_rec.attribute_category;
2373: END IF;
2374: IF (x_irkv_rec.attribute1 = OKC_API.G_MISS_CHAR)

Line 2374: IF (x_irkv_rec.attribute1 = OKC_API.G_MISS_CHAR)

2370: IF (x_irkv_rec.attribute_category = OKC_API.G_MISS_CHAR)
2371: THEN
2372: x_irkv_rec.attribute_category := l_db_irkv_rec.attribute_category;
2373: END IF;
2374: IF (x_irkv_rec.attribute1 = OKC_API.G_MISS_CHAR)
2375: THEN
2376: x_irkv_rec.attribute1 := l_db_irkv_rec.attribute1;
2377: END IF;
2378: IF (x_irkv_rec.attribute2 = OKC_API.G_MISS_CHAR)

Line 2378: IF (x_irkv_rec.attribute2 = OKC_API.G_MISS_CHAR)

2374: IF (x_irkv_rec.attribute1 = OKC_API.G_MISS_CHAR)
2375: THEN
2376: x_irkv_rec.attribute1 := l_db_irkv_rec.attribute1;
2377: END IF;
2378: IF (x_irkv_rec.attribute2 = OKC_API.G_MISS_CHAR)
2379: THEN
2380: x_irkv_rec.attribute2 := l_db_irkv_rec.attribute2;
2381: END IF;
2382: IF (x_irkv_rec.attribute3 = OKC_API.G_MISS_CHAR)

Line 2382: IF (x_irkv_rec.attribute3 = OKC_API.G_MISS_CHAR)

2378: IF (x_irkv_rec.attribute2 = OKC_API.G_MISS_CHAR)
2379: THEN
2380: x_irkv_rec.attribute2 := l_db_irkv_rec.attribute2;
2381: END IF;
2382: IF (x_irkv_rec.attribute3 = OKC_API.G_MISS_CHAR)
2383: THEN
2384: x_irkv_rec.attribute3 := l_db_irkv_rec.attribute3;
2385: END IF;
2386: IF (x_irkv_rec.attribute4 = OKC_API.G_MISS_CHAR)

Line 2386: IF (x_irkv_rec.attribute4 = OKC_API.G_MISS_CHAR)

2382: IF (x_irkv_rec.attribute3 = OKC_API.G_MISS_CHAR)
2383: THEN
2384: x_irkv_rec.attribute3 := l_db_irkv_rec.attribute3;
2385: END IF;
2386: IF (x_irkv_rec.attribute4 = OKC_API.G_MISS_CHAR)
2387: THEN
2388: x_irkv_rec.attribute4 := l_db_irkv_rec.attribute4;
2389: END IF;
2390: IF (x_irkv_rec.attribute5 = OKC_API.G_MISS_CHAR)

Line 2390: IF (x_irkv_rec.attribute5 = OKC_API.G_MISS_CHAR)

2386: IF (x_irkv_rec.attribute4 = OKC_API.G_MISS_CHAR)
2387: THEN
2388: x_irkv_rec.attribute4 := l_db_irkv_rec.attribute4;
2389: END IF;
2390: IF (x_irkv_rec.attribute5 = OKC_API.G_MISS_CHAR)
2391: THEN
2392: x_irkv_rec.attribute5 := l_db_irkv_rec.attribute5;
2393: END IF;
2394: IF (x_irkv_rec.attribute6 = OKC_API.G_MISS_CHAR)

Line 2394: IF (x_irkv_rec.attribute6 = OKC_API.G_MISS_CHAR)

2390: IF (x_irkv_rec.attribute5 = OKC_API.G_MISS_CHAR)
2391: THEN
2392: x_irkv_rec.attribute5 := l_db_irkv_rec.attribute5;
2393: END IF;
2394: IF (x_irkv_rec.attribute6 = OKC_API.G_MISS_CHAR)
2395: THEN
2396: x_irkv_rec.attribute6 := l_db_irkv_rec.attribute6;
2397: END IF;
2398: IF (x_irkv_rec.attribute7 = OKC_API.G_MISS_CHAR)

Line 2398: IF (x_irkv_rec.attribute7 = OKC_API.G_MISS_CHAR)

2394: IF (x_irkv_rec.attribute6 = OKC_API.G_MISS_CHAR)
2395: THEN
2396: x_irkv_rec.attribute6 := l_db_irkv_rec.attribute6;
2397: END IF;
2398: IF (x_irkv_rec.attribute7 = OKC_API.G_MISS_CHAR)
2399: THEN
2400: x_irkv_rec.attribute7 := l_db_irkv_rec.attribute7;
2401: END IF;
2402: IF (x_irkv_rec.attribute8 = OKC_API.G_MISS_CHAR)

Line 2402: IF (x_irkv_rec.attribute8 = OKC_API.G_MISS_CHAR)

2398: IF (x_irkv_rec.attribute7 = OKC_API.G_MISS_CHAR)
2399: THEN
2400: x_irkv_rec.attribute7 := l_db_irkv_rec.attribute7;
2401: END IF;
2402: IF (x_irkv_rec.attribute8 = OKC_API.G_MISS_CHAR)
2403: THEN
2404: x_irkv_rec.attribute8 := l_db_irkv_rec.attribute8;
2405: END IF;
2406: IF (x_irkv_rec.attribute9 = OKC_API.G_MISS_CHAR)

Line 2406: IF (x_irkv_rec.attribute9 = OKC_API.G_MISS_CHAR)

2402: IF (x_irkv_rec.attribute8 = OKC_API.G_MISS_CHAR)
2403: THEN
2404: x_irkv_rec.attribute8 := l_db_irkv_rec.attribute8;
2405: END IF;
2406: IF (x_irkv_rec.attribute9 = OKC_API.G_MISS_CHAR)
2407: THEN
2408: x_irkv_rec.attribute9 := l_db_irkv_rec.attribute9;
2409: END IF;
2410: IF (x_irkv_rec.attribute10 = OKC_API.G_MISS_CHAR)

Line 2410: IF (x_irkv_rec.attribute10 = OKC_API.G_MISS_CHAR)

2406: IF (x_irkv_rec.attribute9 = OKC_API.G_MISS_CHAR)
2407: THEN
2408: x_irkv_rec.attribute9 := l_db_irkv_rec.attribute9;
2409: END IF;
2410: IF (x_irkv_rec.attribute10 = OKC_API.G_MISS_CHAR)
2411: THEN
2412: x_irkv_rec.attribute10 := l_db_irkv_rec.attribute10;
2413: END IF;
2414: IF (x_irkv_rec.attribute11 = OKC_API.G_MISS_CHAR)

Line 2414: IF (x_irkv_rec.attribute11 = OKC_API.G_MISS_CHAR)

2410: IF (x_irkv_rec.attribute10 = OKC_API.G_MISS_CHAR)
2411: THEN
2412: x_irkv_rec.attribute10 := l_db_irkv_rec.attribute10;
2413: END IF;
2414: IF (x_irkv_rec.attribute11 = OKC_API.G_MISS_CHAR)
2415: THEN
2416: x_irkv_rec.attribute11 := l_db_irkv_rec.attribute11;
2417: END IF;
2418: IF (x_irkv_rec.attribute12 = OKC_API.G_MISS_CHAR)

Line 2418: IF (x_irkv_rec.attribute12 = OKC_API.G_MISS_CHAR)

2414: IF (x_irkv_rec.attribute11 = OKC_API.G_MISS_CHAR)
2415: THEN
2416: x_irkv_rec.attribute11 := l_db_irkv_rec.attribute11;
2417: END IF;
2418: IF (x_irkv_rec.attribute12 = OKC_API.G_MISS_CHAR)
2419: THEN
2420: x_irkv_rec.attribute12 := l_db_irkv_rec.attribute12;
2421: END IF;
2422: IF (x_irkv_rec.attribute13 = OKC_API.G_MISS_CHAR)

Line 2422: IF (x_irkv_rec.attribute13 = OKC_API.G_MISS_CHAR)

2418: IF (x_irkv_rec.attribute12 = OKC_API.G_MISS_CHAR)
2419: THEN
2420: x_irkv_rec.attribute12 := l_db_irkv_rec.attribute12;
2421: END IF;
2422: IF (x_irkv_rec.attribute13 = OKC_API.G_MISS_CHAR)
2423: THEN
2424: x_irkv_rec.attribute13 := l_db_irkv_rec.attribute13;
2425: END IF;
2426: IF (x_irkv_rec.attribute14 = OKC_API.G_MISS_CHAR)

Line 2426: IF (x_irkv_rec.attribute14 = OKC_API.G_MISS_CHAR)

2422: IF (x_irkv_rec.attribute13 = OKC_API.G_MISS_CHAR)
2423: THEN
2424: x_irkv_rec.attribute13 := l_db_irkv_rec.attribute13;
2425: END IF;
2426: IF (x_irkv_rec.attribute14 = OKC_API.G_MISS_CHAR)
2427: THEN
2428: x_irkv_rec.attribute14 := l_db_irkv_rec.attribute14;
2429: END IF;
2430: IF (x_irkv_rec.attribute15 = OKC_API.G_MISS_CHAR)

Line 2430: IF (x_irkv_rec.attribute15 = OKC_API.G_MISS_CHAR)

2426: IF (x_irkv_rec.attribute14 = OKC_API.G_MISS_CHAR)
2427: THEN
2428: x_irkv_rec.attribute14 := l_db_irkv_rec.attribute14;
2429: END IF;
2430: IF (x_irkv_rec.attribute15 = OKC_API.G_MISS_CHAR)
2431: THEN
2432: x_irkv_rec.attribute15 := l_db_irkv_rec.attribute15;
2433: END IF;
2434: IF (x_irkv_rec.created_by = OKC_API.G_MISS_NUM)

Line 2434: IF (x_irkv_rec.created_by = OKC_API.G_MISS_NUM)

2430: IF (x_irkv_rec.attribute15 = OKC_API.G_MISS_CHAR)
2431: THEN
2432: x_irkv_rec.attribute15 := l_db_irkv_rec.attribute15;
2433: END IF;
2434: IF (x_irkv_rec.created_by = OKC_API.G_MISS_NUM)
2435: THEN
2436: x_irkv_rec.created_by := l_db_irkv_rec.created_by;
2437: END IF;
2438: IF (x_irkv_rec.creation_date = OKC_API.G_MISS_DATE)

Line 2438: IF (x_irkv_rec.creation_date = OKC_API.G_MISS_DATE)

2434: IF (x_irkv_rec.created_by = OKC_API.G_MISS_NUM)
2435: THEN
2436: x_irkv_rec.created_by := l_db_irkv_rec.created_by;
2437: END IF;
2438: IF (x_irkv_rec.creation_date = OKC_API.G_MISS_DATE)
2439: THEN
2440: x_irkv_rec.creation_date := l_db_irkv_rec.creation_date;
2441: END IF;
2442: IF (x_irkv_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 2442: IF (x_irkv_rec.last_updated_by = OKC_API.G_MISS_NUM)

2438: IF (x_irkv_rec.creation_date = OKC_API.G_MISS_DATE)
2439: THEN
2440: x_irkv_rec.creation_date := l_db_irkv_rec.creation_date;
2441: END IF;
2442: IF (x_irkv_rec.last_updated_by = OKC_API.G_MISS_NUM)
2443: THEN
2444: x_irkv_rec.last_updated_by := l_db_irkv_rec.last_updated_by;
2445: END IF;
2446: IF (x_irkv_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 2446: IF (x_irkv_rec.last_update_date = OKC_API.G_MISS_DATE)

2442: IF (x_irkv_rec.last_updated_by = OKC_API.G_MISS_NUM)
2443: THEN
2444: x_irkv_rec.last_updated_by := l_db_irkv_rec.last_updated_by;
2445: END IF;
2446: IF (x_irkv_rec.last_update_date = OKC_API.G_MISS_DATE)
2447: THEN
2448: x_irkv_rec.last_update_date := l_db_irkv_rec.last_update_date;
2449: END IF;
2450: IF (x_irkv_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 2450: IF (x_irkv_rec.last_update_login = OKC_API.G_MISS_NUM)

2446: IF (x_irkv_rec.last_update_date = OKC_API.G_MISS_DATE)
2447: THEN
2448: x_irkv_rec.last_update_date := l_db_irkv_rec.last_update_date;
2449: END IF;
2450: IF (x_irkv_rec.last_update_login = OKC_API.G_MISS_NUM)
2451: THEN
2452: x_irkv_rec.last_update_login := l_db_irkv_rec.last_update_login;
2453: END IF;
2454: END IF;

Line 2464: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2460: FUNCTION Set_Attributes (
2461: p_irkv_rec IN irkv_rec_type,
2462: x_irkv_rec OUT NOCOPY irkv_rec_type
2463: ) RETURN VARCHAR2 IS
2464: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2465: BEGIN
2466: x_irkv_rec := p_irkv_rec;
2467: RETURN(l_return_status);
2468: END Set_Attributes;

Line 2470: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

2466: x_irkv_rec := p_irkv_rec;
2467: RETURN(l_return_status);
2468: END Set_Attributes;
2469: BEGIN
2470: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2471: G_PKG_NAME,
2472: p_init_msg_list,
2473: l_api_version,
2474: p_api_version,

Line 2477: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2473: l_api_version,
2474: p_api_version,
2475: '_PVT',
2476: x_return_status);
2477: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2478: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2479: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2480: RAISE OKC_API.G_EXCEPTION_ERROR;
2481: END IF;

Line 2478: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2474: p_api_version,
2475: '_PVT',
2476: x_return_status);
2477: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2478: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2479: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2480: RAISE OKC_API.G_EXCEPTION_ERROR;
2481: END IF;
2482: --- Setting item attributes

Line 2479: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2475: '_PVT',
2476: x_return_status);
2477: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2478: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2479: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2480: RAISE OKC_API.G_EXCEPTION_ERROR;
2481: END IF;
2482: --- Setting item attributes
2483: l_return_status := Set_Attributes(

Line 2480: RAISE OKC_API.G_EXCEPTION_ERROR;

2476: x_return_status);
2477: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2478: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2479: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2480: RAISE OKC_API.G_EXCEPTION_ERROR;
2481: END IF;
2482: --- Setting item attributes
2483: l_return_status := Set_Attributes(
2484: p_irkv_rec, -- IN

Line 2487: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2483: l_return_status := Set_Attributes(
2484: p_irkv_rec, -- IN
2485: x_irkv_rec); -- OUT
2486: --- If any errors happen abort API
2487: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2488: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2489: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2490: RAISE OKC_API.G_EXCEPTION_ERROR;
2491: END IF;

Line 2488: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2484: p_irkv_rec, -- IN
2485: x_irkv_rec); -- OUT
2486: --- If any errors happen abort API
2487: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2488: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2489: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2490: RAISE OKC_API.G_EXCEPTION_ERROR;
2491: END IF;
2492: l_return_status := populate_new_record(l_irkv_rec, l_def_irkv_rec);

Line 2489: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2485: x_irkv_rec); -- OUT
2486: --- If any errors happen abort API
2487: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2488: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2489: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2490: RAISE OKC_API.G_EXCEPTION_ERROR;
2491: END IF;
2492: l_return_status := populate_new_record(l_irkv_rec, l_def_irkv_rec);
2493: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2490: RAISE OKC_API.G_EXCEPTION_ERROR;

2486: --- If any errors happen abort API
2487: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2488: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2489: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2490: RAISE OKC_API.G_EXCEPTION_ERROR;
2491: END IF;
2492: l_return_status := populate_new_record(l_irkv_rec, l_def_irkv_rec);
2493: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2494: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2493: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2489: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2490: RAISE OKC_API.G_EXCEPTION_ERROR;
2491: END IF;
2492: l_return_status := populate_new_record(l_irkv_rec, l_def_irkv_rec);
2493: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2494: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2495: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2496: RAISE OKC_API.G_EXCEPTION_ERROR;
2497: END IF;

Line 2494: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2490: RAISE OKC_API.G_EXCEPTION_ERROR;
2491: END IF;
2492: l_return_status := populate_new_record(l_irkv_rec, l_def_irkv_rec);
2493: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2494: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2495: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2496: RAISE OKC_API.G_EXCEPTION_ERROR;
2497: END IF;
2498: l_def_irkv_rec := fill_who_columns(l_def_irkv_rec);

Line 2495: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2491: END IF;
2492: l_return_status := populate_new_record(l_irkv_rec, l_def_irkv_rec);
2493: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2494: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2495: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2496: RAISE OKC_API.G_EXCEPTION_ERROR;
2497: END IF;
2498: l_def_irkv_rec := fill_who_columns(l_def_irkv_rec);
2499: --- Validate all non-missing attributes (Item Level Validation)

Line 2496: RAISE OKC_API.G_EXCEPTION_ERROR;

2492: l_return_status := populate_new_record(l_irkv_rec, l_def_irkv_rec);
2493: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2494: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2495: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2496: RAISE OKC_API.G_EXCEPTION_ERROR;
2497: END IF;
2498: l_def_irkv_rec := fill_who_columns(l_def_irkv_rec);
2499: --- Validate all non-missing attributes (Item Level Validation)
2500: -- To enable object_version_number increment

Line 2506: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2502: l_def_irkv_rec2.object_version_number := l_def_irkv_rec.object_version_number + 1;
2503:
2504: l_return_status := Validate_Attributes(l_def_irkv_rec2);
2505: --- If any errors happen abort API
2506: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2507: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2508: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2509: RAISE OKC_API.G_EXCEPTION_ERROR;
2510: END IF;

Line 2507: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2503:
2504: l_return_status := Validate_Attributes(l_def_irkv_rec2);
2505: --- If any errors happen abort API
2506: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2507: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2508: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2509: RAISE OKC_API.G_EXCEPTION_ERROR;
2510: END IF;
2511: --l_return_status := Validate_Record(l_def_irkv_rec, l_db_irkv_rec);

Line 2508: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2504: l_return_status := Validate_Attributes(l_def_irkv_rec2);
2505: --- If any errors happen abort API
2506: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2507: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2508: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2509: RAISE OKC_API.G_EXCEPTION_ERROR;
2510: END IF;
2511: --l_return_status := Validate_Record(l_def_irkv_rec, l_db_irkv_rec);
2512: l_return_status := Validate_Record(l_irkv_rec);

Line 2509: RAISE OKC_API.G_EXCEPTION_ERROR;

2505: --- If any errors happen abort API
2506: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2507: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2508: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2509: RAISE OKC_API.G_EXCEPTION_ERROR;
2510: END IF;
2511: --l_return_status := Validate_Record(l_def_irkv_rec, l_db_irkv_rec);
2512: l_return_status := Validate_Record(l_irkv_rec);
2513: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2513: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2509: RAISE OKC_API.G_EXCEPTION_ERROR;
2510: END IF;
2511: --l_return_status := Validate_Record(l_def_irkv_rec, l_db_irkv_rec);
2512: l_return_status := Validate_Record(l_irkv_rec);
2513: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2514: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2515: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2516: RAISE OKC_API.G_EXCEPTION_ERROR;
2517: END IF;

Line 2514: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2510: END IF;
2511: --l_return_status := Validate_Record(l_def_irkv_rec, l_db_irkv_rec);
2512: l_return_status := Validate_Record(l_irkv_rec);
2513: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2514: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2515: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2516: RAISE OKC_API.G_EXCEPTION_ERROR;
2517: END IF;
2518:

Line 2515: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2511: --l_return_status := Validate_Record(l_def_irkv_rec, l_db_irkv_rec);
2512: l_return_status := Validate_Record(l_irkv_rec);
2513: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2514: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2515: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2516: RAISE OKC_API.G_EXCEPTION_ERROR;
2517: END IF;
2518:
2519: -- Lock the Record

Line 2516: RAISE OKC_API.G_EXCEPTION_ERROR;

2512: l_return_status := Validate_Record(l_irkv_rec);
2513: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2514: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2515: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2516: RAISE OKC_API.G_EXCEPTION_ERROR;
2517: END IF;
2518:
2519: -- Lock the Record
2520: lock_row(

Line 2527: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2523: x_return_status => l_return_status,
2524: x_msg_count => x_msg_count,
2525: x_msg_data => x_msg_data,
2526: p_irkv_rec => p_irkv_rec);
2527: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2528: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2529: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2530: RAISE OKC_API.G_EXCEPTION_ERROR;
2531: END IF;

Line 2528: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2524: x_msg_count => x_msg_count,
2525: x_msg_data => x_msg_data,
2526: p_irkv_rec => p_irkv_rec);
2527: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2528: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2529: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2530: RAISE OKC_API.G_EXCEPTION_ERROR;
2531: END IF;
2532:

Line 2529: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2525: x_msg_data => x_msg_data,
2526: p_irkv_rec => p_irkv_rec);
2527: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2528: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2529: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2530: RAISE OKC_API.G_EXCEPTION_ERROR;
2531: END IF;
2532:
2533: -----------------------------------------

Line 2530: RAISE OKC_API.G_EXCEPTION_ERROR;

2526: p_irkv_rec => p_irkv_rec);
2527: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2528: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2529: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2530: RAISE OKC_API.G_EXCEPTION_ERROR;
2531: END IF;
2532:
2533: -----------------------------------------
2534: -- Move VIEW record to "Child" records --

Line 2548: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2544: x_msg_data,
2545: l_irk_rec,
2546: lx_irk_rec
2547: );
2548: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2549: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2550: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2551: RAISE OKC_API.G_EXCEPTION_ERROR;
2552: END IF;

Line 2549: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2545: l_irk_rec,
2546: lx_irk_rec
2547: );
2548: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2549: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2550: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2551: RAISE OKC_API.G_EXCEPTION_ERROR;
2552: END IF;
2553: migrate(lx_irk_rec, l_def_irkv_rec);

Line 2550: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2546: lx_irk_rec
2547: );
2548: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2549: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2550: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2551: RAISE OKC_API.G_EXCEPTION_ERROR;
2552: END IF;
2553: migrate(lx_irk_rec, l_def_irkv_rec);
2554: x_irkv_rec := l_def_irkv_rec;

Line 2551: RAISE OKC_API.G_EXCEPTION_ERROR;

2547: );
2548: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2549: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2550: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2551: RAISE OKC_API.G_EXCEPTION_ERROR;
2552: END IF;
2553: migrate(lx_irk_rec, l_def_irkv_rec);
2554: x_irkv_rec := l_def_irkv_rec;
2555: x_return_status := l_return_status;

Line 2556: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

2552: END IF;
2553: migrate(lx_irk_rec, l_def_irkv_rec);
2554: x_irkv_rec := l_def_irkv_rec;
2555: x_return_status := l_return_status;
2556: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2557: EXCEPTION
2558: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2559: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2560: (

Line 2558: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2554: x_irkv_rec := l_def_irkv_rec;
2555: x_return_status := l_return_status;
2556: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2557: EXCEPTION
2558: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2559: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2560: (
2561: l_api_name,
2562: G_PKG_NAME,

Line 2559: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2555: x_return_status := l_return_status;
2556: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2557: EXCEPTION
2558: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2559: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2560: (
2561: l_api_name,
2562: G_PKG_NAME,
2563: 'OKC_API.G_RET_STS_ERROR',

Line 2563: 'OKC_API.G_RET_STS_ERROR',

2559: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2560: (
2561: l_api_name,
2562: G_PKG_NAME,
2563: 'OKC_API.G_RET_STS_ERROR',
2564: x_msg_count,
2565: x_msg_data,
2566: '_PVT'
2567: );

Line 2568: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2564: x_msg_count,
2565: x_msg_data,
2566: '_PVT'
2567: );
2568: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2569: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2570: (
2571: l_api_name,
2572: G_PKG_NAME,

Line 2569: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2565: x_msg_data,
2566: '_PVT'
2567: );
2568: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2569: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2570: (
2571: l_api_name,
2572: G_PKG_NAME,
2573: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2573: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2569: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2570: (
2571: l_api_name,
2572: G_PKG_NAME,
2573: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2574: x_msg_count,
2575: x_msg_data,
2576: '_PVT'
2577: );

Line 2579: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2575: x_msg_data,
2576: '_PVT'
2577: );
2578: WHEN OTHERS THEN
2579: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2580: (
2581: l_api_name,
2582: G_PKG_NAME,
2583: 'OTHERS',

Line 2594: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2590: -- PL/SQL TBL update_row for:irkv_tbl --
2591: ----------------------------------------
2592: PROCEDURE update_row(
2593: p_api_version IN NUMBER,
2594: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2595: x_return_status OUT NOCOPY VARCHAR2,
2596: x_msg_count OUT NOCOPY NUMBER,
2597: x_msg_data OUT NOCOPY VARCHAR2,
2598: p_irkv_tbl IN irkv_tbl_type,

Line 2606: OKC_API.init_msg_list(p_init_msg_list);

2602: l_api_version CONSTANT NUMBER := 1;
2603: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_update_row';
2604: i NUMBER := 0;
2605: BEGIN
2606: OKC_API.init_msg_list(p_init_msg_list);
2607: -- Make sure PL/SQL table has records in it before passing
2608: IF (p_irkv_tbl.COUNT > 0) THEN
2609: i := p_irkv_tbl.FIRST;
2610: LOOP

Line 2619: p_init_msg_list => OKC_API.G_FALSE,

2615: l_error_rec.api_package := G_PKG_NAME;
2616: l_error_rec.idx := i;
2617: update_row (
2618: p_api_version => p_api_version,
2619: p_init_msg_list => OKC_API.G_FALSE,
2620: x_return_status => l_error_rec.error_type,
2621: x_msg_count => l_error_rec.msg_count,
2622: x_msg_data => l_error_rec.msg_data,
2623: p_irkv_rec => p_irkv_tbl(i),

Line 2625: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN

2621: x_msg_count => l_error_rec.msg_count,
2622: x_msg_data => l_error_rec.msg_data,
2623: p_irkv_rec => p_irkv_tbl(i),
2624: x_irkv_rec => x_irkv_tbl(i));
2625: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN
2626: l_error_rec.sqlcode := SQLCODE;
2627: load_error_tbl(l_error_rec, px_error_tbl);
2628: ELSE
2629: x_msg_count := l_error_rec.msg_count;

Line 2633: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2629: x_msg_count := l_error_rec.msg_count;
2630: x_msg_data := l_error_rec.msg_data;
2631: END IF;
2632: EXCEPTION
2633: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2634: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
2635: l_error_rec.sqlcode := SQLCODE;
2636: load_error_tbl(l_error_rec, px_error_tbl);
2637: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 2634: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;

2630: x_msg_data := l_error_rec.msg_data;
2631: END IF;
2632: EXCEPTION
2633: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2634: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
2635: l_error_rec.sqlcode := SQLCODE;
2636: load_error_tbl(l_error_rec, px_error_tbl);
2637: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2638: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 2637: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2633: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2634: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
2635: l_error_rec.sqlcode := SQLCODE;
2636: load_error_tbl(l_error_rec, px_error_tbl);
2637: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2638: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
2639: l_error_rec.sqlcode := SQLCODE;
2640: load_error_tbl(l_error_rec, px_error_tbl);
2641: WHEN OTHERS THEN

Line 2638: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

2634: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
2635: l_error_rec.sqlcode := SQLCODE;
2636: load_error_tbl(l_error_rec, px_error_tbl);
2637: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2638: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
2639: l_error_rec.sqlcode := SQLCODE;
2640: load_error_tbl(l_error_rec, px_error_tbl);
2641: WHEN OTHERS THEN
2642: l_error_rec.error_type := 'OTHERS';

Line 2653: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

2649: END IF;
2650: -- Loop through the error_tbl to find the error with the highest severity
2651: -- and return it.
2652: x_return_status := find_highest_exception(px_error_tbl);
2653: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2654: EXCEPTION
2655: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2656: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2657: (

Line 2655: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2651: -- and return it.
2652: x_return_status := find_highest_exception(px_error_tbl);
2653: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2654: EXCEPTION
2655: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2656: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2657: (
2658: l_api_name,
2659: G_PKG_NAME,

Line 2656: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2652: x_return_status := find_highest_exception(px_error_tbl);
2653: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2654: EXCEPTION
2655: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2656: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2657: (
2658: l_api_name,
2659: G_PKG_NAME,
2660: 'OKC_API.G_RET_STS_ERROR',

Line 2660: 'OKC_API.G_RET_STS_ERROR',

2656: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2657: (
2658: l_api_name,
2659: G_PKG_NAME,
2660: 'OKC_API.G_RET_STS_ERROR',
2661: x_msg_count,
2662: x_msg_data,
2663: '_PVT'
2664: );

Line 2665: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2661: x_msg_count,
2662: x_msg_data,
2663: '_PVT'
2664: );
2665: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2666: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2667: (
2668: l_api_name,
2669: G_PKG_NAME,

Line 2666: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2662: x_msg_data,
2663: '_PVT'
2664: );
2665: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2666: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2667: (
2668: l_api_name,
2669: G_PKG_NAME,
2670: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2670: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2666: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2667: (
2668: l_api_name,
2669: G_PKG_NAME,
2670: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2671: x_msg_count,
2672: x_msg_data,
2673: '_PVT'
2674: );

Line 2676: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2672: x_msg_data,
2673: '_PVT'
2674: );
2675: WHEN OTHERS THEN
2676: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2677: (
2678: l_api_name,
2679: G_PKG_NAME,
2680: 'OTHERS',

Line 2692: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2688: -- PL/SQL TBL update_row for:IRKV_TBL --
2689: ----------------------------------------
2690: PROCEDURE update_row(
2691: p_api_version IN NUMBER,
2692: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2693: x_return_status OUT NOCOPY VARCHAR2,
2694: x_msg_count OUT NOCOPY NUMBER,
2695: x_msg_data OUT NOCOPY VARCHAR2,
2696: p_irkv_tbl IN irkv_tbl_type,

Line 2701: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2697: x_irkv_tbl OUT NOCOPY irkv_tbl_type) IS
2698:
2699: l_api_version CONSTANT NUMBER := 1;
2700: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
2701: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2702: l_error_tbl OKL_API.ERROR_TBL_TYPE;
2703: BEGIN
2704: OKC_API.init_msg_list(p_init_msg_list);
2705: -- Make sure PL/SQL table has records in it before passing

Line 2704: OKC_API.init_msg_list(p_init_msg_list);

2700: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
2701: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2702: l_error_tbl OKL_API.ERROR_TBL_TYPE;
2703: BEGIN
2704: OKC_API.init_msg_list(p_init_msg_list);
2705: -- Make sure PL/SQL table has records in it before passing
2706: IF (p_irkv_tbl.COUNT > 0) THEN
2707: update_row (
2708: p_api_version => p_api_version,

Line 2709: p_init_msg_list => OKC_API.G_FALSE,

2705: -- Make sure PL/SQL table has records in it before passing
2706: IF (p_irkv_tbl.COUNT > 0) THEN
2707: update_row (
2708: p_api_version => p_api_version,
2709: p_init_msg_list => OKC_API.G_FALSE,
2710: x_return_status => x_return_status,
2711: x_msg_count => x_msg_count,
2712: x_msg_data => x_msg_data,
2713: p_irkv_tbl => p_irkv_tbl,

Line 2717: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

2713: p_irkv_tbl => p_irkv_tbl,
2714: x_irkv_tbl => x_irkv_tbl,
2715: px_error_tbl => l_error_tbl);
2716: END IF;
2717: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2718: EXCEPTION
2719: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2720: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2721: (

Line 2719: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2715: px_error_tbl => l_error_tbl);
2716: END IF;
2717: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2718: EXCEPTION
2719: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2720: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2721: (
2722: l_api_name,
2723: G_PKG_NAME,

Line 2720: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2716: END IF;
2717: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2718: EXCEPTION
2719: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2720: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2721: (
2722: l_api_name,
2723: G_PKG_NAME,
2724: 'OKC_API.G_RET_STS_ERROR',

Line 2724: 'OKC_API.G_RET_STS_ERROR',

2720: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2721: (
2722: l_api_name,
2723: G_PKG_NAME,
2724: 'OKC_API.G_RET_STS_ERROR',
2725: x_msg_count,
2726: x_msg_data,
2727: '_PVT'
2728: );

Line 2729: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2725: x_msg_count,
2726: x_msg_data,
2727: '_PVT'
2728: );
2729: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2730: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2731: (
2732: l_api_name,
2733: G_PKG_NAME,

Line 2730: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2726: x_msg_data,
2727: '_PVT'
2728: );
2729: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2730: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2731: (
2732: l_api_name,
2733: G_PKG_NAME,
2734: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2734: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2730: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2731: (
2732: l_api_name,
2733: G_PKG_NAME,
2734: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2735: x_msg_count,
2736: x_msg_data,
2737: '_PVT'
2738: );

Line 2740: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2736: x_msg_data,
2737: '_PVT'
2738: );
2739: WHEN OTHERS THEN
2740: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2741: (
2742: l_api_name,
2743: G_PKG_NAME,
2744: 'OTHERS',

Line 2758: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2754: -----------------------------------------
2755: -- delete_row for:OKL_INSURER_RANKINGS --
2756: -----------------------------------------
2757: PROCEDURE delete_row(
2758: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2759: x_return_status OUT NOCOPY VARCHAR2,
2760: x_msg_count OUT NOCOPY NUMBER,
2761: x_msg_data OUT NOCOPY VARCHAR2,
2762: p_irk_rec IN irk_rec_type) IS

Line 2766: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2762: p_irk_rec IN irk_rec_type) IS
2763:
2764: l_api_version CONSTANT NUMBER := 1;
2765: l_api_name CONSTANT VARCHAR2(30) := 'B_delete_row';
2766: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2767: l_irk_rec irk_rec_type := p_irk_rec;
2768: l_row_notfound BOOLEAN := TRUE;
2769: BEGIN
2770: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

Line 2770: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

2766: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2767: l_irk_rec irk_rec_type := p_irk_rec;
2768: l_row_notfound BOOLEAN := TRUE;
2769: BEGIN
2770: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2771: p_init_msg_list,
2772: '_PVT',
2773: x_return_status);
2774: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2774: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2770: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2771: p_init_msg_list,
2772: '_PVT',
2773: x_return_status);
2774: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2775: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2776: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2777: RAISE OKC_API.G_EXCEPTION_ERROR;
2778: END IF;

Line 2775: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2771: p_init_msg_list,
2772: '_PVT',
2773: x_return_status);
2774: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2775: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2776: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2777: RAISE OKC_API.G_EXCEPTION_ERROR;
2778: END IF;
2779:

Line 2776: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2772: '_PVT',
2773: x_return_status);
2774: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2775: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2776: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2777: RAISE OKC_API.G_EXCEPTION_ERROR;
2778: END IF;
2779:
2780: DELETE FROM OKL_INSURER_RANKINGS

Line 2777: RAISE OKC_API.G_EXCEPTION_ERROR;

2773: x_return_status);
2774: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2775: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2776: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2777: RAISE OKC_API.G_EXCEPTION_ERROR;
2778: END IF;
2779:
2780: DELETE FROM OKL_INSURER_RANKINGS
2781: WHERE ID = p_irk_rec.id;

Line 2784: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

2780: DELETE FROM OKL_INSURER_RANKINGS
2781: WHERE ID = p_irk_rec.id;
2782:
2783: x_return_status := l_return_status;
2784: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2785: EXCEPTION
2786: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2787: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2788: (

Line 2786: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2782:
2783: x_return_status := l_return_status;
2784: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2785: EXCEPTION
2786: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2787: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2788: (
2789: l_api_name,
2790: G_PKG_NAME,

Line 2787: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2783: x_return_status := l_return_status;
2784: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2785: EXCEPTION
2786: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2787: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2788: (
2789: l_api_name,
2790: G_PKG_NAME,
2791: 'OKC_API.G_RET_STS_ERROR',

Line 2791: 'OKC_API.G_RET_STS_ERROR',

2787: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2788: (
2789: l_api_name,
2790: G_PKG_NAME,
2791: 'OKC_API.G_RET_STS_ERROR',
2792: x_msg_count,
2793: x_msg_data,
2794: '_PVT'
2795: );

Line 2796: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2792: x_msg_count,
2793: x_msg_data,
2794: '_PVT'
2795: );
2796: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2797: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2798: (
2799: l_api_name,
2800: G_PKG_NAME,

Line 2797: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2793: x_msg_data,
2794: '_PVT'
2795: );
2796: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2797: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2798: (
2799: l_api_name,
2800: G_PKG_NAME,
2801: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2801: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2797: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2798: (
2799: l_api_name,
2800: G_PKG_NAME,
2801: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2802: x_msg_count,
2803: x_msg_data,
2804: '_PVT'
2805: );

Line 2807: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2803: x_msg_data,
2804: '_PVT'
2805: );
2806: WHEN OTHERS THEN
2807: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2808: (
2809: l_api_name,
2810: G_PKG_NAME,
2811: 'OTHERS',

Line 2822: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2818: -- delete_row for:OKL_INSURER_RANKINGS_V --
2819: -------------------------------------------
2820: PROCEDURE delete_row(
2821: p_api_version IN NUMBER,
2822: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2823: x_return_status OUT NOCOPY VARCHAR2,
2824: x_msg_count OUT NOCOPY NUMBER,
2825: x_msg_data OUT NOCOPY VARCHAR2,
2826: p_irkv_rec IN irkv_rec_type) IS

Line 2830: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2826: p_irkv_rec IN irkv_rec_type) IS
2827:
2828: l_api_version CONSTANT NUMBER := 1;
2829: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
2830: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2831: l_irkv_rec irkv_rec_type := p_irkv_rec;
2832: l_irk_rec irk_rec_type;
2833: BEGIN
2834: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

Line 2834: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

2830: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2831: l_irkv_rec irkv_rec_type := p_irkv_rec;
2832: l_irk_rec irk_rec_type;
2833: BEGIN
2834: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2835: G_PKG_NAME,
2836: p_init_msg_list,
2837: l_api_version,
2838: p_api_version,

Line 2841: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2837: l_api_version,
2838: p_api_version,
2839: '_PVT',
2840: x_return_status);
2841: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2842: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2843: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2844: RAISE OKC_API.G_EXCEPTION_ERROR;
2845: END IF;

Line 2842: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2838: p_api_version,
2839: '_PVT',
2840: x_return_status);
2841: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2842: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2843: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2844: RAISE OKC_API.G_EXCEPTION_ERROR;
2845: END IF;
2846: -----------------------------------------

Line 2843: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2839: '_PVT',
2840: x_return_status);
2841: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2842: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2843: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2844: RAISE OKC_API.G_EXCEPTION_ERROR;
2845: END IF;
2846: -----------------------------------------
2847: -- Move VIEW record to "Child" records --

Line 2844: RAISE OKC_API.G_EXCEPTION_ERROR;

2840: x_return_status);
2841: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2842: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2843: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2844: RAISE OKC_API.G_EXCEPTION_ERROR;
2845: END IF;
2846: -----------------------------------------
2847: -- Move VIEW record to "Child" records --
2848: -----------------------------------------

Line 2860: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2856: x_msg_count,
2857: x_msg_data,
2858: l_irk_rec
2859: );
2860: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2861: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2862: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2863: RAISE OKC_API.G_EXCEPTION_ERROR;
2864: END IF;

Line 2861: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2857: x_msg_data,
2858: l_irk_rec
2859: );
2860: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2861: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2862: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2863: RAISE OKC_API.G_EXCEPTION_ERROR;
2864: END IF;
2865: x_return_status := l_return_status;

Line 2862: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2858: l_irk_rec
2859: );
2860: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2861: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2862: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2863: RAISE OKC_API.G_EXCEPTION_ERROR;
2864: END IF;
2865: x_return_status := l_return_status;
2866: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 2863: RAISE OKC_API.G_EXCEPTION_ERROR;

2859: );
2860: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2861: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2862: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2863: RAISE OKC_API.G_EXCEPTION_ERROR;
2864: END IF;
2865: x_return_status := l_return_status;
2866: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2867: EXCEPTION

Line 2866: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

2862: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2863: RAISE OKC_API.G_EXCEPTION_ERROR;
2864: END IF;
2865: x_return_status := l_return_status;
2866: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2867: EXCEPTION
2868: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2869: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2870: (

Line 2868: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2864: END IF;
2865: x_return_status := l_return_status;
2866: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2867: EXCEPTION
2868: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2869: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2870: (
2871: l_api_name,
2872: G_PKG_NAME,

Line 2869: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2865: x_return_status := l_return_status;
2866: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2867: EXCEPTION
2868: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2869: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2870: (
2871: l_api_name,
2872: G_PKG_NAME,
2873: 'OKC_API.G_RET_STS_ERROR',

Line 2873: 'OKC_API.G_RET_STS_ERROR',

2869: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2870: (
2871: l_api_name,
2872: G_PKG_NAME,
2873: 'OKC_API.G_RET_STS_ERROR',
2874: x_msg_count,
2875: x_msg_data,
2876: '_PVT'
2877: );

Line 2878: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2874: x_msg_count,
2875: x_msg_data,
2876: '_PVT'
2877: );
2878: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2879: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2880: (
2881: l_api_name,
2882: G_PKG_NAME,

Line 2879: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2875: x_msg_data,
2876: '_PVT'
2877: );
2878: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2879: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2880: (
2881: l_api_name,
2882: G_PKG_NAME,
2883: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2883: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2879: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2880: (
2881: l_api_name,
2882: G_PKG_NAME,
2883: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2884: x_msg_count,
2885: x_msg_data,
2886: '_PVT'
2887: );

Line 2889: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2885: x_msg_data,
2886: '_PVT'
2887: );
2888: WHEN OTHERS THEN
2889: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2890: (
2891: l_api_name,
2892: G_PKG_NAME,
2893: 'OTHERS',

Line 2904: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2900: -- PL/SQL TBL delete_row for:OKL_INSURER_RANKINGS_V --
2901: ------------------------------------------------------
2902: PROCEDURE delete_row(
2903: p_api_version IN NUMBER,
2904: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2905: x_return_status OUT NOCOPY VARCHAR2,
2906: x_msg_count OUT NOCOPY NUMBER,
2907: x_msg_data OUT NOCOPY VARCHAR2,
2908: p_irkv_tbl IN irkv_tbl_type,

Line 2915: OKC_API.init_msg_list(p_init_msg_list);

2911: l_api_version CONSTANT NUMBER := 1;
2912: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_delete_row';
2913: i NUMBER := 0;
2914: BEGIN
2915: OKC_API.init_msg_list(p_init_msg_list);
2916: -- Make sure PL/SQL table has records in it before passing
2917: IF (p_irkv_tbl.COUNT > 0) THEN
2918: i := p_irkv_tbl.FIRST;
2919: LOOP

Line 2928: p_init_msg_list => OKC_API.G_FALSE,

2924: l_error_rec.api_package := G_PKG_NAME;
2925: l_error_rec.idx := i;
2926: delete_row (
2927: p_api_version => p_api_version,
2928: p_init_msg_list => OKC_API.G_FALSE,
2929: x_return_status => l_error_rec.error_type,
2930: x_msg_count => l_error_rec.msg_count,
2931: x_msg_data => l_error_rec.msg_data,
2932: p_irkv_rec => p_irkv_tbl(i));

Line 2933: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN

2929: x_return_status => l_error_rec.error_type,
2930: x_msg_count => l_error_rec.msg_count,
2931: x_msg_data => l_error_rec.msg_data,
2932: p_irkv_rec => p_irkv_tbl(i));
2933: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN
2934: l_error_rec.sqlcode := SQLCODE;
2935: load_error_tbl(l_error_rec, px_error_tbl);
2936: ELSE
2937: x_msg_count := l_error_rec.msg_count;

Line 2941: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2937: x_msg_count := l_error_rec.msg_count;
2938: x_msg_data := l_error_rec.msg_data;
2939: END IF;
2940: EXCEPTION
2941: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2942: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
2943: l_error_rec.sqlcode := SQLCODE;
2944: load_error_tbl(l_error_rec, px_error_tbl);
2945: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 2942: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;

2938: x_msg_data := l_error_rec.msg_data;
2939: END IF;
2940: EXCEPTION
2941: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2942: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
2943: l_error_rec.sqlcode := SQLCODE;
2944: load_error_tbl(l_error_rec, px_error_tbl);
2945: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2946: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 2945: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2941: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2942: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
2943: l_error_rec.sqlcode := SQLCODE;
2944: load_error_tbl(l_error_rec, px_error_tbl);
2945: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2946: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
2947: l_error_rec.sqlcode := SQLCODE;
2948: load_error_tbl(l_error_rec, px_error_tbl);
2949: WHEN OTHERS THEN

Line 2946: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

2942: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
2943: l_error_rec.sqlcode := SQLCODE;
2944: load_error_tbl(l_error_rec, px_error_tbl);
2945: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2946: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
2947: l_error_rec.sqlcode := SQLCODE;
2948: load_error_tbl(l_error_rec, px_error_tbl);
2949: WHEN OTHERS THEN
2950: l_error_rec.error_type := 'OTHERS';

Line 2961: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

2957: END IF;
2958: -- Loop through the error_tbl to find the error with the highest severity
2959: -- and return it.
2960: x_return_status := find_highest_exception(px_error_tbl);
2961: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2962: EXCEPTION
2963: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2964: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2965: (

Line 2963: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2959: -- and return it.
2960: x_return_status := find_highest_exception(px_error_tbl);
2961: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2962: EXCEPTION
2963: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2964: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2965: (
2966: l_api_name,
2967: G_PKG_NAME,

Line 2964: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2960: x_return_status := find_highest_exception(px_error_tbl);
2961: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2962: EXCEPTION
2963: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2964: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2965: (
2966: l_api_name,
2967: G_PKG_NAME,
2968: 'OKC_API.G_RET_STS_ERROR',

Line 2968: 'OKC_API.G_RET_STS_ERROR',

2964: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2965: (
2966: l_api_name,
2967: G_PKG_NAME,
2968: 'OKC_API.G_RET_STS_ERROR',
2969: x_msg_count,
2970: x_msg_data,
2971: '_PVT'
2972: );

Line 2973: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2969: x_msg_count,
2970: x_msg_data,
2971: '_PVT'
2972: );
2973: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2974: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2975: (
2976: l_api_name,
2977: G_PKG_NAME,

Line 2974: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2970: x_msg_data,
2971: '_PVT'
2972: );
2973: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2974: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2975: (
2976: l_api_name,
2977: G_PKG_NAME,
2978: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2978: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2974: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2975: (
2976: l_api_name,
2977: G_PKG_NAME,
2978: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2979: x_msg_count,
2980: x_msg_data,
2981: '_PVT'
2982: );

Line 2984: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2980: x_msg_data,
2981: '_PVT'
2982: );
2983: WHEN OTHERS THEN
2984: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2985: (
2986: l_api_name,
2987: G_PKG_NAME,
2988: 'OTHERS',

Line 3000: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2996: -- PL/SQL TBL delete_row for:OKL_INSURER_RANKINGS_V --
2997: ------------------------------------------------------
2998: PROCEDURE delete_row(
2999: p_api_version IN NUMBER,
3000: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3001: x_return_status OUT NOCOPY VARCHAR2,
3002: x_msg_count OUT NOCOPY NUMBER,
3003: x_msg_data OUT NOCOPY VARCHAR2,
3004: p_irkv_tbl IN irkv_tbl_type) IS

Line 3008: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

3004: p_irkv_tbl IN irkv_tbl_type) IS
3005:
3006: l_api_version CONSTANT NUMBER := 1;
3007: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
3008: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3009: l_error_tbl OKL_API.ERROR_TBL_TYPE;
3010: BEGIN
3011: OKC_API.init_msg_list(p_init_msg_list);
3012: -- Make sure PL/SQL table has records in it before passing

Line 3011: OKC_API.init_msg_list(p_init_msg_list);

3007: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
3008: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3009: l_error_tbl OKL_API.ERROR_TBL_TYPE;
3010: BEGIN
3011: OKC_API.init_msg_list(p_init_msg_list);
3012: -- Make sure PL/SQL table has records in it before passing
3013: IF (p_irkv_tbl.COUNT > 0) THEN
3014: delete_row (
3015: p_api_version => p_api_version,

Line 3016: p_init_msg_list => OKC_API.G_FALSE,

3012: -- Make sure PL/SQL table has records in it before passing
3013: IF (p_irkv_tbl.COUNT > 0) THEN
3014: delete_row (
3015: p_api_version => p_api_version,
3016: p_init_msg_list => OKC_API.G_FALSE,
3017: x_return_status => x_return_status,
3018: x_msg_count => x_msg_count,
3019: x_msg_data => x_msg_data,
3020: p_irkv_tbl => p_irkv_tbl,

Line 3023: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

3019: x_msg_data => x_msg_data,
3020: p_irkv_tbl => p_irkv_tbl,
3021: px_error_tbl => l_error_tbl);
3022: END IF;
3023: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3024: EXCEPTION
3025: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3026: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3027: (

Line 3025: WHEN OKC_API.G_EXCEPTION_ERROR THEN

3021: px_error_tbl => l_error_tbl);
3022: END IF;
3023: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3024: EXCEPTION
3025: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3026: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3027: (
3028: l_api_name,
3029: G_PKG_NAME,

Line 3026: x_return_status := OKC_API.HANDLE_EXCEPTIONS

3022: END IF;
3023: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3024: EXCEPTION
3025: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3026: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3027: (
3028: l_api_name,
3029: G_PKG_NAME,
3030: 'OKC_API.G_RET_STS_ERROR',

Line 3030: 'OKC_API.G_RET_STS_ERROR',

3026: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3027: (
3028: l_api_name,
3029: G_PKG_NAME,
3030: 'OKC_API.G_RET_STS_ERROR',
3031: x_msg_count,
3032: x_msg_data,
3033: '_PVT'
3034: );

Line 3035: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

3031: x_msg_count,
3032: x_msg_data,
3033: '_PVT'
3034: );
3035: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3036: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3037: (
3038: l_api_name,
3039: G_PKG_NAME,

Line 3036: x_return_status := OKC_API.HANDLE_EXCEPTIONS

3032: x_msg_data,
3033: '_PVT'
3034: );
3035: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3036: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3037: (
3038: l_api_name,
3039: G_PKG_NAME,
3040: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 3040: 'OKC_API.G_RET_STS_UNEXP_ERROR',

3036: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3037: (
3038: l_api_name,
3039: G_PKG_NAME,
3040: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3041: x_msg_count,
3042: x_msg_data,
3043: '_PVT'
3044: );

Line 3046: x_return_status := OKC_API.HANDLE_EXCEPTIONS

3042: x_msg_data,
3043: '_PVT'
3044: );
3045: WHEN OTHERS THEN
3046: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3047: (
3048: l_api_name,
3049: G_PKG_NAME,
3050: 'OTHERS',