eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKL_SIR_PVT dependencies on OKC_API

Line 262: IF (l_sirv_rec.transaction_number = OKC_API.G_MISS_NUM) THEN

258: p_sirv_rec IN sirv_rec_type
259: ) RETURN sirv_rec_type IS
260: l_sirv_rec sirv_rec_type := p_sirv_rec;
261: BEGIN
262: IF (l_sirv_rec.transaction_number = OKC_API.G_MISS_NUM) THEN
263: l_sirv_rec.transaction_number := NULL;
264: END IF;
265: IF (l_sirv_rec.srt_code = OKC_API.G_MISS_CHAR) THEN
266: l_sirv_rec.srt_code := NULL;

Line 265: IF (l_sirv_rec.srt_code = OKC_API.G_MISS_CHAR) THEN

261: BEGIN
262: IF (l_sirv_rec.transaction_number = OKC_API.G_MISS_NUM) THEN
263: l_sirv_rec.transaction_number := NULL;
264: END IF;
265: IF (l_sirv_rec.srt_code = OKC_API.G_MISS_CHAR) THEN
266: l_sirv_rec.srt_code := NULL;
267: END IF;
268: IF (l_sirv_rec.effective_pre_tax_yield = OKC_API.G_MISS_NUM) THEN
269: l_sirv_rec.effective_pre_tax_yield := NULL;

Line 268: IF (l_sirv_rec.effective_pre_tax_yield = OKC_API.G_MISS_NUM) THEN

264: END IF;
265: IF (l_sirv_rec.srt_code = OKC_API.G_MISS_CHAR) THEN
266: l_sirv_rec.srt_code := NULL;
267: END IF;
268: IF (l_sirv_rec.effective_pre_tax_yield = OKC_API.G_MISS_NUM) THEN
269: l_sirv_rec.effective_pre_tax_yield := NULL;
270: END IF;
271: IF (l_sirv_rec.yield_name = OKC_API.G_MISS_CHAR) THEN
272: l_sirv_rec.yield_name := NULL;

Line 271: IF (l_sirv_rec.yield_name = OKC_API.G_MISS_CHAR) THEN

267: END IF;
268: IF (l_sirv_rec.effective_pre_tax_yield = OKC_API.G_MISS_NUM) THEN
269: l_sirv_rec.effective_pre_tax_yield := NULL;
270: END IF;
271: IF (l_sirv_rec.yield_name = OKC_API.G_MISS_CHAR) THEN
272: l_sirv_rec.yield_name := NULL;
273: END IF;
274: IF (l_sirv_rec.index_number = OKC_API.G_MISS_NUM) THEN
275: l_sirv_rec.index_number := NULL;

Line 274: IF (l_sirv_rec.index_number = OKC_API.G_MISS_NUM) THEN

270: END IF;
271: IF (l_sirv_rec.yield_name = OKC_API.G_MISS_CHAR) THEN
272: l_sirv_rec.yield_name := NULL;
273: END IF;
274: IF (l_sirv_rec.index_number = OKC_API.G_MISS_NUM) THEN
275: l_sirv_rec.index_number := NULL;
276: END IF;
277: IF (l_sirv_rec.effective_after_tax_yield = OKC_API.G_MISS_NUM) THEN
278: l_sirv_rec.effective_after_tax_yield := NULL;

Line 277: IF (l_sirv_rec.effective_after_tax_yield = OKC_API.G_MISS_NUM) THEN

273: END IF;
274: IF (l_sirv_rec.index_number = OKC_API.G_MISS_NUM) THEN
275: l_sirv_rec.index_number := NULL;
276: END IF;
277: IF (l_sirv_rec.effective_after_tax_yield = OKC_API.G_MISS_NUM) THEN
278: l_sirv_rec.effective_after_tax_yield := NULL;
279: END IF;
280: IF (l_sirv_rec.nominal_pre_tax_yield = OKC_API.G_MISS_NUM) THEN
281: l_sirv_rec.nominal_pre_tax_yield := NULL;

Line 280: IF (l_sirv_rec.nominal_pre_tax_yield = OKC_API.G_MISS_NUM) THEN

276: END IF;
277: IF (l_sirv_rec.effective_after_tax_yield = OKC_API.G_MISS_NUM) THEN
278: l_sirv_rec.effective_after_tax_yield := NULL;
279: END IF;
280: IF (l_sirv_rec.nominal_pre_tax_yield = OKC_API.G_MISS_NUM) THEN
281: l_sirv_rec.nominal_pre_tax_yield := NULL;
282: END IF;
283: IF (l_sirv_rec.nominal_after_tax_yield = OKC_API.G_MISS_NUM) THEN
284: l_sirv_rec.nominal_after_tax_yield := NULL;

Line 283: IF (l_sirv_rec.nominal_after_tax_yield = OKC_API.G_MISS_NUM) THEN

279: END IF;
280: IF (l_sirv_rec.nominal_pre_tax_yield = OKC_API.G_MISS_NUM) THEN
281: l_sirv_rec.nominal_pre_tax_yield := NULL;
282: END IF;
283: IF (l_sirv_rec.nominal_after_tax_yield = OKC_API.G_MISS_NUM) THEN
284: l_sirv_rec.nominal_after_tax_yield := NULL;
285: END IF;
286: IF (l_sirv_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR) THEN
287: l_sirv_rec.stream_interface_attribute01 := NULL;

Line 286: IF (l_sirv_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR) THEN

282: END IF;
283: IF (l_sirv_rec.nominal_after_tax_yield = OKC_API.G_MISS_NUM) THEN
284: l_sirv_rec.nominal_after_tax_yield := NULL;
285: END IF;
286: IF (l_sirv_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR) THEN
287: l_sirv_rec.stream_interface_attribute01 := NULL;
288: END IF;
289: IF (l_sirv_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR) THEN
290: l_sirv_rec.stream_interface_attribute02 := NULL;

Line 289: IF (l_sirv_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR) THEN

285: END IF;
286: IF (l_sirv_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR) THEN
287: l_sirv_rec.stream_interface_attribute01 := NULL;
288: END IF;
289: IF (l_sirv_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR) THEN
290: l_sirv_rec.stream_interface_attribute02 := NULL;
291: END IF;
292: IF (l_sirv_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR) THEN
293: l_sirv_rec.stream_interface_attribute03 := NULL;

Line 292: IF (l_sirv_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR) THEN

288: END IF;
289: IF (l_sirv_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR) THEN
290: l_sirv_rec.stream_interface_attribute02 := NULL;
291: END IF;
292: IF (l_sirv_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR) THEN
293: l_sirv_rec.stream_interface_attribute03 := NULL;
294: END IF;
295: IF (l_sirv_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR) THEN
296: l_sirv_rec.stream_interface_attribute04 := NULL;

Line 295: IF (l_sirv_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR) THEN

291: END IF;
292: IF (l_sirv_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR) THEN
293: l_sirv_rec.stream_interface_attribute03 := NULL;
294: END IF;
295: IF (l_sirv_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR) THEN
296: l_sirv_rec.stream_interface_attribute04 := NULL;
297: END IF;
298: IF (l_sirv_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR) THEN
299: l_sirv_rec.stream_interface_attribute05 := NULL;

Line 298: IF (l_sirv_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR) THEN

294: END IF;
295: IF (l_sirv_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR) THEN
296: l_sirv_rec.stream_interface_attribute04 := NULL;
297: END IF;
298: IF (l_sirv_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR) THEN
299: l_sirv_rec.stream_interface_attribute05 := NULL;
300: END IF;
301: IF (l_sirv_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR) THEN
302: l_sirv_rec.stream_interface_attribute06 := NULL;

Line 301: IF (l_sirv_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR) THEN

297: END IF;
298: IF (l_sirv_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR) THEN
299: l_sirv_rec.stream_interface_attribute05 := NULL;
300: END IF;
301: IF (l_sirv_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR) THEN
302: l_sirv_rec.stream_interface_attribute06 := NULL;
303: END IF;
304: IF (l_sirv_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR) THEN
305: l_sirv_rec.stream_interface_attribute07 := NULL;

Line 304: IF (l_sirv_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR) THEN

300: END IF;
301: IF (l_sirv_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR) THEN
302: l_sirv_rec.stream_interface_attribute06 := NULL;
303: END IF;
304: IF (l_sirv_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR) THEN
305: l_sirv_rec.stream_interface_attribute07 := NULL;
306: END IF;
307: IF (l_sirv_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR) THEN
308: l_sirv_rec.stream_interface_attribute08 := NULL;

Line 307: IF (l_sirv_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR) THEN

303: END IF;
304: IF (l_sirv_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR) THEN
305: l_sirv_rec.stream_interface_attribute07 := NULL;
306: END IF;
307: IF (l_sirv_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR) THEN
308: l_sirv_rec.stream_interface_attribute08 := NULL;
309: END IF;
310: IF (l_sirv_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR) THEN
311: l_sirv_rec.stream_interface_attribute09 := NULL;

Line 310: IF (l_sirv_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR) THEN

306: END IF;
307: IF (l_sirv_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR) THEN
308: l_sirv_rec.stream_interface_attribute08 := NULL;
309: END IF;
310: IF (l_sirv_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR) THEN
311: l_sirv_rec.stream_interface_attribute09 := NULL;
312: END IF;
313: IF (l_sirv_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR) THEN
314: l_sirv_rec.stream_interface_attribute10 := NULL;

Line 313: IF (l_sirv_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR) THEN

309: END IF;
310: IF (l_sirv_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR) THEN
311: l_sirv_rec.stream_interface_attribute09 := NULL;
312: END IF;
313: IF (l_sirv_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR) THEN
314: l_sirv_rec.stream_interface_attribute10 := NULL;
315: END IF;
316: IF (l_sirv_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR) THEN
317: l_sirv_rec.stream_interface_attribute11 := NULL;

Line 316: IF (l_sirv_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR) THEN

312: END IF;
313: IF (l_sirv_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR) THEN
314: l_sirv_rec.stream_interface_attribute10 := NULL;
315: END IF;
316: IF (l_sirv_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR) THEN
317: l_sirv_rec.stream_interface_attribute11 := NULL;
318: END IF;
319: IF (l_sirv_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR) THEN
320: l_sirv_rec.stream_interface_attribute12 := NULL;

Line 319: IF (l_sirv_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR) THEN

315: END IF;
316: IF (l_sirv_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR) THEN
317: l_sirv_rec.stream_interface_attribute11 := NULL;
318: END IF;
319: IF (l_sirv_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR) THEN
320: l_sirv_rec.stream_interface_attribute12 := NULL;
321: END IF;
322: IF (l_sirv_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR) THEN
323: l_sirv_rec.stream_interface_attribute13 := NULL;

Line 322: IF (l_sirv_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR) THEN

318: END IF;
319: IF (l_sirv_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR) THEN
320: l_sirv_rec.stream_interface_attribute12 := NULL;
321: END IF;
322: IF (l_sirv_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR) THEN
323: l_sirv_rec.stream_interface_attribute13 := NULL;
324: END IF;
325: IF (l_sirv_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR) THEN
326: l_sirv_rec.stream_interface_attribute14 := NULL;

Line 325: IF (l_sirv_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR) THEN

321: END IF;
322: IF (l_sirv_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR) THEN
323: l_sirv_rec.stream_interface_attribute13 := NULL;
324: END IF;
325: IF (l_sirv_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR) THEN
326: l_sirv_rec.stream_interface_attribute14 := NULL;
327: END IF;
328: IF (l_sirv_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR) THEN
329: l_sirv_rec.stream_interface_attribute15 := NULL;

Line 328: IF (l_sirv_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR) THEN

