DBA Data[Home] [Help]

APPS.OKC_RRD_PVT dependencies on OKC_API

Line 248: IF (l_rrdv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN

244: p_rrdv_rec IN rrdv_rec_type
245: ) RETURN rrdv_rec_type IS
246: l_rrdv_rec rrdv_rec_type := p_rrdv_rec;
247: BEGIN
248: IF (l_rrdv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
249: l_rrdv_rec.object_version_number := NULL;
250: END IF;
251: IF (l_rrdv_rec.srd_id = OKC_API.G_MISS_NUM) THEN
252: l_rrdv_rec.srd_id := NULL;

Line 251: IF (l_rrdv_rec.srd_id = OKC_API.G_MISS_NUM) THEN

247: BEGIN
248: IF (l_rrdv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
249: l_rrdv_rec.object_version_number := NULL;
250: END IF;
251: IF (l_rrdv_rec.srd_id = OKC_API.G_MISS_NUM) THEN
252: l_rrdv_rec.srd_id := NULL;
253: END IF;
254: IF (l_rrdv_rec.sre_id = OKC_API.G_MISS_NUM) THEN
255: l_rrdv_rec.sre_id := NULL;

Line 254: IF (l_rrdv_rec.sre_id = OKC_API.G_MISS_NUM) THEN

250: END IF;
251: IF (l_rrdv_rec.srd_id = OKC_API.G_MISS_NUM) THEN
252: l_rrdv_rec.srd_id := NULL;
253: END IF;
254: IF (l_rrdv_rec.sre_id = OKC_API.G_MISS_NUM) THEN
255: l_rrdv_rec.sre_id := NULL;
256: END IF;
257: IF (l_rrdv_rec.optional_yn = OKC_API.G_MISS_CHAR) THEN
258: l_rrdv_rec.optional_yn := NULL;

Line 257: IF (l_rrdv_rec.optional_yn = OKC_API.G_MISS_CHAR) THEN

253: END IF;
254: IF (l_rrdv_rec.sre_id = OKC_API.G_MISS_NUM) THEN
255: l_rrdv_rec.sre_id := NULL;
256: END IF;
257: IF (l_rrdv_rec.optional_yn = OKC_API.G_MISS_CHAR) THEN
258: l_rrdv_rec.optional_yn := NULL;
259: END IF;
260: IF (l_rrdv_rec.subject_object_flag = OKC_API.G_MISS_CHAR) THEN
261: l_rrdv_rec.subject_object_flag := NULL;

Line 260: IF (l_rrdv_rec.subject_object_flag = OKC_API.G_MISS_CHAR) THEN

256: END IF;
257: IF (l_rrdv_rec.optional_yn = OKC_API.G_MISS_CHAR) THEN
258: l_rrdv_rec.optional_yn := NULL;
259: END IF;
260: IF (l_rrdv_rec.subject_object_flag = OKC_API.G_MISS_CHAR) THEN
261: l_rrdv_rec.subject_object_flag := NULL;
262: END IF;
263: IF (l_rrdv_rec.attribute_category = OKC_API.G_MISS_CHAR) THEN
264: l_rrdv_rec.attribute_category := NULL;

Line 263: IF (l_rrdv_rec.attribute_category = OKC_API.G_MISS_CHAR) THEN

259: END IF;
260: IF (l_rrdv_rec.subject_object_flag = OKC_API.G_MISS_CHAR) THEN
261: l_rrdv_rec.subject_object_flag := NULL;
262: END IF;
263: IF (l_rrdv_rec.attribute_category = OKC_API.G_MISS_CHAR) THEN
264: l_rrdv_rec.attribute_category := NULL;
265: END IF;
266: IF (l_rrdv_rec.attribute1 = OKC_API.G_MISS_CHAR) THEN
267: l_rrdv_rec.attribute1 := NULL;

Line 266: IF (l_rrdv_rec.attribute1 = OKC_API.G_MISS_CHAR) THEN

262: END IF;
263: IF (l_rrdv_rec.attribute_category = OKC_API.G_MISS_CHAR) THEN
264: l_rrdv_rec.attribute_category := NULL;
265: END IF;
266: IF (l_rrdv_rec.attribute1 = OKC_API.G_MISS_CHAR) THEN
267: l_rrdv_rec.attribute1 := NULL;
268: END IF;
269: IF (l_rrdv_rec.attribute2 = OKC_API.G_MISS_CHAR) THEN
270: l_rrdv_rec.attribute2 := NULL;

Line 269: IF (l_rrdv_rec.attribute2 = OKC_API.G_MISS_CHAR) THEN

265: END IF;
266: IF (l_rrdv_rec.attribute1 = OKC_API.G_MISS_CHAR) THEN
267: l_rrdv_rec.attribute1 := NULL;
268: END IF;
269: IF (l_rrdv_rec.attribute2 = OKC_API.G_MISS_CHAR) THEN
270: l_rrdv_rec.attribute2 := NULL;
271: END IF;
272: IF (l_rrdv_rec.attribute3 = OKC_API.G_MISS_CHAR) THEN
273: l_rrdv_rec.attribute3 := NULL;

Line 272: IF (l_rrdv_rec.attribute3 = OKC_API.G_MISS_CHAR) THEN

268: END IF;
269: IF (l_rrdv_rec.attribute2 = OKC_API.G_MISS_CHAR) THEN
270: l_rrdv_rec.attribute2 := NULL;
271: END IF;
272: IF (l_rrdv_rec.attribute3 = OKC_API.G_MISS_CHAR) THEN
273: l_rrdv_rec.attribute3 := NULL;
274: END IF;
275: IF (l_rrdv_rec.attribute4 = OKC_API.G_MISS_CHAR) THEN
276: l_rrdv_rec.attribute4 := NULL;

Line 275: IF (l_rrdv_rec.attribute4 = OKC_API.G_MISS_CHAR) THEN

271: END IF;
272: IF (l_rrdv_rec.attribute3 = OKC_API.G_MISS_CHAR) THEN
273: l_rrdv_rec.attribute3 := NULL;
274: END IF;
275: IF (l_rrdv_rec.attribute4 = OKC_API.G_MISS_CHAR) THEN
276: l_rrdv_rec.attribute4 := NULL;
277: END IF;
278: IF (l_rrdv_rec.attribute5 = OKC_API.G_MISS_CHAR) THEN
279: l_rrdv_rec.attribute5 := NULL;

Line 278: IF (l_rrdv_rec.attribute5 = OKC_API.G_MISS_CHAR) THEN

274: END IF;
275: IF (l_rrdv_rec.attribute4 = OKC_API.G_MISS_CHAR) THEN
276: l_rrdv_rec.attribute4 := NULL;
277: END IF;
278: IF (l_rrdv_rec.attribute5 = OKC_API.G_MISS_CHAR) THEN
279: l_rrdv_rec.attribute5 := NULL;
280: END IF;
281: IF (l_rrdv_rec.attribute6 = OKC_API.G_MISS_CHAR) THEN
282: l_rrdv_rec.attribute6 := NULL;

Line 281: IF (l_rrdv_rec.attribute6 = OKC_API.G_MISS_CHAR) THEN

277: END IF;
278: IF (l_rrdv_rec.attribute5 = OKC_API.G_MISS_CHAR) THEN
279: l_rrdv_rec.attribute5 := NULL;
280: END IF;
281: IF (l_rrdv_rec.attribute6 = OKC_API.G_MISS_CHAR) THEN
282: l_rrdv_rec.attribute6 := NULL;
283: END IF;
284: IF (l_rrdv_rec.attribute7 = OKC_API.G_MISS_CHAR) THEN
285: l_rrdv_rec.attribute7 := NULL;

Line 284: IF (l_rrdv_rec.attribute7 = OKC_API.G_MISS_CHAR) THEN

280: END IF;
281: IF (l_rrdv_rec.attribute6 = OKC_API.G_MISS_CHAR) THEN
282: l_rrdv_rec.attribute6 := NULL;
283: END IF;
284: IF (l_rrdv_rec.attribute7 = OKC_API.G_MISS_CHAR) THEN
285: l_rrdv_rec.attribute7 := NULL;
286: END IF;
287: IF (l_rrdv_rec.attribute8 = OKC_API.G_MISS_CHAR) THEN
288: l_rrdv_rec.attribute8 := NULL;

Line 287: IF (l_rrdv_rec.attribute8 = OKC_API.G_MISS_CHAR) THEN

283: END IF;
284: IF (l_rrdv_rec.attribute7 = OKC_API.G_MISS_CHAR) THEN
285: l_rrdv_rec.attribute7 := NULL;
286: END IF;
287: IF (l_rrdv_rec.attribute8 = OKC_API.G_MISS_CHAR) THEN
288: l_rrdv_rec.attribute8 := NULL;
289: END IF;
290: IF (l_rrdv_rec.attribute9 = OKC_API.G_MISS_CHAR) THEN
291: l_rrdv_rec.attribute9 := NULL;

Line 290: IF (l_rrdv_rec.attribute9 = OKC_API.G_MISS_CHAR) THEN

286: END IF;
287: IF (l_rrdv_rec.attribute8 = OKC_API.G_MISS_CHAR) THEN
288: l_rrdv_rec.attribute8 := NULL;
289: END IF;
290: IF (l_rrdv_rec.attribute9 = OKC_API.G_MISS_CHAR) THEN
291: l_rrdv_rec.attribute9 := NULL;
292: END IF;
293: IF (l_rrdv_rec.attribute10 = OKC_API.G_MISS_CHAR) THEN
294: l_rrdv_rec.attribute10 := NULL;

Line 293: IF (l_rrdv_rec.attribute10 = OKC_API.G_MISS_CHAR) THEN

289: END IF;
290: IF (l_rrdv_rec.attribute9 = OKC_API.G_MISS_CHAR) THEN
291: l_rrdv_rec.attribute9 := NULL;
292: END IF;
293: IF (l_rrdv_rec.attribute10 = OKC_API.G_MISS_CHAR) THEN
294: l_rrdv_rec.attribute10 := NULL;
295: END IF;
296: IF (l_rrdv_rec.attribute11 = OKC_API.G_MISS_CHAR) THEN
297: l_rrdv_rec.attribute11 := NULL;

Line 296: IF (l_rrdv_rec.attribute11 = OKC_API.G_MISS_CHAR) THEN

292: END IF;
293: IF (l_rrdv_rec.attribute10 = OKC_API.G_MISS_CHAR) THEN
294: l_rrdv_rec.attribute10 := NULL;
295: END IF;
296: IF (l_rrdv_rec.attribute11 = OKC_API.G_MISS_CHAR) THEN
297: l_rrdv_rec.attribute11 := NULL;
298: END IF;
299: IF (l_rrdv_rec.attribute12 = OKC_API.G_MISS_CHAR) THEN
300: l_rrdv_rec.attribute12 := NULL;

Line 299: IF (l_rrdv_rec.attribute12 = OKC_API.G_MISS_CHAR) THEN

295: END IF;
296: IF (l_rrdv_rec.attribute11 = OKC_API.G_MISS_CHAR) THEN
297: l_rrdv_rec.attribute11 := NULL;
298: END IF;
299: IF (l_rrdv_rec.attribute12 = OKC_API.G_MISS_CHAR) THEN
300: l_rrdv_rec.attribute12 := NULL;
301: END IF;
302: IF (l_rrdv_rec.attribute13 = OKC_API.G_MISS_CHAR) THEN
303: l_rrdv_rec.attribute13 := NULL;

Line 302: IF (l_rrdv_rec.attribute13 = OKC_API.G_MISS_CHAR) THEN

298: END IF;
299: IF (l_rrdv_rec.attribute12 = OKC_API.G_MISS_CHAR) THEN
300: l_rrdv_rec.attribute12 := NULL;
301: END IF;
302: IF (l_rrdv_rec.attribute13 = OKC_API.G_MISS_CHAR) THEN
303: l_rrdv_rec.attribute13 := NULL;
304: END IF;
305: IF (l_rrdv_rec.attribute14 = OKC_API.G_MISS_CHAR) THEN
306: l_rrdv_rec.attribute14 := NULL;

Line 305: IF (l_rrdv_rec.attribute14 = OKC_API.G_MISS_CHAR) THEN

301: END IF;
302: IF (l_rrdv_rec.attribute13 = OKC_API.G_MISS_CHAR) THEN
303: l_rrdv_rec.attribute13 := NULL;
304: END IF;
305: IF (l_rrdv_rec.attribute14 = OKC_API.G_MISS_CHAR) THEN
306: l_rrdv_rec.attribute14 := NULL;
307: END IF;
308: IF (l_rrdv_rec.attribute15 = OKC_API.G_MISS_CHAR) THEN
309: l_rrdv_rec.attribute15 := NULL;

Line 308: IF (l_rrdv_rec.attribute15 = OKC_API.G_MISS_CHAR) THEN

304: END IF;
305: IF (l_rrdv_rec.attribute14 = OKC_API.G_MISS_CHAR) THEN
306: l_rrdv_rec.attribute14 := NULL;
307: END IF;
308: IF (l_rrdv_rec.attribute15 = OKC_API.G_MISS_CHAR) THEN
309: l_rrdv_rec.attribute15 := NULL;
310: END IF;
311: IF (l_rrdv_rec.created_by = OKC_API.G_MISS_NUM) THEN
312: l_rrdv_rec.created_by := NULL;

Line 311: IF (l_rrdv_rec.created_by = OKC_API.G_MISS_NUM) THEN

307: END IF;
308: IF (l_rrdv_rec.attribute15 = OKC_API.G_MISS_CHAR) THEN
309: l_rrdv_rec.attribute15 := NULL;
310: END IF;
311: IF (l_rrdv_rec.created_by = OKC_API.G_MISS_NUM) THEN
312: l_rrdv_rec.created_by := NULL;
313: END IF;
314: IF (l_rrdv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
315: l_rrdv_rec.creation_date := NULL;

Line 314: IF (l_rrdv_rec.creation_date = OKC_API.G_MISS_DATE) THEN

310: END IF;
311: IF (l_rrdv_rec.created_by = OKC_API.G_MISS_NUM) THEN
312: l_rrdv_rec.created_by := NULL;
313: END IF;
314: IF (l_rrdv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
315: l_rrdv_rec.creation_date := NULL;
316: END IF;
317: IF (l_rrdv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
318: l_rrdv_rec.last_updated_by := NULL;

Line 317: IF (l_rrdv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN

313: END IF;
314: IF (l_rrdv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
315: l_rrdv_rec.creation_date := NULL;
316: END IF;
317: IF (l_rrdv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
318: l_rrdv_rec.last_updated_by := NULL;
319: END IF;
320: IF (l_rrdv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
321: l_rrdv_rec.last_update_date := NULL;

Line 320: IF (l_rrdv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN

316: END IF;
317: IF (l_rrdv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
318: l_rrdv_rec.last_updated_by := NULL;
319: END IF;
320: IF (l_rrdv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
321: l_rrdv_rec.last_update_date := NULL;
322: END IF;
323: IF (l_rrdv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
324: l_rrdv_rec.last_update_login := NULL;

Line 323: IF (l_rrdv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN

319: END IF;
320: IF (l_rrdv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
321: l_rrdv_rec.last_update_date := NULL;
322: END IF;
323: IF (l_rrdv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
324: l_rrdv_rec.last_update_login := NULL;
325: END IF;
326: IF (l_rrdv_rec.access_level = OKC_API.G_MISS_CHAR) THEN
327: l_rrdv_rec.access_level := NULL;

Line 326: IF (l_rrdv_rec.access_level = OKC_API.G_MISS_CHAR) THEN

322: END IF;
323: IF (l_rrdv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
324: l_rrdv_rec.last_update_login := NULL;
325: END IF;
326: IF (l_rrdv_rec.access_level = OKC_API.G_MISS_CHAR) THEN
327: l_rrdv_rec.access_level := NULL;
328: END IF;
329: RETURN(l_rrdv_rec);
330: END null_out_defaults;

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

336: ---------------------------------------------------------------------------
337: PROCEDURE validate_id(
338: p_rrdv_rec IN rrdv_rec_type,
339: x_return_status OUT NOCOPY VARCHAR2) IS
340: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
341: BEGIN
342: IF p_rrdv_rec.id = OKC_API.G_MISS_NUM OR
343: p_rrdv_rec.id IS NULL
344: THEN

Line 342: IF p_rrdv_rec.id = OKC_API.G_MISS_NUM OR

338: p_rrdv_rec IN rrdv_rec_type,
339: x_return_status OUT NOCOPY VARCHAR2) IS
340: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
341: BEGIN
342: IF p_rrdv_rec.id = OKC_API.G_MISS_NUM OR
343: p_rrdv_rec.id IS NULL
344: THEN
345: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
346: l_return_status := OKC_API.G_RET_STS_ERROR;

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

341: BEGIN
342: IF p_rrdv_rec.id = OKC_API.G_MISS_NUM OR
343: p_rrdv_rec.id IS NULL
344: THEN
345: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
346: l_return_status := OKC_API.G_RET_STS_ERROR;
347: END IF;
348: x_return_status := l_return_status;
349: EXCEPTION

Line 346: l_return_status := OKC_API.G_RET_STS_ERROR;

342: IF p_rrdv_rec.id = OKC_API.G_MISS_NUM OR
343: p_rrdv_rec.id IS NULL
344: THEN
345: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
346: l_return_status := OKC_API.G_RET_STS_ERROR;
347: END IF;
348: x_return_status := l_return_status;
349: EXCEPTION
350: WHEN OTHERS THEN

Line 352: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

348: x_return_status := l_return_status;
349: EXCEPTION
350: WHEN OTHERS THEN
351: -- store SQL error message on message stack for caller
352: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
353: -- notify caller of an UNEXPECTED error
354: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
355: END validate_id;
356:

Line 354: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

350: WHEN OTHERS THEN
351: -- store SQL error message on message stack for caller
352: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
353: -- notify caller of an UNEXPECTED error
354: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
355: END validate_id;
356:
357: ---------------------------------------------------------------------------
358: -- PROCEDURE Validate_object_version_number

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

359: ---------------------------------------------------------------------------
360: PROCEDURE validate_object_version_number(
361: p_rrdv_rec IN rrdv_rec_type,
362: x_return_status OUT NOCOPY VARCHAR2) IS
363: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
364: BEGIN
365: IF p_rrdv_rec.object_version_number = OKC_API.G_MISS_NUM OR
366: p_rrdv_rec.object_version_number IS NULL
367: THEN

Line 365: IF p_rrdv_rec.object_version_number = OKC_API.G_MISS_NUM OR

361: p_rrdv_rec IN rrdv_rec_type,
362: x_return_status OUT NOCOPY VARCHAR2) IS
363: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
364: BEGIN
365: IF p_rrdv_rec.object_version_number = OKC_API.G_MISS_NUM OR
366: p_rrdv_rec.object_version_number IS NULL
367: THEN
368: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
369: l_return_status := OKC_API.G_RET_STS_ERROR;

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

364: BEGIN
365: IF p_rrdv_rec.object_version_number = OKC_API.G_MISS_NUM OR
366: p_rrdv_rec.object_version_number IS NULL
367: THEN
368: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
369: l_return_status := OKC_API.G_RET_STS_ERROR;
370: RAISE G_EXCEPTION_HALT_VALIDATION;
371: END IF;
372:

Line 369: l_return_status := OKC_API.G_RET_STS_ERROR;

365: IF p_rrdv_rec.object_version_number = OKC_API.G_MISS_NUM OR
366: p_rrdv_rec.object_version_number IS NULL
367: THEN
368: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
369: l_return_status := OKC_API.G_RET_STS_ERROR;
370: RAISE G_EXCEPTION_HALT_VALIDATION;
371: END IF;
372:
373: x_return_status := l_return_status;

Line 379: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

375: WHEN G_EXCEPTION_HALT_VALIDATION THEN
376: x_return_status := l_return_status;
377: WHEN OTHERS THEN
378: -- store SQL error message on message stack for caller
379: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
380: -- notify caller of an UNEXPECTED error
381: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
382: END validate_object_version_number;
383:

Line 381: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

377: WHEN OTHERS THEN
378: -- store SQL error message on message stack for caller
379: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
380: -- notify caller of an UNEXPECTED error
381: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
382: END validate_object_version_number;
383:
384: ---------------------------------------------------------------------------
385: -- PROCEDURE Validate_srd_id

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

386: ---------------------------------------------------------------------------
387: PROCEDURE validate_srd_id(
388: p_rrdv_rec IN rrdv_rec_type,
389: x_return_status OUT NOCOPY VARCHAR2) IS
390: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
391: BEGIN
392: IF p_rrdv_rec.srd_id = OKC_API.G_MISS_NUM OR
393: p_rrdv_rec.srd_id IS NULL
394: THEN

Line 392: IF p_rrdv_rec.srd_id = OKC_API.G_MISS_NUM OR

388: p_rrdv_rec IN rrdv_rec_type,
389: x_return_status OUT NOCOPY VARCHAR2) IS
390: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
391: BEGIN
392: IF p_rrdv_rec.srd_id = OKC_API.G_MISS_NUM OR
393: p_rrdv_rec.srd_id IS NULL
394: THEN
395: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'srd_id');
396: l_return_status := OKC_API.G_RET_STS_ERROR;

Line 395: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'srd_id');

391: BEGIN
392: IF p_rrdv_rec.srd_id = OKC_API.G_MISS_NUM OR
393: p_rrdv_rec.srd_id IS NULL
394: THEN
395: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'srd_id');
396: l_return_status := OKC_API.G_RET_STS_ERROR;
397: END IF;
398: x_return_status := l_return_status;
399: EXCEPTION

Line 396: l_return_status := OKC_API.G_RET_STS_ERROR;

392: IF p_rrdv_rec.srd_id = OKC_API.G_MISS_NUM OR
393: p_rrdv_rec.srd_id IS NULL
394: THEN
395: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'srd_id');
396: l_return_status := OKC_API.G_RET_STS_ERROR;
397: END IF;
398: x_return_status := l_return_status;
399: EXCEPTION
400: WHEN OTHERS THEN

Line 402: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

398: x_return_status := l_return_status;
399: EXCEPTION
400: WHEN OTHERS THEN
401: -- store SQL error message on message stack for caller
402: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
403: -- notify caller of an UNEXPECTED error
404: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
405: END validate_srd_id;
406:

Line 404: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

400: WHEN OTHERS THEN
401: -- store SQL error message on message stack for caller
402: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
403: -- notify caller of an UNEXPECTED error
404: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
405: END validate_srd_id;
406:
407: ---------------------------------------------------------------------------
408: -- PROCEDURE Validate_sre_id

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

409: ---------------------------------------------------------------------------
410: PROCEDURE validate_sre_id(
411: p_rrdv_rec IN rrdv_rec_type,
412: x_return_status OUT NOCOPY VARCHAR2) IS
413: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
414: BEGIN
415: IF p_rrdv_rec.sre_id = OKC_API.G_MISS_NUM OR
416: p_rrdv_rec.sre_id IS NULL
417: THEN

Line 415: IF p_rrdv_rec.sre_id = OKC_API.G_MISS_NUM OR

411: p_rrdv_rec IN rrdv_rec_type,
412: x_return_status OUT NOCOPY VARCHAR2) IS
413: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
414: BEGIN
415: IF p_rrdv_rec.sre_id = OKC_API.G_MISS_NUM OR
416: p_rrdv_rec.sre_id IS NULL
417: THEN
418: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'sre_id');
419: l_return_status := OKC_API.G_RET_STS_ERROR;

Line 418: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'sre_id');

414: BEGIN
415: IF p_rrdv_rec.sre_id = OKC_API.G_MISS_NUM OR
416: p_rrdv_rec.sre_id IS NULL
417: THEN
418: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'sre_id');
419: l_return_status := OKC_API.G_RET_STS_ERROR;
420: END IF;
421: x_return_status := l_return_status;
422: EXCEPTION

Line 419: l_return_status := OKC_API.G_RET_STS_ERROR;

415: IF p_rrdv_rec.sre_id = OKC_API.G_MISS_NUM OR
416: p_rrdv_rec.sre_id IS NULL
417: THEN
418: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'sre_id');
419: l_return_status := OKC_API.G_RET_STS_ERROR;
420: END IF;
421: x_return_status := l_return_status;
422: EXCEPTION
423: WHEN OTHERS THEN

Line 425: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

421: x_return_status := l_return_status;
422: EXCEPTION
423: WHEN OTHERS THEN
424: -- store SQL error message on message stack for caller
425: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
426: -- notify caller of an UNEXPECTED error
427: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
428: END validate_sre_id;
429:

Line 427: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

423: WHEN OTHERS THEN
424: -- store SQL error message on message stack for caller
425: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
426: -- notify caller of an UNEXPECTED error
427: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
428: END validate_sre_id;
429:
430: ---------------------------------------------------------------------------
431: -- PROCEDURE Validate_optional_yn

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

432: ---------------------------------------------------------------------------
433: PROCEDURE validate_optional_yn(
434: p_rrdv_rec IN rrdv_rec_type,
435: x_return_status OUT NOCOPY VARCHAR2) IS
436: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
437: BEGIN
438: IF p_rrdv_rec.optional_yn = OKC_API.G_MISS_CHAR OR
439: p_rrdv_rec.optional_yn IS NULL
440: THEN

Line 438: IF p_rrdv_rec.optional_yn = OKC_API.G_MISS_CHAR OR

434: p_rrdv_rec IN rrdv_rec_type,
435: x_return_status OUT NOCOPY VARCHAR2) IS
436: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
437: BEGIN
438: IF p_rrdv_rec.optional_yn = OKC_API.G_MISS_CHAR OR
439: p_rrdv_rec.optional_yn IS NULL
440: THEN
441: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'optional_yn');
442: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 441: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'optional_yn');

437: BEGIN
438: IF p_rrdv_rec.optional_yn = OKC_API.G_MISS_CHAR OR
439: p_rrdv_rec.optional_yn IS NULL
440: THEN
441: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'optional_yn');
442: x_return_status := OKC_API.G_RET_STS_ERROR;
443: raise G_EXCEPTION_HALT_VALIDATION;
444: END IF;
445: IF UPPER(p_rrdv_rec.optional_yn) IN ('Y', 'N') Then

Line 442: x_return_status := OKC_API.G_RET_STS_ERROR;

438: IF p_rrdv_rec.optional_yn = OKC_API.G_MISS_CHAR OR
439: p_rrdv_rec.optional_yn IS NULL
440: THEN
441: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'optional_yn');
442: x_return_status := OKC_API.G_RET_STS_ERROR;
443: raise G_EXCEPTION_HALT_VALIDATION;
444: END IF;
445: IF UPPER(p_rrdv_rec.optional_yn) IN ('Y', 'N') Then
446: IF p_rrdv_rec.optional_yn <> UPPER(p_rrdv_rec.optional_yn) Then

