[Home] [Help]
352: p_silv_rec IN silv_rec_type
353: ) RETURN silv_rec_type IS
354: l_silv_rec silv_rec_type := p_silv_rec;
355: BEGIN
356: IF (l_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT = OKC_API.G_MISS_NUM) THEN
357: l_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT := NULL;
358: END IF;
359: IF (l_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT = OKC_API.G_MISS_NUM) THEN
360: l_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT := NULL;
355: BEGIN
356: IF (l_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT = OKC_API.G_MISS_NUM) THEN
357: l_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT := NULL;
358: END IF;
359: IF (l_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT = OKC_API.G_MISS_NUM) THEN
360: l_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT := NULL;
361: END IF;
362: IF (l_silv_rec.residual_guarantee_method = OKC_API.G_MISS_CHAR) THEN
363: l_silv_rec.residual_guarantee_method := NULL;
358: END IF;
359: IF (l_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT = OKC_API.G_MISS_NUM) THEN
360: l_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT := NULL;
361: END IF;
362: IF (l_silv_rec.residual_guarantee_method = OKC_API.G_MISS_CHAR) THEN
363: l_silv_rec.residual_guarantee_method := NULL;
364: END IF;
365: -- mvasudev , 05/13/2002
366: IF (l_silv_rec.residual_guarantee_type = OKC_API.G_MISS_CHAR) THEN
362: IF (l_silv_rec.residual_guarantee_method = OKC_API.G_MISS_CHAR) THEN
363: l_silv_rec.residual_guarantee_method := NULL;
364: END IF;
365: -- mvasudev , 05/13/2002
366: IF (l_silv_rec.residual_guarantee_type = OKC_API.G_MISS_CHAR) THEN
367: l_silv_rec.residual_guarantee_type := NULL;
368: END IF;
369: IF (l_silv_rec.residual_date = OKC_API.G_MISS_DATE) THEN
370: l_silv_rec.residual_date := NULL;
365: -- mvasudev , 05/13/2002
366: IF (l_silv_rec.residual_guarantee_type = OKC_API.G_MISS_CHAR) THEN
367: l_silv_rec.residual_guarantee_type := NULL;
368: END IF;
369: IF (l_silv_rec.residual_date = OKC_API.G_MISS_DATE) THEN
370: l_silv_rec.residual_date := NULL;
371: END IF;
372: IF (l_silv_rec.fed_depre_term = OKC_API.G_MISS_NUM) THEN
373: l_silv_rec.fed_depre_term := NULL;
368: END IF;
369: IF (l_silv_rec.residual_date = OKC_API.G_MISS_DATE) THEN
370: l_silv_rec.residual_date := NULL;
371: END IF;
372: IF (l_silv_rec.fed_depre_term = OKC_API.G_MISS_NUM) THEN
373: l_silv_rec.fed_depre_term := NULL;
374: END IF;
375: IF (l_silv_rec.fed_depre_dmnshing_value_rate = OKC_API.G_MISS_NUM) THEN
376: l_silv_rec.fed_depre_dmnshing_value_rate := NULL;
371: END IF;
372: IF (l_silv_rec.fed_depre_term = OKC_API.G_MISS_NUM) THEN
373: l_silv_rec.fed_depre_term := NULL;
374: END IF;
375: IF (l_silv_rec.fed_depre_dmnshing_value_rate = OKC_API.G_MISS_NUM) THEN
376: l_silv_rec.fed_depre_dmnshing_value_rate := NULL;
377: END IF;
378: IF (l_silv_rec.fed_depre_adr_conve = OKC_API.G_MISS_CHAR) THEN
379: l_silv_rec.fed_depre_adr_conve := NULL;
374: END IF;
375: IF (l_silv_rec.fed_depre_dmnshing_value_rate = OKC_API.G_MISS_NUM) THEN
376: l_silv_rec.fed_depre_dmnshing_value_rate := NULL;
377: END IF;
378: IF (l_silv_rec.fed_depre_adr_conve = OKC_API.G_MISS_CHAR) THEN
379: l_silv_rec.fed_depre_adr_conve := NULL;
380: END IF;
381: IF (l_silv_rec.state_depre_basis_percent = OKC_API.G_MISS_NUM) THEN
382: l_silv_rec.state_depre_basis_percent := NULL;
377: END IF;
378: IF (l_silv_rec.fed_depre_adr_conve = OKC_API.G_MISS_CHAR) THEN
379: l_silv_rec.fed_depre_adr_conve := NULL;
380: END IF;
381: IF (l_silv_rec.state_depre_basis_percent = OKC_API.G_MISS_NUM) THEN
382: l_silv_rec.state_depre_basis_percent := NULL;
383: END IF;
384: IF (l_silv_rec.state_depre_method = OKC_API.G_MISS_CHAR) THEN
385: l_silv_rec.state_depre_method := NULL;
380: END IF;
381: IF (l_silv_rec.state_depre_basis_percent = OKC_API.G_MISS_NUM) THEN
382: l_silv_rec.state_depre_basis_percent := NULL;
383: END IF;
384: IF (l_silv_rec.state_depre_method = OKC_API.G_MISS_CHAR) THEN
385: l_silv_rec.state_depre_method := NULL;
386: END IF;
387: IF (l_silv_rec.purchase_option = OKC_API.G_MISS_CHAR) THEN
388: l_silv_rec.purchase_option := NULL;
383: END IF;
384: IF (l_silv_rec.state_depre_method = OKC_API.G_MISS_CHAR) THEN
385: l_silv_rec.state_depre_method := NULL;
386: END IF;
387: IF (l_silv_rec.purchase_option = OKC_API.G_MISS_CHAR) THEN
388: l_silv_rec.purchase_option := NULL;
389: END IF;
390: IF (l_silv_rec.purchase_option_amount = OKC_API.G_MISS_NUM) THEN
391: l_silv_rec.purchase_option_amount := NULL;
386: END IF;
387: IF (l_silv_rec.purchase_option = OKC_API.G_MISS_CHAR) THEN
388: l_silv_rec.purchase_option := NULL;
389: END IF;
390: IF (l_silv_rec.purchase_option_amount = OKC_API.G_MISS_NUM) THEN
391: l_silv_rec.purchase_option_amount := NULL;
392: END IF;
393: IF (l_silv_rec.asset_cost = OKC_API.G_MISS_NUM) THEN
394: l_silv_rec.asset_cost := NULL;
389: END IF;
390: IF (l_silv_rec.purchase_option_amount = OKC_API.G_MISS_NUM) THEN
391: l_silv_rec.purchase_option_amount := NULL;
392: END IF;
393: IF (l_silv_rec.asset_cost = OKC_API.G_MISS_NUM) THEN
394: l_silv_rec.asset_cost := NULL;
395: END IF;
396: IF (l_silv_rec.state_depre_term = OKC_API.G_MISS_NUM) THEN
397: l_silv_rec.state_depre_term := NULL;
392: END IF;
393: IF (l_silv_rec.asset_cost = OKC_API.G_MISS_NUM) THEN
394: l_silv_rec.asset_cost := NULL;
395: END IF;
396: IF (l_silv_rec.state_depre_term = OKC_API.G_MISS_NUM) THEN
397: l_silv_rec.state_depre_term := NULL;
398: END IF;
399: IF (l_silv_rec.state_depre_adr_convent = OKC_API.G_MISS_CHAR) THEN
400: l_silv_rec.state_depre_adr_convent := NULL;
395: END IF;
396: IF (l_silv_rec.state_depre_term = OKC_API.G_MISS_NUM) THEN
397: l_silv_rec.state_depre_term := NULL;
398: END IF;
399: IF (l_silv_rec.state_depre_adr_convent = OKC_API.G_MISS_CHAR) THEN
400: l_silv_rec.state_depre_adr_convent := NULL;
401: END IF;
402: IF (l_silv_rec.fed_depre_method = OKC_API.G_MISS_CHAR) THEN
403: l_silv_rec.fed_depre_method := NULL;
398: END IF;
399: IF (l_silv_rec.state_depre_adr_convent = OKC_API.G_MISS_CHAR) THEN
400: l_silv_rec.state_depre_adr_convent := NULL;
401: END IF;
402: IF (l_silv_rec.fed_depre_method = OKC_API.G_MISS_CHAR) THEN
403: l_silv_rec.fed_depre_method := NULL;
404: END IF;
405: IF (l_silv_rec.residual_amount = OKC_API.G_MISS_NUM) THEN
406: l_silv_rec.residual_amount := NULL;
401: END IF;
402: IF (l_silv_rec.fed_depre_method = OKC_API.G_MISS_CHAR) THEN
403: l_silv_rec.fed_depre_method := NULL;
404: END IF;
405: IF (l_silv_rec.residual_amount = OKC_API.G_MISS_NUM) THEN
406: l_silv_rec.residual_amount := NULL;
407: END IF;
408: IF (l_silv_rec.fed_depre_salvage = OKC_API.G_MISS_NUM) THEN
409: l_silv_rec.fed_depre_salvage := NULL;
404: END IF;
405: IF (l_silv_rec.residual_amount = OKC_API.G_MISS_NUM) THEN
406: l_silv_rec.residual_amount := NULL;
407: END IF;
408: IF (l_silv_rec.fed_depre_salvage = OKC_API.G_MISS_NUM) THEN
409: l_silv_rec.fed_depre_salvage := NULL;
410: END IF;
411: IF (l_silv_rec.date_fed_depre = OKC_API.G_MISS_DATE) THEN
412: l_silv_rec.date_fed_depre := NULL;
407: END IF;
408: IF (l_silv_rec.fed_depre_salvage = OKC_API.G_MISS_NUM) THEN
409: l_silv_rec.fed_depre_salvage := NULL;
410: END IF;
411: IF (l_silv_rec.date_fed_depre = OKC_API.G_MISS_DATE) THEN
412: l_silv_rec.date_fed_depre := NULL;
413: END IF;
414: IF (l_silv_rec.book_salvage = OKC_API.G_MISS_NUM) THEN
415: l_silv_rec.book_salvage := NULL;
410: END IF;
411: IF (l_silv_rec.date_fed_depre = OKC_API.G_MISS_DATE) THEN
412: l_silv_rec.date_fed_depre := NULL;
413: END IF;
414: IF (l_silv_rec.book_salvage = OKC_API.G_MISS_NUM) THEN
415: l_silv_rec.book_salvage := NULL;
416: END IF;
417: IF (l_silv_rec.book_adr_convention = OKC_API.G_MISS_CHAR) THEN
418: l_silv_rec.book_adr_convention := NULL;
413: END IF;
414: IF (l_silv_rec.book_salvage = OKC_API.G_MISS_NUM) THEN
415: l_silv_rec.book_salvage := NULL;
416: END IF;
417: IF (l_silv_rec.book_adr_convention = OKC_API.G_MISS_CHAR) THEN
418: l_silv_rec.book_adr_convention := NULL;
419: END IF;
420: IF (l_silv_rec.state_depre_salvage = OKC_API.G_MISS_NUM) THEN
421: l_silv_rec.state_depre_salvage := NULL;
416: END IF;
417: IF (l_silv_rec.book_adr_convention = OKC_API.G_MISS_CHAR) THEN
418: l_silv_rec.book_adr_convention := NULL;
419: END IF;
420: IF (l_silv_rec.state_depre_salvage = OKC_API.G_MISS_NUM) THEN
421: l_silv_rec.state_depre_salvage := NULL;
422: END IF;
423: IF (l_silv_rec.fed_depre_basis_percent = OKC_API.G_MISS_NUM) THEN
424: l_silv_rec.fed_depre_basis_percent := NULL;
419: END IF;
420: IF (l_silv_rec.state_depre_salvage = OKC_API.G_MISS_NUM) THEN
421: l_silv_rec.state_depre_salvage := NULL;
422: END IF;
423: IF (l_silv_rec.fed_depre_basis_percent = OKC_API.G_MISS_NUM) THEN
424: l_silv_rec.fed_depre_basis_percent := NULL;
425: END IF;
426: IF (l_silv_rec.book_basis_percent = OKC_API.G_MISS_NUM) THEN
427: l_silv_rec.book_basis_percent := NULL;
422: END IF;
423: IF (l_silv_rec.fed_depre_basis_percent = OKC_API.G_MISS_NUM) THEN
424: l_silv_rec.fed_depre_basis_percent := NULL;
425: END IF;
426: IF (l_silv_rec.book_basis_percent = OKC_API.G_MISS_NUM) THEN
427: l_silv_rec.book_basis_percent := NULL;
428: END IF;
429: IF (l_silv_rec.date_delivery = OKC_API.G_MISS_DATE) THEN
430: l_silv_rec.date_delivery := NULL;
425: END IF;
426: IF (l_silv_rec.book_basis_percent = OKC_API.G_MISS_NUM) THEN
427: l_silv_rec.book_basis_percent := NULL;
428: END IF;
429: IF (l_silv_rec.date_delivery = OKC_API.G_MISS_DATE) THEN
430: l_silv_rec.date_delivery := NULL;
431: END IF;
432: IF (l_silv_rec.book_term = OKC_API.G_MISS_NUM) THEN
433: l_silv_rec.book_term := NULL;
428: END IF;
429: IF (l_silv_rec.date_delivery = OKC_API.G_MISS_DATE) THEN
430: l_silv_rec.date_delivery := NULL;
431: END IF;
432: IF (l_silv_rec.book_term = OKC_API.G_MISS_NUM) THEN
433: l_silv_rec.book_term := NULL;
434: END IF;
435: IF (l_silv_rec.residual_guarantee_amount = OKC_API.G_MISS_NUM) THEN
436: l_silv_rec.residual_guarantee_amount := NULL;
431: END IF;
432: IF (l_silv_rec.book_term = OKC_API.G_MISS_NUM) THEN
433: l_silv_rec.book_term := NULL;
434: END IF;
435: IF (l_silv_rec.residual_guarantee_amount = OKC_API.G_MISS_NUM) THEN
436: l_silv_rec.residual_guarantee_amount := NULL;
437: END IF;
438: IF (l_silv_rec.date_funding = OKC_API.G_MISS_DATE) THEN
439: l_silv_rec.date_funding := NULL;
434: END IF;
435: IF (l_silv_rec.residual_guarantee_amount = OKC_API.G_MISS_NUM) THEN
436: l_silv_rec.residual_guarantee_amount := NULL;
437: END IF;
438: IF (l_silv_rec.date_funding = OKC_API.G_MISS_DATE) THEN
439: l_silv_rec.date_funding := NULL;
440: END IF;
441: IF (l_silv_rec.date_book = OKC_API.G_MISS_DATE) THEN
442: l_silv_rec.date_book := NULL;
437: END IF;
438: IF (l_silv_rec.date_funding = OKC_API.G_MISS_DATE) THEN
439: l_silv_rec.date_funding := NULL;
440: END IF;
441: IF (l_silv_rec.date_book = OKC_API.G_MISS_DATE) THEN
442: l_silv_rec.date_book := NULL;
443: END IF;
444: IF (l_silv_rec.date_state_depre = OKC_API.G_MISS_DATE) THEN
445: l_silv_rec.date_state_depre := NULL;
440: END IF;
441: IF (l_silv_rec.date_book = OKC_API.G_MISS_DATE) THEN
442: l_silv_rec.date_book := NULL;
443: END IF;
444: IF (l_silv_rec.date_state_depre = OKC_API.G_MISS_DATE) THEN
445: l_silv_rec.date_state_depre := NULL;
446: END IF;
447: IF (l_silv_rec.book_method = OKC_API.G_MISS_CHAR) THEN
448: l_silv_rec.book_method := NULL;
443: END IF;
444: IF (l_silv_rec.date_state_depre = OKC_API.G_MISS_DATE) THEN
445: l_silv_rec.date_state_depre := NULL;
446: END IF;
447: IF (l_silv_rec.book_method = OKC_API.G_MISS_CHAR) THEN
448: l_silv_rec.book_method := NULL;
449: END IF;
450: IF (l_silv_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR) THEN
451: l_silv_rec.stream_interface_attribute01 := NULL;
446: END IF;
447: IF (l_silv_rec.book_method = OKC_API.G_MISS_CHAR) THEN
448: l_silv_rec.book_method := NULL;
449: END IF;
450: IF (l_silv_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR) THEN
451: l_silv_rec.stream_interface_attribute01 := NULL;
452: END IF;
453: IF (l_silv_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR) THEN
454: l_silv_rec.stream_interface_attribute02 := NULL;
449: END IF;
450: IF (l_silv_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR) THEN
451: l_silv_rec.stream_interface_attribute01 := NULL;
452: END IF;
453: IF (l_silv_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR) THEN
454: l_silv_rec.stream_interface_attribute02 := NULL;
455: END IF;
456: IF (l_silv_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR) THEN
457: l_silv_rec.stream_interface_attribute03 := NULL;
452: END IF;
453: IF (l_silv_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR) THEN
454: l_silv_rec.stream_interface_attribute02 := NULL;
455: END IF;
456: IF (l_silv_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR) THEN
457: l_silv_rec.stream_interface_attribute03 := NULL;
458: END IF;
459: IF (l_silv_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR) THEN
460: l_silv_rec.stream_interface_attribute04 := NULL;
455: END IF;
456: IF (l_silv_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR) THEN
457: l_silv_rec.stream_interface_attribute03 := NULL;
458: END IF;
459: IF (l_silv_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR) THEN
460: l_silv_rec.stream_interface_attribute04 := NULL;
461: END IF;
462: IF (l_silv_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR) THEN
463: l_silv_rec.stream_interface_attribute05 := NULL;
458: END IF;
459: IF (l_silv_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR) THEN
460: l_silv_rec.stream_interface_attribute04 := NULL;
461: END IF;
462: IF (l_silv_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR) THEN
463: l_silv_rec.stream_interface_attribute05 := NULL;
464: END IF;
465: IF (l_silv_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR) THEN
466: l_silv_rec.stream_interface_attribute06 := NULL;
461: END IF;
462: IF (l_silv_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR) THEN
463: l_silv_rec.stream_interface_attribute05 := NULL;
464: END IF;
465: IF (l_silv_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR) THEN
466: l_silv_rec.stream_interface_attribute06 := NULL;
467: END IF;
468: IF (l_silv_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR) THEN
469: l_silv_rec.stream_interface_attribute07 := NULL;
464: END IF;
465: IF (l_silv_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR) THEN
466: l_silv_rec.stream_interface_attribute06 := NULL;
467: END IF;
468: IF (l_silv_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR) THEN
469: l_silv_rec.stream_interface_attribute07 := NULL;
470: END IF;
471: IF (l_silv_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR) THEN
472: l_silv_rec.stream_interface_attribute08 := NULL;
467: END IF;
468: IF (l_silv_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR) THEN
469: l_silv_rec.stream_interface_attribute07 := NULL;
470: END IF;
471: IF (l_silv_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR) THEN
472: l_silv_rec.stream_interface_attribute08 := NULL;
473: END IF;
474: IF (l_silv_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR) THEN
475: l_silv_rec.stream_interface_attribute09 := NULL;
470: END IF;
471: IF (l_silv_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR) THEN
472: l_silv_rec.stream_interface_attribute08 := NULL;
473: END IF;
474: IF (l_silv_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR) THEN
475: l_silv_rec.stream_interface_attribute09 := NULL;
476: END IF;
477: IF (l_silv_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR) THEN
478: l_silv_rec.stream_interface_attribute10 := NULL;
473: END IF;
474: IF (l_silv_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR) THEN
475: l_silv_rec.stream_interface_attribute09 := NULL;
476: END IF;
477: IF (l_silv_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR) THEN
478: l_silv_rec.stream_interface_attribute10 := NULL;
479: END IF;
480: IF (l_silv_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR) THEN
481: l_silv_rec.stream_interface_attribute11 := NULL;
476: END IF;
477: IF (l_silv_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR) THEN
478: l_silv_rec.stream_interface_attribute10 := NULL;
479: END IF;
480: IF (l_silv_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR) THEN
481: l_silv_rec.stream_interface_attribute11 := NULL;
482: END IF;
483: IF (l_silv_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR) THEN
484: l_silv_rec.stream_interface_attribute12 := NULL;
479: END IF;
480: IF (l_silv_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR) THEN
481: l_silv_rec.stream_interface_attribute11 := NULL;
482: END IF;
483: IF (l_silv_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR) THEN
484: l_silv_rec.stream_interface_attribute12 := NULL;
485: END IF;
486: IF (l_silv_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR) THEN
487: l_silv_rec.stream_interface_attribute13 := NULL;
482: END IF;
483: IF (l_silv_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR) THEN
484: l_silv_rec.stream_interface_attribute12 := NULL;
485: END IF;
486: IF (l_silv_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR) THEN
487: l_silv_rec.stream_interface_attribute13 := NULL;
488: END IF;
489: IF (l_silv_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR) THEN
490: l_silv_rec.stream_interface_attribute14 := NULL;
485: END IF;
486: IF (l_silv_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR) THEN
487: l_silv_rec.stream_interface_attribute13 := NULL;
488: END IF;
489: IF (l_silv_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR) THEN
490: l_silv_rec.stream_interface_attribute14 := NULL;
491: END IF;
492: IF (l_silv_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR) THEN
493: l_silv_rec.stream_interface_attribute15 := NULL;
488: END IF;
489: IF (l_silv_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR) THEN
490: l_silv_rec.stream_interface_attribute14 := NULL;
491: END IF;
492: IF (l_silv_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR) THEN
493: l_silv_rec.stream_interface_attribute15 := NULL;
494: END IF;
495: IF (l_silv_rec.date_start = OKC_API.G_MISS_DATE) THEN
496: l_silv_rec.date_start := NULL;
491: END IF;
492: IF (l_silv_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR) THEN
493: l_silv_rec.stream_interface_attribute15 := NULL;
494: END IF;
495: IF (l_silv_rec.date_start = OKC_API.G_MISS_DATE) THEN
496: l_silv_rec.date_start := NULL;
497: END IF;
498: IF (l_silv_rec.date_lending = OKC_API.G_MISS_DATE) THEN
499: l_silv_rec.date_lending := NULL;
494: END IF;
495: IF (l_silv_rec.date_start = OKC_API.G_MISS_DATE) THEN
496: l_silv_rec.date_start := NULL;
497: END IF;
498: IF (l_silv_rec.date_lending = OKC_API.G_MISS_DATE) THEN
499: l_silv_rec.date_lending := NULL;
500: END IF;
501: IF (l_silv_rec.index_number = OKC_API.G_MISS_NUM) THEN
502: l_silv_rec.index_number := NULL;
497: END IF;
498: IF (l_silv_rec.date_lending = OKC_API.G_MISS_DATE) THEN
499: l_silv_rec.date_lending := NULL;
500: END IF;
501: IF (l_silv_rec.index_number = OKC_API.G_MISS_NUM) THEN
502: l_silv_rec.index_number := NULL;
503: END IF;
504: IF (l_silv_rec.sif_id = OKC_API.G_MISS_NUM) THEN
505: l_silv_rec.sif_id := NULL;
500: END IF;
501: IF (l_silv_rec.index_number = OKC_API.G_MISS_NUM) THEN
502: l_silv_rec.index_number := NULL;
503: END IF;
504: IF (l_silv_rec.sif_id = OKC_API.G_MISS_NUM) THEN
505: l_silv_rec.sif_id := NULL;
506: END IF;
507: IF (l_silv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
508: l_silv_rec.object_version_number := NULL;
503: END IF;
504: IF (l_silv_rec.sif_id = OKC_API.G_MISS_NUM) THEN
505: l_silv_rec.sif_id := NULL;
506: END IF;
507: IF (l_silv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
508: l_silv_rec.object_version_number := NULL;
509: END IF;
510: IF (l_silv_rec.kle_id = OKC_API.G_MISS_NUM) THEN
511: l_silv_rec.kle_id := NULL;
506: END IF;
507: IF (l_silv_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
508: l_silv_rec.object_version_number := NULL;
509: END IF;
510: IF (l_silv_rec.kle_id = OKC_API.G_MISS_NUM) THEN
511: l_silv_rec.kle_id := NULL;
512: END IF;
513: IF (l_silv_rec.sil_type = OKC_API.G_MISS_CHAR) THEN
514: l_silv_rec.sil_type := NULL;
509: END IF;
510: IF (l_silv_rec.kle_id = OKC_API.G_MISS_NUM) THEN
511: l_silv_rec.kle_id := NULL;
512: END IF;
513: IF (l_silv_rec.sil_type = OKC_API.G_MISS_CHAR) THEN
514: l_silv_rec.sil_type := NULL;
515: END IF;
516: IF (l_silv_rec.description = OKC_API.G_MISS_CHAR) THEN
517: l_silv_rec.description := NULL;
512: END IF;
513: IF (l_silv_rec.sil_type = OKC_API.G_MISS_CHAR) THEN
514: l_silv_rec.sil_type := NULL;
515: END IF;
516: IF (l_silv_rec.description = OKC_API.G_MISS_CHAR) THEN
517: l_silv_rec.description := NULL;
518: END IF;
519: IF (l_silv_rec.created_by = OKC_API.G_MISS_NUM) THEN
520: l_silv_rec.created_by := NULL;
515: END IF;
516: IF (l_silv_rec.description = OKC_API.G_MISS_CHAR) THEN
517: l_silv_rec.description := NULL;
518: END IF;
519: IF (l_silv_rec.created_by = OKC_API.G_MISS_NUM) THEN
520: l_silv_rec.created_by := NULL;
521: END IF;
522: IF (l_silv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
523: l_silv_rec.last_updated_by := NULL;
518: END IF;
519: IF (l_silv_rec.created_by = OKC_API.G_MISS_NUM) THEN
520: l_silv_rec.created_by := NULL;
521: END IF;
522: IF (l_silv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
523: l_silv_rec.last_updated_by := NULL;
524: END IF;
525: IF (l_silv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
526: l_silv_rec.creation_date := NULL;
521: END IF;
522: IF (l_silv_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
523: l_silv_rec.last_updated_by := NULL;
524: END IF;
525: IF (l_silv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
526: l_silv_rec.creation_date := NULL;
527: END IF;
528: IF (l_silv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
529: l_silv_rec.last_update_date := NULL;
524: END IF;
525: IF (l_silv_rec.creation_date = OKC_API.G_MISS_DATE) THEN
526: l_silv_rec.creation_date := NULL;
527: END IF;
528: IF (l_silv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
529: l_silv_rec.last_update_date := NULL;
530: END IF;
531: IF (l_silv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
532: l_silv_rec.last_update_login := NULL;
527: END IF;
528: IF (l_silv_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
529: l_silv_rec.last_update_date := NULL;
530: END IF;
531: IF (l_silv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
532: l_silv_rec.last_update_login := NULL;
533: END IF;
534: IF (l_silv_rec.down_payment_amount = OKC_API.G_MISS_NUM) THEN
535: l_silv_rec.down_payment_amount := NULL;
530: END IF;
531: IF (l_silv_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
532: l_silv_rec.last_update_login := NULL;
533: END IF;
534: IF (l_silv_rec.down_payment_amount = OKC_API.G_MISS_NUM) THEN
535: l_silv_rec.down_payment_amount := NULL;
536: END IF;
537: IF (l_silv_rec.capitalize_down_payment_yn = OKC_API.G_MISS_CHAR) THEN
538: l_silv_rec.capitalize_down_payment_yn := NULL;
533: END IF;
534: IF (l_silv_rec.down_payment_amount = OKC_API.G_MISS_NUM) THEN
535: l_silv_rec.down_payment_amount := NULL;
536: END IF;
537: IF (l_silv_rec.capitalize_down_payment_yn = OKC_API.G_MISS_CHAR) THEN
538: l_silv_rec.capitalize_down_payment_yn := NULL;
539: END IF;
540: RETURN(l_silv_rec);
541:
552: ---------------------------------------------
553: FUNCTION Validate_Attributes (
554: p_silv_rec IN silv_rec_type
555: ) RETURN VARCHAR2 IS
556: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
557: BEGIN
558: IF p_silv_rec.id = OKC_API.G_MISS_NUM OR
559: p_silv_rec.id IS NULL
560: THEN
554: p_silv_rec IN silv_rec_type
555: ) RETURN VARCHAR2 IS
556: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
557: BEGIN
558: IF p_silv_rec.id = OKC_API.G_MISS_NUM OR
559: p_silv_rec.id IS NULL
560: THEN
561: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
562: l_return_status := OKC_API.G_RET_STS_ERROR;
557: BEGIN
558: IF p_silv_rec.id = OKC_API.G_MISS_NUM OR
559: p_silv_rec.id IS NULL
560: THEN
561: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
562: l_return_status := OKC_API.G_RET_STS_ERROR;
563: ELSIF p_silv_rec.index_number = OKC_API.G_MISS_NUM OR
564: p_silv_rec.index_number IS NULL
565: THEN
558: IF p_silv_rec.id = OKC_API.G_MISS_NUM OR
559: p_silv_rec.id IS NULL
560: THEN
561: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
562: l_return_status := OKC_API.G_RET_STS_ERROR;
563: ELSIF p_silv_rec.index_number = OKC_API.G_MISS_NUM OR
564: p_silv_rec.index_number IS NULL
565: THEN
566: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'index_number');
559: p_silv_rec.id IS NULL
560: THEN
561: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
562: l_return_status := OKC_API.G_RET_STS_ERROR;
563: ELSIF p_silv_rec.index_number = OKC_API.G_MISS_NUM OR
564: p_silv_rec.index_number IS NULL
565: THEN
566: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'index_number');
567: l_return_status := OKC_API.G_RET_STS_ERROR;
562: l_return_status := OKC_API.G_RET_STS_ERROR;
563: ELSIF p_silv_rec.index_number = OKC_API.G_MISS_NUM OR
564: p_silv_rec.index_number IS NULL
565: THEN
566: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'index_number');
567: l_return_status := OKC_API.G_RET_STS_ERROR;
568: ELSIF p_silv_rec.sif_id = OKC_API.G_MISS_NUM OR
569: p_silv_rec.sif_id IS NULL
570: THEN
563: ELSIF p_silv_rec.index_number = OKC_API.G_MISS_NUM OR
564: p_silv_rec.index_number IS NULL
565: THEN
566: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'index_number');
567: l_return_status := OKC_API.G_RET_STS_ERROR;
568: ELSIF p_silv_rec.sif_id = OKC_API.G_MISS_NUM OR
569: p_silv_rec.sif_id IS NULL
570: THEN
571: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'sif_id');
564: p_silv_rec.index_number IS NULL
565: THEN
566: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'index_number');
567: l_return_status := OKC_API.G_RET_STS_ERROR;
568: ELSIF p_silv_rec.sif_id = OKC_API.G_MISS_NUM OR
569: p_silv_rec.sif_id IS NULL
570: THEN
571: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'sif_id');
572: l_return_status := OKC_API.G_RET_STS_ERROR;
567: l_return_status := OKC_API.G_RET_STS_ERROR;
568: ELSIF p_silv_rec.sif_id = OKC_API.G_MISS_NUM OR
569: p_silv_rec.sif_id IS NULL
570: THEN
571: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'sif_id');
572: l_return_status := OKC_API.G_RET_STS_ERROR;
573: ELSIF p_silv_rec.object_version_number = OKC_API.G_MISS_NUM OR
574: p_silv_rec.object_version_number IS NULL
575: THEN
568: ELSIF p_silv_rec.sif_id = OKC_API.G_MISS_NUM OR
569: p_silv_rec.sif_id IS NULL
570: THEN
571: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'sif_id');
572: l_return_status := OKC_API.G_RET_STS_ERROR;
573: ELSIF p_silv_rec.object_version_number = OKC_API.G_MISS_NUM OR
574: p_silv_rec.object_version_number IS NULL
575: THEN
576: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
569: p_silv_rec.sif_id IS NULL
570: THEN
571: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'sif_id');
572: l_return_status := OKC_API.G_RET_STS_ERROR;
573: ELSIF p_silv_rec.object_version_number = OKC_API.G_MISS_NUM OR
574: p_silv_rec.object_version_number IS NULL
575: THEN
576: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
577: l_return_status := OKC_API.G_RET_STS_ERROR;
572: l_return_status := OKC_API.G_RET_STS_ERROR;
573: ELSIF p_silv_rec.object_version_number = OKC_API.G_MISS_NUM OR
574: p_silv_rec.object_version_number IS NULL
575: THEN
576: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
577: l_return_status := OKC_API.G_RET_STS_ERROR;
578: ELSIF p_silv_rec.kle_id = OKC_API.G_MISS_NUM OR
579: p_silv_rec.kle_id IS NULL
580: THEN
573: ELSIF p_silv_rec.object_version_number = OKC_API.G_MISS_NUM OR
574: p_silv_rec.object_version_number IS NULL
575: THEN
576: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
577: l_return_status := OKC_API.G_RET_STS_ERROR;
578: ELSIF p_silv_rec.kle_id = OKC_API.G_MISS_NUM OR
579: p_silv_rec.kle_id IS NULL
580: THEN
581: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'kle_id');
574: p_silv_rec.object_version_number IS NULL
575: THEN
576: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
577: l_return_status := OKC_API.G_RET_STS_ERROR;
578: ELSIF p_silv_rec.kle_id = OKC_API.G_MISS_NUM OR
579: p_silv_rec.kle_id IS NULL
580: THEN
581: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'kle_id');
582: l_return_status := OKC_API.G_RET_STS_ERROR;
577: l_return_status := OKC_API.G_RET_STS_ERROR;
578: ELSIF p_silv_rec.kle_id = OKC_API.G_MISS_NUM OR
579: p_silv_rec.kle_id IS NULL
580: THEN
581: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'kle_id');
582: l_return_status := OKC_API.G_RET_STS_ERROR;
583: ELSIF p_silv_rec.sil_type = OKC_API.G_MISS_CHAR OR
584: p_silv_rec.sil_type IS NULL
585: THEN
578: ELSIF p_silv_rec.kle_id = OKC_API.G_MISS_NUM OR
579: p_silv_rec.kle_id IS NULL
580: THEN
581: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'kle_id');
582: l_return_status := OKC_API.G_RET_STS_ERROR;
583: ELSIF p_silv_rec.sil_type = OKC_API.G_MISS_CHAR OR
584: p_silv_rec.sil_type IS NULL
585: THEN
586: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'sil_type');
579: p_silv_rec.kle_id IS NULL
580: THEN
581: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'kle_id');
582: l_return_status := OKC_API.G_RET_STS_ERROR;
583: ELSIF p_silv_rec.sil_type = OKC_API.G_MISS_CHAR OR
584: p_silv_rec.sil_type IS NULL
585: THEN
586: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'sil_type');
587: l_return_status := OKC_API.G_RET_STS_ERROR;
582: l_return_status := OKC_API.G_RET_STS_ERROR;
583: ELSIF p_silv_rec.sil_type = OKC_API.G_MISS_CHAR OR
584: p_silv_rec.sil_type IS NULL
585: THEN
586: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'sil_type');
587: l_return_status := OKC_API.G_RET_STS_ERROR;
588: END IF;
589: RETURN(l_return_status);
590: END Validate_Attributes;
583: ELSIF p_silv_rec.sil_type = OKC_API.G_MISS_CHAR OR
584: p_silv_rec.sil_type IS NULL
585: THEN
586: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'sil_type');
587: l_return_status := OKC_API.G_RET_STS_ERROR;
588: END IF;
589: RETURN(l_return_status);
590: END Validate_Attributes;
591: */
612: ) IS
613:
614: BEGIN
615: -- initialize return status
616: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
617:
618: IF p_silv_rec.id = Okc_Api.G_MISS_NUM OR
619: p_silv_rec.id IS NULL
620: THEN
614: BEGIN
615: -- initialize return status
616: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
617:
618: IF p_silv_rec.id = Okc_Api.G_MISS_NUM OR
619: p_silv_rec.id IS NULL
620: THEN
621: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
622: x_return_status := Okc_Api.G_RET_STS_ERROR;
617:
618: IF p_silv_rec.id = Okc_Api.G_MISS_NUM OR
619: p_silv_rec.id IS NULL
620: THEN
621: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
622: x_return_status := Okc_Api.G_RET_STS_ERROR;
623: RAISE G_EXCEPTION_HALT_VALIDATION;
624: END IF;
625:
618: IF p_silv_rec.id = Okc_Api.G_MISS_NUM OR
619: p_silv_rec.id IS NULL
620: THEN
621: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
622: x_return_status := Okc_Api.G_RET_STS_ERROR;
623: RAISE G_EXCEPTION_HALT_VALIDATION;
624: END IF;
625:
626: EXCEPTION
630: NULL;
631:
632: WHEN OTHERS THEN
633: -- store SQL error message on message stack for caller
634: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
635: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
636: ,p_token1 => G_OKL_SQLCODE_TOKEN
637: ,p_token1_value => SQLCODE
638: ,p_token2 => G_OKL_SQLERRM_TOKEN
638: ,p_token2 => G_OKL_SQLERRM_TOKEN
639: ,p_token2_value => SQLERRM);
640:
641: -- notify caller of an UNEXPECTED error
642: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
643:
644: END Validate_Id;
645:
646: ---------------------------------------------------------------------------
662:
663: BEGIN
664:
665: -- initialize return status
666: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
667:
668: IF p_silv_rec.object_version_number = Okc_Api.G_MISS_NUM OR
669: p_silv_rec.object_version_number IS NULL
670: THEN
664:
665: -- initialize return status
666: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
667:
668: IF p_silv_rec.object_version_number = Okc_Api.G_MISS_NUM OR
669: p_silv_rec.object_version_number IS NULL
670: THEN
671: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
672: x_return_status := Okc_Api.G_RET_STS_ERROR;
667:
668: IF p_silv_rec.object_version_number = Okc_Api.G_MISS_NUM OR
669: p_silv_rec.object_version_number IS NULL
670: THEN
671: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
672: x_return_status := Okc_Api.G_RET_STS_ERROR;
673: RAISE G_EXCEPTION_HALT_VALIDATION;
674: END IF;
675:
668: IF p_silv_rec.object_version_number = Okc_Api.G_MISS_NUM OR
669: p_silv_rec.object_version_number IS NULL
670: THEN
671: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
672: x_return_status := Okc_Api.G_RET_STS_ERROR;
673: RAISE G_EXCEPTION_HALT_VALIDATION;
674: END IF;
675:
676: EXCEPTION
680: NULL;
681:
682: WHEN OTHERS THEN
683: -- store SQL error message on message stack for caller
684: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
685: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
686: ,p_token1 => G_OKL_SQLCODE_TOKEN
687: ,p_token1_value => SQLCODE
688: ,p_token2 => G_OKL_SQLERRM_TOKEN
688: ,p_token2 => G_OKL_SQLERRM_TOKEN
689: ,p_token2_value => SQLERRM);
690:
691: -- notify caller of an UNEXPECTED error
692: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
693:
694: END Validate_Object_Version_Number;
695:
696: ---------------------------------------------------------------------------
711: ) IS
712:
713: BEGIN
714: -- initialize return status
715: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
716:
717: IF p_silv_rec.index_number = Okc_Api.G_MISS_NUM OR
718: p_silv_rec.index_number IS NULL
719: THEN
713: BEGIN
714: -- initialize return status
715: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
716:
717: IF p_silv_rec.index_number = Okc_Api.G_MISS_NUM OR
718: p_silv_rec.index_number IS NULL
719: THEN
720: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'index_number');
721: x_return_status := Okc_Api.G_RET_STS_ERROR;
716:
717: IF p_silv_rec.index_number = Okc_Api.G_MISS_NUM OR
718: p_silv_rec.index_number IS NULL
719: THEN
720: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'index_number');
721: x_return_status := Okc_Api.G_RET_STS_ERROR;
722: RAISE G_EXCEPTION_HALT_VALIDATION;
723: END IF;
724:
717: IF p_silv_rec.index_number = Okc_Api.G_MISS_NUM OR
718: p_silv_rec.index_number IS NULL
719: THEN
720: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'index_number');
721: x_return_status := Okc_Api.G_RET_STS_ERROR;
722: RAISE G_EXCEPTION_HALT_VALIDATION;
723: END IF;
724:
725: EXCEPTION
729: NULL;
730:
731: WHEN OTHERS THEN
732: -- store SQL error message on message stack for caller
733: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
734: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
735: ,p_token1 => G_OKL_SQLCODE_TOKEN
736: ,p_token1_value => SQLCODE
737: ,p_token2 => G_OKL_SQLERRM_TOKEN
737: ,p_token2 => G_OKL_SQLERRM_TOKEN
738: ,p_token2_value => SQLERRM);
739:
740: -- notify caller of an UNEXPECTED error
741: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
742:
743: END Validate_Index_Number;
744:
745: ---------------------------------------------------------------------------
761: l_found VARCHAR2(1);
762: BEGIN
763:
764: -- initialize return status
765: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
766:
767: IF p_silv_rec.Sil_type = Okc_Api.G_MISS_CHAR OR
768: p_silv_rec.Sil_type IS NULL
769: THEN
763:
764: -- initialize return status
765: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
766:
767: IF p_silv_rec.Sil_type = Okc_Api.G_MISS_CHAR OR
768: p_silv_rec.Sil_type IS NULL
769: THEN
770: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'sil_type');
771: x_return_status := Okc_Api.G_RET_STS_ERROR;
766:
767: IF p_silv_rec.Sil_type = Okc_Api.G_MISS_CHAR OR
768: p_silv_rec.Sil_type IS NULL
769: THEN
770: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'sil_type');
771: x_return_status := Okc_Api.G_RET_STS_ERROR;
772: RAISE G_EXCEPTION_HALT_VALIDATION;
773: ELSE
774: --Check if sil_type exists in the fnd_common_lookups or not
767: IF p_silv_rec.Sil_type = Okc_Api.G_MISS_CHAR OR
768: p_silv_rec.Sil_type IS NULL
769: THEN
770: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'sil_type');
771: x_return_status := Okc_Api.G_RET_STS_ERROR;
772: RAISE G_EXCEPTION_HALT_VALIDATION;
773: ELSE
774: --Check if sil_type exists in the fnd_common_lookups or not
775: l_found := okl_accounting_util.validate_lookup_code(p_lookup_type => 'OKL_SIL_TYPE',
776: p_lookup_code => p_silv_rec.sil_type);
777:
778:
779: IF (l_found <> OKL_API.G_TRUE ) THEN
780: OKC_API.set_message(G_OKC_APP, G_INVALID_VALUE,G_COL_NAME_TOKEN,'SIL_TYPE');
781: x_return_status := Okc_Api.G_RET_STS_ERROR;
782: -- raise the exception as there's no matching foreign key value
783: RAISE G_EXCEPTION_HALT_VALIDATION;
784: END IF;
777:
778:
779: IF (l_found <> OKL_API.G_TRUE ) THEN
780: OKC_API.set_message(G_OKC_APP, G_INVALID_VALUE,G_COL_NAME_TOKEN,'SIL_TYPE');
781: x_return_status := Okc_Api.G_RET_STS_ERROR;
782: -- raise the exception as there's no matching foreign key value
783: RAISE G_EXCEPTION_HALT_VALIDATION;
784: END IF;
785:
793: NULL;
794:
795: WHEN OTHERS THEN
796: -- store SQL error message on message stack for caller
797: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
798: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
799: ,p_token1 => G_OKL_SQLCODE_TOKEN
800: ,p_token1_value => SQLCODE
801: ,p_token2 => G_OKL_SQLERRM_TOKEN
801: ,p_token2 => G_OKL_SQLERRM_TOKEN
802: ,p_token2_value => SQLERRM);
803:
804: -- notify caller of an UNEXPECTED error
805: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
806:
807: END Validate_Sil_Type;
808:
809: ---------------------------------------------------------------------------
834:
835: BEGIN
836:
837: -- initialize return status
838: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
839:
840: IF p_silv_rec.sif_id = Okc_Api.G_MISS_NUM OR
841: p_silv_rec.sif_id IS NULL
842: THEN
836:
837: -- initialize return status
838: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
839:
840: IF p_silv_rec.sif_id = Okc_Api.G_MISS_NUM OR
841: p_silv_rec.sif_id IS NULL
842: THEN
843: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Sif_id');
844: x_return_status := Okc_Api.G_RET_STS_ERROR;
839:
840: IF p_silv_rec.sif_id = Okc_Api.G_MISS_NUM OR
841: p_silv_rec.sif_id IS NULL
842: THEN
843: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Sif_id');
844: x_return_status := Okc_Api.G_RET_STS_ERROR;
845: RAISE G_EXCEPTION_HALT_VALIDATION;
846: END IF;
847:
840: IF p_silv_rec.sif_id = Okc_Api.G_MISS_NUM OR
841: p_silv_rec.sif_id IS NULL
842: THEN
843: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Sif_id');
844: x_return_status := Okc_Api.G_RET_STS_ERROR;
845: RAISE G_EXCEPTION_HALT_VALIDATION;
846: END IF;
847:
848: OPEN okl_sifv_pk_csr(p_silv_rec.Sif_id);
850: l_row_not_found := okl_sifv_pk_csr%NOTFOUND;
851: CLOSE okl_sifv_pk_csr;
852:
853: IF l_row_not_found THEN
854: Okc_Api.set_message(G_OKC_APP,G_INVALID_VALUE,G_COL_NAME_TOKEN,'sif_id');
855: x_return_status := Okc_Api.G_RET_STS_ERROR;
856: END IF;
857:
858: EXCEPTION
851: CLOSE okl_sifv_pk_csr;
852:
853: IF l_row_not_found THEN
854: Okc_Api.set_message(G_OKC_APP,G_INVALID_VALUE,G_COL_NAME_TOKEN,'sif_id');
855: x_return_status := Okc_Api.G_RET_STS_ERROR;
856: END IF;
857:
858: EXCEPTION
859: WHEN G_EXCEPTION_HALT_VALIDATION THEN
862: NULL;
863:
864: WHEN OTHERS THEN
865: -- store SQL error message on message stack for caller
866: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
867: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
868: ,p_token1 => G_OKL_SQLCODE_TOKEN
869: ,p_token1_value => SQLCODE
870: ,p_token2 => G_OKL_SQLERRM_TOKEN
870: ,p_token2 => G_OKL_SQLERRM_TOKEN
871: ,p_token2_value => SQLERRM);
872:
873: -- notify caller of an UNEXPECTED error
874: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
875:
876: -- verify that the cursor was closed
877: IF okl_sifv_pk_csr%ISOPEN THEN
878: CLOSE okl_sifv_pk_csr;
908:
909: BEGIN
910:
911: -- initialize return status
912: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
913:
914: IF p_silv_rec.kle_id = Okc_Api.G_MISS_NUM OR
915: p_silv_rec.kle_id IS NULL
916: THEN
910:
911: -- initialize return status
912: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
913:
914: IF p_silv_rec.kle_id = Okc_Api.G_MISS_NUM OR
915: p_silv_rec.kle_id IS NULL
916: THEN
917: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Kle_id');
918: x_return_status := Okc_Api.G_RET_STS_ERROR;
913:
914: IF p_silv_rec.kle_id = Okc_Api.G_MISS_NUM OR
915: p_silv_rec.kle_id IS NULL
916: THEN
917: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Kle_id');
918: x_return_status := Okc_Api.G_RET_STS_ERROR;
919: RAISE G_EXCEPTION_HALT_VALIDATION;
920: END IF;
921:
914: IF p_silv_rec.kle_id = Okc_Api.G_MISS_NUM OR
915: p_silv_rec.kle_id IS NULL
916: THEN
917: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Kle_id');
918: x_return_status := Okc_Api.G_RET_STS_ERROR;
919: RAISE G_EXCEPTION_HALT_VALIDATION;
920: END IF;
921:
922: OPEN okl_klev_pk_csr(p_silv_rec.kle_id);
924: l_row_not_found := okl_klev_pk_csr%NOTFOUND;
925: CLOSE okl_klev_pk_csr;
926:
927: IF l_row_not_found THEN
928: Okc_Api.set_message(G_OKC_APP,G_INVALID_VALUE,G_COL_NAME_TOKEN,'Kle_id');
929: x_return_status := Okc_Api.G_RET_STS_ERROR;
930: END IF;
931:
932: EXCEPTION
925: CLOSE okl_klev_pk_csr;
926:
927: IF l_row_not_found THEN
928: Okc_Api.set_message(G_OKC_APP,G_INVALID_VALUE,G_COL_NAME_TOKEN,'Kle_id');
929: x_return_status := Okc_Api.G_RET_STS_ERROR;
930: END IF;
931:
932: EXCEPTION
933: WHEN G_EXCEPTION_HALT_VALIDATION THEN
936: NULL;
937:
938: WHEN OTHERS THEN
939: -- store SQL error message on message stack for caller
940: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
941: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
942: ,p_token1 => G_OKL_SQLCODE_TOKEN
943: ,p_token1_value => SQLCODE
944: ,p_token2 => G_OKL_SQLERRM_TOKEN
944: ,p_token2 => G_OKL_SQLERRM_TOKEN
945: ,p_token2_value => SQLERRM);
946:
947: -- notify caller of an UNEXPECTED error
948: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
949:
950: -- verify that the cursor was closed
951: IF okl_klev_pk_csr%ISOPEN THEN
952: CLOSE okl_klev_pk_csr;
973:
974: BEGIN
975:
976: -- initialize return status
977: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
978:
979: IF p_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT = Okc_Api.G_MISS_NUM OR
980: p_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT IS NULL
981: THEN
975:
976: -- initialize return status
977: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
978:
979: IF p_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT = Okc_Api.G_MISS_NUM OR
980: p_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT IS NULL
981: THEN
982: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'STATE_DEPRE_DMNSHING_VALUE_RT');
983: x_return_status := Okc_Api.G_RET_STS_ERROR;
978:
979: IF p_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT = Okc_Api.G_MISS_NUM OR
980: p_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT IS NULL
981: THEN
982: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'STATE_DEPRE_DMNSHING_VALUE_RT');
983: x_return_status := Okc_Api.G_RET_STS_ERROR;
984: RAISE G_EXCEPTION_HALT_VALIDATION;
985: END IF;
986:
979: IF p_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT = Okc_Api.G_MISS_NUM OR
980: p_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT IS NULL
981: THEN
982: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'STATE_DEPRE_DMNSHING_VALUE_RT');
983: x_return_status := Okc_Api.G_RET_STS_ERROR;
984: RAISE G_EXCEPTION_HALT_VALIDATION;
985: END IF;
986:
987: EXCEPTION
991: NULL;
992:
993: WHEN OTHERS THEN
994: -- store SQL error message on message stack for caller
995: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
996: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
997: ,p_token1 => G_OKL_SQLCODE_TOKEN
998: ,p_token1_value => SQLCODE
999: ,p_token2 => G_OKL_SQLERRM_TOKEN
999: ,p_token2 => G_OKL_SQLERRM_TOKEN
1000: ,p_token2_value => SQLERRM);
1001:
1002: -- notify caller of an UNEXPECTED error
1003: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1004:
1005: END Validate_State_Depr_Dim_Value;
1006:
1007: ---------------------------------------------------------------------------
1023:
1024: BEGIN
1025:
1026: -- initialize return status
1027: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1028:
1029: IF p_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT = Okc_Api.G_MISS_NUM OR
1030: p_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT IS NULL
1031: THEN
1025:
1026: -- initialize return status
1027: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1028:
1029: IF p_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT = Okc_Api.G_MISS_NUM OR
1030: p_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT IS NULL
1031: THEN
1032: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'BOOK_DEPRE_DMNSHING_VALUE_RT');
1033: x_return_status := Okc_Api.G_RET_STS_ERROR;
1028:
1029: IF p_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT = Okc_Api.G_MISS_NUM OR
1030: p_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT IS NULL
1031: THEN
1032: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'BOOK_DEPRE_DMNSHING_VALUE_RT');
1033: x_return_status := Okc_Api.G_RET_STS_ERROR;
1034: RAISE G_EXCEPTION_HALT_VALIDATION;
1035: END IF;
1036:
1029: IF p_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT = Okc_Api.G_MISS_NUM OR
1030: p_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT IS NULL
1031: THEN
1032: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'BOOK_DEPRE_DMNSHING_VALUE_RT');
1033: x_return_status := Okc_Api.G_RET_STS_ERROR;
1034: RAISE G_EXCEPTION_HALT_VALIDATION;
1035: END IF;
1036:
1037: EXCEPTION
1041: NULL;
1042:
1043: WHEN OTHERS THEN
1044: -- store SQL error message on message stack for caller
1045: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1046: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1047: ,p_token1 => G_OKL_SQLCODE_TOKEN
1048: ,p_token1_value => SQLCODE
1049: ,p_token2 => G_OKL_SQLERRM_TOKEN
1049: ,p_token2 => G_OKL_SQLERRM_TOKEN
1050: ,p_token2_value => SQLERRM);
1051:
1052: -- notify caller of an UNEXPECTED error
1053: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1054:
1055: END Validate_Book_Depr_Dim_Value;
1056:
1057: ---------------------------------------------------------------------------
1073:
1074: BEGIN
1075:
1076: -- initialize return status
1077: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1078:
1079: IF p_silv_rec.Residual_Guarantee_Method = Okc_Api.G_MISS_CHAR OR
1080: p_silv_rec.Residual_Guarantee_Method IS NULL
1081: THEN
1075:
1076: -- initialize return status
1077: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1078:
1079: IF p_silv_rec.Residual_Guarantee_Method = Okc_Api.G_MISS_CHAR OR
1080: p_silv_rec.Residual_Guarantee_Method IS NULL
1081: THEN
1082: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Residual_Guarantee_Method');
1083: x_return_status := Okc_Api.G_RET_STS_ERROR;
1078:
1079: IF p_silv_rec.Residual_Guarantee_Method = Okc_Api.G_MISS_CHAR OR
1080: p_silv_rec.Residual_Guarantee_Method IS NULL
1081: THEN
1082: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Residual_Guarantee_Method');
1083: x_return_status := Okc_Api.G_RET_STS_ERROR;
1084: RAISE G_EXCEPTION_HALT_VALIDATION;
1085: END IF;
1086:
1079: IF p_silv_rec.Residual_Guarantee_Method = Okc_Api.G_MISS_CHAR OR
1080: p_silv_rec.Residual_Guarantee_Method IS NULL
1081: THEN
1082: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Residual_Guarantee_Method');
1083: x_return_status := Okc_Api.G_RET_STS_ERROR;
1084: RAISE G_EXCEPTION_HALT_VALIDATION;
1085: END IF;
1086:
1087: EXCEPTION
1091: NULL;
1092:
1093: WHEN OTHERS THEN
1094: -- store SQL error message on message stack for caller
1095: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1096: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1097: ,p_token1 => G_OKL_SQLCODE_TOKEN
1098: ,p_token1_value => SQLCODE
1099: ,p_token2 => G_OKL_SQLERRM_TOKEN
1099: ,p_token2 => G_OKL_SQLERRM_TOKEN
1100: ,p_token2_value => SQLERRM);
1101:
1102: -- notify caller of an UNEXPECTED error
1103: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1104:
1105: END Validate_Residual_Guarantee;
1106:
1107: ---------------------------------------------------------------------------
1123:
1124: BEGIN
1125:
1126: -- initialize return status
1127: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1128:
1129: IF p_silv_rec.Fed_Depre_Term = Okc_Api.G_MISS_NUM OR
1130: p_silv_rec.Fed_Depre_Term IS NULL
1131: THEN
1125:
1126: -- initialize return status
1127: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1128:
1129: IF p_silv_rec.Fed_Depre_Term = Okc_Api.G_MISS_NUM OR
1130: p_silv_rec.Fed_Depre_Term IS NULL
1131: THEN
1132: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_Term');
1133: x_return_status := Okc_Api.G_RET_STS_ERROR;
1128:
1129: IF p_silv_rec.Fed_Depre_Term = Okc_Api.G_MISS_NUM OR
1130: p_silv_rec.Fed_Depre_Term IS NULL
1131: THEN
1132: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_Term');
1133: x_return_status := Okc_Api.G_RET_STS_ERROR;
1134: RAISE G_EXCEPTION_HALT_VALIDATION;
1135: END IF;
1136:
1129: IF p_silv_rec.Fed_Depre_Term = Okc_Api.G_MISS_NUM OR
1130: p_silv_rec.Fed_Depre_Term IS NULL
1131: THEN
1132: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_Term');
1133: x_return_status := Okc_Api.G_RET_STS_ERROR;
1134: RAISE G_EXCEPTION_HALT_VALIDATION;
1135: END IF;
1136:
1137: EXCEPTION
1141: NULL;
1142:
1143: WHEN OTHERS THEN
1144: -- store SQL error message on message stack for caller
1145: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1146: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1147: ,p_token1 => G_OKL_SQLCODE_TOKEN
1148: ,p_token1_value => SQLCODE
1149: ,p_token2 => G_OKL_SQLERRM_TOKEN
1149: ,p_token2 => G_OKL_SQLERRM_TOKEN
1150: ,p_token2_value => SQLERRM);
1151:
1152: -- notify caller of an UNEXPECTED error
1153: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1154:
1155: END Validate_Fed_Depre_Term;
1156:
1157: ---------------------------------------------------------------------------
1173:
1174: BEGIN
1175:
1176: -- initialize return status
1177: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1178:
1179: IF p_silv_rec.Fed_Depre_DmnShing_Value_Rate = Okc_Api.G_MISS_NUM OR
1180: p_silv_rec.Fed_Depre_DmnShing_Value_Rate IS NULL
1181: THEN
1175:
1176: -- initialize return status
1177: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1178:
1179: IF p_silv_rec.Fed_Depre_DmnShing_Value_Rate = Okc_Api.G_MISS_NUM OR
1180: p_silv_rec.Fed_Depre_DmnShing_Value_Rate IS NULL
1181: THEN
1182: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_DmnShing_Value_Rate');
1183: x_return_status := Okc_Api.G_RET_STS_ERROR;
1178:
1179: IF p_silv_rec.Fed_Depre_DmnShing_Value_Rate = Okc_Api.G_MISS_NUM OR
1180: p_silv_rec.Fed_Depre_DmnShing_Value_Rate IS NULL
1181: THEN
1182: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_DmnShing_Value_Rate');
1183: x_return_status := Okc_Api.G_RET_STS_ERROR;
1184: RAISE G_EXCEPTION_HALT_VALIDATION;
1185: END IF;
1186:
1179: IF p_silv_rec.Fed_Depre_DmnShing_Value_Rate = Okc_Api.G_MISS_NUM OR
1180: p_silv_rec.Fed_Depre_DmnShing_Value_Rate IS NULL
1181: THEN
1182: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_DmnShing_Value_Rate');
1183: x_return_status := Okc_Api.G_RET_STS_ERROR;
1184: RAISE G_EXCEPTION_HALT_VALIDATION;
1185: END IF;
1186:
1187: EXCEPTION
1191: NULL;
1192:
1193: WHEN OTHERS THEN
1194: -- store SQL error message on message stack for caller
1195: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1196: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1197: ,p_token1 => G_OKL_SQLCODE_TOKEN
1198: ,p_token1_value => SQLCODE
1199: ,p_token2 => G_OKL_SQLERRM_TOKEN
1199: ,p_token2 => G_OKL_SQLERRM_TOKEN
1200: ,p_token2_value => SQLERRM);
1201:
1202: -- notify caller of an UNEXPECTED error
1203: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1204:
1205: END Validate_Fed_Depre_Dim_Value;
1206:
1207: ---------------------------------------------------------------------------
1223:
1224: BEGIN
1225:
1226: -- initialize return status
1227: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1228:
1229: IF p_silv_rec.Fed_Depre_Adr_Conve = Okc_Api.G_MISS_CHAR OR
1230: p_silv_rec.Fed_Depre_Adr_Conve IS NULL
1231: THEN
1225:
1226: -- initialize return status
1227: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1228:
1229: IF p_silv_rec.Fed_Depre_Adr_Conve = Okc_Api.G_MISS_CHAR OR
1230: p_silv_rec.Fed_Depre_Adr_Conve IS NULL
1231: THEN
1232: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_Adr_Conve');
1233: x_return_status := Okc_Api.G_RET_STS_ERROR;
1228:
1229: IF p_silv_rec.Fed_Depre_Adr_Conve = Okc_Api.G_MISS_CHAR OR
1230: p_silv_rec.Fed_Depre_Adr_Conve IS NULL
1231: THEN
1232: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_Adr_Conve');
1233: x_return_status := Okc_Api.G_RET_STS_ERROR;
1234: RAISE G_EXCEPTION_HALT_VALIDATION;
1235: END IF;
1236:
1229: IF p_silv_rec.Fed_Depre_Adr_Conve = Okc_Api.G_MISS_CHAR OR
1230: p_silv_rec.Fed_Depre_Adr_Conve IS NULL
1231: THEN
1232: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_Adr_Conve');
1233: x_return_status := Okc_Api.G_RET_STS_ERROR;
1234: RAISE G_EXCEPTION_HALT_VALIDATION;
1235: END IF;
1236:
1237: EXCEPTION
1241: NULL;
1242:
1243: WHEN OTHERS THEN
1244: -- store SQL error message on message stack for caller
1245: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1246: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1247: ,p_token1 => G_OKL_SQLCODE_TOKEN
1248: ,p_token1_value => SQLCODE
1249: ,p_token2 => G_OKL_SQLERRM_TOKEN
1249: ,p_token2 => G_OKL_SQLERRM_TOKEN
1250: ,p_token2_value => SQLERRM);
1251:
1252: -- notify caller of an UNEXPECTED error
1253: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1254:
1255: END Validate_Fed_Depre_Adr;
1256:
1257: ---------------------------------------------------------------------------
1273:
1274: BEGIN
1275:
1276: -- initialize return status
1277: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1278:
1279: IF p_silv_rec.State_Depre_Basis_Percent = Okc_Api.G_MISS_NUM OR
1280: p_silv_rec.State_Depre_Basis_Percent IS NULL
1281: THEN
1275:
1276: -- initialize return status
1277: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1278:
1279: IF p_silv_rec.State_Depre_Basis_Percent = Okc_Api.G_MISS_NUM OR
1280: p_silv_rec.State_Depre_Basis_Percent IS NULL
1281: THEN
1282: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'State_Depre_Basis_Percent');
1283: x_return_status := Okc_Api.G_RET_STS_ERROR;
1278:
1279: IF p_silv_rec.State_Depre_Basis_Percent = Okc_Api.G_MISS_NUM OR
1280: p_silv_rec.State_Depre_Basis_Percent IS NULL
1281: THEN
1282: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'State_Depre_Basis_Percent');
1283: x_return_status := Okc_Api.G_RET_STS_ERROR;
1284: RAISE G_EXCEPTION_HALT_VALIDATION;
1285: END IF;
1286:
1279: IF p_silv_rec.State_Depre_Basis_Percent = Okc_Api.G_MISS_NUM OR
1280: p_silv_rec.State_Depre_Basis_Percent IS NULL
1281: THEN
1282: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'State_Depre_Basis_Percent');
1283: x_return_status := Okc_Api.G_RET_STS_ERROR;
1284: RAISE G_EXCEPTION_HALT_VALIDATION;
1285: END IF;
1286:
1287: EXCEPTION
1291: NULL;
1292:
1293: WHEN OTHERS THEN
1294: -- store SQL error message on message stack for caller
1295: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1296: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1297: ,p_token1 => G_OKL_SQLCODE_TOKEN
1298: ,p_token1_value => SQLCODE
1299: ,p_token2 => G_OKL_SQLERRM_TOKEN
1299: ,p_token2 => G_OKL_SQLERRM_TOKEN
1300: ,p_token2_value => SQLERRM);
1301:
1302: -- notify caller of an UNEXPECTED error
1303: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1304:
1305: END Validate_State_Depre_Basis;
1306:
1307: ---------------------------------------------------------------------------
1323:
1324: BEGIN
1325:
1326: -- initialize return status
1327: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1328:
1329: IF p_silv_rec.State_Depre_Method = Okc_Api.G_MISS_CHAR OR
1330: p_silv_rec.State_Depre_Method IS NULL
1331: THEN
1325:
1326: -- initialize return status
1327: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1328:
1329: IF p_silv_rec.State_Depre_Method = Okc_Api.G_MISS_CHAR OR
1330: p_silv_rec.State_Depre_Method IS NULL
1331: THEN
1332: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'State_Depre_Method');
1333: x_return_status := Okc_Api.G_RET_STS_ERROR;
1328:
1329: IF p_silv_rec.State_Depre_Method = Okc_Api.G_MISS_CHAR OR
1330: p_silv_rec.State_Depre_Method IS NULL
1331: THEN
1332: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'State_Depre_Method');
1333: x_return_status := Okc_Api.G_RET_STS_ERROR;
1334: RAISE G_EXCEPTION_HALT_VALIDATION;
1335: END IF;
1336:
1329: IF p_silv_rec.State_Depre_Method = Okc_Api.G_MISS_CHAR OR
1330: p_silv_rec.State_Depre_Method IS NULL
1331: THEN
1332: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'State_Depre_Method');
1333: x_return_status := Okc_Api.G_RET_STS_ERROR;
1334: RAISE G_EXCEPTION_HALT_VALIDATION;
1335: END IF;
1336:
1337: EXCEPTION
1341: NULL;
1342:
1343: WHEN OTHERS THEN
1344: -- store SQL error message on message stack for caller
1345: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1346: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1347: ,p_token1 => G_OKL_SQLCODE_TOKEN
1348: ,p_token1_value => SQLCODE
1349: ,p_token2 => G_OKL_SQLERRM_TOKEN
1349: ,p_token2 => G_OKL_SQLERRM_TOKEN
1350: ,p_token2_value => SQLERRM);
1351:
1352: -- notify caller of an UNEXPECTED error
1353: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1354:
1355: END Validate_State_Depre_Method;
1356:
1357: ---------------------------------------------------------------------------
1373:
1374: BEGIN
1375:
1376: -- initialize return status
1377: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1378:
1379: IF p_silv_rec.Purchase_Option = Okc_Api.G_MISS_CHAR OR
1380: p_silv_rec.Purchase_Option IS NULL
1381: THEN
1375:
1376: -- initialize return status
1377: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1378:
1379: IF p_silv_rec.Purchase_Option = Okc_Api.G_MISS_CHAR OR
1380: p_silv_rec.Purchase_Option IS NULL
1381: THEN
1382: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Purchase_Option');
1383: x_return_status := Okc_Api.G_RET_STS_ERROR;
1378:
1379: IF p_silv_rec.Purchase_Option = Okc_Api.G_MISS_CHAR OR
1380: p_silv_rec.Purchase_Option IS NULL
1381: THEN
1382: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Purchase_Option');
1383: x_return_status := Okc_Api.G_RET_STS_ERROR;
1384: RAISE G_EXCEPTION_HALT_VALIDATION;
1385: END IF;
1386:
1379: IF p_silv_rec.Purchase_Option = Okc_Api.G_MISS_CHAR OR
1380: p_silv_rec.Purchase_Option IS NULL
1381: THEN
1382: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Purchase_Option');
1383: x_return_status := Okc_Api.G_RET_STS_ERROR;
1384: RAISE G_EXCEPTION_HALT_VALIDATION;
1385: END IF;
1386:
1387: EXCEPTION
1391: NULL;
1392:
1393: WHEN OTHERS THEN
1394: -- store SQL error message on message stack for caller
1395: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1396: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1397: ,p_token1 => G_OKL_SQLCODE_TOKEN
1398: ,p_token1_value => SQLCODE
1399: ,p_token2 => G_OKL_SQLERRM_TOKEN
1399: ,p_token2 => G_OKL_SQLERRM_TOKEN
1400: ,p_token2_value => SQLERRM);
1401:
1402: -- notify caller of an UNEXPECTED error
1403: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1404:
1405: END Validate_Purchase_Option;
1406:
1407: ---------------------------------------------------------------------------
1423:
1424: BEGIN
1425:
1426: -- initialize return status
1427: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1428:
1429: IF p_silv_rec.Asset_Cost = Okc_Api.G_MISS_NUM OR
1430: p_silv_rec.Asset_Cost IS NULL
1431: THEN
1425:
1426: -- initialize return status
1427: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1428:
1429: IF p_silv_rec.Asset_Cost = Okc_Api.G_MISS_NUM OR
1430: p_silv_rec.Asset_Cost IS NULL
1431: THEN
1432: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Asset_Cost');
1433: x_return_status := Okc_Api.G_RET_STS_ERROR;
1428:
1429: IF p_silv_rec.Asset_Cost = Okc_Api.G_MISS_NUM OR
1430: p_silv_rec.Asset_Cost IS NULL
1431: THEN
1432: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Asset_Cost');
1433: x_return_status := Okc_Api.G_RET_STS_ERROR;
1434: RAISE G_EXCEPTION_HALT_VALIDATION;
1435: END IF;
1436:
1429: IF p_silv_rec.Asset_Cost = Okc_Api.G_MISS_NUM OR
1430: p_silv_rec.Asset_Cost IS NULL
1431: THEN
1432: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Asset_Cost');
1433: x_return_status := Okc_Api.G_RET_STS_ERROR;
1434: RAISE G_EXCEPTION_HALT_VALIDATION;
1435: END IF;
1436:
1437: EXCEPTION
1441: NULL;
1442:
1443: WHEN OTHERS THEN
1444: -- store SQL error message on message stack for caller
1445: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1446: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1447: ,p_token1 => G_OKL_SQLCODE_TOKEN
1448: ,p_token1_value => SQLCODE
1449: ,p_token2 => G_OKL_SQLERRM_TOKEN
1449: ,p_token2 => G_OKL_SQLERRM_TOKEN
1450: ,p_token2_value => SQLERRM);
1451:
1452: -- notify caller of an UNEXPECTED error
1453: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1454:
1455: END Validate_Asset_Cost;
1456:
1457: ---------------------------------------------------------------------------
1473:
1474: BEGIN
1475:
1476: -- initialize return status
1477: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1478:
1479: IF p_silv_rec.State_Depre_Term = Okc_Api.G_MISS_NUM OR
1480: p_silv_rec.State_Depre_Term IS NULL
1481: THEN
1475:
1476: -- initialize return status
1477: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1478:
1479: IF p_silv_rec.State_Depre_Term = Okc_Api.G_MISS_NUM OR
1480: p_silv_rec.State_Depre_Term IS NULL
1481: THEN
1482: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'State_Depre_Term');
1483: x_return_status := Okc_Api.G_RET_STS_ERROR;
1478:
1479: IF p_silv_rec.State_Depre_Term = Okc_Api.G_MISS_NUM OR
1480: p_silv_rec.State_Depre_Term IS NULL
1481: THEN
1482: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'State_Depre_Term');
1483: x_return_status := Okc_Api.G_RET_STS_ERROR;
1484: RAISE G_EXCEPTION_HALT_VALIDATION;
1485: END IF;
1486:
1479: IF p_silv_rec.State_Depre_Term = Okc_Api.G_MISS_NUM OR
1480: p_silv_rec.State_Depre_Term IS NULL
1481: THEN
1482: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'State_Depre_Term');
1483: x_return_status := Okc_Api.G_RET_STS_ERROR;
1484: RAISE G_EXCEPTION_HALT_VALIDATION;
1485: END IF;
1486:
1487: EXCEPTION
1491: NULL;
1492:
1493: WHEN OTHERS THEN
1494: -- store SQL error message on message stack for caller
1495: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1496: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1497: ,p_token1 => G_OKL_SQLCODE_TOKEN
1498: ,p_token1_value => SQLCODE
1499: ,p_token2 => G_OKL_SQLERRM_TOKEN
1499: ,p_token2 => G_OKL_SQLERRM_TOKEN
1500: ,p_token2_value => SQLERRM);
1501:
1502: -- notify caller of an UNEXPECTED error
1503: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1504:
1505: END Validate_State_Depre_Term;
1506:
1507: ---------------------------------------------------------------------------
1523:
1524: BEGIN
1525:
1526: -- initialize return status
1527: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1528:
1529: IF p_silv_rec.State_Depre_Adr_Convent = Okc_Api.G_MISS_CHAR OR
1530: p_silv_rec.State_Depre_Adr_Convent IS NULL
1531: THEN
1525:
1526: -- initialize return status
1527: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1528:
1529: IF p_silv_rec.State_Depre_Adr_Convent = Okc_Api.G_MISS_CHAR OR
1530: p_silv_rec.State_Depre_Adr_Convent IS NULL
1531: THEN
1532: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'State_Depre_Adr_Convent');
1533: x_return_status := Okc_Api.G_RET_STS_ERROR;
1528:
1529: IF p_silv_rec.State_Depre_Adr_Convent = Okc_Api.G_MISS_CHAR OR
1530: p_silv_rec.State_Depre_Adr_Convent IS NULL
1531: THEN
1532: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'State_Depre_Adr_Convent');
1533: x_return_status := Okc_Api.G_RET_STS_ERROR;
1534: RAISE G_EXCEPTION_HALT_VALIDATION;
1535: END IF;
1536:
1529: IF p_silv_rec.State_Depre_Adr_Convent = Okc_Api.G_MISS_CHAR OR
1530: p_silv_rec.State_Depre_Adr_Convent IS NULL
1531: THEN
1532: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'State_Depre_Adr_Convent');
1533: x_return_status := Okc_Api.G_RET_STS_ERROR;
1534: RAISE G_EXCEPTION_HALT_VALIDATION;
1535: END IF;
1536:
1537: EXCEPTION
1541: NULL;
1542:
1543: WHEN OTHERS THEN
1544: -- store SQL error message on message stack for caller
1545: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1546: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1547: ,p_token1 => G_OKL_SQLCODE_TOKEN
1548: ,p_token1_value => SQLCODE
1549: ,p_token2 => G_OKL_SQLERRM_TOKEN
1549: ,p_token2 => G_OKL_SQLERRM_TOKEN
1550: ,p_token2_value => SQLERRM);
1551:
1552: -- notify caller of an UNEXPECTED error
1553: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1554:
1555: END Validate_State_Depre_Adr;
1556:
1557: ---------------------------------------------------------------------------
1573:
1574: BEGIN
1575:
1576: -- initialize return status
1577: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1578:
1579: IF p_silv_rec.Fed_Depre_Method = Okc_Api.G_MISS_CHAR OR
1580: p_silv_rec.Fed_Depre_Method IS NULL
1581: THEN
1575:
1576: -- initialize return status
1577: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1578:
1579: IF p_silv_rec.Fed_Depre_Method = Okc_Api.G_MISS_CHAR OR
1580: p_silv_rec.Fed_Depre_Method IS NULL
1581: THEN
1582: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_Method');
1583: x_return_status := Okc_Api.G_RET_STS_ERROR;
1578:
1579: IF p_silv_rec.Fed_Depre_Method = Okc_Api.G_MISS_CHAR OR
1580: p_silv_rec.Fed_Depre_Method IS NULL
1581: THEN
1582: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_Method');
1583: x_return_status := Okc_Api.G_RET_STS_ERROR;
1584: RAISE G_EXCEPTION_HALT_VALIDATION;
1585: END IF;
1586:
1579: IF p_silv_rec.Fed_Depre_Method = Okc_Api.G_MISS_CHAR OR
1580: p_silv_rec.Fed_Depre_Method IS NULL
1581: THEN
1582: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_Method');
1583: x_return_status := Okc_Api.G_RET_STS_ERROR;
1584: RAISE G_EXCEPTION_HALT_VALIDATION;
1585: END IF;
1586:
1587: EXCEPTION
1591: NULL;
1592:
1593: WHEN OTHERS THEN
1594: -- store SQL error message on message stack for caller
1595: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1596: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1597: ,p_token1 => G_OKL_SQLCODE_TOKEN
1598: ,p_token1_value => SQLCODE
1599: ,p_token2 => G_OKL_SQLERRM_TOKEN
1599: ,p_token2 => G_OKL_SQLERRM_TOKEN
1600: ,p_token2_value => SQLERRM);
1601:
1602: -- notify caller of an UNEXPECTED error
1603: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1604:
1605: END Validate_Fed_Depre_Method;
1606:
1607: ---------------------------------------------------------------------------
1623:
1624: BEGIN
1625:
1626: -- initialize return status
1627: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1628:
1629: IF p_silv_rec.Residual_Amount = Okc_Api.G_MISS_NUM OR
1630: p_silv_rec.Residual_Amount IS NULL
1631: THEN
1625:
1626: -- initialize return status
1627: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1628:
1629: IF p_silv_rec.Residual_Amount = Okc_Api.G_MISS_NUM OR
1630: p_silv_rec.Residual_Amount IS NULL
1631: THEN
1632: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Residual_Amount');
1633: x_return_status := Okc_Api.G_RET_STS_ERROR;
1628:
1629: IF p_silv_rec.Residual_Amount = Okc_Api.G_MISS_NUM OR
1630: p_silv_rec.Residual_Amount IS NULL
1631: THEN
1632: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Residual_Amount');
1633: x_return_status := Okc_Api.G_RET_STS_ERROR;
1634: RAISE G_EXCEPTION_HALT_VALIDATION;
1635: END IF;
1636:
1629: IF p_silv_rec.Residual_Amount = Okc_Api.G_MISS_NUM OR
1630: p_silv_rec.Residual_Amount IS NULL
1631: THEN
1632: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Residual_Amount');
1633: x_return_status := Okc_Api.G_RET_STS_ERROR;
1634: RAISE G_EXCEPTION_HALT_VALIDATION;
1635: END IF;
1636:
1637: EXCEPTION
1641: NULL;
1642:
1643: WHEN OTHERS THEN
1644: -- store SQL error message on message stack for caller
1645: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1646: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1647: ,p_token1 => G_OKL_SQLCODE_TOKEN
1648: ,p_token1_value => SQLCODE
1649: ,p_token2 => G_OKL_SQLERRM_TOKEN
1649: ,p_token2 => G_OKL_SQLERRM_TOKEN
1650: ,p_token2_value => SQLERRM);
1651:
1652: -- notify caller of an UNEXPECTED error
1653: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1654:
1655: END Validate_Residual_Amount;
1656:
1657: ---------------------------------------------------------------------------
1673:
1674: BEGIN
1675:
1676: -- initialize return status
1677: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1678:
1679: IF p_silv_rec.Fed_Depre_Salvage = Okc_Api.G_MISS_NUM OR
1680: p_silv_rec.Fed_Depre_Salvage IS NULL
1681: THEN
1675:
1676: -- initialize return status
1677: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1678:
1679: IF p_silv_rec.Fed_Depre_Salvage = Okc_Api.G_MISS_NUM OR
1680: p_silv_rec.Fed_Depre_Salvage IS NULL
1681: THEN
1682: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_Salvage');
1683: x_return_status := Okc_Api.G_RET_STS_ERROR;
1678:
1679: IF p_silv_rec.Fed_Depre_Salvage = Okc_Api.G_MISS_NUM OR
1680: p_silv_rec.Fed_Depre_Salvage IS NULL
1681: THEN
1682: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_Salvage');
1683: x_return_status := Okc_Api.G_RET_STS_ERROR;
1684: RAISE G_EXCEPTION_HALT_VALIDATION;
1685: END IF;
1686:
1679: IF p_silv_rec.Fed_Depre_Salvage = Okc_Api.G_MISS_NUM OR
1680: p_silv_rec.Fed_Depre_Salvage IS NULL
1681: THEN
1682: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_Salvage');
1683: x_return_status := Okc_Api.G_RET_STS_ERROR;
1684: RAISE G_EXCEPTION_HALT_VALIDATION;
1685: END IF;
1686:
1687: EXCEPTION
1691: NULL;
1692:
1693: WHEN OTHERS THEN
1694: -- store SQL error message on message stack for caller
1695: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1696: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1697: ,p_token1 => G_OKL_SQLCODE_TOKEN
1698: ,p_token1_value => SQLCODE
1699: ,p_token2 => G_OKL_SQLERRM_TOKEN
1699: ,p_token2 => G_OKL_SQLERRM_TOKEN
1700: ,p_token2_value => SQLERRM);
1701:
1702: -- notify caller of an UNEXPECTED error
1703: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1704:
1705: END Validate_Fed_Depre_Salvage;
1706:
1707: ---------------------------------------------------------------------------
1723:
1724: BEGIN
1725:
1726: -- initialize return status
1727: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1728:
1729: IF p_silv_rec.Date_Fed_Depre = Okc_Api.G_MISS_DATE OR
1730: p_silv_rec.Date_Fed_Depre IS NULL
1731: THEN
1725:
1726: -- initialize return status
1727: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1728:
1729: IF p_silv_rec.Date_Fed_Depre = Okc_Api.G_MISS_DATE OR
1730: p_silv_rec.Date_Fed_Depre IS NULL
1731: THEN
1732: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_Fed_Depre');
1733: x_return_status := Okc_Api.G_RET_STS_ERROR;
1728:
1729: IF p_silv_rec.Date_Fed_Depre = Okc_Api.G_MISS_DATE OR
1730: p_silv_rec.Date_Fed_Depre IS NULL
1731: THEN
1732: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_Fed_Depre');
1733: x_return_status := Okc_Api.G_RET_STS_ERROR;
1734: RAISE G_EXCEPTION_HALT_VALIDATION;
1735: END IF;
1736:
1729: IF p_silv_rec.Date_Fed_Depre = Okc_Api.G_MISS_DATE OR
1730: p_silv_rec.Date_Fed_Depre IS NULL
1731: THEN
1732: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_Fed_Depre');
1733: x_return_status := Okc_Api.G_RET_STS_ERROR;
1734: RAISE G_EXCEPTION_HALT_VALIDATION;
1735: END IF;
1736:
1737: EXCEPTION
1741: NULL;
1742:
1743: WHEN OTHERS THEN
1744: -- store SQL error message on message stack for caller
1745: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1746: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1747: ,p_token1 => G_OKL_SQLCODE_TOKEN
1748: ,p_token1_value => SQLCODE
1749: ,p_token2 => G_OKL_SQLERRM_TOKEN
1749: ,p_token2 => G_OKL_SQLERRM_TOKEN
1750: ,p_token2_value => SQLERRM);
1751:
1752: -- notify caller of an UNEXPECTED error
1753: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1754:
1755: END Validate_Date_Fed_Depre;
1756:
1757: ---------------------------------------------------------------------------
1773:
1774: BEGIN
1775:
1776: -- initialize return status
1777: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1778:
1779: IF p_silv_rec.Book_Salvage = Okc_Api.G_MISS_NUM OR
1780: p_silv_rec.Book_Salvage IS NULL
1781: THEN
1775:
1776: -- initialize return status
1777: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1778:
1779: IF p_silv_rec.Book_Salvage = Okc_Api.G_MISS_NUM OR
1780: p_silv_rec.Book_Salvage IS NULL
1781: THEN
1782: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Book_Salvage');
1783: x_return_status := Okc_Api.G_RET_STS_ERROR;
1778:
1779: IF p_silv_rec.Book_Salvage = Okc_Api.G_MISS_NUM OR
1780: p_silv_rec.Book_Salvage IS NULL
1781: THEN
1782: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Book_Salvage');
1783: x_return_status := Okc_Api.G_RET_STS_ERROR;
1784: RAISE G_EXCEPTION_HALT_VALIDATION;
1785: END IF;
1786:
1779: IF p_silv_rec.Book_Salvage = Okc_Api.G_MISS_NUM OR
1780: p_silv_rec.Book_Salvage IS NULL
1781: THEN
1782: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Book_Salvage');
1783: x_return_status := Okc_Api.G_RET_STS_ERROR;
1784: RAISE G_EXCEPTION_HALT_VALIDATION;
1785: END IF;
1786:
1787: EXCEPTION
1791: NULL;
1792:
1793: WHEN OTHERS THEN
1794: -- store SQL error message on message stack for caller
1795: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1796: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1797: ,p_token1 => G_OKL_SQLCODE_TOKEN
1798: ,p_token1_value => SQLCODE
1799: ,p_token2 => G_OKL_SQLERRM_TOKEN
1799: ,p_token2 => G_OKL_SQLERRM_TOKEN
1800: ,p_token2_value => SQLERRM);
1801:
1802: -- notify caller of an UNEXPECTED error
1803: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1804:
1805: END Validate_Book_Salvage;
1806:
1807: ---------------------------------------------------------------------------
1823:
1824: BEGIN
1825:
1826: -- initialize return status
1827: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1828:
1829: IF p_silv_rec.Book_Adr_Convention = Okc_Api.G_MISS_CHAR OR
1830: p_silv_rec.Book_Adr_Convention IS NULL
1831: THEN
1825:
1826: -- initialize return status
1827: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1828:
1829: IF p_silv_rec.Book_Adr_Convention = Okc_Api.G_MISS_CHAR OR
1830: p_silv_rec.Book_Adr_Convention IS NULL
1831: THEN
1832: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Book_Adr_Convention');
1833: x_return_status := Okc_Api.G_RET_STS_ERROR;
1828:
1829: IF p_silv_rec.Book_Adr_Convention = Okc_Api.G_MISS_CHAR OR
1830: p_silv_rec.Book_Adr_Convention IS NULL
1831: THEN
1832: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Book_Adr_Convention');
1833: x_return_status := Okc_Api.G_RET_STS_ERROR;
1834: RAISE G_EXCEPTION_HALT_VALIDATION;
1835: END IF;
1836:
1829: IF p_silv_rec.Book_Adr_Convention = Okc_Api.G_MISS_CHAR OR
1830: p_silv_rec.Book_Adr_Convention IS NULL
1831: THEN
1832: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Book_Adr_Convention');
1833: x_return_status := Okc_Api.G_RET_STS_ERROR;
1834: RAISE G_EXCEPTION_HALT_VALIDATION;
1835: END IF;
1836:
1837: EXCEPTION
1841: NULL;
1842:
1843: WHEN OTHERS THEN
1844: -- store SQL error message on message stack for caller
1845: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1846: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1847: ,p_token1 => G_OKL_SQLCODE_TOKEN
1848: ,p_token1_value => SQLCODE
1849: ,p_token2 => G_OKL_SQLERRM_TOKEN
1849: ,p_token2 => G_OKL_SQLERRM_TOKEN
1850: ,p_token2_value => SQLERRM);
1851:
1852: -- notify caller of an UNEXPECTED error
1853: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1854:
1855: END Validate_Book_Adr_Convention;
1856:
1857: ---------------------------------------------------------------------------
1873:
1874: BEGIN
1875:
1876: -- initialize return status
1877: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1878:
1879: IF p_silv_rec.State_Depre_Salvage = Okc_Api.G_MISS_NUM OR
1880: p_silv_rec.State_Depre_Salvage IS NULL
1881: THEN
1875:
1876: -- initialize return status
1877: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1878:
1879: IF p_silv_rec.State_Depre_Salvage = Okc_Api.G_MISS_NUM OR
1880: p_silv_rec.State_Depre_Salvage IS NULL
1881: THEN
1882: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'State_Depre_Salvage');
1883: x_return_status := Okc_Api.G_RET_STS_ERROR;
1878:
1879: IF p_silv_rec.State_Depre_Salvage = Okc_Api.G_MISS_NUM OR
1880: p_silv_rec.State_Depre_Salvage IS NULL
1881: THEN
1882: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'State_Depre_Salvage');
1883: x_return_status := Okc_Api.G_RET_STS_ERROR;
1884: RAISE G_EXCEPTION_HALT_VALIDATION;
1885: END IF;
1886:
1879: IF p_silv_rec.State_Depre_Salvage = Okc_Api.G_MISS_NUM OR
1880: p_silv_rec.State_Depre_Salvage IS NULL
1881: THEN
1882: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'State_Depre_Salvage');
1883: x_return_status := Okc_Api.G_RET_STS_ERROR;
1884: RAISE G_EXCEPTION_HALT_VALIDATION;
1885: END IF;
1886:
1887: EXCEPTION
1891: NULL;
1892:
1893: WHEN OTHERS THEN
1894: -- store SQL error message on message stack for caller
1895: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1896: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1897: ,p_token1 => G_OKL_SQLCODE_TOKEN
1898: ,p_token1_value => SQLCODE
1899: ,p_token2 => G_OKL_SQLERRM_TOKEN
1899: ,p_token2 => G_OKL_SQLERRM_TOKEN
1900: ,p_token2_value => SQLERRM);
1901:
1902: -- notify caller of an UNEXPECTED error
1903: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1904:
1905: END Validate_State_Depre_Salvage;
1906:
1907: ---------------------------------------------------------------------------
1923:
1924: BEGIN
1925:
1926: -- initialize return status
1927: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1928:
1929: IF p_silv_rec.Fed_Depre_Basis_Percent = Okc_Api.G_MISS_NUM OR
1930: p_silv_rec.Fed_Depre_Basis_Percent IS NULL
1931: THEN
1925:
1926: -- initialize return status
1927: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1928:
1929: IF p_silv_rec.Fed_Depre_Basis_Percent = Okc_Api.G_MISS_NUM OR
1930: p_silv_rec.Fed_Depre_Basis_Percent IS NULL
1931: THEN
1932: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_Basis_Percent');
1933: x_return_status := Okc_Api.G_RET_STS_ERROR;
1928:
1929: IF p_silv_rec.Fed_Depre_Basis_Percent = Okc_Api.G_MISS_NUM OR
1930: p_silv_rec.Fed_Depre_Basis_Percent IS NULL
1931: THEN
1932: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_Basis_Percent');
1933: x_return_status := Okc_Api.G_RET_STS_ERROR;
1934: RAISE G_EXCEPTION_HALT_VALIDATION;
1935: END IF;
1936:
1929: IF p_silv_rec.Fed_Depre_Basis_Percent = Okc_Api.G_MISS_NUM OR
1930: p_silv_rec.Fed_Depre_Basis_Percent IS NULL
1931: THEN
1932: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Fed_Depre_Basis_Percent');
1933: x_return_status := Okc_Api.G_RET_STS_ERROR;
1934: RAISE G_EXCEPTION_HALT_VALIDATION;
1935: END IF;
1936:
1937: EXCEPTION
1941: NULL;
1942:
1943: WHEN OTHERS THEN
1944: -- store SQL error message on message stack for caller
1945: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1946: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1947: ,p_token1 => G_OKL_SQLCODE_TOKEN
1948: ,p_token1_value => SQLCODE
1949: ,p_token2 => G_OKL_SQLERRM_TOKEN
1949: ,p_token2 => G_OKL_SQLERRM_TOKEN
1950: ,p_token2_value => SQLERRM);
1951:
1952: -- notify caller of an UNEXPECTED error
1953: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1954:
1955: END Validate_Fed_Depr_Basis;
1956:
1957: ---------------------------------------------------------------------------
1973:
1974: BEGIN
1975:
1976: -- initialize return status
1977: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1978:
1979: IF p_silv_rec.Book_Basis_Percent = Okc_Api.G_MISS_NUM OR
1980: p_silv_rec.Book_Basis_Percent IS NULL
1981: THEN
1975:
1976: -- initialize return status
1977: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1978:
1979: IF p_silv_rec.Book_Basis_Percent = Okc_Api.G_MISS_NUM OR
1980: p_silv_rec.Book_Basis_Percent IS NULL
1981: THEN
1982: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Book_Basis_Percent');
1983: x_return_status := Okc_Api.G_RET_STS_ERROR;
1978:
1979: IF p_silv_rec.Book_Basis_Percent = Okc_Api.G_MISS_NUM OR
1980: p_silv_rec.Book_Basis_Percent IS NULL
1981: THEN
1982: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Book_Basis_Percent');
1983: x_return_status := Okc_Api.G_RET_STS_ERROR;
1984: RAISE G_EXCEPTION_HALT_VALIDATION;
1985: END IF;
1986:
1979: IF p_silv_rec.Book_Basis_Percent = Okc_Api.G_MISS_NUM OR
1980: p_silv_rec.Book_Basis_Percent IS NULL
1981: THEN
1982: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Book_Basis_Percent');
1983: x_return_status := Okc_Api.G_RET_STS_ERROR;
1984: RAISE G_EXCEPTION_HALT_VALIDATION;
1985: END IF;
1986:
1987: EXCEPTION
1991: NULL;
1992:
1993: WHEN OTHERS THEN
1994: -- store SQL error message on message stack for caller
1995: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1996: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
1997: ,p_token1 => G_OKL_SQLCODE_TOKEN
1998: ,p_token1_value => SQLCODE
1999: ,p_token2 => G_OKL_SQLERRM_TOKEN
1999: ,p_token2 => G_OKL_SQLERRM_TOKEN
2000: ,p_token2_value => SQLERRM);
2001:
2002: -- notify caller of an UNEXPECTED error
2003: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
2004:
2005: END Validate_Book_Basis_Percent;
2006:
2007: ---------------------------------------------------------------------------
2023:
2024: BEGIN
2025:
2026: -- initialize return status
2027: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
2028:
2029: IF p_silv_rec.Date_Delivery = Okc_Api.G_MISS_DATE OR
2030: p_silv_rec.Date_Delivery IS NULL
2031: THEN
2025:
2026: -- initialize return status
2027: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
2028:
2029: IF p_silv_rec.Date_Delivery = Okc_Api.G_MISS_DATE OR
2030: p_silv_rec.Date_Delivery IS NULL
2031: THEN
2032: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_Delivery');
2033: x_return_status := Okc_Api.G_RET_STS_ERROR;
2028:
2029: IF p_silv_rec.Date_Delivery = Okc_Api.G_MISS_DATE OR
2030: p_silv_rec.Date_Delivery IS NULL
2031: THEN
2032: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_Delivery');
2033: x_return_status := Okc_Api.G_RET_STS_ERROR;
2034: RAISE G_EXCEPTION_HALT_VALIDATION;
2035: END IF;
2036:
2029: IF p_silv_rec.Date_Delivery = Okc_Api.G_MISS_DATE OR
2030: p_silv_rec.Date_Delivery IS NULL
2031: THEN
2032: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_Delivery');
2033: x_return_status := Okc_Api.G_RET_STS_ERROR;
2034: RAISE G_EXCEPTION_HALT_VALIDATION;
2035: END IF;
2036:
2037: EXCEPTION
2041: NULL;
2042:
2043: WHEN OTHERS THEN
2044: -- store SQL error message on message stack for caller
2045: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
2046: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
2047: ,p_token1 => G_OKL_SQLCODE_TOKEN
2048: ,p_token1_value => SQLCODE
2049: ,p_token2 => G_OKL_SQLERRM_TOKEN
2049: ,p_token2 => G_OKL_SQLERRM_TOKEN
2050: ,p_token2_value => SQLERRM);
2051:
2052: -- notify caller of an UNEXPECTED error
2053: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
2054:
2055: END Validate_Date_Delivery;
2056:
2057: ---------------------------------------------------------------------------
2073:
2074: BEGIN
2075:
2076: -- initialize return status
2077: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
2078:
2079: IF p_silv_rec.Date_Funding = Okc_Api.G_MISS_DATE OR
2080: p_silv_rec.Date_Funding IS NULL
2081: THEN
2075:
2076: -- initialize return status
2077: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
2078:
2079: IF p_silv_rec.Date_Funding = Okc_Api.G_MISS_DATE OR
2080: p_silv_rec.Date_Funding IS NULL
2081: THEN
2082: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_Funding');
2083: x_return_status := Okc_Api.G_RET_STS_ERROR;
2078:
2079: IF p_silv_rec.Date_Funding = Okc_Api.G_MISS_DATE OR
2080: p_silv_rec.Date_Funding IS NULL
2081: THEN
2082: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_Funding');
2083: x_return_status := Okc_Api.G_RET_STS_ERROR;
2084: RAISE G_EXCEPTION_HALT_VALIDATION;
2085: END IF;
2086:
2079: IF p_silv_rec.Date_Funding = Okc_Api.G_MISS_DATE OR
2080: p_silv_rec.Date_Funding IS NULL
2081: THEN
2082: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_Funding');
2083: x_return_status := Okc_Api.G_RET_STS_ERROR;
2084: RAISE G_EXCEPTION_HALT_VALIDATION;
2085: END IF;
2086:
2087: EXCEPTION
2091: NULL;
2092:
2093: WHEN OTHERS THEN
2094: -- store SQL error message on message stack for caller
2095: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
2096: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
2097: ,p_token1 => G_OKL_SQLCODE_TOKEN
2098: ,p_token1_value => SQLCODE
2099: ,p_token2 => G_OKL_SQLERRM_TOKEN
2099: ,p_token2 => G_OKL_SQLERRM_TOKEN
2100: ,p_token2_value => SQLERRM);
2101:
2102: -- notify caller of an UNEXPECTED error
2103: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
2104:
2105: END Validate_Date_Funding;
2106:
2107: ---------------------------------------------------------------------------
2123:
2124: BEGIN
2125:
2126: -- initialize return status
2127: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
2128:
2129: IF p_silv_rec.Date_Book = Okc_Api.G_MISS_DATE OR
2130: p_silv_rec.Date_Book IS NULL
2131: THEN
2125:
2126: -- initialize return status
2127: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
2128:
2129: IF p_silv_rec.Date_Book = Okc_Api.G_MISS_DATE OR
2130: p_silv_rec.Date_Book IS NULL
2131: THEN
2132: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_Book');
2133: x_return_status := Okc_Api.G_RET_STS_ERROR;
2128:
2129: IF p_silv_rec.Date_Book = Okc_Api.G_MISS_DATE OR
2130: p_silv_rec.Date_Book IS NULL
2131: THEN
2132: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_Book');
2133: x_return_status := Okc_Api.G_RET_STS_ERROR;
2134: RAISE G_EXCEPTION_HALT_VALIDATION;
2135: END IF;
2136:
2129: IF p_silv_rec.Date_Book = Okc_Api.G_MISS_DATE OR
2130: p_silv_rec.Date_Book IS NULL
2131: THEN
2132: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_Book');
2133: x_return_status := Okc_Api.G_RET_STS_ERROR;
2134: RAISE G_EXCEPTION_HALT_VALIDATION;
2135: END IF;
2136:
2137: EXCEPTION
2141: NULL;
2142:
2143: WHEN OTHERS THEN
2144: -- store SQL error message on message stack for caller
2145: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
2146: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
2147: ,p_token1 => G_OKL_SQLCODE_TOKEN
2148: ,p_token1_value => SQLCODE
2149: ,p_token2 => G_OKL_SQLERRM_TOKEN
2149: ,p_token2 => G_OKL_SQLERRM_TOKEN
2150: ,p_token2_value => SQLERRM);
2151:
2152: -- notify caller of an UNEXPECTED error
2153: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
2154:
2155: END Validate_Date_Book;
2156:
2157: ---------------------------------------------------------------------------
2173:
2174: BEGIN
2175:
2176: -- initialize return status
2177: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
2178:
2179: IF p_silv_rec.Date_State_Depre = Okc_Api.G_MISS_DATE OR
2180: p_silv_rec.Date_State_Depre IS NULL
2181: THEN
2175:
2176: -- initialize return status
2177: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
2178:
2179: IF p_silv_rec.Date_State_Depre = Okc_Api.G_MISS_DATE OR
2180: p_silv_rec.Date_State_Depre IS NULL
2181: THEN
2182: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_State_Depre');
2183: x_return_status := Okc_Api.G_RET_STS_ERROR;
2178:
2179: IF p_silv_rec.Date_State_Depre = Okc_Api.G_MISS_DATE OR
2180: p_silv_rec.Date_State_Depre IS NULL
2181: THEN
2182: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_State_Depre');
2183: x_return_status := Okc_Api.G_RET_STS_ERROR;
2184: RAISE G_EXCEPTION_HALT_VALIDATION;
2185: END IF;
2186:
2179: IF p_silv_rec.Date_State_Depre = Okc_Api.G_MISS_DATE OR
2180: p_silv_rec.Date_State_Depre IS NULL
2181: THEN
2182: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_State_Depre');
2183: x_return_status := Okc_Api.G_RET_STS_ERROR;
2184: RAISE G_EXCEPTION_HALT_VALIDATION;
2185: END IF;
2186:
2187: EXCEPTION
2191: NULL;
2192:
2193: WHEN OTHERS THEN
2194: -- store SQL error message on message stack for caller
2195: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
2196: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
2197: ,p_token1 => G_OKL_SQLCODE_TOKEN
2198: ,p_token1_value => SQLCODE
2199: ,p_token2 => G_OKL_SQLERRM_TOKEN
2199: ,p_token2 => G_OKL_SQLERRM_TOKEN
2200: ,p_token2_value => SQLERRM);
2201:
2202: -- notify caller of an UNEXPECTED error
2203: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
2204:
2205: END Validate_Date_State_Depre;
2206:
2207: ---------------------------------------------------------------------------
2223:
2224: BEGIN
2225:
2226: -- initialize return status
2227: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
2228:
2229: IF p_silv_rec.Book_Method = Okc_Api.G_MISS_CHAR OR
2230: p_silv_rec.Book_Method IS NULL
2231: THEN
2225:
2226: -- initialize return status
2227: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
2228:
2229: IF p_silv_rec.Book_Method = Okc_Api.G_MISS_CHAR OR
2230: p_silv_rec.Book_Method IS NULL
2231: THEN
2232: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Book_Method');
2233: x_return_status := Okc_Api.G_RET_STS_ERROR;
2228:
2229: IF p_silv_rec.Book_Method = Okc_Api.G_MISS_CHAR OR
2230: p_silv_rec.Book_Method IS NULL
2231: THEN
2232: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Book_Method');
2233: x_return_status := Okc_Api.G_RET_STS_ERROR;
2234: RAISE G_EXCEPTION_HALT_VALIDATION;
2235: END IF;
2236:
2229: IF p_silv_rec.Book_Method = Okc_Api.G_MISS_CHAR OR
2230: p_silv_rec.Book_Method IS NULL
2231: THEN
2232: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Book_Method');
2233: x_return_status := Okc_Api.G_RET_STS_ERROR;
2234: RAISE G_EXCEPTION_HALT_VALIDATION;
2235: END IF;
2236:
2237: EXCEPTION
2241: NULL;
2242:
2243: WHEN OTHERS THEN
2244: -- store SQL error message on message stack for caller
2245: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
2246: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
2247: ,p_token1 => G_OKL_SQLCODE_TOKEN
2248: ,p_token1_value => SQLCODE
2249: ,p_token2 => G_OKL_SQLERRM_TOKEN
2249: ,p_token2 => G_OKL_SQLERRM_TOKEN
2250: ,p_token2_value => SQLERRM);
2251:
2252: -- notify caller of an UNEXPECTED error
2253: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
2254:
2255: END Validate_Book_Method;
2256:
2257: ---------------------------------------------------------------------------
2273:
2274: BEGIN
2275:
2276: -- initialize return status
2277: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
2278:
2279: -- 04/23/2002, mvasudev
2280: /*
2281: IF p_silv_rec.Date_Lending = Okc_Api.G_MISS_DATE OR
2277: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
2278:
2279: -- 04/23/2002, mvasudev
2280: /*
2281: IF p_silv_rec.Date_Lending = Okc_Api.G_MISS_DATE OR
2282: p_silv_rec.Date_Lending IS NULL
2283: THEN
2284: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_Lending');
2285: x_return_status := Okc_Api.G_RET_STS_ERROR;
2280: /*
2281: IF p_silv_rec.Date_Lending = Okc_Api.G_MISS_DATE OR
2282: p_silv_rec.Date_Lending IS NULL
2283: THEN
2284: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_Lending');
2285: x_return_status := Okc_Api.G_RET_STS_ERROR;
2286: RAISE G_EXCEPTION_HALT_VALIDATION;
2287: END IF;
2288: */
2281: IF p_silv_rec.Date_Lending = Okc_Api.G_MISS_DATE OR
2282: p_silv_rec.Date_Lending IS NULL
2283: THEN
2284: Okc_Api.set_message(G_OKC_APP, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'Date_Lending');
2285: x_return_status := Okc_Api.G_RET_STS_ERROR;
2286: RAISE G_EXCEPTION_HALT_VALIDATION;
2287: END IF;
2288: */
2289: -- end, 04/23/2002, mvasudev
2294: NULL;
2295:
2296: WHEN OTHERS THEN
2297: -- store SQL error message on message stack for caller
2298: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
2299: ,p_msg_name => G_OKL_UNEXPECTED_ERROR
2300: ,p_token1 => G_OKL_SQLCODE_TOKEN
2301: ,p_token1_value => SQLCODE
2302: ,p_token2 => G_OKL_SQLERRM_TOKEN
2302: ,p_token2 => G_OKL_SQLERRM_TOKEN
2303: ,p_token2_value => SQLERRM);
2304:
2305: -- notify caller of an UNEXPECTED error
2306: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
2307:
2308: END Validate_Date_Lending;
2309:
2310:
2324: FUNCTION Validate_Attributes (
2325: p_silv_rec IN silv_rec_type
2326: ) RETURN VARCHAR2 IS
2327:
2328: x_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2329: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2330: BEGIN
2331: -- call each column-level validation
2332:
2325: p_silv_rec IN silv_rec_type
2326: ) RETURN VARCHAR2 IS
2327:
2328: x_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2329: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2330: BEGIN
2331: -- call each column-level validation
2332:
2333: -- Validate_Id
2331: -- call each column-level validation
2332:
2333: -- Validate_Id
2334: Validate_Id(p_silv_rec, x_return_status);
2335: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2336: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2337: -- need to exit
2338: l_return_status := x_return_status;
2339: RAISE G_EXCEPTION_HALT_VALIDATION;
2332:
2333: -- Validate_Id
2334: Validate_Id(p_silv_rec, x_return_status);
2335: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2336: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2337: -- need to exit
2338: l_return_status := x_return_status;
2339: RAISE G_EXCEPTION_HALT_VALIDATION;
2340: ELSE
2344: END IF;
2345:
2346: -- Validate_Object_Version_Number
2347: Validate_Object_Version_Number(p_silv_rec, x_return_status);
2348: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2349: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2350: -- need to exit
2351: l_return_status := x_return_status;
2352: RAISE G_EXCEPTION_HALT_VALIDATION;
2345:
2346: -- Validate_Object_Version_Number
2347: Validate_Object_Version_Number(p_silv_rec, x_return_status);
2348: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2349: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2350: -- need to exit
2351: l_return_status := x_return_status;
2352: RAISE G_EXCEPTION_HALT_VALIDATION;
2353: ELSE
2357: END IF;
2358:
2359: -- Validate_Index_Number
2360: Validate_Index_Number(p_silv_rec, x_return_status);
2361: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2362: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2363: -- need to exit
2364: l_return_status := x_return_status;
2365: RAISE G_EXCEPTION_HALT_VALIDATION;
2358:
2359: -- Validate_Index_Number
2360: Validate_Index_Number(p_silv_rec, x_return_status);
2361: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2362: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2363: -- need to exit
2364: l_return_status := x_return_status;
2365: RAISE G_EXCEPTION_HALT_VALIDATION;
2366: ELSE
2370: END IF;
2371:
2372: -- Validate_Sif_id
2373: Validate_Sif_id(p_silv_rec, x_return_status);
2374: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2375: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2376: -- need to exit
2377: l_return_status := x_return_status;
2378: RAISE G_EXCEPTION_HALT_VALIDATION;
2371:
2372: -- Validate_Sif_id
2373: Validate_Sif_id(p_silv_rec, x_return_status);
2374: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2375: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2376: -- need to exit
2377: l_return_status := x_return_status;
2378: RAISE G_EXCEPTION_HALT_VALIDATION;
2379: ELSE
2383: END IF;
2384:
2385: -- Validate_Kle_Id
2386: Validate_Kle_Id(p_silv_rec, x_return_status);
2387: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2388: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2389: -- need to exit
2390: l_return_status := x_return_status;
2391: RAISE G_EXCEPTION_HALT_VALIDATION;
2384:
2385: -- Validate_Kle_Id
2386: Validate_Kle_Id(p_silv_rec, x_return_status);
2387: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2388: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2389: -- need to exit
2390: l_return_status := x_return_status;
2391: RAISE G_EXCEPTION_HALT_VALIDATION;
2392: ELSE
2396: END IF;
2397:
2398: -- Validate_Sil_Type
2399: Validate_Sil_Type(p_silv_rec, x_return_status);
2400: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2401: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2402: -- need to exit
2403: l_return_status := x_return_status;
2404: RAISE G_EXCEPTION_HALT_VALIDATION;
2397:
2398: -- Validate_Sil_Type
2399: Validate_Sil_Type(p_silv_rec, x_return_status);
2400: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2401: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2402: -- need to exit
2403: l_return_status := x_return_status;
2404: RAISE G_EXCEPTION_HALT_VALIDATION;
2405: ELSE
2412: THEN
2413:
2414: -- Validate_Residual_Guarantee
2415: Validate_Residual_Guarantee(p_silv_rec, x_return_status);
2416: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2417: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2418: -- need to exit
2419: l_return_status := x_return_status;
2420: RAISE G_EXCEPTION_HALT_VALIDATION;
2413:
2414: -- Validate_Residual_Guarantee
2415: Validate_Residual_Guarantee(p_silv_rec, x_return_status);
2416: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2417: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2418: -- need to exit
2419: l_return_status := x_return_status;
2420: RAISE G_EXCEPTION_HALT_VALIDATION;
2421: ELSE
2425: END IF;
2426:
2427: -- Validate_Purchase_Option
2428: Validate_Purchase_Option(p_silv_rec, x_return_status);
2429: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2430: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2431: -- need to exit
2432: l_return_status := x_return_status;
2433: RAISE G_EXCEPTION_HALT_VALIDATION;
2426:
2427: -- Validate_Purchase_Option
2428: Validate_Purchase_Option(p_silv_rec, x_return_status);
2429: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2430: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2431: -- need to exit
2432: l_return_status := x_return_status;
2433: RAISE G_EXCEPTION_HALT_VALIDATION;
2434: ELSE
2438: END IF;
2439:
2440: -- Validate_Asset_Cost
2441: Validate_Asset_Cost(p_silv_rec, x_return_status);
2442: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2443: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2444: -- need to exit
2445: l_return_status := x_return_status;
2446: RAISE G_EXCEPTION_HALT_VALIDATION;
2439:
2440: -- Validate_Asset_Cost
2441: Validate_Asset_Cost(p_silv_rec, x_return_status);
2442: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2443: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2444: -- need to exit
2445: l_return_status := x_return_status;
2446: RAISE G_EXCEPTION_HALT_VALIDATION;
2447: ELSE
2451: END IF;
2452:
2453: -- Validate_Residual_Amount
2454: Validate_Residual_Amount(p_silv_rec, x_return_status);
2455: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2456: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2457: -- need to exit
2458: l_return_status := x_return_status;
2459: RAISE G_EXCEPTION_HALT_VALIDATION;
2452:
2453: -- Validate_Residual_Amount
2454: Validate_Residual_Amount(p_silv_rec, x_return_status);
2455: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2456: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2457: -- need to exit
2458: l_return_status := x_return_status;
2459: RAISE G_EXCEPTION_HALT_VALIDATION;
2460: ELSE
2465:
2466:
2467: -- Validate_Date_Delivery
2468: Validate_Date_Delivery(p_silv_rec, x_return_status);
2469: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2470: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2471: -- need to exit
2472: l_return_status := x_return_status;
2473: RAISE G_EXCEPTION_HALT_VALIDATION;
2466:
2467: -- Validate_Date_Delivery
2468: Validate_Date_Delivery(p_silv_rec, x_return_status);
2469: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2470: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2471: -- need to exit
2472: l_return_status := x_return_status;
2473: RAISE G_EXCEPTION_HALT_VALIDATION;
2474: ELSE
2478: END IF;
2479:
2480: -- Validate_Date_Funding
2481: Validate_Date_Funding(p_silv_rec, x_return_status);
2482: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2483: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2484: -- need to exit
2485: l_return_status := x_return_status;
2486: RAISE G_EXCEPTION_HALT_VALIDATION;
2479:
2480: -- Validate_Date_Funding
2481: Validate_Date_Funding(p_silv_rec, x_return_status);
2482: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2483: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2484: -- need to exit
2485: l_return_status := x_return_status;
2486: RAISE G_EXCEPTION_HALT_VALIDATION;
2487: ELSE
2495: -- Commented out to make "Depreciation Details" optional
2496:
2497: -- Validate_State_Depr_Dim_Value
2498: Validate_State_Depr_Dim_Value(p_silv_rec, x_return_status);
2499: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2500: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2501: -- need to exit
2502: l_return_status := x_return_status;
2503: RAISE G_EXCEPTION_HALT_VALIDATION;
2496:
2497: -- Validate_State_Depr_Dim_Value
2498: Validate_State_Depr_Dim_Value(p_silv_rec, x_return_status);
2499: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2500: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2501: -- need to exit
2502: l_return_status := x_return_status;
2503: RAISE G_EXCEPTION_HALT_VALIDATION;
2504: ELSE
2508: END IF;
2509:
2510: -- Validate_Book_Depr_Dim_Value
2511: Validate_Book_Depr_Dim_Value(p_silv_rec, x_return_status);
2512: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2513: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2514: -- need to exit
2515: l_return_status := x_return_status;
2516: RAISE G_EXCEPTION_HALT_VALIDATION;
2509:
2510: -- Validate_Book_Depr_Dim_Value
2511: Validate_Book_Depr_Dim_Value(p_silv_rec, x_return_status);
2512: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2513: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2514: -- need to exit
2515: l_return_status := x_return_status;
2516: RAISE G_EXCEPTION_HALT_VALIDATION;
2517: ELSE
2523:
2524:
2525: -- Validate_Fed_Depre_Term
2526: Validate_Fed_Depre_Term(p_silv_rec, x_return_status);
2527: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2528: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2529: -- need to exit
2530: l_return_status := x_return_status;
2531: RAISE G_EXCEPTION_HALT_VALIDATION;
2524:
2525: -- Validate_Fed_Depre_Term
2526: Validate_Fed_Depre_Term(p_silv_rec, x_return_status);
2527: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2528: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2529: -- need to exit
2530: l_return_status := x_return_status;
2531: RAISE G_EXCEPTION_HALT_VALIDATION;
2532: ELSE
2536: END IF;
2537:
2538: -- Validate_Fed_Depre_Dim_Value
2539: Validate_Fed_Depre_Dim_Value(p_silv_rec, x_return_status);
2540: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2541: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2542: -- need to exit
2543: l_return_status := x_return_status;
2544: RAISE G_EXCEPTION_HALT_VALIDATION;
2537:
2538: -- Validate_Fed_Depre_Dim_Value
2539: Validate_Fed_Depre_Dim_Value(p_silv_rec, x_return_status);
2540: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2541: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2542: -- need to exit
2543: l_return_status := x_return_status;
2544: RAISE G_EXCEPTION_HALT_VALIDATION;
2545: ELSE
2549: END IF;
2550:
2551: -- Validate_Fed_Depre_Adr
2552: Validate_Fed_Depre_Adr(p_silv_rec, x_return_status);
2553: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2554: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2555: -- need to exit
2556: l_return_status := x_return_status;
2557: RAISE G_EXCEPTION_HALT_VALIDATION;
2550:
2551: -- Validate_Fed_Depre_Adr
2552: Validate_Fed_Depre_Adr(p_silv_rec, x_return_status);
2553: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2554: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2555: -- need to exit
2556: l_return_status := x_return_status;
2557: RAISE G_EXCEPTION_HALT_VALIDATION;
2558: ELSE
2562: END IF;
2563:
2564: -- Validate_State_Depre_Basis
2565: Validate_State_Depre_Basis(p_silv_rec, x_return_status);
2566: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2567: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2568: -- need to exit
2569: l_return_status := x_return_status;
2570: RAISE G_EXCEPTION_HALT_VALIDATION;
2563:
2564: -- Validate_State_Depre_Basis
2565: Validate_State_Depre_Basis(p_silv_rec, x_return_status);
2566: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2567: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2568: -- need to exit
2569: l_return_status := x_return_status;
2570: RAISE G_EXCEPTION_HALT_VALIDATION;
2571: ELSE
2575: END IF;
2576:
2577: -- Validate_State_Depre_Method
2578: Validate_State_Depre_Method(p_silv_rec, x_return_status);
2579: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2580: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2581: -- need to exit
2582: l_return_status := x_return_status;
2583: RAISE G_EXCEPTION_HALT_VALIDATION;
2576:
2577: -- Validate_State_Depre_Method
2578: Validate_State_Depre_Method(p_silv_rec, x_return_status);
2579: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2580: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2581: -- need to exit
2582: l_return_status := x_return_status;
2583: RAISE G_EXCEPTION_HALT_VALIDATION;
2584: ELSE
2588: END IF;
2589:
2590: -- Validate_Book_Depr_Dim_Value
2591: Validate_Book_Depr_Dim_Value(p_silv_rec, x_return_status);
2592: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2593: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2594: -- need to exit
2595: l_return_status := x_return_status;
2596: RAISE G_EXCEPTION_HALT_VALIDATION;
2589:
2590: -- Validate_Book_Depr_Dim_Value
2591: Validate_Book_Depr_Dim_Value(p_silv_rec, x_return_status);
2592: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2593: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2594: -- need to exit
2595: l_return_status := x_return_status;
2596: RAISE G_EXCEPTION_HALT_VALIDATION;
2597: ELSE
2601: END IF;
2602:
2603: -- Validate_State_Depre_Term
2604: Validate_State_Depre_Term(p_silv_rec, x_return_status);
2605: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2606: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2607: -- need to exit
2608: l_return_status := x_return_status;
2609: RAISE G_EXCEPTION_HALT_VALIDATION;
2602:
2603: -- Validate_State_Depre_Term
2604: Validate_State_Depre_Term(p_silv_rec, x_return_status);
2605: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2606: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2607: -- need to exit
2608: l_return_status := x_return_status;
2609: RAISE G_EXCEPTION_HALT_VALIDATION;
2610: ELSE
2614: END IF;
2615:
2616: -- Validate_State_Depre_Adr
2617: Validate_State_Depre_Adr(p_silv_rec, x_return_status);
2618: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2619: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2620: -- need to exit
2621: l_return_status := x_return_status;
2622: RAISE G_EXCEPTION_HALT_VALIDATION;
2615:
2616: -- Validate_State_Depre_Adr
2617: Validate_State_Depre_Adr(p_silv_rec, x_return_status);
2618: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2619: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2620: -- need to exit
2621: l_return_status := x_return_status;
2622: RAISE G_EXCEPTION_HALT_VALIDATION;
2623: ELSE
2627: END IF;
2628:
2629: -- Validate_Fed_Depre_Method
2630: Validate_Fed_Depre_Method(p_silv_rec, x_return_status);
2631: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2632: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2633: -- need to exit
2634: l_return_status := x_return_status;
2635: RAISE G_EXCEPTION_HALT_VALIDATION;
2628:
2629: -- Validate_Fed_Depre_Method
2630: Validate_Fed_Depre_Method(p_silv_rec, x_return_status);
2631: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2632: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2633: -- need to exit
2634: l_return_status := x_return_status;
2635: RAISE G_EXCEPTION_HALT_VALIDATION;
2636: ELSE
2640: END IF;
2641:
2642: -- Validate_Fed_Depre_Salvage
2643: Validate_Fed_Depre_Salvage(p_silv_rec, x_return_status);
2644: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2645: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2646: -- need to exit
2647: l_return_status := x_return_status;
2648: RAISE G_EXCEPTION_HALT_VALIDATION;
2641:
2642: -- Validate_Fed_Depre_Salvage
2643: Validate_Fed_Depre_Salvage(p_silv_rec, x_return_status);
2644: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2645: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2646: -- need to exit
2647: l_return_status := x_return_status;
2648: RAISE G_EXCEPTION_HALT_VALIDATION;
2649: ELSE
2653: END IF;
2654:
2655: -- Validate_Date_Fed_Depre
2656: Validate_Date_Fed_Depre(p_silv_rec, x_return_status);
2657: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2658: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2659: -- need to exit
2660: l_return_status := x_return_status;
2661: RAISE G_EXCEPTION_HALT_VALIDATION;
2654:
2655: -- Validate_Date_Fed_Depre
2656: Validate_Date_Fed_Depre(p_silv_rec, x_return_status);
2657: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2658: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2659: -- need to exit
2660: l_return_status := x_return_status;
2661: RAISE G_EXCEPTION_HALT_VALIDATION;
2662: ELSE
2666: END IF;
2667:
2668: -- Validate_Book_Salvage
2669: Validate_Book_Salvage(p_silv_rec, x_return_status);
2670: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2671: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2672: -- need to exit
2673: l_return_status := x_return_status;
2674: RAISE G_EXCEPTION_HALT_VALIDATION;
2667:
2668: -- Validate_Book_Salvage
2669: Validate_Book_Salvage(p_silv_rec, x_return_status);
2670: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2671: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2672: -- need to exit
2673: l_return_status := x_return_status;
2674: RAISE G_EXCEPTION_HALT_VALIDATION;
2675: ELSE
2679: END IF;
2680:
2681: -- Validate_Book_Adr_Convention
2682: Validate_Book_Adr_Convention(p_silv_rec, x_return_status);
2683: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2684: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2685: -- need to exit
2686: l_return_status := x_return_status;
2687: RAISE G_EXCEPTION_HALT_VALIDATION;
2680:
2681: -- Validate_Book_Adr_Convention
2682: Validate_Book_Adr_Convention(p_silv_rec, x_return_status);
2683: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2684: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2685: -- need to exit
2686: l_return_status := x_return_status;
2687: RAISE G_EXCEPTION_HALT_VALIDATION;
2688: ELSE
2692: END IF;
2693:
2694: -- Validate_State_Depre_Salvage
2695: Validate_State_Depre_Salvage(p_silv_rec, x_return_status);
2696: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2697: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2698: -- need to exit
2699: l_return_status := x_return_status;
2700: RAISE G_EXCEPTION_HALT_VALIDATION;
2693:
2694: -- Validate_State_Depre_Salvage
2695: Validate_State_Depre_Salvage(p_silv_rec, x_return_status);
2696: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2697: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2698: -- need to exit
2699: l_return_status := x_return_status;
2700: RAISE G_EXCEPTION_HALT_VALIDATION;
2701: ELSE
2705: END IF;
2706:
2707: -- Validate_Fed_Depr_Basis
2708: Validate_Fed_Depr_Basis(p_silv_rec, x_return_status);
2709: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2710: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2711: -- need to exit
2712: l_return_status := x_return_status;
2713: RAISE G_EXCEPTION_HALT_VALIDATION;
2706:
2707: -- Validate_Fed_Depr_Basis
2708: Validate_Fed_Depr_Basis(p_silv_rec, x_return_status);
2709: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2710: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2711: -- need to exit
2712: l_return_status := x_return_status;
2713: RAISE G_EXCEPTION_HALT_VALIDATION;
2714: ELSE
2718: END IF;
2719:
2720: -- Validate_Book_Basis_Percent
2721: Validate_Book_Basis_Percent(p_silv_rec, x_return_status);
2722: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2723: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2724: -- need to exit
2725: l_return_status := x_return_status;
2726: RAISE G_EXCEPTION_HALT_VALIDATION;
2719:
2720: -- Validate_Book_Basis_Percent
2721: Validate_Book_Basis_Percent(p_silv_rec, x_return_status);
2722: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2723: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2724: -- need to exit
2725: l_return_status := x_return_status;
2726: RAISE G_EXCEPTION_HALT_VALIDATION;
2727: ELSE
2731: END IF;
2732:
2733: -- Validate_Date_Book
2734: Validate_Date_Book(p_silv_rec, x_return_status);
2735: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2736: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2737: -- need to exit
2738: l_return_status := x_return_status;
2739: RAISE G_EXCEPTION_HALT_VALIDATION;
2732:
2733: -- Validate_Date_Book
2734: Validate_Date_Book(p_silv_rec, x_return_status);
2735: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2736: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2737: -- need to exit
2738: l_return_status := x_return_status;
2739: RAISE G_EXCEPTION_HALT_VALIDATION;
2740: ELSE
2744: END IF;
2745:
2746: -- Validate_Date_State_Depre
2747: Validate_Date_State_Depre(p_silv_rec, x_return_status);
2748: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2749: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2750: -- need to exit
2751: l_return_status := x_return_status;
2752: RAISE G_EXCEPTION_HALT_VALIDATION;
2745:
2746: -- Validate_Date_State_Depre
2747: Validate_Date_State_Depre(p_silv_rec, x_return_status);
2748: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2749: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2750: -- need to exit
2751: l_return_status := x_return_status;
2752: RAISE G_EXCEPTION_HALT_VALIDATION;
2753: ELSE
2757: END IF;
2758:
2759: -- Validate_Book_Method
2760: Validate_Book_Method(p_silv_rec, x_return_status);
2761: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2762: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2763: -- need to exit
2764: l_return_status := x_return_status;
2765: RAISE G_EXCEPTION_HALT_VALIDATION;
2758:
2759: -- Validate_Book_Method
2760: Validate_Book_Method(p_silv_rec, x_return_status);
2761: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2762: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2763: -- need to exit
2764: l_return_status := x_return_status;
2765: RAISE G_EXCEPTION_HALT_VALIDATION;
2766: ELSE
2773: ELSIF (p_silv_rec.Sil_Type = G_SIL_TYPE_LOAN)
2774: THEN
2775: -- Validate_Date_Lending
2776: Validate_Date_Lending(p_silv_rec, x_return_status);
2777: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2778: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2779: -- need to exit
2780: l_return_status := x_return_status;
2781: RAISE G_EXCEPTION_HALT_VALIDATION;
2774: THEN
2775: -- Validate_Date_Lending
2776: Validate_Date_Lending(p_silv_rec, x_return_status);
2777: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2778: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2779: -- need to exit
2780: l_return_status := x_return_status;
2781: RAISE G_EXCEPTION_HALT_VALIDATION;
2782: ELSE
2794: RETURN (l_return_status);
2795:
2796: WHEN OTHERS THEN
2797: -- store SQL error message on message stack for caller
2798: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
2799: p_msg_name => G_OKL_UNEXPECTED_ERROR,
2800: p_token1 => G_OKL_SQLCODE_TOKEN,
2801: p_token1_value => SQLCODE,
2802: p_token2 => G_OKL_SQLERRM_TOKEN,
2801: p_token1_value => SQLCODE,
2802: p_token2 => G_OKL_SQLERRM_TOKEN,
2803: p_token2_value => SQLERRM);
2804: -- notify caller of an UNEXPECTED error
2805: l_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
2806:
2807: RETURN(l_return_status);
2808: END Validate_Attributes;
2809: -- END change : mvasudev
2816: -----------------------------------------
2817: FUNCTION Validate_Record (
2818: p_silv_rec IN silv_rec_type
2819: ) RETURN VARCHAR2 IS
2820: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2821: BEGIN
2822: RETURN (l_return_status);
2823: END Validate_Record;
2824:
2972: -- validate_row for:OKL_SIF_LINES_V --
2973: --------------------------------------
2974: PROCEDURE validate_row(
2975: p_api_version IN NUMBER,
2976: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2977: x_return_status OUT NOCOPY VARCHAR2,
2978: x_msg_count OUT NOCOPY NUMBER,
2979: x_msg_data OUT NOCOPY VARCHAR2,
2980: p_silv_rec IN silv_rec_type) IS
2980: p_silv_rec IN silv_rec_type) IS
2981:
2982: l_api_version CONSTANT NUMBER := 1;
2983: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
2984: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2985: l_silv_rec silv_rec_type := p_silv_rec;
2986: l_sil_rec sil_rec_type;
2987: BEGIN
2988: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2984: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2985: l_silv_rec silv_rec_type := p_silv_rec;
2986: l_sil_rec sil_rec_type;
2987: BEGIN
2988: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2989: G_PKG_NAME,
2990: p_init_msg_list,
2991: l_api_version,
2992: p_api_version,
2991: l_api_version,
2992: p_api_version,
2993: '_PVT',
2994: x_return_status);
2995: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2996: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2997: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2998: RAISE OKC_API.G_EXCEPTION_ERROR;
2999: END IF;
2992: p_api_version,
2993: '_PVT',
2994: x_return_status);
2995: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2996: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2997: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2998: RAISE OKC_API.G_EXCEPTION_ERROR;
2999: END IF;
3000: --- Validate all non-missing attributes (Item Level Validation)
2993: '_PVT',
2994: x_return_status);
2995: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2996: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2997: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2998: RAISE OKC_API.G_EXCEPTION_ERROR;
2999: END IF;
3000: --- Validate all non-missing attributes (Item Level Validation)
3001: l_return_status := Validate_Attributes(l_silv_rec);
2994: x_return_status);
2995: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2996: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2997: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2998: RAISE OKC_API.G_EXCEPTION_ERROR;
2999: END IF;
3000: --- Validate all non-missing attributes (Item Level Validation)
3001: l_return_status := Validate_Attributes(l_silv_rec);
3002: --- If any errors happen abort API
2999: END IF;
3000: --- Validate all non-missing attributes (Item Level Validation)
3001: l_return_status := Validate_Attributes(l_silv_rec);
3002: --- If any errors happen abort API
3003: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3004: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3005: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3006: RAISE OKC_API.G_EXCEPTION_ERROR;
3007: END IF;
3000: --- Validate all non-missing attributes (Item Level Validation)
3001: l_return_status := Validate_Attributes(l_silv_rec);
3002: --- If any errors happen abort API
3003: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3004: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3005: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3006: RAISE OKC_API.G_EXCEPTION_ERROR;
3007: END IF;
3008: l_return_status := Validate_Record(l_silv_rec);
3001: l_return_status := Validate_Attributes(l_silv_rec);
3002: --- If any errors happen abort API
3003: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3004: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3005: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3006: RAISE OKC_API.G_EXCEPTION_ERROR;
3007: END IF;
3008: l_return_status := Validate_Record(l_silv_rec);
3009: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3002: --- If any errors happen abort API
3003: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3004: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3005: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3006: RAISE OKC_API.G_EXCEPTION_ERROR;
3007: END IF;
3008: l_return_status := Validate_Record(l_silv_rec);
3009: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3010: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3005: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3006: RAISE OKC_API.G_EXCEPTION_ERROR;
3007: END IF;
3008: l_return_status := Validate_Record(l_silv_rec);
3009: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3010: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3011: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3012: RAISE OKC_API.G_EXCEPTION_ERROR;
3013: END IF;
3006: RAISE OKC_API.G_EXCEPTION_ERROR;
3007: END IF;
3008: l_return_status := Validate_Record(l_silv_rec);
3009: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3010: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3011: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3012: RAISE OKC_API.G_EXCEPTION_ERROR;
3013: END IF;
3014: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3007: END IF;
3008: l_return_status := Validate_Record(l_silv_rec);
3009: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3010: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3011: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3012: RAISE OKC_API.G_EXCEPTION_ERROR;
3013: END IF;
3014: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3015: EXCEPTION
3008: l_return_status := Validate_Record(l_silv_rec);
3009: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3010: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3011: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3012: RAISE OKC_API.G_EXCEPTION_ERROR;
3013: END IF;
3014: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3015: EXCEPTION
3016: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3010: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3011: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3012: RAISE OKC_API.G_EXCEPTION_ERROR;
3013: END IF;
3014: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3015: EXCEPTION
3016: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3017: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3018: (
3012: RAISE OKC_API.G_EXCEPTION_ERROR;
3013: END IF;
3014: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3015: EXCEPTION
3016: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3017: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3018: (
3019: l_api_name,
3020: G_PKG_NAME,
3013: END IF;
3014: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3015: EXCEPTION
3016: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3017: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3018: (
3019: l_api_name,
3020: G_PKG_NAME,
3021: 'OKC_API.G_RET_STS_ERROR',
3017: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3018: (
3019: l_api_name,
3020: G_PKG_NAME,
3021: 'OKC_API.G_RET_STS_ERROR',
3022: x_msg_count,
3023: x_msg_data,
3024: '_PVT'
3025: );
3022: x_msg_count,
3023: x_msg_data,
3024: '_PVT'
3025: );
3026: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3027: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3028: (
3029: l_api_name,
3030: G_PKG_NAME,
3023: x_msg_data,
3024: '_PVT'
3025: );
3026: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3027: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3028: (
3029: l_api_name,
3030: G_PKG_NAME,
3031: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3027: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3028: (
3029: l_api_name,
3030: G_PKG_NAME,
3031: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3032: x_msg_count,
3033: x_msg_data,
3034: '_PVT'
3035: );
3033: x_msg_data,
3034: '_PVT'
3035: );
3036: WHEN OTHERS THEN
3037: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3038: (
3039: l_api_name,
3040: G_PKG_NAME,
3041: 'OTHERS',
3048: -- PL/SQL TBL validate_row for:SILV_TBL --
3049: ------------------------------------------
3050: PROCEDURE validate_row(
3051: p_api_version IN NUMBER,
3052: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3053: x_return_status OUT NOCOPY VARCHAR2,
3054: x_msg_count OUT NOCOPY NUMBER,
3055: x_msg_data OUT NOCOPY VARCHAR2,
3056: p_silv_tbl IN silv_tbl_type) IS
3056: p_silv_tbl IN silv_tbl_type) IS
3057:
3058: l_api_version CONSTANT NUMBER := 1;
3059: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
3060: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3061: i NUMBER := 0;
3062: -- START change : mvasudev, 08/15/2001
3063: -- Adding OverAll Status Flag
3064: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3060: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3061: i NUMBER := 0;
3062: -- START change : mvasudev, 08/15/2001
3063: -- Adding OverAll Status Flag
3064: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3065: -- END change : mvasudev
3066:
3067: BEGIN
3068: OKC_API.init_msg_list(p_init_msg_list);
3064: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3065: -- END change : mvasudev
3066:
3067: BEGIN
3068: OKC_API.init_msg_list(p_init_msg_list);
3069: -- Make sure PL/SQL table has records in it before passing
3070: IF (p_silv_tbl.COUNT > 0) THEN
3071: i := p_silv_tbl.FIRST;
3072: LOOP
3071: i := p_silv_tbl.FIRST;
3072: LOOP
3073: validate_row (
3074: p_api_version => p_api_version,
3075: p_init_msg_list => OKC_API.G_FALSE,
3076: x_return_status => x_return_status,
3077: x_msg_count => x_msg_count,
3078: x_msg_data => x_msg_data,
3079: p_silv_rec => p_silv_tbl(i));
3078: x_msg_data => x_msg_data,
3079: p_silv_rec => p_silv_tbl(i));
3080: -- START change : mvasudev, 08/15/2001
3081: -- store the highest degree of error
3082: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
3083: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
3084: l_overall_status := x_return_status;
3085: END IF;
3086: END IF;
3079: p_silv_rec => p_silv_tbl(i));
3080: -- START change : mvasudev, 08/15/2001
3081: -- store the highest degree of error
3082: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
3083: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
3084: l_overall_status := x_return_status;
3085: END IF;
3086: END IF;
3087: -- END change : mvasudev
3093: x_return_status := l_overall_status;
3094: -- END change : mvasudev
3095: END IF;
3096: EXCEPTION
3097: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3098: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3099: (
3100: l_api_name,
3101: G_PKG_NAME,
3094: -- END change : mvasudev
3095: END IF;
3096: EXCEPTION
3097: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3098: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3099: (
3100: l_api_name,
3101: G_PKG_NAME,
3102: 'OKC_API.G_RET_STS_ERROR',
3098: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3099: (
3100: l_api_name,
3101: G_PKG_NAME,
3102: 'OKC_API.G_RET_STS_ERROR',
3103: x_msg_count,
3104: x_msg_data,
3105: '_PVT'
3106: );
3103: x_msg_count,
3104: x_msg_data,
3105: '_PVT'
3106: );
3107: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3108: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3109: (
3110: l_api_name,
3111: G_PKG_NAME,
3104: x_msg_data,
3105: '_PVT'
3106: );
3107: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3108: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3109: (
3110: l_api_name,
3111: G_PKG_NAME,
3112: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3108: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3109: (
3110: l_api_name,
3111: G_PKG_NAME,
3112: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3113: x_msg_count,
3114: x_msg_data,
3115: '_PVT'
3116: );
3114: x_msg_data,
3115: '_PVT'
3116: );
3117: WHEN OTHERS THEN
3118: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3119: (
3120: l_api_name,
3121: G_PKG_NAME,
3122: 'OTHERS',
3132: ----------------------------------
3133: -- insert_row for:OKL_SIF_LINES --
3134: ----------------------------------
3135: PROCEDURE insert_row(
3136: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3137: x_return_status OUT NOCOPY VARCHAR2,
3138: x_msg_count OUT NOCOPY NUMBER,
3139: x_msg_data OUT NOCOPY VARCHAR2,
3140: p_sil_rec IN sil_rec_type,
3141: x_sil_rec OUT NOCOPY sil_rec_type) IS
3142:
3143: l_api_version CONSTANT NUMBER := 1;
3144: l_api_name CONSTANT VARCHAR2(30) := 'LINES_insert_row';
3145: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3146: l_sil_rec sil_rec_type := p_sil_rec;
3147: l_def_sil_rec sil_rec_type;
3148: --------------------------------------
3149: -- Set_Attributes for:OKL_SIF_LINES --
3151: FUNCTION Set_Attributes (
3152: p_sil_rec IN sil_rec_type,
3153: x_sil_rec OUT NOCOPY sil_rec_type
3154: ) RETURN VARCHAR2 IS
3155: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3156: BEGIN
3157: x_sil_rec := p_sil_rec;
3158: RETURN(l_return_status);
3159: END Set_Attributes;
3157: x_sil_rec := p_sil_rec;
3158: RETURN(l_return_status);
3159: END Set_Attributes;
3160: BEGIN
3161: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3162: p_init_msg_list,
3163: '_PVT',
3164: x_return_status);
3165: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3161: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3162: p_init_msg_list,
3163: '_PVT',
3164: x_return_status);
3165: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3166: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3167: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3168: RAISE OKC_API.G_EXCEPTION_ERROR;
3169: END IF;
3162: p_init_msg_list,
3163: '_PVT',
3164: x_return_status);
3165: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3166: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3167: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3168: RAISE OKC_API.G_EXCEPTION_ERROR;
3169: END IF;
3170: --- Setting item attributes
3163: '_PVT',
3164: x_return_status);
3165: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3166: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3167: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3168: RAISE OKC_API.G_EXCEPTION_ERROR;
3169: END IF;
3170: --- Setting item attributes
3171: l_return_status := Set_Attributes(
3164: x_return_status);
3165: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3166: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3167: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3168: RAISE OKC_API.G_EXCEPTION_ERROR;
3169: END IF;
3170: --- Setting item attributes
3171: l_return_status := Set_Attributes(
3172: p_sil_rec, -- IN
3171: l_return_status := Set_Attributes(
3172: p_sil_rec, -- IN
3173: l_sil_rec); -- OUT
3174: --- If any errors happen abort API
3175: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3176: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3177: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3178: RAISE OKC_API.G_EXCEPTION_ERROR;
3179: END IF;
3172: p_sil_rec, -- IN
3173: l_sil_rec); -- OUT
3174: --- If any errors happen abort API
3175: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3176: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3177: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3178: RAISE OKC_API.G_EXCEPTION_ERROR;
3179: END IF;
3180: INSERT INTO OKL_SIF_LINES(
3173: l_sil_rec); -- OUT
3174: --- If any errors happen abort API
3175: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3176: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3177: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3178: RAISE OKC_API.G_EXCEPTION_ERROR;
3179: END IF;
3180: INSERT INTO OKL_SIF_LINES(
3181: id,
3174: --- If any errors happen abort API
3175: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3176: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3177: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3178: RAISE OKC_API.G_EXCEPTION_ERROR;
3179: END IF;
3180: INSERT INTO OKL_SIF_LINES(
3181: id,
3182: STATE_DEPRE_DMNSHING_VALUE_RT,
3306: l_sil_rec.down_payment_amount,
3307: l_sil_rec.capitalize_down_payment_yn);
3308: -- Set OUT values
3309: x_sil_rec := l_sil_rec;
3310: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3311: EXCEPTION
3312: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3313: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3314: (
3308: -- Set OUT values
3309: x_sil_rec := l_sil_rec;
3310: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3311: EXCEPTION
3312: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3313: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3314: (
3315: l_api_name,
3316: G_PKG_NAME,
3309: x_sil_rec := l_sil_rec;
3310: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3311: EXCEPTION
3312: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3313: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3314: (
3315: l_api_name,
3316: G_PKG_NAME,
3317: 'OKC_API.G_RET_STS_ERROR',
3313: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3314: (
3315: l_api_name,
3316: G_PKG_NAME,
3317: 'OKC_API.G_RET_STS_ERROR',
3318: x_msg_count,
3319: x_msg_data,
3320: '_PVT'
3321: );
3318: x_msg_count,
3319: x_msg_data,
3320: '_PVT'
3321: );
3322: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3323: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3324: (
3325: l_api_name,
3326: G_PKG_NAME,
3319: x_msg_data,
3320: '_PVT'
3321: );
3322: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3323: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3324: (
3325: l_api_name,
3326: G_PKG_NAME,
3327: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3323: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3324: (
3325: l_api_name,
3326: G_PKG_NAME,
3327: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3328: x_msg_count,
3329: x_msg_data,
3330: '_PVT'
3331: );
3329: x_msg_data,
3330: '_PVT'
3331: );
3332: WHEN OTHERS THEN
3333: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3334: (
3335: l_api_name,
3336: G_PKG_NAME,
3337: 'OTHERS',
3344: -- insert_row for:OKL_SIF_LINES_V --
3345: ------------------------------------
3346: PROCEDURE insert_row(
3347: p_api_version IN NUMBER,
3348: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3349: x_return_status OUT NOCOPY VARCHAR2,
3350: x_msg_count OUT NOCOPY NUMBER,
3351: x_msg_data OUT NOCOPY VARCHAR2,
3352: p_silv_rec IN silv_rec_type,
3353: x_silv_rec OUT NOCOPY silv_rec_type) IS
3354:
3355: l_api_version CONSTANT NUMBER := 1;
3356: l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
3357: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3358: l_silv_rec silv_rec_type;
3359: l_def_silv_rec silv_rec_type;
3360: l_sil_rec sil_rec_type;
3361: lx_sil_rec sil_rec_type;
3380: FUNCTION Set_Attributes (
3381: p_silv_rec IN silv_rec_type,
3382: x_silv_rec OUT NOCOPY silv_rec_type
3383: ) RETURN VARCHAR2 IS
3384: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3385: BEGIN
3386: x_silv_rec := p_silv_rec;
3387: x_silv_rec.OBJECT_VERSION_NUMBER := 1;
3388: RETURN(l_return_status);
3387: x_silv_rec.OBJECT_VERSION_NUMBER := 1;
3388: RETURN(l_return_status);
3389: END Set_Attributes;
3390: BEGIN
3391: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3392: G_PKG_NAME,
3393: p_init_msg_list,
3394: l_api_version,
3395: p_api_version,
3394: l_api_version,
3395: p_api_version,
3396: '_PVT',
3397: x_return_status);
3398: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3399: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3400: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3401: RAISE OKC_API.G_EXCEPTION_ERROR;
3402: END IF;
3395: p_api_version,
3396: '_PVT',
3397: x_return_status);
3398: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3399: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3400: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3401: RAISE OKC_API.G_EXCEPTION_ERROR;
3402: END IF;
3403: l_silv_rec := null_out_defaults(p_silv_rec);
3396: '_PVT',
3397: x_return_status);
3398: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3399: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3400: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3401: RAISE OKC_API.G_EXCEPTION_ERROR;
3402: END IF;
3403: l_silv_rec := null_out_defaults(p_silv_rec);
3404: -- Set primary key value
3397: x_return_status);
3398: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3399: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3400: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3401: RAISE OKC_API.G_EXCEPTION_ERROR;
3402: END IF;
3403: l_silv_rec := null_out_defaults(p_silv_rec);
3404: -- Set primary key value
3405: l_silv_rec.ID := get_seq_id;
3407: l_return_status := Set_Attributes(
3408: l_silv_rec, -- IN
3409: l_def_silv_rec); -- OUT
3410: --- If any errors happen abort API
3411: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3412: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3413: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3414: RAISE OKC_API.G_EXCEPTION_ERROR;
3415: END IF;
3408: l_silv_rec, -- IN
3409: l_def_silv_rec); -- OUT
3410: --- If any errors happen abort API
3411: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3412: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3413: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3414: RAISE OKC_API.G_EXCEPTION_ERROR;
3415: END IF;
3416: l_def_silv_rec := fill_who_columns(l_def_silv_rec);
3409: l_def_silv_rec); -- OUT
3410: --- If any errors happen abort API
3411: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3412: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3413: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3414: RAISE OKC_API.G_EXCEPTION_ERROR;
3415: END IF;
3416: l_def_silv_rec := fill_who_columns(l_def_silv_rec);
3417: --- Validate all non-missing attributes (Item Level Validation)
3410: --- If any errors happen abort API
3411: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3412: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3413: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3414: RAISE OKC_API.G_EXCEPTION_ERROR;
3415: END IF;
3416: l_def_silv_rec := fill_who_columns(l_def_silv_rec);
3417: --- Validate all non-missing attributes (Item Level Validation)
3418: l_return_status := Validate_Attributes(l_def_silv_rec);
3416: l_def_silv_rec := fill_who_columns(l_def_silv_rec);
3417: --- Validate all non-missing attributes (Item Level Validation)
3418: l_return_status := Validate_Attributes(l_def_silv_rec);
3419: --- If any errors happen abort API
3420: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3421: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3422: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3423: RAISE OKC_API.G_EXCEPTION_ERROR;
3424: END IF;
3417: --- Validate all non-missing attributes (Item Level Validation)
3418: l_return_status := Validate_Attributes(l_def_silv_rec);
3419: --- If any errors happen abort API
3420: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3421: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3422: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3423: RAISE OKC_API.G_EXCEPTION_ERROR;
3424: END IF;
3425: l_return_status := Validate_Record(l_def_silv_rec);
3418: l_return_status := Validate_Attributes(l_def_silv_rec);
3419: --- If any errors happen abort API
3420: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3421: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3422: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3423: RAISE OKC_API.G_EXCEPTION_ERROR;
3424: END IF;
3425: l_return_status := Validate_Record(l_def_silv_rec);
3426: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3419: --- If any errors happen abort API
3420: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3421: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3422: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3423: RAISE OKC_API.G_EXCEPTION_ERROR;
3424: END IF;
3425: l_return_status := Validate_Record(l_def_silv_rec);
3426: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3427: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3422: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3423: RAISE OKC_API.G_EXCEPTION_ERROR;
3424: END IF;
3425: l_return_status := Validate_Record(l_def_silv_rec);
3426: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3427: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3428: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3429: RAISE OKC_API.G_EXCEPTION_ERROR;
3430: END IF;
3423: RAISE OKC_API.G_EXCEPTION_ERROR;
3424: END IF;
3425: l_return_status := Validate_Record(l_def_silv_rec);
3426: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3427: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3428: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3429: RAISE OKC_API.G_EXCEPTION_ERROR;
3430: END IF;
3431: --------------------------------------
3424: END IF;
3425: l_return_status := Validate_Record(l_def_silv_rec);
3426: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3427: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3428: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3429: RAISE OKC_API.G_EXCEPTION_ERROR;
3430: END IF;
3431: --------------------------------------
3432: -- Move VIEW record to "Child" records
3425: l_return_status := Validate_Record(l_def_silv_rec);
3426: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3427: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3428: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3429: RAISE OKC_API.G_EXCEPTION_ERROR;
3430: END IF;
3431: --------------------------------------
3432: -- Move VIEW record to "Child" records
3433: --------------------------------------
3442: x_msg_data,
3443: l_sil_rec,
3444: lx_sil_rec
3445: );
3446: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3447: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3448: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3449: RAISE OKC_API.G_EXCEPTION_ERROR;
3450: END IF;
3443: l_sil_rec,
3444: lx_sil_rec
3445: );
3446: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3447: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3448: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3449: RAISE OKC_API.G_EXCEPTION_ERROR;
3450: END IF;
3451: migrate(lx_sil_rec, l_def_silv_rec);
3444: lx_sil_rec
3445: );
3446: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3447: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3448: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3449: RAISE OKC_API.G_EXCEPTION_ERROR;
3450: END IF;
3451: migrate(lx_sil_rec, l_def_silv_rec);
3452: -- Set OUT values
3445: );
3446: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3447: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3448: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3449: RAISE OKC_API.G_EXCEPTION_ERROR;
3450: END IF;
3451: migrate(lx_sil_rec, l_def_silv_rec);
3452: -- Set OUT values
3453: x_silv_rec := l_def_silv_rec;
3450: END IF;
3451: migrate(lx_sil_rec, l_def_silv_rec);
3452: -- Set OUT values
3453: x_silv_rec := l_def_silv_rec;
3454: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3455: EXCEPTION
3456: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3457: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3458: (
3452: -- Set OUT values
3453: x_silv_rec := l_def_silv_rec;
3454: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3455: EXCEPTION
3456: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3457: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3458: (
3459: l_api_name,
3460: G_PKG_NAME,
3453: x_silv_rec := l_def_silv_rec;
3454: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3455: EXCEPTION
3456: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3457: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3458: (
3459: l_api_name,
3460: G_PKG_NAME,
3461: 'OKC_API.G_RET_STS_ERROR',
3457: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3458: (
3459: l_api_name,
3460: G_PKG_NAME,
3461: 'OKC_API.G_RET_STS_ERROR',
3462: x_msg_count,
3463: x_msg_data,
3464: '_PVT'
3465: );
3462: x_msg_count,
3463: x_msg_data,
3464: '_PVT'
3465: );
3466: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3467: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3468: (
3469: l_api_name,
3470: G_PKG_NAME,
3463: x_msg_data,
3464: '_PVT'
3465: );
3466: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3467: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3468: (
3469: l_api_name,
3470: G_PKG_NAME,
3471: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3467: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3468: (
3469: l_api_name,
3470: G_PKG_NAME,
3471: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3472: x_msg_count,
3473: x_msg_data,
3474: '_PVT'
3475: );
3473: x_msg_data,
3474: '_PVT'
3475: );
3476: WHEN OTHERS THEN
3477: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3478: (
3479: l_api_name,
3480: G_PKG_NAME,
3481: 'OTHERS',
3488: -- PL/SQL TBL insert_row for:SILV_TBL --
3489: ----------------------------------------
3490: PROCEDURE insert_row(
3491: p_api_version IN NUMBER,
3492: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3493: x_return_status OUT NOCOPY VARCHAR2,
3494: x_msg_count OUT NOCOPY NUMBER,
3495: x_msg_data OUT NOCOPY VARCHAR2,
3496: p_silv_tbl IN silv_tbl_type,
3497: x_silv_tbl OUT NOCOPY silv_tbl_type) IS
3498:
3499: l_api_version CONSTANT NUMBER := 1;
3500: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
3501: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3502: i NUMBER := 0;
3503: -- START change : mvasudev, 08/15/2001
3504: -- Adding OverAll Status Flag
3505: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3501: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3502: i NUMBER := 0;
3503: -- START change : mvasudev, 08/15/2001
3504: -- Adding OverAll Status Flag
3505: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3506: -- END change : mvasudev
3507: BEGIN
3508: OKC_API.init_msg_list(p_init_msg_list);
3509: -- Make sure PL/SQL table has records in it before passing
3504: -- Adding OverAll Status Flag
3505: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3506: -- END change : mvasudev
3507: BEGIN
3508: OKC_API.init_msg_list(p_init_msg_list);
3509: -- Make sure PL/SQL table has records in it before passing
3510: IF (p_silv_tbl.COUNT > 0) THEN
3511: i := p_silv_tbl.FIRST;
3512: LOOP
3511: i := p_silv_tbl.FIRST;
3512: LOOP
3513: insert_row (
3514: p_api_version => p_api_version,
3515: p_init_msg_list => OKC_API.G_FALSE,
3516: x_return_status => x_return_status,
3517: x_msg_count => x_msg_count,
3518: x_msg_data => x_msg_data,
3519: p_silv_rec => p_silv_tbl(i),
3519: p_silv_rec => p_silv_tbl(i),
3520: x_silv_rec => x_silv_tbl(i));
3521: -- START change : mvasudev, 08/15/2001
3522: -- store the highest degree of error
3523: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
3524: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
3525: l_overall_status := x_return_status;
3526: END IF;
3527: END IF;
3520: x_silv_rec => x_silv_tbl(i));
3521: -- START change : mvasudev, 08/15/2001
3522: -- store the highest degree of error
3523: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
3524: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
3525: l_overall_status := x_return_status;
3526: END IF;
3527: END IF;
3528: -- END change : mvasudev
3535: x_return_status := l_overall_status;
3536: -- END change : mvasudev
3537: END IF;
3538: EXCEPTION
3539: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3540: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3541: (
3542: l_api_name,
3543: G_PKG_NAME,
3536: -- END change : mvasudev
3537: END IF;
3538: EXCEPTION
3539: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3540: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3541: (
3542: l_api_name,
3543: G_PKG_NAME,
3544: 'OKC_API.G_RET_STS_ERROR',
3540: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3541: (
3542: l_api_name,
3543: G_PKG_NAME,
3544: 'OKC_API.G_RET_STS_ERROR',
3545: x_msg_count,
3546: x_msg_data,
3547: '_PVT'
3548: );
3545: x_msg_count,
3546: x_msg_data,
3547: '_PVT'
3548: );
3549: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3550: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3551: (
3552: l_api_name,
3553: G_PKG_NAME,
3546: x_msg_data,
3547: '_PVT'
3548: );
3549: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3550: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3551: (
3552: l_api_name,
3553: G_PKG_NAME,
3554: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3550: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3551: (
3552: l_api_name,
3553: G_PKG_NAME,
3554: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3555: x_msg_count,
3556: x_msg_data,
3557: '_PVT'
3558: );
3556: x_msg_data,
3557: '_PVT'
3558: );
3559: WHEN OTHERS THEN
3560: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3561: (
3562: l_api_name,
3563: G_PKG_NAME,
3564: 'OTHERS',
3574: --------------------------------
3575: -- lock_row for:OKL_SIF_LINES --
3576: --------------------------------
3577: PROCEDURE lock_row(
3578: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3579: x_return_status OUT NOCOPY VARCHAR2,
3580: x_msg_count OUT NOCOPY NUMBER,
3581: x_msg_data OUT NOCOPY VARCHAR2,
3582: p_sil_rec IN sil_rec_type) IS
3595: FROM OKL_SIF_LINES
3596: WHERE ID = p_sil_rec.id;
3597: l_api_version CONSTANT NUMBER := 1;
3598: l_api_name CONSTANT VARCHAR2(30) := 'LINES_lock_row';
3599: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3600: l_object_version_number OKL_SIF_LINES.OBJECT_VERSION_NUMBER%TYPE;
3601: lc_object_version_number OKL_SIF_LINES.OBJECT_VERSION_NUMBER%TYPE;
3602: l_row_notfound BOOLEAN := FALSE;
3603: lc_row_notfound BOOLEAN := FALSE;
3601: lc_object_version_number OKL_SIF_LINES.OBJECT_VERSION_NUMBER%TYPE;
3602: l_row_notfound BOOLEAN := FALSE;
3603: lc_row_notfound BOOLEAN := FALSE;
3604: BEGIN
3605: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3606: p_init_msg_list,
3607: '_PVT',
3608: x_return_status);
3609: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3605: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3606: p_init_msg_list,
3607: '_PVT',
3608: x_return_status);
3609: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3610: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3611: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3612: RAISE OKC_API.G_EXCEPTION_ERROR;
3613: END IF;
3606: p_init_msg_list,
3607: '_PVT',
3608: x_return_status);
3609: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3610: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3611: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3612: RAISE OKC_API.G_EXCEPTION_ERROR;
3613: END IF;
3614: BEGIN
3607: '_PVT',
3608: x_return_status);
3609: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3610: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3611: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3612: RAISE OKC_API.G_EXCEPTION_ERROR;
3613: END IF;
3614: BEGIN
3615: OPEN lock_csr(p_sil_rec);
3608: x_return_status);
3609: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3610: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3611: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3612: RAISE OKC_API.G_EXCEPTION_ERROR;
3613: END IF;
3614: BEGIN
3615: OPEN lock_csr(p_sil_rec);
3616: FETCH lock_csr INTO l_object_version_number;
3620: WHEN E_Resource_Busy THEN
3621: IF (lock_csr%ISOPEN) THEN
3622: CLOSE lock_csr;
3623: END IF;
3624: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
3625: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
3626: END;
3627:
3628: IF ( l_row_notfound ) THEN
3631: lc_row_notfound := lchk_csr%NOTFOUND;
3632: CLOSE lchk_csr;
3633: END IF;
3634: IF (lc_row_notfound) THEN
3635: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
3636: RAISE OKC_API.G_EXCEPTION_ERROR;
3637: ELSIF lc_object_version_number > p_sil_rec.object_version_number THEN
3638: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3639: RAISE OKC_API.G_EXCEPTION_ERROR;
3632: CLOSE lchk_csr;
3633: END IF;
3634: IF (lc_row_notfound) THEN
3635: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
3636: RAISE OKC_API.G_EXCEPTION_ERROR;
3637: ELSIF lc_object_version_number > p_sil_rec.object_version_number THEN
3638: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3639: RAISE OKC_API.G_EXCEPTION_ERROR;
3640: ELSIF lc_object_version_number <> p_sil_rec.object_version_number THEN
3634: IF (lc_row_notfound) THEN
3635: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
3636: RAISE OKC_API.G_EXCEPTION_ERROR;
3637: ELSIF lc_object_version_number > p_sil_rec.object_version_number THEN
3638: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3639: RAISE OKC_API.G_EXCEPTION_ERROR;
3640: ELSIF lc_object_version_number <> p_sil_rec.object_version_number THEN
3641: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3642: RAISE OKC_API.G_EXCEPTION_ERROR;
3635: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
3636: RAISE OKC_API.G_EXCEPTION_ERROR;
3637: ELSIF lc_object_version_number > p_sil_rec.object_version_number THEN
3638: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3639: RAISE OKC_API.G_EXCEPTION_ERROR;
3640: ELSIF lc_object_version_number <> p_sil_rec.object_version_number THEN
3641: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3642: RAISE OKC_API.G_EXCEPTION_ERROR;
3643: ELSIF lc_object_version_number = -1 THEN
3637: ELSIF lc_object_version_number > p_sil_rec.object_version_number THEN
3638: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3639: RAISE OKC_API.G_EXCEPTION_ERROR;
3640: ELSIF lc_object_version_number <> p_sil_rec.object_version_number THEN
3641: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3642: RAISE OKC_API.G_EXCEPTION_ERROR;
3643: ELSIF lc_object_version_number = -1 THEN
3644: OKC_API.set_message(G_OKC_APP,G_RECORD_LOGICALLY_DELETED);
3645: RAISE OKC_API.G_EXCEPTION_ERROR;
3638: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3639: RAISE OKC_API.G_EXCEPTION_ERROR;
3640: ELSIF lc_object_version_number <> p_sil_rec.object_version_number THEN
3641: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3642: RAISE OKC_API.G_EXCEPTION_ERROR;
3643: ELSIF lc_object_version_number = -1 THEN
3644: OKC_API.set_message(G_OKC_APP,G_RECORD_LOGICALLY_DELETED);
3645: RAISE OKC_API.G_EXCEPTION_ERROR;
3646: END IF;
3640: ELSIF lc_object_version_number <> p_sil_rec.object_version_number THEN
3641: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3642: RAISE OKC_API.G_EXCEPTION_ERROR;
3643: ELSIF lc_object_version_number = -1 THEN
3644: OKC_API.set_message(G_OKC_APP,G_RECORD_LOGICALLY_DELETED);
3645: RAISE OKC_API.G_EXCEPTION_ERROR;
3646: END IF;
3647: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3648: EXCEPTION
3641: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3642: RAISE OKC_API.G_EXCEPTION_ERROR;
3643: ELSIF lc_object_version_number = -1 THEN
3644: OKC_API.set_message(G_OKC_APP,G_RECORD_LOGICALLY_DELETED);
3645: RAISE OKC_API.G_EXCEPTION_ERROR;
3646: END IF;
3647: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3648: EXCEPTION
3649: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3643: ELSIF lc_object_version_number = -1 THEN
3644: OKC_API.set_message(G_OKC_APP,G_RECORD_LOGICALLY_DELETED);
3645: RAISE OKC_API.G_EXCEPTION_ERROR;
3646: END IF;
3647: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3648: EXCEPTION
3649: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3650: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3651: (
3645: RAISE OKC_API.G_EXCEPTION_ERROR;
3646: END IF;
3647: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3648: EXCEPTION
3649: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3650: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3651: (
3652: l_api_name,
3653: G_PKG_NAME,
3646: END IF;
3647: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3648: EXCEPTION
3649: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3650: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3651: (
3652: l_api_name,
3653: G_PKG_NAME,
3654: 'OKC_API.G_RET_STS_ERROR',
3650: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3651: (
3652: l_api_name,
3653: G_PKG_NAME,
3654: 'OKC_API.G_RET_STS_ERROR',
3655: x_msg_count,
3656: x_msg_data,
3657: '_PVT'
3658: );
3655: x_msg_count,
3656: x_msg_data,
3657: '_PVT'
3658: );
3659: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3660: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3661: (
3662: l_api_name,
3663: G_PKG_NAME,
3656: x_msg_data,
3657: '_PVT'
3658: );
3659: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3660: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3661: (
3662: l_api_name,
3663: G_PKG_NAME,
3664: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3660: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3661: (
3662: l_api_name,
3663: G_PKG_NAME,
3664: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3665: x_msg_count,
3666: x_msg_data,
3667: '_PVT'
3668: );
3666: x_msg_data,
3667: '_PVT'
3668: );
3669: WHEN OTHERS THEN
3670: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3671: (
3672: l_api_name,
3673: G_PKG_NAME,
3674: 'OTHERS',
3681: -- lock_row for:OKL_SIF_LINES_V --
3682: ----------------------------------
3683: PROCEDURE lock_row(
3684: p_api_version IN NUMBER,
3685: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3686: x_return_status OUT NOCOPY VARCHAR2,
3687: x_msg_count OUT NOCOPY NUMBER,
3688: x_msg_data OUT NOCOPY VARCHAR2,
3689: p_silv_rec IN silv_rec_type) IS
3689: p_silv_rec IN silv_rec_type) IS
3690:
3691: l_api_version CONSTANT NUMBER := 1;
3692: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
3693: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3694: l_sil_rec sil_rec_type;
3695: BEGIN
3696: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3697: G_PKG_NAME,
3692: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
3693: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3694: l_sil_rec sil_rec_type;
3695: BEGIN
3696: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3697: G_PKG_NAME,
3698: p_init_msg_list,
3699: l_api_version,
3700: p_api_version,
3699: l_api_version,
3700: p_api_version,
3701: '_PVT',
3702: x_return_status);
3703: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3704: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3705: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3706: RAISE OKC_API.G_EXCEPTION_ERROR;
3707: END IF;
3700: p_api_version,
3701: '_PVT',
3702: x_return_status);
3703: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3704: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3705: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3706: RAISE OKC_API.G_EXCEPTION_ERROR;
3707: END IF;
3708: --------------------------------------
3701: '_PVT',
3702: x_return_status);
3703: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3704: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3705: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3706: RAISE OKC_API.G_EXCEPTION_ERROR;
3707: END IF;
3708: --------------------------------------
3709: -- Move VIEW record to "Child" records
3702: x_return_status);
3703: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3704: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3705: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3706: RAISE OKC_API.G_EXCEPTION_ERROR;
3707: END IF;
3708: --------------------------------------
3709: -- Move VIEW record to "Child" records
3710: --------------------------------------
3718: x_msg_count,
3719: x_msg_data,
3720: l_sil_rec
3721: );
3722: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3723: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3724: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3725: RAISE OKC_API.G_EXCEPTION_ERROR;
3726: END IF;
3719: x_msg_data,
3720: l_sil_rec
3721: );
3722: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3723: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3724: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3725: RAISE OKC_API.G_EXCEPTION_ERROR;
3726: END IF;
3727: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3720: l_sil_rec
3721: );
3722: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3723: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3724: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3725: RAISE OKC_API.G_EXCEPTION_ERROR;
3726: END IF;
3727: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3728: EXCEPTION
3721: );
3722: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3723: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3724: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3725: RAISE OKC_API.G_EXCEPTION_ERROR;
3726: END IF;
3727: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3728: EXCEPTION
3729: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3723: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3724: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3725: RAISE OKC_API.G_EXCEPTION_ERROR;
3726: END IF;
3727: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3728: EXCEPTION
3729: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3730: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3731: (
3725: RAISE OKC_API.G_EXCEPTION_ERROR;
3726: END IF;
3727: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3728: EXCEPTION
3729: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3730: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3731: (
3732: l_api_name,
3733: G_PKG_NAME,
3726: END IF;
3727: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3728: EXCEPTION
3729: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3730: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3731: (
3732: l_api_name,
3733: G_PKG_NAME,
3734: 'OKC_API.G_RET_STS_ERROR',
3730: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3731: (
3732: l_api_name,
3733: G_PKG_NAME,
3734: 'OKC_API.G_RET_STS_ERROR',
3735: x_msg_count,
3736: x_msg_data,
3737: '_PVT'
3738: );
3735: x_msg_count,
3736: x_msg_data,
3737: '_PVT'
3738: );
3739: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3740: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3741: (
3742: l_api_name,
3743: G_PKG_NAME,
3736: x_msg_data,
3737: '_PVT'
3738: );
3739: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3740: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3741: (
3742: l_api_name,
3743: G_PKG_NAME,
3744: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3740: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3741: (
3742: l_api_name,
3743: G_PKG_NAME,
3744: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3745: x_msg_count,
3746: x_msg_data,
3747: '_PVT'
3748: );
3746: x_msg_data,
3747: '_PVT'
3748: );
3749: WHEN OTHERS THEN
3750: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3751: (
3752: l_api_name,
3753: G_PKG_NAME,
3754: 'OTHERS',
3761: -- PL/SQL TBL lock_row for:SILV_TBL --
3762: --------------------------------------
3763: PROCEDURE lock_row(
3764: p_api_version IN NUMBER,
3765: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3766: x_return_status OUT NOCOPY VARCHAR2,
3767: x_msg_count OUT NOCOPY NUMBER,
3768: x_msg_data OUT NOCOPY VARCHAR2,
3769: p_silv_tbl IN silv_tbl_type) IS
3769: p_silv_tbl IN silv_tbl_type) IS
3770:
3771: l_api_version CONSTANT NUMBER := 1;
3772: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
3773: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3774: i NUMBER := 0;
3775: -- START change : mvasudev, 08/15/2001
3776: -- Adding OverAll Status Flag
3777: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3773: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3774: i NUMBER := 0;
3775: -- START change : mvasudev, 08/15/2001
3776: -- Adding OverAll Status Flag
3777: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3778: -- END change : mvasudev
3779: BEGIN
3780: OKC_API.init_msg_list(p_init_msg_list);
3781: -- Make sure PL/SQL table has records in it before passing
3776: -- Adding OverAll Status Flag
3777: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3778: -- END change : mvasudev
3779: BEGIN
3780: OKC_API.init_msg_list(p_init_msg_list);
3781: -- Make sure PL/SQL table has records in it before passing
3782: IF (p_silv_tbl.COUNT > 0) THEN
3783: i := p_silv_tbl.FIRST;
3784: LOOP
3783: i := p_silv_tbl.FIRST;
3784: LOOP
3785: lock_row (
3786: p_api_version => p_api_version,
3787: p_init_msg_list => OKC_API.G_FALSE,
3788: x_return_status => x_return_status,
3789: x_msg_count => x_msg_count,
3790: x_msg_data => x_msg_data,
3791: p_silv_rec => p_silv_tbl(i));
3790: x_msg_data => x_msg_data,
3791: p_silv_rec => p_silv_tbl(i));
3792: -- START change : mvasudev, 08/15/2001
3793: -- store the highest degree of error
3794: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
3795: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
3796: l_overall_status := x_return_status;
3797: END IF;
3798: END IF;
3791: p_silv_rec => p_silv_tbl(i));
3792: -- START change : mvasudev, 08/15/2001
3793: -- store the highest degree of error
3794: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
3795: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
3796: l_overall_status := x_return_status;
3797: END IF;
3798: END IF;
3799: -- END change : mvasudev
3805: -- END change : mvasudev
3806: END LOOP;
3807: END IF;
3808: EXCEPTION
3809: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3810: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3811: (
3812: l_api_name,
3813: G_PKG_NAME,
3806: END LOOP;
3807: END IF;
3808: EXCEPTION
3809: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3810: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3811: (
3812: l_api_name,
3813: G_PKG_NAME,
3814: 'OKC_API.G_RET_STS_ERROR',
3810: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3811: (
3812: l_api_name,
3813: G_PKG_NAME,
3814: 'OKC_API.G_RET_STS_ERROR',
3815: x_msg_count,
3816: x_msg_data,
3817: '_PVT'
3818: );
3815: x_msg_count,
3816: x_msg_data,
3817: '_PVT'
3818: );
3819: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3820: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3821: (
3822: l_api_name,
3823: G_PKG_NAME,
3816: x_msg_data,
3817: '_PVT'
3818: );
3819: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3820: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3821: (
3822: l_api_name,
3823: G_PKG_NAME,
3824: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3820: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3821: (
3822: l_api_name,
3823: G_PKG_NAME,
3824: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3825: x_msg_count,
3826: x_msg_data,
3827: '_PVT'
3828: );
3826: x_msg_data,
3827: '_PVT'
3828: );
3829: WHEN OTHERS THEN
3830: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3831: (
3832: l_api_name,
3833: G_PKG_NAME,
3834: 'OTHERS',
3844: ----------------------------------
3845: -- update_row for:OKL_SIF_LINES --
3846: ----------------------------------
3847: PROCEDURE update_row(
3848: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3849: x_return_status OUT NOCOPY VARCHAR2,
3850: x_msg_count OUT NOCOPY NUMBER,
3851: x_msg_data OUT NOCOPY VARCHAR2,
3852: p_sil_rec IN sil_rec_type,
3853: x_sil_rec OUT NOCOPY sil_rec_type) IS
3854:
3855: l_api_version CONSTANT NUMBER := 1;
3856: l_api_name CONSTANT VARCHAR2(30) := 'LINES_update_row';
3857: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3858: l_sil_rec sil_rec_type := p_sil_rec;
3859: l_def_sil_rec sil_rec_type;
3860: l_row_notfound BOOLEAN := TRUE;
3861: ----------------------------------
3866: x_sil_rec OUT NOCOPY sil_rec_type
3867: ) RETURN VARCHAR2 IS
3868: l_sil_rec sil_rec_type;
3869: l_row_notfound BOOLEAN := TRUE;
3870: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3871: BEGIN
3872: x_sil_rec := p_sil_rec;
3873: -- Get current database values
3874: l_sil_rec := get_rec(p_sil_rec, l_row_notfound);
3872: x_sil_rec := p_sil_rec;
3873: -- Get current database values
3874: l_sil_rec := get_rec(p_sil_rec, l_row_notfound);
3875: IF (l_row_notfound) THEN
3876: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3877: END IF;
3878: IF (x_sil_rec.id = OKC_API.G_MISS_NUM)
3879: THEN
3880: x_sil_rec.id := l_sil_rec.id;
3874: l_sil_rec := get_rec(p_sil_rec, l_row_notfound);
3875: IF (l_row_notfound) THEN
3876: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3877: END IF;
3878: IF (x_sil_rec.id = OKC_API.G_MISS_NUM)
3879: THEN
3880: x_sil_rec.id := l_sil_rec.id;
3881: END IF;
3882: IF (x_sil_rec.STATE_DEPRE_DMNSHING_VALUE_RT = OKC_API.G_MISS_NUM)
3878: IF (x_sil_rec.id = OKC_API.G_MISS_NUM)
3879: THEN
3880: x_sil_rec.id := l_sil_rec.id;
3881: END IF;
3882: IF (x_sil_rec.STATE_DEPRE_DMNSHING_VALUE_RT = OKC_API.G_MISS_NUM)
3883: THEN
3884: x_sil_rec.STATE_DEPRE_DMNSHING_VALUE_RT := l_sil_rec.STATE_DEPRE_DMNSHING_VALUE_RT;
3885: END IF;
3886: IF (x_sil_rec.BOOK_DEPRE_DMNSHING_VALUE_RT = OKC_API.G_MISS_NUM)
3882: IF (x_sil_rec.STATE_DEPRE_DMNSHING_VALUE_RT = OKC_API.G_MISS_NUM)
3883: THEN
3884: x_sil_rec.STATE_DEPRE_DMNSHING_VALUE_RT := l_sil_rec.STATE_DEPRE_DMNSHING_VALUE_RT;
3885: END IF;
3886: IF (x_sil_rec.BOOK_DEPRE_DMNSHING_VALUE_RT = OKC_API.G_MISS_NUM)
3887: THEN
3888: x_sil_rec.BOOK_DEPRE_DMNSHING_VALUE_RT := l_sil_rec.BOOK_DEPRE_DMNSHING_VALUE_RT;
3889: END IF;
3890: IF (x_sil_rec.residual_guarantee_method = OKC_API.G_MISS_CHAR)
3886: IF (x_sil_rec.BOOK_DEPRE_DMNSHING_VALUE_RT = OKC_API.G_MISS_NUM)
3887: THEN
3888: x_sil_rec.BOOK_DEPRE_DMNSHING_VALUE_RT := l_sil_rec.BOOK_DEPRE_DMNSHING_VALUE_RT;
3889: END IF;
3890: IF (x_sil_rec.residual_guarantee_method = OKC_API.G_MISS_CHAR)
3891: THEN
3892: x_sil_rec.residual_guarantee_method := l_sil_rec.residual_guarantee_method;
3893: END IF;
3894: -- mvasudev , 05/13/2002
3891: THEN
3892: x_sil_rec.residual_guarantee_method := l_sil_rec.residual_guarantee_method;
3893: END IF;
3894: -- mvasudev , 05/13/2002
3895: IF (x_sil_rec.residual_guarantee_type = OKC_API.G_MISS_CHAR)
3896: THEN
3897: x_sil_rec.residual_guarantee_type := l_sil_rec.residual_guarantee_type;
3898: END IF;
3899: IF (x_sil_rec.residual_date = OKC_API.G_MISS_DATE)
3895: IF (x_sil_rec.residual_guarantee_type = OKC_API.G_MISS_CHAR)
3896: THEN
3897: x_sil_rec.residual_guarantee_type := l_sil_rec.residual_guarantee_type;
3898: END IF;
3899: IF (x_sil_rec.residual_date = OKC_API.G_MISS_DATE)
3900: THEN
3901: x_sil_rec.residual_date := l_sil_rec.residual_date;
3902: END IF;
3903: IF (x_sil_rec.fed_depre_term = OKC_API.G_MISS_NUM)
3899: IF (x_sil_rec.residual_date = OKC_API.G_MISS_DATE)
3900: THEN
3901: x_sil_rec.residual_date := l_sil_rec.residual_date;
3902: END IF;
3903: IF (x_sil_rec.fed_depre_term = OKC_API.G_MISS_NUM)
3904: THEN
3905: x_sil_rec.fed_depre_term := l_sil_rec.fed_depre_term;
3906: END IF;
3907: IF (x_sil_rec.fed_depre_dmnshing_value_rate = OKC_API.G_MISS_NUM)
3903: IF (x_sil_rec.fed_depre_term = OKC_API.G_MISS_NUM)
3904: THEN
3905: x_sil_rec.fed_depre_term := l_sil_rec.fed_depre_term;
3906: END IF;
3907: IF (x_sil_rec.fed_depre_dmnshing_value_rate = OKC_API.G_MISS_NUM)
3908: THEN
3909: x_sil_rec.fed_depre_dmnshing_value_rate := l_sil_rec.fed_depre_dmnshing_value_rate;
3910: END IF;
3911: IF (x_sil_rec.fed_depre_adr_conve = OKC_API.G_MISS_CHAR)
3907: IF (x_sil_rec.fed_depre_dmnshing_value_rate = OKC_API.G_MISS_NUM)
3908: THEN
3909: x_sil_rec.fed_depre_dmnshing_value_rate := l_sil_rec.fed_depre_dmnshing_value_rate;
3910: END IF;
3911: IF (x_sil_rec.fed_depre_adr_conve = OKC_API.G_MISS_CHAR)
3912: THEN
3913: x_sil_rec.fed_depre_adr_conve := l_sil_rec.fed_depre_adr_conve;
3914: END IF;
3915: IF (x_sil_rec.state_depre_basis_percent = OKC_API.G_MISS_NUM)
3911: IF (x_sil_rec.fed_depre_adr_conve = OKC_API.G_MISS_CHAR)
3912: THEN
3913: x_sil_rec.fed_depre_adr_conve := l_sil_rec.fed_depre_adr_conve;
3914: END IF;
3915: IF (x_sil_rec.state_depre_basis_percent = OKC_API.G_MISS_NUM)
3916: THEN
3917: x_sil_rec.state_depre_basis_percent := l_sil_rec.state_depre_basis_percent;
3918: END IF;
3919: IF (x_sil_rec.state_depre_method = OKC_API.G_MISS_CHAR)
3915: IF (x_sil_rec.state_depre_basis_percent = OKC_API.G_MISS_NUM)
3916: THEN
3917: x_sil_rec.state_depre_basis_percent := l_sil_rec.state_depre_basis_percent;
3918: END IF;
3919: IF (x_sil_rec.state_depre_method = OKC_API.G_MISS_CHAR)
3920: THEN
3921: x_sil_rec.state_depre_method := l_sil_rec.state_depre_method;
3922: END IF;
3923: IF (x_sil_rec.purchase_option = OKC_API.G_MISS_CHAR)
3919: IF (x_sil_rec.state_depre_method = OKC_API.G_MISS_CHAR)
3920: THEN
3921: x_sil_rec.state_depre_method := l_sil_rec.state_depre_method;
3922: END IF;
3923: IF (x_sil_rec.purchase_option = OKC_API.G_MISS_CHAR)
3924: THEN
3925: x_sil_rec.purchase_option := l_sil_rec.purchase_option;
3926: END IF;
3927: IF (x_sil_rec.purchase_option_amount = OKC_API.G_MISS_NUM)
3923: IF (x_sil_rec.purchase_option = OKC_API.G_MISS_CHAR)
3924: THEN
3925: x_sil_rec.purchase_option := l_sil_rec.purchase_option;
3926: END IF;
3927: IF (x_sil_rec.purchase_option_amount = OKC_API.G_MISS_NUM)
3928: THEN
3929: x_sil_rec.purchase_option_amount := l_sil_rec.purchase_option_amount;
3930: END IF;
3931: IF (x_sil_rec.asset_cost = OKC_API.G_MISS_NUM)
3927: IF (x_sil_rec.purchase_option_amount = OKC_API.G_MISS_NUM)
3928: THEN
3929: x_sil_rec.purchase_option_amount := l_sil_rec.purchase_option_amount;
3930: END IF;
3931: IF (x_sil_rec.asset_cost = OKC_API.G_MISS_NUM)
3932: THEN
3933: x_sil_rec.asset_cost := l_sil_rec.asset_cost;
3934: END IF;
3935: IF (x_sil_rec.state_depre_term = OKC_API.G_MISS_NUM)
3931: IF (x_sil_rec.asset_cost = OKC_API.G_MISS_NUM)
3932: THEN
3933: x_sil_rec.asset_cost := l_sil_rec.asset_cost;
3934: END IF;
3935: IF (x_sil_rec.state_depre_term = OKC_API.G_MISS_NUM)
3936: THEN
3937: x_sil_rec.state_depre_term := l_sil_rec.state_depre_term;
3938: END IF;
3939: IF (x_sil_rec.state_depre_adr_convent = OKC_API.G_MISS_CHAR)
3935: IF (x_sil_rec.state_depre_term = OKC_API.G_MISS_NUM)
3936: THEN
3937: x_sil_rec.state_depre_term := l_sil_rec.state_depre_term;
3938: END IF;
3939: IF (x_sil_rec.state_depre_adr_convent = OKC_API.G_MISS_CHAR)
3940: THEN
3941: x_sil_rec.state_depre_adr_convent := l_sil_rec.state_depre_adr_convent;
3942: END IF;
3943: IF (x_sil_rec.fed_depre_method = OKC_API.G_MISS_CHAR)
3939: IF (x_sil_rec.state_depre_adr_convent = OKC_API.G_MISS_CHAR)
3940: THEN
3941: x_sil_rec.state_depre_adr_convent := l_sil_rec.state_depre_adr_convent;
3942: END IF;
3943: IF (x_sil_rec.fed_depre_method = OKC_API.G_MISS_CHAR)
3944: THEN
3945: x_sil_rec.fed_depre_method := l_sil_rec.fed_depre_method;
3946: END IF;
3947: IF (x_sil_rec.residual_amount = OKC_API.G_MISS_NUM)
3943: IF (x_sil_rec.fed_depre_method = OKC_API.G_MISS_CHAR)
3944: THEN
3945: x_sil_rec.fed_depre_method := l_sil_rec.fed_depre_method;
3946: END IF;
3947: IF (x_sil_rec.residual_amount = OKC_API.G_MISS_NUM)
3948: THEN
3949: x_sil_rec.residual_amount := l_sil_rec.residual_amount;
3950: END IF;
3951: IF (x_sil_rec.fed_depre_salvage = OKC_API.G_MISS_NUM)
3947: IF (x_sil_rec.residual_amount = OKC_API.G_MISS_NUM)
3948: THEN
3949: x_sil_rec.residual_amount := l_sil_rec.residual_amount;
3950: END IF;
3951: IF (x_sil_rec.fed_depre_salvage = OKC_API.G_MISS_NUM)
3952: THEN
3953: x_sil_rec.fed_depre_salvage := l_sil_rec.fed_depre_salvage;
3954: END IF;
3955: IF (x_sil_rec.date_fed_depre = OKC_API.G_MISS_DATE)
3951: IF (x_sil_rec.fed_depre_salvage = OKC_API.G_MISS_NUM)
3952: THEN
3953: x_sil_rec.fed_depre_salvage := l_sil_rec.fed_depre_salvage;
3954: END IF;
3955: IF (x_sil_rec.date_fed_depre = OKC_API.G_MISS_DATE)
3956: THEN
3957: x_sil_rec.date_fed_depre := l_sil_rec.date_fed_depre;
3958: END IF;
3959: IF (x_sil_rec.book_salvage = OKC_API.G_MISS_NUM)
3955: IF (x_sil_rec.date_fed_depre = OKC_API.G_MISS_DATE)
3956: THEN
3957: x_sil_rec.date_fed_depre := l_sil_rec.date_fed_depre;
3958: END IF;
3959: IF (x_sil_rec.book_salvage = OKC_API.G_MISS_NUM)
3960: THEN
3961: x_sil_rec.book_salvage := l_sil_rec.book_salvage;
3962: END IF;
3963: IF (x_sil_rec.book_adr_convention = OKC_API.G_MISS_CHAR)
3959: IF (x_sil_rec.book_salvage = OKC_API.G_MISS_NUM)
3960: THEN
3961: x_sil_rec.book_salvage := l_sil_rec.book_salvage;
3962: END IF;
3963: IF (x_sil_rec.book_adr_convention = OKC_API.G_MISS_CHAR)
3964: THEN
3965: x_sil_rec.book_adr_convention := l_sil_rec.book_adr_convention;
3966: END IF;
3967: IF (x_sil_rec.state_depre_salvage = OKC_API.G_MISS_NUM)
3963: IF (x_sil_rec.book_adr_convention = OKC_API.G_MISS_CHAR)
3964: THEN
3965: x_sil_rec.book_adr_convention := l_sil_rec.book_adr_convention;
3966: END IF;
3967: IF (x_sil_rec.state_depre_salvage = OKC_API.G_MISS_NUM)
3968: THEN
3969: x_sil_rec.state_depre_salvage := l_sil_rec.state_depre_salvage;
3970: END IF;
3971: IF (x_sil_rec.fed_depre_basis_percent = OKC_API.G_MISS_NUM)
3967: IF (x_sil_rec.state_depre_salvage = OKC_API.G_MISS_NUM)
3968: THEN
3969: x_sil_rec.state_depre_salvage := l_sil_rec.state_depre_salvage;
3970: END IF;
3971: IF (x_sil_rec.fed_depre_basis_percent = OKC_API.G_MISS_NUM)
3972: THEN
3973: x_sil_rec.fed_depre_basis_percent := l_sil_rec.fed_depre_basis_percent;
3974: END IF;
3975: IF (x_sil_rec.book_basis_percent = OKC_API.G_MISS_NUM)
3971: IF (x_sil_rec.fed_depre_basis_percent = OKC_API.G_MISS_NUM)
3972: THEN
3973: x_sil_rec.fed_depre_basis_percent := l_sil_rec.fed_depre_basis_percent;
3974: END IF;
3975: IF (x_sil_rec.book_basis_percent = OKC_API.G_MISS_NUM)
3976: THEN
3977: x_sil_rec.book_basis_percent := l_sil_rec.book_basis_percent;
3978: END IF;
3979: IF (x_sil_rec.date_delivery = OKC_API.G_MISS_DATE)
3975: IF (x_sil_rec.book_basis_percent = OKC_API.G_MISS_NUM)
3976: THEN
3977: x_sil_rec.book_basis_percent := l_sil_rec.book_basis_percent;
3978: END IF;
3979: IF (x_sil_rec.date_delivery = OKC_API.G_MISS_DATE)
3980: THEN
3981: x_sil_rec.date_delivery := l_sil_rec.date_delivery;
3982: END IF;
3983: IF (x_sil_rec.book_term = OKC_API.G_MISS_NUM)
3979: IF (x_sil_rec.date_delivery = OKC_API.G_MISS_DATE)
3980: THEN
3981: x_sil_rec.date_delivery := l_sil_rec.date_delivery;
3982: END IF;
3983: IF (x_sil_rec.book_term = OKC_API.G_MISS_NUM)
3984: THEN
3985: x_sil_rec.book_term := l_sil_rec.book_term;
3986: END IF;
3987: IF (x_sil_rec.residual_guarantee_amount = OKC_API.G_MISS_NUM)
3983: IF (x_sil_rec.book_term = OKC_API.G_MISS_NUM)
3984: THEN
3985: x_sil_rec.book_term := l_sil_rec.book_term;
3986: END IF;
3987: IF (x_sil_rec.residual_guarantee_amount = OKC_API.G_MISS_NUM)
3988: THEN
3989: x_sil_rec.residual_guarantee_amount := l_sil_rec.residual_guarantee_amount;
3990: END IF;
3991: IF (x_sil_rec.date_funding = OKC_API.G_MISS_DATE)
3987: IF (x_sil_rec.residual_guarantee_amount = OKC_API.G_MISS_NUM)
3988: THEN
3989: x_sil_rec.residual_guarantee_amount := l_sil_rec.residual_guarantee_amount;
3990: END IF;
3991: IF (x_sil_rec.date_funding = OKC_API.G_MISS_DATE)
3992: THEN
3993: x_sil_rec.date_funding := l_sil_rec.date_funding;
3994: END IF;
3995: IF (x_sil_rec.date_book = OKC_API.G_MISS_DATE)
3991: IF (x_sil_rec.date_funding = OKC_API.G_MISS_DATE)
3992: THEN
3993: x_sil_rec.date_funding := l_sil_rec.date_funding;
3994: END IF;
3995: IF (x_sil_rec.date_book = OKC_API.G_MISS_DATE)
3996: THEN
3997: x_sil_rec.date_book := l_sil_rec.date_book;
3998: END IF;
3999: IF (x_sil_rec.date_state_depre = OKC_API.G_MISS_DATE)
3995: IF (x_sil_rec.date_book = OKC_API.G_MISS_DATE)
3996: THEN
3997: x_sil_rec.date_book := l_sil_rec.date_book;
3998: END IF;
3999: IF (x_sil_rec.date_state_depre = OKC_API.G_MISS_DATE)
4000: THEN
4001: x_sil_rec.date_state_depre := l_sil_rec.date_state_depre;
4002: END IF;
4003: IF (x_sil_rec.book_method = OKC_API.G_MISS_CHAR)
3999: IF (x_sil_rec.date_state_depre = OKC_API.G_MISS_DATE)
4000: THEN
4001: x_sil_rec.date_state_depre := l_sil_rec.date_state_depre;
4002: END IF;
4003: IF (x_sil_rec.book_method = OKC_API.G_MISS_CHAR)
4004: THEN
4005: x_sil_rec.book_method := l_sil_rec.book_method;
4006: END IF;
4007: IF (x_sil_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR)
4003: IF (x_sil_rec.book_method = OKC_API.G_MISS_CHAR)
4004: THEN
4005: x_sil_rec.book_method := l_sil_rec.book_method;
4006: END IF;
4007: IF (x_sil_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR)
4008: THEN
4009: x_sil_rec.stream_interface_attribute08 := l_sil_rec.stream_interface_attribute08;
4010: END IF;
4011: IF (x_sil_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR)
4007: IF (x_sil_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR)
4008: THEN
4009: x_sil_rec.stream_interface_attribute08 := l_sil_rec.stream_interface_attribute08;
4010: END IF;
4011: IF (x_sil_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR)
4012: THEN
4013: x_sil_rec.stream_interface_attribute03 := l_sil_rec.stream_interface_attribute03;
4014: END IF;
4015: IF (x_sil_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR)
4011: IF (x_sil_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR)
4012: THEN
4013: x_sil_rec.stream_interface_attribute03 := l_sil_rec.stream_interface_attribute03;
4014: END IF;
4015: IF (x_sil_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR)
4016: THEN
4017: x_sil_rec.stream_interface_attribute01 := l_sil_rec.stream_interface_attribute01;
4018: END IF;
4019: IF (x_sil_rec.index_number = OKC_API.G_MISS_NUM)
4015: IF (x_sil_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR)
4016: THEN
4017: x_sil_rec.stream_interface_attribute01 := l_sil_rec.stream_interface_attribute01;
4018: END IF;
4019: IF (x_sil_rec.index_number = OKC_API.G_MISS_NUM)
4020: THEN
4021: x_sil_rec.index_number := l_sil_rec.index_number;
4022: END IF;
4023: IF (x_sil_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR)
4019: IF (x_sil_rec.index_number = OKC_API.G_MISS_NUM)
4020: THEN
4021: x_sil_rec.index_number := l_sil_rec.index_number;
4022: END IF;
4023: IF (x_sil_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR)
4024: THEN
4025: x_sil_rec.stream_interface_attribute05 := l_sil_rec.stream_interface_attribute05;
4026: END IF;
4027: IF (x_sil_rec.description = OKC_API.G_MISS_CHAR)
4023: IF (x_sil_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR)
4024: THEN
4025: x_sil_rec.stream_interface_attribute05 := l_sil_rec.stream_interface_attribute05;
4026: END IF;
4027: IF (x_sil_rec.description = OKC_API.G_MISS_CHAR)
4028: THEN
4029: x_sil_rec.description := l_sil_rec.description;
4030: END IF;
4031: IF (x_sil_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR)
4027: IF (x_sil_rec.description = OKC_API.G_MISS_CHAR)
4028: THEN
4029: x_sil_rec.description := l_sil_rec.description;
4030: END IF;
4031: IF (x_sil_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR)
4032: THEN
4033: x_sil_rec.stream_interface_attribute10 := l_sil_rec.stream_interface_attribute10;
4034: END IF;
4035: IF (x_sil_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR)
4031: IF (x_sil_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR)
4032: THEN
4033: x_sil_rec.stream_interface_attribute10 := l_sil_rec.stream_interface_attribute10;
4034: END IF;
4035: IF (x_sil_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR)
4036: THEN
4037: x_sil_rec.stream_interface_attribute06 := l_sil_rec.stream_interface_attribute06;
4038: END IF;
4039: IF (x_sil_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR)
4035: IF (x_sil_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR)
4036: THEN
4037: x_sil_rec.stream_interface_attribute06 := l_sil_rec.stream_interface_attribute06;
4038: END IF;
4039: IF (x_sil_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR)
4040: THEN
4041: x_sil_rec.stream_interface_attribute09 := l_sil_rec.stream_interface_attribute09;
4042: END IF;
4043: IF (x_sil_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR)
4039: IF (x_sil_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR)
4040: THEN
4041: x_sil_rec.stream_interface_attribute09 := l_sil_rec.stream_interface_attribute09;
4042: END IF;
4043: IF (x_sil_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR)
4044: THEN
4045: x_sil_rec.stream_interface_attribute07 := l_sil_rec.stream_interface_attribute07;
4046: END IF;
4047: IF (x_sil_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR)
4043: IF (x_sil_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR)
4044: THEN
4045: x_sil_rec.stream_interface_attribute07 := l_sil_rec.stream_interface_attribute07;
4046: END IF;
4047: IF (x_sil_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR)
4048: THEN
4049: x_sil_rec.stream_interface_attribute14 := l_sil_rec.stream_interface_attribute14;
4050: END IF;
4051: IF (x_sil_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR)
4047: IF (x_sil_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR)
4048: THEN
4049: x_sil_rec.stream_interface_attribute14 := l_sil_rec.stream_interface_attribute14;
4050: END IF;
4051: IF (x_sil_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR)
4052: THEN
4053: x_sil_rec.stream_interface_attribute12 := l_sil_rec.stream_interface_attribute12;
4054: END IF;
4055: IF (x_sil_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR)
4051: IF (x_sil_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR)
4052: THEN
4053: x_sil_rec.stream_interface_attribute12 := l_sil_rec.stream_interface_attribute12;
4054: END IF;
4055: IF (x_sil_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR)
4056: THEN
4057: x_sil_rec.stream_interface_attribute15 := l_sil_rec.stream_interface_attribute15;
4058: END IF;
4059: IF (x_sil_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR)
4055: IF (x_sil_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR)
4056: THEN
4057: x_sil_rec.stream_interface_attribute15 := l_sil_rec.stream_interface_attribute15;
4058: END IF;
4059: IF (x_sil_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR)
4060: THEN
4061: x_sil_rec.stream_interface_attribute02 := l_sil_rec.stream_interface_attribute02;
4062: END IF;
4063: IF (x_sil_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR)
4059: IF (x_sil_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR)
4060: THEN
4061: x_sil_rec.stream_interface_attribute02 := l_sil_rec.stream_interface_attribute02;
4062: END IF;
4063: IF (x_sil_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR)
4064: THEN
4065: x_sil_rec.stream_interface_attribute11 := l_sil_rec.stream_interface_attribute11;
4066: END IF;
4067: IF (x_sil_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR)
4063: IF (x_sil_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR)
4064: THEN
4065: x_sil_rec.stream_interface_attribute11 := l_sil_rec.stream_interface_attribute11;
4066: END IF;
4067: IF (x_sil_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR)
4068: THEN
4069: x_sil_rec.stream_interface_attribute04 := l_sil_rec.stream_interface_attribute04;
4070: END IF;
4071: IF (x_sil_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR)
4067: IF (x_sil_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR)
4068: THEN
4069: x_sil_rec.stream_interface_attribute04 := l_sil_rec.stream_interface_attribute04;
4070: END IF;
4071: IF (x_sil_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR)
4072: THEN
4073: x_sil_rec.stream_interface_attribute13 := l_sil_rec.stream_interface_attribute13;
4074: END IF;
4075: IF (x_sil_rec.date_start = OKC_API.G_MISS_DATE)
4071: IF (x_sil_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR)
4072: THEN
4073: x_sil_rec.stream_interface_attribute13 := l_sil_rec.stream_interface_attribute13;
4074: END IF;
4075: IF (x_sil_rec.date_start = OKC_API.G_MISS_DATE)
4076: THEN
4077: x_sil_rec.date_start := l_sil_rec.date_start;
4078: END IF;
4079: IF (x_sil_rec.date_lending = OKC_API.G_MISS_DATE)
4075: IF (x_sil_rec.date_start = OKC_API.G_MISS_DATE)
4076: THEN
4077: x_sil_rec.date_start := l_sil_rec.date_start;
4078: END IF;
4079: IF (x_sil_rec.date_lending = OKC_API.G_MISS_DATE)
4080: THEN
4081: x_sil_rec.date_lending := l_sil_rec.date_lending;
4082: END IF;
4083: IF (x_sil_rec.sif_id = OKC_API.G_MISS_NUM)
4079: IF (x_sil_rec.date_lending = OKC_API.G_MISS_DATE)
4080: THEN
4081: x_sil_rec.date_lending := l_sil_rec.date_lending;
4082: END IF;
4083: IF (x_sil_rec.sif_id = OKC_API.G_MISS_NUM)
4084: THEN
4085: x_sil_rec.sif_id := l_sil_rec.sif_id;
4086: END IF;
4087: IF (x_sil_rec.object_version_number = OKC_API.G_MISS_NUM)
4083: IF (x_sil_rec.sif_id = OKC_API.G_MISS_NUM)
4084: THEN
4085: x_sil_rec.sif_id := l_sil_rec.sif_id;
4086: END IF;
4087: IF (x_sil_rec.object_version_number = OKC_API.G_MISS_NUM)
4088: THEN
4089: x_sil_rec.object_version_number := l_sil_rec.object_version_number;
4090: END IF;
4091: IF (x_sil_rec.kle_id = OKC_API.G_MISS_NUM)
4087: IF (x_sil_rec.object_version_number = OKC_API.G_MISS_NUM)
4088: THEN
4089: x_sil_rec.object_version_number := l_sil_rec.object_version_number;
4090: END IF;
4091: IF (x_sil_rec.kle_id = OKC_API.G_MISS_NUM)
4092: THEN
4093: x_sil_rec.kle_id := l_sil_rec.kle_id;
4094: END IF;
4095: IF (x_sil_rec.sil_type = OKC_API.G_MISS_CHAR)
4091: IF (x_sil_rec.kle_id = OKC_API.G_MISS_NUM)
4092: THEN
4093: x_sil_rec.kle_id := l_sil_rec.kle_id;
4094: END IF;
4095: IF (x_sil_rec.sil_type = OKC_API.G_MISS_CHAR)
4096: THEN
4097: x_sil_rec.sil_type := l_sil_rec.sil_type;
4098: END IF;
4099: IF (x_sil_rec.created_by = OKC_API.G_MISS_NUM)
4095: IF (x_sil_rec.sil_type = OKC_API.G_MISS_CHAR)
4096: THEN
4097: x_sil_rec.sil_type := l_sil_rec.sil_type;
4098: END IF;
4099: IF (x_sil_rec.created_by = OKC_API.G_MISS_NUM)
4100: THEN
4101: x_sil_rec.created_by := l_sil_rec.created_by;
4102: END IF;
4103: IF (x_sil_rec.last_updated_by = OKC_API.G_MISS_NUM)
4099: IF (x_sil_rec.created_by = OKC_API.G_MISS_NUM)
4100: THEN
4101: x_sil_rec.created_by := l_sil_rec.created_by;
4102: END IF;
4103: IF (x_sil_rec.last_updated_by = OKC_API.G_MISS_NUM)
4104: THEN
4105: x_sil_rec.last_updated_by := l_sil_rec.last_updated_by;
4106: END IF;
4107: IF (x_sil_rec.creation_date = OKC_API.G_MISS_DATE)
4103: IF (x_sil_rec.last_updated_by = OKC_API.G_MISS_NUM)
4104: THEN
4105: x_sil_rec.last_updated_by := l_sil_rec.last_updated_by;
4106: END IF;
4107: IF (x_sil_rec.creation_date = OKC_API.G_MISS_DATE)
4108: THEN
4109: x_sil_rec.creation_date := l_sil_rec.creation_date;
4110: END IF;
4111: IF (x_sil_rec.last_update_date = OKC_API.G_MISS_DATE)
4107: IF (x_sil_rec.creation_date = OKC_API.G_MISS_DATE)
4108: THEN
4109: x_sil_rec.creation_date := l_sil_rec.creation_date;
4110: END IF;
4111: IF (x_sil_rec.last_update_date = OKC_API.G_MISS_DATE)
4112: THEN
4113: x_sil_rec.last_update_date := l_sil_rec.last_update_date;
4114: END IF;
4115: IF (x_sil_rec.last_update_login = OKC_API.G_MISS_NUM)
4111: IF (x_sil_rec.last_update_date = OKC_API.G_MISS_DATE)
4112: THEN
4113: x_sil_rec.last_update_date := l_sil_rec.last_update_date;
4114: END IF;
4115: IF (x_sil_rec.last_update_login = OKC_API.G_MISS_NUM)
4116: THEN
4117: x_sil_rec.last_update_login := l_sil_rec.last_update_login;
4118: END IF;
4119: IF (x_sil_rec.down_payment_amount = OKC_API.G_MISS_NUM)
4115: IF (x_sil_rec.last_update_login = OKC_API.G_MISS_NUM)
4116: THEN
4117: x_sil_rec.last_update_login := l_sil_rec.last_update_login;
4118: END IF;
4119: IF (x_sil_rec.down_payment_amount = OKC_API.G_MISS_NUM)
4120: THEN
4121: x_sil_rec.down_payment_amount := l_sil_rec.down_payment_amount;
4122: END IF;
4123: IF (x_sil_rec.capitalize_down_payment_yn = OKC_API.G_MISS_CHAR)
4119: IF (x_sil_rec.down_payment_amount = OKC_API.G_MISS_NUM)
4120: THEN
4121: x_sil_rec.down_payment_amount := l_sil_rec.down_payment_amount;
4122: END IF;
4123: IF (x_sil_rec.capitalize_down_payment_yn = OKC_API.G_MISS_CHAR)
4124: THEN
4125: x_sil_rec.capitalize_down_payment_yn := l_sil_rec.capitalize_down_payment_yn;
4126: END IF;
4127: RETURN(l_return_status);
4132: FUNCTION Set_Attributes (
4133: p_sil_rec IN sil_rec_type,
4134: x_sil_rec OUT NOCOPY sil_rec_type
4135: ) RETURN VARCHAR2 IS
4136: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4137: BEGIN
4138: x_sil_rec := p_sil_rec;
4139: RETURN(l_return_status);
4140: END Set_Attributes;
4138: x_sil_rec := p_sil_rec;
4139: RETURN(l_return_status);
4140: END Set_Attributes;
4141: BEGIN
4142: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
4143: p_init_msg_list,
4144: '_PVT',
4145: x_return_status);
4146: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4142: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
4143: p_init_msg_list,
4144: '_PVT',
4145: x_return_status);
4146: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4147: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4148: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4149: RAISE OKC_API.G_EXCEPTION_ERROR;
4150: END IF;
4143: p_init_msg_list,
4144: '_PVT',
4145: x_return_status);
4146: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4147: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4148: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4149: RAISE OKC_API.G_EXCEPTION_ERROR;
4150: END IF;
4151: --- Setting item attributes
4144: '_PVT',
4145: x_return_status);
4146: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4147: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4148: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4149: RAISE OKC_API.G_EXCEPTION_ERROR;
4150: END IF;
4151: --- Setting item attributes
4152: l_return_status := Set_Attributes(
4145: x_return_status);
4146: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4147: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4148: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4149: RAISE OKC_API.G_EXCEPTION_ERROR;
4150: END IF;
4151: --- Setting item attributes
4152: l_return_status := Set_Attributes(
4153: p_sil_rec, -- IN
4152: l_return_status := Set_Attributes(
4153: p_sil_rec, -- IN
4154: l_sil_rec); -- OUT
4155: --- If any errors happen abort API
4156: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4157: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4158: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4159: RAISE OKC_API.G_EXCEPTION_ERROR;
4160: END IF;
4153: p_sil_rec, -- IN
4154: l_sil_rec); -- OUT
4155: --- If any errors happen abort API
4156: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4157: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4158: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4159: RAISE OKC_API.G_EXCEPTION_ERROR;
4160: END IF;
4161: l_return_status := populate_new_record(l_sil_rec, l_def_sil_rec);
4154: l_sil_rec); -- OUT
4155: --- If any errors happen abort API
4156: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4157: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4158: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4159: RAISE OKC_API.G_EXCEPTION_ERROR;
4160: END IF;
4161: l_return_status := populate_new_record(l_sil_rec, l_def_sil_rec);
4162: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4155: --- If any errors happen abort API
4156: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4157: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4158: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4159: RAISE OKC_API.G_EXCEPTION_ERROR;
4160: END IF;
4161: l_return_status := populate_new_record(l_sil_rec, l_def_sil_rec);
4162: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4163: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4158: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4159: RAISE OKC_API.G_EXCEPTION_ERROR;
4160: END IF;
4161: l_return_status := populate_new_record(l_sil_rec, l_def_sil_rec);
4162: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4163: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4164: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4165: RAISE OKC_API.G_EXCEPTION_ERROR;
4166: END IF;
4159: RAISE OKC_API.G_EXCEPTION_ERROR;
4160: END IF;
4161: l_return_status := populate_new_record(l_sil_rec, l_def_sil_rec);
4162: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4163: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4164: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4165: RAISE OKC_API.G_EXCEPTION_ERROR;
4166: END IF;
4167: UPDATE OKL_SIF_LINES
4160: END IF;
4161: l_return_status := populate_new_record(l_sil_rec, l_def_sil_rec);
4162: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4163: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4164: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4165: RAISE OKC_API.G_EXCEPTION_ERROR;
4166: END IF;
4167: UPDATE OKL_SIF_LINES
4168: SET STATE_DEPRE_DMNSHING_VALUE_RT = l_def_sil_rec.STATE_DEPRE_DMNSHING_VALUE_RT,
4161: l_return_status := populate_new_record(l_sil_rec, l_def_sil_rec);
4162: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4163: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4164: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4165: RAISE OKC_API.G_EXCEPTION_ERROR;
4166: END IF;
4167: UPDATE OKL_SIF_LINES
4168: SET STATE_DEPRE_DMNSHING_VALUE_RT = l_def_sil_rec.STATE_DEPRE_DMNSHING_VALUE_RT,
4169: BOOK_DEPRE_DMNSHING_VALUE_RT = l_def_sil_rec.BOOK_DEPRE_DMNSHING_VALUE_RT,
4229: CAPITALIZE_DOWN_PAYMENT_YN = l_def_sil_rec.capitalize_down_payment_yn
4230: WHERE ID = l_def_sil_rec.id;
4231:
4232: x_sil_rec := l_def_sil_rec;
4233: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4234: EXCEPTION
4235: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4236: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4237: (
4231:
4232: x_sil_rec := l_def_sil_rec;
4233: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4234: EXCEPTION
4235: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4236: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4237: (
4238: l_api_name,
4239: G_PKG_NAME,
4232: x_sil_rec := l_def_sil_rec;
4233: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4234: EXCEPTION
4235: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4236: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4237: (
4238: l_api_name,
4239: G_PKG_NAME,
4240: 'OKC_API.G_RET_STS_ERROR',
4236: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4237: (
4238: l_api_name,
4239: G_PKG_NAME,
4240: 'OKC_API.G_RET_STS_ERROR',
4241: x_msg_count,
4242: x_msg_data,
4243: '_PVT'
4244: );
4241: x_msg_count,
4242: x_msg_data,
4243: '_PVT'
4244: );
4245: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4246: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4247: (
4248: l_api_name,
4249: G_PKG_NAME,
4242: x_msg_data,
4243: '_PVT'
4244: );
4245: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4246: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4247: (
4248: l_api_name,
4249: G_PKG_NAME,
4250: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4246: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4247: (
4248: l_api_name,
4249: G_PKG_NAME,
4250: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4251: x_msg_count,
4252: x_msg_data,
4253: '_PVT'
4254: );
4252: x_msg_data,
4253: '_PVT'
4254: );
4255: WHEN OTHERS THEN
4256: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4257: (
4258: l_api_name,
4259: G_PKG_NAME,
4260: 'OTHERS',
4267: -- update_row for:OKL_SIF_LINES_V --
4268: ------------------------------------
4269: PROCEDURE update_row(
4270: p_api_version IN NUMBER,
4271: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
4272: x_return_status OUT NOCOPY VARCHAR2,
4273: x_msg_count OUT NOCOPY NUMBER,
4274: x_msg_data OUT NOCOPY VARCHAR2,
4275: p_silv_rec IN silv_rec_type,
4276: x_silv_rec OUT NOCOPY silv_rec_type) IS
4277:
4278: l_api_version CONSTANT NUMBER := 1;
4279: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
4280: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4281: l_silv_rec silv_rec_type := p_silv_rec;
4282: l_def_silv_rec silv_rec_type;
4283: l_sil_rec sil_rec_type;
4284: lx_sil_rec sil_rec_type;
4303: x_silv_rec OUT NOCOPY silv_rec_type
4304: ) RETURN VARCHAR2 IS
4305: l_silv_rec silv_rec_type;
4306: l_row_notfound BOOLEAN := TRUE;
4307: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4308: BEGIN
4309: x_silv_rec := p_silv_rec;
4310: -- Get current database values
4311: l_silv_rec := get_rec(p_silv_rec, l_row_notfound);
4309: x_silv_rec := p_silv_rec;
4310: -- Get current database values
4311: l_silv_rec := get_rec(p_silv_rec, l_row_notfound);
4312: IF (l_row_notfound) THEN
4313: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4314: END IF;
4315: IF (x_silv_rec.id = OKC_API.G_MISS_NUM)
4316: THEN
4317: x_silv_rec.id := l_silv_rec.id;
4311: l_silv_rec := get_rec(p_silv_rec, l_row_notfound);
4312: IF (l_row_notfound) THEN
4313: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4314: END IF;
4315: IF (x_silv_rec.id = OKC_API.G_MISS_NUM)
4316: THEN
4317: x_silv_rec.id := l_silv_rec.id;
4318: END IF;
4319: IF (x_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT = OKC_API.G_MISS_NUM)
4315: IF (x_silv_rec.id = OKC_API.G_MISS_NUM)
4316: THEN
4317: x_silv_rec.id := l_silv_rec.id;
4318: END IF;
4319: IF (x_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT = OKC_API.G_MISS_NUM)
4320: THEN
4321: x_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT := l_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT;
4322: END IF;
4323: IF (x_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT = OKC_API.G_MISS_NUM)
4319: IF (x_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT = OKC_API.G_MISS_NUM)
4320: THEN
4321: x_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT := l_silv_rec.STATE_DEPRE_DMNSHING_VALUE_RT;
4322: END IF;
4323: IF (x_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT = OKC_API.G_MISS_NUM)
4324: THEN
4325: x_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT := l_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT;
4326: END IF;
4327: IF (x_silv_rec.residual_guarantee_method = OKC_API.G_MISS_CHAR)
4323: IF (x_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT = OKC_API.G_MISS_NUM)
4324: THEN
4325: x_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT := l_silv_rec.BOOK_DEPRE_DMNSHING_VALUE_RT;
4326: END IF;
4327: IF (x_silv_rec.residual_guarantee_method = OKC_API.G_MISS_CHAR)
4328: THEN
4329: x_silv_rec.residual_guarantee_method := l_silv_rec.residual_guarantee_method;
4330: END IF;
4331: -- mvasudev , 05/13/2002
4328: THEN
4329: x_silv_rec.residual_guarantee_method := l_silv_rec.residual_guarantee_method;
4330: END IF;
4331: -- mvasudev , 05/13/2002
4332: IF (x_silv_rec.residual_guarantee_type = OKC_API.G_MISS_CHAR)
4333: THEN
4334: x_silv_rec.residual_guarantee_type := l_silv_rec.residual_guarantee_type;
4335: END IF;
4336: IF (x_silv_rec.residual_date = OKC_API.G_MISS_DATE)
4332: IF (x_silv_rec.residual_guarantee_type = OKC_API.G_MISS_CHAR)
4333: THEN
4334: x_silv_rec.residual_guarantee_type := l_silv_rec.residual_guarantee_type;
4335: END IF;
4336: IF (x_silv_rec.residual_date = OKC_API.G_MISS_DATE)
4337: THEN
4338: x_silv_rec.residual_date := l_silv_rec.residual_date;
4339: END IF;
4340: IF (x_silv_rec.fed_depre_term = OKC_API.G_MISS_NUM)
4336: IF (x_silv_rec.residual_date = OKC_API.G_MISS_DATE)
4337: THEN
4338: x_silv_rec.residual_date := l_silv_rec.residual_date;
4339: END IF;
4340: IF (x_silv_rec.fed_depre_term = OKC_API.G_MISS_NUM)
4341: THEN
4342: x_silv_rec.fed_depre_term := l_silv_rec.fed_depre_term;
4343: END IF;
4344: IF (x_silv_rec.fed_depre_dmnshing_value_rate = OKC_API.G_MISS_NUM)
4340: IF (x_silv_rec.fed_depre_term = OKC_API.G_MISS_NUM)
4341: THEN
4342: x_silv_rec.fed_depre_term := l_silv_rec.fed_depre_term;
4343: END IF;
4344: IF (x_silv_rec.fed_depre_dmnshing_value_rate = OKC_API.G_MISS_NUM)
4345: THEN
4346: x_silv_rec.fed_depre_dmnshing_value_rate := l_silv_rec.fed_depre_dmnshing_value_rate;
4347: END IF;
4348: IF (x_silv_rec.fed_depre_adr_conve = OKC_API.G_MISS_CHAR)
4344: IF (x_silv_rec.fed_depre_dmnshing_value_rate = OKC_API.G_MISS_NUM)
4345: THEN
4346: x_silv_rec.fed_depre_dmnshing_value_rate := l_silv_rec.fed_depre_dmnshing_value_rate;
4347: END IF;
4348: IF (x_silv_rec.fed_depre_adr_conve = OKC_API.G_MISS_CHAR)
4349: THEN
4350: x_silv_rec.fed_depre_adr_conve := l_silv_rec.fed_depre_adr_conve;
4351: END IF;
4352: IF (x_silv_rec.state_depre_basis_percent = OKC_API.G_MISS_NUM)
4348: IF (x_silv_rec.fed_depre_adr_conve = OKC_API.G_MISS_CHAR)
4349: THEN
4350: x_silv_rec.fed_depre_adr_conve := l_silv_rec.fed_depre_adr_conve;
4351: END IF;
4352: IF (x_silv_rec.state_depre_basis_percent = OKC_API.G_MISS_NUM)
4353: THEN
4354: x_silv_rec.state_depre_basis_percent := l_silv_rec.state_depre_basis_percent;
4355: END IF;
4356: IF (x_silv_rec.state_depre_method = OKC_API.G_MISS_CHAR)
4352: IF (x_silv_rec.state_depre_basis_percent = OKC_API.G_MISS_NUM)
4353: THEN
4354: x_silv_rec.state_depre_basis_percent := l_silv_rec.state_depre_basis_percent;
4355: END IF;
4356: IF (x_silv_rec.state_depre_method = OKC_API.G_MISS_CHAR)
4357: THEN
4358: x_silv_rec.state_depre_method := l_silv_rec.state_depre_method;
4359: END IF;
4360: IF (x_silv_rec.purchase_option = OKC_API.G_MISS_CHAR)
4356: IF (x_silv_rec.state_depre_method = OKC_API.G_MISS_CHAR)
4357: THEN
4358: x_silv_rec.state_depre_method := l_silv_rec.state_depre_method;
4359: END IF;
4360: IF (x_silv_rec.purchase_option = OKC_API.G_MISS_CHAR)
4361: THEN
4362: x_silv_rec.purchase_option := l_silv_rec.purchase_option;
4363: END IF;
4364: IF (x_silv_rec.purchase_option_amount = OKC_API.G_MISS_NUM)
4360: IF (x_silv_rec.purchase_option = OKC_API.G_MISS_CHAR)
4361: THEN
4362: x_silv_rec.purchase_option := l_silv_rec.purchase_option;
4363: END IF;
4364: IF (x_silv_rec.purchase_option_amount = OKC_API.G_MISS_NUM)
4365: THEN
4366: x_silv_rec.purchase_option_amount := l_silv_rec.purchase_option_amount;
4367: END IF;
4368: IF (x_silv_rec.asset_cost = OKC_API.G_MISS_NUM)
4364: IF (x_silv_rec.purchase_option_amount = OKC_API.G_MISS_NUM)
4365: THEN
4366: x_silv_rec.purchase_option_amount := l_silv_rec.purchase_option_amount;
4367: END IF;
4368: IF (x_silv_rec.asset_cost = OKC_API.G_MISS_NUM)
4369: THEN
4370: x_silv_rec.asset_cost := l_silv_rec.asset_cost;
4371: END IF;
4372: IF (x_silv_rec.state_depre_term = OKC_API.G_MISS_NUM)
4368: IF (x_silv_rec.asset_cost = OKC_API.G_MISS_NUM)
4369: THEN
4370: x_silv_rec.asset_cost := l_silv_rec.asset_cost;
4371: END IF;
4372: IF (x_silv_rec.state_depre_term = OKC_API.G_MISS_NUM)
4373: THEN
4374: x_silv_rec.state_depre_term := l_silv_rec.state_depre_term;
4375: END IF;
4376: IF (x_silv_rec.state_depre_adr_convent = OKC_API.G_MISS_CHAR)
4372: IF (x_silv_rec.state_depre_term = OKC_API.G_MISS_NUM)
4373: THEN
4374: x_silv_rec.state_depre_term := l_silv_rec.state_depre_term;
4375: END IF;
4376: IF (x_silv_rec.state_depre_adr_convent = OKC_API.G_MISS_CHAR)
4377: THEN
4378: x_silv_rec.state_depre_adr_convent := l_silv_rec.state_depre_adr_convent;
4379: END IF;
4380: IF (x_silv_rec.fed_depre_method = OKC_API.G_MISS_CHAR)
4376: IF (x_silv_rec.state_depre_adr_convent = OKC_API.G_MISS_CHAR)
4377: THEN
4378: x_silv_rec.state_depre_adr_convent := l_silv_rec.state_depre_adr_convent;
4379: END IF;
4380: IF (x_silv_rec.fed_depre_method = OKC_API.G_MISS_CHAR)
4381: THEN
4382: x_silv_rec.fed_depre_method := l_silv_rec.fed_depre_method;
4383: END IF;
4384: IF (x_silv_rec.residual_amount = OKC_API.G_MISS_NUM)
4380: IF (x_silv_rec.fed_depre_method = OKC_API.G_MISS_CHAR)
4381: THEN
4382: x_silv_rec.fed_depre_method := l_silv_rec.fed_depre_method;
4383: END IF;
4384: IF (x_silv_rec.residual_amount = OKC_API.G_MISS_NUM)
4385: THEN
4386: x_silv_rec.residual_amount := l_silv_rec.residual_amount;
4387: END IF;
4388: IF (x_silv_rec.fed_depre_salvage = OKC_API.G_MISS_NUM)
4384: IF (x_silv_rec.residual_amount = OKC_API.G_MISS_NUM)
4385: THEN
4386: x_silv_rec.residual_amount := l_silv_rec.residual_amount;
4387: END IF;
4388: IF (x_silv_rec.fed_depre_salvage = OKC_API.G_MISS_NUM)
4389: THEN
4390: x_silv_rec.fed_depre_salvage := l_silv_rec.fed_depre_salvage;
4391: END IF;
4392: IF (x_silv_rec.date_fed_depre = OKC_API.G_MISS_DATE)
4388: IF (x_silv_rec.fed_depre_salvage = OKC_API.G_MISS_NUM)
4389: THEN
4390: x_silv_rec.fed_depre_salvage := l_silv_rec.fed_depre_salvage;
4391: END IF;
4392: IF (x_silv_rec.date_fed_depre = OKC_API.G_MISS_DATE)
4393: THEN
4394: x_silv_rec.date_fed_depre := l_silv_rec.date_fed_depre;
4395: END IF;
4396: IF (x_silv_rec.book_salvage = OKC_API.G_MISS_NUM)
4392: IF (x_silv_rec.date_fed_depre = OKC_API.G_MISS_DATE)
4393: THEN
4394: x_silv_rec.date_fed_depre := l_silv_rec.date_fed_depre;
4395: END IF;
4396: IF (x_silv_rec.book_salvage = OKC_API.G_MISS_NUM)
4397: THEN
4398: x_silv_rec.book_salvage := l_silv_rec.book_salvage;
4399: END IF;
4400: IF (x_silv_rec.book_adr_convention = OKC_API.G_MISS_CHAR)
4396: IF (x_silv_rec.book_salvage = OKC_API.G_MISS_NUM)
4397: THEN
4398: x_silv_rec.book_salvage := l_silv_rec.book_salvage;
4399: END IF;
4400: IF (x_silv_rec.book_adr_convention = OKC_API.G_MISS_CHAR)
4401: THEN
4402: x_silv_rec.book_adr_convention := l_silv_rec.book_adr_convention;
4403: END IF;
4404: IF (x_silv_rec.state_depre_salvage = OKC_API.G_MISS_NUM)
4400: IF (x_silv_rec.book_adr_convention = OKC_API.G_MISS_CHAR)
4401: THEN
4402: x_silv_rec.book_adr_convention := l_silv_rec.book_adr_convention;
4403: END IF;
4404: IF (x_silv_rec.state_depre_salvage = OKC_API.G_MISS_NUM)
4405: THEN
4406: x_silv_rec.state_depre_salvage := l_silv_rec.state_depre_salvage;
4407: END IF;
4408: IF (x_silv_rec.Fed_Depre_Basis_Percent = OKC_API.G_MISS_NUM)
4404: IF (x_silv_rec.state_depre_salvage = OKC_API.G_MISS_NUM)
4405: THEN
4406: x_silv_rec.state_depre_salvage := l_silv_rec.state_depre_salvage;
4407: END IF;
4408: IF (x_silv_rec.Fed_Depre_Basis_Percent = OKC_API.G_MISS_NUM)
4409: THEN
4410: x_silv_rec.Fed_Depre_Basis_Percent := l_silv_rec.Fed_Depre_Basis_Percent;
4411: END IF;
4412: IF (x_silv_rec.book_basis_percent = OKC_API.G_MISS_NUM)
4408: IF (x_silv_rec.Fed_Depre_Basis_Percent = OKC_API.G_MISS_NUM)
4409: THEN
4410: x_silv_rec.Fed_Depre_Basis_Percent := l_silv_rec.Fed_Depre_Basis_Percent;
4411: END IF;
4412: IF (x_silv_rec.book_basis_percent = OKC_API.G_MISS_NUM)
4413: THEN
4414: x_silv_rec.book_basis_percent := l_silv_rec.book_basis_percent;
4415: END IF;
4416: IF (x_silv_rec.date_delivery = OKC_API.G_MISS_DATE)
4412: IF (x_silv_rec.book_basis_percent = OKC_API.G_MISS_NUM)
4413: THEN
4414: x_silv_rec.book_basis_percent := l_silv_rec.book_basis_percent;
4415: END IF;
4416: IF (x_silv_rec.date_delivery = OKC_API.G_MISS_DATE)
4417: THEN
4418: x_silv_rec.date_delivery := l_silv_rec.date_delivery;
4419: END IF;
4420: IF (x_silv_rec.book_term = OKC_API.G_MISS_NUM)
4416: IF (x_silv_rec.date_delivery = OKC_API.G_MISS_DATE)
4417: THEN
4418: x_silv_rec.date_delivery := l_silv_rec.date_delivery;
4419: END IF;
4420: IF (x_silv_rec.book_term = OKC_API.G_MISS_NUM)
4421: THEN
4422: x_silv_rec.book_term := l_silv_rec.book_term;
4423: END IF;
4424: IF (x_silv_rec.residual_guarantee_amount = OKC_API.G_MISS_NUM)
4420: IF (x_silv_rec.book_term = OKC_API.G_MISS_NUM)
4421: THEN
4422: x_silv_rec.book_term := l_silv_rec.book_term;
4423: END IF;
4424: IF (x_silv_rec.residual_guarantee_amount = OKC_API.G_MISS_NUM)
4425: THEN
4426: x_silv_rec.residual_guarantee_amount := l_silv_rec.residual_guarantee_amount;
4427: END IF;
4428: IF (x_silv_rec.date_funding = OKC_API.G_MISS_DATE)
4424: IF (x_silv_rec.residual_guarantee_amount = OKC_API.G_MISS_NUM)
4425: THEN
4426: x_silv_rec.residual_guarantee_amount := l_silv_rec.residual_guarantee_amount;
4427: END IF;
4428: IF (x_silv_rec.date_funding = OKC_API.G_MISS_DATE)
4429: THEN
4430: x_silv_rec.date_funding := l_silv_rec.date_funding;
4431: END IF;
4432: IF (x_silv_rec.date_book = OKC_API.G_MISS_DATE)
4428: IF (x_silv_rec.date_funding = OKC_API.G_MISS_DATE)
4429: THEN
4430: x_silv_rec.date_funding := l_silv_rec.date_funding;
4431: END IF;
4432: IF (x_silv_rec.date_book = OKC_API.G_MISS_DATE)
4433: THEN
4434: x_silv_rec.date_book := l_silv_rec.date_book;
4435: END IF;
4436: IF (x_silv_rec.date_state_depre = OKC_API.G_MISS_DATE)
4432: IF (x_silv_rec.date_book = OKC_API.G_MISS_DATE)
4433: THEN
4434: x_silv_rec.date_book := l_silv_rec.date_book;
4435: END IF;
4436: IF (x_silv_rec.date_state_depre = OKC_API.G_MISS_DATE)
4437: THEN
4438: x_silv_rec.date_state_depre := l_silv_rec.date_state_depre;
4439: END IF;
4440: IF (x_silv_rec.book_method = OKC_API.G_MISS_CHAR)
4436: IF (x_silv_rec.date_state_depre = OKC_API.G_MISS_DATE)
4437: THEN
4438: x_silv_rec.date_state_depre := l_silv_rec.date_state_depre;
4439: END IF;
4440: IF (x_silv_rec.book_method = OKC_API.G_MISS_CHAR)
4441: THEN
4442: x_silv_rec.book_method := l_silv_rec.book_method;
4443: END IF;
4444: IF (x_silv_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR)
4440: IF (x_silv_rec.book_method = OKC_API.G_MISS_CHAR)
4441: THEN
4442: x_silv_rec.book_method := l_silv_rec.book_method;
4443: END IF;
4444: IF (x_silv_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR)
4445: THEN
4446: x_silv_rec.stream_interface_attribute01 := l_silv_rec.stream_interface_attribute01;
4447: END IF;
4448: IF (x_silv_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR)
4444: IF (x_silv_rec.stream_interface_attribute01 = OKC_API.G_MISS_CHAR)
4445: THEN
4446: x_silv_rec.stream_interface_attribute01 := l_silv_rec.stream_interface_attribute01;
4447: END IF;
4448: IF (x_silv_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR)
4449: THEN
4450: x_silv_rec.stream_interface_attribute02 := l_silv_rec.stream_interface_attribute02;
4451: END IF;
4452: IF (x_silv_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR)
4448: IF (x_silv_rec.stream_interface_attribute02 = OKC_API.G_MISS_CHAR)
4449: THEN
4450: x_silv_rec.stream_interface_attribute02 := l_silv_rec.stream_interface_attribute02;
4451: END IF;
4452: IF (x_silv_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR)
4453: THEN
4454: x_silv_rec.stream_interface_attribute03 := l_silv_rec.stream_interface_attribute03;
4455: END IF;
4456: IF (x_silv_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR)
4452: IF (x_silv_rec.stream_interface_attribute03 = OKC_API.G_MISS_CHAR)
4453: THEN
4454: x_silv_rec.stream_interface_attribute03 := l_silv_rec.stream_interface_attribute03;
4455: END IF;
4456: IF (x_silv_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR)
4457: THEN
4458: x_silv_rec.stream_interface_attribute04 := l_silv_rec.stream_interface_attribute04;
4459: END IF;
4460: IF (x_silv_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR)
4456: IF (x_silv_rec.stream_interface_attribute04 = OKC_API.G_MISS_CHAR)
4457: THEN
4458: x_silv_rec.stream_interface_attribute04 := l_silv_rec.stream_interface_attribute04;
4459: END IF;
4460: IF (x_silv_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR)
4461: THEN
4462: x_silv_rec.stream_interface_attribute05 := l_silv_rec.stream_interface_attribute05;
4463: END IF;
4464: IF (x_silv_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR)
4460: IF (x_silv_rec.stream_interface_attribute05 = OKC_API.G_MISS_CHAR)
4461: THEN
4462: x_silv_rec.stream_interface_attribute05 := l_silv_rec.stream_interface_attribute05;
4463: END IF;
4464: IF (x_silv_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR)
4465: THEN
4466: x_silv_rec.stream_interface_attribute06 := l_silv_rec.stream_interface_attribute06;
4467: END IF;
4468: IF (x_silv_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR)
4464: IF (x_silv_rec.stream_interface_attribute06 = OKC_API.G_MISS_CHAR)
4465: THEN
4466: x_silv_rec.stream_interface_attribute06 := l_silv_rec.stream_interface_attribute06;
4467: END IF;
4468: IF (x_silv_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR)
4469: THEN
4470: x_silv_rec.stream_interface_attribute07 := l_silv_rec.stream_interface_attribute07;
4471: END IF;
4472: IF (x_silv_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR)
4468: IF (x_silv_rec.stream_interface_attribute07 = OKC_API.G_MISS_CHAR)
4469: THEN
4470: x_silv_rec.stream_interface_attribute07 := l_silv_rec.stream_interface_attribute07;
4471: END IF;
4472: IF (x_silv_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR)
4473: THEN
4474: x_silv_rec.stream_interface_attribute08 := l_silv_rec.stream_interface_attribute08;
4475: END IF;
4476: IF (x_silv_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR)
4472: IF (x_silv_rec.stream_interface_attribute08 = OKC_API.G_MISS_CHAR)
4473: THEN
4474: x_silv_rec.stream_interface_attribute08 := l_silv_rec.stream_interface_attribute08;
4475: END IF;
4476: IF (x_silv_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR)
4477: THEN
4478: x_silv_rec.stream_interface_attribute09 := l_silv_rec.stream_interface_attribute09;
4479: END IF;
4480: IF (x_silv_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR)
4476: IF (x_silv_rec.stream_interface_attribute09 = OKC_API.G_MISS_CHAR)
4477: THEN
4478: x_silv_rec.stream_interface_attribute09 := l_silv_rec.stream_interface_attribute09;
4479: END IF;
4480: IF (x_silv_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR)
4481: THEN
4482: x_silv_rec.stream_interface_attribute10 := l_silv_rec.stream_interface_attribute10;
4483: END IF;
4484: IF (x_silv_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR)
4480: IF (x_silv_rec.stream_interface_attribute10 = OKC_API.G_MISS_CHAR)
4481: THEN
4482: x_silv_rec.stream_interface_attribute10 := l_silv_rec.stream_interface_attribute10;
4483: END IF;
4484: IF (x_silv_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR)
4485: THEN
4486: x_silv_rec.stream_interface_attribute11 := l_silv_rec.stream_interface_attribute11;
4487: END IF;
4488: IF (x_silv_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR)
4484: IF (x_silv_rec.stream_interface_attribute11 = OKC_API.G_MISS_CHAR)
4485: THEN
4486: x_silv_rec.stream_interface_attribute11 := l_silv_rec.stream_interface_attribute11;
4487: END IF;
4488: IF (x_silv_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR)
4489: THEN
4490: x_silv_rec.stream_interface_attribute12 := l_silv_rec.stream_interface_attribute12;
4491: END IF;
4492: IF (x_silv_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR)
4488: IF (x_silv_rec.stream_interface_attribute12 = OKC_API.G_MISS_CHAR)
4489: THEN
4490: x_silv_rec.stream_interface_attribute12 := l_silv_rec.stream_interface_attribute12;
4491: END IF;
4492: IF (x_silv_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR)
4493: THEN
4494: x_silv_rec.stream_interface_attribute13 := l_silv_rec.stream_interface_attribute13;
4495: END IF;
4496: IF (x_silv_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR)
4492: IF (x_silv_rec.stream_interface_attribute13 = OKC_API.G_MISS_CHAR)
4493: THEN
4494: x_silv_rec.stream_interface_attribute13 := l_silv_rec.stream_interface_attribute13;
4495: END IF;
4496: IF (x_silv_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR)
4497: THEN
4498: x_silv_rec.stream_interface_attribute14 := l_silv_rec.stream_interface_attribute14;
4499: END IF;
4500: IF (x_silv_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR)
4496: IF (x_silv_rec.stream_interface_attribute14 = OKC_API.G_MISS_CHAR)
4497: THEN
4498: x_silv_rec.stream_interface_attribute14 := l_silv_rec.stream_interface_attribute14;
4499: END IF;
4500: IF (x_silv_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR)
4501: THEN
4502: x_silv_rec.stream_interface_attribute15 := l_silv_rec.stream_interface_attribute15;
4503: END IF;
4504: IF (x_silv_rec.date_start = OKC_API.G_MISS_DATE)
4500: IF (x_silv_rec.stream_interface_attribute15 = OKC_API.G_MISS_CHAR)
4501: THEN
4502: x_silv_rec.stream_interface_attribute15 := l_silv_rec.stream_interface_attribute15;
4503: END IF;
4504: IF (x_silv_rec.date_start = OKC_API.G_MISS_DATE)
4505: THEN
4506: x_silv_rec.date_start := l_silv_rec.date_start;
4507: END IF;
4508: IF (x_silv_rec.date_lending = OKC_API.G_MISS_DATE)
4504: IF (x_silv_rec.date_start = OKC_API.G_MISS_DATE)
4505: THEN
4506: x_silv_rec.date_start := l_silv_rec.date_start;
4507: END IF;
4508: IF (x_silv_rec.date_lending = OKC_API.G_MISS_DATE)
4509: THEN
4510: x_silv_rec.date_lending := l_silv_rec.date_lending;
4511: END IF;
4512: IF (x_silv_rec.index_number = OKC_API.G_MISS_NUM)
4508: IF (x_silv_rec.date_lending = OKC_API.G_MISS_DATE)
4509: THEN
4510: x_silv_rec.date_lending := l_silv_rec.date_lending;
4511: END IF;
4512: IF (x_silv_rec.index_number = OKC_API.G_MISS_NUM)
4513: THEN
4514: x_silv_rec.index_number := l_silv_rec.index_number;
4515: END IF;
4516: IF (x_silv_rec.sif_id = OKC_API.G_MISS_NUM)
4512: IF (x_silv_rec.index_number = OKC_API.G_MISS_NUM)
4513: THEN
4514: x_silv_rec.index_number := l_silv_rec.index_number;
4515: END IF;
4516: IF (x_silv_rec.sif_id = OKC_API.G_MISS_NUM)
4517: THEN
4518: x_silv_rec.sif_id := l_silv_rec.sif_id;
4519: END IF;
4520: IF (x_silv_rec.object_version_number = OKC_API.G_MISS_NUM)
4516: IF (x_silv_rec.sif_id = OKC_API.G_MISS_NUM)
4517: THEN
4518: x_silv_rec.sif_id := l_silv_rec.sif_id;
4519: END IF;
4520: IF (x_silv_rec.object_version_number = OKC_API.G_MISS_NUM)
4521: THEN
4522: x_silv_rec.object_version_number := l_silv_rec.object_version_number;
4523: END IF;
4524: IF (x_silv_rec.kle_id = OKC_API.G_MISS_NUM)
4520: IF (x_silv_rec.object_version_number = OKC_API.G_MISS_NUM)
4521: THEN
4522: x_silv_rec.object_version_number := l_silv_rec.object_version_number;
4523: END IF;
4524: IF (x_silv_rec.kle_id = OKC_API.G_MISS_NUM)
4525: THEN
4526: x_silv_rec.kle_id := l_silv_rec.kle_id;
4527: END IF;
4528: IF (x_silv_rec.sil_type = OKC_API.G_MISS_CHAR)
4524: IF (x_silv_rec.kle_id = OKC_API.G_MISS_NUM)
4525: THEN
4526: x_silv_rec.kle_id := l_silv_rec.kle_id;
4527: END IF;
4528: IF (x_silv_rec.sil_type = OKC_API.G_MISS_CHAR)
4529: THEN
4530: x_silv_rec.sil_type := l_silv_rec.sil_type;
4531: END IF;
4532: IF (x_silv_rec.description = OKC_API.G_MISS_CHAR)
4528: IF (x_silv_rec.sil_type = OKC_API.G_MISS_CHAR)
4529: THEN
4530: x_silv_rec.sil_type := l_silv_rec.sil_type;
4531: END IF;
4532: IF (x_silv_rec.description = OKC_API.G_MISS_CHAR)
4533: THEN
4534: x_silv_rec.description := l_silv_rec.description;
4535: END IF;
4536: IF (x_silv_rec.created_by = OKC_API.G_MISS_NUM)
4532: IF (x_silv_rec.description = OKC_API.G_MISS_CHAR)
4533: THEN
4534: x_silv_rec.description := l_silv_rec.description;
4535: END IF;
4536: IF (x_silv_rec.created_by = OKC_API.G_MISS_NUM)
4537: THEN
4538: x_silv_rec.created_by := l_silv_rec.created_by;
4539: END IF;
4540: IF (x_silv_rec.last_updated_by = OKC_API.G_MISS_NUM)
4536: IF (x_silv_rec.created_by = OKC_API.G_MISS_NUM)
4537: THEN
4538: x_silv_rec.created_by := l_silv_rec.created_by;
4539: END IF;
4540: IF (x_silv_rec.last_updated_by = OKC_API.G_MISS_NUM)
4541: THEN
4542: x_silv_rec.last_updated_by := l_silv_rec.last_updated_by;
4543: END IF;
4544: IF (x_silv_rec.creation_date = OKC_API.G_MISS_DATE)
4540: IF (x_silv_rec.last_updated_by = OKC_API.G_MISS_NUM)
4541: THEN
4542: x_silv_rec.last_updated_by := l_silv_rec.last_updated_by;
4543: END IF;
4544: IF (x_silv_rec.creation_date = OKC_API.G_MISS_DATE)
4545: THEN
4546: x_silv_rec.creation_date := l_silv_rec.creation_date;
4547: END IF;
4548: IF (x_silv_rec.last_update_date = OKC_API.G_MISS_DATE)
4544: IF (x_silv_rec.creation_date = OKC_API.G_MISS_DATE)
4545: THEN
4546: x_silv_rec.creation_date := l_silv_rec.creation_date;
4547: END IF;
4548: IF (x_silv_rec.last_update_date = OKC_API.G_MISS_DATE)
4549: THEN
4550: x_silv_rec.last_update_date := l_silv_rec.last_update_date;
4551: END IF;
4552: IF (x_silv_rec.last_update_login = OKC_API.G_MISS_NUM)
4548: IF (x_silv_rec.last_update_date = OKC_API.G_MISS_DATE)
4549: THEN
4550: x_silv_rec.last_update_date := l_silv_rec.last_update_date;
4551: END IF;
4552: IF (x_silv_rec.last_update_login = OKC_API.G_MISS_NUM)
4553: THEN
4554: x_silv_rec.last_update_login := l_silv_rec.last_update_login;
4555: END IF;
4556: IF (x_silv_rec.down_payment_amount = OKC_API.G_MISS_NUM)
4552: IF (x_silv_rec.last_update_login = OKC_API.G_MISS_NUM)
4553: THEN
4554: x_silv_rec.last_update_login := l_silv_rec.last_update_login;
4555: END IF;
4556: IF (x_silv_rec.down_payment_amount = OKC_API.G_MISS_NUM)
4557: THEN
4558: x_silv_rec.down_payment_amount := l_silv_rec.down_payment_amount;
4559: END IF;
4560: IF (x_silv_rec.capitalize_down_payment_yn = OKC_API.G_MISS_CHAR)
4556: IF (x_silv_rec.down_payment_amount = OKC_API.G_MISS_NUM)
4557: THEN
4558: x_silv_rec.down_payment_amount := l_silv_rec.down_payment_amount;
4559: END IF;
4560: IF (x_silv_rec.capitalize_down_payment_yn = OKC_API.G_MISS_CHAR)
4561: THEN
4562: x_silv_rec.capitalize_down_payment_yn := l_silv_rec.capitalize_down_payment_yn;
4563: END IF;
4564: RETURN(l_return_status);
4569: FUNCTION Set_Attributes (
4570: p_silv_rec IN silv_rec_type,
4571: x_silv_rec OUT NOCOPY silv_rec_type
4572: ) RETURN VARCHAR2 IS
4573: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4574: BEGIN
4575: x_silv_rec := p_silv_rec;
4576: x_silv_rec.OBJECT_VERSION_NUMBER := NVL(x_silv_rec.OBJECT_VERSION_NUMBER, 0) + 1;
4577: RETURN(l_return_status);
4576: x_silv_rec.OBJECT_VERSION_NUMBER := NVL(x_silv_rec.OBJECT_VERSION_NUMBER, 0) + 1;
4577: RETURN(l_return_status);
4578: END Set_Attributes;
4579: BEGIN
4580: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
4581: G_PKG_NAME,
4582: p_init_msg_list,
4583: l_api_version,
4584: p_api_version,
4583: l_api_version,
4584: p_api_version,
4585: '_PVT',
4586: x_return_status);
4587: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4588: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4589: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4590: RAISE OKC_API.G_EXCEPTION_ERROR;
4591: END IF;
4584: p_api_version,
4585: '_PVT',
4586: x_return_status);
4587: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4588: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4589: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4590: RAISE OKC_API.G_EXCEPTION_ERROR;
4591: END IF;
4592: --- Setting item attributes
4585: '_PVT',
4586: x_return_status);
4587: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4588: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4589: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4590: RAISE OKC_API.G_EXCEPTION_ERROR;
4591: END IF;
4592: --- Setting item attributes
4593: l_return_status := Set_Attributes(
4586: x_return_status);
4587: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4588: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4589: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4590: RAISE OKC_API.G_EXCEPTION_ERROR;
4591: END IF;
4592: --- Setting item attributes
4593: l_return_status := Set_Attributes(
4594: p_silv_rec, -- IN
4593: l_return_status := Set_Attributes(
4594: p_silv_rec, -- IN
4595: l_silv_rec); -- OUT
4596: --- If any errors happen abort API
4597: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4598: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4599: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4600: RAISE OKC_API.G_EXCEPTION_ERROR;
4601: END IF;
4594: p_silv_rec, -- IN
4595: l_silv_rec); -- OUT
4596: --- If any errors happen abort API
4597: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4598: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4599: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4600: RAISE OKC_API.G_EXCEPTION_ERROR;
4601: END IF;
4602: l_return_status := populate_new_record(l_silv_rec, l_def_silv_rec);
4595: l_silv_rec); -- OUT
4596: --- If any errors happen abort API
4597: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4598: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4599: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4600: RAISE OKC_API.G_EXCEPTION_ERROR;
4601: END IF;
4602: l_return_status := populate_new_record(l_silv_rec, l_def_silv_rec);
4603: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4596: --- If any errors happen abort API
4597: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4598: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4599: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4600: RAISE OKC_API.G_EXCEPTION_ERROR;
4601: END IF;
4602: l_return_status := populate_new_record(l_silv_rec, l_def_silv_rec);
4603: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4604: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4599: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4600: RAISE OKC_API.G_EXCEPTION_ERROR;
4601: END IF;
4602: l_return_status := populate_new_record(l_silv_rec, l_def_silv_rec);
4603: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4604: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4605: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4606: RAISE OKC_API.G_EXCEPTION_ERROR;
4607: END IF;
4600: RAISE OKC_API.G_EXCEPTION_ERROR;
4601: END IF;
4602: l_return_status := populate_new_record(l_silv_rec, l_def_silv_rec);
4603: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4604: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4605: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4606: RAISE OKC_API.G_EXCEPTION_ERROR;
4607: END IF;
4608: l_def_silv_rec := fill_who_columns(l_def_silv_rec);
4601: END IF;
4602: l_return_status := populate_new_record(l_silv_rec, l_def_silv_rec);
4603: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4604: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4605: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4606: RAISE OKC_API.G_EXCEPTION_ERROR;
4607: END IF;
4608: l_def_silv_rec := fill_who_columns(l_def_silv_rec);
4609: --- Validate all non-missing attributes (Item Level Validation)
4602: l_return_status := populate_new_record(l_silv_rec, l_def_silv_rec);
4603: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4604: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4605: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4606: RAISE OKC_API.G_EXCEPTION_ERROR;
4607: END IF;
4608: l_def_silv_rec := fill_who_columns(l_def_silv_rec);
4609: --- Validate all non-missing attributes (Item Level Validation)
4610: l_return_status := Validate_Attributes(l_def_silv_rec);
4608: l_def_silv_rec := fill_who_columns(l_def_silv_rec);
4609: --- Validate all non-missing attributes (Item Level Validation)
4610: l_return_status := Validate_Attributes(l_def_silv_rec);
4611: --- If any errors happen abort API
4612: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4613: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4614: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4615: RAISE OKC_API.G_EXCEPTION_ERROR;
4616: END IF;
4609: --- Validate all non-missing attributes (Item Level Validation)
4610: l_return_status := Validate_Attributes(l_def_silv_rec);
4611: --- If any errors happen abort API
4612: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4613: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4614: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4615: RAISE OKC_API.G_EXCEPTION_ERROR;
4616: END IF;
4617: l_return_status := Validate_Record(l_def_silv_rec);
4610: l_return_status := Validate_Attributes(l_def_silv_rec);
4611: --- If any errors happen abort API
4612: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4613: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4614: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4615: RAISE OKC_API.G_EXCEPTION_ERROR;
4616: END IF;
4617: l_return_status := Validate_Record(l_def_silv_rec);
4618: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4611: --- If any errors happen abort API
4612: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4613: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4614: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4615: RAISE OKC_API.G_EXCEPTION_ERROR;
4616: END IF;
4617: l_return_status := Validate_Record(l_def_silv_rec);
4618: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4619: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4614: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4615: RAISE OKC_API.G_EXCEPTION_ERROR;
4616: END IF;
4617: l_return_status := Validate_Record(l_def_silv_rec);
4618: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4619: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4620: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4621: RAISE OKC_API.G_EXCEPTION_ERROR;
4622: END IF;
4615: RAISE OKC_API.G_EXCEPTION_ERROR;
4616: END IF;
4617: l_return_status := Validate_Record(l_def_silv_rec);
4618: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4619: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4620: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4621: RAISE OKC_API.G_EXCEPTION_ERROR;
4622: END IF;
4623:
4616: END IF;
4617: l_return_status := Validate_Record(l_def_silv_rec);
4618: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4619: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4620: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4621: RAISE OKC_API.G_EXCEPTION_ERROR;
4622: END IF;
4623:
4624: --------------------------------------
4617: l_return_status := Validate_Record(l_def_silv_rec);
4618: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4619: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4620: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4621: RAISE OKC_API.G_EXCEPTION_ERROR;
4622: END IF;
4623:
4624: --------------------------------------
4625: -- Move VIEW record to "Child" records
4635: x_msg_data,
4636: l_sil_rec,
4637: lx_sil_rec
4638: );
4639: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4640: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4641: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4642: RAISE OKC_API.G_EXCEPTION_ERROR;
4643: END IF;
4636: l_sil_rec,
4637: lx_sil_rec
4638: );
4639: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4640: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4641: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4642: RAISE OKC_API.G_EXCEPTION_ERROR;
4643: END IF;
4644: migrate(lx_sil_rec, l_def_silv_rec);
4637: lx_sil_rec
4638: );
4639: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4640: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4641: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4642: RAISE OKC_API.G_EXCEPTION_ERROR;
4643: END IF;
4644: migrate(lx_sil_rec, l_def_silv_rec);
4645: x_silv_rec := l_def_silv_rec;
4638: );
4639: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4640: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4641: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4642: RAISE OKC_API.G_EXCEPTION_ERROR;
4643: END IF;
4644: migrate(lx_sil_rec, l_def_silv_rec);
4645: x_silv_rec := l_def_silv_rec;
4646: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4642: RAISE OKC_API.G_EXCEPTION_ERROR;
4643: END IF;
4644: migrate(lx_sil_rec, l_def_silv_rec);
4645: x_silv_rec := l_def_silv_rec;
4646: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4647: EXCEPTION
4648: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4649: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4650: (
4644: migrate(lx_sil_rec, l_def_silv_rec);
4645: x_silv_rec := l_def_silv_rec;
4646: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4647: EXCEPTION
4648: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4649: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4650: (
4651: l_api_name,
4652: G_PKG_NAME,
4645: x_silv_rec := l_def_silv_rec;
4646: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4647: EXCEPTION
4648: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4649: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4650: (
4651: l_api_name,
4652: G_PKG_NAME,
4653: 'OKC_API.G_RET_STS_ERROR',
4649: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4650: (
4651: l_api_name,
4652: G_PKG_NAME,
4653: 'OKC_API.G_RET_STS_ERROR',
4654: x_msg_count,
4655: x_msg_data,
4656: '_PVT'
4657: );
4654: x_msg_count,
4655: x_msg_data,
4656: '_PVT'
4657: );
4658: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4659: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4660: (
4661: l_api_name,
4662: G_PKG_NAME,
4655: x_msg_data,
4656: '_PVT'
4657: );
4658: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4659: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4660: (
4661: l_api_name,
4662: G_PKG_NAME,
4663: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4659: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4660: (
4661: l_api_name,
4662: G_PKG_NAME,
4663: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4664: x_msg_count,
4665: x_msg_data,
4666: '_PVT'
4667: );
4665: x_msg_data,
4666: '_PVT'
4667: );
4668: WHEN OTHERS THEN
4669: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4670: (
4671: l_api_name,
4672: G_PKG_NAME,
4673: 'OTHERS',
4680: -- PL/SQL TBL update_row for:SILV_TBL --
4681: ----------------------------------------
4682: PROCEDURE update_row(
4683: p_api_version IN NUMBER,
4684: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
4685: x_return_status OUT NOCOPY VARCHAR2,
4686: x_msg_count OUT NOCOPY NUMBER,
4687: x_msg_data OUT NOCOPY VARCHAR2,
4688: p_silv_tbl IN silv_tbl_type,
4689: x_silv_tbl OUT NOCOPY silv_tbl_type) IS
4690:
4691: l_api_version CONSTANT NUMBER := 1;
4692: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
4693: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4694: i NUMBER := 0;
4695: -- START change : mvasudev, 08/15/2001
4696: -- Adding OverAll Status Flag
4697: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4693: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4694: i NUMBER := 0;
4695: -- START change : mvasudev, 08/15/2001
4696: -- Adding OverAll Status Flag
4697: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4698: -- END change : mvasudev
4699: BEGIN
4700: OKC_API.init_msg_list(p_init_msg_list);
4701: -- Make sure PL/SQL table has records in it before passing
4696: -- Adding OverAll Status Flag
4697: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4698: -- END change : mvasudev
4699: BEGIN
4700: OKC_API.init_msg_list(p_init_msg_list);
4701: -- Make sure PL/SQL table has records in it before passing
4702: IF (p_silv_tbl.COUNT > 0) THEN
4703: i := p_silv_tbl.FIRST;
4704: LOOP
4703: i := p_silv_tbl.FIRST;
4704: LOOP
4705: update_row (
4706: p_api_version => p_api_version,
4707: p_init_msg_list => OKC_API.G_FALSE,
4708: x_return_status => x_return_status,
4709: x_msg_count => x_msg_count,
4710: x_msg_data => x_msg_data,
4711: p_silv_rec => p_silv_tbl(i),
4713: EXIT WHEN (i = p_silv_tbl.LAST);
4714: i := p_silv_tbl.NEXT(i);
4715: -- START change : mvasudev, 08/15/2001
4716: -- store the highest degree of error
4717: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
4718: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
4719: l_overall_status := x_return_status;
4720: END IF;
4721: END IF;
4714: i := p_silv_tbl.NEXT(i);
4715: -- START change : mvasudev, 08/15/2001
4716: -- store the highest degree of error
4717: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
4718: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
4719: l_overall_status := x_return_status;
4720: END IF;
4721: END IF;
4722: -- END change : mvasudev
4726: x_return_status := l_overall_status;
4727: -- END change : mvasudev
4728: END IF;
4729: EXCEPTION
4730: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4731: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4732: (
4733: l_api_name,
4734: G_PKG_NAME,
4727: -- END change : mvasudev
4728: END IF;
4729: EXCEPTION
4730: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4731: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4732: (
4733: l_api_name,
4734: G_PKG_NAME,
4735: 'OKC_API.G_RET_STS_ERROR',
4731: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4732: (
4733: l_api_name,
4734: G_PKG_NAME,
4735: 'OKC_API.G_RET_STS_ERROR',
4736: x_msg_count,
4737: x_msg_data,
4738: '_PVT'
4739: );
4736: x_msg_count,
4737: x_msg_data,
4738: '_PVT'
4739: );
4740: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4741: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4742: (
4743: l_api_name,
4744: G_PKG_NAME,
4737: x_msg_data,
4738: '_PVT'
4739: );
4740: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4741: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4742: (
4743: l_api_name,
4744: G_PKG_NAME,
4745: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4741: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4742: (
4743: l_api_name,
4744: G_PKG_NAME,
4745: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4746: x_msg_count,
4747: x_msg_data,
4748: '_PVT'
4749: );
4747: x_msg_data,
4748: '_PVT'
4749: );
4750: WHEN OTHERS THEN
4751: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4752: (
4753: l_api_name,
4754: G_PKG_NAME,
4755: 'OTHERS',
4765: ----------------------------------
4766: -- delete_row for:OKL_SIF_LINES --
4767: ----------------------------------
4768: PROCEDURE delete_row(
4769: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
4770: x_return_status OUT NOCOPY VARCHAR2,
4771: x_msg_count OUT NOCOPY NUMBER,
4772: x_msg_data OUT NOCOPY VARCHAR2,
4773: p_sil_rec IN sil_rec_type) IS
4773: p_sil_rec IN sil_rec_type) IS
4774:
4775: l_api_version CONSTANT NUMBER := 1;
4776: l_api_name CONSTANT VARCHAR2(30) := 'LINES_delete_row';
4777: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4778: l_sil_rec sil_rec_type:= p_sil_rec;
4779: l_row_notfound BOOLEAN := TRUE;
4780: BEGIN
4781: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
4777: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4778: l_sil_rec sil_rec_type:= p_sil_rec;
4779: l_row_notfound BOOLEAN := TRUE;
4780: BEGIN
4781: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
4782: p_init_msg_list,
4783: '_PVT',
4784: x_return_status);
4785: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4781: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
4782: p_init_msg_list,
4783: '_PVT',
4784: x_return_status);
4785: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4786: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4787: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4788: RAISE OKC_API.G_EXCEPTION_ERROR;
4789: END IF;
4782: p_init_msg_list,
4783: '_PVT',
4784: x_return_status);
4785: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4786: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4787: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4788: RAISE OKC_API.G_EXCEPTION_ERROR;
4789: END IF;
4790: DELETE FROM OKL_SIF_LINES
4783: '_PVT',
4784: x_return_status);
4785: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4786: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4787: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4788: RAISE OKC_API.G_EXCEPTION_ERROR;
4789: END IF;
4790: DELETE FROM OKL_SIF_LINES
4791: WHERE ID = l_sil_rec.id;
4784: x_return_status);
4785: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4786: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4787: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4788: RAISE OKC_API.G_EXCEPTION_ERROR;
4789: END IF;
4790: DELETE FROM OKL_SIF_LINES
4791: WHERE ID = l_sil_rec.id;
4792:
4789: END IF;
4790: DELETE FROM OKL_SIF_LINES
4791: WHERE ID = l_sil_rec.id;
4792:
4793: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4794: EXCEPTION
4795: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4796: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4797: (
4791: WHERE ID = l_sil_rec.id;
4792:
4793: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4794: EXCEPTION
4795: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4796: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4797: (
4798: l_api_name,
4799: G_PKG_NAME,
4792:
4793: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4794: EXCEPTION
4795: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4796: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4797: (
4798: l_api_name,
4799: G_PKG_NAME,
4800: 'OKC_API.G_RET_STS_ERROR',
4796: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4797: (
4798: l_api_name,
4799: G_PKG_NAME,
4800: 'OKC_API.G_RET_STS_ERROR',
4801: x_msg_count,
4802: x_msg_data,
4803: '_PVT'
4804: );
4801: x_msg_count,
4802: x_msg_data,
4803: '_PVT'
4804: );
4805: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4806: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4807: (
4808: l_api_name,
4809: G_PKG_NAME,
4802: x_msg_data,
4803: '_PVT'
4804: );
4805: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4806: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4807: (
4808: l_api_name,
4809: G_PKG_NAME,
4810: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4806: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4807: (
4808: l_api_name,
4809: G_PKG_NAME,
4810: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4811: x_msg_count,
4812: x_msg_data,
4813: '_PVT'
4814: );
4812: x_msg_data,
4813: '_PVT'
4814: );
4815: WHEN OTHERS THEN
4816: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4817: (
4818: l_api_name,
4819: G_PKG_NAME,
4820: 'OTHERS',
4827: -- delete_row for:OKL_SIF_LINES_V --
4828: ------------------------------------
4829: PROCEDURE delete_row(
4830: p_api_version IN NUMBER,
4831: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
4832: x_return_status OUT NOCOPY VARCHAR2,
4833: x_msg_count OUT NOCOPY NUMBER,
4834: x_msg_data OUT NOCOPY VARCHAR2,
4835: p_silv_rec IN silv_rec_type) IS
4835: p_silv_rec IN silv_rec_type) IS
4836:
4837: l_api_version CONSTANT NUMBER := 1;
4838: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
4839: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4840: l_silv_rec silv_rec_type := p_silv_rec;
4841: l_sil_rec sil_rec_type;
4842: BEGIN
4843: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
4839: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4840: l_silv_rec silv_rec_type := p_silv_rec;
4841: l_sil_rec sil_rec_type;
4842: BEGIN
4843: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
4844: G_PKG_NAME,
4845: p_init_msg_list,
4846: l_api_version,
4847: p_api_version,
4846: l_api_version,
4847: p_api_version,
4848: '_PVT',
4849: x_return_status);
4850: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4851: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4852: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4853: RAISE OKC_API.G_EXCEPTION_ERROR;
4854: END IF;
4847: p_api_version,
4848: '_PVT',
4849: x_return_status);
4850: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4851: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4852: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4853: RAISE OKC_API.G_EXCEPTION_ERROR;
4854: END IF;
4855: --------------------------------------
4848: '_PVT',
4849: x_return_status);
4850: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4851: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4852: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4853: RAISE OKC_API.G_EXCEPTION_ERROR;
4854: END IF;
4855: --------------------------------------
4856: -- Move VIEW record to "Child" records
4849: x_return_status);
4850: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4851: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4852: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4853: RAISE OKC_API.G_EXCEPTION_ERROR;
4854: END IF;
4855: --------------------------------------
4856: -- Move VIEW record to "Child" records
4857: --------------------------------------
4865: x_msg_count,
4866: x_msg_data,
4867: l_sil_rec
4868: );
4869: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4870: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4871: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4872: RAISE OKC_API.G_EXCEPTION_ERROR;
4873: END IF;
4866: x_msg_data,
4867: l_sil_rec
4868: );
4869: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4870: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4871: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4872: RAISE OKC_API.G_EXCEPTION_ERROR;
4873: END IF;
4874: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4867: l_sil_rec
4868: );
4869: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4870: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4871: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4872: RAISE OKC_API.G_EXCEPTION_ERROR;
4873: END IF;
4874: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4875: EXCEPTION
4868: );
4869: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4870: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4871: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4872: RAISE OKC_API.G_EXCEPTION_ERROR;
4873: END IF;
4874: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4875: EXCEPTION
4876: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4870: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4871: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4872: RAISE OKC_API.G_EXCEPTION_ERROR;
4873: END IF;
4874: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4875: EXCEPTION
4876: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4877: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4878: (
4872: RAISE OKC_API.G_EXCEPTION_ERROR;
4873: END IF;
4874: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4875: EXCEPTION
4876: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4877: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4878: (
4879: l_api_name,
4880: G_PKG_NAME,
4873: END IF;
4874: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4875: EXCEPTION
4876: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4877: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4878: (
4879: l_api_name,
4880: G_PKG_NAME,
4881: 'OKC_API.G_RET_STS_ERROR',
4877: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4878: (
4879: l_api_name,
4880: G_PKG_NAME,
4881: 'OKC_API.G_RET_STS_ERROR',
4882: x_msg_count,
4883: x_msg_data,
4884: '_PVT'
4885: );
4882: x_msg_count,
4883: x_msg_data,
4884: '_PVT'
4885: );
4886: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4887: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4888: (
4889: l_api_name,
4890: G_PKG_NAME,
4883: x_msg_data,
4884: '_PVT'
4885: );
4886: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4887: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4888: (
4889: l_api_name,
4890: G_PKG_NAME,
4891: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4887: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4888: (
4889: l_api_name,
4890: G_PKG_NAME,
4891: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4892: x_msg_count,
4893: x_msg_data,
4894: '_PVT'
4895: );
4893: x_msg_data,
4894: '_PVT'
4895: );
4896: WHEN OTHERS THEN
4897: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4898: (
4899: l_api_name,
4900: G_PKG_NAME,
4901: 'OTHERS',
4908: -- PL/SQL TBL delete_row for:SILV_TBL --
4909: ----------------------------------------
4910: PROCEDURE delete_row(
4911: p_api_version IN NUMBER,
4912: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
4913: x_return_status OUT NOCOPY VARCHAR2,
4914: x_msg_count OUT NOCOPY NUMBER,
4915: x_msg_data OUT NOCOPY VARCHAR2,
4916: p_silv_tbl IN silv_tbl_type) IS
4916: p_silv_tbl IN silv_tbl_type) IS
4917:
4918: l_api_version CONSTANT NUMBER := 1;
4919: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
4920: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4921: i NUMBER := 0;
4922: -- START change : mvasudev, 08/15/2001
4923: -- Adding OverAll Status Flag
4924: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4920: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4921: i NUMBER := 0;
4922: -- START change : mvasudev, 08/15/2001
4923: -- Adding OverAll Status Flag
4924: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4925: -- END change : mvasudev
4926: BEGIN
4927: OKC_API.init_msg_list(p_init_msg_list);
4928: -- Make sure PL/SQL table has records in it before passing
4923: -- Adding OverAll Status Flag
4924: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4925: -- END change : mvasudev
4926: BEGIN
4927: OKC_API.init_msg_list(p_init_msg_list);
4928: -- Make sure PL/SQL table has records in it before passing
4929: IF (p_silv_tbl.COUNT > 0) THEN
4930: i := p_silv_tbl.FIRST;
4931: LOOP
4930: i := p_silv_tbl.FIRST;
4931: LOOP
4932: delete_row (
4933: p_api_version => p_api_version,
4934: p_init_msg_list => OKC_API.G_FALSE,
4935: x_return_status => x_return_status,
4936: x_msg_count => x_msg_count,
4937: x_msg_data => x_msg_data,
4938: p_silv_rec => p_silv_tbl(i));
4939: EXIT WHEN (i = p_silv_tbl.LAST);
4940: i := p_silv_tbl.NEXT(i);
4941: -- START change : mvasudev, 08/15/2001
4942: -- store the highest degree of error
4943: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
4944: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
4945: l_overall_status := x_return_status;
4946: END IF;
4947: END IF;
4940: i := p_silv_tbl.NEXT(i);
4941: -- START change : mvasudev, 08/15/2001
4942: -- store the highest degree of error
4943: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
4944: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
4945: l_overall_status := x_return_status;
4946: END IF;
4947: END IF;
4948: -- END change : mvasudev
4952: x_return_status := l_overall_status;
4953: -- END change : mvasudev
4954: END IF;
4955: EXCEPTION
4956: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4957: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4958: (
4959: l_api_name,
4960: G_PKG_NAME,
4953: -- END change : mvasudev
4954: END IF;
4955: EXCEPTION
4956: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4957: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4958: (
4959: l_api_name,
4960: G_PKG_NAME,
4961: 'OKC_API.G_RET_STS_ERROR',
4957: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4958: (
4959: l_api_name,
4960: G_PKG_NAME,
4961: 'OKC_API.G_RET_STS_ERROR',
4962: x_msg_count,
4963: x_msg_data,
4964: '_PVT'
4965: );
4962: x_msg_count,
4963: x_msg_data,
4964: '_PVT'
4965: );
4966: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4967: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4968: (
4969: l_api_name,
4970: G_PKG_NAME,
4963: x_msg_data,
4964: '_PVT'
4965: );
4966: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4967: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4968: (
4969: l_api_name,
4970: G_PKG_NAME,
4971: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4967: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4968: (
4969: l_api_name,
4970: G_PKG_NAME,
4971: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4972: x_msg_count,
4973: x_msg_data,
4974: '_PVT'
4975: );
4973: x_msg_data,
4974: '_PVT'
4975: );
4976: WHEN OTHERS THEN
4977: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4978: (
4979: l_api_name,
4980: G_PKG_NAME,
4981: 'OTHERS',