324: END IF;
325: IF (l_sirv_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR) THEN
326: l_sirv_rec.stream_interface_attribute14 := NULL;
327: END IF;
328: IF (l_sirv_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR) THEN
329: l_sirv_rec.stream_interface_attribute15 := NULL;
330: END IF;
331:
332: IF (l_sirv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN

Line 332: IF (l_sirv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN

328: IF (l_sirv_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR) THEN
329: l_sirv_rec.stream_interface_attribute15 := NULL;
330: END IF;
331:
332: IF (l_sirv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
333: l_sirv_rec.object_version_number := NULL;
334: END IF;
335: IF (l_sirv_rec.created_by = OKC_API.G_MISS_NUM) THEN
336: l_sirv_rec.created_by := NULL;

Line 335: IF (l_sirv_rec.created_by = OKC_API.G_MISS_NUM) THEN

331:
332: IF (l_sirv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
333: l_sirv_rec.object_version_number := NULL;
334: END IF;
335: IF (l_sirv_rec.created_by = OKC_API.G_MISS_NUM) THEN
336: l_sirv_rec.created_by := NULL;
337: END IF;
338: IF (l_sirv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
339: l_sirv_rec.last_updated_by := NULL;

Line 338: IF (l_sirv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN

334: END IF;
335: IF (l_sirv_rec.created_by = OKC_API.G_MISS_NUM) THEN
336: l_sirv_rec.created_by := NULL;
337: END IF;
338: IF (l_sirv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
339: l_sirv_rec.last_updated_by := NULL;
340: END IF;
341: IF (l_sirv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
342: l_sirv_rec.creation_date := NULL;

Line 341: IF (l_sirv_rec.creation_date = OKC_API.G_MISS_DATE) THEN

337: END IF;
338: IF (l_sirv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
339: l_sirv_rec.last_updated_by := NULL;
340: END IF;
341: IF (l_sirv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
342: l_sirv_rec.creation_date := NULL;
343: END IF;
344: IF (l_sirv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
345: l_sirv_rec.last_update_date := NULL;

Line 344: IF (l_sirv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN

340: END IF;
341: IF (l_sirv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
342: l_sirv_rec.creation_date := NULL;
343: END IF;
344: IF (l_sirv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
345: l_sirv_rec.last_update_date := NULL;
346: END IF;
347: IF (l_sirv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
348: l_sirv_rec.last_update_login := NULL;

Line 347: IF (l_sirv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN

343: END IF;
344: IF (l_sirv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
345: l_sirv_rec.last_update_date := NULL;
346: END IF;
347: IF (l_sirv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
348: l_sirv_rec.last_update_login := NULL;
349: END IF;
350: IF (l_sirv_rec.implicit_interest_rate = OKC_API.G_MISS_NUM) THEN
351: l_sirv_rec.implicit_interest_rate := NULL;

Line 350: IF (l_sirv_rec.implicit_interest_rate = OKC_API.G_MISS_NUM) THEN

346: END IF;
347: IF (l_sirv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
348: l_sirv_rec.last_update_login := NULL;
349: END IF;
350: IF (l_sirv_rec.implicit_interest_rate = OKC_API.G_MISS_NUM) THEN
351: l_sirv_rec.implicit_interest_rate := NULL;
352: END IF;
353: IF (l_sirv_rec.date_processed = OKC_API.G_MISS_DATE) THEN
354: l_sirv_rec.date_processed := NULL;

Line 353: IF (l_sirv_rec.date_processed = OKC_API.G_MISS_DATE) THEN

349: END IF;
350: IF (l_sirv_rec.implicit_interest_rate = OKC_API.G_MISS_NUM) THEN
351: l_sirv_rec.implicit_interest_rate := NULL;
352: END IF;
353: IF (l_sirv_rec.date_processed = OKC_API.G_MISS_DATE) THEN
354: l_sirv_rec.date_processed := NULL;
355: END IF;
356:
357: -- mvasudev -- 02/21/2002

Line 359: IF (l_sirv_rec.REQUEST_ID = OKC_API.G_MISS_NUM) THEN

355: END IF;
356:
357: -- mvasudev -- 02/21/2002
358: -- new columns added for concurrent program manager
359: IF (l_sirv_rec.REQUEST_ID = OKC_API.G_MISS_NUM) THEN
360: l_sirv_rec.REQUEST_ID := NULL;
361: END IF;
362: IF (l_sirv_rec.PROGRAM_APPLICATION_ID = OKC_API.G_MISS_NUM) THEN
363: l_sirv_rec.PROGRAM_APPLICATION_ID := NULL;

Line 362: IF (l_sirv_rec.PROGRAM_APPLICATION_ID = OKC_API.G_MISS_NUM) THEN

358: -- new columns added for concurrent program manager
359: IF (l_sirv_rec.REQUEST_ID = OKC_API.G_MISS_NUM) THEN
360: l_sirv_rec.REQUEST_ID := NULL;
361: END IF;
362: IF (l_sirv_rec.PROGRAM_APPLICATION_ID = OKC_API.G_MISS_NUM) THEN
363: l_sirv_rec.PROGRAM_APPLICATION_ID := NULL;
364: END IF;
365: IF (l_sirv_rec.PROGRAM_ID = OKC_API.G_MISS_NUM) THEN
366: l_sirv_rec.PROGRAM_ID := NULL;

Line 365: IF (l_sirv_rec.PROGRAM_ID = OKC_API.G_MISS_NUM) THEN

361: END IF;
362: IF (l_sirv_rec.PROGRAM_APPLICATION_ID = OKC_API.G_MISS_NUM) THEN
363: l_sirv_rec.PROGRAM_APPLICATION_ID := NULL;
364: END IF;
365: IF (l_sirv_rec.PROGRAM_ID = OKC_API.G_MISS_NUM) THEN
366: l_sirv_rec.PROGRAM_ID := NULL;
367: END IF;
368: IF (l_sirv_rec.PROGRAM_UPDATE_DATE = OKC_API.G_MISS_DATE) THEN
369: l_sirv_rec.PROGRAM_UPDATE_DATE := NULL;

Line 368: IF (l_sirv_rec.PROGRAM_UPDATE_DATE = OKC_API.G_MISS_DATE) THEN

364: END IF;
365: IF (l_sirv_rec.PROGRAM_ID = OKC_API.G_MISS_NUM) THEN
366: l_sirv_rec.PROGRAM_ID := NULL;
367: END IF;
368: IF (l_sirv_rec.PROGRAM_UPDATE_DATE = OKC_API.G_MISS_DATE) THEN
369: l_sirv_rec.PROGRAM_UPDATE_DATE := NULL;
370: END IF;
371: -- end,mvasudev -- 02/21/2002
372: RETURN(l_sirv_rec);

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

385: --------------------------------------------
386: FUNCTION Validate_Attributes (
387: p_sirv_rec IN sirv_rec_type
388: ) RETURN VARCHAR2 IS
389: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
390: BEGIN
391: IF p_sirv_rec.id = OKC_API.G_MISS_NUM OR
392: p_sirv_rec.id IS NULL
393: THEN

Line 391: IF p_sirv_rec.id = OKC_API.G_MISS_NUM OR

387: p_sirv_rec IN sirv_rec_type
388: ) RETURN VARCHAR2 IS
389: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
390: BEGIN
391: IF p_sirv_rec.id = OKC_API.G_MISS_NUM OR
392: p_sirv_rec.id IS NULL
393: THEN
394: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
395: l_return_status := OKC_API.G_RET_STS_ERROR;

Line 394: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');

390: BEGIN
391: IF p_sirv_rec.id = OKC_API.G_MISS_NUM OR
392: p_sirv_rec.id IS NULL
393: THEN
394: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
395: l_return_status := OKC_API.G_RET_STS_ERROR;
396: ELSIF p_sirv_rec.transaction_number = OKC_API.G_MISS_NUM OR
397: p_sirv_rec.transaction_number IS NULL
398: THEN

Line 395: l_return_status := OKC_API.G_RET_STS_ERROR;

391: IF p_sirv_rec.id = OKC_API.G_MISS_NUM OR
392: p_sirv_rec.id IS NULL
393: THEN
394: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
395: l_return_status := OKC_API.G_RET_STS_ERROR;
396: ELSIF p_sirv_rec.transaction_number = OKC_API.G_MISS_NUM OR
397: p_sirv_rec.transaction_number IS NULL
398: THEN
399: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'transaction_number');

Line 396: ELSIF p_sirv_rec.transaction_number = OKC_API.G_MISS_NUM OR

392: p_sirv_rec.id IS NULL
393: THEN
394: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
395: l_return_status := OKC_API.G_RET_STS_ERROR;
396: ELSIF p_sirv_rec.transaction_number = OKC_API.G_MISS_NUM OR
397: p_sirv_rec.transaction_number IS NULL
398: THEN
399: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'transaction_number');
400: l_return_status := OKC_API.G_RET_STS_ERROR;

Line 399: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'transaction_number');

395: l_return_status := OKC_API.G_RET_STS_ERROR;
396: ELSIF p_sirv_rec.transaction_number = OKC_API.G_MISS_NUM OR
397: p_sirv_rec.transaction_number IS NULL
398: THEN
399: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'transaction_number');
400: l_return_status := OKC_API.G_RET_STS_ERROR;
401: ELSIF p_sirv_rec.yield_name = OKC_API.G_MISS_CHAR OR
402: p_sirv_rec.yield_name IS NULL
403: THEN

Line 400: l_return_status := OKC_API.G_RET_STS_ERROR;

396: ELSIF p_sirv_rec.transaction_number = OKC_API.G_MISS_NUM OR
397: p_sirv_rec.transaction_number IS NULL
398: THEN
399: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'transaction_number');
400: l_return_status := OKC_API.G_RET_STS_ERROR;
401: ELSIF p_sirv_rec.yield_name = OKC_API.G_MISS_CHAR OR
402: p_sirv_rec.yield_name IS NULL
403: THEN
404: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'yield_name');

Line 401: ELSIF p_sirv_rec.yield_name = OKC_API.G_MISS_CHAR OR

397: p_sirv_rec.transaction_number IS NULL
398: THEN
399: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'transaction_number');
400: l_return_status := OKC_API.G_RET_STS_ERROR;
401: ELSIF p_sirv_rec.yield_name = OKC_API.G_MISS_CHAR OR
402: p_sirv_rec.yield_name IS NULL
403: THEN
404: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'yield_name');
405: l_return_status := OKC_API.G_RET_STS_ERROR;

Line 404: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'yield_name');

400: l_return_status := OKC_API.G_RET_STS_ERROR;
401: ELSIF p_sirv_rec.yield_name = OKC_API.G_MISS_CHAR OR
402: p_sirv_rec.yield_name IS NULL
403: THEN
404: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'yield_name');
405: l_return_status := OKC_API.G_RET_STS_ERROR;
406: ELSIF p_sirv_rec.object_version_number = OKC_API.G_MISS_NUM OR
407: p_sirv_rec.object_version_number IS NULL
408: THEN

Line 405: l_return_status := OKC_API.G_RET_STS_ERROR;

401: ELSIF p_sirv_rec.yield_name = OKC_API.G_MISS_CHAR OR
402: p_sirv_rec.yield_name IS NULL
403: THEN
404: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'yield_name');
405: l_return_status := OKC_API.G_RET_STS_ERROR;
406: ELSIF p_sirv_rec.object_version_number = OKC_API.G_MISS_NUM OR
407: p_sirv_rec.object_version_number IS NULL
408: THEN
409: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');

Line 406: ELSIF p_sirv_rec.object_version_number = OKC_API.G_MISS_NUM OR

402: p_sirv_rec.yield_name IS NULL
403: THEN
404: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'yield_name');
405: l_return_status := OKC_API.G_RET_STS_ERROR;
406: ELSIF p_sirv_rec.object_version_number = OKC_API.G_MISS_NUM OR
407: p_sirv_rec.object_version_number IS NULL
408: THEN
409: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
410: l_return_status := OKC_API.G_RET_STS_ERROR;

Line 409: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');

405: l_return_status := OKC_API.G_RET_STS_ERROR;
406: ELSIF p_sirv_rec.object_version_number = OKC_API.G_MISS_NUM OR
407: p_sirv_rec.object_version_number IS NULL
408: THEN
409: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
410: l_return_status := OKC_API.G_RET_STS_ERROR;
411: END IF;
412: RETURN(l_return_status);
413: END Validate_Attributes;

Line 410: l_return_status := OKC_API.G_RET_STS_ERROR;

406: ELSIF p_sirv_rec.object_version_number = OKC_API.G_MISS_NUM OR
407: p_sirv_rec.object_version_number IS NULL
408: THEN
409: OKC_API.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
410: l_return_status := OKC_API.G_RET_STS_ERROR;
411: END IF;
412: RETURN(l_return_status);
413: END Validate_Attributes;
414:

Line 436: x_return_status := Okc_Api.G_RET_STS_SUCCESS;

432: ) IS
433:
434: BEGIN
435: -- initialize return status
436: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
437:
438: IF p_sirv_rec.id = Okc_Api.G_MISS_NUM OR
439: p_sirv_rec.id IS NULL
440: THEN

Line 438: IF p_sirv_rec.id = Okc_Api.G_MISS_NUM OR

434: BEGIN
435: -- initialize return status
436: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
437:
438: IF p_sirv_rec.id = Okc_Api.G_MISS_NUM OR
439: p_sirv_rec.id IS NULL
440: THEN
441: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
442: x_return_status := Okc_Api.G_RET_STS_ERROR;

Line 441: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');

437:
438: IF p_sirv_rec.id = Okc_Api.G_MISS_NUM OR
439: p_sirv_rec.id IS NULL
440: THEN
441: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
442: x_return_status := Okc_Api.G_RET_STS_ERROR;
443: RAISE G_EXCEPTION_HALT_VALIDATION;
444: END IF;
445:

Line 442: x_return_status := Okc_Api.G_RET_STS_ERROR;

438: IF p_sirv_rec.id = Okc_Api.G_MISS_NUM OR
439: p_sirv_rec.id IS NULL
440: THEN
441: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
442: x_return_status := Okc_Api.G_RET_STS_ERROR;
443: RAISE G_EXCEPTION_HALT_VALIDATION;
444: END IF;
445:
446: EXCEPTION

Line 454: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME

450: NULL;
451:
452: WHEN OTHERS THEN
453: -- store SQL error message on message stack for caller
454: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
455: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
456: ,p_token1 => G_OKL_SQLCODE_TOKEN
457: ,p_token1_value => SQLCODE
458: ,p_token2 => G_OKL_SQLERRM_TOKEN

Line 462: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;

458: ,p_token2 => G_OKL_SQLERRM_TOKEN
459: ,p_token2_value => SQLERRM);
460:
461: -- notify caller of an UNEXPECTED error
462: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
463:
464: END Validate_Id;
465:
466: ---------------------------------------------------------------------------

Line 486: x_return_status := Okc_Api.G_RET_STS_SUCCESS;

482:
483: BEGIN
484:
485: -- initialize return status
486: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
487:
488: IF p_sirv_rec.object_version_number = Okc_Api.G_MISS_NUM OR
489: p_sirv_rec.object_version_number IS NULL
490: THEN

Line 488: IF p_sirv_rec.object_version_number = Okc_Api.G_MISS_NUM OR

484:
485: -- initialize return status
486: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
487:
488: IF p_sirv_rec.object_version_number = Okc_Api.G_MISS_NUM OR
489: p_sirv_rec.object_version_number IS NULL
490: THEN
491: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
492: x_return_status := Okc_Api.G_RET_STS_ERROR;

Line 491: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');

487:
488: IF p_sirv_rec.object_version_number = Okc_Api.G_MISS_NUM OR
489: p_sirv_rec.object_version_number IS NULL
490: THEN
491: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
492: x_return_status := Okc_Api.G_RET_STS_ERROR;
493: RAISE G_EXCEPTION_HALT_VALIDATION;
494: END IF;
495:

Line 492: x_return_status := Okc_Api.G_RET_STS_ERROR;

488: IF p_sirv_rec.object_version_number = Okc_Api.G_MISS_NUM OR
489: p_sirv_rec.object_version_number IS NULL
490: THEN
491: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
492: x_return_status := Okc_Api.G_RET_STS_ERROR;
493: RAISE G_EXCEPTION_HALT_VALIDATION;
494: END IF;
495:
496: EXCEPTION

Line 504: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME

500: NULL;
501:
502: WHEN OTHERS THEN
503: -- store SQL error message on message stack for caller
504: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
505: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
506: ,p_token1 => G_OKL_SQLCODE_TOKEN
507: ,p_token1_value => SQLCODE
508: ,p_token2 => G_OKL_SQLERRM_TOKEN

Line 512: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;

508: ,p_token2 => G_OKL_SQLERRM_TOKEN
509: ,p_token2_value => SQLERRM);
510:
511: -- notify caller of an UNEXPECTED error
512: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
513:
514: END Validate_Object_Version_Number;
515:
516: ---------------------------------------------------------------------------

Line 545: x_return_status := Okc_Api.G_RET_STS_SUCCESS;

541:
542:
543: BEGIN
544: -- initialize return status
545: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
546:
547: IF p_sirv_rec.transaction_number = Okc_Api.G_MISS_NUM OR
548: p_sirv_rec.transaction_number IS NULL
549: THEN

Line 547: IF p_sirv_rec.transaction_number = Okc_Api.G_MISS_NUM OR

543: BEGIN
544: -- initialize return status
545: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
546:
547: IF p_sirv_rec.transaction_number = Okc_Api.G_MISS_NUM OR
548: p_sirv_rec.transaction_number IS NULL
549: THEN
550: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'transaction_number');
551: x_return_status := Okc_Api.G_RET_STS_ERROR;

Line 550: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'transaction_number');

546:
547: IF p_sirv_rec.transaction_number = Okc_Api.G_MISS_NUM OR
548: p_sirv_rec.transaction_number IS NULL
549: THEN
550: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'transaction_number');
551: x_return_status := Okc_Api.G_RET_STS_ERROR;
552: RAISE G_EXCEPTION_HALT_VALIDATION;
553: END IF;
554:

Line 551: x_return_status := Okc_Api.G_RET_STS_ERROR;

547: IF p_sirv_rec.transaction_number = Okc_Api.G_MISS_NUM OR
548: p_sirv_rec.transaction_number IS NULL
549: THEN
550: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'transaction_number');
551: x_return_status := Okc_Api.G_RET_STS_ERROR;
552: RAISE G_EXCEPTION_HALT_VALIDATION;
553: END IF;
554:
555: OPEN okl_sifv_pk_csr(p_sirv_rec.transaction_number);

Line 561: Okc_Api.set_message(G_OKC_APP,G_INVALID_VALUE,G_COL_NAME_TOKEN,'Transaction_Number');

557: l_row_not_found := okl_sifv_pk_csr%NOTFOUND;
558: CLOSE okl_sifv_pk_csr;
559:
560: IF l_row_not_found THEN
561: Okc_Api.set_message(G_OKC_APP,G_INVALID_VALUE,G_COL_NAME_TOKEN,'Transaction_Number');
562: x_return_status := Okc_Api.G_RET_STS_ERROR;
563: END IF;
564:
565:

Line 562: x_return_status := Okc_Api.G_RET_STS_ERROR;

558: CLOSE okl_sifv_pk_csr;
559:
560: IF l_row_not_found THEN
561: Okc_Api.set_message(G_OKC_APP,G_INVALID_VALUE,G_COL_NAME_TOKEN,'Transaction_Number');
562: x_return_status := Okc_Api.G_RET_STS_ERROR;
563: END IF;
564:
565:
566: EXCEPTION

Line 574: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME

570: NULL;
571:
572: WHEN OTHERS THEN
573: -- store SQL error message on message stack for caller
574: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
575: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
576: ,p_token1 => G_OKL_SQLCODE_TOKEN
577: ,p_token1_value => SQLCODE
578: ,p_token2 => G_OKL_SQLERRM_TOKEN

Line 582: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;

578: ,p_token2 => G_OKL_SQLERRM_TOKEN
579: ,p_token2_value => SQLERRM);
580:
581: -- notify caller of an UNEXPECTED error
582: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
583: -- verify that the cursor was closed
584: IF okl_sifv_pk_csr%ISOPEN THEN
585: CLOSE okl_sifv_pk_csr;
586: END IF;

Line 612: x_return_status := Okc_Api.G_RET_STS_SUCCESS;

608:
609: BEGIN
610:
611: -- initialize return status
612: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
613:
614: IF p_sirv_rec.Yield_Name = Okc_Api.G_MISS_CHAR OR
615: p_sirv_rec.Yield_Name IS NULL
616: THEN

Line 614: IF p_sirv_rec.Yield_Name = Okc_Api.G_MISS_CHAR OR

610:
611: -- initialize return status
612: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
613:
614: IF p_sirv_rec.Yield_Name = Okc_Api.G_MISS_CHAR OR
615: p_sirv_rec.Yield_Name IS NULL
616: THEN
617: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Yield_Name');
618: x_return_status := Okc_Api.G_RET_STS_ERROR;

Line 617: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Yield_Name');

613:
614: IF p_sirv_rec.Yield_Name = Okc_Api.G_MISS_CHAR OR
615: p_sirv_rec.Yield_Name IS NULL
616: THEN
617: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Yield_Name');
618: x_return_status := Okc_Api.G_RET_STS_ERROR;
619: RAISE G_EXCEPTION_HALT_VALIDATION;
620: END IF;
621:

Line 618: x_return_status := Okc_Api.G_RET_STS_ERROR;

614: IF p_sirv_rec.Yield_Name = Okc_Api.G_MISS_CHAR OR
615: p_sirv_rec.Yield_Name IS NULL
616: THEN
617: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Yield_Name');
618: x_return_status := Okc_Api.G_RET_STS_ERROR;
619: RAISE G_EXCEPTION_HALT_VALIDATION;
620: END IF;
621:
622: EXCEPTION

Line 630: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME

626: NULL;
627:
628: WHEN OTHERS THEN
629: -- store SQL error message on message stack for caller
630: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
631: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
632: ,p_token1 => G_OKL_SQLCODE_TOKEN
633: ,p_token1_value => SQLCODE
634: ,p_token2 => G_OKL_SQLERRM_TOKEN

Line 638: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;

634: ,p_token2 => G_OKL_SQLERRM_TOKEN
635: ,p_token2_value => SQLERRM);
636:
637: -- notify caller of an UNEXPECTED error
638: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
639:
640: END Validate_Yield_Name;
641:
642:

Line 668: Okc_Api.set_message(G_APP_NAME,G_OKL_UNQS);

664: l_row_found := okl_sir_unique_csr%FOUND;
665: CLOSE okl_sir_unique_csr;
666:
667: IF l_row_found THEN
668: Okc_Api.set_message(G_APP_NAME,G_OKL_UNQS);
669: x_return_status := Okc_Api.G_RET_STS_ERROR;
670: END IF;
671: EXCEPTION
672: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 669: x_return_status := Okc_Api.G_RET_STS_ERROR;

665: CLOSE okl_sir_unique_csr;
666:
667: IF l_row_found THEN
668: Okc_Api.set_message(G_APP_NAME,G_OKL_UNQS);
669: x_return_status := Okc_Api.G_RET_STS_ERROR;
670: END IF;
671: EXCEPTION
672: WHEN G_EXCEPTION_HALT_VALIDATION THEN
673: -- no processing necessary; validation can continue

Line 682: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME

678: END IF;
679:
680: WHEN OTHERS THEN
681: -- store SQL error message on message stack for caller
682: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
683: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
684: ,p_token1 => G_OKL_SQLCODE_TOKEN
685: ,p_token1_value => SQLCODE
686: ,p_token2 => G_OKL_SQLERRM_TOKEN

Line 690: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;

686: ,p_token2 => G_OKL_SQLERRM_TOKEN
687: ,p_token2_value => SQLERRM);
688:
689: -- notify caller of an UNEXPECTED error
690: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
691:
692: -- verify that the cursor was closed
693: IF okl_sir_unique_csr%ISOPEN THEN
694: CLOSE okl_sir_unique_csr;

Line 717: x_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

713: FUNCTION Validate_Attributes (
714: p_sirv_rec IN sirv_rec_type
715: ) RETURN VARCHAR2 IS
716:
717: x_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
718: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
719: BEGIN
720: -- call each column-level validation
721:

Line 718: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

714: p_sirv_rec IN sirv_rec_type
715: ) RETURN VARCHAR2 IS
716:
717: x_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
718: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
719: BEGIN
720: -- call each column-level validation
721:
722: -- Validate_Id

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

720: -- call each column-level validation
721:
722: -- Validate_Id
723: Validate_Id(p_sirv_rec, x_return_status);
724: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
725: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
726: -- need to exit
727: l_return_status := x_return_status;
728: RAISE G_EXCEPTION_HALT_VALIDATION;

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

721:
722: -- Validate_Id
723: Validate_Id(p_sirv_rec, x_return_status);
724: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
725: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
726: -- need to exit
727: l_return_status := x_return_status;
728: RAISE G_EXCEPTION_HALT_VALIDATION;
729: ELSE

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

735:
736:
737: -- Validate_Yield_Name
738: Validate_Yield_Name(p_sirv_rec, x_return_status);
739: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
740: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
741: -- need to exit
742: l_return_status := x_return_status;
743: RAISE G_EXCEPTION_HALT_VALIDATION;

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

736:
737: -- Validate_Yield_Name
738: Validate_Yield_Name(p_sirv_rec, x_return_status);
739: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
740: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
741: -- need to exit
742: l_return_status := x_return_status;
743: RAISE G_EXCEPTION_HALT_VALIDATION;
744: ELSE

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

748: END IF;
749:
750: -- Validate_Object_Version_Number
751: Validate_Object_Version_Number(p_sirv_rec, x_return_status);
752: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
753: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
754: -- need to exit
755: l_return_status := x_return_status;
756: RAISE G_EXCEPTION_HALT_VALIDATION;

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

749:
750: -- Validate_Object_Version_Number
751: Validate_Object_Version_Number(p_sirv_rec, x_return_status);
752: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
753: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
754: -- need to exit
755: l_return_status := x_return_status;
756: RAISE G_EXCEPTION_HALT_VALIDATION;
757: ELSE

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

761: END IF;
762:
763: -- Validate_Transaction_Number
764: Validate_Transaction_Number(p_sirv_rec, x_return_status);
765: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
766: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
767: -- need to exit
768: l_return_status := x_return_status;
769: RAISE G_EXCEPTION_HALT_VALIDATION;

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

762:
763: -- Validate_Transaction_Number
764: Validate_Transaction_Number(p_sirv_rec, x_return_status);
765: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
766: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
767: -- need to exit
768: l_return_status := x_return_status;
769: RAISE G_EXCEPTION_HALT_VALIDATION;
770: ELSE

Line 784: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,

780: RETURN (l_return_status);
781:
782: WHEN OTHERS THEN
783: -- store SQL error message on message stack for caller
784: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
785: p_msg_name => G_OKL_UNEXPECTED_ERROR,
786: p_token1 => G_OKL_SQLCODE_TOKEN,
787: p_token1_value => SQLCODE,
788: p_token2 => G_OKL_SQLERRM_TOKEN,

Line 791: l_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;

787: p_token1_value => SQLCODE,
788: p_token2 => G_OKL_SQLERRM_TOKEN,
789: p_token2_value => SQLERRM);
790: -- notify caller of an UNEXPECTED error
791: l_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
792:
793: RETURN(l_return_status);
794: END Validate_Attributes;
795:

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

803: ----------------------------------------
804: FUNCTION Validate_Record (
805: p_sirv_rec IN sirv_rec_type
806: ) RETURN VARCHAR2 IS
807: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
808: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
809: BEGIN
810: -- Validate_Unique_Sir_Record
811: Validate_Unique_Sir_Record(p_sirv_rec, x_return_status);

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

804: FUNCTION Validate_Record (
805: p_sirv_rec IN sirv_rec_type
806: ) RETURN VARCHAR2 IS
807: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
808: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
809: BEGIN
810: -- Validate_Unique_Sir_Record
811: Validate_Unique_Sir_Record(p_sirv_rec, x_return_status);
812: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN

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

808: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
809: BEGIN
810: -- Validate_Unique_Sir_Record
811: Validate_Unique_Sir_Record(p_sirv_rec, x_return_status);
812: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
813: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
814: -- need to leave
815: l_return_status := x_return_status;
816: RAISE G_EXCEPTION_HALT_VALIDATION;

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

809: BEGIN
810: -- Validate_Unique_Sir_Record
811: Validate_Unique_Sir_Record(p_sirv_rec, x_return_status);
812: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
813: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
814: -- need to leave
815: l_return_status := x_return_status;
816: RAISE G_EXCEPTION_HALT_VALIDATION;
817: ELSE

Line 832: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,

828: RETURN (l_return_status);
829:
830: WHEN OTHERS THEN
831: -- store SQL error message on message stack for caller
832: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
833: p_msg_name => G_OKL_UNEXPECTED_ERROR,
834: p_token1 => G_OKL_SQLCODE_TOKEN,
835: p_token1_value => SQLCODE,
836: p_token2 => G_OKL_SQLERRM_TOKEN,