Line 447: OKC_API.set_message(G_APP_NAME, G_UPPERCASE_REQUIRED, G_COL_NAME_TOKEN, 'optional_yn');

443: raise G_EXCEPTION_HALT_VALIDATION;
444: END IF;
445: IF UPPER(p_rrdv_rec.optional_yn) IN ('Y', 'N') Then
446: IF p_rrdv_rec.optional_yn <> UPPER(p_rrdv_rec.optional_yn) Then
447: OKC_API.set_message(G_APP_NAME, G_UPPERCASE_REQUIRED, G_COL_NAME_TOKEN, 'optional_yn');
448: x_return_status := OKC_API.G_RET_STS_ERROR;
449: raise G_EXCEPTION_HALT_VALIDATION;
450: END IF;
451: ELSE

Line 448: x_return_status := OKC_API.G_RET_STS_ERROR;

444: END IF;
445: IF UPPER(p_rrdv_rec.optional_yn) IN ('Y', 'N') Then
446: IF p_rrdv_rec.optional_yn <> UPPER(p_rrdv_rec.optional_yn) Then
447: OKC_API.set_message(G_APP_NAME, G_UPPERCASE_REQUIRED, G_COL_NAME_TOKEN, 'optional_yn');
448: x_return_status := OKC_API.G_RET_STS_ERROR;
449: raise G_EXCEPTION_HALT_VALIDATION;
450: END IF;
451: ELSE
452: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'optional_yn');

Line 452: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'optional_yn');

448: x_return_status := OKC_API.G_RET_STS_ERROR;
449: raise G_EXCEPTION_HALT_VALIDATION;
450: END IF;
451: ELSE
452: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'optional_yn');
453: x_return_status := OKC_API.G_RET_STS_ERROR;
454: raise G_EXCEPTION_HALT_VALIDATION;
455: END IF;
456: x_return_status := l_return_status;

Line 453: x_return_status := OKC_API.G_RET_STS_ERROR;

449: raise G_EXCEPTION_HALT_VALIDATION;
450: END IF;
451: ELSE
452: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'optional_yn');
453: x_return_status := OKC_API.G_RET_STS_ERROR;
454: raise G_EXCEPTION_HALT_VALIDATION;
455: END IF;
456: x_return_status := l_return_status;
457: EXCEPTION

Line 462: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

458: WHEN G_EXCEPTION_HALT_VALIDATION THEN
459: NULL;
460: WHEN OTHERS THEN
461: -- store SQL error message on message stack for caller
462: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
463: -- notify caller of an UNEXPECTED error
464: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
465: END validate_optional_yn;
466:

Line 464: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

460: WHEN OTHERS THEN
461: -- store SQL error message on message stack for caller
462: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
463: -- notify caller of an UNEXPECTED error
464: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
465: END validate_optional_yn;
466:
467: ---------------------------------------------------------------------------
468: -- PROCEDURE Validate_subject_object_flag

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

469: ---------------------------------------------------------------------------
470: PROCEDURE validate_subject_object_flag(
471: p_rrdv_rec IN rrdv_rec_type,
472: x_return_status OUT NOCOPY VARCHAR2) IS
473: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
474: BEGIN
475: IF p_rrdv_rec.subject_object_flag = OKC_API.G_MISS_CHAR OR
476: p_rrdv_rec.subject_object_flag IS NULL
477: THEN

Line 475: IF p_rrdv_rec.subject_object_flag = OKC_API.G_MISS_CHAR OR

471: p_rrdv_rec IN rrdv_rec_type,
472: x_return_status OUT NOCOPY VARCHAR2) IS
473: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
474: BEGIN
475: IF p_rrdv_rec.subject_object_flag = OKC_API.G_MISS_CHAR OR
476: p_rrdv_rec.subject_object_flag IS NULL
477: THEN
478: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'subject_object_flag');
479: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 478: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'subject_object_flag');

474: BEGIN
475: IF p_rrdv_rec.subject_object_flag = OKC_API.G_MISS_CHAR OR
476: p_rrdv_rec.subject_object_flag IS NULL
477: THEN
478: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'subject_object_flag');
479: x_return_status := OKC_API.G_RET_STS_ERROR;
480: raise G_EXCEPTION_HALT_VALIDATION;
481: END IF;
482: IF UPPER(p_rrdv_rec.subject_object_flag) IN ('S', 'O') Then

Line 479: x_return_status := OKC_API.G_RET_STS_ERROR;

475: IF p_rrdv_rec.subject_object_flag = OKC_API.G_MISS_CHAR OR
476: p_rrdv_rec.subject_object_flag IS NULL
477: THEN
478: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'subject_object_flag');
479: x_return_status := OKC_API.G_RET_STS_ERROR;
480: raise G_EXCEPTION_HALT_VALIDATION;
481: END IF;
482: IF UPPER(p_rrdv_rec.subject_object_flag) IN ('S', 'O') Then
483: IF p_rrdv_rec.subject_object_flag <> UPPER(p_rrdv_rec.subject_object_flag) Then

Line 484: OKC_API.set_message(G_APP_NAME, G_UPPERCASE_REQUIRED, G_COL_NAME_TOKEN, 'subject_object_flag');

480: raise G_EXCEPTION_HALT_VALIDATION;
481: END IF;
482: IF UPPER(p_rrdv_rec.subject_object_flag) IN ('S', 'O') Then
483: IF p_rrdv_rec.subject_object_flag <> UPPER(p_rrdv_rec.subject_object_flag) Then
484: OKC_API.set_message(G_APP_NAME, G_UPPERCASE_REQUIRED, G_COL_NAME_TOKEN, 'subject_object_flag');
485: x_return_status := OKC_API.G_RET_STS_ERROR;
486: raise G_EXCEPTION_HALT_VALIDATION;
487: END IF;
488: ELSE

Line 485: x_return_status := OKC_API.G_RET_STS_ERROR;

481: END IF;
482: IF UPPER(p_rrdv_rec.subject_object_flag) IN ('S', 'O') Then
483: IF p_rrdv_rec.subject_object_flag <> UPPER(p_rrdv_rec.subject_object_flag) Then
484: OKC_API.set_message(G_APP_NAME, G_UPPERCASE_REQUIRED, G_COL_NAME_TOKEN, 'subject_object_flag');
485: x_return_status := OKC_API.G_RET_STS_ERROR;
486: raise G_EXCEPTION_HALT_VALIDATION;
487: END IF;
488: ELSE
489: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'subject_object_flag');

Line 489: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'subject_object_flag');

485: x_return_status := OKC_API.G_RET_STS_ERROR;
486: raise G_EXCEPTION_HALT_VALIDATION;
487: END IF;
488: ELSE
489: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'subject_object_flag');
490: x_return_status := OKC_API.G_RET_STS_ERROR;
491: raise G_EXCEPTION_HALT_VALIDATION;
492: END IF;
493: x_return_status := l_return_status;

Line 490: x_return_status := OKC_API.G_RET_STS_ERROR;

486: raise G_EXCEPTION_HALT_VALIDATION;
487: END IF;
488: ELSE
489: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'subject_object_flag');
490: x_return_status := OKC_API.G_RET_STS_ERROR;
491: raise G_EXCEPTION_HALT_VALIDATION;
492: END IF;
493: x_return_status := l_return_status;
494: EXCEPTION

Line 499: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);

495: WHEN G_EXCEPTION_HALT_VALIDATION THEN
496: NULL;
497: WHEN OTHERS THEN
498: -- store SQL error message on message stack for caller
499: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
500: -- notify caller of an UNEXPECTED error
501: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
502: END validate_subject_object_flag;
503:

Line 501: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

497: WHEN OTHERS THEN
498: -- store SQL error message on message stack for caller
499: OKC_API.set_message(G_APP_NAME, G_UNEXPECTED_ERROR,G_SQLCODE_TOKEN,SQLCODE,G_SQLERRM_TOKEN,SQLERRM);
500: -- notify caller of an UNEXPECTED error
501: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
502: END validate_subject_object_flag;
503:
504: ---------------------------------------------------------------------------
505: -- PROCEDURE Validate_ACCESS_LEVEL

Line 513: x_return_status := OKC_API.G_RET_STS_SUCCESS;

509: x_return_status OUT NOCOPY VARCHAR2) IS
510: Begin
511:
512: -- initialize return status
513: x_return_status := OKC_API.G_RET_STS_SUCCESS;
514:
515: -- check that data exists
516: If (p_rrdv_rec.access_level <> OKC_API.G_MISS_CHAR and
517: p_rrdv_rec.access_level IS NOT NULL)

Line 516: If (p_rrdv_rec.access_level <> OKC_API.G_MISS_CHAR and

512: -- initialize return status
513: x_return_status := OKC_API.G_RET_STS_SUCCESS;
514:
515: -- check that data exists
516: If (p_rrdv_rec.access_level <> OKC_API.G_MISS_CHAR and
517: p_rrdv_rec.access_level IS NOT NULL)
518: Then
519: If p_rrdv_rec.access_level NOT IN ('S','E', 'U') Then
520: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

Line 520: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

516: If (p_rrdv_rec.access_level <> OKC_API.G_MISS_CHAR and
517: p_rrdv_rec.access_level IS NOT NULL)
518: Then
519: If p_rrdv_rec.access_level NOT IN ('S','E', 'U') Then
520: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
521: p_msg_name => g_invalid_value,
522: p_token1 => g_col_name_token,
523: p_token1_value => 'access_level');
524: -- notify caller of an error

Line 525: x_return_status := OKC_API.G_RET_STS_ERROR;

521: p_msg_name => g_invalid_value,
522: p_token1 => g_col_name_token,
523: p_token1_value => 'access_level');
524: -- notify caller of an error
525: x_return_status := OKC_API.G_RET_STS_ERROR;
526:
527: -- halt validation
528: raise G_EXCEPTION_HALT_VALIDATION;
529: end if;

Line 538: OKC_API.SET_MESSAGE(p_app_name => g_app_name,

534: null;
535:
536: when OTHERS then
537: -- store SQL error message on message stack
538: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
539: p_msg_name => g_unexpected_error,
540: p_token1 => g_sqlcode_token,
541: p_token1_value => sqlcode,
542: p_token2 => g_sqlerrm_token,

Line 545: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

541: p_token1_value => sqlcode,
542: p_token2 => g_sqlerrm_token,
543: p_token2_value => sqlerrm);
544: -- notify caller of an error as UNEXPETED error
545: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
546: End validate_access_level;
547:
548: ---------------------------------------------------------------------------
549: -- PROCEDURE Validate_Attributes

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