Line 839: l_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;

835: p_token1_value => SQLCODE,
836: p_token2 => G_OKL_SQLERRM_TOKEN,
837: p_token2_value => SQLERRM);
838: -- notify caller of an UNEXPECTED error
839: l_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
840:
841: RETURN (l_return_status);
842: END Validate_Record;
843:

Line 946: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

942: -- validate_row for:OKL_SIF_RETS_V --
943: -------------------------------------
944: PROCEDURE validate_row(
945: p_api_version IN NUMBER,
946: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
947: x_return_status OUT NOCOPY VARCHAR2,
948: x_msg_count OUT NOCOPY NUMBER,
949: x_msg_data OUT NOCOPY VARCHAR2,
950: p_sirv_rec IN sirv_rec_type) IS

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

950: p_sirv_rec IN sirv_rec_type) IS
951:
952: l_api_version CONSTANT NUMBER := 1;
953: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
954: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
955: l_sirv_rec sirv_rec_type := p_sirv_rec;
956: l_sir_rec sir_rec_type;
957: BEGIN
958: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

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

954: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
955: l_sirv_rec sirv_rec_type := p_sirv_rec;
956: l_sir_rec sir_rec_type;
957: BEGIN
958: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
959: G_PKG_NAME,
960: p_init_msg_list,
961: l_api_version,
962: p_api_version,

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

961: l_api_version,
962: p_api_version,
963: '_PVT',
964: x_return_status);
965: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
966: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
967: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
968: RAISE OKC_API.G_EXCEPTION_ERROR;
969: END IF;

Line 966: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

962: p_api_version,
963: '_PVT',
964: x_return_status);
965: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
966: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
967: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
968: RAISE OKC_API.G_EXCEPTION_ERROR;
969: END IF;
970: --- Validate all non-missing attributes (Item Level Validation)

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

963: '_PVT',
964: x_return_status);
965: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
966: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
967: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
968: RAISE OKC_API.G_EXCEPTION_ERROR;
969: END IF;
970: --- Validate all non-missing attributes (Item Level Validation)
971: l_return_status := Validate_Attributes(l_sirv_rec);

Line 968: RAISE OKC_API.G_EXCEPTION_ERROR;

964: x_return_status);
965: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
966: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
967: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
968: RAISE OKC_API.G_EXCEPTION_ERROR;
969: END IF;
970: --- Validate all non-missing attributes (Item Level Validation)
971: l_return_status := Validate_Attributes(l_sirv_rec);
972: --- If any errors happen abort API

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

969: END IF;
970: --- Validate all non-missing attributes (Item Level Validation)
971: l_return_status := Validate_Attributes(l_sirv_rec);
972: --- If any errors happen abort API
973: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
974: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
975: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
976: RAISE OKC_API.G_EXCEPTION_ERROR;
977: END IF;

Line 974: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

970: --- Validate all non-missing attributes (Item Level Validation)
971: l_return_status := Validate_Attributes(l_sirv_rec);
972: --- If any errors happen abort API
973: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
974: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
975: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
976: RAISE OKC_API.G_EXCEPTION_ERROR;
977: END IF;
978: l_return_status := Validate_Record(l_sirv_rec);

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

971: l_return_status := Validate_Attributes(l_sirv_rec);
972: --- If any errors happen abort API
973: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
974: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
975: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
976: RAISE OKC_API.G_EXCEPTION_ERROR;
977: END IF;
978: l_return_status := Validate_Record(l_sirv_rec);
979: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 976: RAISE OKC_API.G_EXCEPTION_ERROR;

972: --- If any errors happen abort API
973: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
974: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
975: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
976: RAISE OKC_API.G_EXCEPTION_ERROR;
977: END IF;
978: l_return_status := Validate_Record(l_sirv_rec);
979: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
980: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

975: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
976: RAISE OKC_API.G_EXCEPTION_ERROR;
977: END IF;
978: l_return_status := Validate_Record(l_sirv_rec);
979: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
980: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
981: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
982: RAISE OKC_API.G_EXCEPTION_ERROR;
983: END IF;

Line 980: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

976: RAISE OKC_API.G_EXCEPTION_ERROR;
977: END IF;
978: l_return_status := Validate_Record(l_sirv_rec);
979: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
980: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
981: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
982: RAISE OKC_API.G_EXCEPTION_ERROR;
983: END IF;
984: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

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

977: END IF;
978: l_return_status := Validate_Record(l_sirv_rec);
979: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
980: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
981: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
982: RAISE OKC_API.G_EXCEPTION_ERROR;
983: END IF;
984: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
985: EXCEPTION

Line 982: RAISE OKC_API.G_EXCEPTION_ERROR;

978: l_return_status := Validate_Record(l_sirv_rec);
979: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
980: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
981: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
982: RAISE OKC_API.G_EXCEPTION_ERROR;
983: END IF;
984: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
985: EXCEPTION
986: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

980: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
981: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
982: RAISE OKC_API.G_EXCEPTION_ERROR;
983: END IF;
984: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
985: EXCEPTION
986: WHEN OKC_API.G_EXCEPTION_ERROR THEN
987: x_return_status := OKC_API.HANDLE_EXCEPTIONS
988: (

Line 986: WHEN OKC_API.G_EXCEPTION_ERROR THEN

982: RAISE OKC_API.G_EXCEPTION_ERROR;
983: END IF;
984: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
985: EXCEPTION
986: WHEN OKC_API.G_EXCEPTION_ERROR THEN
987: x_return_status := OKC_API.HANDLE_EXCEPTIONS
988: (
989: l_api_name,
990: G_PKG_NAME,

Line 987: x_return_status := OKC_API.HANDLE_EXCEPTIONS

983: END IF;
984: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
985: EXCEPTION
986: WHEN OKC_API.G_EXCEPTION_ERROR THEN
987: x_return_status := OKC_API.HANDLE_EXCEPTIONS
988: (
989: l_api_name,
990: G_PKG_NAME,
991: 'OKC_API.G_RET_STS_ERROR',

Line 991: 'OKC_API.G_RET_STS_ERROR',

987: x_return_status := OKC_API.HANDLE_EXCEPTIONS
988: (
989: l_api_name,
990: G_PKG_NAME,
991: 'OKC_API.G_RET_STS_ERROR',
992: x_msg_count,
993: x_msg_data,
994: '_PVT'
995: );

Line 996: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

992: x_msg_count,
993: x_msg_data,
994: '_PVT'
995: );
996: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
997: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
998: (
999: l_api_name,
1000: G_PKG_NAME,

Line 997: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

993: x_msg_data,
994: '_PVT'
995: );
996: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
997: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
998: (
999: l_api_name,
1000: G_PKG_NAME,
1001: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1001: 'OKC_API.G_RET_STS_UNEXP_ERROR',

997: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
998: (
999: l_api_name,
1000: G_PKG_NAME,
1001: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1002: x_msg_count,
1003: x_msg_data,
1004: '_PVT'
1005: );

Line 1007: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1003: x_msg_data,
1004: '_PVT'
1005: );
1006: WHEN OTHERS THEN
1007: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1008: (
1009: l_api_name,
1010: G_PKG_NAME,
1011: 'OTHERS',

Line 1022: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1018: -- PL/SQL TBL validate_row for:SIRV_TBL --
1019: ------------------------------------------
1020: PROCEDURE validate_row(
1021: p_api_version IN NUMBER,
1022: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1023: x_return_status OUT NOCOPY VARCHAR2,
1024: x_msg_count OUT NOCOPY NUMBER,
1025: x_msg_data OUT NOCOPY VARCHAR2,
1026: p_sirv_tbl IN sirv_tbl_type) IS

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

1026: p_sirv_tbl IN sirv_tbl_type) IS
1027:
1028: l_api_version CONSTANT NUMBER := 1;
1029: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
1030: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1031: i NUMBER := 0;
1032: -- START change : akjain, 09/05/2001
1033: -- Adding OverAll Status Flag
1034: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

Line 1034: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

1030: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1031: i NUMBER := 0;
1032: -- START change : akjain, 09/05/2001
1033: -- Adding OverAll Status Flag
1034: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1035: -- END change : akjain
1036:
1037: BEGIN
1038: OKC_API.init_msg_list(p_init_msg_list);

Line 1038: OKC_API.init_msg_list(p_init_msg_list);

1034: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1035: -- END change : akjain
1036:
1037: BEGIN
1038: OKC_API.init_msg_list(p_init_msg_list);
1039: -- Make sure PL/SQL table has records in it before passing
1040: IF (p_sirv_tbl.COUNT > 0) THEN
1041: i := p_sirv_tbl.FIRST;
1042: LOOP

Line 1045: p_init_msg_list => OKC_API.G_FALSE,

1041: i := p_sirv_tbl.FIRST;
1042: LOOP
1043: validate_row (
1044: p_api_version => p_api_version,
1045: p_init_msg_list => OKC_API.G_FALSE,
1046: x_return_status => x_return_status,
1047: x_msg_count => x_msg_count,
1048: x_msg_data => x_msg_data,
1049: p_sirv_rec => p_sirv_tbl(i));

Line 1052: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN

1048: x_msg_data => x_msg_data,
1049: p_sirv_rec => p_sirv_tbl(i));
1050: -- START change : akjain, 09/05/2001
1051: -- store the highest degree of error
1052: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
1053: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
1054: l_overall_status := x_return_status;
1055: END IF;
1056: END IF;

Line 1053: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN

1049: p_sirv_rec => p_sirv_tbl(i));
1050: -- START change : akjain, 09/05/2001
1051: -- store the highest degree of error
1052: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
1053: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
1054: l_overall_status := x_return_status;
1055: END IF;
1056: END IF;
1057: -- END change : akjain

Line 1068: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1064: -- END change : akjain
1065:
1066: END IF;
1067: EXCEPTION
1068: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1069: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1070: (
1071: l_api_name,
1072: G_PKG_NAME,

Line 1069: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1065:
1066: END IF;
1067: EXCEPTION
1068: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1069: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1070: (
1071: l_api_name,
1072: G_PKG_NAME,
1073: 'OKC_API.G_RET_STS_ERROR',

Line 1073: 'OKC_API.G_RET_STS_ERROR',

1069: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1070: (
1071: l_api_name,
1072: G_PKG_NAME,
1073: 'OKC_API.G_RET_STS_ERROR',
1074: x_msg_count,
1075: x_msg_data,
1076: '_PVT'
1077: );

Line 1078: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1074: x_msg_count,
1075: x_msg_data,
1076: '_PVT'
1077: );
1078: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1079: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1080: (
1081: l_api_name,
1082: G_PKG_NAME,

Line 1079: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1075: x_msg_data,
1076: '_PVT'
1077: );
1078: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1079: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1080: (
1081: l_api_name,
1082: G_PKG_NAME,
1083: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1083: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1079: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1080: (
1081: l_api_name,
1082: G_PKG_NAME,
1083: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1084: x_msg_count,
1085: x_msg_data,
1086: '_PVT'
1087: );

Line 1089: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1085: x_msg_data,
1086: '_PVT'
1087: );
1088: WHEN OTHERS THEN
1089: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1090: (
1091: l_api_name,
1092: G_PKG_NAME,
1093: 'OTHERS',

Line 1107: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1103: ---------------------------------
1104: -- insert_row for:OKL_SIF_RETS --
1105: ---------------------------------
1106: PROCEDURE insert_row(
1107: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1108: x_return_status OUT NOCOPY VARCHAR2,
1109: x_msg_count OUT NOCOPY NUMBER,
1110: x_msg_data OUT NOCOPY VARCHAR2,
1111: p_sir_rec IN sir_rec_type,

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

1112: x_sir_rec OUT NOCOPY sir_rec_type) IS
1113:
1114: l_api_version CONSTANT NUMBER := 1;
1115: l_api_name CONSTANT VARCHAR2(30) := 'RETS_insert_row';
1116: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1117: l_sir_rec sir_rec_type := p_sir_rec;
1118: l_def_sir_rec sir_rec_type;
1119: -------------------------------------
1120: -- Set_Attributes for:OKL_SIF_RETS --

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

1122: FUNCTION Set_Attributes (
1123: p_sir_rec IN sir_rec_type,
1124: x_sir_rec OUT NOCOPY sir_rec_type
1125: ) RETURN VARCHAR2 IS
1126: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1127: BEGIN
1128: x_sir_rec := p_sir_rec;
1129: RETURN(l_return_status);
1130: END Set_Attributes;

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

1128: x_sir_rec := p_sir_rec;
1129: RETURN(l_return_status);
1130: END Set_Attributes;
1131: BEGIN
1132: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1133: p_init_msg_list,
1134: '_PVT',
1135: x_return_status);
1136: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

1132: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1133: p_init_msg_list,
1134: '_PVT',
1135: x_return_status);
1136: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1137: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1138: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1139: RAISE OKC_API.G_EXCEPTION_ERROR;
1140: END IF;

Line 1137: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1133: p_init_msg_list,
1134: '_PVT',
1135: x_return_status);
1136: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1137: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1138: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1139: RAISE OKC_API.G_EXCEPTION_ERROR;
1140: END IF;
1141: --- Setting item attributes

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

1134: '_PVT',
1135: x_return_status);
1136: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1137: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1138: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1139: RAISE OKC_API.G_EXCEPTION_ERROR;
1140: END IF;
1141: --- Setting item attributes
1142: l_return_status := Set_Attributes(

Line 1139: RAISE OKC_API.G_EXCEPTION_ERROR;

1135: x_return_status);
1136: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1137: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1138: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1139: RAISE OKC_API.G_EXCEPTION_ERROR;
1140: END IF;
1141: --- Setting item attributes
1142: l_return_status := Set_Attributes(
1143: p_sir_rec, -- IN

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

1142: l_return_status := Set_Attributes(
1143: p_sir_rec, -- IN
1144: l_sir_rec); -- OUT
1145: --- If any errors happen abort API
1146: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1147: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1148: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1149: RAISE OKC_API.G_EXCEPTION_ERROR;
1150: END IF;

Line 1147: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1143: p_sir_rec, -- IN
1144: l_sir_rec); -- OUT
1145: --- If any errors happen abort API
1146: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1147: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1148: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1149: RAISE OKC_API.G_EXCEPTION_ERROR;
1150: END IF;
1151: INSERT INTO OKL_SIF_RETS(

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

1144: l_sir_rec); -- OUT
1145: --- If any errors happen abort API
1146: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1147: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1148: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1149: RAISE OKC_API.G_EXCEPTION_ERROR;
1150: END IF;
1151: INSERT INTO OKL_SIF_RETS(
1152: id,

Line 1149: RAISE OKC_API.G_EXCEPTION_ERROR;

1145: --- If any errors happen abort API
1146: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1147: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1148: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1149: RAISE OKC_API.G_EXCEPTION_ERROR;
1150: END IF;
1151: INSERT INTO OKL_SIF_RETS(
1152: id,
1153: transaction_number,

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

1231: -- end,mvasudev -- 02/21/2002
1232: );
1233: -- Set OUT values
1234: x_sir_rec := l_sir_rec;
1235: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1236: EXCEPTION
1237: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1238: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1239: (

Line 1237: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1233: -- Set OUT values
1234: x_sir_rec := l_sir_rec;
1235: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1236: EXCEPTION
1237: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1238: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1239: (
1240: l_api_name,
1241: G_PKG_NAME,

Line 1238: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1234: x_sir_rec := l_sir_rec;
1235: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1236: EXCEPTION
1237: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1238: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1239: (
1240: l_api_name,
1241: G_PKG_NAME,
1242: 'OKC_API.G_RET_STS_ERROR',

Line 1242: 'OKC_API.G_RET_STS_ERROR',

1238: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1239: (
1240: l_api_name,
1241: G_PKG_NAME,
1242: 'OKC_API.G_RET_STS_ERROR',
1243: x_msg_count,
1244: x_msg_data,
1245: '_PVT'
1246: );

Line 1247: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

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

Line 1248: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

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

Line 1252: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1248: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1249: (
1250: l_api_name,
1251: G_PKG_NAME,
1252: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1253: x_msg_count,
1254: x_msg_data,
1255: '_PVT'
1256: );

Line 1258: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

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

Line 1273: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1269: -- insert_row for:OKL_SIF_RETS_V --
1270: -----------------------------------
1271: PROCEDURE insert_row(
1272: p_api_version IN NUMBER,
1273: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1274: x_return_status OUT NOCOPY VARCHAR2,
1275: x_msg_count OUT NOCOPY NUMBER,
1276: x_msg_data OUT NOCOPY VARCHAR2,
1277: p_sirv_rec IN sirv_rec_type,

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

1278: x_sirv_rec OUT NOCOPY sirv_rec_type) IS
1279:
1280: l_api_version CONSTANT NUMBER := 1;
1281: l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
1282: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1283: l_sirv_rec sirv_rec_type;
1284: l_def_sirv_rec sirv_rec_type;
1285: l_sir_rec sir_rec_type;
1286: lx_sir_rec sir_rec_type;

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

1305: FUNCTION Set_Attributes (
1306: p_sirv_rec IN sirv_rec_type,
1307: x_sirv_rec OUT NOCOPY sirv_rec_type
1308: ) RETURN VARCHAR2 IS
1309: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1310: BEGIN
1311: x_sirv_rec := p_sirv_rec;
1312: x_sirv_rec.OBJECT_VERSION_NUMBER := 1;
1313:

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

1324:
1325: RETURN(l_return_status);
1326: END Set_Attributes;
1327: BEGIN
1328: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1329: G_PKG_NAME,
1330: p_init_msg_list,
1331: l_api_version,
1332: p_api_version,

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

1331: l_api_version,
1332: p_api_version,
1333: '_PVT',
1334: x_return_status);
1335: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1336: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1337: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1338: RAISE OKC_API.G_EXCEPTION_ERROR;
1339: END IF;

Line 1336: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1332: p_api_version,
1333: '_PVT',
1334: x_return_status);
1335: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1336: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1337: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1338: RAISE OKC_API.G_EXCEPTION_ERROR;
1339: END IF;
1340: l_sirv_rec := null_out_defaults(p_sirv_rec);

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

1333: '_PVT',
1334: x_return_status);
1335: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1336: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1337: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1338: RAISE OKC_API.G_EXCEPTION_ERROR;
1339: END IF;
1340: l_sirv_rec := null_out_defaults(p_sirv_rec);
1341: -- Set primary key value

Line 1338: RAISE OKC_API.G_EXCEPTION_ERROR;

1334: x_return_status);
1335: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1336: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1337: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1338: RAISE OKC_API.G_EXCEPTION_ERROR;
1339: END IF;
1340: l_sirv_rec := null_out_defaults(p_sirv_rec);
1341: -- Set primary key value
1342: l_sirv_rec.ID := get_seq_id;

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

1344: l_return_status := Set_Attributes(
1345: l_sirv_rec, -- IN
1346: l_def_sirv_rec); -- OUT
1347: --- If any errors happen abort API
1348: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1349: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1350: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1351: RAISE OKC_API.G_EXCEPTION_ERROR;
1352: END IF;

Line 1349: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1345: l_sirv_rec, -- IN
1346: l_def_sirv_rec); -- OUT
1347: --- If any errors happen abort API
1348: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1349: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1350: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1351: RAISE OKC_API.G_EXCEPTION_ERROR;
1352: END IF;
1353: l_def_sirv_rec := fill_who_columns(l_def_sirv_rec);

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

1346: l_def_sirv_rec); -- OUT
1347: --- If any errors happen abort API
1348: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1349: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1350: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1351: RAISE OKC_API.G_EXCEPTION_ERROR;
1352: END IF;
1353: l_def_sirv_rec := fill_who_columns(l_def_sirv_rec);
1354: --- Validate all non-missing attributes (Item Level Validation)

Line 1351: RAISE OKC_API.G_EXCEPTION_ERROR;

1347: --- If any errors happen abort API
1348: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1349: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1350: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1351: RAISE OKC_API.G_EXCEPTION_ERROR;
1352: END IF;
1353: l_def_sirv_rec := fill_who_columns(l_def_sirv_rec);
1354: --- Validate all non-missing attributes (Item Level Validation)
1355: l_return_status := Validate_Attributes(l_def_sirv_rec);

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

1353: l_def_sirv_rec := fill_who_columns(l_def_sirv_rec);
1354: --- Validate all non-missing attributes (Item Level Validation)
1355: l_return_status := Validate_Attributes(l_def_sirv_rec);
1356: --- If any errors happen abort API
1357: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1358: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1359: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1360: RAISE OKC_API.G_EXCEPTION_ERROR;
1361: END IF;

Line 1358: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1354: --- Validate all non-missing attributes (Item Level Validation)
1355: l_return_status := Validate_Attributes(l_def_sirv_rec);
1356: --- If any errors happen abort API
1357: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1358: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1359: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1360: RAISE OKC_API.G_EXCEPTION_ERROR;
1361: END IF;
1362: l_return_status := Validate_Record(l_def_sirv_rec);

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

1355: l_return_status := Validate_Attributes(l_def_sirv_rec);
1356: --- If any errors happen abort API
1357: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1358: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1359: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1360: RAISE OKC_API.G_EXCEPTION_ERROR;
1361: END IF;
1362: l_return_status := Validate_Record(l_def_sirv_rec);
1363: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1360: RAISE OKC_API.G_EXCEPTION_ERROR;

1356: --- If any errors happen abort API
1357: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1358: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1359: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1360: RAISE OKC_API.G_EXCEPTION_ERROR;
1361: END IF;
1362: l_return_status := Validate_Record(l_def_sirv_rec);
1363: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1364: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

1359: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1360: RAISE OKC_API.G_EXCEPTION_ERROR;
1361: END IF;
1362: l_return_status := Validate_Record(l_def_sirv_rec);
1363: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1364: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1365: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1366: RAISE OKC_API.G_EXCEPTION_ERROR;
1367: END IF;

Line 1364: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1360: RAISE OKC_API.G_EXCEPTION_ERROR;
1361: END IF;
1362: l_return_status := Validate_Record(l_def_sirv_rec);
1363: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1364: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1365: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1366: RAISE OKC_API.G_EXCEPTION_ERROR;
1367: END IF;
1368: --------------------------------------

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

1361: END IF;
1362: l_return_status := Validate_Record(l_def_sirv_rec);
1363: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1364: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1365: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1366: RAISE OKC_API.G_EXCEPTION_ERROR;
1367: END IF;
1368: --------------------------------------
1369: -- Move VIEW record to "Child" records

Line 1366: RAISE OKC_API.G_EXCEPTION_ERROR;

1362: l_return_status := Validate_Record(l_def_sirv_rec);
1363: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1364: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1365: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1366: RAISE OKC_API.G_EXCEPTION_ERROR;
1367: END IF;
1368: --------------------------------------
1369: -- Move VIEW record to "Child" records
1370: --------------------------------------

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

1379: x_msg_data,
1380: l_sir_rec,
1381: lx_sir_rec
1382: );
1383: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1384: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1385: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1386: RAISE OKC_API.G_EXCEPTION_ERROR;
1387: END IF;

Line 1384: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1380: l_sir_rec,
1381: lx_sir_rec
1382: );
1383: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1384: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1385: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1386: RAISE OKC_API.G_EXCEPTION_ERROR;
1387: END IF;
1388: migrate(lx_sir_rec, l_def_sirv_rec);

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

1381: lx_sir_rec
1382: );
1383: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1384: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1385: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1386: RAISE OKC_API.G_EXCEPTION_ERROR;
1387: END IF;
1388: migrate(lx_sir_rec, l_def_sirv_rec);
1389: -- Set OUT values

Line 1386: RAISE OKC_API.G_EXCEPTION_ERROR;

1382: );
1383: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1384: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1385: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1386: RAISE OKC_API.G_EXCEPTION_ERROR;
1387: END IF;
1388: migrate(lx_sir_rec, l_def_sirv_rec);
1389: -- Set OUT values
1390: x_sirv_rec := l_def_sirv_rec;

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

1387: END IF;
1388: migrate(lx_sir_rec, l_def_sirv_rec);
1389: -- Set OUT values
1390: x_sirv_rec := l_def_sirv_rec;
1391: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1392: EXCEPTION
1393: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1394: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1395: (

Line 1393: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1389: -- Set OUT values
1390: x_sirv_rec := l_def_sirv_rec;
1391: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1392: EXCEPTION
1393: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1394: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1395: (
1396: l_api_name,
1397: G_PKG_NAME,

Line 1394: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1390: x_sirv_rec := l_def_sirv_rec;
1391: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1392: EXCEPTION
1393: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1394: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1395: (
1396: l_api_name,
1397: G_PKG_NAME,
1398: 'OKC_API.G_RET_STS_ERROR',

Line 1398: 'OKC_API.G_RET_STS_ERROR',

1394: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1395: (
1396: l_api_name,
1397: G_PKG_NAME,
1398: 'OKC_API.G_RET_STS_ERROR',
1399: x_msg_count,
1400: x_msg_data,
1401: '_PVT'
1402: );

Line 1403: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1399: x_msg_count,
1400: x_msg_data,
1401: '_PVT'
1402: );
1403: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1404: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1405: (
1406: l_api_name,
1407: G_PKG_NAME,

Line 1404: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1400: x_msg_data,
1401: '_PVT'
1402: );
1403: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1404: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1405: (
1406: l_api_name,
1407: G_PKG_NAME,
1408: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1408: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1404: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1405: (
1406: l_api_name,
1407: G_PKG_NAME,
1408: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1409: x_msg_count,
1410: x_msg_data,
1411: '_PVT'
1412: );

Line 1414: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1410: x_msg_data,
1411: '_PVT'
1412: );
1413: WHEN OTHERS THEN
1414: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1415: (
1416: l_api_name,
1417: G_PKG_NAME,
1418: 'OTHERS',

Line 1429: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1425: -- PL/SQL TBL insert_row for:SIRV_TBL --
1426: ----------------------------------------
1427: PROCEDURE insert_row(
1428: p_api_version IN NUMBER,
1429: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1430: x_return_status OUT NOCOPY VARCHAR2,
1431: x_msg_count OUT NOCOPY NUMBER,
1432: x_msg_data OUT NOCOPY VARCHAR2,
1433: p_sirv_tbl IN sirv_tbl_type,

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

1434: x_sirv_tbl OUT NOCOPY sirv_tbl_type) IS
1435:
1436: l_api_version CONSTANT NUMBER := 1;
1437: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1438: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1439: i NUMBER := 0;
1440: -- START change : akjain, 09/05/2001
1441: -- Adding OverAll Status Flag
1442: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

Line 1442: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

1438: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1439: i NUMBER := 0;
1440: -- START change : akjain, 09/05/2001
1441: -- Adding OverAll Status Flag
1442: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1443: -- END change : akjain
1444:
1445: BEGIN
1446: OKC_API.init_msg_list(p_init_msg_list);

Line 1446: OKC_API.init_msg_list(p_init_msg_list);

1442: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1443: -- END change : akjain
1444:
1445: BEGIN
1446: OKC_API.init_msg_list(p_init_msg_list);
1447: -- Make sure PL/SQL table has records in it before passing
1448: IF (p_sirv_tbl.COUNT > 0) THEN
1449: i := p_sirv_tbl.FIRST;
1450: LOOP

Line 1453: p_init_msg_list => OKC_API.G_FALSE,

1449: i := p_sirv_tbl.FIRST;
1450: LOOP
1451: insert_row (
1452: p_api_version => p_api_version,
1453: p_init_msg_list => OKC_API.G_FALSE,
1454: x_return_status => x_return_status,
1455: x_msg_count => x_msg_count,
1456: x_msg_data => x_msg_data,
1457: p_sirv_rec => p_sirv_tbl(i),

Line 1461: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN

1457: p_sirv_rec => p_sirv_tbl(i),
1458: x_sirv_rec => x_sirv_tbl(i));
1459: -- START change : akjain, 09/05/2001
1460: -- store the highest degree of error
1461: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
1462: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
1463: l_overall_status := x_return_status;
1464: END IF;
1465: END IF;

Line 1462: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN

1458: x_sirv_rec => x_sirv_tbl(i));
1459: -- START change : akjain, 09/05/2001
1460: -- store the highest degree of error
1461: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
1462: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
1463: l_overall_status := x_return_status;
1464: END IF;
1465: END IF;
1466: -- END change : akjain

Line 1477: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1473: -- END change : akjain
1474:
1475: END IF;
1476: EXCEPTION
1477: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1478: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1479: (
1480: l_api_name,
1481: G_PKG_NAME,

Line 1478: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1474:
1475: END IF;
1476: EXCEPTION
1477: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1478: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1479: (
1480: l_api_name,
1481: G_PKG_NAME,
1482: 'OKC_API.G_RET_STS_ERROR',

Line 1482: 'OKC_API.G_RET_STS_ERROR',

1478: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1479: (
1480: l_api_name,
1481: G_PKG_NAME,
1482: 'OKC_API.G_RET_STS_ERROR',
1483: x_msg_count,
1484: x_msg_data,
1485: '_PVT'
1486: );

Line 1487: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1483: x_msg_count,
1484: x_msg_data,
1485: '_PVT'
1486: );
1487: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1488: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1489: (
1490: l_api_name,
1491: G_PKG_NAME,

Line 1488: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1484: x_msg_data,
1485: '_PVT'
1486: );
1487: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1488: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1489: (
1490: l_api_name,
1491: G_PKG_NAME,
1492: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1492: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1488: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1489: (
1490: l_api_name,
1491: G_PKG_NAME,
1492: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1493: x_msg_count,
1494: x_msg_data,
1495: '_PVT'
1496: );

Line 1498: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1494: x_msg_data,
1495: '_PVT'
1496: );
1497: WHEN OTHERS THEN
1498: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1499: (
1500: l_api_name,
1501: G_PKG_NAME,
1502: 'OTHERS',

Line 1516: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1512: -------------------------------
1513: -- lock_row for:OKL_SIF_RETS --
1514: -------------------------------
1515: PROCEDURE lock_row(
1516: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1517: x_return_status OUT NOCOPY VARCHAR2,
1518: x_msg_count OUT NOCOPY NUMBER,
1519: x_msg_data OUT NOCOPY VARCHAR2,
1520: p_sir_rec IN sir_rec_type) IS

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

1533: FROM OKL_SIF_RETS
1534: WHERE ID = p_sir_rec.id;
1535: l_api_version CONSTANT NUMBER := 1;
1536: l_api_name CONSTANT VARCHAR2(30) := 'RETS_lock_row';
1537: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1538: l_object_version_number OKL_SIF_RETS.OBJECT_VERSION_NUMBER%TYPE;
1539: lc_object_version_number OKL_SIF_RETS.OBJECT_VERSION_NUMBER%TYPE;
1540: l_row_notfound BOOLEAN := FALSE;
1541: lc_row_notfound BOOLEAN := FALSE;

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

1539: lc_object_version_number OKL_SIF_RETS.OBJECT_VERSION_NUMBER%TYPE;
1540: l_row_notfound BOOLEAN := FALSE;
1541: lc_row_notfound BOOLEAN := FALSE;
1542: BEGIN
1543: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1544: p_init_msg_list,
1545: '_PVT',
1546: x_return_status);
1547: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

1543: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1544: p_init_msg_list,
1545: '_PVT',
1546: x_return_status);
1547: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1548: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1549: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1550: RAISE OKC_API.G_EXCEPTION_ERROR;
1551: END IF;

Line 1548: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1544: p_init_msg_list,
1545: '_PVT',
1546: x_return_status);
1547: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1548: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1549: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1550: RAISE OKC_API.G_EXCEPTION_ERROR;
1551: END IF;
1552: BEGIN

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

1545: '_PVT',
1546: x_return_status);
1547: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1548: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1549: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1550: RAISE OKC_API.G_EXCEPTION_ERROR;
1551: END IF;
1552: BEGIN
1553: OPEN lock_csr(p_sir_rec);

Line 1550: RAISE OKC_API.G_EXCEPTION_ERROR;

1546: x_return_status);
1547: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1548: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1549: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1550: RAISE OKC_API.G_EXCEPTION_ERROR;
1551: END IF;
1552: BEGIN
1553: OPEN lock_csr(p_sir_rec);
1554: FETCH lock_csr INTO l_object_version_number;

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

1558: WHEN E_Resource_Busy THEN
1559: IF (lock_csr%ISOPEN) THEN
1560: CLOSE lock_csr;
1561: END IF;
1562: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
1563: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1564: END;
1565:
1566: IF ( l_row_notfound ) THEN

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

1569: lc_row_notfound := lchk_csr%NOTFOUND;
1570: CLOSE lchk_csr;
1571: END IF;
1572: IF (lc_row_notfound) THEN
1573: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1574: RAISE OKC_API.G_EXCEPTION_ERROR;
1575: ELSIF lc_object_version_number > p_sir_rec.object_version_number THEN
1576: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1577: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1574: RAISE OKC_API.G_EXCEPTION_ERROR;

1570: CLOSE lchk_csr;
1571: END IF;
1572: IF (lc_row_notfound) THEN
1573: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1574: RAISE OKC_API.G_EXCEPTION_ERROR;
1575: ELSIF lc_object_version_number > p_sir_rec.object_version_number THEN
1576: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1577: RAISE OKC_API.G_EXCEPTION_ERROR;
1578: ELSIF lc_object_version_number <> p_sir_rec.object_version_number THEN

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

1572: IF (lc_row_notfound) THEN
1573: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1574: RAISE OKC_API.G_EXCEPTION_ERROR;
1575: ELSIF lc_object_version_number > p_sir_rec.object_version_number THEN
1576: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1577: RAISE OKC_API.G_EXCEPTION_ERROR;
1578: ELSIF lc_object_version_number <> p_sir_rec.object_version_number THEN
1579: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1580: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1577: RAISE OKC_API.G_EXCEPTION_ERROR;

1573: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1574: RAISE OKC_API.G_EXCEPTION_ERROR;
1575: ELSIF lc_object_version_number > p_sir_rec.object_version_number THEN
1576: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1577: RAISE OKC_API.G_EXCEPTION_ERROR;
1578: ELSIF lc_object_version_number <> p_sir_rec.object_version_number THEN
1579: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1580: RAISE OKC_API.G_EXCEPTION_ERROR;
1581: ELSIF lc_object_version_number = -1 THEN

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

1575: ELSIF lc_object_version_number > p_sir_rec.object_version_number THEN
1576: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1577: RAISE OKC_API.G_EXCEPTION_ERROR;
1578: ELSIF lc_object_version_number <> p_sir_rec.object_version_number THEN
1579: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1580: RAISE OKC_API.G_EXCEPTION_ERROR;
1581: ELSIF lc_object_version_number = -1 THEN
1582: OKC_API.set_message(G_OKC_APP,G_RECORD_LOGICALLY_DELETED);
1583: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1580: RAISE OKC_API.G_EXCEPTION_ERROR;

1576: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1577: RAISE OKC_API.G_EXCEPTION_ERROR;
1578: ELSIF lc_object_version_number <> p_sir_rec.object_version_number THEN
1579: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1580: RAISE OKC_API.G_EXCEPTION_ERROR;
1581: ELSIF lc_object_version_number = -1 THEN
1582: OKC_API.set_message(G_OKC_APP,G_RECORD_LOGICALLY_DELETED);
1583: RAISE OKC_API.G_EXCEPTION_ERROR;
1584: END IF;

Line 1582: OKC_API.set_message(G_OKC_APP,G_RECORD_LOGICALLY_DELETED);

1578: ELSIF lc_object_version_number <> p_sir_rec.object_version_number THEN
1579: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1580: RAISE OKC_API.G_EXCEPTION_ERROR;
1581: ELSIF lc_object_version_number = -1 THEN
1582: OKC_API.set_message(G_OKC_APP,G_RECORD_LOGICALLY_DELETED);
1583: RAISE OKC_API.G_EXCEPTION_ERROR;
1584: END IF;
1585: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1586: EXCEPTION

Line 1583: RAISE OKC_API.G_EXCEPTION_ERROR;

1579: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1580: RAISE OKC_API.G_EXCEPTION_ERROR;
1581: ELSIF lc_object_version_number = -1 THEN
1582: OKC_API.set_message(G_OKC_APP,G_RECORD_LOGICALLY_DELETED);
1583: RAISE OKC_API.G_EXCEPTION_ERROR;
1584: END IF;
1585: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1586: EXCEPTION
1587: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

1581: ELSIF lc_object_version_number = -1 THEN
1582: OKC_API.set_message(G_OKC_APP,G_RECORD_LOGICALLY_DELETED);
1583: RAISE OKC_API.G_EXCEPTION_ERROR;
1584: END IF;
1585: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1586: EXCEPTION
1587: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1588: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1589: (

Line 1587: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1583: RAISE OKC_API.G_EXCEPTION_ERROR;
1584: END IF;
1585: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1586: EXCEPTION
1587: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1588: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1589: (
1590: l_api_name,
1591: G_PKG_NAME,

Line 1588: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1584: END IF;
1585: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1586: EXCEPTION
1587: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1588: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1589: (
1590: l_api_name,
1591: G_PKG_NAME,
1592: 'OKC_API.G_RET_STS_ERROR',

Line 1592: 'OKC_API.G_RET_STS_ERROR',

1588: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1589: (
1590: l_api_name,
1591: G_PKG_NAME,
1592: 'OKC_API.G_RET_STS_ERROR',
1593: x_msg_count,
1594: x_msg_data,
1595: '_PVT'
1596: );

Line 1597: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1593: x_msg_count,
1594: x_msg_data,
1595: '_PVT'
1596: );
1597: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1598: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1599: (
1600: l_api_name,
1601: G_PKG_NAME,

Line 1598: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1594: x_msg_data,
1595: '_PVT'
1596: );
1597: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1598: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1599: (
1600: l_api_name,
1601: G_PKG_NAME,
1602: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1602: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1598: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1599: (
1600: l_api_name,
1601: G_PKG_NAME,
1602: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1603: x_msg_count,
1604: x_msg_data,
1605: '_PVT'
1606: );

Line 1608: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

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

Line 1623: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1619: -- lock_row for:OKL_SIF_RETS_V --
1620: ---------------------------------
1621: PROCEDURE lock_row(
1622: p_api_version IN NUMBER,
1623: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1624: x_return_status OUT NOCOPY VARCHAR2,
1625: x_msg_count OUT NOCOPY NUMBER,
1626: x_msg_data OUT NOCOPY VARCHAR2,
1627: p_sirv_rec IN sirv_rec_type) IS

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

1627: p_sirv_rec IN sirv_rec_type) IS
1628:
1629: l_api_version CONSTANT NUMBER := 1;
1630: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1631: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1632: l_sir_rec sir_rec_type;
1633: BEGIN
1634: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1635: G_PKG_NAME,

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

1630: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1631: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1632: l_sir_rec sir_rec_type;
1633: BEGIN
1634: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1635: G_PKG_NAME,
1636: p_init_msg_list,
1637: l_api_version,
1638: p_api_version,

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

1637: l_api_version,
1638: p_api_version,
1639: '_PVT',
1640: x_return_status);
1641: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1642: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1643: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1644: RAISE OKC_API.G_EXCEPTION_ERROR;
1645: END IF;

Line 1642: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1638: p_api_version,
1639: '_PVT',
1640: x_return_status);
1641: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1642: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1643: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1644: RAISE OKC_API.G_EXCEPTION_ERROR;
1645: END IF;
1646: --------------------------------------

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

1639: '_PVT',
1640: x_return_status);
1641: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1642: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1643: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1644: RAISE OKC_API.G_EXCEPTION_ERROR;
1645: END IF;
1646: --------------------------------------
1647: -- Move VIEW record to "Child" records

Line 1644: RAISE OKC_API.G_EXCEPTION_ERROR;

1640: x_return_status);
1641: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1642: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1643: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1644: RAISE OKC_API.G_EXCEPTION_ERROR;
1645: END IF;
1646: --------------------------------------
1647: -- Move VIEW record to "Child" records
1648: --------------------------------------

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

1656: x_msg_count,
1657: x_msg_data,
1658: l_sir_rec
1659: );
1660: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1661: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1662: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1663: RAISE OKC_API.G_EXCEPTION_ERROR;
1664: END IF;

Line 1661: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1657: x_msg_data,
1658: l_sir_rec
1659: );
1660: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1661: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1662: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1663: RAISE OKC_API.G_EXCEPTION_ERROR;
1664: END IF;
1665: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

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

1658: l_sir_rec
1659: );
1660: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1661: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1662: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1663: RAISE OKC_API.G_EXCEPTION_ERROR;
1664: END IF;
1665: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1666: EXCEPTION