553: ------------------------------------------------
554: FUNCTION Validate_Attributes (
555: p_rrdv_rec IN rrdv_rec_type
556: ) RETURN VARCHAR2 IS
557: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
558: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
559: BEGIN
560: ---------------------------------------------------------------------------------------
561: --Attribute Level Validation Procedure Calls Starts(Modification on TAPI generated Code.

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

554: FUNCTION Validate_Attributes (
555: p_rrdv_rec IN rrdv_rec_type
556: ) RETURN VARCHAR2 IS
557: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
558: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
559: BEGIN
560: ---------------------------------------------------------------------------------------
561: --Attribute Level Validation Procedure Calls Starts(Modification on TAPI generated Code.
562: ---------------------------------------------------------------------------------------

Line 565: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

561: --Attribute Level Validation Procedure Calls Starts(Modification on TAPI generated Code.
562: ---------------------------------------------------------------------------------------
563:
564: VALIDATE_id(p_rrdv_rec, l_return_status);
565: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
566: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
567: x_return_status := l_return_status;
568: RAISE G_EXCEPTION_HALT_VALIDATION;
569: ELSE

Line 566: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave

562: ---------------------------------------------------------------------------------------
563:
564: VALIDATE_id(p_rrdv_rec, l_return_status);
565: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
566: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
567: x_return_status := l_return_status;
568: RAISE G_EXCEPTION_HALT_VALIDATION;
569: ELSE
570: x_return_status := l_return_status; -- record that there was an error

Line 575: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

571: END IF;
572: END IF;
573:
574: VALIDATE_object_version_number(p_rrdv_rec, l_return_status);
575: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
576: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
577: x_return_status := l_return_status;
578: RAISE G_EXCEPTION_HALT_VALIDATION;
579: ELSE

Line 576: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave

572: END IF;
573:
574: VALIDATE_object_version_number(p_rrdv_rec, l_return_status);
575: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
576: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
577: x_return_status := l_return_status;
578: RAISE G_EXCEPTION_HALT_VALIDATION;
579: ELSE
580: x_return_status := l_return_status; -- record that there was an error

Line 585: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

581: END IF;
582: END IF;
583:
584: VALIDATE_srd_id(p_rrdv_rec, l_return_status);
585: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
586: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
587: x_return_status := l_return_status;
588: RAISE G_EXCEPTION_HALT_VALIDATION;
589: ELSE

Line 586: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave

582: END IF;
583:
584: VALIDATE_srd_id(p_rrdv_rec, l_return_status);
585: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
586: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
587: x_return_status := l_return_status;
588: RAISE G_EXCEPTION_HALT_VALIDATION;
589: ELSE
590: x_return_status := l_return_status; -- record that there was an error

Line 595: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

591: END IF;
592: END IF;
593:
594: VALIDATE_sre_id(p_rrdv_rec, l_return_status);
595: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
596: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
597: x_return_status := l_return_status;
598: RAISE G_EXCEPTION_HALT_VALIDATION;
599: ELSE

Line 596: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave

592: END IF;
593:
594: VALIDATE_sre_id(p_rrdv_rec, l_return_status);
595: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
596: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
597: x_return_status := l_return_status;
598: RAISE G_EXCEPTION_HALT_VALIDATION;
599: ELSE
600: x_return_status := l_return_status; -- record that there was an error

Line 605: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

601: END IF;
602: END IF;
603:
604: VALIDATE_optional_yn(p_rrdv_rec, l_return_status);
605: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
606: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
607: x_return_status := l_return_status;
608: RAISE G_EXCEPTION_HALT_VALIDATION;
609: ELSE

Line 606: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave

602: END IF;
603:
604: VALIDATE_optional_yn(p_rrdv_rec, l_return_status);
605: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
606: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
607: x_return_status := l_return_status;
608: RAISE G_EXCEPTION_HALT_VALIDATION;
609: ELSE
610: x_return_status := l_return_status; -- record that there was an error

Line 615: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

611: END IF;
612: END IF;
613:
614: VALIDATE_subject_object_flag(p_rrdv_rec, l_return_status);
615: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
616: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
617: x_return_status := l_return_status;
618: RAISE G_EXCEPTION_HALT_VALIDATION;
619: ELSE

Line 616: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave

612: END IF;
613:
614: VALIDATE_subject_object_flag(p_rrdv_rec, l_return_status);
615: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
616: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
617: x_return_status := l_return_status;
618: RAISE G_EXCEPTION_HALT_VALIDATION;
619: ELSE
620: x_return_status := l_return_status; -- record that there was an error

Line 625: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

621: END IF;
622: END IF;
623:
624: VALIDATE_access_level(p_rrdv_rec, l_return_status);
625: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
626: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
627: x_return_status := l_return_status;
628: RAISE G_EXCEPTION_HALT_VALIDATION;
629: ELSE

Line 626: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave

622: END IF;
623:
624: VALIDATE_access_level(p_rrdv_rec, l_return_status);
625: IF (l_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
626: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
627: x_return_status := l_return_status;
628: RAISE G_EXCEPTION_HALT_VALIDATION;
629: ELSE
630: x_return_status := l_return_status; -- record that there was an error

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

646: --------------------------------------------
647: FUNCTION Validate_Record (
648: p_rrdv_rec IN rrdv_rec_type
649: ) RETURN VARCHAR2 IS
650: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
651: ------------------------------------
652: -- FUNCTION validate_foreign_keys --
653: ------------------------------------
654: FUNCTION validate_foreign_keys (

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

663: SELECT 'x'
664: FROM Okc_Subclass_Rg_Defs_V
665: WHERE okc_subclass_rg_defs_v.id = p_id;
666: l_dummy VARCHAR2(1);
667: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
668: l_row_notfound BOOLEAN := TRUE;
669: BEGIN
670: IF (p_rrdv_rec.SRE_ID IS NOT NULL)
671: THEN

Line 677: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'SRE_ID');

673: FETCH okc_srev_pk_csr INTO l_dummy;
674: l_row_notfound := okc_srev_pk_csr%NOTFOUND;
675: CLOSE okc_srev_pk_csr;
676: IF (l_row_notfound) THEN
677: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'SRE_ID');
678: RAISE item_not_found_error;
679: END IF;
680: END IF;
681: IF (p_rrdv_rec.SRD_ID IS NOT NULL)

Line 688: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'SRD_ID');

684: FETCH okc_srdv_pk_csr INTO l_dummy;
685: l_row_notfound := okc_srdv_pk_csr%NOTFOUND;
686: CLOSE okc_srdv_pk_csr;
687: IF (l_row_notfound) THEN
688: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'SRD_ID');
689: RAISE item_not_found_error;
690: END IF;
691: END IF;
692: RETURN (l_return_status);

Line 695: l_return_status := OKC_API.G_RET_STS_ERROR;

691: END IF;
692: RETURN (l_return_status);
693: EXCEPTION
694: WHEN item_not_found_error THEN
695: l_return_status := OKC_API.G_RET_STS_ERROR;
696: RETURN (l_return_status);
697: END validate_foreign_keys;
698: ----------------------------------------------------
699: FUNCTION validate_unique_keys (

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

710: AND ((p_id IS NULL)
711: OR (p_id IS NOT NULL
712: AND id <> p_id));
713: l_dummy VARCHAR2(1);
714: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
715: l_row_found BOOLEAN := FALSE;
716: BEGIN
717: IF (p_rrdv_rec.SRD_ID IS NOT NULL AND
718: p_rrdv_rec.SRE_ID IS NOT NULL) THEN

Line 726: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'SRD_ID');

722: FETCH c1 INTO l_dummy;
723: l_row_found := c1%FOUND;
724: CLOSE c1;
725: IF (l_row_found) THEN
726: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'SRD_ID');
727: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'SRE_ID');
728: RAISE unique_key_error;
729: END IF;
730: END IF;

Line 727: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'SRE_ID');

723: l_row_found := c1%FOUND;
724: CLOSE c1;
725: IF (l_row_found) THEN
726: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'SRD_ID');
727: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE, G_COL_NAME_TOKEN, 'SRE_ID');
728: RAISE unique_key_error;
729: END IF;
730: END IF;
731: RETURN (l_return_status);

Line 734: l_return_status := OKC_API.G_RET_STS_ERROR;

730: END IF;
731: RETURN (l_return_status);
732: EXCEPTION
733: WHEN unique_key_error THEN
734: l_return_status := OKC_API.G_RET_STS_ERROR;
735: RETURN (l_return_status);
736: END validate_unique_keys;
737: BEGIN
738: l_return_status := validate_foreign_keys (p_rrdv_rec);

Line 739: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

735: RETURN (l_return_status);
736: END validate_unique_keys;
737: BEGIN
738: l_return_status := validate_foreign_keys (p_rrdv_rec);
739: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
740: raise G_EXCEPTION_HALT_VALIDATION;
741: END IF;
742: l_return_status := validate_unique_keys (p_rrdv_rec);
743: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

Line 743: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

739: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
740: raise G_EXCEPTION_HALT_VALIDATION;
741: END IF;
742: l_return_status := validate_unique_keys (p_rrdv_rec);
743: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
744: raise G_EXCEPTION_HALT_VALIDATION;
745: END IF;
746: RETURN (l_return_status);
747: EXCEPTION

Line 751: OKC_API.set_message(p_app_name => g_app_name,

747: EXCEPTION
748: WHEN G_EXCEPTION_HALT_VALIDATION THEN
749: RETURN(l_return_status);
750: WHEN OTHERS THEN
751: OKC_API.set_message(p_app_name => g_app_name,
752: p_msg_name => g_unexpected_error,
753: p_token1 => g_sqlcode_token,
754: p_token1_value => sqlcode,
755: p_token2 => g_sqlerrm_token,

Line 757: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

753: p_token1 => g_sqlcode_token,
754: p_token1_value => sqlcode,
755: p_token2 => g_sqlerrm_token,
756: p_token2_value => sqlerrm);
757: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
758: RETURN(l_return_status);
759: END Validate_Record;
760:
761: ---------------------------------------------------------------------------

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

845: p_rrdv_rec IN rrdv_rec_type) IS
846:
847: l_api_version CONSTANT NUMBER := 1;
848: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
849: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
850: l_rrdv_rec rrdv_rec_type := p_rrdv_rec;
851: l_rrd_rec rrd_rec_type;
852: BEGIN
853: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

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

849: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
850: l_rrdv_rec rrdv_rec_type := p_rrdv_rec;
851: l_rrd_rec rrd_rec_type;
852: BEGIN
853: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
854: G_PKG_NAME,
855: p_init_msg_list,
856: l_api_version,
857: p_api_version,

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

856: l_api_version,
857: p_api_version,
858: '_PVT',
859: x_return_status);
860: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
861: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
862: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
863: RAISE OKC_API.G_EXCEPTION_ERROR;
864: END IF;

Line 861: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

857: p_api_version,
858: '_PVT',
859: x_return_status);
860: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
861: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
862: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
863: RAISE OKC_API.G_EXCEPTION_ERROR;
864: END IF;
865: --- Validate all non-missing attributes (Item Level Validation)

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

858: '_PVT',
859: x_return_status);
860: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
861: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
862: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
863: RAISE OKC_API.G_EXCEPTION_ERROR;
864: END IF;
865: --- Validate all non-missing attributes (Item Level Validation)
866: l_return_status := Validate_Attributes(l_rrdv_rec);

Line 863: RAISE OKC_API.G_EXCEPTION_ERROR;

859: x_return_status);
860: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
861: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
862: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
863: RAISE OKC_API.G_EXCEPTION_ERROR;
864: END IF;
865: --- Validate all non-missing attributes (Item Level Validation)
866: l_return_status := Validate_Attributes(l_rrdv_rec);
867: --- If any errors happen abort API

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

864: END IF;
865: --- Validate all non-missing attributes (Item Level Validation)
866: l_return_status := Validate_Attributes(l_rrdv_rec);
867: --- If any errors happen abort API
868: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
869: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
870: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
871: RAISE OKC_API.G_EXCEPTION_ERROR;
872: END IF;

Line 869: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

865: --- Validate all non-missing attributes (Item Level Validation)
866: l_return_status := Validate_Attributes(l_rrdv_rec);
867: --- If any errors happen abort API
868: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
869: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
870: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
871: RAISE OKC_API.G_EXCEPTION_ERROR;
872: END IF;
873: l_return_status := Validate_Record(l_rrdv_rec);

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

866: l_return_status := Validate_Attributes(l_rrdv_rec);
867: --- If any errors happen abort API
868: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
869: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
870: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
871: RAISE OKC_API.G_EXCEPTION_ERROR;
872: END IF;
873: l_return_status := Validate_Record(l_rrdv_rec);
874: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 871: RAISE OKC_API.G_EXCEPTION_ERROR;

867: --- If any errors happen abort API
868: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
869: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
870: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
871: RAISE OKC_API.G_EXCEPTION_ERROR;
872: END IF;
873: l_return_status := Validate_Record(l_rrdv_rec);
874: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
875: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

870: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
871: RAISE OKC_API.G_EXCEPTION_ERROR;
872: END IF;
873: l_return_status := Validate_Record(l_rrdv_rec);
874: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
875: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;

Line 875: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

871: RAISE OKC_API.G_EXCEPTION_ERROR;
872: END IF;
873: l_return_status := Validate_Record(l_rrdv_rec);
874: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
875: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;
879: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

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

872: END IF;
873: l_return_status := Validate_Record(l_rrdv_rec);
874: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
875: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;
879: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
880: EXCEPTION

Line 877: RAISE OKC_API.G_EXCEPTION_ERROR;

873: l_return_status := Validate_Record(l_rrdv_rec);
874: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
875: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;
879: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
880: EXCEPTION
881: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

875: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;
879: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
880: EXCEPTION
881: WHEN OKC_API.G_EXCEPTION_ERROR THEN
882: x_return_status := OKC_API.HANDLE_EXCEPTIONS
883: (

Line 881: WHEN OKC_API.G_EXCEPTION_ERROR THEN

877: RAISE OKC_API.G_EXCEPTION_ERROR;
878: END IF;
879: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
880: EXCEPTION
881: WHEN OKC_API.G_EXCEPTION_ERROR THEN
882: x_return_status := OKC_API.HANDLE_EXCEPTIONS
883: (
884: l_api_name,
885: G_PKG_NAME,

Line 882: x_return_status := OKC_API.HANDLE_EXCEPTIONS

878: END IF;
879: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
880: EXCEPTION
881: WHEN OKC_API.G_EXCEPTION_ERROR THEN
882: x_return_status := OKC_API.HANDLE_EXCEPTIONS
883: (
884: l_api_name,
885: G_PKG_NAME,
886: 'OKC_API.G_RET_STS_ERROR',

Line 886: 'OKC_API.G_RET_STS_ERROR',

882: x_return_status := OKC_API.HANDLE_EXCEPTIONS
883: (
884: l_api_name,
885: G_PKG_NAME,
886: 'OKC_API.G_RET_STS_ERROR',
887: x_msg_count,
888: x_msg_data,
889: '_PVT'
890: );

Line 891: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

887: x_msg_count,
888: x_msg_data,
889: '_PVT'
890: );
891: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
892: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
893: (
894: l_api_name,
895: G_PKG_NAME,

Line 892: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

888: x_msg_data,
889: '_PVT'
890: );
891: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
892: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
893: (
894: l_api_name,
895: G_PKG_NAME,
896: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 896: 'OKC_API.G_RET_STS_UNEXP_ERROR',

892: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
893: (
894: l_api_name,
895: G_PKG_NAME,
896: 'OKC_API.G_RET_STS_UNEXP_ERROR',
897: x_msg_count,
898: x_msg_data,
899: '_PVT'
900: );

Line 902: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

898: x_msg_data,
899: '_PVT'
900: );
901: WHEN OTHERS THEN
902: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
903: (
904: l_api_name,
905: G_PKG_NAME,
906: 'OTHERS',

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

921: p_rrdv_tbl IN rrdv_tbl_type) IS
922:
923: l_api_version CONSTANT NUMBER := 1;
924: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
925: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
926: i NUMBER := 0;
927: BEGIN
928: OKC_API.init_msg_list(p_init_msg_list);
929: -- Make sure PL/SQL table has records in it before passing

Line 928: OKC_API.init_msg_list(p_init_msg_list);

924: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
925: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
926: i NUMBER := 0;
927: BEGIN
928: OKC_API.init_msg_list(p_init_msg_list);
929: -- Make sure PL/SQL table has records in it before passing
930: IF (p_rrdv_tbl.COUNT > 0) THEN
931: i := p_rrdv_tbl.FIRST;
932: LOOP

Line 935: p_init_msg_list => OKC_API.G_FALSE,

931: i := p_rrdv_tbl.FIRST;
932: LOOP
933: validate_row (
934: p_api_version => p_api_version,
935: p_init_msg_list => OKC_API.G_FALSE,
936: x_return_status => x_return_status,
937: x_msg_count => x_msg_count,
938: x_msg_data => x_msg_data,
939: p_rrdv_rec => p_rrdv_tbl(i));

Line 945: WHEN OKC_API.G_EXCEPTION_ERROR THEN

941: i := p_rrdv_tbl.NEXT(i);
942: END LOOP;
943: END IF;
944: EXCEPTION
945: WHEN OKC_API.G_EXCEPTION_ERROR THEN
946: x_return_status := OKC_API.HANDLE_EXCEPTIONS
947: (
948: l_api_name,
949: G_PKG_NAME,

Line 946: x_return_status := OKC_API.HANDLE_EXCEPTIONS

942: END LOOP;
943: END IF;
944: EXCEPTION
945: WHEN OKC_API.G_EXCEPTION_ERROR THEN
946: x_return_status := OKC_API.HANDLE_EXCEPTIONS
947: (
948: l_api_name,
949: G_PKG_NAME,
950: 'OKC_API.G_RET_STS_ERROR',

Line 950: 'OKC_API.G_RET_STS_ERROR',

946: x_return_status := OKC_API.HANDLE_EXCEPTIONS
947: (
948: l_api_name,
949: G_PKG_NAME,
950: 'OKC_API.G_RET_STS_ERROR',
951: x_msg_count,
952: x_msg_data,
953: '_PVT'
954: );

Line 955: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

951: x_msg_count,
952: x_msg_data,
953: '_PVT'
954: );
955: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
956: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
957: (
958: l_api_name,
959: G_PKG_NAME,

Line 956: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

952: x_msg_data,
953: '_PVT'
954: );
955: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
956: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
957: (
958: l_api_name,
959: G_PKG_NAME,
960: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 960: 'OKC_API.G_RET_STS_UNEXP_ERROR',

956: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
957: (
958: l_api_name,
959: G_PKG_NAME,
960: 'OKC_API.G_RET_STS_UNEXP_ERROR',
961: x_msg_count,
962: x_msg_data,
963: '_PVT'
964: );

Line 966: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

962: x_msg_data,
963: '_PVT'
964: );
965: WHEN OTHERS THEN
966: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
967: (
968: l_api_name,
969: G_PKG_NAME,
970: 'OTHERS',

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

989: x_rrd_rec OUT NOCOPY rrd_rec_type) IS
990:
991: l_api_version CONSTANT NUMBER := 1;
992: l_api_name CONSTANT VARCHAR2(30) := 'DEFS_insert_row';
993: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
994: l_rrd_rec rrd_rec_type := p_rrd_rec;
995: l_def_rrd_rec rrd_rec_type;
996: -----------------------------------------
997: -- Set_Attributes for:OKC_RG_ROLE_DEFS --

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

999: FUNCTION Set_Attributes (
1000: p_rrd_rec IN rrd_rec_type,
1001: x_rrd_rec OUT NOCOPY rrd_rec_type
1002: ) RETURN VARCHAR2 IS
1003: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1004: BEGIN
1005: x_rrd_rec := p_rrd_rec;
1006: RETURN(l_return_status);
1007: END Set_Attributes;

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

1005: x_rrd_rec := p_rrd_rec;
1006: RETURN(l_return_status);
1007: END Set_Attributes;
1008: BEGIN
1009: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1010: p_init_msg_list,
1011: '_PVT',
1012: x_return_status);
1013: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

1009: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1010: p_init_msg_list,
1011: '_PVT',
1012: x_return_status);
1013: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1014: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1015: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1016: RAISE OKC_API.G_EXCEPTION_ERROR;
1017: END IF;

Line 1014: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1010: p_init_msg_list,
1011: '_PVT',
1012: x_return_status);
1013: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1014: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1015: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1016: RAISE OKC_API.G_EXCEPTION_ERROR;
1017: END IF;
1018: --- Setting item attributes

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

1011: '_PVT',
1012: x_return_status);
1013: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1014: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1015: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1016: RAISE OKC_API.G_EXCEPTION_ERROR;
1017: END IF;
1018: --- Setting item attributes
1019: l_return_status := Set_Attributes(

Line 1016: RAISE OKC_API.G_EXCEPTION_ERROR;

1012: x_return_status);
1013: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1014: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1015: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1016: RAISE OKC_API.G_EXCEPTION_ERROR;
1017: END IF;
1018: --- Setting item attributes
1019: l_return_status := Set_Attributes(
1020: p_rrd_rec, -- IN

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

1019: l_return_status := Set_Attributes(
1020: p_rrd_rec, -- IN
1021: l_rrd_rec); -- OUT
1022: --- If any errors happen abort API
1023: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1024: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1025: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1026: RAISE OKC_API.G_EXCEPTION_ERROR;
1027: END IF;

Line 1024: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1020: p_rrd_rec, -- IN
1021: l_rrd_rec); -- OUT
1022: --- If any errors happen abort API
1023: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1024: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1025: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1026: RAISE OKC_API.G_EXCEPTION_ERROR;
1027: END IF;
1028: INSERT INTO OKC_RG_ROLE_DEFS(

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

1021: l_rrd_rec); -- OUT
1022: --- If any errors happen abort API
1023: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1024: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1025: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1026: RAISE OKC_API.G_EXCEPTION_ERROR;
1027: END IF;
1028: INSERT INTO OKC_RG_ROLE_DEFS(
1029: id,

Line 1026: RAISE OKC_API.G_EXCEPTION_ERROR;

1022: --- If any errors happen abort API
1023: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1024: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1025: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1026: RAISE OKC_API.G_EXCEPTION_ERROR;
1027: END IF;
1028: INSERT INTO OKC_RG_ROLE_DEFS(
1029: id,
1030: srd_id,

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

1084: l_rrd_rec.attribute15,
1085: l_rrd_rec.access_level);
1086: -- Set OUT values
1087: x_rrd_rec := l_rrd_rec;
1088: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1089: EXCEPTION
1090: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1091: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1092: (

Line 1090: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1086: -- Set OUT values
1087: x_rrd_rec := l_rrd_rec;
1088: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1089: EXCEPTION
1090: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1091: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1092: (
1093: l_api_name,
1094: G_PKG_NAME,

Line 1091: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1087: x_rrd_rec := l_rrd_rec;
1088: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1089: EXCEPTION
1090: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1091: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1092: (
1093: l_api_name,
1094: G_PKG_NAME,
1095: 'OKC_API.G_RET_STS_ERROR',

Line 1095: 'OKC_API.G_RET_STS_ERROR',

1091: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1092: (
1093: l_api_name,
1094: G_PKG_NAME,
1095: 'OKC_API.G_RET_STS_ERROR',
1096: x_msg_count,
1097: x_msg_data,
1098: '_PVT'
1099: );

Line 1100: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1096: x_msg_count,
1097: x_msg_data,
1098: '_PVT'
1099: );
1100: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1101: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1102: (
1103: l_api_name,
1104: G_PKG_NAME,

Line 1101: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1097: x_msg_data,
1098: '_PVT'
1099: );
1100: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1101: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1102: (
1103: l_api_name,
1104: G_PKG_NAME,
1105: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1105: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1101: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1102: (
1103: l_api_name,
1104: G_PKG_NAME,
1105: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1106: x_msg_count,
1107: x_msg_data,
1108: '_PVT'
1109: );

Line 1111: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1107: x_msg_data,
1108: '_PVT'
1109: );
1110: WHEN OTHERS THEN
1111: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1112: (
1113: l_api_name,
1114: G_PKG_NAME,
1115: 'OTHERS',

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

1131: x_rrdv_rec OUT NOCOPY rrdv_rec_type) IS
1132:
1133: l_api_version CONSTANT NUMBER := 1;
1134: l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
1135: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1136: l_rrdv_rec rrdv_rec_type;
1137: l_def_rrdv_rec rrdv_rec_type;
1138: l_rrd_rec rrd_rec_type;
1139: lx_rrd_rec rrd_rec_type;

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

1158: FUNCTION Set_Attributes (
1159: p_rrdv_rec IN rrdv_rec_type,
1160: x_rrdv_rec OUT NOCOPY rrdv_rec_type
1161: ) RETURN VARCHAR2 IS
1162: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1163: BEGIN
1164: x_rrdv_rec := p_rrdv_rec;
1165: x_rrdv_rec.OBJECT_VERSION_NUMBER := 1;
1166: RETURN(l_return_status);

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

1165: x_rrdv_rec.OBJECT_VERSION_NUMBER := 1;
1166: RETURN(l_return_status);
1167: END Set_Attributes;
1168: BEGIN
1169: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1170: G_PKG_NAME,
1171: p_init_msg_list,
1172: l_api_version,
1173: p_api_version,

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

1172: l_api_version,
1173: p_api_version,
1174: '_PVT',
1175: x_return_status);
1176: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1177: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1178: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1179: RAISE OKC_API.G_EXCEPTION_ERROR;
1180: END IF;

Line 1177: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1173: p_api_version,
1174: '_PVT',
1175: x_return_status);
1176: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1177: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1178: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1179: RAISE OKC_API.G_EXCEPTION_ERROR;
1180: END IF;
1181: l_rrdv_rec := null_out_defaults(p_rrdv_rec);

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

1174: '_PVT',
1175: x_return_status);
1176: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1177: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1178: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1179: RAISE OKC_API.G_EXCEPTION_ERROR;
1180: END IF;
1181: l_rrdv_rec := null_out_defaults(p_rrdv_rec);
1182: -- Set primary key value

Line 1179: RAISE OKC_API.G_EXCEPTION_ERROR;

1175: x_return_status);
1176: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1177: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1178: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1179: RAISE OKC_API.G_EXCEPTION_ERROR;
1180: END IF;
1181: l_rrdv_rec := null_out_defaults(p_rrdv_rec);
1182: -- Set primary key value
1183: l_rrdv_rec.ID := get_seq_id;

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

1185: l_return_status := Set_Attributes(
1186: l_rrdv_rec, -- IN
1187: l_def_rrdv_rec); -- OUT
1188: --- If any errors happen abort API
1189: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1190: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1191: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1192: RAISE OKC_API.G_EXCEPTION_ERROR;
1193: END IF;

Line 1190: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1186: l_rrdv_rec, -- IN
1187: l_def_rrdv_rec); -- OUT
1188: --- If any errors happen abort API
1189: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1190: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1191: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1192: RAISE OKC_API.G_EXCEPTION_ERROR;
1193: END IF;
1194: l_def_rrdv_rec := fill_who_columns(l_def_rrdv_rec);

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

1187: l_def_rrdv_rec); -- OUT
1188: --- If any errors happen abort API
1189: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1190: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1191: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1192: RAISE OKC_API.G_EXCEPTION_ERROR;
1193: END IF;
1194: l_def_rrdv_rec := fill_who_columns(l_def_rrdv_rec);
1195: --- Validate all non-missing attributes (Item Level Validation)

Line 1192: RAISE OKC_API.G_EXCEPTION_ERROR;

1188: --- If any errors happen abort API
1189: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1190: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1191: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1192: RAISE OKC_API.G_EXCEPTION_ERROR;
1193: END IF;
1194: l_def_rrdv_rec := fill_who_columns(l_def_rrdv_rec);
1195: --- Validate all non-missing attributes (Item Level Validation)
1196: l_return_status := Validate_Attributes(l_def_rrdv_rec);

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

1194: l_def_rrdv_rec := fill_who_columns(l_def_rrdv_rec);
1195: --- Validate all non-missing attributes (Item Level Validation)
1196: l_return_status := Validate_Attributes(l_def_rrdv_rec);
1197: --- If any errors happen abort API
1198: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1199: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1200: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1201: RAISE OKC_API.G_EXCEPTION_ERROR;
1202: END IF;

Line 1199: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1195: --- Validate all non-missing attributes (Item Level Validation)
1196: l_return_status := Validate_Attributes(l_def_rrdv_rec);
1197: --- If any errors happen abort API
1198: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1199: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1200: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1201: RAISE OKC_API.G_EXCEPTION_ERROR;
1202: END IF;
1203: l_return_status := Validate_Record(l_def_rrdv_rec);

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

1196: l_return_status := Validate_Attributes(l_def_rrdv_rec);
1197: --- If any errors happen abort API
1198: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1199: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1200: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1201: RAISE OKC_API.G_EXCEPTION_ERROR;
1202: END IF;
1203: l_return_status := Validate_Record(l_def_rrdv_rec);
1204: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1201: RAISE OKC_API.G_EXCEPTION_ERROR;

1197: --- If any errors happen abort API
1198: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1199: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1200: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1201: RAISE OKC_API.G_EXCEPTION_ERROR;
1202: END IF;
1203: l_return_status := Validate_Record(l_def_rrdv_rec);
1204: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1205: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

1200: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1201: RAISE OKC_API.G_EXCEPTION_ERROR;
1202: END IF;
1203: l_return_status := Validate_Record(l_def_rrdv_rec);
1204: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1205: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1206: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1207: RAISE OKC_API.G_EXCEPTION_ERROR;
1208: END IF;

Line 1205: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1201: RAISE OKC_API.G_EXCEPTION_ERROR;
1202: END IF;
1203: l_return_status := Validate_Record(l_def_rrdv_rec);
1204: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1205: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1206: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1207: RAISE OKC_API.G_EXCEPTION_ERROR;
1208: END IF;
1209: --------------------------------------

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

1202: END IF;
1203: l_return_status := Validate_Record(l_def_rrdv_rec);
1204: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1205: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1206: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1207: RAISE OKC_API.G_EXCEPTION_ERROR;
1208: END IF;
1209: --------------------------------------
1210: -- Move VIEW record to "Child" records

Line 1207: RAISE OKC_API.G_EXCEPTION_ERROR;

1203: l_return_status := Validate_Record(l_def_rrdv_rec);
1204: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1205: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1206: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1207: RAISE OKC_API.G_EXCEPTION_ERROR;
1208: END IF;
1209: --------------------------------------
1210: -- Move VIEW record to "Child" records
1211: --------------------------------------

Line 1224: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1220: x_msg_data,
1221: l_rrd_rec,
1222: lx_rrd_rec
1223: );
1224: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1225: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1226: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1227: RAISE OKC_API.G_EXCEPTION_ERROR;
1228: END IF;

Line 1225: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1221: l_rrd_rec,
1222: lx_rrd_rec
1223: );
1224: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1225: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1226: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1227: RAISE OKC_API.G_EXCEPTION_ERROR;
1228: END IF;
1229: migrate(lx_rrd_rec, l_def_rrdv_rec);

Line 1226: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1222: lx_rrd_rec
1223: );
1224: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1225: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1226: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1227: RAISE OKC_API.G_EXCEPTION_ERROR;
1228: END IF;
1229: migrate(lx_rrd_rec, l_def_rrdv_rec);
1230: -- Set OUT values

Line 1227: RAISE OKC_API.G_EXCEPTION_ERROR;

1223: );
1224: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1225: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1226: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1227: RAISE OKC_API.G_EXCEPTION_ERROR;
1228: END IF;
1229: migrate(lx_rrd_rec, l_def_rrdv_rec);
1230: -- Set OUT values
1231: x_rrdv_rec := l_def_rrdv_rec;

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

1228: END IF;
1229: migrate(lx_rrd_rec, l_def_rrdv_rec);
1230: -- Set OUT values
1231: x_rrdv_rec := l_def_rrdv_rec;
1232: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1233: EXCEPTION
1234: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1235: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1236: (

Line 1234: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1230: -- Set OUT values
1231: x_rrdv_rec := l_def_rrdv_rec;
1232: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1233: EXCEPTION
1234: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1235: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1236: (
1237: l_api_name,
1238: G_PKG_NAME,

Line 1235: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1231: x_rrdv_rec := l_def_rrdv_rec;
1232: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1233: EXCEPTION
1234: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1235: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1236: (
1237: l_api_name,
1238: G_PKG_NAME,
1239: 'OKC_API.G_RET_STS_ERROR',

Line 1239: 'OKC_API.G_RET_STS_ERROR',

1235: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1236: (
1237: l_api_name,
1238: G_PKG_NAME,
1239: 'OKC_API.G_RET_STS_ERROR',
1240: x_msg_count,
1241: x_msg_data,
1242: '_PVT'
1243: );

Line 1244: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1240: x_msg_count,
1241: x_msg_data,
1242: '_PVT'
1243: );
1244: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1245: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1246: (
1247: l_api_name,
1248: G_PKG_NAME,

Line 1245: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1241: x_msg_data,
1242: '_PVT'
1243: );
1244: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1245: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1246: (
1247: l_api_name,
1248: G_PKG_NAME,
1249: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1249: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1245: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1246: (
1247: l_api_name,
1248: G_PKG_NAME,
1249: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1250: x_msg_count,
1251: x_msg_data,
1252: '_PVT'
1253: );

Line 1255: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1251: x_msg_data,
1252: '_PVT'
1253: );
1254: WHEN OTHERS THEN
1255: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1256: (
1257: l_api_name,
1258: G_PKG_NAME,
1259: 'OTHERS',

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

1275: x_rrdv_tbl OUT NOCOPY rrdv_tbl_type) IS
1276:
1277: l_api_version CONSTANT NUMBER := 1;
1278: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1279: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1280: i NUMBER := 0;
1281: BEGIN
1282: OKC_API.init_msg_list(p_init_msg_list);
1283: -- Make sure PL/SQL table has records in it before passing

Line 1282: OKC_API.init_msg_list(p_init_msg_list);

1278: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1279: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1280: i NUMBER := 0;
1281: BEGIN
1282: OKC_API.init_msg_list(p_init_msg_list);
1283: -- Make sure PL/SQL table has records in it before passing
1284: IF (p_rrdv_tbl.COUNT > 0) THEN
1285: i := p_rrdv_tbl.FIRST;
1286: LOOP

Line 1289: p_init_msg_list => OKC_API.G_FALSE,

1285: i := p_rrdv_tbl.FIRST;
1286: LOOP
1287: insert_row (
1288: p_api_version => p_api_version,
1289: p_init_msg_list => OKC_API.G_FALSE,
1290: x_return_status => x_return_status,
1291: x_msg_count => x_msg_count,
1292: x_msg_data => x_msg_data,
1293: p_rrdv_rec => p_rrdv_tbl(i),

Line 1300: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1296: i := p_rrdv_tbl.NEXT(i);
1297: END LOOP;
1298: END IF;
1299: EXCEPTION
1300: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1301: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1302: (
1303: l_api_name,
1304: G_PKG_NAME,

Line 1301: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1297: END LOOP;
1298: END IF;
1299: EXCEPTION
1300: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1301: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1302: (
1303: l_api_name,
1304: G_PKG_NAME,
1305: 'OKC_API.G_RET_STS_ERROR',

Line 1305: 'OKC_API.G_RET_STS_ERROR',

1301: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1302: (
1303: l_api_name,
1304: G_PKG_NAME,
1305: 'OKC_API.G_RET_STS_ERROR',
1306: x_msg_count,
1307: x_msg_data,
1308: '_PVT'
1309: );

Line 1310: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1306: x_msg_count,
1307: x_msg_data,
1308: '_PVT'
1309: );
1310: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1311: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1312: (
1313: l_api_name,
1314: G_PKG_NAME,

Line 1311: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1307: x_msg_data,
1308: '_PVT'
1309: );
1310: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1311: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1312: (
1313: l_api_name,
1314: G_PKG_NAME,
1315: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1315: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1311: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1312: (
1313: l_api_name,
1314: G_PKG_NAME,
1315: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1316: x_msg_count,
1317: x_msg_data,
1318: '_PVT'
1319: );

Line 1321: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1317: x_msg_data,
1318: '_PVT'
1319: );
1320: WHEN OTHERS THEN
1321: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1322: (
1323: l_api_name,
1324: G_PKG_NAME,
1325: 'OTHERS',

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

1356: FROM OKC_RG_ROLE_DEFS
1357: WHERE ID = p_rrd_rec.id;
1358: l_api_version CONSTANT NUMBER := 1;
1359: l_api_name CONSTANT VARCHAR2(30) := 'DEFS_lock_row';
1360: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1361: l_object_version_number OKC_RG_ROLE_DEFS.OBJECT_VERSION_NUMBER%TYPE;
1362: lc_object_version_number OKC_RG_ROLE_DEFS.OBJECT_VERSION_NUMBER%TYPE;
1363: l_row_notfound BOOLEAN := FALSE;
1364: lc_row_notfound BOOLEAN := FALSE;

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

1362: lc_object_version_number OKC_RG_ROLE_DEFS.OBJECT_VERSION_NUMBER%TYPE;
1363: l_row_notfound BOOLEAN := FALSE;
1364: lc_row_notfound BOOLEAN := FALSE;
1365: BEGIN
1366: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1367: p_init_msg_list,
1368: '_PVT',
1369: x_return_status);
1370: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

1366: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1367: p_init_msg_list,
1368: '_PVT',
1369: x_return_status);
1370: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1371: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1372: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1373: RAISE OKC_API.G_EXCEPTION_ERROR;
1374: END IF;

Line 1371: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1367: p_init_msg_list,
1368: '_PVT',
1369: x_return_status);
1370: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1371: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1372: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1373: RAISE OKC_API.G_EXCEPTION_ERROR;
1374: END IF;
1375: BEGIN

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

1368: '_PVT',
1369: x_return_status);
1370: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1371: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1372: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1373: RAISE OKC_API.G_EXCEPTION_ERROR;
1374: END IF;
1375: BEGIN
1376: OPEN lock_csr(p_rrd_rec);

Line 1373: RAISE OKC_API.G_EXCEPTION_ERROR;

1369: x_return_status);
1370: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1371: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1372: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1373: RAISE OKC_API.G_EXCEPTION_ERROR;
1374: END IF;
1375: BEGIN
1376: OPEN lock_csr(p_rrd_rec);
1377: FETCH lock_csr INTO l_object_version_number;

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

1381: WHEN E_Resource_Busy THEN
1382: IF (lock_csr%ISOPEN) THEN
1383: CLOSE lock_csr;
1384: END IF;
1385: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
1386: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1387: END;
1388:
1389: IF ( l_row_notfound ) THEN

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

1392: lc_row_notfound := lchk_csr%NOTFOUND;
1393: CLOSE lchk_csr;
1394: END IF;
1395: IF (lc_row_notfound) THEN
1396: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1397: RAISE OKC_API.G_EXCEPTION_ERROR;
1398: ELSIF lc_object_version_number > p_rrd_rec.object_version_number THEN
1399: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1400: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1397: RAISE OKC_API.G_EXCEPTION_ERROR;

1393: CLOSE lchk_csr;
1394: END IF;
1395: IF (lc_row_notfound) THEN
1396: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1397: RAISE OKC_API.G_EXCEPTION_ERROR;
1398: ELSIF lc_object_version_number > p_rrd_rec.object_version_number THEN
1399: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1400: RAISE OKC_API.G_EXCEPTION_ERROR;
1401: ELSIF lc_object_version_number <> p_rrd_rec.object_version_number THEN

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

1395: IF (lc_row_notfound) THEN
1396: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1397: RAISE OKC_API.G_EXCEPTION_ERROR;
1398: ELSIF lc_object_version_number > p_rrd_rec.object_version_number THEN
1399: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1400: RAISE OKC_API.G_EXCEPTION_ERROR;
1401: ELSIF lc_object_version_number <> p_rrd_rec.object_version_number THEN
1402: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1403: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1400: RAISE OKC_API.G_EXCEPTION_ERROR;

1396: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1397: RAISE OKC_API.G_EXCEPTION_ERROR;
1398: ELSIF lc_object_version_number > p_rrd_rec.object_version_number THEN
1399: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1400: RAISE OKC_API.G_EXCEPTION_ERROR;
1401: ELSIF lc_object_version_number <> p_rrd_rec.object_version_number THEN
1402: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1403: RAISE OKC_API.G_EXCEPTION_ERROR;
1404: ELSIF lc_object_version_number = -1 THEN

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