Line 1663: RAISE OKC_API.G_EXCEPTION_ERROR;

1659: );
1660: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1661: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1662: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1663: RAISE OKC_API.G_EXCEPTION_ERROR;
1664: END IF;
1665: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1666: EXCEPTION
1667: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

1661: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1662: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1663: RAISE OKC_API.G_EXCEPTION_ERROR;
1664: END IF;
1665: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1666: EXCEPTION
1667: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1668: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1669: (

Line 1667: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1663: RAISE OKC_API.G_EXCEPTION_ERROR;
1664: END IF;
1665: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1666: EXCEPTION
1667: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1668: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1669: (
1670: l_api_name,
1671: G_PKG_NAME,

Line 1668: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1664: END IF;
1665: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1666: EXCEPTION
1667: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1668: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1669: (
1670: l_api_name,
1671: G_PKG_NAME,
1672: 'OKC_API.G_RET_STS_ERROR',

Line 1672: 'OKC_API.G_RET_STS_ERROR',

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

Line 1677: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

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

Line 1678: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

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

Line 1682: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1678: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1679: (
1680: l_api_name,
1681: G_PKG_NAME,
1682: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1683: x_msg_count,
1684: x_msg_data,
1685: '_PVT'
1686: );

Line 1688: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1684: x_msg_data,
1685: '_PVT'
1686: );
1687: WHEN OTHERS THEN
1688: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1689: (
1690: l_api_name,
1691: G_PKG_NAME,
1692: 'OTHERS',

Line 1703: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1699: -- PL/SQL TBL lock_row for:SIRV_TBL --
1700: --------------------------------------
1701: PROCEDURE lock_row(
1702: p_api_version IN NUMBER,
1703: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1704: x_return_status OUT NOCOPY VARCHAR2,
1705: x_msg_count OUT NOCOPY NUMBER,
1706: x_msg_data OUT NOCOPY VARCHAR2,
1707: p_sirv_tbl IN sirv_tbl_type) IS

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

1707: p_sirv_tbl IN sirv_tbl_type) IS
1708:
1709: l_api_version CONSTANT NUMBER := 1;
1710: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1711: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1712: i NUMBER := 0;
1713: -- START change : akjain, 09/05/2001
1714: -- Adding OverAll Status Flag
1715: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

Line 1715: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

1711: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1712: i NUMBER := 0;
1713: -- START change : akjain, 09/05/2001
1714: -- Adding OverAll Status Flag
1715: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1716: -- END change : akjain
1717:
1718: BEGIN
1719: OKC_API.init_msg_list(p_init_msg_list);

Line 1719: OKC_API.init_msg_list(p_init_msg_list);

1715: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1716: -- END change : akjain
1717:
1718: BEGIN
1719: OKC_API.init_msg_list(p_init_msg_list);
1720: -- Make sure PL/SQL table has records in it before passing
1721: IF (p_sirv_tbl.COUNT > 0) THEN
1722: i := p_sirv_tbl.FIRST;
1723: LOOP

Line 1726: p_init_msg_list => OKC_API.G_FALSE,

1722: i := p_sirv_tbl.FIRST;
1723: LOOP
1724: lock_row (
1725: p_api_version => p_api_version,
1726: p_init_msg_list => OKC_API.G_FALSE,
1727: x_return_status => x_return_status,
1728: x_msg_count => x_msg_count,
1729: x_msg_data => x_msg_data,
1730: p_sirv_rec => p_sirv_tbl(i));

Line 1734: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN

1730: p_sirv_rec => p_sirv_tbl(i));
1731:
1732: -- START change : akjain, 09/05/2001
1733: -- store the highest degree of error
1734: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
1735: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
1736: l_overall_status := x_return_status;
1737: END IF;
1738: END IF;

Line 1735: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN

1731:
1732: -- START change : akjain, 09/05/2001
1733: -- store the highest degree of error
1734: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
1735: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
1736: l_overall_status := x_return_status;
1737: END IF;
1738: END IF;
1739: -- END change : akjain

Line 1750: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1746: -- END change : akjain
1747:
1748: END IF;
1749: EXCEPTION
1750: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1751: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1752: (
1753: l_api_name,
1754: G_PKG_NAME,

Line 1751: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1747:
1748: END IF;
1749: EXCEPTION
1750: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1751: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1752: (
1753: l_api_name,
1754: G_PKG_NAME,
1755: 'OKC_API.G_RET_STS_ERROR',

Line 1755: 'OKC_API.G_RET_STS_ERROR',

1751: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1752: (
1753: l_api_name,
1754: G_PKG_NAME,
1755: 'OKC_API.G_RET_STS_ERROR',
1756: x_msg_count,
1757: x_msg_data,
1758: '_PVT'
1759: );

Line 1760: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1756: x_msg_count,
1757: x_msg_data,
1758: '_PVT'
1759: );
1760: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1761: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1762: (
1763: l_api_name,
1764: G_PKG_NAME,

Line 1761: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1757: x_msg_data,
1758: '_PVT'
1759: );
1760: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1761: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1762: (
1763: l_api_name,
1764: G_PKG_NAME,
1765: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1765: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1761: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1762: (
1763: l_api_name,
1764: G_PKG_NAME,
1765: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1766: x_msg_count,
1767: x_msg_data,
1768: '_PVT'
1769: );

Line 1771: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

1767: x_msg_data,
1768: '_PVT'
1769: );
1770: WHEN OTHERS THEN
1771: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1772: (
1773: l_api_name,
1774: G_PKG_NAME,
1775: 'OTHERS',

Line 1789: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1785: ---------------------------------
1786: -- update_row for:OKL_SIF_RETS --
1787: ---------------------------------
1788: PROCEDURE update_row(
1789: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1790: x_return_status OUT NOCOPY VARCHAR2,
1791: x_msg_count OUT NOCOPY NUMBER,
1792: x_msg_data OUT NOCOPY VARCHAR2,
1793: p_sir_rec IN sir_rec_type,

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

1794: x_sir_rec OUT NOCOPY sir_rec_type) IS
1795:
1796: l_api_version CONSTANT NUMBER := 1;
1797: l_api_name CONSTANT VARCHAR2(30) := 'RETS_update_row';
1798: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1799: l_sir_rec sir_rec_type := p_sir_rec;
1800: l_def_sir_rec sir_rec_type;
1801: l_row_notfound BOOLEAN := TRUE;
1802: ----------------------------------

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

1807: x_sir_rec OUT NOCOPY sir_rec_type
1808: ) RETURN VARCHAR2 IS
1809: l_sir_rec sir_rec_type;
1810: l_row_notfound BOOLEAN := TRUE;
1811: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1812: BEGIN
1813: x_sir_rec := p_sir_rec;
1814: -- Get current database values
1815: l_sir_rec := get_rec(p_sir_rec, l_row_notfound);

Line 1817: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1813: x_sir_rec := p_sir_rec;
1814: -- Get current database values
1815: l_sir_rec := get_rec(p_sir_rec, l_row_notfound);
1816: IF (l_row_notfound) THEN
1817: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1818: END IF;
1819: IF (x_sir_rec.id = OKC_API.G_MISS_NUM)
1820: THEN
1821: x_sir_rec.id := l_sir_rec.id;

Line 1819: IF (x_sir_rec.id = OKC_API.G_MISS_NUM)

1815: l_sir_rec := get_rec(p_sir_rec, l_row_notfound);
1816: IF (l_row_notfound) THEN
1817: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1818: END IF;
1819: IF (x_sir_rec.id = OKC_API.G_MISS_NUM)
1820: THEN
1821: x_sir_rec.id := l_sir_rec.id;
1822: END IF;
1823: IF (x_sir_rec.transaction_number = OKC_API.G_MISS_NUM)

Line 1823: IF (x_sir_rec.transaction_number = OKC_API.G_MISS_NUM)

1819: IF (x_sir_rec.id = OKC_API.G_MISS_NUM)
1820: THEN
1821: x_sir_rec.id := l_sir_rec.id;
1822: END IF;
1823: IF (x_sir_rec.transaction_number = OKC_API.G_MISS_NUM)
1824: THEN
1825: x_sir_rec.transaction_number := l_sir_rec.transaction_number;
1826: END IF;
1827: IF (x_sir_rec.srt_code = OKC_API.G_MISS_CHAR)

Line 1827: IF (x_sir_rec.srt_code = OKC_API.G_MISS_CHAR)

1823: IF (x_sir_rec.transaction_number = OKC_API.G_MISS_NUM)
1824: THEN
1825: x_sir_rec.transaction_number := l_sir_rec.transaction_number;
1826: END IF;
1827: IF (x_sir_rec.srt_code = OKC_API.G_MISS_CHAR)
1828: THEN
1829: x_sir_rec.srt_code := l_sir_rec.srt_code;
1830: END IF;
1831: IF (x_sir_rec.effective_pre_tax_yield = OKC_API.G_MISS_NUM)

Line 1831: IF (x_sir_rec.effective_pre_tax_yield = OKC_API.G_MISS_NUM)

1827: IF (x_sir_rec.srt_code = OKC_API.G_MISS_CHAR)
1828: THEN
1829: x_sir_rec.srt_code := l_sir_rec.srt_code;
1830: END IF;
1831: IF (x_sir_rec.effective_pre_tax_yield = OKC_API.G_MISS_NUM)
1832: THEN
1833: x_sir_rec.effective_pre_tax_yield := l_sir_rec.effective_pre_tax_yield;
1834: END IF;
1835: IF (x_sir_rec.yield_name = OKC_API.G_MISS_CHAR)

Line 1835: IF (x_sir_rec.yield_name = OKC_API.G_MISS_CHAR)

1831: IF (x_sir_rec.effective_pre_tax_yield = OKC_API.G_MISS_NUM)
1832: THEN
1833: x_sir_rec.effective_pre_tax_yield := l_sir_rec.effective_pre_tax_yield;
1834: END IF;
1835: IF (x_sir_rec.yield_name = OKC_API.G_MISS_CHAR)
1836: THEN
1837: x_sir_rec.yield_name := l_sir_rec.yield_name;
1838: END IF;
1839: IF (x_sir_rec.index_number = OKC_API.G_MISS_NUM)

Line 1839: IF (x_sir_rec.index_number = OKC_API.G_MISS_NUM)

1835: IF (x_sir_rec.yield_name = OKC_API.G_MISS_CHAR)
1836: THEN
1837: x_sir_rec.yield_name := l_sir_rec.yield_name;
1838: END IF;
1839: IF (x_sir_rec.index_number = OKC_API.G_MISS_NUM)
1840: THEN
1841: x_sir_rec.index_number := l_sir_rec.index_number;
1842: END IF;
1843: IF (x_sir_rec.effective_after_tax_yield = OKC_API.G_MISS_NUM)

Line 1843: IF (x_sir_rec.effective_after_tax_yield = OKC_API.G_MISS_NUM)

1839: IF (x_sir_rec.index_number = OKC_API.G_MISS_NUM)
1840: THEN
1841: x_sir_rec.index_number := l_sir_rec.index_number;
1842: END IF;
1843: IF (x_sir_rec.effective_after_tax_yield = OKC_API.G_MISS_NUM)
1844: THEN
1845: x_sir_rec.effective_after_tax_yield := l_sir_rec.effective_after_tax_yield;
1846: END IF;
1847: IF (x_sir_rec.nominal_pre_tax_yield = OKC_API.G_MISS_NUM)

Line 1847: IF (x_sir_rec.nominal_pre_tax_yield = OKC_API.G_MISS_NUM)

1843: IF (x_sir_rec.effective_after_tax_yield = OKC_API.G_MISS_NUM)
1844: THEN
1845: x_sir_rec.effective_after_tax_yield := l_sir_rec.effective_after_tax_yield;
1846: END IF;
1847: IF (x_sir_rec.nominal_pre_tax_yield = OKC_API.G_MISS_NUM)
1848: THEN
1849: x_sir_rec.nominal_pre_tax_yield := l_sir_rec.nominal_pre_tax_yield;
1850: END IF;
1851: IF (x_sir_rec.nominal_after_tax_yield = OKC_API.G_MISS_NUM)

Line 1851: IF (x_sir_rec.nominal_after_tax_yield = OKC_API.G_MISS_NUM)

1847: IF (x_sir_rec.nominal_pre_tax_yield = OKC_API.G_MISS_NUM)
1848: THEN
1849: x_sir_rec.nominal_pre_tax_yield := l_sir_rec.nominal_pre_tax_yield;
1850: END IF;
1851: IF (x_sir_rec.nominal_after_tax_yield = OKC_API.G_MISS_NUM)
1852: THEN
1853: x_sir_rec.nominal_after_tax_yield := l_sir_rec.nominal_after_tax_yield;
1854: END IF;
1855: IF (x_sir_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR)

Line 1855: IF (x_sir_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR)

1851: IF (x_sir_rec.nominal_after_tax_yield = OKC_API.G_MISS_NUM)
1852: THEN
1853: x_sir_rec.nominal_after_tax_yield := l_sir_rec.nominal_after_tax_yield;
1854: END IF;
1855: IF (x_sir_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR)
1856: THEN
1857: x_sir_rec.stream_interface_attribute01 := l_sir_rec.stream_interface_attribute01;
1858: END IF;
1859: IF (x_sir_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR)

Line 1859: IF (x_sir_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR)

1855: IF (x_sir_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR)
1856: THEN
1857: x_sir_rec.stream_interface_attribute01 := l_sir_rec.stream_interface_attribute01;
1858: END IF;
1859: IF (x_sir_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR)
1860: THEN
1861: x_sir_rec.stream_interface_attribute02 := l_sir_rec.stream_interface_attribute02;
1862: END IF;
1863: IF (x_sir_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR)

Line 1863: IF (x_sir_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR)

1859: IF (x_sir_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR)
1860: THEN
1861: x_sir_rec.stream_interface_attribute02 := l_sir_rec.stream_interface_attribute02;
1862: END IF;
1863: IF (x_sir_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR)
1864: THEN
1865: x_sir_rec.stream_interface_attribute03 := l_sir_rec.stream_interface_attribute03;
1866: END IF;
1867: IF (x_sir_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR)

Line 1867: IF (x_sir_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR)

1863: IF (x_sir_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR)
1864: THEN
1865: x_sir_rec.stream_interface_attribute03 := l_sir_rec.stream_interface_attribute03;
1866: END IF;
1867: IF (x_sir_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR)
1868: THEN
1869: x_sir_rec.stream_interface_attribute04 := l_sir_rec.stream_interface_attribute04;
1870: END IF;
1871: IF (x_sir_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR)

Line 1871: IF (x_sir_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR)

1867: IF (x_sir_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR)
1868: THEN
1869: x_sir_rec.stream_interface_attribute04 := l_sir_rec.stream_interface_attribute04;
1870: END IF;
1871: IF (x_sir_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR)
1872: THEN
1873: x_sir_rec.stream_interface_attribute05 := l_sir_rec.stream_interface_attribute05;
1874: END IF;
1875: IF (x_sir_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR)

Line 1875: IF (x_sir_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR)

1871: IF (x_sir_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR)
1872: THEN
1873: x_sir_rec.stream_interface_attribute05 := l_sir_rec.stream_interface_attribute05;
1874: END IF;
1875: IF (x_sir_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR)
1876: THEN
1877: x_sir_rec.stream_interface_attribute06 := l_sir_rec.stream_interface_attribute06;
1878: END IF;
1879: IF (x_sir_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR)

Line 1879: IF (x_sir_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR)

1875: IF (x_sir_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR)
1876: THEN
1877: x_sir_rec.stream_interface_attribute06 := l_sir_rec.stream_interface_attribute06;
1878: END IF;
1879: IF (x_sir_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR)
1880: THEN
1881: x_sir_rec.stream_interface_attribute07 := l_sir_rec.stream_interface_attribute07;
1882: END IF;
1883: IF (x_sir_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR)

Line 1883: IF (x_sir_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR)

1879: IF (x_sir_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR)
1880: THEN
1881: x_sir_rec.stream_interface_attribute07 := l_sir_rec.stream_interface_attribute07;
1882: END IF;
1883: IF (x_sir_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR)
1884: THEN
1885: x_sir_rec.stream_interface_attribute08 := l_sir_rec.stream_interface_attribute08;
1886: END IF;
1887: IF (x_sir_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR)

Line 1887: IF (x_sir_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR)

1883: IF (x_sir_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR)
1884: THEN
1885: x_sir_rec.stream_interface_attribute08 := l_sir_rec.stream_interface_attribute08;
1886: END IF;
1887: IF (x_sir_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR)
1888: THEN
1889: x_sir_rec.stream_interface_attribute09 := l_sir_rec.stream_interface_attribute09;
1890: END IF;
1891: IF (x_sir_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR)

Line 1891: IF (x_sir_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR)

1887: IF (x_sir_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR)
1888: THEN
1889: x_sir_rec.stream_interface_attribute09 := l_sir_rec.stream_interface_attribute09;
1890: END IF;
1891: IF (x_sir_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR)
1892: THEN
1893: x_sir_rec.stream_interface_attribute10 := l_sir_rec.stream_interface_attribute10;
1894: END IF;
1895: IF (x_sir_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR)

Line 1895: IF (x_sir_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR)

1891: IF (x_sir_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR)
1892: THEN
1893: x_sir_rec.stream_interface_attribute10 := l_sir_rec.stream_interface_attribute10;
1894: END IF;
1895: IF (x_sir_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR)
1896: THEN
1897: x_sir_rec.stream_interface_attribute11 := l_sir_rec.stream_interface_attribute11;
1898: END IF;
1899: IF (x_sir_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR)

Line 1899: IF (x_sir_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR)

1895: IF (x_sir_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR)
1896: THEN
1897: x_sir_rec.stream_interface_attribute11 := l_sir_rec.stream_interface_attribute11;
1898: END IF;
1899: IF (x_sir_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR)
1900: THEN
1901: x_sir_rec.stream_interface_attribute12 := l_sir_rec.stream_interface_attribute12;
1902: END IF;
1903: IF (x_sir_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR)

Line 1903: IF (x_sir_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR)

1899: IF (x_sir_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR)
1900: THEN
1901: x_sir_rec.stream_interface_attribute12 := l_sir_rec.stream_interface_attribute12;
1902: END IF;
1903: IF (x_sir_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR)
1904: THEN
1905: x_sir_rec.stream_interface_attribute13 := l_sir_rec.stream_interface_attribute13;
1906: END IF;
1907: IF (x_sir_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR)

Line 1907: IF (x_sir_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR)

1903: IF (x_sir_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR)
1904: THEN
1905: x_sir_rec.stream_interface_attribute13 := l_sir_rec.stream_interface_attribute13;
1906: END IF;
1907: IF (x_sir_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR)
1908: THEN
1909: x_sir_rec.stream_interface_attribute14 := l_sir_rec.stream_interface_attribute14;
1910: END IF;
1911: IF (x_sir_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR)

Line 1911: IF (x_sir_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR)

1907: IF (x_sir_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR)
1908: THEN
1909: x_sir_rec.stream_interface_attribute14 := l_sir_rec.stream_interface_attribute14;
1910: END IF;
1911: IF (x_sir_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR)
1912: THEN
1913: x_sir_rec.stream_interface_attribute15 := l_sir_rec.stream_interface_attribute15;
1914: END IF;
1915: IF (x_sir_rec.object_version_number = OKC_API.G_MISS_NUM)

Line 1915: IF (x_sir_rec.object_version_number = OKC_API.G_MISS_NUM)

1911: IF (x_sir_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR)
1912: THEN
1913: x_sir_rec.stream_interface_attribute15 := l_sir_rec.stream_interface_attribute15;
1914: END IF;
1915: IF (x_sir_rec.object_version_number = OKC_API.G_MISS_NUM)
1916: THEN
1917: x_sir_rec.object_version_number := l_sir_rec.object_version_number;
1918: END IF;
1919: IF (x_sir_rec.created_by = OKC_API.G_MISS_NUM)

Line 1919: IF (x_sir_rec.created_by = OKC_API.G_MISS_NUM)

1915: IF (x_sir_rec.object_version_number = OKC_API.G_MISS_NUM)
1916: THEN
1917: x_sir_rec.object_version_number := l_sir_rec.object_version_number;
1918: END IF;
1919: IF (x_sir_rec.created_by = OKC_API.G_MISS_NUM)
1920: THEN
1921: x_sir_rec.created_by := l_sir_rec.created_by;
1922: END IF;
1923: IF (x_sir_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 1923: IF (x_sir_rec.last_updated_by = OKC_API.G_MISS_NUM)

1919: IF (x_sir_rec.created_by = OKC_API.G_MISS_NUM)
1920: THEN
1921: x_sir_rec.created_by := l_sir_rec.created_by;
1922: END IF;
1923: IF (x_sir_rec.last_updated_by = OKC_API.G_MISS_NUM)
1924: THEN
1925: x_sir_rec.last_updated_by := l_sir_rec.last_updated_by;
1926: END IF;
1927: IF (x_sir_rec.creation_date = OKC_API.G_MISS_DATE)

Line 1927: IF (x_sir_rec.creation_date = OKC_API.G_MISS_DATE)

1923: IF (x_sir_rec.last_updated_by = OKC_API.G_MISS_NUM)
1924: THEN
1925: x_sir_rec.last_updated_by := l_sir_rec.last_updated_by;
1926: END IF;
1927: IF (x_sir_rec.creation_date = OKC_API.G_MISS_DATE)
1928: THEN
1929: x_sir_rec.creation_date := l_sir_rec.creation_date;
1930: END IF;
1931: IF (x_sir_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 1931: IF (x_sir_rec.last_update_date = OKC_API.G_MISS_DATE)

1927: IF (x_sir_rec.creation_date = OKC_API.G_MISS_DATE)
1928: THEN
1929: x_sir_rec.creation_date := l_sir_rec.creation_date;
1930: END IF;
1931: IF (x_sir_rec.last_update_date = OKC_API.G_MISS_DATE)
1932: THEN
1933: x_sir_rec.last_update_date := l_sir_rec.last_update_date;
1934: END IF;
1935: IF (x_sir_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 1935: IF (x_sir_rec.last_update_login = OKC_API.G_MISS_NUM)

1931: IF (x_sir_rec.last_update_date = OKC_API.G_MISS_DATE)
1932: THEN
1933: x_sir_rec.last_update_date := l_sir_rec.last_update_date;
1934: END IF;
1935: IF (x_sir_rec.last_update_login = OKC_API.G_MISS_NUM)
1936: THEN
1937: x_sir_rec.last_update_login := l_sir_rec.last_update_login;
1938: END IF;
1939: IF (x_sir_rec.implicit_interest_rate = OKC_API.G_MISS_NUM)

Line 1939: IF (x_sir_rec.implicit_interest_rate = OKC_API.G_MISS_NUM)

1935: IF (x_sir_rec.last_update_login = OKC_API.G_MISS_NUM)
1936: THEN
1937: x_sir_rec.last_update_login := l_sir_rec.last_update_login;
1938: END IF;
1939: IF (x_sir_rec.implicit_interest_rate = OKC_API.G_MISS_NUM)
1940: THEN
1941: x_sir_rec.implicit_interest_rate := l_sir_rec.implicit_interest_rate;
1942: END IF;
1943: IF (x_sir_rec.date_processed = OKC_API.G_MISS_DATE)

Line 1943: IF (x_sir_rec.date_processed = OKC_API.G_MISS_DATE)

1939: IF (x_sir_rec.implicit_interest_rate = OKC_API.G_MISS_NUM)
1940: THEN
1941: x_sir_rec.implicit_interest_rate := l_sir_rec.implicit_interest_rate;
1942: END IF;
1943: IF (x_sir_rec.date_processed = OKC_API.G_MISS_DATE)
1944: THEN
1945: x_sir_rec.date_processed := l_sir_rec.date_processed;
1946: END IF;
1947: -- mvasudev -- 02/21/2002

Line 1949: IF (x_sir_rec.REQUEST_ID = OKC_API.G_MISS_NUM)

1945: x_sir_rec.date_processed := l_sir_rec.date_processed;
1946: END IF;
1947: -- mvasudev -- 02/21/2002
1948: -- new columns added for concurrent program manager
1949: IF (x_sir_rec.REQUEST_ID = OKC_API.G_MISS_NUM)
1950: THEN
1951: x_sir_rec.REQUEST_ID := l_sir_rec.REQUEST_ID;
1952: END IF;
1953: IF (x_sir_rec.PROGRAM_APPLICATION_ID = OKC_API.G_MISS_NUM)

Line 1953: IF (x_sir_rec.PROGRAM_APPLICATION_ID = OKC_API.G_MISS_NUM)

1949: IF (x_sir_rec.REQUEST_ID = OKC_API.G_MISS_NUM)
1950: THEN
1951: x_sir_rec.REQUEST_ID := l_sir_rec.REQUEST_ID;
1952: END IF;
1953: IF (x_sir_rec.PROGRAM_APPLICATION_ID = OKC_API.G_MISS_NUM)
1954: THEN
1955: x_sir_rec.PROGRAM_APPLICATION_ID := l_sir_rec.PROGRAM_APPLICATION_ID;
1956: END IF;
1957: IF (x_sir_rec.PROGRAM_ID = OKC_API.G_MISS_NUM)

Line 1957: IF (x_sir_rec.PROGRAM_ID = OKC_API.G_MISS_NUM)

1953: IF (x_sir_rec.PROGRAM_APPLICATION_ID = OKC_API.G_MISS_NUM)
1954: THEN
1955: x_sir_rec.PROGRAM_APPLICATION_ID := l_sir_rec.PROGRAM_APPLICATION_ID;
1956: END IF;
1957: IF (x_sir_rec.PROGRAM_ID = OKC_API.G_MISS_NUM)
1958: THEN
1959: x_sir_rec.PROGRAM_ID := l_sir_rec.PROGRAM_ID;
1960: END IF;
1961: IF (x_sir_rec.PROGRAM_UPDATE_DATE = OKC_API.G_MISS_DATE)

Line 1961: IF (x_sir_rec.PROGRAM_UPDATE_DATE = OKC_API.G_MISS_DATE)

1957: IF (x_sir_rec.PROGRAM_ID = OKC_API.G_MISS_NUM)
1958: THEN
1959: x_sir_rec.PROGRAM_ID := l_sir_rec.PROGRAM_ID;
1960: END IF;
1961: IF (x_sir_rec.PROGRAM_UPDATE_DATE = OKC_API.G_MISS_DATE)
1962: THEN
1963: x_sir_rec.PROGRAM_UPDATE_DATE := l_sir_rec.PROGRAM_UPDATE_DATE;
1964: END IF;
1965: -- end,mvasudev -- 02/21/2002

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

1971: FUNCTION Set_Attributes (
1972: p_sir_rec IN sir_rec_type,
1973: x_sir_rec OUT NOCOPY sir_rec_type
1974: ) RETURN VARCHAR2 IS
1975: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1976: BEGIN
1977: x_sir_rec := p_sir_rec;
1978: RETURN(l_return_status);
1979: END Set_Attributes;

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

1977: x_sir_rec := p_sir_rec;
1978: RETURN(l_return_status);
1979: END Set_Attributes;
1980: BEGIN
1981: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1982: p_init_msg_list,
1983: '_PVT',
1984: x_return_status);
1985: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

1981: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1982: p_init_msg_list,
1983: '_PVT',
1984: x_return_status);
1985: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1986: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1987: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1988: RAISE OKC_API.G_EXCEPTION_ERROR;
1989: END IF;

Line 1986: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1982: p_init_msg_list,
1983: '_PVT',
1984: x_return_status);
1985: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1986: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1987: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1988: RAISE OKC_API.G_EXCEPTION_ERROR;
1989: END IF;
1990: --- Setting item attributes

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

1983: '_PVT',
1984: x_return_status);
1985: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1986: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1987: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1988: RAISE OKC_API.G_EXCEPTION_ERROR;
1989: END IF;
1990: --- Setting item attributes
1991: l_return_status := Set_Attributes(

Line 1988: RAISE OKC_API.G_EXCEPTION_ERROR;

1984: x_return_status);
1985: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1986: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1987: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1988: RAISE OKC_API.G_EXCEPTION_ERROR;
1989: END IF;
1990: --- Setting item attributes
1991: l_return_status := Set_Attributes(
1992: p_sir_rec, -- IN

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

1991: l_return_status := Set_Attributes(
1992: p_sir_rec, -- IN
1993: l_sir_rec); -- OUT
1994: --- If any errors happen abort API
1995: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1996: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1997: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1998: RAISE OKC_API.G_EXCEPTION_ERROR;
1999: END IF;

Line 1996: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1992: p_sir_rec, -- IN
1993: l_sir_rec); -- OUT
1994: --- If any errors happen abort API
1995: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1996: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1997: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1998: RAISE OKC_API.G_EXCEPTION_ERROR;
1999: END IF;
2000: l_return_status := populate_new_record(l_sir_rec, l_def_sir_rec);

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

1993: l_sir_rec); -- OUT
1994: --- If any errors happen abort API
1995: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1996: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1997: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1998: RAISE OKC_API.G_EXCEPTION_ERROR;
1999: END IF;
2000: l_return_status := populate_new_record(l_sir_rec, l_def_sir_rec);
2001: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1998: RAISE OKC_API.G_EXCEPTION_ERROR;