1398: ELSIF lc_object_version_number > p_rrd_rec.object_version_number THEN
1399: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1400: RAISE OKC_API.G_EXCEPTION_ERROR;
1401: ELSIF lc_object_version_number <> p_rrd_rec.object_version_number THEN
1402: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1403: RAISE OKC_API.G_EXCEPTION_ERROR;
1404: ELSIF lc_object_version_number = -1 THEN
1405: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1406: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1403: RAISE OKC_API.G_EXCEPTION_ERROR;

1399: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1400: RAISE OKC_API.G_EXCEPTION_ERROR;
1401: ELSIF lc_object_version_number <> p_rrd_rec.object_version_number THEN
1402: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1403: RAISE OKC_API.G_EXCEPTION_ERROR;
1404: ELSIF lc_object_version_number = -1 THEN
1405: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1406: RAISE OKC_API.G_EXCEPTION_ERROR;
1407: END IF;

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

1401: ELSIF lc_object_version_number <> p_rrd_rec.object_version_number THEN
1402: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1403: RAISE OKC_API.G_EXCEPTION_ERROR;
1404: ELSIF lc_object_version_number = -1 THEN
1405: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1406: RAISE OKC_API.G_EXCEPTION_ERROR;
1407: END IF;
1408: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1409: EXCEPTION

Line 1406: RAISE OKC_API.G_EXCEPTION_ERROR;

1402: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1403: RAISE OKC_API.G_EXCEPTION_ERROR;
1404: ELSIF lc_object_version_number = -1 THEN
1405: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1406: RAISE OKC_API.G_EXCEPTION_ERROR;
1407: END IF;
1408: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1409: EXCEPTION
1410: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

1404: ELSIF lc_object_version_number = -1 THEN
1405: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1406: RAISE OKC_API.G_EXCEPTION_ERROR;
1407: END IF;
1408: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1409: EXCEPTION
1410: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1411: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1412: (

Line 1410: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1406: RAISE OKC_API.G_EXCEPTION_ERROR;
1407: END IF;
1408: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1409: EXCEPTION
1410: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1411: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1412: (
1413: l_api_name,
1414: G_PKG_NAME,

Line 1411: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1407: END IF;
1408: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1409: EXCEPTION
1410: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1411: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1412: (
1413: l_api_name,
1414: G_PKG_NAME,
1415: 'OKC_API.G_RET_STS_ERROR',

Line 1415: 'OKC_API.G_RET_STS_ERROR',

1411: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1412: (
1413: l_api_name,
1414: G_PKG_NAME,
1415: 'OKC_API.G_RET_STS_ERROR',
1416: x_msg_count,
1417: x_msg_data,
1418: '_PVT'
1419: );

Line 1420: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1416: x_msg_count,
1417: x_msg_data,
1418: '_PVT'
1419: );
1420: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1421: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1422: (
1423: l_api_name,
1424: G_PKG_NAME,

Line 1421: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1417: x_msg_data,
1418: '_PVT'
1419: );
1420: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1421: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1422: (
1423: l_api_name,
1424: G_PKG_NAME,
1425: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1425: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1421: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1422: (
1423: l_api_name,
1424: G_PKG_NAME,
1425: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1426: x_msg_count,
1427: x_msg_data,
1428: '_PVT'
1429: );

Line 1431: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1427: x_msg_data,
1428: '_PVT'
1429: );
1430: WHEN OTHERS THEN
1431: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1432: (
1433: l_api_name,
1434: G_PKG_NAME,
1435: 'OTHERS',

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

1450: p_rrdv_rec IN rrdv_rec_type) IS
1451:
1452: l_api_version CONSTANT NUMBER := 1;
1453: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1454: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1455: l_rrd_rec rrd_rec_type;
1456: BEGIN
1457: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1458: G_PKG_NAME,

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

1453: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1454: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1455: l_rrd_rec rrd_rec_type;
1456: BEGIN
1457: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1458: G_PKG_NAME,
1459: p_init_msg_list,
1460: l_api_version,
1461: p_api_version,

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

1460: l_api_version,
1461: p_api_version,
1462: '_PVT',
1463: x_return_status);
1464: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1465: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1466: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1467: RAISE OKC_API.G_EXCEPTION_ERROR;
1468: END IF;

Line 1465: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1461: p_api_version,
1462: '_PVT',
1463: x_return_status);
1464: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1465: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1466: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1467: RAISE OKC_API.G_EXCEPTION_ERROR;
1468: END IF;
1469: --------------------------------------

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

1462: '_PVT',
1463: x_return_status);
1464: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1465: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1466: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1467: RAISE OKC_API.G_EXCEPTION_ERROR;
1468: END IF;
1469: --------------------------------------
1470: -- Move VIEW record to "Child" records

Line 1467: RAISE OKC_API.G_EXCEPTION_ERROR;

1463: x_return_status);
1464: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1465: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1466: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1467: RAISE OKC_API.G_EXCEPTION_ERROR;
1468: END IF;
1469: --------------------------------------
1470: -- Move VIEW record to "Child" records
1471: --------------------------------------

Line 1483: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1479: x_msg_count,
1480: x_msg_data,
1481: l_rrd_rec
1482: );
1483: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1484: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1485: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1486: RAISE OKC_API.G_EXCEPTION_ERROR;
1487: END IF;

Line 1484: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1480: x_msg_data,
1481: l_rrd_rec
1482: );
1483: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1484: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1485: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1486: RAISE OKC_API.G_EXCEPTION_ERROR;
1487: END IF;
1488: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1485: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1481: l_rrd_rec
1482: );
1483: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1484: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1485: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1486: RAISE OKC_API.G_EXCEPTION_ERROR;
1487: END IF;
1488: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1489: EXCEPTION

Line 1486: RAISE OKC_API.G_EXCEPTION_ERROR;

1482: );
1483: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1484: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1485: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1486: RAISE OKC_API.G_EXCEPTION_ERROR;
1487: END IF;
1488: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1489: EXCEPTION
1490: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

1484: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1485: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1486: RAISE OKC_API.G_EXCEPTION_ERROR;
1487: END IF;
1488: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1489: EXCEPTION
1490: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1491: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1492: (

Line 1490: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1486: RAISE OKC_API.G_EXCEPTION_ERROR;
1487: END IF;
1488: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1489: EXCEPTION
1490: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1491: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1492: (
1493: l_api_name,
1494: G_PKG_NAME,

Line 1491: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1487: END IF;
1488: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1489: EXCEPTION
1490: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1491: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1492: (
1493: l_api_name,
1494: G_PKG_NAME,
1495: 'OKC_API.G_RET_STS_ERROR',

Line 1495: 'OKC_API.G_RET_STS_ERROR',

1491: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1492: (
1493: l_api_name,
1494: G_PKG_NAME,
1495: 'OKC_API.G_RET_STS_ERROR',
1496: x_msg_count,
1497: x_msg_data,
1498: '_PVT'
1499: );

Line 1500: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1496: x_msg_count,
1497: x_msg_data,
1498: '_PVT'
1499: );
1500: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1501: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1502: (
1503: l_api_name,
1504: G_PKG_NAME,

Line 1501: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1497: x_msg_data,
1498: '_PVT'
1499: );
1500: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1501: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1502: (
1503: l_api_name,
1504: G_PKG_NAME,
1505: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1505: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1501: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1502: (
1503: l_api_name,
1504: G_PKG_NAME,
1505: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1506: x_msg_count,
1507: x_msg_data,
1508: '_PVT'
1509: );

Line 1511: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

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

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

1530: p_rrdv_tbl IN rrdv_tbl_type) IS
1531:
1532: l_api_version CONSTANT NUMBER := 1;
1533: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1534: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1535: i NUMBER := 0;
1536: BEGIN
1537: OKC_API.init_msg_list(p_init_msg_list);
1538: -- Make sure PL/SQL table has records in it before passing

Line 1537: OKC_API.init_msg_list(p_init_msg_list);

1533: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1534: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1535: i NUMBER := 0;
1536: BEGIN
1537: OKC_API.init_msg_list(p_init_msg_list);
1538: -- Make sure PL/SQL table has records in it before passing
1539: IF (p_rrdv_tbl.COUNT > 0) THEN
1540: i := p_rrdv_tbl.FIRST;
1541: LOOP

Line 1544: p_init_msg_list => OKC_API.G_FALSE,

1540: i := p_rrdv_tbl.FIRST;
1541: LOOP
1542: lock_row (
1543: p_api_version => p_api_version,
1544: p_init_msg_list => OKC_API.G_FALSE,
1545: x_return_status => x_return_status,
1546: x_msg_count => x_msg_count,
1547: x_msg_data => x_msg_data,
1548: p_rrdv_rec => p_rrdv_tbl(i));

Line 1554: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1550: i := p_rrdv_tbl.NEXT(i);
1551: END LOOP;
1552: END IF;
1553: EXCEPTION
1554: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1555: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1556: (
1557: l_api_name,
1558: G_PKG_NAME,

Line 1555: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1551: END LOOP;
1552: END IF;
1553: EXCEPTION
1554: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1555: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1556: (
1557: l_api_name,
1558: G_PKG_NAME,
1559: 'OKC_API.G_RET_STS_ERROR',

Line 1559: 'OKC_API.G_RET_STS_ERROR',

1555: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1556: (
1557: l_api_name,
1558: G_PKG_NAME,
1559: 'OKC_API.G_RET_STS_ERROR',
1560: x_msg_count,
1561: x_msg_data,
1562: '_PVT'
1563: );

Line 1564: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1560: x_msg_count,
1561: x_msg_data,
1562: '_PVT'
1563: );
1564: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1565: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1566: (
1567: l_api_name,
1568: G_PKG_NAME,

Line 1565: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1561: x_msg_data,
1562: '_PVT'
1563: );
1564: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1565: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1566: (
1567: l_api_name,
1568: G_PKG_NAME,
1569: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1569: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1565: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1566: (
1567: l_api_name,
1568: G_PKG_NAME,
1569: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1570: x_msg_count,
1571: x_msg_data,
1572: '_PVT'
1573: );

Line 1575: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1571: x_msg_data,
1572: '_PVT'
1573: );
1574: WHEN OTHERS THEN
1575: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1576: (
1577: l_api_name,
1578: G_PKG_NAME,
1579: 'OTHERS',

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

1598: x_rrd_rec OUT NOCOPY rrd_rec_type) IS
1599:
1600: l_api_version CONSTANT NUMBER := 1;
1601: l_api_name CONSTANT VARCHAR2(30) := 'DEFS_update_row';
1602: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1603: l_rrd_rec rrd_rec_type := p_rrd_rec;
1604: l_def_rrd_rec rrd_rec_type;
1605: l_row_notfound BOOLEAN := TRUE;
1606: ----------------------------------

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

1611: x_rrd_rec OUT NOCOPY rrd_rec_type
1612: ) RETURN VARCHAR2 IS
1613: l_rrd_rec rrd_rec_type;
1614: l_row_notfound BOOLEAN := TRUE;
1615: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1616: BEGIN
1617: x_rrd_rec := p_rrd_rec;
1618: -- Get current database values
1619: l_rrd_rec := get_rec(p_rrd_rec, l_row_notfound);

Line 1621: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1617: x_rrd_rec := p_rrd_rec;
1618: -- Get current database values
1619: l_rrd_rec := get_rec(p_rrd_rec, l_row_notfound);
1620: IF (l_row_notfound) THEN
1621: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1622: END IF;
1623: IF (x_rrd_rec.id = OKC_API.G_MISS_NUM)
1624: THEN
1625: x_rrd_rec.id := l_rrd_rec.id;

Line 1623: IF (x_rrd_rec.id = OKC_API.G_MISS_NUM)

1619: l_rrd_rec := get_rec(p_rrd_rec, l_row_notfound);
1620: IF (l_row_notfound) THEN
1621: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1622: END IF;
1623: IF (x_rrd_rec.id = OKC_API.G_MISS_NUM)
1624: THEN
1625: x_rrd_rec.id := l_rrd_rec.id;
1626: END IF;
1627: IF (x_rrd_rec.srd_id = OKC_API.G_MISS_NUM)

Line 1627: IF (x_rrd_rec.srd_id = OKC_API.G_MISS_NUM)

1623: IF (x_rrd_rec.id = OKC_API.G_MISS_NUM)
1624: THEN
1625: x_rrd_rec.id := l_rrd_rec.id;
1626: END IF;
1627: IF (x_rrd_rec.srd_id = OKC_API.G_MISS_NUM)
1628: THEN
1629: x_rrd_rec.srd_id := l_rrd_rec.srd_id;
1630: END IF;
1631: IF (x_rrd_rec.sre_id = OKC_API.G_MISS_NUM)

Line 1631: IF (x_rrd_rec.sre_id = OKC_API.G_MISS_NUM)

1627: IF (x_rrd_rec.srd_id = OKC_API.G_MISS_NUM)
1628: THEN
1629: x_rrd_rec.srd_id := l_rrd_rec.srd_id;
1630: END IF;
1631: IF (x_rrd_rec.sre_id = OKC_API.G_MISS_NUM)
1632: THEN
1633: x_rrd_rec.sre_id := l_rrd_rec.sre_id;
1634: END IF;
1635: IF (x_rrd_rec.object_version_number = OKC_API.G_MISS_NUM)

Line 1635: IF (x_rrd_rec.object_version_number = OKC_API.G_MISS_NUM)

1631: IF (x_rrd_rec.sre_id = OKC_API.G_MISS_NUM)
1632: THEN
1633: x_rrd_rec.sre_id := l_rrd_rec.sre_id;
1634: END IF;
1635: IF (x_rrd_rec.object_version_number = OKC_API.G_MISS_NUM)
1636: THEN
1637: x_rrd_rec.object_version_number := l_rrd_rec.object_version_number;
1638: END IF;
1639: IF (x_rrd_rec.created_by = OKC_API.G_MISS_NUM)

Line 1639: IF (x_rrd_rec.created_by = OKC_API.G_MISS_NUM)

1635: IF (x_rrd_rec.object_version_number = OKC_API.G_MISS_NUM)
1636: THEN
1637: x_rrd_rec.object_version_number := l_rrd_rec.object_version_number;
1638: END IF;
1639: IF (x_rrd_rec.created_by = OKC_API.G_MISS_NUM)
1640: THEN
1641: x_rrd_rec.created_by := l_rrd_rec.created_by;
1642: END IF;
1643: IF (x_rrd_rec.creation_date = OKC_API.G_MISS_DATE)

Line 1643: IF (x_rrd_rec.creation_date = OKC_API.G_MISS_DATE)

1639: IF (x_rrd_rec.created_by = OKC_API.G_MISS_NUM)
1640: THEN
1641: x_rrd_rec.created_by := l_rrd_rec.created_by;
1642: END IF;
1643: IF (x_rrd_rec.creation_date = OKC_API.G_MISS_DATE)
1644: THEN
1645: x_rrd_rec.creation_date := l_rrd_rec.creation_date;
1646: END IF;
1647: IF (x_rrd_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 1647: IF (x_rrd_rec.last_updated_by = OKC_API.G_MISS_NUM)

1643: IF (x_rrd_rec.creation_date = OKC_API.G_MISS_DATE)
1644: THEN
1645: x_rrd_rec.creation_date := l_rrd_rec.creation_date;
1646: END IF;
1647: IF (x_rrd_rec.last_updated_by = OKC_API.G_MISS_NUM)
1648: THEN
1649: x_rrd_rec.last_updated_by := l_rrd_rec.last_updated_by;
1650: END IF;
1651: IF (x_rrd_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 1651: IF (x_rrd_rec.last_update_date = OKC_API.G_MISS_DATE)

1647: IF (x_rrd_rec.last_updated_by = OKC_API.G_MISS_NUM)
1648: THEN
1649: x_rrd_rec.last_updated_by := l_rrd_rec.last_updated_by;
1650: END IF;
1651: IF (x_rrd_rec.last_update_date = OKC_API.G_MISS_DATE)
1652: THEN
1653: x_rrd_rec.last_update_date := l_rrd_rec.last_update_date;
1654: END IF;
1655: IF (x_rrd_rec.subject_object_flag = OKC_API.G_MISS_CHAR)

Line 1655: IF (x_rrd_rec.subject_object_flag = OKC_API.G_MISS_CHAR)

1651: IF (x_rrd_rec.last_update_date = OKC_API.G_MISS_DATE)
1652: THEN
1653: x_rrd_rec.last_update_date := l_rrd_rec.last_update_date;
1654: END IF;
1655: IF (x_rrd_rec.subject_object_flag = OKC_API.G_MISS_CHAR)
1656: THEN
1657: x_rrd_rec.subject_object_flag := l_rrd_rec.subject_object_flag;
1658: END IF;
1659: IF (x_rrd_rec.optional_yn = OKC_API.G_MISS_CHAR)

Line 1659: IF (x_rrd_rec.optional_yn = OKC_API.G_MISS_CHAR)

1655: IF (x_rrd_rec.subject_object_flag = OKC_API.G_MISS_CHAR)
1656: THEN
1657: x_rrd_rec.subject_object_flag := l_rrd_rec.subject_object_flag;
1658: END IF;
1659: IF (x_rrd_rec.optional_yn = OKC_API.G_MISS_CHAR)
1660: THEN
1661: x_rrd_rec.optional_yn := l_rrd_rec.optional_yn;
1662: END IF;
1663: IF (x_rrd_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 1663: IF (x_rrd_rec.last_update_login = OKC_API.G_MISS_NUM)

1659: IF (x_rrd_rec.optional_yn = OKC_API.G_MISS_CHAR)
1660: THEN
1661: x_rrd_rec.optional_yn := l_rrd_rec.optional_yn;
1662: END IF;
1663: IF (x_rrd_rec.last_update_login = OKC_API.G_MISS_NUM)
1664: THEN
1665: x_rrd_rec.last_update_login := l_rrd_rec.last_update_login;
1666: END IF;
1667: IF (x_rrd_rec.attribute_category = OKC_API.G_MISS_CHAR)

Line 1667: IF (x_rrd_rec.attribute_category = OKC_API.G_MISS_CHAR)

1663: IF (x_rrd_rec.last_update_login = OKC_API.G_MISS_NUM)
1664: THEN
1665: x_rrd_rec.last_update_login := l_rrd_rec.last_update_login;
1666: END IF;
1667: IF (x_rrd_rec.attribute_category = OKC_API.G_MISS_CHAR)
1668: THEN
1669: x_rrd_rec.attribute_category := l_rrd_rec.attribute_category;
1670: END IF;
1671: IF (x_rrd_rec.attribute1 = OKC_API.G_MISS_CHAR)

Line 1671: IF (x_rrd_rec.attribute1 = OKC_API.G_MISS_CHAR)

1667: IF (x_rrd_rec.attribute_category = OKC_API.G_MISS_CHAR)
1668: THEN
1669: x_rrd_rec.attribute_category := l_rrd_rec.attribute_category;
1670: END IF;
1671: IF (x_rrd_rec.attribute1 = OKC_API.G_MISS_CHAR)
1672: THEN
1673: x_rrd_rec.attribute1 := l_rrd_rec.attribute1;
1674: END IF;
1675: IF (x_rrd_rec.attribute2 = OKC_API.G_MISS_CHAR)

Line 1675: IF (x_rrd_rec.attribute2 = OKC_API.G_MISS_CHAR)

1671: IF (x_rrd_rec.attribute1 = OKC_API.G_MISS_CHAR)
1672: THEN
1673: x_rrd_rec.attribute1 := l_rrd_rec.attribute1;
1674: END IF;
1675: IF (x_rrd_rec.attribute2 = OKC_API.G_MISS_CHAR)
1676: THEN
1677: x_rrd_rec.attribute2 := l_rrd_rec.attribute2;
1678: END IF;
1679: IF (x_rrd_rec.attribute3 = OKC_API.G_MISS_CHAR)

Line 1679: IF (x_rrd_rec.attribute3 = OKC_API.G_MISS_CHAR)

1675: IF (x_rrd_rec.attribute2 = OKC_API.G_MISS_CHAR)
1676: THEN
1677: x_rrd_rec.attribute2 := l_rrd_rec.attribute2;
1678: END IF;
1679: IF (x_rrd_rec.attribute3 = OKC_API.G_MISS_CHAR)
1680: THEN
1681: x_rrd_rec.attribute3 := l_rrd_rec.attribute3;
1682: END IF;
1683: IF (x_rrd_rec.attribute4 = OKC_API.G_MISS_CHAR)

Line 1683: IF (x_rrd_rec.attribute4 = OKC_API.G_MISS_CHAR)

1679: IF (x_rrd_rec.attribute3 = OKC_API.G_MISS_CHAR)
1680: THEN
1681: x_rrd_rec.attribute3 := l_rrd_rec.attribute3;
1682: END IF;
1683: IF (x_rrd_rec.attribute4 = OKC_API.G_MISS_CHAR)
1684: THEN
1685: x_rrd_rec.attribute4 := l_rrd_rec.attribute4;
1686: END IF;
1687: IF (x_rrd_rec.attribute5 = OKC_API.G_MISS_CHAR)

Line 1687: IF (x_rrd_rec.attribute5 = OKC_API.G_MISS_CHAR)

1683: IF (x_rrd_rec.attribute4 = OKC_API.G_MISS_CHAR)
1684: THEN
1685: x_rrd_rec.attribute4 := l_rrd_rec.attribute4;
1686: END IF;
1687: IF (x_rrd_rec.attribute5 = OKC_API.G_MISS_CHAR)
1688: THEN
1689: x_rrd_rec.attribute5 := l_rrd_rec.attribute5;
1690: END IF;
1691: IF (x_rrd_rec.attribute6 = OKC_API.G_MISS_CHAR)

Line 1691: IF (x_rrd_rec.attribute6 = OKC_API.G_MISS_CHAR)

1687: IF (x_rrd_rec.attribute5 = OKC_API.G_MISS_CHAR)
1688: THEN
1689: x_rrd_rec.attribute5 := l_rrd_rec.attribute5;
1690: END IF;
1691: IF (x_rrd_rec.attribute6 = OKC_API.G_MISS_CHAR)
1692: THEN
1693: x_rrd_rec.attribute6 := l_rrd_rec.attribute6;
1694: END IF;
1695: IF (x_rrd_rec.attribute7 = OKC_API.G_MISS_CHAR)

Line 1695: IF (x_rrd_rec.attribute7 = OKC_API.G_MISS_CHAR)

1691: IF (x_rrd_rec.attribute6 = OKC_API.G_MISS_CHAR)
1692: THEN
1693: x_rrd_rec.attribute6 := l_rrd_rec.attribute6;
1694: END IF;
1695: IF (x_rrd_rec.attribute7 = OKC_API.G_MISS_CHAR)
1696: THEN
1697: x_rrd_rec.attribute7 := l_rrd_rec.attribute7;
1698: END IF;
1699: IF (x_rrd_rec.attribute8 = OKC_API.G_MISS_CHAR)

Line 1699: IF (x_rrd_rec.attribute8 = OKC_API.G_MISS_CHAR)

1695: IF (x_rrd_rec.attribute7 = OKC_API.G_MISS_CHAR)
1696: THEN
1697: x_rrd_rec.attribute7 := l_rrd_rec.attribute7;
1698: END IF;
1699: IF (x_rrd_rec.attribute8 = OKC_API.G_MISS_CHAR)
1700: THEN
1701: x_rrd_rec.attribute8 := l_rrd_rec.attribute8;
1702: END IF;
1703: IF (x_rrd_rec.attribute9 = OKC_API.G_MISS_CHAR)

Line 1703: IF (x_rrd_rec.attribute9 = OKC_API.G_MISS_CHAR)

1699: IF (x_rrd_rec.attribute8 = OKC_API.G_MISS_CHAR)
1700: THEN
1701: x_rrd_rec.attribute8 := l_rrd_rec.attribute8;
1702: END IF;
1703: IF (x_rrd_rec.attribute9 = OKC_API.G_MISS_CHAR)
1704: THEN
1705: x_rrd_rec.attribute9 := l_rrd_rec.attribute9;
1706: END IF;
1707: IF (x_rrd_rec.attribute10 = OKC_API.G_MISS_CHAR)

Line 1707: IF (x_rrd_rec.attribute10 = OKC_API.G_MISS_CHAR)

1703: IF (x_rrd_rec.attribute9 = OKC_API.G_MISS_CHAR)
1704: THEN
1705: x_rrd_rec.attribute9 := l_rrd_rec.attribute9;
1706: END IF;
1707: IF (x_rrd_rec.attribute10 = OKC_API.G_MISS_CHAR)
1708: THEN
1709: x_rrd_rec.attribute10 := l_rrd_rec.attribute10;
1710: END IF;
1711: IF (x_rrd_rec.attribute11 = OKC_API.G_MISS_CHAR)

Line 1711: IF (x_rrd_rec.attribute11 = OKC_API.G_MISS_CHAR)

1707: IF (x_rrd_rec.attribute10 = OKC_API.G_MISS_CHAR)
1708: THEN
1709: x_rrd_rec.attribute10 := l_rrd_rec.attribute10;
1710: END IF;
1711: IF (x_rrd_rec.attribute11 = OKC_API.G_MISS_CHAR)
1712: THEN
1713: x_rrd_rec.attribute11 := l_rrd_rec.attribute11;
1714: END IF;
1715: IF (x_rrd_rec.attribute12 = OKC_API.G_MISS_CHAR)

Line 1715: IF (x_rrd_rec.attribute12 = OKC_API.G_MISS_CHAR)

1711: IF (x_rrd_rec.attribute11 = OKC_API.G_MISS_CHAR)
1712: THEN
1713: x_rrd_rec.attribute11 := l_rrd_rec.attribute11;
1714: END IF;
1715: IF (x_rrd_rec.attribute12 = OKC_API.G_MISS_CHAR)
1716: THEN
1717: x_rrd_rec.attribute12 := l_rrd_rec.attribute12;
1718: END IF;
1719: IF (x_rrd_rec.attribute13 = OKC_API.G_MISS_CHAR)

Line 1719: IF (x_rrd_rec.attribute13 = OKC_API.G_MISS_CHAR)

1715: IF (x_rrd_rec.attribute12 = OKC_API.G_MISS_CHAR)
1716: THEN
1717: x_rrd_rec.attribute12 := l_rrd_rec.attribute12;
1718: END IF;
1719: IF (x_rrd_rec.attribute13 = OKC_API.G_MISS_CHAR)
1720: THEN
1721: x_rrd_rec.attribute13 := l_rrd_rec.attribute13;
1722: END IF;
1723: IF (x_rrd_rec.attribute14 = OKC_API.G_MISS_CHAR)

Line 1723: IF (x_rrd_rec.attribute14 = OKC_API.G_MISS_CHAR)

1719: IF (x_rrd_rec.attribute13 = OKC_API.G_MISS_CHAR)
1720: THEN
1721: x_rrd_rec.attribute13 := l_rrd_rec.attribute13;
1722: END IF;
1723: IF (x_rrd_rec.attribute14 = OKC_API.G_MISS_CHAR)
1724: THEN
1725: x_rrd_rec.attribute14 := l_rrd_rec.attribute14;
1726: END IF;
1727: IF (x_rrd_rec.attribute15 = OKC_API.G_MISS_CHAR)

Line 1727: IF (x_rrd_rec.attribute15 = OKC_API.G_MISS_CHAR)

1723: IF (x_rrd_rec.attribute14 = OKC_API.G_MISS_CHAR)
1724: THEN
1725: x_rrd_rec.attribute14 := l_rrd_rec.attribute14;
1726: END IF;
1727: IF (x_rrd_rec.attribute15 = OKC_API.G_MISS_CHAR)
1728: THEN
1729: x_rrd_rec.attribute15 := l_rrd_rec.attribute15;
1730: END IF;
1731: IF (x_rrd_rec.access_level = OKC_API.G_MISS_CHAR)

Line 1731: IF (x_rrd_rec.access_level = OKC_API.G_MISS_CHAR)

1727: IF (x_rrd_rec.attribute15 = OKC_API.G_MISS_CHAR)
1728: THEN
1729: x_rrd_rec.attribute15 := l_rrd_rec.attribute15;
1730: END IF;
1731: IF (x_rrd_rec.access_level = OKC_API.G_MISS_CHAR)
1732: THEN
1733: x_rrd_rec.access_level := l_rrd_rec.access_level;
1734: END IF;
1735: RETURN(l_return_status);

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

1740: FUNCTION Set_Attributes (
1741: p_rrd_rec IN rrd_rec_type,
1742: x_rrd_rec OUT NOCOPY rrd_rec_type
1743: ) RETURN VARCHAR2 IS
1744: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1745: BEGIN
1746: x_rrd_rec := p_rrd_rec;
1747: RETURN(l_return_status);
1748: END Set_Attributes;

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

1746: x_rrd_rec := p_rrd_rec;
1747: RETURN(l_return_status);
1748: END Set_Attributes;
1749: BEGIN
1750: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1751: p_init_msg_list,
1752: '_PVT',
1753: x_return_status);
1754: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

1750: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1751: p_init_msg_list,
1752: '_PVT',
1753: x_return_status);
1754: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1755: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1756: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1757: RAISE OKC_API.G_EXCEPTION_ERROR;
1758: END IF;

Line 1755: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1751: p_init_msg_list,
1752: '_PVT',
1753: x_return_status);
1754: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1755: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1756: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1757: RAISE OKC_API.G_EXCEPTION_ERROR;
1758: END IF;
1759: --- Setting item attributes

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

1752: '_PVT',
1753: x_return_status);
1754: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1755: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1756: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1757: RAISE OKC_API.G_EXCEPTION_ERROR;
1758: END IF;
1759: --- Setting item attributes
1760: l_return_status := Set_Attributes(

Line 1757: RAISE OKC_API.G_EXCEPTION_ERROR;

1753: x_return_status);
1754: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1755: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1756: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1757: RAISE OKC_API.G_EXCEPTION_ERROR;
1758: END IF;
1759: --- Setting item attributes
1760: l_return_status := Set_Attributes(
1761: p_rrd_rec, -- IN

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

1760: l_return_status := Set_Attributes(
1761: p_rrd_rec, -- IN
1762: l_rrd_rec); -- OUT
1763: --- If any errors happen abort API
1764: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1765: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1766: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1767: RAISE OKC_API.G_EXCEPTION_ERROR;
1768: END IF;

Line 1765: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1761: p_rrd_rec, -- IN
1762: l_rrd_rec); -- OUT
1763: --- If any errors happen abort API
1764: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1765: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1766: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1767: RAISE OKC_API.G_EXCEPTION_ERROR;
1768: END IF;
1769: l_return_status := populate_new_record(l_rrd_rec, l_def_rrd_rec);

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

1762: l_rrd_rec); -- OUT
1763: --- If any errors happen abort API
1764: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1765: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1766: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1767: RAISE OKC_API.G_EXCEPTION_ERROR;
1768: END IF;
1769: l_return_status := populate_new_record(l_rrd_rec, l_def_rrd_rec);
1770: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1767: RAISE OKC_API.G_EXCEPTION_ERROR;