1994: --- If any errors happen abort API
1995: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1996: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1997: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1998: RAISE OKC_API.G_EXCEPTION_ERROR;
1999: END IF;
2000: l_return_status := populate_new_record(l_sir_rec, l_def_sir_rec);
2001: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2002: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

1997: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1998: RAISE OKC_API.G_EXCEPTION_ERROR;
1999: END IF;
2000: l_return_status := populate_new_record(l_sir_rec, l_def_sir_rec);
2001: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2002: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2003: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2004: RAISE OKC_API.G_EXCEPTION_ERROR;
2005: END IF;

Line 2002: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1998: RAISE OKC_API.G_EXCEPTION_ERROR;
1999: END IF;
2000: l_return_status := populate_new_record(l_sir_rec, l_def_sir_rec);
2001: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2002: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2003: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2004: RAISE OKC_API.G_EXCEPTION_ERROR;
2005: END IF;
2006: UPDATE OKL_SIF_RETS

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

1999: END IF;
2000: l_return_status := populate_new_record(l_sir_rec, l_def_sir_rec);
2001: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2002: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2003: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2004: RAISE OKC_API.G_EXCEPTION_ERROR;
2005: END IF;
2006: UPDATE OKL_SIF_RETS
2007: SET TRANSACTION_NUMBER = l_def_sir_rec.transaction_number,

Line 2004: RAISE OKC_API.G_EXCEPTION_ERROR;

2000: l_return_status := populate_new_record(l_sir_rec, l_def_sir_rec);
2001: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2002: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2003: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2004: RAISE OKC_API.G_EXCEPTION_ERROR;
2005: END IF;
2006: UPDATE OKL_SIF_RETS
2007: SET TRANSACTION_NUMBER = l_def_sir_rec.transaction_number,
2008: SRT_CODE = l_def_sir_rec.srt_code,

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

2044: -- end,mvasudev -- 02/21/2002
2045: WHERE ID = l_def_sir_rec.id;
2046:
2047: x_sir_rec := l_def_sir_rec;
2048: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2049: EXCEPTION
2050: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2051: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2052: (

Line 2050: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2046:
2047: x_sir_rec := l_def_sir_rec;
2048: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2049: EXCEPTION
2050: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2051: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2052: (
2053: l_api_name,
2054: G_PKG_NAME,

Line 2051: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2047: x_sir_rec := l_def_sir_rec;
2048: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2049: EXCEPTION
2050: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2051: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2052: (
2053: l_api_name,
2054: G_PKG_NAME,
2055: 'OKC_API.G_RET_STS_ERROR',

Line 2055: 'OKC_API.G_RET_STS_ERROR',

2051: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2052: (
2053: l_api_name,
2054: G_PKG_NAME,
2055: 'OKC_API.G_RET_STS_ERROR',
2056: x_msg_count,
2057: x_msg_data,
2058: '_PVT'
2059: );

Line 2060: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2056: x_msg_count,
2057: x_msg_data,
2058: '_PVT'
2059: );
2060: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2061: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2062: (
2063: l_api_name,
2064: G_PKG_NAME,

Line 2061: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2057: x_msg_data,
2058: '_PVT'
2059: );
2060: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2061: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2062: (
2063: l_api_name,
2064: G_PKG_NAME,
2065: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2065: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2061: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2062: (
2063: l_api_name,
2064: G_PKG_NAME,
2065: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2066: x_msg_count,
2067: x_msg_data,
2068: '_PVT'
2069: );

Line 2071: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2067: x_msg_data,
2068: '_PVT'
2069: );
2070: WHEN OTHERS THEN
2071: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2072: (
2073: l_api_name,
2074: G_PKG_NAME,
2075: 'OTHERS',

Line 2086: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2082: -- update_row for:OKL_SIF_RETS_V --
2083: -----------------------------------
2084: PROCEDURE update_row(
2085: p_api_version IN NUMBER,
2086: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2087: x_return_status OUT NOCOPY VARCHAR2,
2088: x_msg_count OUT NOCOPY NUMBER,
2089: x_msg_data OUT NOCOPY VARCHAR2,
2090: p_sirv_rec IN sirv_rec_type,

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

2091: x_sirv_rec OUT NOCOPY sirv_rec_type) IS
2092:
2093: l_api_version CONSTANT NUMBER := 1;
2094: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
2095: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2096: l_sirv_rec sirv_rec_type := p_sirv_rec;
2097: l_def_sirv_rec sirv_rec_type;
2098: l_sir_rec sir_rec_type;
2099: lx_sir_rec sir_rec_type;

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

2118: x_sirv_rec OUT NOCOPY sirv_rec_type
2119: ) RETURN VARCHAR2 IS
2120: l_sirv_rec sirv_rec_type;
2121: l_row_notfound BOOLEAN := TRUE;
2122: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2123: BEGIN
2124: x_sirv_rec := p_sirv_rec;
2125: -- Get current database values
2126: l_sirv_rec := get_rec(p_sirv_rec, l_row_notfound);

Line 2128: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2124: x_sirv_rec := p_sirv_rec;
2125: -- Get current database values
2126: l_sirv_rec := get_rec(p_sirv_rec, l_row_notfound);
2127: IF (l_row_notfound) THEN
2128: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2129: END IF;
2130: IF (x_sirv_rec.id = OKC_API.G_MISS_NUM)
2131: THEN
2132: x_sirv_rec.id := l_sirv_rec.id;

Line 2130: IF (x_sirv_rec.id = OKC_API.G_MISS_NUM)

2126: l_sirv_rec := get_rec(p_sirv_rec, l_row_notfound);
2127: IF (l_row_notfound) THEN
2128: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2129: END IF;
2130: IF (x_sirv_rec.id = OKC_API.G_MISS_NUM)
2131: THEN
2132: x_sirv_rec.id := l_sirv_rec.id;
2133: END IF;
2134: IF (x_sirv_rec.transaction_number = OKC_API.G_MISS_NUM)

Line 2134: IF (x_sirv_rec.transaction_number = OKC_API.G_MISS_NUM)

2130: IF (x_sirv_rec.id = OKC_API.G_MISS_NUM)
2131: THEN
2132: x_sirv_rec.id := l_sirv_rec.id;
2133: END IF;
2134: IF (x_sirv_rec.transaction_number = OKC_API.G_MISS_NUM)
2135: THEN
2136: x_sirv_rec.transaction_number := l_sirv_rec.transaction_number;
2137: END IF;
2138: IF (x_sirv_rec.srt_code = OKC_API.G_MISS_CHAR)

Line 2138: IF (x_sirv_rec.srt_code = OKC_API.G_MISS_CHAR)

2134: IF (x_sirv_rec.transaction_number = OKC_API.G_MISS_NUM)
2135: THEN
2136: x_sirv_rec.transaction_number := l_sirv_rec.transaction_number;
2137: END IF;
2138: IF (x_sirv_rec.srt_code = OKC_API.G_MISS_CHAR)
2139: THEN
2140: x_sirv_rec.srt_code := l_sirv_rec.srt_code;
2141: END IF;
2142: IF (x_sirv_rec.effective_pre_tax_yield = OKC_API.G_MISS_NUM)

Line 2142: IF (x_sirv_rec.effective_pre_tax_yield = OKC_API.G_MISS_NUM)

2138: IF (x_sirv_rec.srt_code = OKC_API.G_MISS_CHAR)
2139: THEN
2140: x_sirv_rec.srt_code := l_sirv_rec.srt_code;
2141: END IF;
2142: IF (x_sirv_rec.effective_pre_tax_yield = OKC_API.G_MISS_NUM)
2143: THEN
2144: x_sirv_rec.effective_pre_tax_yield := l_sirv_rec.effective_pre_tax_yield;
2145: END IF;
2146: IF (x_sirv_rec.yield_name = OKC_API.G_MISS_CHAR)

Line 2146: IF (x_sirv_rec.yield_name = OKC_API.G_MISS_CHAR)

2142: IF (x_sirv_rec.effective_pre_tax_yield = OKC_API.G_MISS_NUM)
2143: THEN
2144: x_sirv_rec.effective_pre_tax_yield := l_sirv_rec.effective_pre_tax_yield;
2145: END IF;
2146: IF (x_sirv_rec.yield_name = OKC_API.G_MISS_CHAR)
2147: THEN
2148: x_sirv_rec.yield_name := l_sirv_rec.yield_name;
2149: END IF;
2150: IF (x_sirv_rec.index_number = OKC_API.G_MISS_NUM)

Line 2150: IF (x_sirv_rec.index_number = OKC_API.G_MISS_NUM)

2146: IF (x_sirv_rec.yield_name = OKC_API.G_MISS_CHAR)
2147: THEN
2148: x_sirv_rec.yield_name := l_sirv_rec.yield_name;
2149: END IF;
2150: IF (x_sirv_rec.index_number = OKC_API.G_MISS_NUM)
2151: THEN
2152: x_sirv_rec.index_number := l_sirv_rec.index_number;
2153: END IF;
2154: IF (x_sirv_rec.effective_after_tax_yield = OKC_API.G_MISS_NUM)

Line 2154: IF (x_sirv_rec.effective_after_tax_yield = OKC_API.G_MISS_NUM)

2150: IF (x_sirv_rec.index_number = OKC_API.G_MISS_NUM)
2151: THEN
2152: x_sirv_rec.index_number := l_sirv_rec.index_number;
2153: END IF;
2154: IF (x_sirv_rec.effective_after_tax_yield = OKC_API.G_MISS_NUM)
2155: THEN
2156: x_sirv_rec.effective_after_tax_yield := l_sirv_rec.effective_after_tax_yield;
2157: END IF;
2158: IF (x_sirv_rec.nominal_pre_tax_yield = OKC_API.G_MISS_NUM)

Line 2158: IF (x_sirv_rec.nominal_pre_tax_yield = OKC_API.G_MISS_NUM)

2154: IF (x_sirv_rec.effective_after_tax_yield = OKC_API.G_MISS_NUM)
2155: THEN
2156: x_sirv_rec.effective_after_tax_yield := l_sirv_rec.effective_after_tax_yield;
2157: END IF;
2158: IF (x_sirv_rec.nominal_pre_tax_yield = OKC_API.G_MISS_NUM)
2159: THEN
2160: x_sirv_rec.nominal_pre_tax_yield := l_sirv_rec.nominal_pre_tax_yield;
2161: END IF;
2162: IF (x_sirv_rec.nominal_after_tax_yield = OKC_API.G_MISS_NUM)

Line 2162: IF (x_sirv_rec.nominal_after_tax_yield = OKC_API.G_MISS_NUM)

2158: IF (x_sirv_rec.nominal_pre_tax_yield = OKC_API.G_MISS_NUM)
2159: THEN
2160: x_sirv_rec.nominal_pre_tax_yield := l_sirv_rec.nominal_pre_tax_yield;
2161: END IF;
2162: IF (x_sirv_rec.nominal_after_tax_yield = OKC_API.G_MISS_NUM)
2163: THEN
2164: x_sirv_rec.nominal_after_tax_yield := l_sirv_rec.nominal_after_tax_yield;
2165: END IF;
2166: IF (x_sirv_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR)

Line 2166: IF (x_sirv_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR)

2162: IF (x_sirv_rec.nominal_after_tax_yield = OKC_API.G_MISS_NUM)
2163: THEN
2164: x_sirv_rec.nominal_after_tax_yield := l_sirv_rec.nominal_after_tax_yield;
2165: END IF;
2166: IF (x_sirv_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR)
2167: THEN
2168: x_sirv_rec.stream_interface_attribute01 := l_sirv_rec.stream_interface_attribute01;
2169: END IF;
2170: IF (x_sirv_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR)

Line 2170: IF (x_sirv_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR)

2166: IF (x_sirv_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR)
2167: THEN
2168: x_sirv_rec.stream_interface_attribute01 := l_sirv_rec.stream_interface_attribute01;
2169: END IF;
2170: IF (x_sirv_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR)
2171: THEN
2172: x_sirv_rec.stream_interface_attribute02 := l_sirv_rec.stream_interface_attribute02;
2173: END IF;
2174: IF (x_sirv_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR)

Line 2174: IF (x_sirv_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR)

2170: IF (x_sirv_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR)
2171: THEN
2172: x_sirv_rec.stream_interface_attribute02 := l_sirv_rec.stream_interface_attribute02;
2173: END IF;
2174: IF (x_sirv_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR)
2175: THEN
2176: x_sirv_rec.stream_interface_attribute03 := l_sirv_rec.stream_interface_attribute03;
2177: END IF;
2178: IF (x_sirv_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR)

Line 2178: IF (x_sirv_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR)

2174: IF (x_sirv_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR)
2175: THEN
2176: x_sirv_rec.stream_interface_attribute03 := l_sirv_rec.stream_interface_attribute03;
2177: END IF;
2178: IF (x_sirv_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR)
2179: THEN
2180: x_sirv_rec.stream_interface_attribute04 := l_sirv_rec.stream_interface_attribute04;
2181: END IF;
2182: IF (x_sirv_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR)

Line 2182: IF (x_sirv_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR)

2178: IF (x_sirv_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR)
2179: THEN
2180: x_sirv_rec.stream_interface_attribute04 := l_sirv_rec.stream_interface_attribute04;
2181: END IF;
2182: IF (x_sirv_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR)
2183: THEN
2184: x_sirv_rec.stream_interface_attribute05 := l_sirv_rec.stream_interface_attribute05;
2185: END IF;
2186: IF (x_sirv_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR)

Line 2186: IF (x_sirv_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR)

2182: IF (x_sirv_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR)
2183: THEN
2184: x_sirv_rec.stream_interface_attribute05 := l_sirv_rec.stream_interface_attribute05;
2185: END IF;
2186: IF (x_sirv_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR)
2187: THEN
2188: x_sirv_rec.stream_interface_attribute06 := l_sirv_rec.stream_interface_attribute06;
2189: END IF;
2190: IF (x_sirv_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR)

Line 2190: IF (x_sirv_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR)

2186: IF (x_sirv_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR)
2187: THEN
2188: x_sirv_rec.stream_interface_attribute06 := l_sirv_rec.stream_interface_attribute06;
2189: END IF;
2190: IF (x_sirv_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR)
2191: THEN
2192: x_sirv_rec.stream_interface_attribute07 := l_sirv_rec.stream_interface_attribute07;
2193: END IF;
2194: IF (x_sirv_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR)

Line 2194: IF (x_sirv_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR)

2190: IF (x_sirv_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR)
2191: THEN
2192: x_sirv_rec.stream_interface_attribute07 := l_sirv_rec.stream_interface_attribute07;
2193: END IF;
2194: IF (x_sirv_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR)
2195: THEN
2196: x_sirv_rec.stream_interface_attribute08 := l_sirv_rec.stream_interface_attribute08;
2197: END IF;
2198: IF (x_sirv_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR)

Line 2198: IF (x_sirv_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR)

2194: IF (x_sirv_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR)
2195: THEN
2196: x_sirv_rec.stream_interface_attribute08 := l_sirv_rec.stream_interface_attribute08;
2197: END IF;
2198: IF (x_sirv_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR)
2199: THEN
2200: x_sirv_rec.stream_interface_attribute09 := l_sirv_rec.stream_interface_attribute09;
2201: END IF;
2202: IF (x_sirv_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR)

Line 2202: IF (x_sirv_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR)

2198: IF (x_sirv_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR)
2199: THEN
2200: x_sirv_rec.stream_interface_attribute09 := l_sirv_rec.stream_interface_attribute09;
2201: END IF;
2202: IF (x_sirv_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR)
2203: THEN
2204: x_sirv_rec.stream_interface_attribute10 := l_sirv_rec.stream_interface_attribute10;
2205: END IF;
2206: IF (x_sirv_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR)

Line 2206: IF (x_sirv_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR)

2202: IF (x_sirv_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR)
2203: THEN
2204: x_sirv_rec.stream_interface_attribute10 := l_sirv_rec.stream_interface_attribute10;
2205: END IF;
2206: IF (x_sirv_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR)
2207: THEN
2208: x_sirv_rec.stream_interface_attribute11 := l_sirv_rec.stream_interface_attribute11;
2209: END IF;
2210: IF (x_sirv_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR)

Line 2210: IF (x_sirv_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR)

2206: IF (x_sirv_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR)
2207: THEN
2208: x_sirv_rec.stream_interface_attribute11 := l_sirv_rec.stream_interface_attribute11;
2209: END IF;
2210: IF (x_sirv_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR)
2211: THEN
2212: x_sirv_rec.stream_interface_attribute12 := l_sirv_rec.stream_interface_attribute12;
2213: END IF;
2214: IF (x_sirv_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR)

Line 2214: IF (x_sirv_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR)

2210: IF (x_sirv_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR)
2211: THEN
2212: x_sirv_rec.stream_interface_attribute12 := l_sirv_rec.stream_interface_attribute12;
2213: END IF;
2214: IF (x_sirv_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR)
2215: THEN
2216: x_sirv_rec.stream_interface_attribute13 := l_sirv_rec.stream_interface_attribute13;
2217: END IF;
2218: IF (x_sirv_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR)

Line 2218: IF (x_sirv_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR)

2214: IF (x_sirv_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR)
2215: THEN
2216: x_sirv_rec.stream_interface_attribute13 := l_sirv_rec.stream_interface_attribute13;
2217: END IF;
2218: IF (x_sirv_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR)
2219: THEN
2220: x_sirv_rec.stream_interface_attribute14 := l_sirv_rec.stream_interface_attribute14;
2221: END IF;
2222: IF (x_sirv_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR)

Line 2222: IF (x_sirv_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR)

2218: IF (x_sirv_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR)
2219: THEN
2220: x_sirv_rec.stream_interface_attribute14 := l_sirv_rec.stream_interface_attribute14;
2221: END IF;
2222: IF (x_sirv_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR)
2223: THEN
2224: x_sirv_rec.stream_interface_attribute15 := l_sirv_rec.stream_interface_attribute15;
2225: END IF;
2226: IF (x_sirv_rec.object_version_number = OKC_API.G_MISS_NUM)

Line 2226: IF (x_sirv_rec.object_version_number = OKC_API.G_MISS_NUM)

2222: IF (x_sirv_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR)
2223: THEN
2224: x_sirv_rec.stream_interface_attribute15 := l_sirv_rec.stream_interface_attribute15;
2225: END IF;
2226: IF (x_sirv_rec.object_version_number = OKC_API.G_MISS_NUM)
2227: THEN
2228: x_sirv_rec.object_version_number := l_sirv_rec.object_version_number;
2229: END IF;
2230: IF (x_sirv_rec.created_by = OKC_API.G_MISS_NUM)

Line 2230: IF (x_sirv_rec.created_by = OKC_API.G_MISS_NUM)

2226: IF (x_sirv_rec.object_version_number = OKC_API.G_MISS_NUM)
2227: THEN
2228: x_sirv_rec.object_version_number := l_sirv_rec.object_version_number;
2229: END IF;
2230: IF (x_sirv_rec.created_by = OKC_API.G_MISS_NUM)
2231: THEN
2232: x_sirv_rec.created_by := l_sirv_rec.created_by;
2233: END IF;
2234: IF (x_sirv_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 2234: IF (x_sirv_rec.last_updated_by = OKC_API.G_MISS_NUM)

2230: IF (x_sirv_rec.created_by = OKC_API.G_MISS_NUM)
2231: THEN
2232: x_sirv_rec.created_by := l_sirv_rec.created_by;
2233: END IF;
2234: IF (x_sirv_rec.last_updated_by = OKC_API.G_MISS_NUM)
2235: THEN
2236: x_sirv_rec.last_updated_by := l_sirv_rec.last_updated_by;
2237: END IF;
2238: IF (x_sirv_rec.creation_date = OKC_API.G_MISS_DATE)

Line 2238: IF (x_sirv_rec.creation_date = OKC_API.G_MISS_DATE)

2234: IF (x_sirv_rec.last_updated_by = OKC_API.G_MISS_NUM)
2235: THEN
2236: x_sirv_rec.last_updated_by := l_sirv_rec.last_updated_by;
2237: END IF;
2238: IF (x_sirv_rec.creation_date = OKC_API.G_MISS_DATE)
2239: THEN
2240: x_sirv_rec.creation_date := l_sirv_rec.creation_date;
2241: END IF;
2242: IF (x_sirv_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 2242: IF (x_sirv_rec.last_update_date = OKC_API.G_MISS_DATE)

2238: IF (x_sirv_rec.creation_date = OKC_API.G_MISS_DATE)
2239: THEN
2240: x_sirv_rec.creation_date := l_sirv_rec.creation_date;
2241: END IF;
2242: IF (x_sirv_rec.last_update_date = OKC_API.G_MISS_DATE)
2243: THEN
2244: x_sirv_rec.last_update_date := l_sirv_rec.last_update_date;
2245: END IF;
2246: IF (x_sirv_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 2246: IF (x_sirv_rec.last_update_login = OKC_API.G_MISS_NUM)

2242: IF (x_sirv_rec.last_update_date = OKC_API.G_MISS_DATE)
2243: THEN
2244: x_sirv_rec.last_update_date := l_sirv_rec.last_update_date;
2245: END IF;
2246: IF (x_sirv_rec.last_update_login = OKC_API.G_MISS_NUM)
2247: THEN
2248: x_sirv_rec.last_update_login := l_sirv_rec.last_update_login;
2249: END IF;
2250: IF (x_sirv_rec.implicit_interest_rate = OKC_API.G_MISS_NUM)

Line 2250: IF (x_sirv_rec.implicit_interest_rate = OKC_API.G_MISS_NUM)

2246: IF (x_sirv_rec.last_update_login = OKC_API.G_MISS_NUM)
2247: THEN
2248: x_sirv_rec.last_update_login := l_sirv_rec.last_update_login;
2249: END IF;
2250: IF (x_sirv_rec.implicit_interest_rate = OKC_API.G_MISS_NUM)
2251: THEN
2252: x_sirv_rec.implicit_interest_rate := l_sirv_rec.implicit_interest_rate;
2253: END IF;
2254: IF (x_sirv_rec.date_processed = OKC_API.G_MISS_DATE)

Line 2254: IF (x_sirv_rec.date_processed = OKC_API.G_MISS_DATE)

2250: IF (x_sirv_rec.implicit_interest_rate = OKC_API.G_MISS_NUM)
2251: THEN
2252: x_sirv_rec.implicit_interest_rate := l_sirv_rec.implicit_interest_rate;
2253: END IF;
2254: IF (x_sirv_rec.date_processed = OKC_API.G_MISS_DATE)
2255: THEN
2256: x_sirv_rec.date_processed := l_sirv_rec.date_processed;
2257: END IF;
2258: -- mvasudev -- 02/21/2002

Line 2260: IF (x_sirv_rec.REQUEST_ID = OKC_API.G_MISS_NUM)

2256: x_sirv_rec.date_processed := l_sirv_rec.date_processed;
2257: END IF;
2258: -- mvasudev -- 02/21/2002
2259: -- new columns added for concurrent program manager
2260: IF (x_sirv_rec.REQUEST_ID = OKC_API.G_MISS_NUM)
2261: THEN
2262: x_sirv_rec.REQUEST_ID := l_sirv_rec.REQUEST_ID;
2263: END IF;
2264: IF (x_sirv_rec.PROGRAM_APPLICATION_ID = OKC_API.G_MISS_NUM)

Line 2264: IF (x_sirv_rec.PROGRAM_APPLICATION_ID = OKC_API.G_MISS_NUM)

2260: IF (x_sirv_rec.REQUEST_ID = OKC_API.G_MISS_NUM)
2261: THEN
2262: x_sirv_rec.REQUEST_ID := l_sirv_rec.REQUEST_ID;
2263: END IF;
2264: IF (x_sirv_rec.PROGRAM_APPLICATION_ID = OKC_API.G_MISS_NUM)
2265: THEN
2266: x_sirv_rec.PROGRAM_APPLICATION_ID := l_sirv_rec.PROGRAM_APPLICATION_ID;
2267: END IF;
2268: IF (x_sirv_rec.PROGRAM_ID = OKC_API.G_MISS_NUM)

Line 2268: IF (x_sirv_rec.PROGRAM_ID = OKC_API.G_MISS_NUM)

2264: IF (x_sirv_rec.PROGRAM_APPLICATION_ID = OKC_API.G_MISS_NUM)
2265: THEN
2266: x_sirv_rec.PROGRAM_APPLICATION_ID := l_sirv_rec.PROGRAM_APPLICATION_ID;
2267: END IF;
2268: IF (x_sirv_rec.PROGRAM_ID = OKC_API.G_MISS_NUM)
2269: THEN
2270: x_sirv_rec.PROGRAM_ID := l_sirv_rec.PROGRAM_ID;
2271: END IF;
2272: IF (x_sirv_rec.PROGRAM_UPDATE_DATE = OKC_API.G_MISS_DATE)

Line 2272: IF (x_sirv_rec.PROGRAM_UPDATE_DATE = OKC_API.G_MISS_DATE)

2268: IF (x_sirv_rec.PROGRAM_ID = OKC_API.G_MISS_NUM)
2269: THEN
2270: x_sirv_rec.PROGRAM_ID := l_sirv_rec.PROGRAM_ID;
2271: END IF;
2272: IF (x_sirv_rec.PROGRAM_UPDATE_DATE = OKC_API.G_MISS_DATE)
2273: THEN
2274: x_sirv_rec.PROGRAM_UPDATE_DATE := l_sirv_rec.PROGRAM_UPDATE_DATE;
2275: END IF;
2276: -- END,mvasudev -- 02/21/2002

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

2282: FUNCTION Set_Attributes (
2283: p_sirv_rec IN sirv_rec_type,
2284: x_sirv_rec OUT NOCOPY sirv_rec_type
2285: ) RETURN VARCHAR2 IS
2286: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2287: BEGIN
2288: x_sirv_rec := p_sirv_rec;
2289: x_sirv_rec.OBJECT_VERSION_NUMBER := NVL(x_sirv_rec.OBJECT_VERSION_NUMBER, 0) + 1;
2290: RETURN(l_return_status);

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

2289: x_sirv_rec.OBJECT_VERSION_NUMBER := NVL(x_sirv_rec.OBJECT_VERSION_NUMBER, 0) + 1;
2290: RETURN(l_return_status);
2291: END Set_Attributes;
2292: BEGIN
2293: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2294: G_PKG_NAME,
2295: p_init_msg_list,
2296: l_api_version,
2297: p_api_version,

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

2296: l_api_version,
2297: p_api_version,
2298: '_PVT',
2299: x_return_status);
2300: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2301: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2302: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2303: RAISE OKC_API.G_EXCEPTION_ERROR;
2304: END IF;

Line 2301: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2297: p_api_version,
2298: '_PVT',
2299: x_return_status);
2300: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2301: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2302: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2303: RAISE OKC_API.G_EXCEPTION_ERROR;
2304: END IF;
2305: --- Setting item attributes

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

2298: '_PVT',
2299: x_return_status);
2300: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2301: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2302: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2303: RAISE OKC_API.G_EXCEPTION_ERROR;
2304: END IF;
2305: --- Setting item attributes
2306: l_return_status := Set_Attributes(

Line 2303: RAISE OKC_API.G_EXCEPTION_ERROR;

2299: x_return_status);
2300: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2301: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2302: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2303: RAISE OKC_API.G_EXCEPTION_ERROR;
2304: END IF;
2305: --- Setting item attributes
2306: l_return_status := Set_Attributes(
2307: p_sirv_rec, -- IN

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

2306: l_return_status := Set_Attributes(
2307: p_sirv_rec, -- IN
2308: l_sirv_rec); -- OUT
2309: --- If any errors happen abort API
2310: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2311: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2312: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2313: RAISE OKC_API.G_EXCEPTION_ERROR;
2314: END IF;

Line 2311: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2307: p_sirv_rec, -- IN
2308: l_sirv_rec); -- OUT
2309: --- If any errors happen abort API
2310: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2311: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2312: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2313: RAISE OKC_API.G_EXCEPTION_ERROR;
2314: END IF;
2315: l_return_status := populate_new_record(l_sirv_rec, l_def_sirv_rec);

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

2308: l_sirv_rec); -- OUT
2309: --- If any errors happen abort API
2310: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2311: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2312: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2313: RAISE OKC_API.G_EXCEPTION_ERROR;
2314: END IF;
2315: l_return_status := populate_new_record(l_sirv_rec, l_def_sirv_rec);
2316: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2313: RAISE OKC_API.G_EXCEPTION_ERROR;

2309: --- If any errors happen abort API
2310: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2311: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2312: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2313: RAISE OKC_API.G_EXCEPTION_ERROR;
2314: END IF;
2315: l_return_status := populate_new_record(l_sirv_rec, l_def_sirv_rec);
2316: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2317: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

2312: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2313: RAISE OKC_API.G_EXCEPTION_ERROR;
2314: END IF;
2315: l_return_status := populate_new_record(l_sirv_rec, l_def_sirv_rec);
2316: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2317: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2318: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2319: RAISE OKC_API.G_EXCEPTION_ERROR;
2320: END IF;

Line 2317: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2313: RAISE OKC_API.G_EXCEPTION_ERROR;
2314: END IF;
2315: l_return_status := populate_new_record(l_sirv_rec, l_def_sirv_rec);
2316: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2317: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2318: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2319: RAISE OKC_API.G_EXCEPTION_ERROR;
2320: END IF;
2321: l_def_sirv_rec := fill_who_columns(l_def_sirv_rec);

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

2314: END IF;
2315: l_return_status := populate_new_record(l_sirv_rec, l_def_sirv_rec);
2316: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2317: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2318: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2319: RAISE OKC_API.G_EXCEPTION_ERROR;
2320: END IF;
2321: l_def_sirv_rec := fill_who_columns(l_def_sirv_rec);
2322: --- Validate all non-missing attributes (Item Level Validation)

Line 2319: RAISE OKC_API.G_EXCEPTION_ERROR;

2315: l_return_status := populate_new_record(l_sirv_rec, l_def_sirv_rec);
2316: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2317: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2318: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2319: RAISE OKC_API.G_EXCEPTION_ERROR;
2320: END IF;
2321: l_def_sirv_rec := fill_who_columns(l_def_sirv_rec);
2322: --- Validate all non-missing attributes (Item Level Validation)
2323: l_return_status := Validate_Attributes(l_def_sirv_rec);

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

2321: l_def_sirv_rec := fill_who_columns(l_def_sirv_rec);
2322: --- Validate all non-missing attributes (Item Level Validation)
2323: l_return_status := Validate_Attributes(l_def_sirv_rec);
2324: --- If any errors happen abort API
2325: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2326: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2327: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2328: RAISE OKC_API.G_EXCEPTION_ERROR;
2329: END IF;

Line 2326: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2322: --- Validate all non-missing attributes (Item Level Validation)
2323: l_return_status := Validate_Attributes(l_def_sirv_rec);
2324: --- If any errors happen abort API
2325: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2326: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2327: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2328: RAISE OKC_API.G_EXCEPTION_ERROR;
2329: END IF;
2330: l_return_status := Validate_Record(l_def_sirv_rec);

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

2323: l_return_status := Validate_Attributes(l_def_sirv_rec);
2324: --- If any errors happen abort API
2325: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2326: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2327: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2328: RAISE OKC_API.G_EXCEPTION_ERROR;
2329: END IF;
2330: l_return_status := Validate_Record(l_def_sirv_rec);
2331: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2328: RAISE OKC_API.G_EXCEPTION_ERROR;

2324: --- If any errors happen abort API
2325: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2326: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2327: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2328: RAISE OKC_API.G_EXCEPTION_ERROR;
2329: END IF;
2330: l_return_status := Validate_Record(l_def_sirv_rec);
2331: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2332: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

2327: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2328: RAISE OKC_API.G_EXCEPTION_ERROR;
2329: END IF;
2330: l_return_status := Validate_Record(l_def_sirv_rec);
2331: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2332: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2333: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2334: RAISE OKC_API.G_EXCEPTION_ERROR;
2335: END IF;

Line 2332: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2328: RAISE OKC_API.G_EXCEPTION_ERROR;
2329: END IF;
2330: l_return_status := Validate_Record(l_def_sirv_rec);
2331: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2332: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2333: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2334: RAISE OKC_API.G_EXCEPTION_ERROR;
2335: END IF;
2336:

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

2329: END IF;
2330: l_return_status := Validate_Record(l_def_sirv_rec);
2331: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2332: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2333: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2334: RAISE OKC_API.G_EXCEPTION_ERROR;
2335: END IF;
2336:
2337: --------------------------------------

Line 2334: RAISE OKC_API.G_EXCEPTION_ERROR;

2330: l_return_status := Validate_Record(l_def_sirv_rec);
2331: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2332: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2333: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2334: RAISE OKC_API.G_EXCEPTION_ERROR;
2335: END IF;
2336:
2337: --------------------------------------
2338: -- Move VIEW record to "Child" records

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

2348: x_msg_data,
2349: l_sir_rec,
2350: lx_sir_rec
2351: );
2352: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2353: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2354: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2355: RAISE OKC_API.G_EXCEPTION_ERROR;
2356: END IF;