1763: --- If any errors happen abort API
1764: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1765: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1766: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1767: RAISE OKC_API.G_EXCEPTION_ERROR;
1768: END IF;
1769: l_return_status := populate_new_record(l_rrd_rec, l_def_rrd_rec);
1770: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1771: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

1766: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1767: RAISE OKC_API.G_EXCEPTION_ERROR;
1768: END IF;
1769: l_return_status := populate_new_record(l_rrd_rec, l_def_rrd_rec);
1770: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1771: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1772: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1773: RAISE OKC_API.G_EXCEPTION_ERROR;
1774: END IF;

Line 1771: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1767: RAISE OKC_API.G_EXCEPTION_ERROR;
1768: END IF;
1769: l_return_status := populate_new_record(l_rrd_rec, l_def_rrd_rec);
1770: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1771: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1772: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1773: RAISE OKC_API.G_EXCEPTION_ERROR;
1774: END IF;
1775: UPDATE OKC_RG_ROLE_DEFS

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

1768: END IF;
1769: l_return_status := populate_new_record(l_rrd_rec, l_def_rrd_rec);
1770: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1771: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1772: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1773: RAISE OKC_API.G_EXCEPTION_ERROR;
1774: END IF;
1775: UPDATE OKC_RG_ROLE_DEFS
1776: SET SRD_ID = l_def_rrd_rec.srd_id,

Line 1773: RAISE OKC_API.G_EXCEPTION_ERROR;

1769: l_return_status := populate_new_record(l_rrd_rec, l_def_rrd_rec);
1770: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1771: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1772: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1773: RAISE OKC_API.G_EXCEPTION_ERROR;
1774: END IF;
1775: UPDATE OKC_RG_ROLE_DEFS
1776: SET SRD_ID = l_def_rrd_rec.srd_id,
1777: SRE_ID = l_def_rrd_rec.sre_id,

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