Line 2353: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2349: l_sir_rec,
2350: lx_sir_rec
2351: );
2352: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2353: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2354: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2355: RAISE OKC_API.G_EXCEPTION_ERROR;
2356: END IF;
2357: migrate(lx_sir_rec, l_def_sirv_rec);

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

2350: lx_sir_rec
2351: );
2352: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2353: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2354: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2355: RAISE OKC_API.G_EXCEPTION_ERROR;
2356: END IF;
2357: migrate(lx_sir_rec, l_def_sirv_rec);
2358: x_sirv_rec := l_def_sirv_rec;

Line 2355: RAISE OKC_API.G_EXCEPTION_ERROR;

2351: );
2352: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2353: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2354: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2355: RAISE OKC_API.G_EXCEPTION_ERROR;
2356: END IF;
2357: migrate(lx_sir_rec, l_def_sirv_rec);
2358: x_sirv_rec := l_def_sirv_rec;
2359: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

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

2355: RAISE OKC_API.G_EXCEPTION_ERROR;
2356: END IF;
2357: migrate(lx_sir_rec, l_def_sirv_rec);
2358: x_sirv_rec := l_def_sirv_rec;
2359: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2360: EXCEPTION
2361: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2362: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2363: (

Line 2361: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2357: migrate(lx_sir_rec, l_def_sirv_rec);
2358: x_sirv_rec := l_def_sirv_rec;
2359: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2360: EXCEPTION
2361: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2362: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2363: (
2364: l_api_name,
2365: G_PKG_NAME,

Line 2362: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2358: x_sirv_rec := l_def_sirv_rec;
2359: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2360: EXCEPTION
2361: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2362: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2363: (
2364: l_api_name,
2365: G_PKG_NAME,
2366: 'OKC_API.G_RET_STS_ERROR',

Line 2366: 'OKC_API.G_RET_STS_ERROR',

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

Line 2371: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

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

Line 2372: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

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

Line 2376: 'OKC_API.G_RET_STS_UNEXP_ERROR',

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

Line 2382: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

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

Line 2397: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2393: -- PL/SQL TBL update_row for:SIRV_TBL --
2394: ----------------------------------------
2395: PROCEDURE update_row(
2396: p_api_version IN NUMBER,
2397: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2398: x_return_status OUT NOCOPY VARCHAR2,
2399: x_msg_count OUT NOCOPY NUMBER,
2400: x_msg_data OUT NOCOPY VARCHAR2,
2401: p_sirv_tbl IN sirv_tbl_type,

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

2402: x_sirv_tbl OUT NOCOPY sirv_tbl_type) IS
2403:
2404: l_api_version CONSTANT NUMBER := 1;
2405: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
2406: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2407: i NUMBER := 0;
2408: -- START change : akjain, 09/05/2001
2409: -- Adding OverAll Status Flag
2410: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

Line 2410: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

2406: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2407: i NUMBER := 0;
2408: -- START change : akjain, 09/05/2001
2409: -- Adding OverAll Status Flag
2410: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2411: -- END change : akjain
2412:
2413: BEGIN
2414: OKC_API.init_msg_list(p_init_msg_list);

Line 2414: OKC_API.init_msg_list(p_init_msg_list);

2410: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2411: -- END change : akjain
2412:
2413: BEGIN
2414: OKC_API.init_msg_list(p_init_msg_list);
2415: -- Make sure PL/SQL table has records in it before passing
2416: IF (p_sirv_tbl.COUNT > 0) THEN
2417: i := p_sirv_tbl.FIRST;
2418: LOOP

Line 2421: p_init_msg_list => OKC_API.G_FALSE,

2417: i := p_sirv_tbl.FIRST;
2418: LOOP
2419: update_row (
2420: p_api_version => p_api_version,
2421: p_init_msg_list => OKC_API.G_FALSE,
2422: x_return_status => x_return_status,
2423: x_msg_count => x_msg_count,
2424: x_msg_data => x_msg_data,
2425: p_sirv_rec => p_sirv_tbl(i),

Line 2429: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN

2425: p_sirv_rec => p_sirv_tbl(i),
2426: x_sirv_rec => x_sirv_tbl(i));
2427: -- START change : akjain, 09/05/2001
2428: -- store the highest degree of error
2429: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
2430: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
2431: l_overall_status := x_return_status;
2432: END IF;
2433: END IF;

Line 2430: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN

2426: x_sirv_rec => x_sirv_tbl(i));
2427: -- START change : akjain, 09/05/2001
2428: -- store the highest degree of error
2429: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
2430: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
2431: l_overall_status := x_return_status;
2432: END IF;
2433: END IF;
2434: -- END change : akjain

Line 2445: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2441: -- END change : akjain
2442:
2443: END IF;
2444: EXCEPTION
2445: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2446: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2447: (
2448: l_api_name,
2449: G_PKG_NAME,

Line 2446: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2442:
2443: END IF;
2444: EXCEPTION
2445: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2446: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2447: (
2448: l_api_name,
2449: G_PKG_NAME,
2450: 'OKC_API.G_RET_STS_ERROR',

Line 2450: 'OKC_API.G_RET_STS_ERROR',

2446: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2447: (
2448: l_api_name,
2449: G_PKG_NAME,
2450: 'OKC_API.G_RET_STS_ERROR',
2451: x_msg_count,
2452: x_msg_data,
2453: '_PVT'
2454: );

Line 2455: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2451: x_msg_count,
2452: x_msg_data,
2453: '_PVT'
2454: );
2455: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2456: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2457: (
2458: l_api_name,
2459: G_PKG_NAME,

Line 2456: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2452: x_msg_data,
2453: '_PVT'
2454: );
2455: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2456: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2457: (
2458: l_api_name,
2459: G_PKG_NAME,
2460: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2460: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2456: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2457: (
2458: l_api_name,
2459: G_PKG_NAME,
2460: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2461: x_msg_count,
2462: x_msg_data,
2463: '_PVT'
2464: );

Line 2466: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2462: x_msg_data,
2463: '_PVT'
2464: );
2465: WHEN OTHERS THEN
2466: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2467: (
2468: l_api_name,
2469: G_PKG_NAME,
2470: 'OTHERS',

Line 2484: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2480: ---------------------------------
2481: -- delete_row for:OKL_SIF_RETS --
2482: ---------------------------------
2483: PROCEDURE delete_row(
2484: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2485: x_return_status OUT NOCOPY VARCHAR2,
2486: x_msg_count OUT NOCOPY NUMBER,
2487: x_msg_data OUT NOCOPY VARCHAR2,
2488: p_sir_rec IN sir_rec_type) IS

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

2488: p_sir_rec IN sir_rec_type) IS
2489:
2490: l_api_version CONSTANT NUMBER := 1;
2491: l_api_name CONSTANT VARCHAR2(30) := 'RETS_delete_row';
2492: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2493: l_sir_rec sir_rec_type:= p_sir_rec;
2494: l_row_notfound BOOLEAN := TRUE;
2495: BEGIN
2496: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

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

2492: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2493: l_sir_rec sir_rec_type:= p_sir_rec;
2494: l_row_notfound BOOLEAN := TRUE;
2495: BEGIN
2496: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2497: p_init_msg_list,
2498: '_PVT',
2499: x_return_status);
2500: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

2496: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2497: p_init_msg_list,
2498: '_PVT',
2499: x_return_status);
2500: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2501: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2502: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2503: RAISE OKC_API.G_EXCEPTION_ERROR;
2504: END IF;

Line 2501: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2497: p_init_msg_list,
2498: '_PVT',
2499: x_return_status);
2500: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2501: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2502: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2503: RAISE OKC_API.G_EXCEPTION_ERROR;
2504: END IF;
2505: DELETE FROM OKL_SIF_RETS

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

2498: '_PVT',
2499: x_return_status);
2500: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2501: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2502: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2503: RAISE OKC_API.G_EXCEPTION_ERROR;
2504: END IF;
2505: DELETE FROM OKL_SIF_RETS
2506: WHERE ID = l_sir_rec.id;

Line 2503: RAISE OKC_API.G_EXCEPTION_ERROR;

2499: x_return_status);
2500: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2501: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2502: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2503: RAISE OKC_API.G_EXCEPTION_ERROR;
2504: END IF;
2505: DELETE FROM OKL_SIF_RETS
2506: WHERE ID = l_sir_rec.id;
2507:

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

2504: END IF;
2505: DELETE FROM OKL_SIF_RETS
2506: WHERE ID = l_sir_rec.id;
2507:
2508: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2509: EXCEPTION
2510: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2511: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2512: (

Line 2510: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2506: WHERE ID = l_sir_rec.id;
2507:
2508: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2509: EXCEPTION
2510: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2511: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2512: (
2513: l_api_name,
2514: G_PKG_NAME,

Line 2511: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2507:
2508: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2509: EXCEPTION
2510: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2511: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2512: (
2513: l_api_name,
2514: G_PKG_NAME,
2515: 'OKC_API.G_RET_STS_ERROR',

Line 2515: 'OKC_API.G_RET_STS_ERROR',

2511: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2512: (
2513: l_api_name,
2514: G_PKG_NAME,
2515: 'OKC_API.G_RET_STS_ERROR',
2516: x_msg_count,
2517: x_msg_data,
2518: '_PVT'
2519: );

Line 2520: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2516: x_msg_count,
2517: x_msg_data,
2518: '_PVT'
2519: );
2520: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2521: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2522: (
2523: l_api_name,
2524: G_PKG_NAME,

Line 2521: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2517: x_msg_data,
2518: '_PVT'
2519: );
2520: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2521: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2522: (
2523: l_api_name,
2524: G_PKG_NAME,
2525: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2525: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2521: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2522: (
2523: l_api_name,
2524: G_PKG_NAME,
2525: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2526: x_msg_count,
2527: x_msg_data,
2528: '_PVT'
2529: );

Line 2531: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2527: x_msg_data,
2528: '_PVT'
2529: );
2530: WHEN OTHERS THEN
2531: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2532: (
2533: l_api_name,
2534: G_PKG_NAME,
2535: 'OTHERS',

Line 2546: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2542: -- delete_row for:OKL_SIF_RETS_V --
2543: -----------------------------------
2544: PROCEDURE delete_row(
2545: p_api_version IN NUMBER,
2546: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2547: x_return_status OUT NOCOPY VARCHAR2,
2548: x_msg_count OUT NOCOPY NUMBER,
2549: x_msg_data OUT NOCOPY VARCHAR2,
2550: p_sirv_rec IN sirv_rec_type) IS

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

2550: p_sirv_rec IN sirv_rec_type) IS
2551:
2552: l_api_version CONSTANT NUMBER := 1;
2553: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
2554: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2555: l_sirv_rec sirv_rec_type := p_sirv_rec;
2556: l_sir_rec sir_rec_type;
2557: BEGIN
2558: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

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

2554: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2555: l_sirv_rec sirv_rec_type := p_sirv_rec;
2556: l_sir_rec sir_rec_type;
2557: BEGIN
2558: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2559: G_PKG_NAME,
2560: p_init_msg_list,
2561: l_api_version,
2562: p_api_version,

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

2561: l_api_version,
2562: p_api_version,
2563: '_PVT',
2564: x_return_status);
2565: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2566: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2567: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2568: RAISE OKC_API.G_EXCEPTION_ERROR;
2569: END IF;

Line 2566: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2562: p_api_version,
2563: '_PVT',
2564: x_return_status);
2565: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2566: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2567: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2568: RAISE OKC_API.G_EXCEPTION_ERROR;
2569: END IF;
2570: --------------------------------------

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

2563: '_PVT',
2564: x_return_status);
2565: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2566: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2567: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2568: RAISE OKC_API.G_EXCEPTION_ERROR;
2569: END IF;
2570: --------------------------------------
2571: -- Move VIEW record to "Child" records

Line 2568: RAISE OKC_API.G_EXCEPTION_ERROR;

2564: x_return_status);
2565: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2566: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2567: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2568: RAISE OKC_API.G_EXCEPTION_ERROR;
2569: END IF;
2570: --------------------------------------
2571: -- Move VIEW record to "Child" records
2572: --------------------------------------

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

2580: x_msg_count,
2581: x_msg_data,
2582: l_sir_rec
2583: );
2584: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2586: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2587: RAISE OKC_API.G_EXCEPTION_ERROR;
2588: END IF;

Line 2585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2581: x_msg_data,
2582: l_sir_rec
2583: );
2584: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2586: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2587: RAISE OKC_API.G_EXCEPTION_ERROR;
2588: END IF;
2589: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

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

2582: l_sir_rec
2583: );
2584: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2586: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2587: RAISE OKC_API.G_EXCEPTION_ERROR;
2588: END IF;
2589: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2590: EXCEPTION

Line 2587: RAISE OKC_API.G_EXCEPTION_ERROR;

2583: );
2584: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2586: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2587: RAISE OKC_API.G_EXCEPTION_ERROR;
2588: END IF;
2589: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2590: EXCEPTION
2591: WHEN OKC_API.G_EXCEPTION_ERROR THEN

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

2585: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2586: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2587: RAISE OKC_API.G_EXCEPTION_ERROR;
2588: END IF;
2589: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2590: EXCEPTION
2591: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2592: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2593: (

Line 2591: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2587: RAISE OKC_API.G_EXCEPTION_ERROR;
2588: END IF;
2589: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2590: EXCEPTION
2591: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2592: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2593: (
2594: l_api_name,
2595: G_PKG_NAME,

Line 2592: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2588: END IF;
2589: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2590: EXCEPTION
2591: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2592: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2593: (
2594: l_api_name,
2595: G_PKG_NAME,
2596: 'OKC_API.G_RET_STS_ERROR',

Line 2596: 'OKC_API.G_RET_STS_ERROR',

2592: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2593: (
2594: l_api_name,
2595: G_PKG_NAME,
2596: 'OKC_API.G_RET_STS_ERROR',
2597: x_msg_count,
2598: x_msg_data,
2599: '_PVT'
2600: );

Line 2601: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2597: x_msg_count,
2598: x_msg_data,
2599: '_PVT'
2600: );
2601: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2602: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2603: (
2604: l_api_name,
2605: G_PKG_NAME,

Line 2602: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2598: x_msg_data,
2599: '_PVT'
2600: );
2601: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2602: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2603: (
2604: l_api_name,
2605: G_PKG_NAME,
2606: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2606: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2602: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2603: (
2604: l_api_name,
2605: G_PKG_NAME,
2606: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2607: x_msg_count,
2608: x_msg_data,
2609: '_PVT'
2610: );

Line 2612: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2608: x_msg_data,
2609: '_PVT'
2610: );
2611: WHEN OTHERS THEN
2612: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2613: (
2614: l_api_name,
2615: G_PKG_NAME,
2616: 'OTHERS',

Line 2627: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2623: -- PL/SQL TBL delete_row for:SIRV_TBL --
2624: ----------------------------------------
2625: PROCEDURE delete_row(
2626: p_api_version IN NUMBER,
2627: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2628: x_return_status OUT NOCOPY VARCHAR2,
2629: x_msg_count OUT NOCOPY NUMBER,
2630: x_msg_data OUT NOCOPY VARCHAR2,
2631: p_sirv_tbl IN sirv_tbl_type) IS

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

2631: p_sirv_tbl IN sirv_tbl_type) IS
2632:
2633: l_api_version CONSTANT NUMBER := 1;
2634: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2635: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2636: i NUMBER := 0;
2637: -- START change : akjain, 09/05/2001
2638: -- Adding OverAll Status Flag
2639: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

Line 2639: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;

2635: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2636: i NUMBER := 0;
2637: -- START change : akjain, 09/05/2001
2638: -- Adding OverAll Status Flag
2639: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2640: -- END change : akjain
2641:
2642: BEGIN
2643: OKC_API.init_msg_list(p_init_msg_list);

Line 2643: OKC_API.init_msg_list(p_init_msg_list);

2639: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2640: -- END change : akjain
2641:
2642: BEGIN
2643: OKC_API.init_msg_list(p_init_msg_list);
2644: -- Make sure PL/SQL table has records in it before passing
2645: IF (p_sirv_tbl.COUNT > 0) THEN
2646: i := p_sirv_tbl.FIRST;
2647: LOOP

Line 2650: p_init_msg_list => OKC_API.G_FALSE,

2646: i := p_sirv_tbl.FIRST;
2647: LOOP
2648: delete_row (
2649: p_api_version => p_api_version,
2650: p_init_msg_list => OKC_API.G_FALSE,
2651: x_return_status => x_return_status,
2652: x_msg_count => x_msg_count,
2653: x_msg_data => x_msg_data,
2654: p_sirv_rec => p_sirv_tbl(i));

Line 2657: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN

2653: x_msg_data => x_msg_data,
2654: p_sirv_rec => p_sirv_tbl(i));
2655: -- START change : akjain, 09/05/2001
2656: -- store the highest degree of error
2657: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
2658: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
2659: l_overall_status := x_return_status;
2660: END IF;
2661: END IF;

Line 2658: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN

2654: p_sirv_rec => p_sirv_tbl(i));
2655: -- START change : akjain, 09/05/2001
2656: -- store the highest degree of error
2657: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
2658: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
2659: l_overall_status := x_return_status;
2660: END IF;
2661: END IF;
2662: -- END change : akjain

Line 2673: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2669: -- END change : akjain
2670:
2671: END IF;
2672: EXCEPTION
2673: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2674: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2675: (
2676: l_api_name,
2677: G_PKG_NAME,

Line 2674: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2670:
2671: END IF;
2672: EXCEPTION
2673: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2674: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2675: (
2676: l_api_name,
2677: G_PKG_NAME,
2678: 'OKC_API.G_RET_STS_ERROR',

Line 2678: 'OKC_API.G_RET_STS_ERROR',

2674: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2675: (
2676: l_api_name,
2677: G_PKG_NAME,
2678: 'OKC_API.G_RET_STS_ERROR',
2679: x_msg_count,
2680: x_msg_data,
2681: '_PVT'
2682: );

Line 2683: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2679: x_msg_count,
2680: x_msg_data,
2681: '_PVT'
2682: );
2683: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2684: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2685: (
2686: l_api_name,
2687: G_PKG_NAME,

Line 2684: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2680: x_msg_data,
2681: '_PVT'
2682: );
2683: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2684: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2685: (
2686: l_api_name,
2687: G_PKG_NAME,
2688: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2688: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2684: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2685: (
2686: l_api_name,
2687: G_PKG_NAME,
2688: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2689: x_msg_count,
2690: x_msg_data,
2691: '_PVT'
2692: );

Line 2694: x_return_status :=OKC_API.HANDLE_EXCEPTIONS

2690: x_msg_data,
2691: '_PVT'
2692: );
2693: WHEN OTHERS THEN
2694: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2695: (
2696: l_api_name,
2697: G_PKG_NAME,
2698: 'OTHERS',