1802: ACCESS_LEVEL = l_def_rrd_rec.access_level
1803: WHERE ID = l_def_rrd_rec.id;
1804:
1805: x_rrd_rec := l_def_rrd_rec;
1806: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1807: EXCEPTION
1808: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1809: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1810: (

Line 1808: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1804:
1805: x_rrd_rec := l_def_rrd_rec;
1806: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1807: EXCEPTION
1808: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1809: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1810: (
1811: l_api_name,
1812: G_PKG_NAME,

Line 1809: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1805: x_rrd_rec := l_def_rrd_rec;
1806: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1807: EXCEPTION
1808: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1809: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1810: (
1811: l_api_name,
1812: G_PKG_NAME,
1813: 'OKC_API.G_RET_STS_ERROR',

Line 1813: 'OKC_API.G_RET_STS_ERROR',

1809: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1810: (
1811: l_api_name,
1812: G_PKG_NAME,
1813: 'OKC_API.G_RET_STS_ERROR',
1814: x_msg_count,
1815: x_msg_data,
1816: '_PVT'
1817: );

Line 1818: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1814: x_msg_count,
1815: x_msg_data,
1816: '_PVT'
1817: );
1818: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1819: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1820: (
1821: l_api_name,
1822: G_PKG_NAME,

Line 1819: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1815: x_msg_data,
1816: '_PVT'
1817: );
1818: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1819: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1820: (
1821: l_api_name,
1822: G_PKG_NAME,
1823: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1823: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1819: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1820: (
1821: l_api_name,
1822: G_PKG_NAME,
1823: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1824: x_msg_count,
1825: x_msg_data,
1826: '_PVT'
1827: );

Line 1829: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1825: x_msg_data,
1826: '_PVT'
1827: );
1828: WHEN OTHERS THEN
1829: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1830: (
1831: l_api_name,
1832: G_PKG_NAME,
1833: 'OTHERS',

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

1849: x_rrdv_rec OUT NOCOPY rrdv_rec_type) IS
1850:
1851: l_api_version CONSTANT NUMBER := 1;
1852: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
1853: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1854: l_rrdv_rec rrdv_rec_type := p_rrdv_rec;
1855: l_def_rrdv_rec rrdv_rec_type;
1856: l_rrd_rec rrd_rec_type;
1857: lx_rrd_rec rrd_rec_type;

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

1876: x_rrdv_rec OUT NOCOPY rrdv_rec_type
1877: ) RETURN VARCHAR2 IS
1878: l_rrdv_rec rrdv_rec_type;
1879: l_row_notfound BOOLEAN := TRUE;
1880: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1881: BEGIN
1882: x_rrdv_rec := p_rrdv_rec;
1883: -- Get current database values
1884: l_rrdv_rec := get_rec(p_rrdv_rec, l_row_notfound);

Line 1886: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1882: x_rrdv_rec := p_rrdv_rec;
1883: -- Get current database values
1884: l_rrdv_rec := get_rec(p_rrdv_rec, l_row_notfound);
1885: IF (l_row_notfound) THEN
1886: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1887: END IF;
1888: IF (x_rrdv_rec.id = OKC_API.G_MISS_NUM)
1889: THEN
1890: x_rrdv_rec.id := l_rrdv_rec.id;

Line 1888: IF (x_rrdv_rec.id = OKC_API.G_MISS_NUM)

1884: l_rrdv_rec := get_rec(p_rrdv_rec, l_row_notfound);
1885: IF (l_row_notfound) THEN
1886: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1887: END IF;
1888: IF (x_rrdv_rec.id = OKC_API.G_MISS_NUM)
1889: THEN
1890: x_rrdv_rec.id := l_rrdv_rec.id;
1891: END IF;
1892: IF (x_rrdv_rec.object_version_number = OKC_API.G_MISS_NUM)

Line 1892: IF (x_rrdv_rec.object_version_number = OKC_API.G_MISS_NUM)

1888: IF (x_rrdv_rec.id = OKC_API.G_MISS_NUM)
1889: THEN
1890: x_rrdv_rec.id := l_rrdv_rec.id;
1891: END IF;
1892: IF (x_rrdv_rec.object_version_number = OKC_API.G_MISS_NUM)
1893: THEN
1894: x_rrdv_rec.object_version_number := l_rrdv_rec.object_version_number;
1895: END IF;
1896: IF (x_rrdv_rec.srd_id = OKC_API.G_MISS_NUM)

Line 1896: IF (x_rrdv_rec.srd_id = OKC_API.G_MISS_NUM)

1892: IF (x_rrdv_rec.object_version_number = OKC_API.G_MISS_NUM)
1893: THEN
1894: x_rrdv_rec.object_version_number := l_rrdv_rec.object_version_number;
1895: END IF;
1896: IF (x_rrdv_rec.srd_id = OKC_API.G_MISS_NUM)
1897: THEN
1898: x_rrdv_rec.srd_id := l_rrdv_rec.srd_id;
1899: END IF;
1900: IF (x_rrdv_rec.sre_id = OKC_API.G_MISS_NUM)

Line 1900: IF (x_rrdv_rec.sre_id = OKC_API.G_MISS_NUM)

1896: IF (x_rrdv_rec.srd_id = OKC_API.G_MISS_NUM)
1897: THEN
1898: x_rrdv_rec.srd_id := l_rrdv_rec.srd_id;
1899: END IF;
1900: IF (x_rrdv_rec.sre_id = OKC_API.G_MISS_NUM)
1901: THEN
1902: x_rrdv_rec.sre_id := l_rrdv_rec.sre_id;
1903: END IF;
1904: IF (x_rrdv_rec.optional_yn = OKC_API.G_MISS_CHAR)

Line 1904: IF (x_rrdv_rec.optional_yn = OKC_API.G_MISS_CHAR)

1900: IF (x_rrdv_rec.sre_id = OKC_API.G_MISS_NUM)
1901: THEN
1902: x_rrdv_rec.sre_id := l_rrdv_rec.sre_id;
1903: END IF;
1904: IF (x_rrdv_rec.optional_yn = OKC_API.G_MISS_CHAR)
1905: THEN
1906: x_rrdv_rec.optional_yn := l_rrdv_rec.optional_yn;
1907: END IF;
1908: IF (x_rrdv_rec.subject_object_flag = OKC_API.G_MISS_CHAR)

Line 1908: IF (x_rrdv_rec.subject_object_flag = OKC_API.G_MISS_CHAR)

1904: IF (x_rrdv_rec.optional_yn = OKC_API.G_MISS_CHAR)
1905: THEN
1906: x_rrdv_rec.optional_yn := l_rrdv_rec.optional_yn;
1907: END IF;
1908: IF (x_rrdv_rec.subject_object_flag = OKC_API.G_MISS_CHAR)
1909: THEN
1910: x_rrdv_rec.subject_object_flag := l_rrdv_rec.subject_object_flag;
1911: END IF;
1912: IF (x_rrdv_rec.attribute_category = OKC_API.G_MISS_CHAR)

Line 1912: IF (x_rrdv_rec.attribute_category = OKC_API.G_MISS_CHAR)

1908: IF (x_rrdv_rec.subject_object_flag = OKC_API.G_MISS_CHAR)
1909: THEN
1910: x_rrdv_rec.subject_object_flag := l_rrdv_rec.subject_object_flag;
1911: END IF;
1912: IF (x_rrdv_rec.attribute_category = OKC_API.G_MISS_CHAR)
1913: THEN
1914: x_rrdv_rec.attribute_category := l_rrdv_rec.attribute_category;
1915: END IF;
1916: IF (x_rrdv_rec.attribute1 = OKC_API.G_MISS_CHAR)

Line 1916: IF (x_rrdv_rec.attribute1 = OKC_API.G_MISS_CHAR)

1912: IF (x_rrdv_rec.attribute_category = OKC_API.G_MISS_CHAR)
1913: THEN
1914: x_rrdv_rec.attribute_category := l_rrdv_rec.attribute_category;
1915: END IF;
1916: IF (x_rrdv_rec.attribute1 = OKC_API.G_MISS_CHAR)
1917: THEN
1918: x_rrdv_rec.attribute1 := l_rrdv_rec.attribute1;
1919: END IF;
1920: IF (x_rrdv_rec.attribute2 = OKC_API.G_MISS_CHAR)

Line 1920: IF (x_rrdv_rec.attribute2 = OKC_API.G_MISS_CHAR)

1916: IF (x_rrdv_rec.attribute1 = OKC_API.G_MISS_CHAR)
1917: THEN
1918: x_rrdv_rec.attribute1 := l_rrdv_rec.attribute1;
1919: END IF;
1920: IF (x_rrdv_rec.attribute2 = OKC_API.G_MISS_CHAR)
1921: THEN
1922: x_rrdv_rec.attribute2 := l_rrdv_rec.attribute2;
1923: END IF;
1924: IF (x_rrdv_rec.attribute3 = OKC_API.G_MISS_CHAR)

Line 1924: IF (x_rrdv_rec.attribute3 = OKC_API.G_MISS_CHAR)

1920: IF (x_rrdv_rec.attribute2 = OKC_API.G_MISS_CHAR)
1921: THEN
1922: x_rrdv_rec.attribute2 := l_rrdv_rec.attribute2;
1923: END IF;
1924: IF (x_rrdv_rec.attribute3 = OKC_API.G_MISS_CHAR)
1925: THEN
1926: x_rrdv_rec.attribute3 := l_rrdv_rec.attribute3;
1927: END IF;
1928: IF (x_rrdv_rec.attribute4 = OKC_API.G_MISS_CHAR)

Line 1928: IF (x_rrdv_rec.attribute4 = OKC_API.G_MISS_CHAR)

1924: IF (x_rrdv_rec.attribute3 = OKC_API.G_MISS_CHAR)
1925: THEN
1926: x_rrdv_rec.attribute3 := l_rrdv_rec.attribute3;
1927: END IF;
1928: IF (x_rrdv_rec.attribute4 = OKC_API.G_MISS_CHAR)
1929: THEN
1930: x_rrdv_rec.attribute4 := l_rrdv_rec.attribute4;
1931: END IF;
1932: IF (x_rrdv_rec.attribute5 = OKC_API.G_MISS_CHAR)

Line 1932: IF (x_rrdv_rec.attribute5 = OKC_API.G_MISS_CHAR)

1928: IF (x_rrdv_rec.attribute4 = OKC_API.G_MISS_CHAR)
1929: THEN
1930: x_rrdv_rec.attribute4 := l_rrdv_rec.attribute4;
1931: END IF;
1932: IF (x_rrdv_rec.attribute5 = OKC_API.G_MISS_CHAR)
1933: THEN
1934: x_rrdv_rec.attribute5 := l_rrdv_rec.attribute5;
1935: END IF;
1936: IF (x_rrdv_rec.attribute6 = OKC_API.G_MISS_CHAR)

Line 1936: IF (x_rrdv_rec.attribute6 = OKC_API.G_MISS_CHAR)

1932: IF (x_rrdv_rec.attribute5 = OKC_API.G_MISS_CHAR)
1933: THEN
1934: x_rrdv_rec.attribute5 := l_rrdv_rec.attribute5;
1935: END IF;
1936: IF (x_rrdv_rec.attribute6 = OKC_API.G_MISS_CHAR)
1937: THEN
1938: x_rrdv_rec.attribute6 := l_rrdv_rec.attribute6;
1939: END IF;
1940: IF (x_rrdv_rec.attribute7 = OKC_API.G_MISS_CHAR)

Line 1940: IF (x_rrdv_rec.attribute7 = OKC_API.G_MISS_CHAR)

1936: IF (x_rrdv_rec.attribute6 = OKC_API.G_MISS_CHAR)
1937: THEN
1938: x_rrdv_rec.attribute6 := l_rrdv_rec.attribute6;
1939: END IF;
1940: IF (x_rrdv_rec.attribute7 = OKC_API.G_MISS_CHAR)
1941: THEN
1942: x_rrdv_rec.attribute7 := l_rrdv_rec.attribute7;
1943: END IF;
1944: IF (x_rrdv_rec.attribute8 = OKC_API.G_MISS_CHAR)

Line 1944: IF (x_rrdv_rec.attribute8 = OKC_API.G_MISS_CHAR)

1940: IF (x_rrdv_rec.attribute7 = OKC_API.G_MISS_CHAR)
1941: THEN
1942: x_rrdv_rec.attribute7 := l_rrdv_rec.attribute7;
1943: END IF;
1944: IF (x_rrdv_rec.attribute8 = OKC_API.G_MISS_CHAR)
1945: THEN
1946: x_rrdv_rec.attribute8 := l_rrdv_rec.attribute8;
1947: END IF;
1948: IF (x_rrdv_rec.attribute9 = OKC_API.G_MISS_CHAR)

Line 1948: IF (x_rrdv_rec.attribute9 = OKC_API.G_MISS_CHAR)

1944: IF (x_rrdv_rec.attribute8 = OKC_API.G_MISS_CHAR)
1945: THEN
1946: x_rrdv_rec.attribute8 := l_rrdv_rec.attribute8;
1947: END IF;
1948: IF (x_rrdv_rec.attribute9 = OKC_API.G_MISS_CHAR)
1949: THEN
1950: x_rrdv_rec.attribute9 := l_rrdv_rec.attribute9;
1951: END IF;
1952: IF (x_rrdv_rec.attribute10 = OKC_API.G_MISS_CHAR)

Line 1952: IF (x_rrdv_rec.attribute10 = OKC_API.G_MISS_CHAR)

1948: IF (x_rrdv_rec.attribute9 = OKC_API.G_MISS_CHAR)
1949: THEN
1950: x_rrdv_rec.attribute9 := l_rrdv_rec.attribute9;
1951: END IF;
1952: IF (x_rrdv_rec.attribute10 = OKC_API.G_MISS_CHAR)
1953: THEN
1954: x_rrdv_rec.attribute10 := l_rrdv_rec.attribute10;
1955: END IF;
1956: IF (x_rrdv_rec.attribute11 = OKC_API.G_MISS_CHAR)

Line 1956: IF (x_rrdv_rec.attribute11 = OKC_API.G_MISS_CHAR)

1952: IF (x_rrdv_rec.attribute10 = OKC_API.G_MISS_CHAR)
1953: THEN
1954: x_rrdv_rec.attribute10 := l_rrdv_rec.attribute10;
1955: END IF;
1956: IF (x_rrdv_rec.attribute11 = OKC_API.G_MISS_CHAR)
1957: THEN
1958: x_rrdv_rec.attribute11 := l_rrdv_rec.attribute11;
1959: END IF;
1960: IF (x_rrdv_rec.attribute12 = OKC_API.G_MISS_CHAR)

Line 1960: IF (x_rrdv_rec.attribute12 = OKC_API.G_MISS_CHAR)

1956: IF (x_rrdv_rec.attribute11 = OKC_API.G_MISS_CHAR)
1957: THEN
1958: x_rrdv_rec.attribute11 := l_rrdv_rec.attribute11;
1959: END IF;
1960: IF (x_rrdv_rec.attribute12 = OKC_API.G_MISS_CHAR)
1961: THEN
1962: x_rrdv_rec.attribute12 := l_rrdv_rec.attribute12;
1963: END IF;
1964: IF (x_rrdv_rec.attribute13 = OKC_API.G_MISS_CHAR)

Line 1964: IF (x_rrdv_rec.attribute13 = OKC_API.G_MISS_CHAR)

1960: IF (x_rrdv_rec.attribute12 = OKC_API.G_MISS_CHAR)
1961: THEN
1962: x_rrdv_rec.attribute12 := l_rrdv_rec.attribute12;
1963: END IF;
1964: IF (x_rrdv_rec.attribute13 = OKC_API.G_MISS_CHAR)
1965: THEN
1966: x_rrdv_rec.attribute13 := l_rrdv_rec.attribute13;
1967: END IF;
1968: IF (x_rrdv_rec.attribute14 = OKC_API.G_MISS_CHAR)

Line 1968: IF (x_rrdv_rec.attribute14 = OKC_API.G_MISS_CHAR)

1964: IF (x_rrdv_rec.attribute13 = OKC_API.G_MISS_CHAR)
1965: THEN
1966: x_rrdv_rec.attribute13 := l_rrdv_rec.attribute13;
1967: END IF;
1968: IF (x_rrdv_rec.attribute14 = OKC_API.G_MISS_CHAR)
1969: THEN
1970: x_rrdv_rec.attribute14 := l_rrdv_rec.attribute14;
1971: END IF;
1972: IF (x_rrdv_rec.attribute15 = OKC_API.G_MISS_CHAR)

Line 1972: IF (x_rrdv_rec.attribute15 = OKC_API.G_MISS_CHAR)

1968: IF (x_rrdv_rec.attribute14 = OKC_API.G_MISS_CHAR)
1969: THEN
1970: x_rrdv_rec.attribute14 := l_rrdv_rec.attribute14;
1971: END IF;
1972: IF (x_rrdv_rec.attribute15 = OKC_API.G_MISS_CHAR)
1973: THEN
1974: x_rrdv_rec.attribute15 := l_rrdv_rec.attribute15;
1975: END IF;
1976: IF (x_rrdv_rec.created_by = OKC_API.G_MISS_NUM)

Line 1976: IF (x_rrdv_rec.created_by = OKC_API.G_MISS_NUM)

1972: IF (x_rrdv_rec.attribute15 = OKC_API.G_MISS_CHAR)
1973: THEN
1974: x_rrdv_rec.attribute15 := l_rrdv_rec.attribute15;
1975: END IF;
1976: IF (x_rrdv_rec.created_by = OKC_API.G_MISS_NUM)
1977: THEN
1978: x_rrdv_rec.created_by := l_rrdv_rec.created_by;
1979: END IF;
1980: IF (x_rrdv_rec.creation_date = OKC_API.G_MISS_DATE)

Line 1980: IF (x_rrdv_rec.creation_date = OKC_API.G_MISS_DATE)

1976: IF (x_rrdv_rec.created_by = OKC_API.G_MISS_NUM)
1977: THEN
1978: x_rrdv_rec.created_by := l_rrdv_rec.created_by;
1979: END IF;
1980: IF (x_rrdv_rec.creation_date = OKC_API.G_MISS_DATE)
1981: THEN
1982: x_rrdv_rec.creation_date := l_rrdv_rec.creation_date;
1983: END IF;
1984: IF (x_rrdv_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 1984: IF (x_rrdv_rec.last_updated_by = OKC_API.G_MISS_NUM)

1980: IF (x_rrdv_rec.creation_date = OKC_API.G_MISS_DATE)
1981: THEN
1982: x_rrdv_rec.creation_date := l_rrdv_rec.creation_date;
1983: END IF;
1984: IF (x_rrdv_rec.last_updated_by = OKC_API.G_MISS_NUM)
1985: THEN
1986: x_rrdv_rec.last_updated_by := l_rrdv_rec.last_updated_by;
1987: END IF;
1988: IF (x_rrdv_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 1988: IF (x_rrdv_rec.last_update_date = OKC_API.G_MISS_DATE)

1984: IF (x_rrdv_rec.last_updated_by = OKC_API.G_MISS_NUM)
1985: THEN
1986: x_rrdv_rec.last_updated_by := l_rrdv_rec.last_updated_by;
1987: END IF;
1988: IF (x_rrdv_rec.last_update_date = OKC_API.G_MISS_DATE)
1989: THEN
1990: x_rrdv_rec.last_update_date := l_rrdv_rec.last_update_date;
1991: END IF;
1992: IF (x_rrdv_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 1992: IF (x_rrdv_rec.last_update_login = OKC_API.G_MISS_NUM)

1988: IF (x_rrdv_rec.last_update_date = OKC_API.G_MISS_DATE)
1989: THEN
1990: x_rrdv_rec.last_update_date := l_rrdv_rec.last_update_date;
1991: END IF;
1992: IF (x_rrdv_rec.last_update_login = OKC_API.G_MISS_NUM)
1993: THEN
1994: x_rrdv_rec.last_update_login := l_rrdv_rec.last_update_login;
1995: END IF;
1996: IF (x_rrdv_rec.access_level = OKC_API.G_MISS_CHAR)

Line 1996: IF (x_rrdv_rec.access_level = OKC_API.G_MISS_CHAR)

1992: IF (x_rrdv_rec.last_update_login = OKC_API.G_MISS_NUM)
1993: THEN
1994: x_rrdv_rec.last_update_login := l_rrdv_rec.last_update_login;
1995: END IF;
1996: IF (x_rrdv_rec.access_level = OKC_API.G_MISS_CHAR)
1997: THEN
1998: x_rrdv_rec.access_level := l_rrdv_rec.access_level;
1999: END IF;
2000: RETURN(l_return_status);

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

2005: FUNCTION Set_Attributes (
2006: p_rrdv_rec IN rrdv_rec_type,
2007: x_rrdv_rec OUT NOCOPY rrdv_rec_type
2008: ) RETURN VARCHAR2 IS
2009: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2010: BEGIN
2011: x_rrdv_rec := p_rrdv_rec;
2012: x_rrdv_rec.OBJECT_VERSION_NUMBER := NVL(x_rrdv_rec.OBJECT_VERSION_NUMBER, 0) + 1;
2013: RETURN(l_return_status);

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

2012: x_rrdv_rec.OBJECT_VERSION_NUMBER := NVL(x_rrdv_rec.OBJECT_VERSION_NUMBER, 0) + 1;
2013: RETURN(l_return_status);
2014: END Set_Attributes;
2015: BEGIN
2016: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2017: G_PKG_NAME,
2018: p_init_msg_list,
2019: l_api_version,
2020: p_api_version,

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

2019: l_api_version,
2020: p_api_version,
2021: '_PVT',
2022: x_return_status);
2023: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2024: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2025: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2026: RAISE OKC_API.G_EXCEPTION_ERROR;
2027: END IF;

Line 2024: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2020: p_api_version,
2021: '_PVT',
2022: x_return_status);
2023: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2024: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2025: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2026: RAISE OKC_API.G_EXCEPTION_ERROR;
2027: END IF;
2028: --- Setting item attributes

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

2021: '_PVT',
2022: x_return_status);
2023: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2024: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2025: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2026: RAISE OKC_API.G_EXCEPTION_ERROR;
2027: END IF;
2028: --- Setting item attributes
2029: l_return_status := Set_Attributes(

Line 2026: RAISE OKC_API.G_EXCEPTION_ERROR;

2022: x_return_status);
2023: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2024: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2025: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2026: RAISE OKC_API.G_EXCEPTION_ERROR;
2027: END IF;
2028: --- Setting item attributes
2029: l_return_status := Set_Attributes(
2030: p_rrdv_rec, -- IN

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

2029: l_return_status := Set_Attributes(
2030: p_rrdv_rec, -- IN
2031: l_rrdv_rec); -- OUT
2032: --- If any errors happen abort API
2033: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2034: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2035: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2036: RAISE OKC_API.G_EXCEPTION_ERROR;
2037: END IF;

Line 2034: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2030: p_rrdv_rec, -- IN
2031: l_rrdv_rec); -- OUT
2032: --- If any errors happen abort API
2033: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2034: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2035: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2036: RAISE OKC_API.G_EXCEPTION_ERROR;
2037: END IF;
2038: l_return_status := populate_new_record(l_rrdv_rec, l_def_rrdv_rec);

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

2031: l_rrdv_rec); -- OUT
2032: --- If any errors happen abort API
2033: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2034: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2035: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2036: RAISE OKC_API.G_EXCEPTION_ERROR;
2037: END IF;
2038: l_return_status := populate_new_record(l_rrdv_rec, l_def_rrdv_rec);
2039: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2036: RAISE OKC_API.G_EXCEPTION_ERROR;

2032: --- If any errors happen abort API
2033: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2034: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2035: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2036: RAISE OKC_API.G_EXCEPTION_ERROR;
2037: END IF;
2038: l_return_status := populate_new_record(l_rrdv_rec, l_def_rrdv_rec);
2039: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2040: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

2035: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2036: RAISE OKC_API.G_EXCEPTION_ERROR;
2037: END IF;
2038: l_return_status := populate_new_record(l_rrdv_rec, l_def_rrdv_rec);
2039: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2040: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2041: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2042: RAISE OKC_API.G_EXCEPTION_ERROR;
2043: END IF;

Line 2040: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2036: RAISE OKC_API.G_EXCEPTION_ERROR;
2037: END IF;
2038: l_return_status := populate_new_record(l_rrdv_rec, l_def_rrdv_rec);
2039: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2040: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2041: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2042: RAISE OKC_API.G_EXCEPTION_ERROR;
2043: END IF;
2044: l_def_rrdv_rec := fill_who_columns(l_def_rrdv_rec);

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

2037: END IF;
2038: l_return_status := populate_new_record(l_rrdv_rec, l_def_rrdv_rec);
2039: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2040: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2041: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2042: RAISE OKC_API.G_EXCEPTION_ERROR;
2043: END IF;
2044: l_def_rrdv_rec := fill_who_columns(l_def_rrdv_rec);
2045: --- Validate all non-missing attributes (Item Level Validation)

Line 2042: RAISE OKC_API.G_EXCEPTION_ERROR;

2038: l_return_status := populate_new_record(l_rrdv_rec, l_def_rrdv_rec);
2039: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2040: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2041: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2042: RAISE OKC_API.G_EXCEPTION_ERROR;
2043: END IF;
2044: l_def_rrdv_rec := fill_who_columns(l_def_rrdv_rec);
2045: --- Validate all non-missing attributes (Item Level Validation)
2046: l_return_status := Validate_Attributes(l_def_rrdv_rec);

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

2044: l_def_rrdv_rec := fill_who_columns(l_def_rrdv_rec);
2045: --- Validate all non-missing attributes (Item Level Validation)
2046: l_return_status := Validate_Attributes(l_def_rrdv_rec);
2047: --- If any errors happen abort API
2048: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2049: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2050: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2051: RAISE OKC_API.G_EXCEPTION_ERROR;
2052: END IF;

Line 2049: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2045: --- Validate all non-missing attributes (Item Level Validation)
2046: l_return_status := Validate_Attributes(l_def_rrdv_rec);
2047: --- If any errors happen abort API
2048: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2049: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2050: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2051: RAISE OKC_API.G_EXCEPTION_ERROR;
2052: END IF;
2053: l_return_status := Validate_Record(l_def_rrdv_rec);

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

2046: l_return_status := Validate_Attributes(l_def_rrdv_rec);
2047: --- If any errors happen abort API
2048: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2049: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2050: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2051: RAISE OKC_API.G_EXCEPTION_ERROR;
2052: END IF;
2053: l_return_status := Validate_Record(l_def_rrdv_rec);
2054: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2051: RAISE OKC_API.G_EXCEPTION_ERROR;

2047: --- If any errors happen abort API
2048: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2049: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2050: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2051: RAISE OKC_API.G_EXCEPTION_ERROR;
2052: END IF;
2053: l_return_status := Validate_Record(l_def_rrdv_rec);
2054: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2055: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

2050: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2051: RAISE OKC_API.G_EXCEPTION_ERROR;
2052: END IF;
2053: l_return_status := Validate_Record(l_def_rrdv_rec);
2054: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2055: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2056: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2057: RAISE OKC_API.G_EXCEPTION_ERROR;
2058: END IF;

Line 2055: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2051: RAISE OKC_API.G_EXCEPTION_ERROR;
2052: END IF;
2053: l_return_status := Validate_Record(l_def_rrdv_rec);
2054: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2055: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2056: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2057: RAISE OKC_API.G_EXCEPTION_ERROR;
2058: END IF;
2059:

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

2052: END IF;
2053: l_return_status := Validate_Record(l_def_rrdv_rec);
2054: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2055: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2056: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2057: RAISE OKC_API.G_EXCEPTION_ERROR;
2058: END IF;
2059:
2060: --------------------------------------

Line 2057: RAISE OKC_API.G_EXCEPTION_ERROR;

2053: l_return_status := Validate_Record(l_def_rrdv_rec);
2054: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2055: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2056: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2057: RAISE OKC_API.G_EXCEPTION_ERROR;
2058: END IF;
2059:
2060: --------------------------------------
2061: -- Move VIEW record to "Child" records

Line 2075: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2071: x_msg_data,
2072: l_rrd_rec,
2073: lx_rrd_rec
2074: );
2075: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2076: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2077: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2078: RAISE OKC_API.G_EXCEPTION_ERROR;
2079: END IF;

Line 2076: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2072: l_rrd_rec,
2073: lx_rrd_rec
2074: );
2075: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2076: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2077: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2078: RAISE OKC_API.G_EXCEPTION_ERROR;
2079: END IF;
2080: migrate(lx_rrd_rec, l_def_rrdv_rec);

Line 2077: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

2073: lx_rrd_rec
2074: );
2075: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2076: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2077: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2078: RAISE OKC_API.G_EXCEPTION_ERROR;
2079: END IF;
2080: migrate(lx_rrd_rec, l_def_rrdv_rec);
2081: x_rrdv_rec := l_def_rrdv_rec;

Line 2078: RAISE OKC_API.G_EXCEPTION_ERROR;

2074: );
2075: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2076: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2077: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2078: RAISE OKC_API.G_EXCEPTION_ERROR;
2079: END IF;
2080: migrate(lx_rrd_rec, l_def_rrdv_rec);
2081: x_rrdv_rec := l_def_rrdv_rec;
2082: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

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

2078: RAISE OKC_API.G_EXCEPTION_ERROR;
2079: END IF;
2080: migrate(lx_rrd_rec, l_def_rrdv_rec);
2081: x_rrdv_rec := l_def_rrdv_rec;
2082: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2083: EXCEPTION
2084: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2085: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2086: (

Line 2084: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2080: migrate(lx_rrd_rec, l_def_rrdv_rec);
2081: x_rrdv_rec := l_def_rrdv_rec;
2082: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2083: EXCEPTION
2084: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2085: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2086: (
2087: l_api_name,
2088: G_PKG_NAME,

Line 2085: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2081: x_rrdv_rec := l_def_rrdv_rec;
2082: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2083: EXCEPTION
2084: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2085: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2086: (
2087: l_api_name,
2088: G_PKG_NAME,
2089: 'OKC_API.G_RET_STS_ERROR',

Line 2089: 'OKC_API.G_RET_STS_ERROR',

2085: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2086: (
2087: l_api_name,
2088: G_PKG_NAME,
2089: 'OKC_API.G_RET_STS_ERROR',
2090: x_msg_count,
2091: x_msg_data,
2092: '_PVT'
2093: );

Line 2094: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2090: x_msg_count,
2091: x_msg_data,
2092: '_PVT'
2093: );
2094: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2095: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2096: (
2097: l_api_name,
2098: G_PKG_NAME,

Line 2095: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2091: x_msg_data,
2092: '_PVT'
2093: );
2094: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2095: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2096: (
2097: l_api_name,
2098: G_PKG_NAME,
2099: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2099: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2095: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2096: (
2097: l_api_name,
2098: G_PKG_NAME,
2099: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2100: x_msg_count,
2101: x_msg_data,
2102: '_PVT'
2103: );

Line 2105: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2101: x_msg_data,
2102: '_PVT'
2103: );
2104: WHEN OTHERS THEN
2105: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2106: (
2107: l_api_name,
2108: G_PKG_NAME,
2109: 'OTHERS',

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

2125: x_rrdv_tbl OUT NOCOPY rrdv_tbl_type) IS
2126:
2127: l_api_version CONSTANT NUMBER := 1;
2128: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
2129: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2130: i NUMBER := 0;
2131: BEGIN
2132: OKC_API.init_msg_list(p_init_msg_list);
2133: -- Make sure PL/SQL table has records in it before passing

Line 2132: OKC_API.init_msg_list(p_init_msg_list);

2128: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
2129: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2130: i NUMBER := 0;
2131: BEGIN
2132: OKC_API.init_msg_list(p_init_msg_list);
2133: -- Make sure PL/SQL table has records in it before passing
2134: IF (p_rrdv_tbl.COUNT > 0) THEN
2135: i := p_rrdv_tbl.FIRST;
2136: LOOP

Line 2139: p_init_msg_list => OKC_API.G_FALSE,

2135: i := p_rrdv_tbl.FIRST;
2136: LOOP
2137: update_row (
2138: p_api_version => p_api_version,
2139: p_init_msg_list => OKC_API.G_FALSE,
2140: x_return_status => x_return_status,
2141: x_msg_count => x_msg_count,
2142: x_msg_data => x_msg_data,
2143: p_rrdv_rec => p_rrdv_tbl(i),

Line 2150: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2146: i := p_rrdv_tbl.NEXT(i);
2147: END LOOP;
2148: END IF;
2149: EXCEPTION
2150: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2151: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2152: (
2153: l_api_name,
2154: G_PKG_NAME,

Line 2151: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2147: END LOOP;
2148: END IF;
2149: EXCEPTION
2150: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2151: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2152: (
2153: l_api_name,
2154: G_PKG_NAME,
2155: 'OKC_API.G_RET_STS_ERROR',

Line 2155: 'OKC_API.G_RET_STS_ERROR',

2151: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2152: (
2153: l_api_name,
2154: G_PKG_NAME,
2155: 'OKC_API.G_RET_STS_ERROR',
2156: x_msg_count,
2157: x_msg_data,
2158: '_PVT'
2159: );

Line 2160: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2156: x_msg_count,
2157: x_msg_data,
2158: '_PVT'
2159: );
2160: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2161: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2162: (
2163: l_api_name,
2164: G_PKG_NAME,

Line 2161: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2157: x_msg_data,
2158: '_PVT'
2159: );
2160: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2161: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2162: (
2163: l_api_name,
2164: G_PKG_NAME,
2165: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2165: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2161: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2162: (
2163: l_api_name,
2164: G_PKG_NAME,
2165: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2166: x_msg_count,
2167: x_msg_data,
2168: '_PVT'
2169: );

Line 2171: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2167: x_msg_data,
2168: '_PVT'
2169: );
2170: WHEN OTHERS THEN
2171: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2172: (
2173: l_api_name,
2174: G_PKG_NAME,
2175: 'OTHERS',

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

2193: p_rrd_rec IN rrd_rec_type) IS
2194:
2195: l_api_version CONSTANT NUMBER := 1;
2196: l_api_name CONSTANT VARCHAR2(30) := 'DEFS_delete_row';
2197: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2198: l_rrd_rec rrd_rec_type:= p_rrd_rec;
2199: l_row_notfound BOOLEAN := TRUE;
2200: BEGIN
2201: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

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

2197: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2198: l_rrd_rec rrd_rec_type:= p_rrd_rec;
2199: l_row_notfound BOOLEAN := TRUE;
2200: BEGIN
2201: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2202: p_init_msg_list,
2203: '_PVT',
2204: x_return_status);
2205: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

2201: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2202: p_init_msg_list,
2203: '_PVT',
2204: x_return_status);
2205: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2206: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2207: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2208: RAISE OKC_API.G_EXCEPTION_ERROR;
2209: END IF;

Line 2206: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2202: p_init_msg_list,
2203: '_PVT',
2204: x_return_status);
2205: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2206: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2207: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2208: RAISE OKC_API.G_EXCEPTION_ERROR;
2209: END IF;
2210: DELETE FROM OKC_RG_ROLE_DEFS

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

2203: '_PVT',
2204: x_return_status);
2205: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2206: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2207: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2208: RAISE OKC_API.G_EXCEPTION_ERROR;
2209: END IF;
2210: DELETE FROM OKC_RG_ROLE_DEFS
2211: WHERE ID = l_rrd_rec.id;

Line 2208: RAISE OKC_API.G_EXCEPTION_ERROR;

2204: x_return_status);
2205: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2206: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2207: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2208: RAISE OKC_API.G_EXCEPTION_ERROR;
2209: END IF;
2210: DELETE FROM OKC_RG_ROLE_DEFS
2211: WHERE ID = l_rrd_rec.id;
2212:

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

2209: END IF;
2210: DELETE FROM OKC_RG_ROLE_DEFS
2211: WHERE ID = l_rrd_rec.id;
2212:
2213: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2214: EXCEPTION
2215: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2216: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2217: (

Line 2215: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2211: WHERE ID = l_rrd_rec.id;
2212:
2213: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2214: EXCEPTION
2215: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2216: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2217: (
2218: l_api_name,
2219: G_PKG_NAME,

Line 2216: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2212:
2213: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2214: EXCEPTION
2215: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2216: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2217: (
2218: l_api_name,
2219: G_PKG_NAME,
2220: 'OKC_API.G_RET_STS_ERROR',

Line 2220: 'OKC_API.G_RET_STS_ERROR',

2216: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2217: (
2218: l_api_name,
2219: G_PKG_NAME,
2220: 'OKC_API.G_RET_STS_ERROR',
2221: x_msg_count,
2222: x_msg_data,
2223: '_PVT'
2224: );

Line 2225: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2221: x_msg_count,
2222: x_msg_data,
2223: '_PVT'
2224: );
2225: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2226: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2227: (
2228: l_api_name,
2229: G_PKG_NAME,

Line 2226: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2222: x_msg_data,
2223: '_PVT'
2224: );
2225: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2226: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2227: (
2228: l_api_name,
2229: G_PKG_NAME,
2230: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2230: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2226: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2227: (
2228: l_api_name,
2229: G_PKG_NAME,
2230: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2231: x_msg_count,
2232: x_msg_data,
2233: '_PVT'
2234: );

Line 2236: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2232: x_msg_data,
2233: '_PVT'
2234: );
2235: WHEN OTHERS THEN
2236: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2237: (
2238: l_api_name,
2239: G_PKG_NAME,
2240: 'OTHERS',

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

2255: p_rrdv_rec IN rrdv_rec_type) IS
2256:
2257: l_api_version CONSTANT NUMBER := 1;
2258: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
2259: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2260: l_rrdv_rec rrdv_rec_type := p_rrdv_rec;
2261: l_rrd_rec rrd_rec_type;
2262: BEGIN
2263: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

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

2259: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2260: l_rrdv_rec rrdv_rec_type := p_rrdv_rec;
2261: l_rrd_rec rrd_rec_type;
2262: BEGIN
2263: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2264: G_PKG_NAME,
2265: p_init_msg_list,
2266: l_api_version,
2267: p_api_version,

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

2266: l_api_version,
2267: p_api_version,
2268: '_PVT',
2269: x_return_status);
2270: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2271: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2272: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2273: RAISE OKC_API.G_EXCEPTION_ERROR;
2274: END IF;

Line 2271: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2267: p_api_version,
2268: '_PVT',
2269: x_return_status);
2270: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2271: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2272: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2273: RAISE OKC_API.G_EXCEPTION_ERROR;
2274: END IF;
2275: --------------------------------------

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

2268: '_PVT',
2269: x_return_status);
2270: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2271: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2272: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2273: RAISE OKC_API.G_EXCEPTION_ERROR;
2274: END IF;
2275: --------------------------------------
2276: -- Move VIEW record to "Child" records

Line 2273: RAISE OKC_API.G_EXCEPTION_ERROR;

2269: x_return_status);
2270: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2271: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2272: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2273: RAISE OKC_API.G_EXCEPTION_ERROR;
2274: END IF;
2275: --------------------------------------
2276: -- Move VIEW record to "Child" records
2277: --------------------------------------

Line 2289: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2285: x_msg_count,
2286: x_msg_data,
2287: l_rrd_rec
2288: );
2289: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2290: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2291: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2292: RAISE OKC_API.G_EXCEPTION_ERROR;
2293: END IF;

Line 2290: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2286: x_msg_data,
2287: l_rrd_rec
2288: );
2289: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2290: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2291: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2292: RAISE OKC_API.G_EXCEPTION_ERROR;
2293: END IF;
2294: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 2291: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

2287: l_rrd_rec
2288: );
2289: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2290: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2291: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2292: RAISE OKC_API.G_EXCEPTION_ERROR;
2293: END IF;
2294: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2295: EXCEPTION

Line 2292: RAISE OKC_API.G_EXCEPTION_ERROR;

2288: );
2289: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2290: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2291: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2292: RAISE OKC_API.G_EXCEPTION_ERROR;
2293: END IF;
2294: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2295: EXCEPTION
2296: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

2290: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2291: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2292: RAISE OKC_API.G_EXCEPTION_ERROR;
2293: END IF;
2294: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2295: EXCEPTION
2296: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2297: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2298: (

Line 2296: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2292: RAISE OKC_API.G_EXCEPTION_ERROR;
2293: END IF;
2294: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2295: EXCEPTION
2296: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2297: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2298: (
2299: l_api_name,
2300: G_PKG_NAME,

Line 2297: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2293: END IF;
2294: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2295: EXCEPTION
2296: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2297: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2298: (
2299: l_api_name,
2300: G_PKG_NAME,
2301: 'OKC_API.G_RET_STS_ERROR',

Line 2301: 'OKC_API.G_RET_STS_ERROR',

2297: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2298: (
2299: l_api_name,
2300: G_PKG_NAME,
2301: 'OKC_API.G_RET_STS_ERROR',
2302: x_msg_count,
2303: x_msg_data,
2304: '_PVT'
2305: );

Line 2306: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2302: x_msg_count,
2303: x_msg_data,
2304: '_PVT'
2305: );
2306: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2307: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2308: (
2309: l_api_name,
2310: G_PKG_NAME,

Line 2307: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2303: x_msg_data,
2304: '_PVT'
2305: );
2306: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2307: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2308: (
2309: l_api_name,
2310: G_PKG_NAME,
2311: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2311: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2307: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2308: (
2309: l_api_name,
2310: G_PKG_NAME,
2311: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2312: x_msg_count,
2313: x_msg_data,
2314: '_PVT'
2315: );

Line 2317: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2313: x_msg_data,
2314: '_PVT'
2315: );
2316: WHEN OTHERS THEN
2317: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2318: (
2319: l_api_name,
2320: G_PKG_NAME,
2321: 'OTHERS',

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

2336: p_rrdv_tbl IN rrdv_tbl_type) IS
2337:
2338: l_api_version CONSTANT NUMBER := 1;
2339: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2340: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2341: i NUMBER := 0;
2342: BEGIN
2343: OKC_API.init_msg_list(p_init_msg_list);
2344: -- Make sure PL/SQL table has records in it before passing

Line 2343: OKC_API.init_msg_list(p_init_msg_list);

2339: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2340: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2341: i NUMBER := 0;
2342: BEGIN
2343: OKC_API.init_msg_list(p_init_msg_list);
2344: -- Make sure PL/SQL table has records in it before passing
2345: IF (p_rrdv_tbl.COUNT > 0) THEN
2346: i := p_rrdv_tbl.FIRST;
2347: LOOP

Line 2350: p_init_msg_list => OKC_API.G_FALSE,

2346: i := p_rrdv_tbl.FIRST;
2347: LOOP
2348: delete_row (
2349: p_api_version => p_api_version,
2350: p_init_msg_list => OKC_API.G_FALSE,
2351: x_return_status => x_return_status,
2352: x_msg_count => x_msg_count,
2353: x_msg_data => x_msg_data,
2354: p_rrdv_rec => p_rrdv_tbl(i));

Line 2360: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2356: i := p_rrdv_tbl.NEXT(i);
2357: END LOOP;
2358: END IF;
2359: EXCEPTION
2360: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2361: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2362: (
2363: l_api_name,
2364: G_PKG_NAME,

Line 2361: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2357: END LOOP;
2358: END IF;
2359: EXCEPTION
2360: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2361: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2362: (
2363: l_api_name,
2364: G_PKG_NAME,
2365: 'OKC_API.G_RET_STS_ERROR',

Line 2365: 'OKC_API.G_RET_STS_ERROR',

2361: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2362: (
2363: l_api_name,
2364: G_PKG_NAME,
2365: 'OKC_API.G_RET_STS_ERROR',
2366: x_msg_count,
2367: x_msg_data,
2368: '_PVT'
2369: );

Line 2370: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2366: x_msg_count,
2367: x_msg_data,
2368: '_PVT'
2369: );
2370: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2371: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2372: (
2373: l_api_name,
2374: G_PKG_NAME,

Line 2371: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2367: x_msg_data,
2368: '_PVT'
2369: );
2370: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2371: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2372: (
2373: l_api_name,
2374: G_PKG_NAME,
2375: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2375: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2371: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2372: (
2373: l_api_name,
2374: G_PKG_NAME,
2375: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2376: x_msg_count,
2377: x_msg_data,
2378: '_PVT'
2379: );

Line 2381: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2377: x_msg_data,
2378: '_PVT'
2379: );
2380: WHEN OTHERS THEN
2381: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2382: (
2383: l_api_name,
2384: G_PKG_NAME,
2385: 'OTHERS',