366: p_saov_rec IN saov_rec_type
367: ) RETURN saov_rec_type IS
368: l_saov_rec saov_rec_type := p_saov_rec;
369: BEGIN
370: IF (l_saov_rec.object_version_number = Okc_Api.G_MISS_NUM) THEN
371: l_saov_rec.object_version_number := NULL;
372: END IF;
373: IF (l_saov_rec.set_of_books_id = Okc_Api.G_MISS_NUM) THEN
374: l_saov_rec.set_of_books_id := NULL;
369: BEGIN
370: IF (l_saov_rec.object_version_number = Okc_Api.G_MISS_NUM) THEN
371: l_saov_rec.object_version_number := NULL;
372: END IF;
373: IF (l_saov_rec.set_of_books_id = Okc_Api.G_MISS_NUM) THEN
374: l_saov_rec.set_of_books_id := NULL;
375: END IF;
376: IF (l_saov_rec.code_combination_id = Okc_Api.G_MISS_NUM) THEN
377: l_saov_rec.code_combination_id := NULL;
372: END IF;
373: IF (l_saov_rec.set_of_books_id = Okc_Api.G_MISS_NUM) THEN
374: l_saov_rec.set_of_books_id := NULL;
375: END IF;
376: IF (l_saov_rec.code_combination_id = Okc_Api.G_MISS_NUM) THEN
377: l_saov_rec.code_combination_id := NULL;
378: END IF;
379: IF (l_saov_rec.cc_rep_currency_code = Okc_Api.G_MISS_CHAR) THEN
380: l_saov_rec.cc_rep_currency_code := NULL;
375: END IF;
376: IF (l_saov_rec.code_combination_id = Okc_Api.G_MISS_NUM) THEN
377: l_saov_rec.code_combination_id := NULL;
378: END IF;
379: IF (l_saov_rec.cc_rep_currency_code = Okc_Api.G_MISS_CHAR) THEN
380: l_saov_rec.cc_rep_currency_code := NULL;
381: END IF;
382: IF (l_saov_rec.ael_rep_currency_code = Okc_Api.G_MISS_CHAR) THEN
383: l_saov_rec.ael_rep_currency_code := NULL;
378: END IF;
379: IF (l_saov_rec.cc_rep_currency_code = Okc_Api.G_MISS_CHAR) THEN
380: l_saov_rec.cc_rep_currency_code := NULL;
381: END IF;
382: IF (l_saov_rec.ael_rep_currency_code = Okc_Api.G_MISS_CHAR) THEN
383: l_saov_rec.ael_rep_currency_code := NULL;
384: END IF;
385: IF (l_saov_rec.rec_ccid = Okc_Api.G_MISS_NUM) THEN
386: l_saov_rec.rec_ccid := NULL;
381: END IF;
382: IF (l_saov_rec.ael_rep_currency_code = Okc_Api.G_MISS_CHAR) THEN
383: l_saov_rec.ael_rep_currency_code := NULL;
384: END IF;
385: IF (l_saov_rec.rec_ccid = Okc_Api.G_MISS_NUM) THEN
386: l_saov_rec.rec_ccid := NULL;
387: END IF;
388: IF (l_saov_rec.realized_gain_ccid = Okc_Api.G_MISS_NUM) THEN
389: l_saov_rec.realized_gain_ccid := NULL;
384: END IF;
385: IF (l_saov_rec.rec_ccid = Okc_Api.G_MISS_NUM) THEN
386: l_saov_rec.rec_ccid := NULL;
387: END IF;
388: IF (l_saov_rec.realized_gain_ccid = Okc_Api.G_MISS_NUM) THEN
389: l_saov_rec.realized_gain_ccid := NULL;
390: END IF;
391: IF (l_saov_rec.realized_loss_ccid = Okc_Api.G_MISS_NUM) THEN
392: l_saov_rec.realized_loss_ccid := NULL;
387: END IF;
388: IF (l_saov_rec.realized_gain_ccid = Okc_Api.G_MISS_NUM) THEN
389: l_saov_rec.realized_gain_ccid := NULL;
390: END IF;
391: IF (l_saov_rec.realized_loss_ccid = Okc_Api.G_MISS_NUM) THEN
392: l_saov_rec.realized_loss_ccid := NULL;
393: END IF;
394: IF (l_saov_rec.tax_ccid = Okc_Api.G_MISS_NUM) THEN
395: l_saov_rec.tax_ccid := NULL;
390: END IF;
391: IF (l_saov_rec.realized_loss_ccid = Okc_Api.G_MISS_NUM) THEN
392: l_saov_rec.realized_loss_ccid := NULL;
393: END IF;
394: IF (l_saov_rec.tax_ccid = Okc_Api.G_MISS_NUM) THEN
395: l_saov_rec.tax_ccid := NULL;
396: END IF;
397: IF (l_saov_rec.cross_currency_ccid = Okc_Api.G_MISS_NUM) THEN
398: l_saov_rec.cross_currency_ccid := NULL;
393: END IF;
394: IF (l_saov_rec.tax_ccid = Okc_Api.G_MISS_NUM) THEN
395: l_saov_rec.tax_ccid := NULL;
396: END IF;
397: IF (l_saov_rec.cross_currency_ccid = Okc_Api.G_MISS_NUM) THEN
398: l_saov_rec.cross_currency_ccid := NULL;
399: END IF;
400: IF (l_saov_rec.rounding_ccid = Okc_Api.G_MISS_NUM) THEN
401: l_saov_rec.rounding_ccid := NULL;
396: END IF;
397: IF (l_saov_rec.cross_currency_ccid = Okc_Api.G_MISS_NUM) THEN
398: l_saov_rec.cross_currency_ccid := NULL;
399: END IF;
400: IF (l_saov_rec.rounding_ccid = Okc_Api.G_MISS_NUM) THEN
401: l_saov_rec.rounding_ccid := NULL;
402: END IF;
403: IF (l_saov_rec.ar_clearing_ccid = Okc_Api.G_MISS_NUM) THEN
404: l_saov_rec.ar_clearing_ccid := NULL;
399: END IF;
400: IF (l_saov_rec.rounding_ccid = Okc_Api.G_MISS_NUM) THEN
401: l_saov_rec.rounding_ccid := NULL;
402: END IF;
403: IF (l_saov_rec.ar_clearing_ccid = Okc_Api.G_MISS_NUM) THEN
404: l_saov_rec.ar_clearing_ccid := NULL;
405: END IF;
406: IF (l_saov_rec.payables_ccid = Okc_Api.G_MISS_NUM) THEN
407: l_saov_rec.payables_ccid := NULL;
402: END IF;
403: IF (l_saov_rec.ar_clearing_ccid = Okc_Api.G_MISS_NUM) THEN
404: l_saov_rec.ar_clearing_ccid := NULL;
405: END IF;
406: IF (l_saov_rec.payables_ccid = Okc_Api.G_MISS_NUM) THEN
407: l_saov_rec.payables_ccid := NULL;
408: END IF;
409: IF (l_saov_rec.liablity_ccid = Okc_Api.G_MISS_NUM) THEN
410: l_saov_rec.liablity_ccid := NULL;
405: END IF;
406: IF (l_saov_rec.payables_ccid = Okc_Api.G_MISS_NUM) THEN
407: l_saov_rec.payables_ccid := NULL;
408: END IF;
409: IF (l_saov_rec.liablity_ccid = Okc_Api.G_MISS_NUM) THEN
410: l_saov_rec.liablity_ccid := NULL;
411: END IF;
412: IF (l_saov_rec.pre_payment_ccid = Okc_Api.G_MISS_NUM) THEN
413: l_saov_rec.pre_payment_ccid := NULL;
408: END IF;
409: IF (l_saov_rec.liablity_ccid = Okc_Api.G_MISS_NUM) THEN
410: l_saov_rec.liablity_ccid := NULL;
411: END IF;
412: IF (l_saov_rec.pre_payment_ccid = Okc_Api.G_MISS_NUM) THEN
413: l_saov_rec.pre_payment_ccid := NULL;
414: END IF;
415: IF (l_saov_rec.fut_date_pay_ccid = Okc_Api.G_MISS_NUM) THEN
416: l_saov_rec.fut_date_pay_ccid := NULL;
411: END IF;
412: IF (l_saov_rec.pre_payment_ccid = Okc_Api.G_MISS_NUM) THEN
413: l_saov_rec.pre_payment_ccid := NULL;
414: END IF;
415: IF (l_saov_rec.fut_date_pay_ccid = Okc_Api.G_MISS_NUM) THEN
416: l_saov_rec.fut_date_pay_ccid := NULL;
417: END IF;
418: IF (l_saov_rec.dis_taken_ccid = Okc_Api.G_MISS_NUM) THEN
419: l_saov_rec.dis_taken_ccid := NULL;
414: END IF;
415: IF (l_saov_rec.fut_date_pay_ccid = Okc_Api.G_MISS_NUM) THEN
416: l_saov_rec.fut_date_pay_ccid := NULL;
417: END IF;
418: IF (l_saov_rec.dis_taken_ccid = Okc_Api.G_MISS_NUM) THEN
419: l_saov_rec.dis_taken_ccid := NULL;
420: END IF;
421: IF (l_saov_rec.ap_clearing_ccid = Okc_Api.G_MISS_NUM) THEN
422: l_saov_rec.ap_clearing_ccid := NULL;
417: END IF;
418: IF (l_saov_rec.dis_taken_ccid = Okc_Api.G_MISS_NUM) THEN
419: l_saov_rec.dis_taken_ccid := NULL;
420: END IF;
421: IF (l_saov_rec.ap_clearing_ccid = Okc_Api.G_MISS_NUM) THEN
422: l_saov_rec.ap_clearing_ccid := NULL;
423: END IF;
424: IF (l_saov_rec.ael_rounding_rule = Okc_Api.G_MISS_CHAR) THEN
425: l_saov_rec.ael_rounding_rule := NULL;
420: END IF;
421: IF (l_saov_rec.ap_clearing_ccid = Okc_Api.G_MISS_NUM) THEN
422: l_saov_rec.ap_clearing_ccid := NULL;
423: END IF;
424: IF (l_saov_rec.ael_rounding_rule = Okc_Api.G_MISS_CHAR) THEN
425: l_saov_rec.ael_rounding_rule := NULL;
426: END IF;
427: IF (l_saov_rec.ael_precision = Okc_Api.G_MISS_NUM) THEN
428: l_saov_rec.ael_precision := NULL;
423: END IF;
424: IF (l_saov_rec.ael_rounding_rule = Okc_Api.G_MISS_CHAR) THEN
425: l_saov_rec.ael_rounding_rule := NULL;
426: END IF;
427: IF (l_saov_rec.ael_precision = Okc_Api.G_MISS_NUM) THEN
428: l_saov_rec.ael_precision := NULL;
429: END IF;
430: IF (l_saov_rec.ael_min_acct_unit = Okc_Api.G_MISS_NUM) THEN
431: l_saov_rec.ael_min_acct_unit := NULL;
426: END IF;
427: IF (l_saov_rec.ael_precision = Okc_Api.G_MISS_NUM) THEN
428: l_saov_rec.ael_precision := NULL;
429: END IF;
430: IF (l_saov_rec.ael_min_acct_unit = Okc_Api.G_MISS_NUM) THEN
431: l_saov_rec.ael_min_acct_unit := NULL;
432: END IF;
433: IF (l_saov_rec.cc_rounding_rule = Okc_Api.G_MISS_CHAR) THEN
434: l_saov_rec.cc_rounding_rule := NULL;
429: END IF;
430: IF (l_saov_rec.ael_min_acct_unit = Okc_Api.G_MISS_NUM) THEN
431: l_saov_rec.ael_min_acct_unit := NULL;
432: END IF;
433: IF (l_saov_rec.cc_rounding_rule = Okc_Api.G_MISS_CHAR) THEN
434: l_saov_rec.cc_rounding_rule := NULL;
435: END IF;
436: IF (l_saov_rec.cc_precision = Okc_Api.G_MISS_NUM) THEN
437: l_saov_rec.cc_precision := NULL;
432: END IF;
433: IF (l_saov_rec.cc_rounding_rule = Okc_Api.G_MISS_CHAR) THEN
434: l_saov_rec.cc_rounding_rule := NULL;
435: END IF;
436: IF (l_saov_rec.cc_precision = Okc_Api.G_MISS_NUM) THEN
437: l_saov_rec.cc_precision := NULL;
438: END IF;
439: IF (l_saov_rec.cc_min_acct_unit = Okc_Api.G_MISS_NUM) THEN
440: l_saov_rec.cc_min_acct_unit := NULL;
435: END IF;
436: IF (l_saov_rec.cc_precision = Okc_Api.G_MISS_NUM) THEN
437: l_saov_rec.cc_precision := NULL;
438: END IF;
439: IF (l_saov_rec.cc_min_acct_unit = Okc_Api.G_MISS_NUM) THEN
440: l_saov_rec.cc_min_acct_unit := NULL;
441: END IF;
442: IF (l_saov_rec.attribute_category = Okc_Api.G_MISS_CHAR) THEN
443: l_saov_rec.attribute_category := NULL;
438: END IF;
439: IF (l_saov_rec.cc_min_acct_unit = Okc_Api.G_MISS_NUM) THEN
440: l_saov_rec.cc_min_acct_unit := NULL;
441: END IF;
442: IF (l_saov_rec.attribute_category = Okc_Api.G_MISS_CHAR) THEN
443: l_saov_rec.attribute_category := NULL;
444: END IF;
445: IF (l_saov_rec.attribute1 = Okc_Api.G_MISS_CHAR) THEN
446: l_saov_rec.attribute1 := NULL;
441: END IF;
442: IF (l_saov_rec.attribute_category = Okc_Api.G_MISS_CHAR) THEN
443: l_saov_rec.attribute_category := NULL;
444: END IF;
445: IF (l_saov_rec.attribute1 = Okc_Api.G_MISS_CHAR) THEN
446: l_saov_rec.attribute1 := NULL;
447: END IF;
448: IF (l_saov_rec.attribute2 = Okc_Api.G_MISS_CHAR) THEN
449: l_saov_rec.attribute2 := NULL;
444: END IF;
445: IF (l_saov_rec.attribute1 = Okc_Api.G_MISS_CHAR) THEN
446: l_saov_rec.attribute1 := NULL;
447: END IF;
448: IF (l_saov_rec.attribute2 = Okc_Api.G_MISS_CHAR) THEN
449: l_saov_rec.attribute2 := NULL;
450: END IF;
451: IF (l_saov_rec.attribute3 = Okc_Api.G_MISS_CHAR) THEN
452: l_saov_rec.attribute3 := NULL;
447: END IF;
448: IF (l_saov_rec.attribute2 = Okc_Api.G_MISS_CHAR) THEN
449: l_saov_rec.attribute2 := NULL;
450: END IF;
451: IF (l_saov_rec.attribute3 = Okc_Api.G_MISS_CHAR) THEN
452: l_saov_rec.attribute3 := NULL;
453: END IF;
454: IF (l_saov_rec.attribute4 = Okc_Api.G_MISS_CHAR) THEN
455: l_saov_rec.attribute4 := NULL;
450: END IF;
451: IF (l_saov_rec.attribute3 = Okc_Api.G_MISS_CHAR) THEN
452: l_saov_rec.attribute3 := NULL;
453: END IF;
454: IF (l_saov_rec.attribute4 = Okc_Api.G_MISS_CHAR) THEN
455: l_saov_rec.attribute4 := NULL;
456: END IF;
457: IF (l_saov_rec.attribute5 = Okc_Api.G_MISS_CHAR) THEN
458: l_saov_rec.attribute5 := NULL;
453: END IF;
454: IF (l_saov_rec.attribute4 = Okc_Api.G_MISS_CHAR) THEN
455: l_saov_rec.attribute4 := NULL;
456: END IF;
457: IF (l_saov_rec.attribute5 = Okc_Api.G_MISS_CHAR) THEN
458: l_saov_rec.attribute5 := NULL;
459: END IF;
460: IF (l_saov_rec.attribute6 = Okc_Api.G_MISS_CHAR) THEN
461: l_saov_rec.attribute6 := NULL;
456: END IF;
457: IF (l_saov_rec.attribute5 = Okc_Api.G_MISS_CHAR) THEN
458: l_saov_rec.attribute5 := NULL;
459: END IF;
460: IF (l_saov_rec.attribute6 = Okc_Api.G_MISS_CHAR) THEN
461: l_saov_rec.attribute6 := NULL;
462: END IF;
463: IF (l_saov_rec.attribute7 = Okc_Api.G_MISS_CHAR) THEN
464: l_saov_rec.attribute7 := NULL;
459: END IF;
460: IF (l_saov_rec.attribute6 = Okc_Api.G_MISS_CHAR) THEN
461: l_saov_rec.attribute6 := NULL;
462: END IF;
463: IF (l_saov_rec.attribute7 = Okc_Api.G_MISS_CHAR) THEN
464: l_saov_rec.attribute7 := NULL;
465: END IF;
466: IF (l_saov_rec.attribute8 = Okc_Api.G_MISS_CHAR) THEN
467: l_saov_rec.attribute8 := NULL;
462: END IF;
463: IF (l_saov_rec.attribute7 = Okc_Api.G_MISS_CHAR) THEN
464: l_saov_rec.attribute7 := NULL;
465: END IF;
466: IF (l_saov_rec.attribute8 = Okc_Api.G_MISS_CHAR) THEN
467: l_saov_rec.attribute8 := NULL;
468: END IF;
469: IF (l_saov_rec.attribute9 = Okc_Api.G_MISS_CHAR) THEN
470: l_saov_rec.attribute9 := NULL;
465: END IF;
466: IF (l_saov_rec.attribute8 = Okc_Api.G_MISS_CHAR) THEN
467: l_saov_rec.attribute8 := NULL;
468: END IF;
469: IF (l_saov_rec.attribute9 = Okc_Api.G_MISS_CHAR) THEN
470: l_saov_rec.attribute9 := NULL;
471: END IF;
472: IF (l_saov_rec.attribute10 = Okc_Api.G_MISS_CHAR) THEN
473: l_saov_rec.attribute10 := NULL;
468: END IF;
469: IF (l_saov_rec.attribute9 = Okc_Api.G_MISS_CHAR) THEN
470: l_saov_rec.attribute9 := NULL;
471: END IF;
472: IF (l_saov_rec.attribute10 = Okc_Api.G_MISS_CHAR) THEN
473: l_saov_rec.attribute10 := NULL;
474: END IF;
475: IF (l_saov_rec.attribute11 = Okc_Api.G_MISS_CHAR) THEN
476: l_saov_rec.attribute11 := NULL;
471: END IF;
472: IF (l_saov_rec.attribute10 = Okc_Api.G_MISS_CHAR) THEN
473: l_saov_rec.attribute10 := NULL;
474: END IF;
475: IF (l_saov_rec.attribute11 = Okc_Api.G_MISS_CHAR) THEN
476: l_saov_rec.attribute11 := NULL;
477: END IF;
478: IF (l_saov_rec.attribute12 = Okc_Api.G_MISS_CHAR) THEN
479: l_saov_rec.attribute12 := NULL;
474: END IF;
475: IF (l_saov_rec.attribute11 = Okc_Api.G_MISS_CHAR) THEN
476: l_saov_rec.attribute11 := NULL;
477: END IF;
478: IF (l_saov_rec.attribute12 = Okc_Api.G_MISS_CHAR) THEN
479: l_saov_rec.attribute12 := NULL;
480: END IF;
481: IF (l_saov_rec.attribute13 = Okc_Api.G_MISS_CHAR) THEN
482: l_saov_rec.attribute13 := NULL;
477: END IF;
478: IF (l_saov_rec.attribute12 = Okc_Api.G_MISS_CHAR) THEN
479: l_saov_rec.attribute12 := NULL;
480: END IF;
481: IF (l_saov_rec.attribute13 = Okc_Api.G_MISS_CHAR) THEN
482: l_saov_rec.attribute13 := NULL;
483: END IF;
484: IF (l_saov_rec.attribute14 = Okc_Api.G_MISS_CHAR) THEN
485: l_saov_rec.attribute14 := NULL;
480: END IF;
481: IF (l_saov_rec.attribute13 = Okc_Api.G_MISS_CHAR) THEN
482: l_saov_rec.attribute13 := NULL;
483: END IF;
484: IF (l_saov_rec.attribute14 = Okc_Api.G_MISS_CHAR) THEN
485: l_saov_rec.attribute14 := NULL;
486: END IF;
487: IF (l_saov_rec.attribute15 = Okc_Api.G_MISS_CHAR) THEN
488: l_saov_rec.attribute15 := NULL;
483: END IF;
484: IF (l_saov_rec.attribute14 = Okc_Api.G_MISS_CHAR) THEN
485: l_saov_rec.attribute14 := NULL;
486: END IF;
487: IF (l_saov_rec.attribute15 = Okc_Api.G_MISS_CHAR) THEN
488: l_saov_rec.attribute15 := NULL;
489: END IF;
490: IF (l_saov_rec.org_id = Okc_Api.G_MISS_NUM) THEN
491: l_saov_rec.org_id := NULL;
486: END IF;
487: IF (l_saov_rec.attribute15 = Okc_Api.G_MISS_CHAR) THEN
488: l_saov_rec.attribute15 := NULL;
489: END IF;
490: IF (l_saov_rec.org_id = Okc_Api.G_MISS_NUM) THEN
491: l_saov_rec.org_id := NULL;
492: END IF;
493: IF (l_saov_rec.created_by = Okc_Api.G_MISS_NUM) THEN
494: l_saov_rec.created_by := NULL;
489: END IF;
490: IF (l_saov_rec.org_id = Okc_Api.G_MISS_NUM) THEN
491: l_saov_rec.org_id := NULL;
492: END IF;
493: IF (l_saov_rec.created_by = Okc_Api.G_MISS_NUM) THEN
494: l_saov_rec.created_by := NULL;
495: END IF;
496: IF (l_saov_rec.creation_date = Okc_Api.G_MISS_DATE) THEN
497: l_saov_rec.creation_date := NULL;
492: END IF;
493: IF (l_saov_rec.created_by = Okc_Api.G_MISS_NUM) THEN
494: l_saov_rec.created_by := NULL;
495: END IF;
496: IF (l_saov_rec.creation_date = Okc_Api.G_MISS_DATE) THEN
497: l_saov_rec.creation_date := NULL;
498: END IF;
499: IF (l_saov_rec.last_updated_by = Okc_Api.G_MISS_NUM) THEN
500: l_saov_rec.last_updated_by := NULL;
495: END IF;
496: IF (l_saov_rec.creation_date = Okc_Api.G_MISS_DATE) THEN
497: l_saov_rec.creation_date := NULL;
498: END IF;
499: IF (l_saov_rec.last_updated_by = Okc_Api.G_MISS_NUM) THEN
500: l_saov_rec.last_updated_by := NULL;
501: END IF;
502: IF (l_saov_rec.last_update_date = Okc_Api.G_MISS_DATE) THEN
503: l_saov_rec.last_update_date := NULL;
498: END IF;
499: IF (l_saov_rec.last_updated_by = Okc_Api.G_MISS_NUM) THEN
500: l_saov_rec.last_updated_by := NULL;
501: END IF;
502: IF (l_saov_rec.last_update_date = Okc_Api.G_MISS_DATE) THEN
503: l_saov_rec.last_update_date := NULL;
504: END IF;
505: IF (l_saov_rec.last_update_login = Okc_Api.G_MISS_NUM) THEN
506: l_saov_rec.last_update_login := NULL;
501: END IF;
502: IF (l_saov_rec.last_update_date = Okc_Api.G_MISS_DATE) THEN
503: l_saov_rec.last_update_date := NULL;
504: END IF;
505: IF (l_saov_rec.last_update_login = Okc_Api.G_MISS_NUM) THEN
506: l_saov_rec.last_update_login := NULL;
507: END IF;
508: /* Changed made by Kanti on 06/22/2001. These two fields were added in the table
509: and to make the TAPI consistent, these fields are being added here */
506: l_saov_rec.last_update_login := NULL;
507: END IF;
508: /* Changed made by Kanti on 06/22/2001. These two fields were added in the table
509: and to make the TAPI consistent, these fields are being added here */
510: IF (l_saov_rec.cc_apply_rounding_difference = Okc_Api.G_MISS_CHAR) THEN
511: l_saov_rec.cc_apply_rounding_difference := NULL;
512: END IF;
513: IF (l_saov_rec.ael_apply_rounding_difference = Okc_Api.G_MISS_CHAR) THEN
514: l_saov_rec.ael_apply_rounding_difference := NULL;
509: and to make the TAPI consistent, these fields are being added here */
510: IF (l_saov_rec.cc_apply_rounding_difference = Okc_Api.G_MISS_CHAR) THEN
511: l_saov_rec.cc_apply_rounding_difference := NULL;
512: END IF;
513: IF (l_saov_rec.ael_apply_rounding_difference = Okc_Api.G_MISS_CHAR) THEN
514: l_saov_rec.ael_apply_rounding_difference := NULL;
515: END IF;
516: /* Changes end here */
517: IF (l_saov_rec.accrual_reversal_days = Okc_Api.G_MISS_NUM) THEN
513: IF (l_saov_rec.ael_apply_rounding_difference = Okc_Api.G_MISS_CHAR) THEN
514: l_saov_rec.ael_apply_rounding_difference := NULL;
515: END IF;
516: /* Changes end here */
517: IF (l_saov_rec.accrual_reversal_days = Okc_Api.G_MISS_NUM) THEN
518: l_saov_rec.accrual_reversal_days := NULL;
519: END IF;
520:
521: -- Added new field lke_hold_days for the bug 2331564 by Santonyr
518: l_saov_rec.accrual_reversal_days := NULL;
519: END IF;
520:
521: -- Added new field lke_hold_days for the bug 2331564 by Santonyr
522: IF (l_saov_rec.lke_hold_days = Okc_Api.G_MISS_NUM) THEN
523: l_saov_rec.lke_hold_days := NULL;
524: END IF;
525:
526: -- Added by Keerthi 10-Sep-2003 for Rounding of Amounts in Streams
523: l_saov_rec.lke_hold_days := NULL;
524: END IF;
525:
526: -- Added by Keerthi 10-Sep-2003 for Rounding of Amounts in Streams
527: IF (l_saov_rec.stm_apply_rounding_difference = Okc_Api.G_MISS_CHAR) THEN
528: l_saov_rec.stm_apply_rounding_difference := NULL;
529: END IF;
530:
531: IF (l_saov_rec.stm_rounding_rule = Okc_Api.G_MISS_CHAR) THEN
527: IF (l_saov_rec.stm_apply_rounding_difference = Okc_Api.G_MISS_CHAR) THEN
528: l_saov_rec.stm_apply_rounding_difference := NULL;
529: END IF;
530:
531: IF (l_saov_rec.stm_rounding_rule = Okc_Api.G_MISS_CHAR) THEN
532: l_saov_rec.stm_rounding_rule := NULL;
533: END IF;
534:
535: /*Added new field for bug 4884618(H) */
532: l_saov_rec.stm_rounding_rule := NULL;
533: END IF;
534:
535: /*Added new field for bug 4884618(H) */
536: IF (l_saov_rec.validate_khr_start_date = Okc_Api.G_MISS_CHAR) THEN
537: l_saov_rec.validate_khr_start_date := NULL;
538: END IF;
539: -- R12 SLA Uptake;
540: IF (l_saov_rec.account_derivation = Okc_Api.G_MISS_CHAR) THEN
536: IF (l_saov_rec.validate_khr_start_date = Okc_Api.G_MISS_CHAR) THEN
537: l_saov_rec.validate_khr_start_date := NULL;
538: END IF;
539: -- R12 SLA Uptake;
540: IF (l_saov_rec.account_derivation = Okc_Api.G_MISS_CHAR) THEN
541: l_saov_rec.account_derivation := NULL;
542: END IF;
543: IF (l_saov_rec.isg_arrears_pay_dates_option = Okc_Api.G_MISS_CHAR) THEN
544: l_saov_rec.isg_arrears_pay_dates_option := NULL;
539: -- R12 SLA Uptake;
540: IF (l_saov_rec.account_derivation = Okc_Api.G_MISS_CHAR) THEN
541: l_saov_rec.account_derivation := NULL;
542: END IF;
543: IF (l_saov_rec.isg_arrears_pay_dates_option = Okc_Api.G_MISS_CHAR) THEN
544: l_saov_rec.isg_arrears_pay_dates_option := NULL;
545: END IF;
546: IF (l_saov_rec.PAY_DIST_SET_ID = Okc_Api.G_MISS_NUM) THEN
547: l_saov_rec.PAY_DIST_SET_ID := NULL;
542: END IF;
543: IF (l_saov_rec.isg_arrears_pay_dates_option = Okc_Api.G_MISS_CHAR) THEN
544: l_saov_rec.isg_arrears_pay_dates_option := NULL;
545: END IF;
546: IF (l_saov_rec.PAY_DIST_SET_ID = Okc_Api.G_MISS_NUM) THEN
547: l_saov_rec.PAY_DIST_SET_ID := NULL;
548: END IF;
549: IF (l_saov_rec.SECONDARY_REP_METHOD = Okc_Api.G_MISS_CHAR) THEN --Bug#7225249
550: l_saov_rec.SECONDARY_REP_METHOD := NULL;
545: END IF;
546: IF (l_saov_rec.PAY_DIST_SET_ID = Okc_Api.G_MISS_NUM) THEN
547: l_saov_rec.PAY_DIST_SET_ID := NULL;
548: END IF;
549: IF (l_saov_rec.SECONDARY_REP_METHOD = Okc_Api.G_MISS_CHAR) THEN --Bug#7225249
550: l_saov_rec.SECONDARY_REP_METHOD := NULL;
551: END IF;
552:
553: --Bug# 8370699
550: l_saov_rec.SECONDARY_REP_METHOD := NULL;
551: END IF;
552:
553: --Bug# 8370699
554: IF (l_saov_rec.amort_inc_adj_rev_dt_yn= Okc_Api.G_MISS_CHAR) THEN
555: l_saov_rec.amort_inc_adj_rev_dt_yn:= NULL;
556: END IF;
557:
558: RETURN(l_saov_rec);
569: -------------------------------------------------
570: FUNCTION Validate_Attributes (
571: p_saov_rec IN saov_rec_type
572: ) RETURN VARCHAR2 IS
573: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
574: BEGIN
575: IF p_saov_rec.id = OKC_API.G_MISS_NUM OR
576: p_saov_rec.id IS NULL
577: THEN
571: p_saov_rec IN saov_rec_type
572: ) RETURN VARCHAR2 IS
573: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
574: BEGIN
575: IF p_saov_rec.id = OKC_API.G_MISS_NUM OR
576: p_saov_rec.id IS NULL
577: THEN
578: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
579: l_return_status := OKC_API.G_RET_STS_ERROR;
574: BEGIN
575: IF p_saov_rec.id = OKC_API.G_MISS_NUM OR
576: p_saov_rec.id IS NULL
577: THEN
578: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
579: l_return_status := OKC_API.G_RET_STS_ERROR;
580: ELSIF p_saov_rec.object_version_number = OKC_API.G_MISS_NUM OR
581: p_saov_rec.object_version_number IS NULL
582: THEN
575: IF p_saov_rec.id = OKC_API.G_MISS_NUM OR
576: p_saov_rec.id IS NULL
577: THEN
578: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
579: l_return_status := OKC_API.G_RET_STS_ERROR;
580: ELSIF p_saov_rec.object_version_number = OKC_API.G_MISS_NUM OR
581: p_saov_rec.object_version_number IS NULL
582: THEN
583: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
576: p_saov_rec.id IS NULL
577: THEN
578: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
579: l_return_status := OKC_API.G_RET_STS_ERROR;
580: ELSIF p_saov_rec.object_version_number = OKC_API.G_MISS_NUM OR
581: p_saov_rec.object_version_number IS NULL
582: THEN
583: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
584: l_return_status := OKC_API.G_RET_STS_ERROR;
579: l_return_status := OKC_API.G_RET_STS_ERROR;
580: ELSIF p_saov_rec.object_version_number = OKC_API.G_MISS_NUM OR
581: p_saov_rec.object_version_number IS NULL
582: THEN
583: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
584: l_return_status := OKC_API.G_RET_STS_ERROR;
585: ELSIF p_saov_rec.set_of_books_id = OKC_API.G_MISS_NUM OR
586: p_saov_rec.set_of_books_id IS NULL
587: THEN
580: ELSIF p_saov_rec.object_version_number = OKC_API.G_MISS_NUM OR
581: p_saov_rec.object_version_number IS NULL
582: THEN
583: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
584: l_return_status := OKC_API.G_RET_STS_ERROR;
585: ELSIF p_saov_rec.set_of_books_id = OKC_API.G_MISS_NUM OR
586: p_saov_rec.set_of_books_id IS NULL
587: THEN
588: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'set_of_books_id');
581: p_saov_rec.object_version_number IS NULL
582: THEN
583: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
584: l_return_status := OKC_API.G_RET_STS_ERROR;
585: ELSIF p_saov_rec.set_of_books_id = OKC_API.G_MISS_NUM OR
586: p_saov_rec.set_of_books_id IS NULL
587: THEN
588: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'set_of_books_id');
589: l_return_status := OKC_API.G_RET_STS_ERROR;
584: l_return_status := OKC_API.G_RET_STS_ERROR;
585: ELSIF p_saov_rec.set_of_books_id = OKC_API.G_MISS_NUM OR
586: p_saov_rec.set_of_books_id IS NULL
587: THEN
588: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'set_of_books_id');
589: l_return_status := OKC_API.G_RET_STS_ERROR;
590: ELSIF p_saov_rec.CC_REP_CURRENCY_CODE = OKC_API.G_MISS_CHAR OR
591: p_saov_rec.CC_REP_CURRENCY_CODE IS NULL
592: THEN
585: ELSIF p_saov_rec.set_of_books_id = OKC_API.G_MISS_NUM OR
586: p_saov_rec.set_of_books_id IS NULL
587: THEN
588: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'set_of_books_id');
589: l_return_status := OKC_API.G_RET_STS_ERROR;
590: ELSIF p_saov_rec.CC_REP_CURRENCY_CODE = OKC_API.G_MISS_CHAR OR
591: p_saov_rec.CC_REP_CURRENCY_CODE IS NULL
592: THEN
593: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'CC_REP_CURRENCY_CODE');
586: p_saov_rec.set_of_books_id IS NULL
587: THEN
588: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'set_of_books_id');
589: l_return_status := OKC_API.G_RET_STS_ERROR;
590: ELSIF p_saov_rec.CC_REP_CURRENCY_CODE = OKC_API.G_MISS_CHAR OR
591: p_saov_rec.CC_REP_CURRENCY_CODE IS NULL
592: THEN
593: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'CC_REP_CURRENCY_CODE');
594: l_return_status := OKC_API.G_RET_STS_ERROR;
589: l_return_status := OKC_API.G_RET_STS_ERROR;
590: ELSIF p_saov_rec.CC_REP_CURRENCY_CODE = OKC_API.G_MISS_CHAR OR
591: p_saov_rec.CC_REP_CURRENCY_CODE IS NULL
592: THEN
593: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'CC_REP_CURRENCY_CODE');
594: l_return_status := OKC_API.G_RET_STS_ERROR;
595: ELSIF p_saov_rec.AEL_REP_CURRENCY_CODE = OKC_API.G_MISS_CHAR OR
596: p_saov_rec.AEL_REP_CURRENCY_CODE IS NULL
597: THEN
590: ELSIF p_saov_rec.CC_REP_CURRENCY_CODE = OKC_API.G_MISS_CHAR OR
591: p_saov_rec.CC_REP_CURRENCY_CODE IS NULL
592: THEN
593: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'CC_REP_CURRENCY_CODE');
594: l_return_status := OKC_API.G_RET_STS_ERROR;
595: ELSIF p_saov_rec.AEL_REP_CURRENCY_CODE = OKC_API.G_MISS_CHAR OR
596: p_saov_rec.AEL_REP_CURRENCY_CODE IS NULL
597: THEN
598: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'AEL_REP_CURRENCY_CODE');
591: p_saov_rec.CC_REP_CURRENCY_CODE IS NULL
592: THEN
593: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'CC_REP_CURRENCY_CODE');
594: l_return_status := OKC_API.G_RET_STS_ERROR;
595: ELSIF p_saov_rec.AEL_REP_CURRENCY_CODE = OKC_API.G_MISS_CHAR OR
596: p_saov_rec.AEL_REP_CURRENCY_CODE IS NULL
597: THEN
598: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'AEL_REP_CURRENCY_CODE');
599: l_return_status := OKC_API.G_RET_STS_ERROR;
594: l_return_status := OKC_API.G_RET_STS_ERROR;
595: ELSIF p_saov_rec.AEL_REP_CURRENCY_CODE = OKC_API.G_MISS_CHAR OR
596: p_saov_rec.AEL_REP_CURRENCY_CODE IS NULL
597: THEN
598: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'AEL_REP_CURRENCY_CODE');
599: l_return_status := OKC_API.G_RET_STS_ERROR;
600: END IF;
601:
602: RETURN(l_return_status);
595: ELSIF p_saov_rec.AEL_REP_CURRENCY_CODE = OKC_API.G_MISS_CHAR OR
596: p_saov_rec.AEL_REP_CURRENCY_CODE IS NULL
597: THEN
598: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'AEL_REP_CURRENCY_CODE');
599: l_return_status := OKC_API.G_RET_STS_ERROR;
600: END IF;
601:
602: RETURN(l_return_status);
603: END Validate_Attributes;
625: ) IS
626:
627: BEGIN
628: -- initialize return status
629: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
630:
631: IF p_saov_rec.id = Okc_Api.G_MISS_NUM OR
632: p_saov_rec.id IS NULL
633: THEN
627: BEGIN
628: -- initialize return status
629: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
630:
631: IF p_saov_rec.id = Okc_Api.G_MISS_NUM OR
632: p_saov_rec.id IS NULL
633: THEN
634: Okc_Api.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
635: x_return_status := Okc_Api.G_RET_STS_ERROR;
630:
631: IF p_saov_rec.id = Okc_Api.G_MISS_NUM OR
632: p_saov_rec.id IS NULL
633: THEN
634: Okc_Api.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
635: x_return_status := Okc_Api.G_RET_STS_ERROR;
636: RAISE G_EXCEPTION_HALT_VALIDATION;
637: END IF;
638:
631: IF p_saov_rec.id = Okc_Api.G_MISS_NUM OR
632: p_saov_rec.id IS NULL
633: THEN
634: Okc_Api.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'id');
635: x_return_status := Okc_Api.G_RET_STS_ERROR;
636: RAISE G_EXCEPTION_HALT_VALIDATION;
637: END IF;
638:
639: EXCEPTION
643: NULL;
644:
645: WHEN OTHERS THEN
646: -- store SQL error message on message stack for caller
647: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
648: ,p_msg_name => G_UNEXPECTED_ERROR
649: ,p_token1 => G_SQLCODE_TOKEN
650: ,p_token1_value => SQLCODE
651: ,p_token2 => G_SQLERRM_TOKEN
651: ,p_token2 => G_SQLERRM_TOKEN
652: ,p_token2_value => SQLERRM);
653:
654: -- notify caller of an UNEXPECTED error
655: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
656:
657: END Validate_Id;
658:
659:
669: l_dummy varchar2(1);
670:
671: BEGIN
672: -- initialize return status
673: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
674:
675: IF (p_saov_rec.SECONDARY_REP_METHOD <> Okc_Api.G_MISS_CHAR) AND
676: (p_saov_rec.SECONDARY_REP_METHOD IS NOT NULL)
677: THEN
671: BEGIN
672: -- initialize return status
673: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
674:
675: IF (p_saov_rec.SECONDARY_REP_METHOD <> Okc_Api.G_MISS_CHAR) AND
676: (p_saov_rec.SECONDARY_REP_METHOD IS NOT NULL)
677: THEN
678: l_dummy
679: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_SEC_REP_METHOD',
678: l_dummy
679: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_SEC_REP_METHOD',
680: p_lookup_code => p_saov_rec.SECONDARY_REP_METHOD);
681:
682: IF (l_dummy = Okc_Api.G_FALSE) THEN
683: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
684: ,p_msg_name => g_invalid_value
685: ,p_token1 => g_col_name_token
686: ,p_token1_value => 'SECONDARY_REP_METHOD');
679: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_SEC_REP_METHOD',
680: p_lookup_code => p_saov_rec.SECONDARY_REP_METHOD);
681:
682: IF (l_dummy = Okc_Api.G_FALSE) THEN
683: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
684: ,p_msg_name => g_invalid_value
685: ,p_token1 => g_col_name_token
686: ,p_token1_value => 'SECONDARY_REP_METHOD');
687: x_return_status := Okc_Api.G_RET_STS_ERROR;
683: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
684: ,p_msg_name => g_invalid_value
685: ,p_token1 => g_col_name_token
686: ,p_token1_value => 'SECONDARY_REP_METHOD');
687: x_return_status := Okc_Api.G_RET_STS_ERROR;
688: RAISE G_EXCEPTION_HALT_VALIDATION;
689: END IF;
690: END IF;
691:
696: NULL;
697:
698: WHEN OTHERS THEN
699: -- store SQL error message on message stack for caller
700: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
701: ,p_msg_name => G_UNEXPECTED_ERROR
702: ,p_token1 => G_SQLCODE_TOKEN
703: ,p_token1_value => SQLCODE
704: ,p_token2 => G_SQLERRM_TOKEN
704: ,p_token2 => G_SQLERRM_TOKEN
705: ,p_token2_value => SQLERRM);
706:
707: -- notify caller of an UNEXPECTED error
708: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
709:
710: END validate_sec_rep_mthd;
711:
712: ---------------------------------------------------------------------------
720: l_dummy varchar2(1);
721:
722: BEGIN
723: -- initialize return status
724: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
725:
726: IF (p_saov_rec.AEL_APPLY_ROUNDING_DIFFERENCE <> Okc_Api.G_MISS_CHAR ) AND
727: (p_saov_rec.AEL_APPLY_ROUNDING_DIFFERENCE IS NOT NULL) THEN
728:
722: BEGIN
723: -- initialize return status
724: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
725:
726: IF (p_saov_rec.AEL_APPLY_ROUNDING_DIFFERENCE <> Okc_Api.G_MISS_CHAR ) AND
727: (p_saov_rec.AEL_APPLY_ROUNDING_DIFFERENCE IS NOT NULL) THEN
728:
729: l_dummy
730: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_APPLY_ROUNDING_DIFF',
729: l_dummy
730: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_APPLY_ROUNDING_DIFF',
731: p_lookup_code => p_saov_rec.ael_apply_rounding_difference);
732:
733: IF (l_dummy = Okc_Api.G_FALSE) THEN
734: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
735: ,p_msg_name => g_invalid_value
736: ,p_token1 => g_col_name_token
737: ,p_token1_value => 'AEL_APPLY_ROUNDING_DIFFERENCE');
730: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_APPLY_ROUNDING_DIFF',
731: p_lookup_code => p_saov_rec.ael_apply_rounding_difference);
732:
733: IF (l_dummy = Okc_Api.G_FALSE) THEN
734: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
735: ,p_msg_name => g_invalid_value
736: ,p_token1 => g_col_name_token
737: ,p_token1_value => 'AEL_APPLY_ROUNDING_DIFFERENCE');
738: x_return_status := Okc_Api.G_RET_STS_ERROR;
734: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
735: ,p_msg_name => g_invalid_value
736: ,p_token1 => g_col_name_token
737: ,p_token1_value => 'AEL_APPLY_ROUNDING_DIFFERENCE');
738: x_return_status := Okc_Api.G_RET_STS_ERROR;
739: RAISE G_EXCEPTION_HALT_VALIDATION;
740: END IF;
741:
742: END IF;
748: NULL;
749:
750: WHEN OTHERS THEN
751: -- store SQL error message on message stack for caller
752: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
753: ,p_msg_name => G_UNEXPECTED_ERROR
754: ,p_token1 => G_SQLCODE_TOKEN
755: ,p_token1_value => SQLCODE
756: ,p_token2 => G_SQLERRM_TOKEN
756: ,p_token2 => G_SQLERRM_TOKEN
757: ,p_token2_value => SQLERRM);
758:
759: -- notify caller of an UNEXPECTED error
760: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
761:
762: END validate_ael_apply_round_diff;
763:
764:
776: l_dummy varchar2(1);
777:
778: BEGIN
779: -- initialize return status
780: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
781:
782: IF (p_saov_rec.CC_APPLY_ROUNDING_DIFFERENCE <> Okc_Api.G_MISS_CHAR) AND
783: (p_saov_rec.CC_APPLY_ROUNDING_DIFFERENCE IS NOT NULL)
784: THEN
778: BEGIN
779: -- initialize return status
780: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
781:
782: IF (p_saov_rec.CC_APPLY_ROUNDING_DIFFERENCE <> Okc_Api.G_MISS_CHAR) AND
783: (p_saov_rec.CC_APPLY_ROUNDING_DIFFERENCE IS NOT NULL)
784: THEN
785: l_dummy
786: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_APPLY_ROUNDING_DIFF',
785: l_dummy
786: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_APPLY_ROUNDING_DIFF',
787: p_lookup_code => p_saov_rec.cc_apply_rounding_difference);
788:
789: IF (l_dummy = Okc_Api.G_FALSE) THEN
790: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
791: ,p_msg_name => g_invalid_value
792: ,p_token1 => g_col_name_token
793: ,p_token1_value => 'CC_APPLY_ROUNDING_DIFFERENCE');
786: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_APPLY_ROUNDING_DIFF',
787: p_lookup_code => p_saov_rec.cc_apply_rounding_difference);
788:
789: IF (l_dummy = Okc_Api.G_FALSE) THEN
790: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
791: ,p_msg_name => g_invalid_value
792: ,p_token1 => g_col_name_token
793: ,p_token1_value => 'CC_APPLY_ROUNDING_DIFFERENCE');
794: x_return_status := Okc_Api.G_RET_STS_ERROR;
790: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
791: ,p_msg_name => g_invalid_value
792: ,p_token1 => g_col_name_token
793: ,p_token1_value => 'CC_APPLY_ROUNDING_DIFFERENCE');
794: x_return_status := Okc_Api.G_RET_STS_ERROR;
795: RAISE G_EXCEPTION_HALT_VALIDATION;
796: END IF;
797: END IF;
798:
803: NULL;
804:
805: WHEN OTHERS THEN
806: -- store SQL error message on message stack for caller
807: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
808: ,p_msg_name => G_UNEXPECTED_ERROR
809: ,p_token1 => G_SQLCODE_TOKEN
810: ,p_token1_value => SQLCODE
811: ,p_token2 => G_SQLERRM_TOKEN
811: ,p_token2 => G_SQLERRM_TOKEN
812: ,p_token2_value => SQLERRM);
813:
814: -- notify caller of an UNEXPECTED error
815: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
816:
817: END validate_cc_apply_round_diff;
818:
819: ---------------------------------------------------------------------------
833: x_return_status OUT NOCOPY VARCHAR2
834: ) IS
835: BEGIN
836: -- initialize return status
837: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
838:
839: IF p_saov_rec.object_version_number = Okc_Api.G_MISS_NUM OR
840: p_saov_rec.object_version_number IS NULL
841: THEN
835: BEGIN
836: -- initialize return status
837: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
838:
839: IF p_saov_rec.object_version_number = Okc_Api.G_MISS_NUM OR
840: p_saov_rec.object_version_number IS NULL
841: THEN
842: Okc_Api.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
843: x_return_status := Okc_Api.G_RET_STS_ERROR;
838:
839: IF p_saov_rec.object_version_number = Okc_Api.G_MISS_NUM OR
840: p_saov_rec.object_version_number IS NULL
841: THEN
842: Okc_Api.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
843: x_return_status := Okc_Api.G_RET_STS_ERROR;
844: RAISE G_EXCEPTION_HALT_VALIDATION;
845: END IF;
846: EXCEPTION
839: IF p_saov_rec.object_version_number = Okc_Api.G_MISS_NUM OR
840: p_saov_rec.object_version_number IS NULL
841: THEN
842: Okc_Api.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'object_version_number');
843: x_return_status := Okc_Api.G_RET_STS_ERROR;
844: RAISE G_EXCEPTION_HALT_VALIDATION;
845: END IF;
846: EXCEPTION
847: WHEN G_EXCEPTION_HALT_VALIDATION THEN
850: NULL;
851:
852: WHEN OTHERS THEN
853: -- store SQL error message on message stack for caller
854: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
855: ,p_msg_name => G_UNEXPECTED_ERROR
856: ,p_token1 => G_SQLCODE_TOKEN
857: ,p_token1_value => SQLCODE
858: ,p_token2 => G_SQLERRM_TOKEN
858: ,p_token2 => G_SQLERRM_TOKEN
859: ,p_token2_value => SQLERRM);
860:
861: -- notify caller of an UNEXPECTED error
862: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
863:
864: END Validate_Object_Version_Number;
865: -- R12 SLA Uptake: Begin
866: -- Commenting the validate_set_of_books_id API as this column is obsoleted
885: l_dummy_var VARCHAR2(1) := '?';
886:
887: BEGIN
888: -- initialize return status
889: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
890:
891: -- check for data before processing
892: IF (p_saov_rec.set_of_books_id IS NULL) OR
893: (p_saov_rec.set_of_books_id = Okc_Api.G_MISS_NUM) THEN
889: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
890:
891: -- check for data before processing
892: IF (p_saov_rec.set_of_books_id IS NULL) OR
893: (p_saov_rec.set_of_books_id = Okc_Api.G_MISS_NUM) THEN
894: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
895: ,p_msg_name => G_REQUIRED_VALUE
896: ,p_token1 => G_COL_NAME_TOKEN
897: ,p_token1_value => 'SET_OF_BOOKS_ID');
890:
891: -- check for data before processing
892: IF (p_saov_rec.set_of_books_id IS NULL) OR
893: (p_saov_rec.set_of_books_id = Okc_Api.G_MISS_NUM) THEN
894: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
895: ,p_msg_name => G_REQUIRED_VALUE
896: ,p_token1 => G_COL_NAME_TOKEN
897: ,p_token1_value => 'SET_OF_BOOKS_ID');
898: x_return_status := Okc_Api.G_RET_STS_ERROR;
894: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
895: ,p_msg_name => G_REQUIRED_VALUE
896: ,p_token1 => G_COL_NAME_TOKEN
897: ,p_token1_value => 'SET_OF_BOOKS_ID');
898: x_return_status := Okc_Api.G_RET_STS_ERROR;
899: RAISE G_EXCEPTION_HALT_VALIDATION;
900: END IF;
901:
902: EXCEPTION
905: -- with the next column
906: NULL;
907: WHEN OTHERS THEN
908: -- store SQL error message on message stack for caller
909: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
910: ,p_msg_name => G_UNEXPECTED_ERROR
911: ,p_token1 => G_SQLCODE_TOKEN
912: ,p_token1_value => SQLCODE
913: ,p_token2 => G_SQLERRM_TOKEN
913: ,p_token2 => G_SQLERRM_TOKEN
914: ,p_token2_value => SQLERRM);
915:
916: -- notify caller of an UNEXPECTED error
917: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
918:
919: END Validate_Set_Of_Books_Id;
920: */
921: -- R12 SLA Uptake: End
936: p_saov_rec IN saov_rec_type,
937: x_return_status OUT NOCOPY VARCHAR2
938: ) IS
939:
940: l_dummy VARCHAR2(1) := OKC_API.G_FALSE;
941:
942: BEGIN
943:
944: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
940: l_dummy VARCHAR2(1) := OKC_API.G_FALSE;
941:
942: BEGIN
943:
944: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
945:
946: -- check for data before processing
947: IF (p_saov_rec.cc_rep_currency_code IS NOT NULL) AND
948: (p_saov_rec.cc_rep_currency_code <> Okc_Api.G_MISS_CHAR) THEN
944: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
945:
946: -- check for data before processing
947: IF (p_saov_rec.cc_rep_currency_code IS NOT NULL) AND
948: (p_saov_rec.cc_rep_currency_code <> Okc_Api.G_MISS_CHAR) THEN
949: l_dummy := OKL_ACCOUNTING_UTIL.validate_currency_code(p_saov_rec.cc_rep_currency_code);
950:
951: IF (l_dummy = okc_api.g_false) THEN
952: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
947: IF (p_saov_rec.cc_rep_currency_code IS NOT NULL) AND
948: (p_saov_rec.cc_rep_currency_code <> Okc_Api.G_MISS_CHAR) THEN
949: l_dummy := OKL_ACCOUNTING_UTIL.validate_currency_code(p_saov_rec.cc_rep_currency_code);
950:
951: IF (l_dummy = okc_api.g_false) THEN
952: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
953: p_msg_name => g_invalid_value,
954: p_token1 => g_col_name_token,
955: p_token1_value => 'CC_REP_CURRENCY_CODE');
948: (p_saov_rec.cc_rep_currency_code <> Okc_Api.G_MISS_CHAR) THEN
949: l_dummy := OKL_ACCOUNTING_UTIL.validate_currency_code(p_saov_rec.cc_rep_currency_code);
950:
951: IF (l_dummy = okc_api.g_false) THEN
952: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
953: p_msg_name => g_invalid_value,
954: p_token1 => g_col_name_token,
955: p_token1_value => 'CC_REP_CURRENCY_CODE');
956: x_return_status := Okc_Api.G_RET_STS_ERROR;
952: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
953: p_msg_name => g_invalid_value,
954: p_token1 => g_col_name_token,
955: p_token1_value => 'CC_REP_CURRENCY_CODE');
956: x_return_status := Okc_Api.G_RET_STS_ERROR;
957: RAISE G_EXCEPTION_HALT_VALIDATION;
958: END IF;
959: END IF;
960:
966: NULL;
967:
968: WHEN OTHERS THEN
969: -- store SQL error message on message stack for caller
970: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
971: ,p_msg_name => G_UNEXPECTED_ERROR
972: ,p_token1 => G_SQLCODE_TOKEN
973: ,p_token1_value => SQLCODE
974: ,p_token2 => G_SQLERRM_TOKEN
974: ,p_token2 => G_SQLERRM_TOKEN
975: ,p_token2_value => SQLERRM);
976:
977: -- notify caller of an UNEXPECTED error
978: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
979:
980: END validate_cc_rep_currency_code;
981:
982: ---------------------------------------------------------------------------
994: PROCEDURE Validate_AEL_REP_CURRENCY_CODE(
995: p_saov_rec IN saov_rec_type,
996: x_return_status OUT NOCOPY VARCHAR2
997: ) IS
998: l_dummy VARCHAR2(1) := OKC_API.G_FALSE;
999:
1000: BEGIN
1001: -- initialize return status
1002: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
998: l_dummy VARCHAR2(1) := OKC_API.G_FALSE;
999:
1000: BEGIN
1001: -- initialize return status
1002: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1003:
1004: -- check for data before processing
1005: IF (p_saov_rec.ael_rep_currency_code IS NOT NULL) AND
1006: (p_saov_rec.ael_rep_currency_code <> Okc_Api.G_MISS_CHAR) THEN
1002: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1003:
1004: -- check for data before processing
1005: IF (p_saov_rec.ael_rep_currency_code IS NOT NULL) AND
1006: (p_saov_rec.ael_rep_currency_code <> Okc_Api.G_MISS_CHAR) THEN
1007:
1008: l_dummy := OKL_ACCOUNTING_UTIL.validate_currency_code(p_saov_rec.ael_rep_currency_code);
1009:
1010:
1007:
1008: l_dummy := OKL_ACCOUNTING_UTIL.validate_currency_code(p_saov_rec.ael_rep_currency_code);
1009:
1010:
1011: IF (l_dummy = okc_api.g_false) THEN
1012: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1013: p_msg_name => g_invalid_value,
1014: p_token1 => g_col_name_token,
1015: p_token1_value => 'AEL_REP_CURRENCY_CODE');
1008: l_dummy := OKL_ACCOUNTING_UTIL.validate_currency_code(p_saov_rec.ael_rep_currency_code);
1009:
1010:
1011: IF (l_dummy = okc_api.g_false) THEN
1012: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1013: p_msg_name => g_invalid_value,
1014: p_token1 => g_col_name_token,
1015: p_token1_value => 'AEL_REP_CURRENCY_CODE');
1016: x_return_status := Okc_Api.G_RET_STS_ERROR;
1012: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1013: p_msg_name => g_invalid_value,
1014: p_token1 => g_col_name_token,
1015: p_token1_value => 'AEL_REP_CURRENCY_CODE');
1016: x_return_status := Okc_Api.G_RET_STS_ERROR;
1017: RAISE G_EXCEPTION_HALT_VALIDATION;
1018: END IF;
1019:
1020: END IF;
1026: NULL;
1027:
1028: WHEN OTHERS THEN
1029: -- store SQL error message on message stack for caller
1030: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1031: ,p_msg_name => G_UNEXPECTED_ERROR
1032: ,p_token1 => G_SQLCODE_TOKEN
1033: ,p_token1_value => SQLCODE
1034: ,p_token2 => G_SQLERRM_TOKEN
1034: ,p_token2 => G_SQLERRM_TOKEN
1035: ,p_token2_value => SQLERRM);
1036:
1037: -- notify caller of an UNEXPECTED error
1038: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1039:
1040: END validate_ael_rep_currency_code;
1041:
1042:
1051: l_dummy varchar2(1);
1052:
1053: BEGIN
1054: -- initialize return status
1055: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1056:
1057: IF (p_saov_rec.accrual_reversal_days = Okc_Api.G_MISS_NUM ) OR
1058: (p_saov_rec.accrual_reversal_days IS NULL) THEN
1059:
1053: BEGIN
1054: -- initialize return status
1055: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1056:
1057: IF (p_saov_rec.accrual_reversal_days = Okc_Api.G_MISS_NUM ) OR
1058: (p_saov_rec.accrual_reversal_days IS NULL) THEN
1059:
1060: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1061: ,p_msg_name => G_REQUIRED_VALUE
1056:
1057: IF (p_saov_rec.accrual_reversal_days = Okc_Api.G_MISS_NUM ) OR
1058: (p_saov_rec.accrual_reversal_days IS NULL) THEN
1059:
1060: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1061: ,p_msg_name => G_REQUIRED_VALUE
1062: ,p_token1 => G_COL_NAME_TOKEN
1063: ,p_token1_value => 'Accrual Reversal Days');
1064: x_return_status := Okc_Api.G_RET_STS_ERROR;
1060: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1061: ,p_msg_name => G_REQUIRED_VALUE
1062: ,p_token1 => G_COL_NAME_TOKEN
1063: ,p_token1_value => 'Accrual Reversal Days');
1064: x_return_status := Okc_Api.G_RET_STS_ERROR;
1065: RAISE G_EXCEPTION_HALT_VALIDATION;
1066:
1067: END IF;
1068:
1079: NULL;
1080:
1081: WHEN OTHERS THEN
1082: -- store SQL error message on message stack for caller
1083: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1084: ,p_msg_name => G_UNEXPECTED_ERROR
1085: ,p_token1 => G_SQLCODE_TOKEN
1086: ,p_token1_value => SQLCODE
1087: ,p_token2 => G_SQLERRM_TOKEN
1087: ,p_token2 => G_SQLERRM_TOKEN
1088: ,p_token2_value => SQLERRM);
1089:
1090: -- notify caller of an UNEXPECTED error
1091: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1092:
1093: END validate_accrual_rev_days;
1094:
1095:
1115: p_saov_rec IN saov_rec_type,
1116: x_return_status OUT NOCOPY VARCHAR2
1117: ) IS
1118:
1119: l_dummy VARCHAR2(1) := OKC_API.G_FALSE;
1120:
1121: BEGIN
1122:
1123: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1119: l_dummy VARCHAR2(1) := OKC_API.G_FALSE;
1120:
1121: BEGIN
1122:
1123: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1124:
1125: -- Validate CODE_COMBINATION_ID
1126:
1127: IF (p_saov_rec.code_combination_id IS NOT NULL) AND
1124:
1125: -- Validate CODE_COMBINATION_ID
1126:
1127: IF (p_saov_rec.code_combination_id IS NOT NULL) AND
1128: (p_saov_rec.code_combination_id <> OKC_API.G_MISS_NUM) THEN
1129: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.code_combination_id);
1130: IF (l_dummy = okc_api.g_false) THEN
1131: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1132: p_msg_name => g_invalid_value,
1126:
1127: IF (p_saov_rec.code_combination_id IS NOT NULL) AND
1128: (p_saov_rec.code_combination_id <> OKC_API.G_MISS_NUM) THEN
1129: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.code_combination_id);
1130: IF (l_dummy = okc_api.g_false) THEN
1131: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1132: p_msg_name => g_invalid_value,
1133: p_token1 => g_col_name_token,
1134: p_token1_value => 'REC_CCID');
1127: IF (p_saov_rec.code_combination_id IS NOT NULL) AND
1128: (p_saov_rec.code_combination_id <> OKC_API.G_MISS_NUM) THEN
1129: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.code_combination_id);
1130: IF (l_dummy = okc_api.g_false) THEN
1131: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1132: p_msg_name => g_invalid_value,
1133: p_token1 => g_col_name_token,
1134: p_token1_value => 'REC_CCID');
1135: x_return_status := OKC_API.G_RET_STS_ERROR;
1131: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1132: p_msg_name => g_invalid_value,
1133: p_token1 => g_col_name_token,
1134: p_token1_value => 'REC_CCID');
1135: x_return_status := OKC_API.G_RET_STS_ERROR;
1136: END IF;
1137: END IF;
1138:
1139: -- Validate REC_CCID
1137: END IF;
1138:
1139: -- Validate REC_CCID
1140:
1141: IF (p_saov_rec.rec_ccid IS NOT NULL) AND (p_saov_rec.Rec_ccid <> OKC_API.G_MISS_NUM) THEN
1142: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.REC_CCID);
1143: IF (l_dummy = okc_api.g_false) THEN
1144: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1145: p_msg_name => g_invalid_value,
1139: -- Validate REC_CCID
1140:
1141: IF (p_saov_rec.rec_ccid IS NOT NULL) AND (p_saov_rec.Rec_ccid <> OKC_API.G_MISS_NUM) THEN
1142: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.REC_CCID);
1143: IF (l_dummy = okc_api.g_false) THEN
1144: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1145: p_msg_name => g_invalid_value,
1146: p_token1 => g_col_name_token,
1147: p_token1_value => 'REC_CCID');
1140:
1141: IF (p_saov_rec.rec_ccid IS NOT NULL) AND (p_saov_rec.Rec_ccid <> OKC_API.G_MISS_NUM) THEN
1142: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.REC_CCID);
1143: IF (l_dummy = okc_api.g_false) THEN
1144: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1145: p_msg_name => g_invalid_value,
1146: p_token1 => g_col_name_token,
1147: p_token1_value => 'REC_CCID');
1148: x_return_status := OKC_API.G_RET_STS_ERROR;
1144: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1145: p_msg_name => g_invalid_value,
1146: p_token1 => g_col_name_token,
1147: p_token1_value => 'REC_CCID');
1148: x_return_status := OKC_API.G_RET_STS_ERROR;
1149: END IF;
1150: END IF;
1151:
1152: -- Validate Realized_Gain_CCID
1151:
1152: -- Validate Realized_Gain_CCID
1153:
1154: IF (p_saov_rec.realized_gain_CCID IS NOT NULL) AND
1155: (p_saov_rec.realized_gain_CCID <> OKC_API.G_MISS_NUM) THEN
1156: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.Realized_gain_CCID);
1157: IF (l_dummy = okc_api.g_false) THEN
1158: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1159: p_msg_name => g_invalid_value,
1153:
1154: IF (p_saov_rec.realized_gain_CCID IS NOT NULL) AND
1155: (p_saov_rec.realized_gain_CCID <> OKC_API.G_MISS_NUM) THEN
1156: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.Realized_gain_CCID);
1157: IF (l_dummy = okc_api.g_false) THEN
1158: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1159: p_msg_name => g_invalid_value,
1160: p_token1 => g_col_name_token,
1161: p_token1_value => 'REALIZED_GAIN_CCID');
1154: IF (p_saov_rec.realized_gain_CCID IS NOT NULL) AND
1155: (p_saov_rec.realized_gain_CCID <> OKC_API.G_MISS_NUM) THEN
1156: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.Realized_gain_CCID);
1157: IF (l_dummy = okc_api.g_false) THEN
1158: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1159: p_msg_name => g_invalid_value,
1160: p_token1 => g_col_name_token,
1161: p_token1_value => 'REALIZED_GAIN_CCID');
1162: x_return_status := OKC_API.G_RET_STS_ERROR;
1158: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1159: p_msg_name => g_invalid_value,
1160: p_token1 => g_col_name_token,
1161: p_token1_value => 'REALIZED_GAIN_CCID');
1162: x_return_status := OKC_API.G_RET_STS_ERROR;
1163: END IF;
1164: END IF;
1165:
1166: -- Validate Realized_loss_CCID
1165:
1166: -- Validate Realized_loss_CCID
1167:
1168: IF (p_saov_rec.realized_loss_CCID IS NOT NULL) AND
1169: (p_saov_rec.realized_loss_CCID <> OKC_API.G_MISS_NUM) THEN
1170: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.realized_loss_CCID);
1171: IF (l_dummy = okc_api.g_false) THEN
1172: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1173: p_msg_name => g_invalid_value,
1167:
1168: IF (p_saov_rec.realized_loss_CCID IS NOT NULL) AND
1169: (p_saov_rec.realized_loss_CCID <> OKC_API.G_MISS_NUM) THEN
1170: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.realized_loss_CCID);
1171: IF (l_dummy = okc_api.g_false) THEN
1172: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1173: p_msg_name => g_invalid_value,
1174: p_token1 => g_col_name_token,
1175: p_token1_value => 'realized_loss_CCID');
1168: IF (p_saov_rec.realized_loss_CCID IS NOT NULL) AND
1169: (p_saov_rec.realized_loss_CCID <> OKC_API.G_MISS_NUM) THEN
1170: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.realized_loss_CCID);
1171: IF (l_dummy = okc_api.g_false) THEN
1172: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1173: p_msg_name => g_invalid_value,
1174: p_token1 => g_col_name_token,
1175: p_token1_value => 'realized_loss_CCID');
1176: x_return_status := OKC_API.G_RET_STS_ERROR;
1172: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1173: p_msg_name => g_invalid_value,
1174: p_token1 => g_col_name_token,
1175: p_token1_value => 'realized_loss_CCID');
1176: x_return_status := OKC_API.G_RET_STS_ERROR;
1177: END IF;
1178: END IF;
1179:
1180: -- Validate Tax_CCID
1177: END IF;
1178: END IF;
1179:
1180: -- Validate Tax_CCID
1181: IF (p_saov_rec.tax_ccid IS NOT NULL) AND (p_saov_rec.tax_ccid <> OKC_API.G_MISS_NUM) THEN
1182: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.tax_ccid);
1183: IF (l_dummy = okc_api.g_false) THEN
1184: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1185: p_msg_name => g_invalid_value,
1179:
1180: -- Validate Tax_CCID
1181: IF (p_saov_rec.tax_ccid IS NOT NULL) AND (p_saov_rec.tax_ccid <> OKC_API.G_MISS_NUM) THEN
1182: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.tax_ccid);
1183: IF (l_dummy = okc_api.g_false) THEN
1184: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1185: p_msg_name => g_invalid_value,
1186: p_token1 => g_col_name_token,
1187: p_token1_value => 'tax_ccid');
1180: -- Validate Tax_CCID
1181: IF (p_saov_rec.tax_ccid IS NOT NULL) AND (p_saov_rec.tax_ccid <> OKC_API.G_MISS_NUM) THEN
1182: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.tax_ccid);
1183: IF (l_dummy = okc_api.g_false) THEN
1184: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1185: p_msg_name => g_invalid_value,
1186: p_token1 => g_col_name_token,
1187: p_token1_value => 'tax_ccid');
1188: x_return_status := OKC_API.G_RET_STS_ERROR;
1184: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1185: p_msg_name => g_invalid_value,
1186: p_token1 => g_col_name_token,
1187: p_token1_value => 'tax_ccid');
1188: x_return_status := OKC_API.G_RET_STS_ERROR;
1189: END IF;
1190: END IF;
1191:
1192: -- Validate Cross_Currency_CCID
1191:
1192: -- Validate Cross_Currency_CCID
1193:
1194: IF (p_saov_rec.cross_currency_CCID IS NOT NULL) AND
1195: (p_saov_rec.cross_currency_CCID <> OKC_API.G_MISS_NUM) THEN
1196: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.cross_currency_CCID);
1197: IF (l_dummy = okc_api.g_false) THEN
1198: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1199: p_msg_name => g_invalid_value,
1193:
1194: IF (p_saov_rec.cross_currency_CCID IS NOT NULL) AND
1195: (p_saov_rec.cross_currency_CCID <> OKC_API.G_MISS_NUM) THEN
1196: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.cross_currency_CCID);
1197: IF (l_dummy = okc_api.g_false) THEN
1198: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1199: p_msg_name => g_invalid_value,
1200: p_token1 => g_col_name_token,
1201: p_token1_value => 'cross_currency_CCID');
1194: IF (p_saov_rec.cross_currency_CCID IS NOT NULL) AND
1195: (p_saov_rec.cross_currency_CCID <> OKC_API.G_MISS_NUM) THEN
1196: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.cross_currency_CCID);
1197: IF (l_dummy = okc_api.g_false) THEN
1198: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1199: p_msg_name => g_invalid_value,
1200: p_token1 => g_col_name_token,
1201: p_token1_value => 'cross_currency_CCID');
1202: x_return_status := OKC_API.G_RET_STS_ERROR;
1198: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1199: p_msg_name => g_invalid_value,
1200: p_token1 => g_col_name_token,
1201: p_token1_value => 'cross_currency_CCID');
1202: x_return_status := OKC_API.G_RET_STS_ERROR;
1203: END IF;
1204: END IF;
1205:
1206: -- Validate Rounding_CCID
1205:
1206: -- Validate Rounding_CCID
1207:
1208: IF (p_saov_rec.rounding_CCID IS NOT NULL) AND
1209: (p_saov_rec.rounding_CCID <> OKC_API.G_MISS_NUM) THEN
1210: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.rounding_CCID);
1211: IF (l_dummy = okc_api.g_false) THEN
1212: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1213: p_msg_name => g_invalid_value,
1207:
1208: IF (p_saov_rec.rounding_CCID IS NOT NULL) AND
1209: (p_saov_rec.rounding_CCID <> OKC_API.G_MISS_NUM) THEN
1210: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.rounding_CCID);
1211: IF (l_dummy = okc_api.g_false) THEN
1212: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1213: p_msg_name => g_invalid_value,
1214: p_token1 => g_col_name_token,
1215: p_token1_value => 'rounding_CCID');
1208: IF (p_saov_rec.rounding_CCID IS NOT NULL) AND
1209: (p_saov_rec.rounding_CCID <> OKC_API.G_MISS_NUM) THEN
1210: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.rounding_CCID);
1211: IF (l_dummy = okc_api.g_false) THEN
1212: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1213: p_msg_name => g_invalid_value,
1214: p_token1 => g_col_name_token,
1215: p_token1_value => 'rounding_CCID');
1216: x_return_status := OKC_API.G_RET_STS_ERROR;
1212: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1213: p_msg_name => g_invalid_value,
1214: p_token1 => g_col_name_token,
1215: p_token1_value => 'rounding_CCID');
1216: x_return_status := OKC_API.G_RET_STS_ERROR;
1217: END IF;
1218: END IF;
1219:
1220: -- Validate AR_CLEARING_CCID
1219:
1220: -- Validate AR_CLEARING_CCID
1221:
1222: IF (p_saov_rec.AR_CLEARING_CCID IS NOT NULL) AND
1223: (p_saov_rec.AR_CLEARING_CCID <> OKC_API.G_MISS_NUM) THEN
1224: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.AR_CLEARING_CCID);
1225: IF (l_dummy = okc_api.g_false) THEN
1226: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1227: p_msg_name => g_invalid_value,
1221:
1222: IF (p_saov_rec.AR_CLEARING_CCID IS NOT NULL) AND
1223: (p_saov_rec.AR_CLEARING_CCID <> OKC_API.G_MISS_NUM) THEN
1224: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.AR_CLEARING_CCID);
1225: IF (l_dummy = okc_api.g_false) THEN
1226: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1227: p_msg_name => g_invalid_value,
1228: p_token1 => g_col_name_token,
1229: p_token1_value => 'AR_CLEARING_CCID');
1222: IF (p_saov_rec.AR_CLEARING_CCID IS NOT NULL) AND
1223: (p_saov_rec.AR_CLEARING_CCID <> OKC_API.G_MISS_NUM) THEN
1224: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.AR_CLEARING_CCID);
1225: IF (l_dummy = okc_api.g_false) THEN
1226: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1227: p_msg_name => g_invalid_value,
1228: p_token1 => g_col_name_token,
1229: p_token1_value => 'AR_CLEARING_CCID');
1230: x_return_status := OKC_API.G_RET_STS_ERROR;
1226: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1227: p_msg_name => g_invalid_value,
1228: p_token1 => g_col_name_token,
1229: p_token1_value => 'AR_CLEARING_CCID');
1230: x_return_status := OKC_API.G_RET_STS_ERROR;
1231: END IF;
1232: END IF;
1233:
1234: -- Validate PAYABLES_CCID
1233:
1234: -- Validate PAYABLES_CCID
1235:
1236: IF (p_saov_rec.PAYABLES_CCID IS NOT NULL) AND
1237: (p_saov_rec.PAYABLES_CCID <> OKC_API.G_MISS_NUM) THEN
1238: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.PAYABLES_CCID);
1239: IF (l_dummy = okc_api.g_false) THEN
1240: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1241: p_msg_name => g_invalid_value,
1235:
1236: IF (p_saov_rec.PAYABLES_CCID IS NOT NULL) AND
1237: (p_saov_rec.PAYABLES_CCID <> OKC_API.G_MISS_NUM) THEN
1238: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.PAYABLES_CCID);
1239: IF (l_dummy = okc_api.g_false) THEN
1240: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1241: p_msg_name => g_invalid_value,
1242: p_token1 => g_col_name_token,
1243: p_token1_value => 'PAYABLES_CCID');
1236: IF (p_saov_rec.PAYABLES_CCID IS NOT NULL) AND
1237: (p_saov_rec.PAYABLES_CCID <> OKC_API.G_MISS_NUM) THEN
1238: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.PAYABLES_CCID);
1239: IF (l_dummy = okc_api.g_false) THEN
1240: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1241: p_msg_name => g_invalid_value,
1242: p_token1 => g_col_name_token,
1243: p_token1_value => 'PAYABLES_CCID');
1244: x_return_status := OKC_API.G_RET_STS_ERROR;
1240: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1241: p_msg_name => g_invalid_value,
1242: p_token1 => g_col_name_token,
1243: p_token1_value => 'PAYABLES_CCID');
1244: x_return_status := OKC_API.G_RET_STS_ERROR;
1245: END IF;
1246: END IF;
1247:
1248: -- Validate LIABLITY_CCID
1247:
1248: -- Validate LIABLITY_CCID
1249:
1250: IF (p_saov_rec.liablity_ccid IS NOT NULL) AND
1251: (p_saov_rec.liablity_ccid <> OKC_API.G_MISS_NUM) THEN
1252: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.liablity_ccid);
1253: IF (l_dummy = okc_api.g_false) THEN
1254: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1255: p_msg_name => g_invalid_value,
1249:
1250: IF (p_saov_rec.liablity_ccid IS NOT NULL) AND
1251: (p_saov_rec.liablity_ccid <> OKC_API.G_MISS_NUM) THEN
1252: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.liablity_ccid);
1253: IF (l_dummy = okc_api.g_false) THEN
1254: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1255: p_msg_name => g_invalid_value,
1256: p_token1 => g_col_name_token,
1257: p_token1_value => 'liablity_ccid');
1250: IF (p_saov_rec.liablity_ccid IS NOT NULL) AND
1251: (p_saov_rec.liablity_ccid <> OKC_API.G_MISS_NUM) THEN
1252: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.liablity_ccid);
1253: IF (l_dummy = okc_api.g_false) THEN
1254: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1255: p_msg_name => g_invalid_value,
1256: p_token1 => g_col_name_token,
1257: p_token1_value => 'liablity_ccid');
1258: x_return_status := OKC_API.G_RET_STS_ERROR;
1254: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1255: p_msg_name => g_invalid_value,
1256: p_token1 => g_col_name_token,
1257: p_token1_value => 'liablity_ccid');
1258: x_return_status := OKC_API.G_RET_STS_ERROR;
1259: END IF;
1260: END IF;
1261:
1262: -- Validate PRE_PAYMENT_CCID
1261:
1262: -- Validate PRE_PAYMENT_CCID
1263:
1264: IF (p_saov_rec.pre_payment_ccid IS NOT NULL) AND
1265: (p_saov_rec.pre_payment_ccid <> OKC_API.G_MISS_NUM) THEN
1266: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.pre_payment_ccid);
1267: IF (l_dummy = okc_api.g_false) THEN
1268: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1269: p_msg_name => g_invalid_value,
1263:
1264: IF (p_saov_rec.pre_payment_ccid IS NOT NULL) AND
1265: (p_saov_rec.pre_payment_ccid <> OKC_API.G_MISS_NUM) THEN
1266: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.pre_payment_ccid);
1267: IF (l_dummy = okc_api.g_false) THEN
1268: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1269: p_msg_name => g_invalid_value,
1270: p_token1 => g_col_name_token,
1271: p_token1_value => 'pre_payment_ccid');
1264: IF (p_saov_rec.pre_payment_ccid IS NOT NULL) AND
1265: (p_saov_rec.pre_payment_ccid <> OKC_API.G_MISS_NUM) THEN
1266: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.pre_payment_ccid);
1267: IF (l_dummy = okc_api.g_false) THEN
1268: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1269: p_msg_name => g_invalid_value,
1270: p_token1 => g_col_name_token,
1271: p_token1_value => 'pre_payment_ccid');
1272: x_return_status := OKC_API.G_RET_STS_ERROR;
1268: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1269: p_msg_name => g_invalid_value,
1270: p_token1 => g_col_name_token,
1271: p_token1_value => 'pre_payment_ccid');
1272: x_return_status := OKC_API.G_RET_STS_ERROR;
1273: END IF;
1274: END IF;
1275:
1276:
1277:
1278: -- Validate FUT_DATE_PAY_CCID
1279:
1280: IF (p_saov_rec.fut_date_pay_CCID IS NOT NULL) AND
1281: (p_saov_rec.fut_date_pay_CCID <> OKC_API.G_MISS_NUM) THEN
1282: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.fut_date_pay_CCID);
1283: IF (l_dummy = okc_api.g_false) THEN
1284: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1285: p_msg_name => g_invalid_value,
1279:
1280: IF (p_saov_rec.fut_date_pay_CCID IS NOT NULL) AND
1281: (p_saov_rec.fut_date_pay_CCID <> OKC_API.G_MISS_NUM) THEN
1282: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.fut_date_pay_CCID);
1283: IF (l_dummy = okc_api.g_false) THEN
1284: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1285: p_msg_name => g_invalid_value,
1286: p_token1 => g_col_name_token,
1287: p_token1_value => 'fut_date_pay_CCID');
1280: IF (p_saov_rec.fut_date_pay_CCID IS NOT NULL) AND
1281: (p_saov_rec.fut_date_pay_CCID <> OKC_API.G_MISS_NUM) THEN
1282: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.fut_date_pay_CCID);
1283: IF (l_dummy = okc_api.g_false) THEN
1284: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1285: p_msg_name => g_invalid_value,
1286: p_token1 => g_col_name_token,
1287: p_token1_value => 'fut_date_pay_CCID');
1288: x_return_status := OKC_API.G_RET_STS_ERROR;
1284: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1285: p_msg_name => g_invalid_value,
1286: p_token1 => g_col_name_token,
1287: p_token1_value => 'fut_date_pay_CCID');
1288: x_return_status := OKC_API.G_RET_STS_ERROR;
1289: END IF;
1290: END IF;
1291:
1292:
1292:
1293: -- Validate DIS_TAKEN_CCID
1294:
1295: IF (p_saov_rec.DIS_TAKEN_CCID IS NOT NULL) AND
1296: (p_saov_rec.DIS_TAKEN_CCID <> OKC_API.G_MISS_NUM) THEN
1297: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.DIS_TAKEN_CCID);
1298: IF (l_dummy = okc_api.g_false) THEN
1299: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1300: p_msg_name => g_invalid_value,
1294:
1295: IF (p_saov_rec.DIS_TAKEN_CCID IS NOT NULL) AND
1296: (p_saov_rec.DIS_TAKEN_CCID <> OKC_API.G_MISS_NUM) THEN
1297: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.DIS_TAKEN_CCID);
1298: IF (l_dummy = okc_api.g_false) THEN
1299: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1300: p_msg_name => g_invalid_value,
1301: p_token1 => g_col_name_token,
1302: p_token1_value => 'DIS_TAKEN_CCID');
1295: IF (p_saov_rec.DIS_TAKEN_CCID IS NOT NULL) AND
1296: (p_saov_rec.DIS_TAKEN_CCID <> OKC_API.G_MISS_NUM) THEN
1297: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.DIS_TAKEN_CCID);
1298: IF (l_dummy = okc_api.g_false) THEN
1299: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1300: p_msg_name => g_invalid_value,
1301: p_token1 => g_col_name_token,
1302: p_token1_value => 'DIS_TAKEN_CCID');
1303: x_return_status := OKC_API.G_RET_STS_ERROR;
1299: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1300: p_msg_name => g_invalid_value,
1301: p_token1 => g_col_name_token,
1302: p_token1_value => 'DIS_TAKEN_CCID');
1303: x_return_status := OKC_API.G_RET_STS_ERROR;
1304: END IF;
1305: END IF;
1306:
1307: -- Validate AP_CLEARING_CCID
1306:
1307: -- Validate AP_CLEARING_CCID
1308:
1309: IF (p_saov_rec.AR_CLEARING_CCID IS NOT NULL) AND
1310: (p_saov_rec.AR_CLEARING_CCID <> OKC_API.G_MISS_NUM) THEN
1311: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.AR_CLEARING_CCID);
1312: IF (l_dummy = okc_api.g_false) THEN
1313: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1314: p_msg_name => g_invalid_value,
1308:
1309: IF (p_saov_rec.AR_CLEARING_CCID IS NOT NULL) AND
1310: (p_saov_rec.AR_CLEARING_CCID <> OKC_API.G_MISS_NUM) THEN
1311: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.AR_CLEARING_CCID);
1312: IF (l_dummy = okc_api.g_false) THEN
1313: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1314: p_msg_name => g_invalid_value,
1315: p_token1 => g_col_name_token,
1316: p_token1_value => 'AR_CLEARING_CCID');
1309: IF (p_saov_rec.AR_CLEARING_CCID IS NOT NULL) AND
1310: (p_saov_rec.AR_CLEARING_CCID <> OKC_API.G_MISS_NUM) THEN
1311: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_GL_CCID(p_saov_rec.AR_CLEARING_CCID);
1312: IF (l_dummy = okc_api.g_false) THEN
1313: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1314: p_msg_name => g_invalid_value,
1315: p_token1 => g_col_name_token,
1316: p_token1_value => 'AR_CLEARING_CCID');
1317: x_return_status := OKC_API.G_RET_STS_ERROR;
1313: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
1314: p_msg_name => g_invalid_value,
1315: p_token1 => g_col_name_token,
1316: p_token1_value => 'AR_CLEARING_CCID');
1317: x_return_status := OKC_API.G_RET_STS_ERROR;
1318: END IF;
1319: END IF;
1320:
1321: IF (x_return_Status = OKC_API.G_RET_STS_ERROR) THEN
1317: x_return_status := OKC_API.G_RET_STS_ERROR;
1318: END IF;
1319: END IF;
1320:
1321: IF (x_return_Status = OKC_API.G_RET_STS_ERROR) THEN
1322: RAISE G_EXCEPTION_HALT_VALIDATION;
1323: END IF;
1324:
1325:
1330: NULL;
1331:
1332: WHEN OTHERS THEN
1333: -- store SQL error message on message stack for caller
1334: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME
1335: ,p_msg_name => G_UNEXPECTED_ERROR
1336: ,p_token1 => G_SQLCODE_TOKEN
1337: ,p_token1_value => SQLCODE
1338: ,p_token2 => G_SQLERRM_TOKEN
1337: ,p_token1_value => SQLCODE
1338: ,p_token2 => G_SQLERRM_TOKEN
1339: ,p_token2_value => SQLERRM);
1340:
1341: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1342:
1343:
1344: END validate_all_ccid;
1345:
1360: p_saov_rec IN saov_rec_type,
1361: x_return_status OUT NOCOPY VARCHAR2
1362: ) IS
1363:
1364: l_dummy VARCHAR2(1) := OKC_API.G_FALSE;
1365:
1366: BEGIN
1367:
1368: -- initialize return status
1365:
1366: BEGIN
1367:
1368: -- initialize return status
1369: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1370:
1371: IF (p_saov_rec.cc_rounding_rule IS NOT NULL) THEN
1372: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_ROUNDING_RULE',
1373: p_lookup_code => p_saov_rec.cc_rounding_rule);
1371: IF (p_saov_rec.cc_rounding_rule IS NOT NULL) THEN
1372: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_ROUNDING_RULE',
1373: p_lookup_code => p_saov_rec.cc_rounding_rule);
1374:
1375: IF (l_dummy = OKC_API.G_FALSE) THEN
1376: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1377: ,p_msg_name => G_INVALID_VALUE
1378: ,p_token1 => G_COL_NAME_TOKEN
1379: ,p_token1_value => 'CC_ROUNDING_RULE');
1372: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_ROUNDING_RULE',
1373: p_lookup_code => p_saov_rec.cc_rounding_rule);
1374:
1375: IF (l_dummy = OKC_API.G_FALSE) THEN
1376: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1377: ,p_msg_name => G_INVALID_VALUE
1378: ,p_token1 => G_COL_NAME_TOKEN
1379: ,p_token1_value => 'CC_ROUNDING_RULE');
1380: x_return_status := Okc_Api.G_RET_STS_ERROR;
1376: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1377: ,p_msg_name => G_INVALID_VALUE
1378: ,p_token1 => G_COL_NAME_TOKEN
1379: ,p_token1_value => 'CC_ROUNDING_RULE');
1380: x_return_status := Okc_Api.G_RET_STS_ERROR;
1381: END IF;
1382: END IF;
1383:
1384: EXCEPTION
1388: NULL;
1389:
1390: WHEN OTHERS THEN
1391: -- store SQL error message on message stack for caller
1392: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1393: ,p_msg_name => G_UNEXPECTED_ERROR
1394: ,p_token1 => G_SQLCODE_TOKEN
1395: ,p_token1_value => SQLCODE
1396: ,p_token2 => G_SQLERRM_TOKEN
1396: ,p_token2 => G_SQLERRM_TOKEN
1397: ,p_token2_value => SQLERRM);
1398:
1399: -- notify caller of an UNEXPECTED error
1400: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1401:
1402: END validate_cc_rounding_rule;
1403:
1404: ---------------------------------------------------------------------------
1417: p_saov_rec IN saov_rec_type,
1418: x_return_status OUT NOCOPY VARCHAR2
1419: ) IS
1420:
1421: l_dummy VARCHAR2(1) := OKC_API.G_FALSE;
1422:
1423:
1424: BEGIN
1425: -- initialize return status
1422:
1423:
1424: BEGIN
1425: -- initialize return status
1426: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1427:
1428: IF (p_saov_rec.ael_rounding_rule IS NOT NULL) AND
1429: (p_saov_rec.ael_rounding_rule <> OKC_API.G_MISS_CHAR)
1430: THEN
1425: -- initialize return status
1426: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1427:
1428: IF (p_saov_rec.ael_rounding_rule IS NOT NULL) AND
1429: (p_saov_rec.ael_rounding_rule <> OKC_API.G_MISS_CHAR)
1430: THEN
1431: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_ROUNDING_RULE',
1432: p_lookup_code => p_saov_rec.ael_rounding_rule);
1433:
1430: THEN
1431: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_ROUNDING_RULE',
1432: p_lookup_code => p_saov_rec.ael_rounding_rule);
1433:
1434: IF (l_dummy = OKC_API.G_FALSE) THEN
1435:
1436: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1437: ,p_msg_name => G_INVALID_VALUE
1438: ,p_token1 => G_COL_NAME_TOKEN
1432: p_lookup_code => p_saov_rec.ael_rounding_rule);
1433:
1434: IF (l_dummy = OKC_API.G_FALSE) THEN
1435:
1436: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1437: ,p_msg_name => G_INVALID_VALUE
1438: ,p_token1 => G_COL_NAME_TOKEN
1439: ,p_token1_value => 'ael_rounding_rule');
1440: x_return_status := Okc_Api.G_RET_STS_ERROR;
1436: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1437: ,p_msg_name => G_INVALID_VALUE
1438: ,p_token1 => G_COL_NAME_TOKEN
1439: ,p_token1_value => 'ael_rounding_rule');
1440: x_return_status := Okc_Api.G_RET_STS_ERROR;
1441: END IF;
1442: END IF;
1443:
1444: EXCEPTION
1448: NULL;
1449:
1450: WHEN OTHERS THEN
1451: -- store SQL error message on message stack for caller
1452: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1453: ,p_msg_name => G_UNEXPECTED_ERROR
1454: ,p_token1 => G_SQLCODE_TOKEN
1455: ,p_token1_value => SQLCODE
1456: ,p_token2 => G_SQLERRM_TOKEN
1456: ,p_token2 => G_SQLERRM_TOKEN
1457: ,p_token2_value => SQLERRM);
1458:
1459: -- notify caller of an UNEXPECTED error
1460: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1461:
1462: -- verify that the cursor was closed
1463: END validate_ael_rounding_rule;
1464:
1483: ) IS
1484:
1485: BEGIN
1486: -- initialize return status
1487: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1488:
1489: IF p_saov_rec.lke_hold_days = Okc_Api.G_MISS_NUM OR
1490: p_saov_rec.lke_hold_days IS NULL
1491: THEN
1485: BEGIN
1486: -- initialize return status
1487: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1488:
1489: IF p_saov_rec.lke_hold_days = Okc_Api.G_MISS_NUM OR
1490: p_saov_rec.lke_hold_days IS NULL
1491: THEN
1492: Okc_Api.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'lke_hold_days');
1493: x_return_status := Okc_Api.G_RET_STS_ERROR;
1488:
1489: IF p_saov_rec.lke_hold_days = Okc_Api.G_MISS_NUM OR
1490: p_saov_rec.lke_hold_days IS NULL
1491: THEN
1492: Okc_Api.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'lke_hold_days');
1493: x_return_status := Okc_Api.G_RET_STS_ERROR;
1494: RAISE G_EXCEPTION_HALT_VALIDATION;
1495: END IF;
1496: --Bug 6413291 dpsingh
1489: IF p_saov_rec.lke_hold_days = Okc_Api.G_MISS_NUM OR
1490: p_saov_rec.lke_hold_days IS NULL
1491: THEN
1492: Okc_Api.set_message(G_APP_NAME, G_REQUIRED_VALUE,G_COL_NAME_TOKEN,'lke_hold_days');
1493: x_return_status := Okc_Api.G_RET_STS_ERROR;
1494: RAISE G_EXCEPTION_HALT_VALIDATION;
1495: END IF;
1496: --Bug 6413291 dpsingh
1497: IF p_saov_rec.lke_hold_days <>ABS(TRUNC (p_saov_rec.lke_hold_days)) THEN
1506: NULL;
1507:
1508: WHEN OTHERS THEN
1509: -- store SQL error message on message stack for caller
1510: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1511: ,p_msg_name => G_UNEXPECTED_ERROR
1512: ,p_token1 => G_SQLCODE_TOKEN
1513: ,p_token1_value => SQLCODE
1514: ,p_token2 => G_SQLERRM_TOKEN
1514: ,p_token2 => G_SQLERRM_TOKEN
1515: ,p_token2_value => SQLERRM);
1516:
1517: -- notify caller of an UNEXPECTED error
1518: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1519:
1520: END validate_lke_hold_days;
1521:
1522:
1531: l_dummy varchar2(1);
1532:
1533: BEGIN
1534: -- initialize return status
1535: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1536:
1537: IF (p_saov_rec.STM_APPLY_ROUNDING_DIFFERENCE <> Okc_Api.G_MISS_CHAR ) AND
1538: (p_saov_rec.STM_APPLY_ROUNDING_DIFFERENCE IS NOT NULL) THEN
1539:
1533: BEGIN
1534: -- initialize return status
1535: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1536:
1537: IF (p_saov_rec.STM_APPLY_ROUNDING_DIFFERENCE <> Okc_Api.G_MISS_CHAR ) AND
1538: (p_saov_rec.STM_APPLY_ROUNDING_DIFFERENCE IS NOT NULL) THEN
1539:
1540: l_dummy
1541: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_STRM_APPLY_ROUNDING_DIFF',
1540: l_dummy
1541: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_STRM_APPLY_ROUNDING_DIFF',
1542: p_lookup_code => p_saov_rec.stm_apply_rounding_difference);
1543:
1544: IF (l_dummy = Okc_Api.G_FALSE) THEN
1545: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
1546: ,p_msg_name => g_invalid_value
1547: ,p_token1 => g_col_name_token
1548: ,p_token1_value => 'STM_APPLY_ROUNDING_DIFFERENCE');
1541: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_STRM_APPLY_ROUNDING_DIFF',
1542: p_lookup_code => p_saov_rec.stm_apply_rounding_difference);
1543:
1544: IF (l_dummy = Okc_Api.G_FALSE) THEN
1545: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
1546: ,p_msg_name => g_invalid_value
1547: ,p_token1 => g_col_name_token
1548: ,p_token1_value => 'STM_APPLY_ROUNDING_DIFFERENCE');
1549: x_return_status := Okc_Api.G_RET_STS_ERROR;
1545: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
1546: ,p_msg_name => g_invalid_value
1547: ,p_token1 => g_col_name_token
1548: ,p_token1_value => 'STM_APPLY_ROUNDING_DIFFERENCE');
1549: x_return_status := Okc_Api.G_RET_STS_ERROR;
1550: RAISE G_EXCEPTION_HALT_VALIDATION;
1551: END IF;
1552:
1553: END IF;
1559: NULL;
1560:
1561: WHEN OTHERS THEN
1562: -- store SQL error message on message stack for caller
1563: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1564: ,p_msg_name => G_UNEXPECTED_ERROR
1565: ,p_token1 => G_SQLCODE_TOKEN
1566: ,p_token1_value => SQLCODE
1567: ,p_token2 => G_SQLERRM_TOKEN
1567: ,p_token2 => G_SQLERRM_TOKEN
1568: ,p_token2_value => SQLERRM);
1569:
1570: -- notify caller of an UNEXPECTED error
1571: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1572:
1573: END validate_stm_apply_round_diff;
1574:
1575:
1589: p_saov_rec IN saov_rec_type,
1590: x_return_status OUT NOCOPY VARCHAR2
1591: ) IS
1592:
1593: l_dummy VARCHAR2(1) := OKC_API.G_FALSE;
1594:
1595:
1596: BEGIN
1597: -- initialize return status
1594:
1595:
1596: BEGIN
1597: -- initialize return status
1598: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1599:
1600: IF (p_saov_rec.stm_rounding_rule IS NOT NULL) AND
1601: (p_saov_rec.stm_rounding_rule <> OKC_API.G_MISS_CHAR)
1602: THEN
1597: -- initialize return status
1598: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1599:
1600: IF (p_saov_rec.stm_rounding_rule IS NOT NULL) AND
1601: (p_saov_rec.stm_rounding_rule <> OKC_API.G_MISS_CHAR)
1602: THEN
1603: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_ROUNDING_RULE',
1604: p_lookup_code => p_saov_rec.stm_rounding_rule);
1605:
1602: THEN
1603: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_ROUNDING_RULE',
1604: p_lookup_code => p_saov_rec.stm_rounding_rule);
1605:
1606: IF (l_dummy = OKC_API.G_FALSE) THEN
1607:
1608: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1609: ,p_msg_name => G_INVALID_VALUE
1610: ,p_token1 => G_COL_NAME_TOKEN
1604: p_lookup_code => p_saov_rec.stm_rounding_rule);
1605:
1606: IF (l_dummy = OKC_API.G_FALSE) THEN
1607:
1608: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1609: ,p_msg_name => G_INVALID_VALUE
1610: ,p_token1 => G_COL_NAME_TOKEN
1611: ,p_token1_value => 'stm_rounding_rule');
1612: x_return_status := Okc_Api.G_RET_STS_ERROR;
1608: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1609: ,p_msg_name => G_INVALID_VALUE
1610: ,p_token1 => G_COL_NAME_TOKEN
1611: ,p_token1_value => 'stm_rounding_rule');
1612: x_return_status := Okc_Api.G_RET_STS_ERROR;
1613: END IF;
1614: END IF;
1615:
1616: EXCEPTION
1620: NULL;
1621:
1622: WHEN OTHERS THEN
1623: -- store SQL error message on message stack for caller
1624: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1625: ,p_msg_name => G_UNEXPECTED_ERROR
1626: ,p_token1 => G_SQLCODE_TOKEN
1627: ,p_token1_value => SQLCODE
1628: ,p_token2 => G_SQLERRM_TOKEN
1628: ,p_token2 => G_SQLERRM_TOKEN
1629: ,p_token2_value => SQLERRM);
1630:
1631: -- notify caller of an UNEXPECTED error
1632: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1633:
1634: -- verify that the cursor was closed
1635: END validate_stm_rounding_rule;
1636:
1645: l_dummy varchar2(1);
1646:
1647: BEGIN
1648: -- initialize return status
1649: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1650:
1651: IF (p_saov_rec.ISG_ARREARS_PAY_DATES_OPTION <> Okc_Api.G_MISS_CHAR ) AND
1652: (p_saov_rec.ISG_ARREARS_PAY_DATES_OPTION IS NOT NULL) THEN
1653:
1647: BEGIN
1648: -- initialize return status
1649: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1650:
1651: IF (p_saov_rec.ISG_ARREARS_PAY_DATES_OPTION <> Okc_Api.G_MISS_CHAR ) AND
1652: (p_saov_rec.ISG_ARREARS_PAY_DATES_OPTION IS NOT NULL) THEN
1653:
1654: l_dummy
1655: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_ISG_ARREAR_PAY_DATE_OPTION',
1654: l_dummy
1655: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_ISG_ARREAR_PAY_DATE_OPTION',
1656: p_lookup_code => p_saov_rec.isg_arrears_pay_dates_option);
1657:
1658: IF (l_dummy = Okc_Api.G_FALSE) THEN
1659: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
1660: ,p_msg_name => g_invalid_value
1661: ,p_token1 => g_col_name_token
1662: ,p_token1_value => 'ISG_ARREARS_PAY_DATES_OPTION');
1655: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_ISG_ARREAR_PAY_DATE_OPTION',
1656: p_lookup_code => p_saov_rec.isg_arrears_pay_dates_option);
1657:
1658: IF (l_dummy = Okc_Api.G_FALSE) THEN
1659: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
1660: ,p_msg_name => g_invalid_value
1661: ,p_token1 => g_col_name_token
1662: ,p_token1_value => 'ISG_ARREARS_PAY_DATES_OPTION');
1663: x_return_status := Okc_Api.G_RET_STS_ERROR;
1659: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
1660: ,p_msg_name => g_invalid_value
1661: ,p_token1 => g_col_name_token
1662: ,p_token1_value => 'ISG_ARREARS_PAY_DATES_OPTION');
1663: x_return_status := Okc_Api.G_RET_STS_ERROR;
1664: RAISE G_EXCEPTION_HALT_VALIDATION;
1665: END IF;
1666:
1667: END IF;
1673: NULL;
1674:
1675: WHEN OTHERS THEN
1676: -- store SQL error message on message stack for caller
1677: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1678: ,p_msg_name => G_UNEXPECTED_ERROR
1679: ,p_token1 => G_SQLCODE_TOKEN
1680: ,p_token1_value => SQLCODE
1681: ,p_token2 => G_SQLERRM_TOKEN
1681: ,p_token2 => G_SQLERRM_TOKEN
1682: ,p_token2_value => SQLERRM);
1683:
1684: -- notify caller of an UNEXPECTED error
1685: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1686:
1687: END validate_arrears_pay_dt_opt;
1688:
1689: --Bug# 8370699
1710: l_dummy varchar2(1);
1711:
1712: BEGIN
1713: -- initialize return status
1714: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1715:
1716: IF (p_saov_rec.AMORT_INC_ADJ_REV_DT_YN <> Okc_Api.G_MISS_CHAR ) AND
1717: (p_saov_rec.AMORT_INC_ADJ_REV_DT_YN IS NOT NULL) THEN
1718:
1712: BEGIN
1713: -- initialize return status
1714: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1715:
1716: IF (p_saov_rec.AMORT_INC_ADJ_REV_DT_YN <> Okc_Api.G_MISS_CHAR ) AND
1717: (p_saov_rec.AMORT_INC_ADJ_REV_DT_YN IS NOT NULL) THEN
1718:
1719: l_dummy
1720: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_YES_NO',
1719: l_dummy
1720: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_YES_NO',
1721: p_lookup_code => p_saov_rec.amort_inc_adj_rev_dt_yn);
1722:
1723: IF (l_dummy = Okc_Api.G_FALSE) THEN
1724: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
1725: ,p_msg_name => g_invalid_value
1726: ,p_token1 => g_col_name_token
1727: ,p_token1_value => 'AMORT_INC_ADJ_REV_DT_YN');
1720: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_YES_NO',
1721: p_lookup_code => p_saov_rec.amort_inc_adj_rev_dt_yn);
1722:
1723: IF (l_dummy = Okc_Api.G_FALSE) THEN
1724: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
1725: ,p_msg_name => g_invalid_value
1726: ,p_token1 => g_col_name_token
1727: ,p_token1_value => 'AMORT_INC_ADJ_REV_DT_YN');
1728: x_return_status := Okc_Api.G_RET_STS_ERROR;
1724: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
1725: ,p_msg_name => g_invalid_value
1726: ,p_token1 => g_col_name_token
1727: ,p_token1_value => 'AMORT_INC_ADJ_REV_DT_YN');
1728: x_return_status := Okc_Api.G_RET_STS_ERROR;
1729: RAISE G_EXCEPTION_HALT_VALIDATION;
1730: END IF;
1731:
1732: END IF;
1738: NULL;
1739:
1740: WHEN OTHERS THEN
1741: -- store SQL error message on message stack for caller
1742: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1743: ,p_msg_name => G_UNEXPECTED_ERROR
1744: ,p_token1 => G_SQLCODE_TOKEN
1745: ,p_token1_value => SQLCODE
1746: ,p_token2 => G_SQLERRM_TOKEN
1746: ,p_token2 => G_SQLERRM_TOKEN
1747: ,p_token2_value => SQLERRM);
1748:
1749: -- notify caller of an UNEXPECTED error
1750: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1751:
1752: END validate_amort_inc_adj_rev_dt;
1753: --Bug# 8370699
1754:
1766: l_dummy varchar2(1);
1767:
1768: BEGIN
1769: -- initialize return status
1770: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1771:
1772: IF (p_saov_rec.VALIDATE_KHR_START_DATE <> Okc_Api.G_MISS_CHAR) AND
1773: (p_saov_rec.VALIDATE_KHR_START_DATE IS NOT NULL)
1774: THEN
1768: BEGIN
1769: -- initialize return status
1770: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1771:
1772: IF (p_saov_rec.VALIDATE_KHR_START_DATE <> Okc_Api.G_MISS_CHAR) AND
1773: (p_saov_rec.VALIDATE_KHR_START_DATE IS NOT NULL)
1774: THEN
1775: l_dummy
1776: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_ACCRUAL_STREAMS_BASIS',
1775: l_dummy
1776: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_ACCRUAL_STREAMS_BASIS',
1777: p_lookup_code => p_saov_rec.validate_khr_start_date);
1778:
1779: IF (l_dummy = Okc_Api.G_FALSE) THEN
1780: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
1781: ,p_msg_name => g_invalid_value
1782: ,p_token1 => g_col_name_token
1783: ,p_token1_value => 'VALIDATE_KHR_START_DATE');
1776: := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(p_lookup_type => 'OKL_ACCRUAL_STREAMS_BASIS',
1777: p_lookup_code => p_saov_rec.validate_khr_start_date);
1778:
1779: IF (l_dummy = Okc_Api.G_FALSE) THEN
1780: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
1781: ,p_msg_name => g_invalid_value
1782: ,p_token1 => g_col_name_token
1783: ,p_token1_value => 'VALIDATE_KHR_START_DATE');
1784: x_return_status := Okc_Api.G_RET_STS_ERROR;
1780: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
1781: ,p_msg_name => g_invalid_value
1782: ,p_token1 => g_col_name_token
1783: ,p_token1_value => 'VALIDATE_KHR_START_DATE');
1784: x_return_status := Okc_Api.G_RET_STS_ERROR;
1785: RAISE G_EXCEPTION_HALT_VALIDATION;
1786: END IF;
1787: END IF;
1788:
1793: NULL;
1794:
1795: WHEN OTHERS THEN
1796: -- store SQL error message on message stack for caller
1797: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1798: ,p_msg_name => G_UNEXPECTED_ERROR
1799: ,p_token1 => G_SQLCODE_TOKEN
1800: ,p_token1_value => SQLCODE
1801: ,p_token2 => G_SQLERRM_TOKEN
1801: ,p_token2 => G_SQLERRM_TOKEN
1802: ,p_token2_value => SQLERRM);
1803:
1804: -- notify caller of an UNEXPECTED error
1805: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1806:
1807: END validate_khr_start_date;
1808: --Bug 4884618(H) end
1809:
1822: PROCEDURE validate_account_derivation(
1823: p_saov_rec IN saov_rec_type,
1824: x_return_status OUT NOCOPY VARCHAR2
1825: ) IS
1826: l_dummy VARCHAR2(1) := OKC_API.G_FALSE;
1827: BEGIN
1828: -- Initialise the return Status
1829: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1830: IF (p_saov_rec.account_derivation IS NOT NULL) AND
1825: ) IS
1826: l_dummy VARCHAR2(1) := OKC_API.G_FALSE;
1827: BEGIN
1828: -- Initialise the return Status
1829: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1830: IF (p_saov_rec.account_derivation IS NOT NULL) AND
1831: (p_saov_rec.account_derivation <> OKC_API.G_MISS_CHAR)
1832: THEN
1833: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(
1827: BEGIN
1828: -- Initialise the return Status
1829: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1830: IF (p_saov_rec.account_derivation IS NOT NULL) AND
1831: (p_saov_rec.account_derivation <> OKC_API.G_MISS_CHAR)
1832: THEN
1833: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(
1834: p_lookup_type => 'OKL_ACCOUNT_DERIVATION_OPTION',
1835: p_lookup_code => p_saov_rec.account_derivation);
1832: THEN
1833: l_dummy := OKL_ACCOUNTING_UTIL.VALIDATE_LOOKUP_CODE(
1834: p_lookup_type => 'OKL_ACCOUNT_DERIVATION_OPTION',
1835: p_lookup_code => p_saov_rec.account_derivation);
1836: IF (l_dummy = OKC_API.G_FALSE)
1837: THEN
1838: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1839: ,p_msg_name => G_INVALID_VALUE
1840: ,p_token1 => G_COL_NAME_TOKEN
1834: p_lookup_type => 'OKL_ACCOUNT_DERIVATION_OPTION',
1835: p_lookup_code => p_saov_rec.account_derivation);
1836: IF (l_dummy = OKC_API.G_FALSE)
1837: THEN
1838: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1839: ,p_msg_name => G_INVALID_VALUE
1840: ,p_token1 => G_COL_NAME_TOKEN
1841: ,p_token1_value => 'ACCOUNT_DERIVATION');
1842: x_return_status := Okc_Api.G_RET_STS_ERROR;
1838: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1839: ,p_msg_name => G_INVALID_VALUE
1840: ,p_token1 => G_COL_NAME_TOKEN
1841: ,p_token1_value => 'ACCOUNT_DERIVATION');
1842: x_return_status := Okc_Api.G_RET_STS_ERROR;
1843: END IF;
1844: END IF;
1845: EXCEPTION
1846: WHEN G_EXCEPTION_HALT_VALIDATION
1847: THEN
1848: NULL;
1849: WHEN OTHERS
1850: THEN
1851: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1852: ,p_msg_name => G_UNEXPECTED_ERROR
1853: ,p_token1 => G_SQLCODE_TOKEN
1854: ,p_token1_value => SQLCODE
1855: ,p_token2 => G_SQLERRM_TOKEN
1853: ,p_token1 => G_SQLCODE_TOKEN
1854: ,p_token1_value => SQLCODE
1855: ,p_token2 => G_SQLERRM_TOKEN
1856: ,p_token2_value => SQLERRM);
1857: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1858: END validate_account_derivation;
1859: ---------------------------------------------------------------------------
1860: -- PROCEDURE validate_pay_dist_set
1861: ---------------------------------------------------------------------------
1877: select 1 from AP_DISTRIBUTION_SETS where DISTRIBUTION_SET_ID = distsetid ;
1878:
1879: BEGIN
1880: -- initialize return status
1881: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1882:
1883: IF (p_saov_rec.PAY_DIST_SET_ID <> Okc_Api.G_MISS_NUM ) AND
1884: (p_saov_rec.PAY_DIST_SET_ID IS NOT NULL) THEN
1885: open ValidDistsetId_csr (p_saov_rec.PAY_DIST_SET_ID );
1879: BEGIN
1880: -- initialize return status
1881: x_return_status := Okc_Api.G_RET_STS_SUCCESS;
1882:
1883: IF (p_saov_rec.PAY_DIST_SET_ID <> Okc_Api.G_MISS_NUM ) AND
1884: (p_saov_rec.PAY_DIST_SET_ID IS NOT NULL) THEN
1885: open ValidDistsetId_csr (p_saov_rec.PAY_DIST_SET_ID );
1886: FETCH ValidDistsetId_csr INTO l_dummy;
1887: CLOSE ValidDistsetId_csr;
1885: open ValidDistsetId_csr (p_saov_rec.PAY_DIST_SET_ID );
1886: FETCH ValidDistsetId_csr INTO l_dummy;
1887: CLOSE ValidDistsetId_csr;
1888: IF (l_dummy <> 1) THEN
1889: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
1890: ,p_msg_name => 'OKL_SETUP_ACCT_PAY_DST_INVALID'
1891: );
1892: x_return_status := Okc_Api.G_RET_STS_ERROR;
1893: RAISE G_EXCEPTION_HALT_VALIDATION;
1888: IF (l_dummy <> 1) THEN
1889: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
1890: ,p_msg_name => 'OKL_SETUP_ACCT_PAY_DST_INVALID'
1891: );
1892: x_return_status := Okc_Api.G_RET_STS_ERROR;
1893: RAISE G_EXCEPTION_HALT_VALIDATION;
1894: END IF;
1895:
1896:
1894: END IF;
1895:
1896:
1897: END IF ;
1898: IF(p_saov_rec.account_derivation='AMB' AND (p_saov_rec.PAY_DIST_SET_ID IS NULL OR p_saov_rec.PAY_DIST_SET_ID = Okc_Api.G_MISS_NUM )) THEN
1899: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
1900: ,p_msg_name => 'OKL_SETUP_ACCT_PAY_DST_RQD'
1901: );
1902: x_return_status := Okc_Api.G_RET_STS_ERROR;
1895:
1896:
1897: END IF ;
1898: IF(p_saov_rec.account_derivation='AMB' AND (p_saov_rec.PAY_DIST_SET_ID IS NULL OR p_saov_rec.PAY_DIST_SET_ID = Okc_Api.G_MISS_NUM )) THEN
1899: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
1900: ,p_msg_name => 'OKL_SETUP_ACCT_PAY_DST_RQD'
1901: );
1902: x_return_status := Okc_Api.G_RET_STS_ERROR;
1903: RAISE G_EXCEPTION_HALT_VALIDATION;
1898: IF(p_saov_rec.account_derivation='AMB' AND (p_saov_rec.PAY_DIST_SET_ID IS NULL OR p_saov_rec.PAY_DIST_SET_ID = Okc_Api.G_MISS_NUM )) THEN
1899: Okc_Api.SET_MESSAGE(p_app_name => g_app_name
1900: ,p_msg_name => 'OKL_SETUP_ACCT_PAY_DST_RQD'
1901: );
1902: x_return_status := Okc_Api.G_RET_STS_ERROR;
1903: RAISE G_EXCEPTION_HALT_VALIDATION;
1904:
1905: END IF;
1906:
1912: NULL;
1913:
1914: WHEN OTHERS THEN
1915: -- store SQL error message on message stack for caller
1916: Okc_Api.SET_MESSAGE(p_app_name => G_APP_NAME
1917: ,p_msg_name => G_UNEXPECTED_ERROR
1918: ,p_token1 => G_SQLCODE_TOKEN
1919: ,p_token1_value => SQLCODE
1920: ,p_token2 => G_SQLERRM_TOKEN
1920: ,p_token2 => G_SQLERRM_TOKEN
1921: ,p_token2_value => SQLERRM);
1922:
1923: -- notify caller of an UNEXPECTED error
1924: x_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
1925:
1926: END validate_pay_dist_set;
1927:
1928: ---------------------------------------------------------------------------
1941: FUNCTION Validate_Attributes (
1942: p_saov_rec IN saov_rec_type
1943: ) RETURN VARCHAR2 IS
1944:
1945: x_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1946: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1947: BEGIN
1948: -- call each column-level validation
1949:
1942: p_saov_rec IN saov_rec_type
1943: ) RETURN VARCHAR2 IS
1944:
1945: x_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1946: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1947: BEGIN
1948: -- call each column-level validation
1949:
1950: -- Validate_Id
1948: -- call each column-level validation
1949:
1950: -- Validate_Id
1951: Validate_Id(p_saov_rec, x_return_status);
1952: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
1953: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
1954: -- need to exit
1955: l_return_status := x_return_status;
1956: RAISE G_EXCEPTION_HALT_VALIDATION;
1949:
1950: -- Validate_Id
1951: Validate_Id(p_saov_rec, x_return_status);
1952: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
1953: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
1954: -- need to exit
1955: l_return_status := x_return_status;
1956: RAISE G_EXCEPTION_HALT_VALIDATION;
1957: ELSE
1960: END IF;
1961: END IF;
1962:
1963: validate_sec_rep_mthd(p_saov_rec, x_return_status);
1964: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
1965: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
1966: -- need to exit
1967: l_return_status := x_return_status;
1968: RAISE G_EXCEPTION_HALT_VALIDATION;
1961: END IF;
1962:
1963: validate_sec_rep_mthd(p_saov_rec, x_return_status);
1964: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
1965: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
1966: -- need to exit
1967: l_return_status := x_return_status;
1968: RAISE G_EXCEPTION_HALT_VALIDATION;
1969: ELSE
1972: END IF;
1973: END IF;
1974:
1975: validate_ael_apply_round_diff(p_saov_rec, x_return_status);
1976: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
1977: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
1978: -- need to exit
1979: l_return_status := x_return_status;
1980: RAISE G_EXCEPTION_HALT_VALIDATION;
1973: END IF;
1974:
1975: validate_ael_apply_round_diff(p_saov_rec, x_return_status);
1976: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
1977: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
1978: -- need to exit
1979: l_return_status := x_return_status;
1980: RAISE G_EXCEPTION_HALT_VALIDATION;
1981: ELSE
1984: END IF;
1985: END IF;
1986:
1987: validate_cc_apply_round_diff(p_saov_rec, x_return_status);
1988: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
1989: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
1990: -- need to exit
1991: l_return_status := x_return_status;
1992: RAISE G_EXCEPTION_HALT_VALIDATION;
1985: END IF;
1986:
1987: validate_cc_apply_round_diff(p_saov_rec, x_return_status);
1988: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
1989: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
1990: -- need to exit
1991: l_return_status := x_return_status;
1992: RAISE G_EXCEPTION_HALT_VALIDATION;
1993: ELSE
1997: END IF;
1998:
1999: -- Validate_Object_Version_Number
2000: Validate_Object_Version_Number(p_saov_rec, x_return_status);
2001: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2002: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2003: -- need to exit
2004: l_return_status := x_return_status;
2005: RAISE G_EXCEPTION_HALT_VALIDATION;
1998:
1999: -- Validate_Object_Version_Number
2000: Validate_Object_Version_Number(p_saov_rec, x_return_status);
2001: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2002: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2003: -- need to exit
2004: l_return_status := x_return_status;
2005: RAISE G_EXCEPTION_HALT_VALIDATION;
2006: ELSE
2010: END IF;
2011:
2012: -- Validate_CC_REP_CURRENCY_CODE
2013: Validate_CC_REP_CURRENCY_CODE(p_saov_rec, x_return_status);
2014: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2015: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2016: -- need to exit
2017: l_return_status := x_return_status;
2018: RAISE G_EXCEPTION_HALT_VALIDATION;
2011:
2012: -- Validate_CC_REP_CURRENCY_CODE
2013: Validate_CC_REP_CURRENCY_CODE(p_saov_rec, x_return_status);
2014: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2015: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2016: -- need to exit
2017: l_return_status := x_return_status;
2018: RAISE G_EXCEPTION_HALT_VALIDATION;
2019: ELSE
2023: END IF;
2024:
2025: -- Validate_AEL_REP_CURRENCY_CODE
2026: Validate_AEL_REP_CURRENCY_CODE(p_saov_rec, x_return_status);
2027: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2028: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2029: -- need to exit
2030: l_return_status := x_return_status;
2031: RAISE G_EXCEPTION_HALT_VALIDATION;
2024:
2025: -- Validate_AEL_REP_CURRENCY_CODE
2026: Validate_AEL_REP_CURRENCY_CODE(p_saov_rec, x_return_status);
2027: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2028: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2029: -- need to exit
2030: l_return_status := x_return_status;
2031: RAISE G_EXCEPTION_HALT_VALIDATION;
2032: ELSE
2036: END IF;
2037:
2038: -- validate_Accrual_rev_days
2039: validate_Accrual_rev_days(p_saov_rec, x_return_status);
2040: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2041: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2042: -- need to exit
2043: l_return_status := x_return_status;
2044: RAISE G_EXCEPTION_HALT_VALIDATION;
2037:
2038: -- validate_Accrual_rev_days
2039: validate_Accrual_rev_days(p_saov_rec, x_return_status);
2040: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2041: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2042: -- need to exit
2043: l_return_status := x_return_status;
2044: RAISE G_EXCEPTION_HALT_VALIDATION;
2045: ELSE
2050: -- R12 SLA Uptake: Begin
2051: -- Commenting the validate_set_of_book_id API as this column is obsoleted now.
2052: /*
2053: Validate_Set_Of_Books_Id(p_saov_rec, x_return_status);
2054: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2055: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2056: -- need to exit
2057: l_return_status := x_return_status;
2058: RAISE G_EXCEPTION_HALT_VALIDATION;
2051: -- Commenting the validate_set_of_book_id API as this column is obsoleted now.
2052: /*
2053: Validate_Set_Of_Books_Id(p_saov_rec, x_return_status);
2054: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2055: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2056: -- need to exit
2057: l_return_status := x_return_status;
2058: RAISE G_EXCEPTION_HALT_VALIDATION;
2059: ELSE
2067: -- Validate_All_Ccid
2068:
2069: Validate_All_Ccid(p_saov_rec, x_return_status);
2070:
2071: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
2072: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2073: -- need to exit
2074: l_return_status := x_return_status;
2075: RAISE G_EXCEPTION_HALT_VALIDATION;
2068:
2069: Validate_All_Ccid(p_saov_rec, x_return_status);
2070:
2071: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
2072: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2073: -- need to exit
2074: l_return_status := x_return_status;
2075: RAISE G_EXCEPTION_HALT_VALIDATION;
2076: ELSE
2084:
2085: -- Validate_Cc_Rounding_Rule
2086:
2087: Validate_Cc_Rounding_Rule(p_saov_rec, x_return_status);
2088: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2089: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2090: -- need to exit
2091: l_return_status := x_return_status;
2092: RAISE G_EXCEPTION_HALT_VALIDATION;
2085: -- Validate_Cc_Rounding_Rule
2086:
2087: Validate_Cc_Rounding_Rule(p_saov_rec, x_return_status);
2088: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2089: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2090: -- need to exit
2091: l_return_status := x_return_status;
2092: RAISE G_EXCEPTION_HALT_VALIDATION;
2093: ELSE
2097: END IF;
2098:
2099: -- Validate_Ael_Rounding_Rule
2100: Validate_Ael_Rounding_Rule(p_saov_rec, x_return_status);
2101: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2102: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2103: -- need to exit
2104: l_return_status := x_return_status;
2105: RAISE G_EXCEPTION_HALT_VALIDATION;
2098:
2099: -- Validate_Ael_Rounding_Rule
2100: Validate_Ael_Rounding_Rule(p_saov_rec, x_return_status);
2101: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2102: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2103: -- need to exit
2104: l_return_status := x_return_status;
2105: RAISE G_EXCEPTION_HALT_VALIDATION;
2106: ELSE
2110: END IF;
2111:
2112: -- Added new field lke_hold_days for the bug 2331564 by Santonyr
2113: Validate_Lke_Hold_Days (p_saov_rec, x_return_status);
2114: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2115: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2116: -- need to exit
2117: l_return_status := x_return_status;
2118: RAISE G_EXCEPTION_HALT_VALIDATION;
2111:
2112: -- Added new field lke_hold_days for the bug 2331564 by Santonyr
2113: Validate_Lke_Hold_Days (p_saov_rec, x_return_status);
2114: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2115: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2116: -- need to exit
2117: l_return_status := x_return_status;
2118: RAISE G_EXCEPTION_HALT_VALIDATION;
2119: ELSE
2123: END IF;
2124:
2125: -- Validate Stm_apply_round_diff
2126: validate_stm_apply_round_diff(p_saov_rec, x_return_status);
2127: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2128: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2129: -- need to exit
2130: l_return_status := x_return_status;
2131: RAISE G_EXCEPTION_HALT_VALIDATION;
2124:
2125: -- Validate Stm_apply_round_diff
2126: validate_stm_apply_round_diff(p_saov_rec, x_return_status);
2127: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2128: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2129: -- need to exit
2130: l_return_status := x_return_status;
2131: RAISE G_EXCEPTION_HALT_VALIDATION;
2132: ELSE
2136: END IF;
2137:
2138: -- Validate Stm_Rounding_Rule
2139: Validate_Stm_Rounding_Rule(p_saov_rec, x_return_status);
2140: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2141: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2142: -- need to exit
2143: l_return_status := x_return_status;
2144: RAISE G_EXCEPTION_HALT_VALIDATION;
2137:
2138: -- Validate Stm_Rounding_Rule
2139: Validate_Stm_Rounding_Rule(p_saov_rec, x_return_status);
2140: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2141: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2142: -- need to exit
2143: l_return_status := x_return_status;
2144: RAISE G_EXCEPTION_HALT_VALIDATION;
2145: ELSE
2150:
2151: /*Added new field validation for bug 4884618(H) */
2152: --validate validate_khr_start_date
2153: validate_khr_start_date(p_saov_rec, x_return_status);
2154: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2155: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2156: -- need to exit
2157: l_return_status := x_return_status;
2158: RAISE G_EXCEPTION_HALT_VALIDATION;
2151: /*Added new field validation for bug 4884618(H) */
2152: --validate validate_khr_start_date
2153: validate_khr_start_date(p_saov_rec, x_return_status);
2154: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2155: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2156: -- need to exit
2157: l_return_status := x_return_status;
2158: RAISE G_EXCEPTION_HALT_VALIDATION;
2159: ELSE
2162: END IF;
2163: END IF;
2164: -- R12 SLA Uptake: Begin
2165: validate_account_derivation(p_saov_rec, x_return_status);
2166: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS)
2167: THEN
2168: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR)
2169: THEN
2170: -- Raise the exception
2164: -- R12 SLA Uptake: Begin
2165: validate_account_derivation(p_saov_rec, x_return_status);
2166: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS)
2167: THEN
2168: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR)
2169: THEN
2170: -- Raise the exception
2171: l_return_status := x_return_status;
2172: RAISE G_EXCEPTION_HALT_VALIDATION;
2176: END IF;
2177: -- R12 SLA Uptake: End
2178:
2179: validate_arrears_pay_dt_opt(p_saov_rec, x_return_status);
2180: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2181: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2182: -- need to exit
2183: l_return_status := x_return_status;
2184: RAISE G_EXCEPTION_HALT_VALIDATION;
2177: -- R12 SLA Uptake: End
2178:
2179: validate_arrears_pay_dt_opt(p_saov_rec, x_return_status);
2180: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2181: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2182: -- need to exit
2183: l_return_status := x_return_status;
2184: RAISE G_EXCEPTION_HALT_VALIDATION;
2185: ELSE
2187: l_return_status := x_return_status;
2188: END IF;
2189: END IF;
2190: validate_pay_dist_set(p_saov_rec, x_return_status);
2191: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2192: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2193: -- need to exit
2194: l_return_status := x_return_status;
2195: RAISE G_EXCEPTION_HALT_VALIDATION;
2188: END IF;
2189: END IF;
2190: validate_pay_dist_set(p_saov_rec, x_return_status);
2191: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2192: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2193: -- need to exit
2194: l_return_status := x_return_status;
2195: RAISE G_EXCEPTION_HALT_VALIDATION;
2196: ELSE
2201:
2202: --Bug# 8370699
2203: --validate amort_inc_adj_rev_dt_yn
2204: validate_amort_inc_adj_rev_dt(p_saov_rec, x_return_status);
2205: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2206: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2207: -- need to exit
2208: l_return_status := x_return_status;
2209: RAISE G_EXCEPTION_HALT_VALIDATION;
2202: --Bug# 8370699
2203: --validate amort_inc_adj_rev_dt_yn
2204: validate_amort_inc_adj_rev_dt(p_saov_rec, x_return_status);
2205: IF (x_return_status <> Okc_Api.G_RET_STS_SUCCESS) THEN
2206: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2207: -- need to exit
2208: l_return_status := x_return_status;
2209: RAISE G_EXCEPTION_HALT_VALIDATION;
2210: ELSE
2222: RETURN (l_return_status);
2223:
2224: WHEN OTHERS THEN
2225: -- store SQL error message on message stack for caller
2226: Okc_Api.SET_MESSAGE(p_app_name => g_app_name,
2227: p_msg_name => g_unexpected_error,
2228: p_token1 => g_sqlcode_token,
2229: p_token1_value => SQLCODE,
2230: p_token2 => g_sqlerrm_token,
2229: p_token1_value => SQLCODE,
2230: p_token2 => g_sqlerrm_token,
2231: p_token2_value => SQLERRM);
2232: -- notify caller of an UNEXPECTED error
2233: l_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
2234:
2235: RETURN(l_return_status);
2236: END validate_attributes;
2237: -- END change : mvasudev
2244: ---------------------------------------------
2245: FUNCTION Validate_Record (
2246: p_saov_rec IN saov_rec_type
2247: ) RETURN VARCHAR2 IS
2248: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2249: BEGIN
2250: RETURN (l_return_status);
2251: END Validate_Record;
2252:
2416: -- validate_row for:OKL_SYS_ACCT_OPTS_V --
2417: ------------------------------------------
2418: PROCEDURE validate_row(
2419: p_api_version IN NUMBER,
2420: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
2421: x_return_status OUT NOCOPY VARCHAR2,
2422: x_msg_count OUT NOCOPY NUMBER,
2423: x_msg_data OUT NOCOPY VARCHAR2,
2424: p_saov_rec IN saov_rec_type) IS
2424: p_saov_rec IN saov_rec_type) IS
2425:
2426: l_api_version CONSTANT NUMBER := 1;
2427: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
2428: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2429: l_saov_rec saov_rec_type := p_saov_rec;
2430: l_sao_rec sao_rec_type;
2431: BEGIN
2432: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
2428: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2429: l_saov_rec saov_rec_type := p_saov_rec;
2430: l_sao_rec sao_rec_type;
2431: BEGIN
2432: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
2433: G_PKG_NAME,
2434: p_init_msg_list,
2435: l_api_version,
2436: p_api_version,
2435: l_api_version,
2436: p_api_version,
2437: '_PVT',
2438: x_return_status);
2439: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2440: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2441: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2442: RAISE Okc_Api.G_EXCEPTION_ERROR;
2443: END IF;
2436: p_api_version,
2437: '_PVT',
2438: x_return_status);
2439: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2440: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2441: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2442: RAISE Okc_Api.G_EXCEPTION_ERROR;
2443: END IF;
2444: --- Validate all non-missing attributes (Item Level Validation)
2437: '_PVT',
2438: x_return_status);
2439: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2440: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2441: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2442: RAISE Okc_Api.G_EXCEPTION_ERROR;
2443: END IF;
2444: --- Validate all non-missing attributes (Item Level Validation)
2445: l_return_status := Validate_Attributes(l_saov_rec);
2438: x_return_status);
2439: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2440: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2441: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2442: RAISE Okc_Api.G_EXCEPTION_ERROR;
2443: END IF;
2444: --- Validate all non-missing attributes (Item Level Validation)
2445: l_return_status := Validate_Attributes(l_saov_rec);
2446: --- If any errors happen abort API
2443: END IF;
2444: --- Validate all non-missing attributes (Item Level Validation)
2445: l_return_status := Validate_Attributes(l_saov_rec);
2446: --- If any errors happen abort API
2447: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2448: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2449: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2450: RAISE Okc_Api.G_EXCEPTION_ERROR;
2451: END IF;
2444: --- Validate all non-missing attributes (Item Level Validation)
2445: l_return_status := Validate_Attributes(l_saov_rec);
2446: --- If any errors happen abort API
2447: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2448: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2449: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2450: RAISE Okc_Api.G_EXCEPTION_ERROR;
2451: END IF;
2452: l_return_status := Validate_Record(l_saov_rec);
2445: l_return_status := Validate_Attributes(l_saov_rec);
2446: --- If any errors happen abort API
2447: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2448: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2449: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2450: RAISE Okc_Api.G_EXCEPTION_ERROR;
2451: END IF;
2452: l_return_status := Validate_Record(l_saov_rec);
2453: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2446: --- If any errors happen abort API
2447: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2448: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2449: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2450: RAISE Okc_Api.G_EXCEPTION_ERROR;
2451: END IF;
2452: l_return_status := Validate_Record(l_saov_rec);
2453: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2454: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2449: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2450: RAISE Okc_Api.G_EXCEPTION_ERROR;
2451: END IF;
2452: l_return_status := Validate_Record(l_saov_rec);
2453: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2454: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2455: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2456: RAISE Okc_Api.G_EXCEPTION_ERROR;
2457: END IF;
2450: RAISE Okc_Api.G_EXCEPTION_ERROR;
2451: END IF;
2452: l_return_status := Validate_Record(l_saov_rec);
2453: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2454: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2455: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2456: RAISE Okc_Api.G_EXCEPTION_ERROR;
2457: END IF;
2458: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
2451: END IF;
2452: l_return_status := Validate_Record(l_saov_rec);
2453: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2454: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2455: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2456: RAISE Okc_Api.G_EXCEPTION_ERROR;
2457: END IF;
2458: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
2459: EXCEPTION
2452: l_return_status := Validate_Record(l_saov_rec);
2453: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2454: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2455: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2456: RAISE Okc_Api.G_EXCEPTION_ERROR;
2457: END IF;
2458: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
2459: EXCEPTION
2460: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
2454: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2455: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2456: RAISE Okc_Api.G_EXCEPTION_ERROR;
2457: END IF;
2458: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
2459: EXCEPTION
2460: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
2461: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2462: (
2456: RAISE Okc_Api.G_EXCEPTION_ERROR;
2457: END IF;
2458: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
2459: EXCEPTION
2460: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
2461: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2462: (
2463: l_api_name,
2464: G_PKG_NAME,
2457: END IF;
2458: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
2459: EXCEPTION
2460: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
2461: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2462: (
2463: l_api_name,
2464: G_PKG_NAME,
2465: 'OKC_API.G_RET_STS_ERROR',
2461: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2462: (
2463: l_api_name,
2464: G_PKG_NAME,
2465: 'OKC_API.G_RET_STS_ERROR',
2466: x_msg_count,
2467: x_msg_data,
2468: '_PVT'
2469: );
2466: x_msg_count,
2467: x_msg_data,
2468: '_PVT'
2469: );
2470: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
2471: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
2472: (
2473: l_api_name,
2474: G_PKG_NAME,
2467: x_msg_data,
2468: '_PVT'
2469: );
2470: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
2471: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
2472: (
2473: l_api_name,
2474: G_PKG_NAME,
2475: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2471: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
2472: (
2473: l_api_name,
2474: G_PKG_NAME,
2475: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2476: x_msg_count,
2477: x_msg_data,
2478: '_PVT'
2479: );
2477: x_msg_data,
2478: '_PVT'
2479: );
2480: WHEN OTHERS THEN
2481: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
2482: (
2483: l_api_name,
2484: G_PKG_NAME,
2485: 'OTHERS',
2492: -- PL/SQL TBL validate_row for:SAOV_TBL --
2493: ------------------------------------------
2494: PROCEDURE validate_row(
2495: p_api_version IN NUMBER,
2496: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
2497: x_return_status OUT NOCOPY VARCHAR2,
2498: x_msg_count OUT NOCOPY NUMBER,
2499: x_msg_data OUT NOCOPY VARCHAR2,
2500: p_saov_tbl IN saov_tbl_type) IS
2500: p_saov_tbl IN saov_tbl_type) IS
2501:
2502: l_api_version CONSTANT NUMBER := 1;
2503: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
2504: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2505: i NUMBER := 0;
2506: -- START change : mvasudev, 05/15/2001
2507: -- Adding OverAll Status Flag
2508: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2504: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2505: i NUMBER := 0;
2506: -- START change : mvasudev, 05/15/2001
2507: -- Adding OverAll Status Flag
2508: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2509: -- END change : mvasudev
2510: BEGIN
2511: Okc_Api.init_msg_list(p_init_msg_list);
2512: -- Make sure PL/SQL table has records in it before passing
2507: -- Adding OverAll Status Flag
2508: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2509: -- END change : mvasudev
2510: BEGIN
2511: Okc_Api.init_msg_list(p_init_msg_list);
2512: -- Make sure PL/SQL table has records in it before passing
2513: IF (p_saov_tbl.COUNT > 0) THEN
2514: i := p_saov_tbl.FIRST;
2515: LOOP
2514: i := p_saov_tbl.FIRST;
2515: LOOP
2516: validate_row (
2517: p_api_version => p_api_version,
2518: p_init_msg_list => Okc_Api.G_FALSE,
2519: x_return_status => x_return_status,
2520: x_msg_count => x_msg_count,
2521: x_msg_data => x_msg_data,
2522: p_saov_rec => p_saov_tbl(i));
2521: x_msg_data => x_msg_data,
2522: p_saov_rec => p_saov_tbl(i));
2523: -- START change : mvasudev, 05/15/2001
2524: -- store the highest degree of error
2525: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
2526: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
2527: l_overall_status := x_return_status;
2528: END IF;
2529: END IF;
2522: p_saov_rec => p_saov_tbl(i));
2523: -- START change : mvasudev, 05/15/2001
2524: -- store the highest degree of error
2525: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
2526: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
2527: l_overall_status := x_return_status;
2528: END IF;
2529: END IF;
2530: -- END change : mvasudev
2536: x_return_status := l_overall_status;
2537: -- END change : mvasudev
2538: END IF;
2539: EXCEPTION
2540: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
2541: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2542: (
2543: l_api_name,
2544: G_PKG_NAME,
2537: -- END change : mvasudev
2538: END IF;
2539: EXCEPTION
2540: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
2541: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2542: (
2543: l_api_name,
2544: G_PKG_NAME,
2545: 'OKC_API.G_RET_STS_ERROR',
2541: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2542: (
2543: l_api_name,
2544: G_PKG_NAME,
2545: 'OKC_API.G_RET_STS_ERROR',
2546: x_msg_count,
2547: x_msg_data,
2548: '_PVT'
2549: );
2546: x_msg_count,
2547: x_msg_data,
2548: '_PVT'
2549: );
2550: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
2551: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
2552: (
2553: l_api_name,
2554: G_PKG_NAME,
2547: x_msg_data,
2548: '_PVT'
2549: );
2550: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
2551: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
2552: (
2553: l_api_name,
2554: G_PKG_NAME,
2555: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2551: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
2552: (
2553: l_api_name,
2554: G_PKG_NAME,
2555: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2556: x_msg_count,
2557: x_msg_data,
2558: '_PVT'
2559: );
2557: x_msg_data,
2558: '_PVT'
2559: );
2560: WHEN OTHERS THEN
2561: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
2562: (
2563: l_api_name,
2564: G_PKG_NAME,
2565: 'OTHERS',
2575: --------------------------------------
2576: -- insert_row for:OKL_SYS_ACCT_OPTS --
2577: --------------------------------------
2578: PROCEDURE insert_row(
2579: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
2580: x_return_status OUT NOCOPY VARCHAR2,
2581: x_msg_count OUT NOCOPY NUMBER,
2582: x_msg_data OUT NOCOPY VARCHAR2,
2583: p_sao_rec IN sao_rec_type,
2584: x_sao_rec OUT NOCOPY sao_rec_type) IS
2585:
2586: l_api_version CONSTANT NUMBER := 1;
2587: l_api_name CONSTANT VARCHAR2(30) := 'OPTS_insert_row';
2588: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2589: l_sao_rec sao_rec_type := p_sao_rec;
2590: l_def_sao_rec sao_rec_type;
2591: ------------------------------------------
2592: -- Set_Attributes for:OKL_SYS_ACCT_OPTS --
2594: FUNCTION Set_Attributes (
2595: p_sao_rec IN sao_rec_type,
2596: x_sao_rec OUT NOCOPY sao_rec_type
2597: ) RETURN VARCHAR2 IS
2598: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2599: BEGIN
2600: x_sao_rec := p_sao_rec;
2601: RETURN(l_return_status);
2602: END set_attributes;
2600: x_sao_rec := p_sao_rec;
2601: RETURN(l_return_status);
2602: END set_attributes;
2603: BEGIN
2604: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
2605: p_init_msg_list,
2606: '_PVT',
2607: x_return_status);
2608: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2604: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
2605: p_init_msg_list,
2606: '_PVT',
2607: x_return_status);
2608: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2609: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2610: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2611: RAISE Okc_Api.G_EXCEPTION_ERROR;
2612: END IF;
2605: p_init_msg_list,
2606: '_PVT',
2607: x_return_status);
2608: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2609: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2610: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2611: RAISE Okc_Api.G_EXCEPTION_ERROR;
2612: END IF;
2613: --- Setting item attributes
2606: '_PVT',
2607: x_return_status);
2608: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2609: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2610: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2611: RAISE Okc_Api.G_EXCEPTION_ERROR;
2612: END IF;
2613: --- Setting item attributes
2614: l_return_status := Set_Attributes(
2607: x_return_status);
2608: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2609: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2610: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2611: RAISE Okc_Api.G_EXCEPTION_ERROR;
2612: END IF;
2613: --- Setting item attributes
2614: l_return_status := Set_Attributes(
2615: p_sao_rec, -- IN
2614: l_return_status := Set_Attributes(
2615: p_sao_rec, -- IN
2616: l_sao_rec); -- OUT
2617: --- If any errors happen abort API
2618: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2619: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2620: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2621: RAISE Okc_Api.G_EXCEPTION_ERROR;
2622: END IF;
2615: p_sao_rec, -- IN
2616: l_sao_rec); -- OUT
2617: --- If any errors happen abort API
2618: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2619: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2620: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2621: RAISE Okc_Api.G_EXCEPTION_ERROR;
2622: END IF;
2623: INSERT INTO OKL_SYS_ACCT_OPTS(
2616: l_sao_rec); -- OUT
2617: --- If any errors happen abort API
2618: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2619: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2620: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2621: RAISE Okc_Api.G_EXCEPTION_ERROR;
2622: END IF;
2623: INSERT INTO OKL_SYS_ACCT_OPTS(
2624: id,
2617: --- If any errors happen abort API
2618: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2619: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2620: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2621: RAISE Okc_Api.G_EXCEPTION_ERROR;
2622: END IF;
2623: INSERT INTO OKL_SYS_ACCT_OPTS(
2624: id,
2625: cc_rep_currency_code,
2756: ,l_sao_rec.amort_inc_adj_rev_dt_yn
2757: );
2758: -- Set OUT values
2759: x_sao_rec := l_sao_rec;
2760: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
2761: EXCEPTION
2762: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
2763: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2764: (
2758: -- Set OUT values
2759: x_sao_rec := l_sao_rec;
2760: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
2761: EXCEPTION
2762: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
2763: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2764: (
2765: l_api_name,
2766: G_PKG_NAME,
2759: x_sao_rec := l_sao_rec;
2760: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
2761: EXCEPTION
2762: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
2763: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2764: (
2765: l_api_name,
2766: G_PKG_NAME,
2767: 'OKC_API.G_RET_STS_ERROR',
2763: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2764: (
2765: l_api_name,
2766: G_PKG_NAME,
2767: 'OKC_API.G_RET_STS_ERROR',
2768: x_msg_count,
2769: x_msg_data,
2770: '_PVT'
2771: );
2768: x_msg_count,
2769: x_msg_data,
2770: '_PVT'
2771: );
2772: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
2773: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
2774: (
2775: l_api_name,
2776: G_PKG_NAME,
2769: x_msg_data,
2770: '_PVT'
2771: );
2772: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
2773: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
2774: (
2775: l_api_name,
2776: G_PKG_NAME,
2777: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2773: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
2774: (
2775: l_api_name,
2776: G_PKG_NAME,
2777: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2778: x_msg_count,
2779: x_msg_data,
2780: '_PVT'
2781: );
2779: x_msg_data,
2780: '_PVT'
2781: );
2782: WHEN OTHERS THEN
2783: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
2784: (
2785: l_api_name,
2786: G_PKG_NAME,
2787: 'OTHERS',
2794: -- insert_row for:OKL_SYS_ACCT_OPTS_V --
2795: ----------------------------------------
2796: PROCEDURE insert_row(
2797: p_api_version IN NUMBER,
2798: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
2799: x_return_status OUT NOCOPY VARCHAR2,
2800: x_msg_count OUT NOCOPY NUMBER,
2801: x_msg_data OUT NOCOPY VARCHAR2,
2802: p_saov_rec IN saov_rec_type,
2803: x_saov_rec OUT NOCOPY saov_rec_type) IS
2804:
2805: l_api_version CONSTANT NUMBER := 1;
2806: l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
2807: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2808: l_saov_rec saov_rec_type;
2809: l_def_saov_rec saov_rec_type;
2810: l_sao_rec sao_rec_type;
2811: lx_sao_rec sao_rec_type;
2830: FUNCTION Set_Attributes (
2831: p_saov_rec IN saov_rec_type,
2832: x_saov_rec OUT NOCOPY saov_rec_type
2833: ) RETURN VARCHAR2 IS
2834: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2835: BEGIN
2836: x_saov_rec := p_saov_rec;
2837: x_saov_rec.OBJECT_VERSION_NUMBER := 1;
2838: x_saov_rec.ORG_ID := MO_GLOBAL.GET_CURRENT_ORG_ID();
2840: x_saov_rec.ael_rep_currency_code := 'USD';
2841: RETURN(l_return_status);
2842: END Set_Attributes;
2843: BEGIN
2844: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
2845: G_PKG_NAME,
2846: p_init_msg_list,
2847: l_api_version,
2848: p_api_version,
2847: l_api_version,
2848: p_api_version,
2849: '_PVT',
2850: x_return_status);
2851: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2852: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2853: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2854: RAISE Okc_Api.G_EXCEPTION_ERROR;
2855: END IF;
2848: p_api_version,
2849: '_PVT',
2850: x_return_status);
2851: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2852: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2853: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2854: RAISE Okc_Api.G_EXCEPTION_ERROR;
2855: END IF;
2856: l_saov_rec := null_out_defaults(p_saov_rec);
2849: '_PVT',
2850: x_return_status);
2851: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2852: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2853: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2854: RAISE Okc_Api.G_EXCEPTION_ERROR;
2855: END IF;
2856: l_saov_rec := null_out_defaults(p_saov_rec);
2857: -- Set primary key value
2850: x_return_status);
2851: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2852: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2853: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2854: RAISE Okc_Api.G_EXCEPTION_ERROR;
2855: END IF;
2856: l_saov_rec := null_out_defaults(p_saov_rec);
2857: -- Set primary key value
2858: l_saov_rec.ID := get_seq_id;
2860: l_return_status := Set_Attributes(
2861: l_saov_rec, -- IN
2862: l_def_saov_rec); -- OUT
2863: --- If any errors happen abort API
2864: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2865: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2866: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2867: RAISE Okc_Api.G_EXCEPTION_ERROR;
2868: END IF;
2861: l_saov_rec, -- IN
2862: l_def_saov_rec); -- OUT
2863: --- If any errors happen abort API
2864: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2865: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2866: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2867: RAISE Okc_Api.G_EXCEPTION_ERROR;
2868: END IF;
2869: l_def_saov_rec := fill_who_columns(l_def_saov_rec);
2862: l_def_saov_rec); -- OUT
2863: --- If any errors happen abort API
2864: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2865: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2866: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2867: RAISE Okc_Api.G_EXCEPTION_ERROR;
2868: END IF;
2869: l_def_saov_rec := fill_who_columns(l_def_saov_rec);
2870: --- Validate all non-missing attributes (Item Level Validation)
2863: --- If any errors happen abort API
2864: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2865: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2866: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2867: RAISE Okc_Api.G_EXCEPTION_ERROR;
2868: END IF;
2869: l_def_saov_rec := fill_who_columns(l_def_saov_rec);
2870: --- Validate all non-missing attributes (Item Level Validation)
2871: l_return_status := Validate_Attributes(l_def_saov_rec);
2869: l_def_saov_rec := fill_who_columns(l_def_saov_rec);
2870: --- Validate all non-missing attributes (Item Level Validation)
2871: l_return_status := Validate_Attributes(l_def_saov_rec);
2872: --- If any errors happen abort API
2873: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2874: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2875: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2876: RAISE Okc_Api.G_EXCEPTION_ERROR;
2877: END IF;
2870: --- Validate all non-missing attributes (Item Level Validation)
2871: l_return_status := Validate_Attributes(l_def_saov_rec);
2872: --- If any errors happen abort API
2873: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2874: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2875: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2876: RAISE Okc_Api.G_EXCEPTION_ERROR;
2877: END IF;
2878: l_return_status := Validate_Record(l_def_saov_rec);
2871: l_return_status := Validate_Attributes(l_def_saov_rec);
2872: --- If any errors happen abort API
2873: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2874: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2875: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2876: RAISE Okc_Api.G_EXCEPTION_ERROR;
2877: END IF;
2878: l_return_status := Validate_Record(l_def_saov_rec);
2879: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2872: --- If any errors happen abort API
2873: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2874: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2875: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2876: RAISE Okc_Api.G_EXCEPTION_ERROR;
2877: END IF;
2878: l_return_status := Validate_Record(l_def_saov_rec);
2879: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2880: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2875: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2876: RAISE Okc_Api.G_EXCEPTION_ERROR;
2877: END IF;
2878: l_return_status := Validate_Record(l_def_saov_rec);
2879: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2880: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2881: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2882: RAISE Okc_Api.G_EXCEPTION_ERROR;
2883: END IF;
2876: RAISE Okc_Api.G_EXCEPTION_ERROR;
2877: END IF;
2878: l_return_status := Validate_Record(l_def_saov_rec);
2879: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2880: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2881: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2882: RAISE Okc_Api.G_EXCEPTION_ERROR;
2883: END IF;
2884: --------------------------------------
2877: END IF;
2878: l_return_status := Validate_Record(l_def_saov_rec);
2879: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2880: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2881: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2882: RAISE Okc_Api.G_EXCEPTION_ERROR;
2883: END IF;
2884: --------------------------------------
2885: -- Move VIEW record to "Child" records
2878: l_return_status := Validate_Record(l_def_saov_rec);
2879: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2880: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2881: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2882: RAISE Okc_Api.G_EXCEPTION_ERROR;
2883: END IF;
2884: --------------------------------------
2885: -- Move VIEW record to "Child" records
2886: --------------------------------------
2898: x_msg_data,
2899: l_sao_rec,
2900: lx_sao_rec
2901: );
2902: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2903: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2904: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2905: RAISE Okc_Api.G_EXCEPTION_ERROR;
2906: END IF;
2899: l_sao_rec,
2900: lx_sao_rec
2901: );
2902: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2903: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2904: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2905: RAISE Okc_Api.G_EXCEPTION_ERROR;
2906: END IF;
2907: migrate(lx_sao_rec, l_def_saov_rec);
2900: lx_sao_rec
2901: );
2902: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2903: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2904: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2905: RAISE Okc_Api.G_EXCEPTION_ERROR;
2906: END IF;
2907: migrate(lx_sao_rec, l_def_saov_rec);
2908: -- Set OUT values
2901: );
2902: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2903: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2904: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2905: RAISE Okc_Api.G_EXCEPTION_ERROR;
2906: END IF;
2907: migrate(lx_sao_rec, l_def_saov_rec);
2908: -- Set OUT values
2909: x_saov_rec := l_def_saov_rec;
2906: END IF;
2907: migrate(lx_sao_rec, l_def_saov_rec);
2908: -- Set OUT values
2909: x_saov_rec := l_def_saov_rec;
2910: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
2911: EXCEPTION
2912: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
2913: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2914: (
2908: -- Set OUT values
2909: x_saov_rec := l_def_saov_rec;
2910: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
2911: EXCEPTION
2912: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
2913: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2914: (
2915: l_api_name,
2916: G_PKG_NAME,
2909: x_saov_rec := l_def_saov_rec;
2910: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
2911: EXCEPTION
2912: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
2913: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2914: (
2915: l_api_name,
2916: G_PKG_NAME,
2917: 'OKC_API.G_RET_STS_ERROR',
2913: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2914: (
2915: l_api_name,
2916: G_PKG_NAME,
2917: 'OKC_API.G_RET_STS_ERROR',
2918: x_msg_count,
2919: x_msg_data,
2920: '_PVT'
2921: );
2918: x_msg_count,
2919: x_msg_data,
2920: '_PVT'
2921: );
2922: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
2923: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
2924: (
2925: l_api_name,
2926: G_PKG_NAME,
2919: x_msg_data,
2920: '_PVT'
2921: );
2922: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
2923: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
2924: (
2925: l_api_name,
2926: G_PKG_NAME,
2927: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2923: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
2924: (
2925: l_api_name,
2926: G_PKG_NAME,
2927: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2928: x_msg_count,
2929: x_msg_data,
2930: '_PVT'
2931: );
2929: x_msg_data,
2930: '_PVT'
2931: );
2932: WHEN OTHERS THEN
2933: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
2934: (
2935: l_api_name,
2936: G_PKG_NAME,
2937: 'OTHERS',
2944: -- PL/SQL TBL insert_row for:SAOV_TBL --
2945: ----------------------------------------
2946: PROCEDURE insert_row(
2947: p_api_version IN NUMBER,
2948: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
2949: x_return_status OUT NOCOPY VARCHAR2,
2950: x_msg_count OUT NOCOPY NUMBER,
2951: x_msg_data OUT NOCOPY VARCHAR2,
2952: p_saov_tbl IN saov_tbl_type,
2953: x_saov_tbl OUT NOCOPY saov_tbl_type) IS
2954:
2955: l_api_version CONSTANT NUMBER := 1;
2956: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
2957: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2958: i NUMBER := 0;
2959: -- START change : mvasudev, 05/15/2001
2960: -- Adding OverAll Status Flag
2961: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2957: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2958: i NUMBER := 0;
2959: -- START change : mvasudev, 05/15/2001
2960: -- Adding OverAll Status Flag
2961: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2962: -- END change : mvasudev
2963: BEGIN
2964: Okc_Api.init_msg_list(p_init_msg_list);
2965: -- Make sure PL/SQL table has records in it before passing
2960: -- Adding OverAll Status Flag
2961: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2962: -- END change : mvasudev
2963: BEGIN
2964: Okc_Api.init_msg_list(p_init_msg_list);
2965: -- Make sure PL/SQL table has records in it before passing
2966: IF (p_saov_tbl.COUNT > 0) THEN
2967: i := p_saov_tbl.FIRST;
2968: LOOP
2967: i := p_saov_tbl.FIRST;
2968: LOOP
2969: insert_row (
2970: p_api_version => p_api_version,
2971: p_init_msg_list => Okc_Api.G_FALSE,
2972: x_return_status => x_return_status,
2973: x_msg_count => x_msg_count,
2974: x_msg_data => x_msg_data,
2975: p_saov_rec => p_saov_tbl(i),
2975: p_saov_rec => p_saov_tbl(i),
2976: x_saov_rec => x_saov_tbl(i));
2977: -- START change : mvasudev, 05/15/2001
2978: -- store the highest degree of error
2979: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
2980: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
2981: l_overall_status := x_return_status;
2982: END IF;
2983: END IF;
2976: x_saov_rec => x_saov_tbl(i));
2977: -- START change : mvasudev, 05/15/2001
2978: -- store the highest degree of error
2979: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
2980: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
2981: l_overall_status := x_return_status;
2982: END IF;
2983: END IF;
2984: -- END change : mvasudev
2990: x_return_status := l_overall_status;
2991: -- END change : mvasudev
2992: END IF;
2993: EXCEPTION
2994: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
2995: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2996: (
2997: l_api_name,
2998: G_PKG_NAME,
2991: -- END change : mvasudev
2992: END IF;
2993: EXCEPTION
2994: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
2995: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2996: (
2997: l_api_name,
2998: G_PKG_NAME,
2999: 'OKC_API.G_RET_STS_ERROR',
2995: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2996: (
2997: l_api_name,
2998: G_PKG_NAME,
2999: 'OKC_API.G_RET_STS_ERROR',
3000: x_msg_count,
3001: x_msg_data,
3002: '_PVT'
3003: );
3000: x_msg_count,
3001: x_msg_data,
3002: '_PVT'
3003: );
3004: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
3005: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3006: (
3007: l_api_name,
3008: G_PKG_NAME,
3001: x_msg_data,
3002: '_PVT'
3003: );
3004: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
3005: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3006: (
3007: l_api_name,
3008: G_PKG_NAME,
3009: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3005: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3006: (
3007: l_api_name,
3008: G_PKG_NAME,
3009: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3010: x_msg_count,
3011: x_msg_data,
3012: '_PVT'
3013: );
3011: x_msg_data,
3012: '_PVT'
3013: );
3014: WHEN OTHERS THEN
3015: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3016: (
3017: l_api_name,
3018: G_PKG_NAME,
3019: 'OTHERS',
3029: ------------------------------------
3030: -- lock_row for:OKL_SYS_ACCT_OPTS --
3031: ------------------------------------
3032: PROCEDURE lock_row(
3033: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
3034: x_return_status OUT NOCOPY VARCHAR2,
3035: x_msg_count OUT NOCOPY NUMBER,
3036: x_msg_data OUT NOCOPY VARCHAR2,
3037: p_sao_rec IN sao_rec_type) IS
3050: FROM OKL_SYS_ACCT_OPTS
3051: WHERE ID = p_sao_rec.id;
3052: l_api_version CONSTANT NUMBER := 1;
3053: l_api_name CONSTANT VARCHAR2(30) := 'OPTS_lock_row';
3054: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3055: l_object_version_number OKL_SYS_ACCT_OPTS.OBJECT_VERSION_NUMBER%TYPE;
3056: lc_object_version_number OKL_SYS_ACCT_OPTS.OBJECT_VERSION_NUMBER%TYPE;
3057: l_row_notfound BOOLEAN := FALSE;
3058: lc_row_notfound BOOLEAN := FALSE;
3056: lc_object_version_number OKL_SYS_ACCT_OPTS.OBJECT_VERSION_NUMBER%TYPE;
3057: l_row_notfound BOOLEAN := FALSE;
3058: lc_row_notfound BOOLEAN := FALSE;
3059: BEGIN
3060: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
3061: p_init_msg_list,
3062: '_PVT',
3063: x_return_status);
3064: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3060: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
3061: p_init_msg_list,
3062: '_PVT',
3063: x_return_status);
3064: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3065: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3066: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3067: RAISE Okc_Api.G_EXCEPTION_ERROR;
3068: END IF;
3061: p_init_msg_list,
3062: '_PVT',
3063: x_return_status);
3064: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3065: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3066: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3067: RAISE Okc_Api.G_EXCEPTION_ERROR;
3068: END IF;
3069: BEGIN
3062: '_PVT',
3063: x_return_status);
3064: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3065: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3066: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3067: RAISE Okc_Api.G_EXCEPTION_ERROR;
3068: END IF;
3069: BEGIN
3070: OPEN lock_csr(p_sao_rec);
3063: x_return_status);
3064: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3065: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3066: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3067: RAISE Okc_Api.G_EXCEPTION_ERROR;
3068: END IF;
3069: BEGIN
3070: OPEN lock_csr(p_sao_rec);
3071: FETCH lock_csr INTO l_object_version_number;
3075: WHEN E_Resource_Busy THEN
3076: IF (lock_csr%ISOPEN) THEN
3077: CLOSE lock_csr;
3078: END IF;
3079: Okc_Api.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
3080: RAISE App_Exceptions.RECORD_LOCK_EXCEPTION;
3081: END;
3082:
3083: IF ( l_row_notfound ) THEN
3086: lc_row_notfound := lchk_csr%NOTFOUND;
3087: CLOSE lchk_csr;
3088: END IF;
3089: IF (lc_row_notfound) THEN
3090: Okc_Api.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
3091: RAISE Okc_Api.G_EXCEPTION_ERROR;
3092: ELSIF lc_object_version_number > p_sao_rec.object_version_number THEN
3093: Okc_Api.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3094: RAISE Okc_Api.G_EXCEPTION_ERROR;
3087: CLOSE lchk_csr;
3088: END IF;
3089: IF (lc_row_notfound) THEN
3090: Okc_Api.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
3091: RAISE Okc_Api.G_EXCEPTION_ERROR;
3092: ELSIF lc_object_version_number > p_sao_rec.object_version_number THEN
3093: Okc_Api.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3094: RAISE Okc_Api.G_EXCEPTION_ERROR;
3095: ELSIF lc_object_version_number <> p_sao_rec.object_version_number THEN
3089: IF (lc_row_notfound) THEN
3090: Okc_Api.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
3091: RAISE Okc_Api.G_EXCEPTION_ERROR;
3092: ELSIF lc_object_version_number > p_sao_rec.object_version_number THEN
3093: Okc_Api.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3094: RAISE Okc_Api.G_EXCEPTION_ERROR;
3095: ELSIF lc_object_version_number <> p_sao_rec.object_version_number THEN
3096: Okc_Api.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3097: RAISE Okc_Api.G_EXCEPTION_ERROR;
3090: Okc_Api.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
3091: RAISE Okc_Api.G_EXCEPTION_ERROR;
3092: ELSIF lc_object_version_number > p_sao_rec.object_version_number THEN
3093: Okc_Api.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3094: RAISE Okc_Api.G_EXCEPTION_ERROR;
3095: ELSIF lc_object_version_number <> p_sao_rec.object_version_number THEN
3096: Okc_Api.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3097: RAISE Okc_Api.G_EXCEPTION_ERROR;
3098: ELSIF lc_object_version_number = -1 THEN
3092: ELSIF lc_object_version_number > p_sao_rec.object_version_number THEN
3093: Okc_Api.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3094: RAISE Okc_Api.G_EXCEPTION_ERROR;
3095: ELSIF lc_object_version_number <> p_sao_rec.object_version_number THEN
3096: Okc_Api.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3097: RAISE Okc_Api.G_EXCEPTION_ERROR;
3098: ELSIF lc_object_version_number = -1 THEN
3099: Okc_Api.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
3100: RAISE Okc_Api.G_EXCEPTION_ERROR;
3093: Okc_Api.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3094: RAISE Okc_Api.G_EXCEPTION_ERROR;
3095: ELSIF lc_object_version_number <> p_sao_rec.object_version_number THEN
3096: Okc_Api.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3097: RAISE Okc_Api.G_EXCEPTION_ERROR;
3098: ELSIF lc_object_version_number = -1 THEN
3099: Okc_Api.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
3100: RAISE Okc_Api.G_EXCEPTION_ERROR;
3101: END IF;
3095: ELSIF lc_object_version_number <> p_sao_rec.object_version_number THEN
3096: Okc_Api.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3097: RAISE Okc_Api.G_EXCEPTION_ERROR;
3098: ELSIF lc_object_version_number = -1 THEN
3099: Okc_Api.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
3100: RAISE Okc_Api.G_EXCEPTION_ERROR;
3101: END IF;
3102: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3103: EXCEPTION
3096: Okc_Api.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3097: RAISE Okc_Api.G_EXCEPTION_ERROR;
3098: ELSIF lc_object_version_number = -1 THEN
3099: Okc_Api.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
3100: RAISE Okc_Api.G_EXCEPTION_ERROR;
3101: END IF;
3102: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3103: EXCEPTION
3104: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
3098: ELSIF lc_object_version_number = -1 THEN
3099: Okc_Api.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
3100: RAISE Okc_Api.G_EXCEPTION_ERROR;
3101: END IF;
3102: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3103: EXCEPTION
3104: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
3105: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
3106: (
3100: RAISE Okc_Api.G_EXCEPTION_ERROR;
3101: END IF;
3102: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3103: EXCEPTION
3104: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
3105: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
3106: (
3107: l_api_name,
3108: G_PKG_NAME,
3101: END IF;
3102: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3103: EXCEPTION
3104: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
3105: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
3106: (
3107: l_api_name,
3108: G_PKG_NAME,
3109: 'OKC_API.G_RET_STS_ERROR',
3105: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
3106: (
3107: l_api_name,
3108: G_PKG_NAME,
3109: 'OKC_API.G_RET_STS_ERROR',
3110: x_msg_count,
3111: x_msg_data,
3112: '_PVT'
3113: );
3110: x_msg_count,
3111: x_msg_data,
3112: '_PVT'
3113: );
3114: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
3115: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3116: (
3117: l_api_name,
3118: G_PKG_NAME,
3111: x_msg_data,
3112: '_PVT'
3113: );
3114: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
3115: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3116: (
3117: l_api_name,
3118: G_PKG_NAME,
3119: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3115: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3116: (
3117: l_api_name,
3118: G_PKG_NAME,
3119: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3120: x_msg_count,
3121: x_msg_data,
3122: '_PVT'
3123: );
3121: x_msg_data,
3122: '_PVT'
3123: );
3124: WHEN OTHERS THEN
3125: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3126: (
3127: l_api_name,
3128: G_PKG_NAME,
3129: 'OTHERS',
3136: -- lock_row for:OKL_SYS_ACCT_OPTS_V --
3137: --------------------------------------
3138: PROCEDURE lock_row(
3139: p_api_version IN NUMBER,
3140: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
3141: x_return_status OUT NOCOPY VARCHAR2,
3142: x_msg_count OUT NOCOPY NUMBER,
3143: x_msg_data OUT NOCOPY VARCHAR2,
3144: p_saov_rec IN saov_rec_type) IS
3144: p_saov_rec IN saov_rec_type) IS
3145:
3146: l_api_version CONSTANT NUMBER := 1;
3147: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
3148: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3149: l_sao_rec sao_rec_type;
3150: BEGIN
3151: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
3152: G_PKG_NAME,
3147: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
3148: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3149: l_sao_rec sao_rec_type;
3150: BEGIN
3151: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
3152: G_PKG_NAME,
3153: p_init_msg_list,
3154: l_api_version,
3155: p_api_version,
3154: l_api_version,
3155: p_api_version,
3156: '_PVT',
3157: x_return_status);
3158: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3159: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3160: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3161: RAISE Okc_Api.G_EXCEPTION_ERROR;
3162: END IF;
3155: p_api_version,
3156: '_PVT',
3157: x_return_status);
3158: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3159: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3160: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3161: RAISE Okc_Api.G_EXCEPTION_ERROR;
3162: END IF;
3163: --------------------------------------
3156: '_PVT',
3157: x_return_status);
3158: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3159: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3160: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3161: RAISE Okc_Api.G_EXCEPTION_ERROR;
3162: END IF;
3163: --------------------------------------
3164: -- Move VIEW record to "Child" records
3157: x_return_status);
3158: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3159: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3160: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3161: RAISE Okc_Api.G_EXCEPTION_ERROR;
3162: END IF;
3163: --------------------------------------
3164: -- Move VIEW record to "Child" records
3165: --------------------------------------
3173: x_msg_count,
3174: x_msg_data,
3175: l_sao_rec
3176: );
3177: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3178: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3179: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3180: RAISE Okc_Api.G_EXCEPTION_ERROR;
3181: END IF;
3174: x_msg_data,
3175: l_sao_rec
3176: );
3177: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3178: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3179: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3180: RAISE Okc_Api.G_EXCEPTION_ERROR;
3181: END IF;
3182: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3175: l_sao_rec
3176: );
3177: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3178: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3179: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3180: RAISE Okc_Api.G_EXCEPTION_ERROR;
3181: END IF;
3182: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3183: EXCEPTION
3176: );
3177: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3178: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3179: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3180: RAISE Okc_Api.G_EXCEPTION_ERROR;
3181: END IF;
3182: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3183: EXCEPTION
3184: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
3178: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3179: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3180: RAISE Okc_Api.G_EXCEPTION_ERROR;
3181: END IF;
3182: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3183: EXCEPTION
3184: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
3185: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
3186: (
3180: RAISE Okc_Api.G_EXCEPTION_ERROR;
3181: END IF;
3182: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3183: EXCEPTION
3184: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
3185: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
3186: (
3187: l_api_name,
3188: G_PKG_NAME,
3181: END IF;
3182: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3183: EXCEPTION
3184: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
3185: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
3186: (
3187: l_api_name,
3188: G_PKG_NAME,
3189: 'OKC_API.G_RET_STS_ERROR',
3185: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
3186: (
3187: l_api_name,
3188: G_PKG_NAME,
3189: 'OKC_API.G_RET_STS_ERROR',
3190: x_msg_count,
3191: x_msg_data,
3192: '_PVT'
3193: );
3190: x_msg_count,
3191: x_msg_data,
3192: '_PVT'
3193: );
3194: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
3195: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3196: (
3197: l_api_name,
3198: G_PKG_NAME,
3191: x_msg_data,
3192: '_PVT'
3193: );
3194: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
3195: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3196: (
3197: l_api_name,
3198: G_PKG_NAME,
3199: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3195: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3196: (
3197: l_api_name,
3198: G_PKG_NAME,
3199: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3200: x_msg_count,
3201: x_msg_data,
3202: '_PVT'
3203: );
3201: x_msg_data,
3202: '_PVT'
3203: );
3204: WHEN OTHERS THEN
3205: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3206: (
3207: l_api_name,
3208: G_PKG_NAME,
3209: 'OTHERS',
3216: -- PL/SQL TBL lock_row for:SAOV_TBL --
3217: --------------------------------------
3218: PROCEDURE lock_row(
3219: p_api_version IN NUMBER,
3220: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
3221: x_return_status OUT NOCOPY VARCHAR2,
3222: x_msg_count OUT NOCOPY NUMBER,
3223: x_msg_data OUT NOCOPY VARCHAR2,
3224: p_saov_tbl IN saov_tbl_type) IS
3224: p_saov_tbl IN saov_tbl_type) IS
3225:
3226: l_api_version CONSTANT NUMBER := 1;
3227: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
3228: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3229: i NUMBER := 0;
3230: -- START change : mvasudev, 05/15/2001
3231: -- Adding OverAll Status Flag
3232: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3228: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3229: i NUMBER := 0;
3230: -- START change : mvasudev, 05/15/2001
3231: -- Adding OverAll Status Flag
3232: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3233: -- END change : mvasudev
3234: BEGIN
3235: Okc_Api.init_msg_list(p_init_msg_list);
3236: -- Make sure PL/SQL table has records in it before passing
3231: -- Adding OverAll Status Flag
3232: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3233: -- END change : mvasudev
3234: BEGIN
3235: Okc_Api.init_msg_list(p_init_msg_list);
3236: -- Make sure PL/SQL table has records in it before passing
3237: IF (p_saov_tbl.COUNT > 0) THEN
3238: i := p_saov_tbl.FIRST;
3239: LOOP
3238: i := p_saov_tbl.FIRST;
3239: LOOP
3240: lock_row (
3241: p_api_version => p_api_version,
3242: p_init_msg_list => Okc_Api.G_FALSE,
3243: x_return_status => x_return_status,
3244: x_msg_count => x_msg_count,
3245: x_msg_data => x_msg_data,
3246: p_saov_rec => p_saov_tbl(i));
3245: x_msg_data => x_msg_data,
3246: p_saov_rec => p_saov_tbl(i));
3247: -- START change : mvasudev, 05/15/2001
3248: -- store the highest degree of error
3249: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
3250: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
3251: l_overall_status := x_return_status;
3252: END IF;
3253: END IF;
3246: p_saov_rec => p_saov_tbl(i));
3247: -- START change : mvasudev, 05/15/2001
3248: -- store the highest degree of error
3249: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
3250: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
3251: l_overall_status := x_return_status;
3252: END IF;
3253: END IF;
3254: -- END change : mvasudev
3260: x_return_status := l_overall_status;
3261: -- END change : mvasudev
3262: END IF;
3263: EXCEPTION
3264: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
3265: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
3266: (
3267: l_api_name,
3268: G_PKG_NAME,
3261: -- END change : mvasudev
3262: END IF;
3263: EXCEPTION
3264: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
3265: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
3266: (
3267: l_api_name,
3268: G_PKG_NAME,
3269: 'OKC_API.G_RET_STS_ERROR',
3265: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
3266: (
3267: l_api_name,
3268: G_PKG_NAME,
3269: 'OKC_API.G_RET_STS_ERROR',
3270: x_msg_count,
3271: x_msg_data,
3272: '_PVT'
3273: );
3270: x_msg_count,
3271: x_msg_data,
3272: '_PVT'
3273: );
3274: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
3275: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3276: (
3277: l_api_name,
3278: G_PKG_NAME,
3271: x_msg_data,
3272: '_PVT'
3273: );
3274: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
3275: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3276: (
3277: l_api_name,
3278: G_PKG_NAME,
3279: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3275: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3276: (
3277: l_api_name,
3278: G_PKG_NAME,
3279: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3280: x_msg_count,
3281: x_msg_data,
3282: '_PVT'
3283: );
3281: x_msg_data,
3282: '_PVT'
3283: );
3284: WHEN OTHERS THEN
3285: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3286: (
3287: l_api_name,
3288: G_PKG_NAME,
3289: 'OTHERS',
3299: --------------------------------------
3300: -- update_row for:OKL_SYS_ACCT_OPTS --
3301: --------------------------------------
3302: PROCEDURE update_row(
3303: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
3304: x_return_status OUT NOCOPY VARCHAR2,
3305: x_msg_count OUT NOCOPY NUMBER,
3306: x_msg_data OUT NOCOPY VARCHAR2,
3307: p_sao_rec IN sao_rec_type,
3308: x_sao_rec OUT NOCOPY sao_rec_type) IS
3309:
3310: l_api_version CONSTANT NUMBER := 1;
3311: l_api_name CONSTANT VARCHAR2(30) := 'OPTS_update_row';
3312: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3313: l_sao_rec sao_rec_type := p_sao_rec;
3314: l_def_sao_rec sao_rec_type;
3315: l_row_notfound BOOLEAN := TRUE;
3316: ----------------------------------
3321: x_sao_rec OUT NOCOPY sao_rec_type
3322: ) RETURN VARCHAR2 IS
3323: l_sao_rec sao_rec_type;
3324: l_row_notfound BOOLEAN := TRUE;
3325: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3326: BEGIN
3327: x_sao_rec := p_sao_rec;
3328: -- Get current database values
3329: l_sao_rec := get_rec(p_sao_rec, l_row_notfound);
3327: x_sao_rec := p_sao_rec;
3328: -- Get current database values
3329: l_sao_rec := get_rec(p_sao_rec, l_row_notfound);
3330: IF (l_row_notfound) THEN
3331: l_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
3332: END IF;
3333: IF (x_sao_rec.id = Okc_Api.G_MISS_NUM)
3334: THEN
3335: x_sao_rec.id := l_sao_rec.id;
3329: l_sao_rec := get_rec(p_sao_rec, l_row_notfound);
3330: IF (l_row_notfound) THEN
3331: l_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
3332: END IF;
3333: IF (x_sao_rec.id = Okc_Api.G_MISS_NUM)
3334: THEN
3335: x_sao_rec.id := l_sao_rec.id;
3336: END IF;
3337: IF (x_sao_rec.cc_rep_currency_code = Okc_Api.G_MISS_CHAR)
3333: IF (x_sao_rec.id = Okc_Api.G_MISS_NUM)
3334: THEN
3335: x_sao_rec.id := l_sao_rec.id;
3336: END IF;
3337: IF (x_sao_rec.cc_rep_currency_code = Okc_Api.G_MISS_CHAR)
3338: THEN
3339: x_sao_rec.cc_rep_currency_code := l_sao_rec.cc_rep_currency_code;
3340: END IF;
3341: IF (x_sao_rec.code_combination_id = Okc_Api.G_MISS_NUM)
3337: IF (x_sao_rec.cc_rep_currency_code = Okc_Api.G_MISS_CHAR)
3338: THEN
3339: x_sao_rec.cc_rep_currency_code := l_sao_rec.cc_rep_currency_code;
3340: END IF;
3341: IF (x_sao_rec.code_combination_id = Okc_Api.G_MISS_NUM)
3342: THEN
3343: x_sao_rec.code_combination_id := l_sao_rec.code_combination_id;
3344: END IF;
3345: IF (x_sao_rec.ael_rep_currency_code = Okc_Api.G_MISS_CHAR)
3341: IF (x_sao_rec.code_combination_id = Okc_Api.G_MISS_NUM)
3342: THEN
3343: x_sao_rec.code_combination_id := l_sao_rec.code_combination_id;
3344: END IF;
3345: IF (x_sao_rec.ael_rep_currency_code = Okc_Api.G_MISS_CHAR)
3346: THEN
3347: x_sao_rec.ael_rep_currency_code := l_sao_rec.ael_rep_currency_code;
3348: END IF;
3349: IF (x_sao_rec.set_of_books_id = Okc_Api.G_MISS_NUM)
3345: IF (x_sao_rec.ael_rep_currency_code = Okc_Api.G_MISS_CHAR)
3346: THEN
3347: x_sao_rec.ael_rep_currency_code := l_sao_rec.ael_rep_currency_code;
3348: END IF;
3349: IF (x_sao_rec.set_of_books_id = Okc_Api.G_MISS_NUM)
3350: THEN
3351: x_sao_rec.set_of_books_id := l_sao_rec.set_of_books_id;
3352: END IF;
3353: IF (x_sao_rec.SECONDARY_REP_METHOD = Okc_Api.G_MISS_CHAR)
3349: IF (x_sao_rec.set_of_books_id = Okc_Api.G_MISS_NUM)
3350: THEN
3351: x_sao_rec.set_of_books_id := l_sao_rec.set_of_books_id;
3352: END IF;
3353: IF (x_sao_rec.SECONDARY_REP_METHOD = Okc_Api.G_MISS_CHAR)
3354: THEN
3355: x_sao_rec.SECONDARY_REP_METHOD := l_sao_rec.SECONDARY_REP_METHOD;
3356: END IF;
3357: IF (x_sao_rec.object_version_number = Okc_Api.G_MISS_NUM)
3353: IF (x_sao_rec.SECONDARY_REP_METHOD = Okc_Api.G_MISS_CHAR)
3354: THEN
3355: x_sao_rec.SECONDARY_REP_METHOD := l_sao_rec.SECONDARY_REP_METHOD;
3356: END IF;
3357: IF (x_sao_rec.object_version_number = Okc_Api.G_MISS_NUM)
3358: THEN
3359: x_sao_rec.object_version_number := l_sao_rec.object_version_number;
3360: END IF;
3361: IF (x_sao_rec.rec_ccid = Okc_Api.G_MISS_NUM)
3357: IF (x_sao_rec.object_version_number = Okc_Api.G_MISS_NUM)
3358: THEN
3359: x_sao_rec.object_version_number := l_sao_rec.object_version_number;
3360: END IF;
3361: IF (x_sao_rec.rec_ccid = Okc_Api.G_MISS_NUM)
3362: THEN
3363: x_sao_rec.rec_ccid := l_sao_rec.rec_ccid;
3364: END IF;
3365: IF (x_sao_rec.realized_gain_ccid = Okc_Api.G_MISS_NUM)
3361: IF (x_sao_rec.rec_ccid = Okc_Api.G_MISS_NUM)
3362: THEN
3363: x_sao_rec.rec_ccid := l_sao_rec.rec_ccid;
3364: END IF;
3365: IF (x_sao_rec.realized_gain_ccid = Okc_Api.G_MISS_NUM)
3366: THEN
3367: x_sao_rec.realized_gain_ccid := l_sao_rec.realized_gain_ccid;
3368: END IF;
3369: IF (x_sao_rec.realized_loss_ccid = Okc_Api.G_MISS_NUM)
3365: IF (x_sao_rec.realized_gain_ccid = Okc_Api.G_MISS_NUM)
3366: THEN
3367: x_sao_rec.realized_gain_ccid := l_sao_rec.realized_gain_ccid;
3368: END IF;
3369: IF (x_sao_rec.realized_loss_ccid = Okc_Api.G_MISS_NUM)
3370: THEN
3371: x_sao_rec.realized_loss_ccid := l_sao_rec.realized_loss_ccid;
3372: END IF;
3373: IF (x_sao_rec.tax_ccid = Okc_Api.G_MISS_NUM)
3369: IF (x_sao_rec.realized_loss_ccid = Okc_Api.G_MISS_NUM)
3370: THEN
3371: x_sao_rec.realized_loss_ccid := l_sao_rec.realized_loss_ccid;
3372: END IF;
3373: IF (x_sao_rec.tax_ccid = Okc_Api.G_MISS_NUM)
3374: THEN
3375: x_sao_rec.tax_ccid := l_sao_rec.tax_ccid;
3376: END IF;
3377: IF (x_sao_rec.cross_currency_ccid = Okc_Api.G_MISS_NUM)
3373: IF (x_sao_rec.tax_ccid = Okc_Api.G_MISS_NUM)
3374: THEN
3375: x_sao_rec.tax_ccid := l_sao_rec.tax_ccid;
3376: END IF;
3377: IF (x_sao_rec.cross_currency_ccid = Okc_Api.G_MISS_NUM)
3378: THEN
3379: x_sao_rec.cross_currency_ccid := l_sao_rec.cross_currency_ccid;
3380: END IF;
3381: IF (x_sao_rec.rounding_ccid = Okc_Api.G_MISS_NUM)
3377: IF (x_sao_rec.cross_currency_ccid = Okc_Api.G_MISS_NUM)
3378: THEN
3379: x_sao_rec.cross_currency_ccid := l_sao_rec.cross_currency_ccid;
3380: END IF;
3381: IF (x_sao_rec.rounding_ccid = Okc_Api.G_MISS_NUM)
3382: THEN
3383: x_sao_rec.rounding_ccid := l_sao_rec.rounding_ccid;
3384: END IF;
3385: IF (x_sao_rec.ar_clearing_ccid = Okc_Api.G_MISS_NUM)
3381: IF (x_sao_rec.rounding_ccid = Okc_Api.G_MISS_NUM)
3382: THEN
3383: x_sao_rec.rounding_ccid := l_sao_rec.rounding_ccid;
3384: END IF;
3385: IF (x_sao_rec.ar_clearing_ccid = Okc_Api.G_MISS_NUM)
3386: THEN
3387: x_sao_rec.ar_clearing_ccid := l_sao_rec.ar_clearing_ccid;
3388: END IF;
3389: IF (x_sao_rec.payables_ccid = Okc_Api.G_MISS_NUM)
3385: IF (x_sao_rec.ar_clearing_ccid = Okc_Api.G_MISS_NUM)
3386: THEN
3387: x_sao_rec.ar_clearing_ccid := l_sao_rec.ar_clearing_ccid;
3388: END IF;
3389: IF (x_sao_rec.payables_ccid = Okc_Api.G_MISS_NUM)
3390: THEN
3391: x_sao_rec.payables_ccid := l_sao_rec.payables_ccid;
3392: END IF;
3393: IF (x_sao_rec.liablity_ccid = Okc_Api.G_MISS_NUM)
3389: IF (x_sao_rec.payables_ccid = Okc_Api.G_MISS_NUM)
3390: THEN
3391: x_sao_rec.payables_ccid := l_sao_rec.payables_ccid;
3392: END IF;
3393: IF (x_sao_rec.liablity_ccid = Okc_Api.G_MISS_NUM)
3394: THEN
3395: x_sao_rec.liablity_ccid := l_sao_rec.liablity_ccid;
3396: END IF;
3397: IF (x_sao_rec.pre_payment_ccid = Okc_Api.G_MISS_NUM)
3393: IF (x_sao_rec.liablity_ccid = Okc_Api.G_MISS_NUM)
3394: THEN
3395: x_sao_rec.liablity_ccid := l_sao_rec.liablity_ccid;
3396: END IF;
3397: IF (x_sao_rec.pre_payment_ccid = Okc_Api.G_MISS_NUM)
3398: THEN
3399: x_sao_rec.pre_payment_ccid := l_sao_rec.pre_payment_ccid;
3400: END IF;
3401: IF (x_sao_rec.fut_date_pay_ccid = Okc_Api.G_MISS_NUM)
3397: IF (x_sao_rec.pre_payment_ccid = Okc_Api.G_MISS_NUM)
3398: THEN
3399: x_sao_rec.pre_payment_ccid := l_sao_rec.pre_payment_ccid;
3400: END IF;
3401: IF (x_sao_rec.fut_date_pay_ccid = Okc_Api.G_MISS_NUM)
3402: THEN
3403: x_sao_rec.fut_date_pay_ccid := l_sao_rec.fut_date_pay_ccid;
3404: END IF;
3405: IF (x_sao_rec.cc_rounding_rule = Okc_Api.G_MISS_CHAR)
3401: IF (x_sao_rec.fut_date_pay_ccid = Okc_Api.G_MISS_NUM)
3402: THEN
3403: x_sao_rec.fut_date_pay_ccid := l_sao_rec.fut_date_pay_ccid;
3404: END IF;
3405: IF (x_sao_rec.cc_rounding_rule = Okc_Api.G_MISS_CHAR)
3406: THEN
3407: x_sao_rec.cc_rounding_rule := l_sao_rec.cc_rounding_rule;
3408: END IF;
3409: IF (x_sao_rec.cc_precision = Okc_Api.G_MISS_NUM)
3405: IF (x_sao_rec.cc_rounding_rule = Okc_Api.G_MISS_CHAR)
3406: THEN
3407: x_sao_rec.cc_rounding_rule := l_sao_rec.cc_rounding_rule;
3408: END IF;
3409: IF (x_sao_rec.cc_precision = Okc_Api.G_MISS_NUM)
3410: THEN
3411: x_sao_rec.cc_precision := l_sao_rec.cc_precision;
3412: END IF;
3413: IF (x_sao_rec.cc_min_acct_unit = Okc_Api.G_MISS_NUM)
3409: IF (x_sao_rec.cc_precision = Okc_Api.G_MISS_NUM)
3410: THEN
3411: x_sao_rec.cc_precision := l_sao_rec.cc_precision;
3412: END IF;
3413: IF (x_sao_rec.cc_min_acct_unit = Okc_Api.G_MISS_NUM)
3414: THEN
3415: x_sao_rec.cc_min_acct_unit := l_sao_rec.cc_min_acct_unit;
3416: END IF;
3417: IF (x_sao_rec.dis_taken_ccid = Okc_Api.G_MISS_NUM)
3413: IF (x_sao_rec.cc_min_acct_unit = Okc_Api.G_MISS_NUM)
3414: THEN
3415: x_sao_rec.cc_min_acct_unit := l_sao_rec.cc_min_acct_unit;
3416: END IF;
3417: IF (x_sao_rec.dis_taken_ccid = Okc_Api.G_MISS_NUM)
3418: THEN
3419: x_sao_rec.dis_taken_ccid := l_sao_rec.dis_taken_ccid;
3420: END IF;
3421: IF (x_sao_rec.ap_clearing_ccid = Okc_Api.G_MISS_NUM)
3417: IF (x_sao_rec.dis_taken_ccid = Okc_Api.G_MISS_NUM)
3418: THEN
3419: x_sao_rec.dis_taken_ccid := l_sao_rec.dis_taken_ccid;
3420: END IF;
3421: IF (x_sao_rec.ap_clearing_ccid = Okc_Api.G_MISS_NUM)
3422: THEN
3423: x_sao_rec.ap_clearing_ccid := l_sao_rec.ap_clearing_ccid;
3424: END IF;
3425: IF (x_sao_rec.ael_rounding_rule = Okc_Api.G_MISS_CHAR)
3421: IF (x_sao_rec.ap_clearing_ccid = Okc_Api.G_MISS_NUM)
3422: THEN
3423: x_sao_rec.ap_clearing_ccid := l_sao_rec.ap_clearing_ccid;
3424: END IF;
3425: IF (x_sao_rec.ael_rounding_rule = Okc_Api.G_MISS_CHAR)
3426: THEN
3427: x_sao_rec.ael_rounding_rule := l_sao_rec.ael_rounding_rule;
3428: END IF;
3429: IF (x_sao_rec.ael_precision = Okc_Api.G_MISS_NUM)
3425: IF (x_sao_rec.ael_rounding_rule = Okc_Api.G_MISS_CHAR)
3426: THEN
3427: x_sao_rec.ael_rounding_rule := l_sao_rec.ael_rounding_rule;
3428: END IF;
3429: IF (x_sao_rec.ael_precision = Okc_Api.G_MISS_NUM)
3430: THEN
3431: x_sao_rec.ael_precision := l_sao_rec.ael_precision;
3432: END IF;
3433: IF (x_sao_rec.ael_min_acct_unit = Okc_Api.G_MISS_NUM)
3429: IF (x_sao_rec.ael_precision = Okc_Api.G_MISS_NUM)
3430: THEN
3431: x_sao_rec.ael_precision := l_sao_rec.ael_precision;
3432: END IF;
3433: IF (x_sao_rec.ael_min_acct_unit = Okc_Api.G_MISS_NUM)
3434: THEN
3435: x_sao_rec.ael_min_acct_unit := l_sao_rec.ael_min_acct_unit;
3436: END IF;
3437: IF (x_sao_rec.org_id = Okc_Api.G_MISS_NUM)
3433: IF (x_sao_rec.ael_min_acct_unit = Okc_Api.G_MISS_NUM)
3434: THEN
3435: x_sao_rec.ael_min_acct_unit := l_sao_rec.ael_min_acct_unit;
3436: END IF;
3437: IF (x_sao_rec.org_id = Okc_Api.G_MISS_NUM)
3438: THEN
3439: x_sao_rec.org_id := l_sao_rec.org_id;
3440: END IF;
3441: IF (x_sao_rec.attribute_category = Okc_Api.G_MISS_CHAR)
3437: IF (x_sao_rec.org_id = Okc_Api.G_MISS_NUM)
3438: THEN
3439: x_sao_rec.org_id := l_sao_rec.org_id;
3440: END IF;
3441: IF (x_sao_rec.attribute_category = Okc_Api.G_MISS_CHAR)
3442: THEN
3443: x_sao_rec.attribute_category := l_sao_rec.attribute_category;
3444: END IF;
3445: IF (x_sao_rec.attribute1 = Okc_Api.G_MISS_CHAR)
3441: IF (x_sao_rec.attribute_category = Okc_Api.G_MISS_CHAR)
3442: THEN
3443: x_sao_rec.attribute_category := l_sao_rec.attribute_category;
3444: END IF;
3445: IF (x_sao_rec.attribute1 = Okc_Api.G_MISS_CHAR)
3446: THEN
3447: x_sao_rec.attribute1 := l_sao_rec.attribute1;
3448: END IF;
3449: IF (x_sao_rec.attribute2 = Okc_Api.G_MISS_CHAR)
3445: IF (x_sao_rec.attribute1 = Okc_Api.G_MISS_CHAR)
3446: THEN
3447: x_sao_rec.attribute1 := l_sao_rec.attribute1;
3448: END IF;
3449: IF (x_sao_rec.attribute2 = Okc_Api.G_MISS_CHAR)
3450: THEN
3451: x_sao_rec.attribute2 := l_sao_rec.attribute2;
3452: END IF;
3453: IF (x_sao_rec.attribute3 = Okc_Api.G_MISS_CHAR)
3449: IF (x_sao_rec.attribute2 = Okc_Api.G_MISS_CHAR)
3450: THEN
3451: x_sao_rec.attribute2 := l_sao_rec.attribute2;
3452: END IF;
3453: IF (x_sao_rec.attribute3 = Okc_Api.G_MISS_CHAR)
3454: THEN
3455: x_sao_rec.attribute3 := l_sao_rec.attribute3;
3456: END IF;
3457: IF (x_sao_rec.attribute4 = Okc_Api.G_MISS_CHAR)
3453: IF (x_sao_rec.attribute3 = Okc_Api.G_MISS_CHAR)
3454: THEN
3455: x_sao_rec.attribute3 := l_sao_rec.attribute3;
3456: END IF;
3457: IF (x_sao_rec.attribute4 = Okc_Api.G_MISS_CHAR)
3458: THEN
3459: x_sao_rec.attribute4 := l_sao_rec.attribute4;
3460: END IF;
3461: IF (x_sao_rec.attribute5 = Okc_Api.G_MISS_CHAR)
3457: IF (x_sao_rec.attribute4 = Okc_Api.G_MISS_CHAR)
3458: THEN
3459: x_sao_rec.attribute4 := l_sao_rec.attribute4;
3460: END IF;
3461: IF (x_sao_rec.attribute5 = Okc_Api.G_MISS_CHAR)
3462: THEN
3463: x_sao_rec.attribute5 := l_sao_rec.attribute5;
3464: END IF;
3465: IF (x_sao_rec.attribute6 = Okc_Api.G_MISS_CHAR)
3461: IF (x_sao_rec.attribute5 = Okc_Api.G_MISS_CHAR)
3462: THEN
3463: x_sao_rec.attribute5 := l_sao_rec.attribute5;
3464: END IF;
3465: IF (x_sao_rec.attribute6 = Okc_Api.G_MISS_CHAR)
3466: THEN
3467: x_sao_rec.attribute6 := l_sao_rec.attribute6;
3468: END IF;
3469: IF (x_sao_rec.attribute7 = Okc_Api.G_MISS_CHAR)
3465: IF (x_sao_rec.attribute6 = Okc_Api.G_MISS_CHAR)
3466: THEN
3467: x_sao_rec.attribute6 := l_sao_rec.attribute6;
3468: END IF;
3469: IF (x_sao_rec.attribute7 = Okc_Api.G_MISS_CHAR)
3470: THEN
3471: x_sao_rec.attribute7 := l_sao_rec.attribute7;
3472: END IF;
3473: IF (x_sao_rec.attribute8 = Okc_Api.G_MISS_CHAR)
3469: IF (x_sao_rec.attribute7 = Okc_Api.G_MISS_CHAR)
3470: THEN
3471: x_sao_rec.attribute7 := l_sao_rec.attribute7;
3472: END IF;
3473: IF (x_sao_rec.attribute8 = Okc_Api.G_MISS_CHAR)
3474: THEN
3475: x_sao_rec.attribute8 := l_sao_rec.attribute8;
3476: END IF;
3477: IF (x_sao_rec.attribute9 = Okc_Api.G_MISS_CHAR)
3473: IF (x_sao_rec.attribute8 = Okc_Api.G_MISS_CHAR)
3474: THEN
3475: x_sao_rec.attribute8 := l_sao_rec.attribute8;
3476: END IF;
3477: IF (x_sao_rec.attribute9 = Okc_Api.G_MISS_CHAR)
3478: THEN
3479: x_sao_rec.attribute9 := l_sao_rec.attribute9;
3480: END IF;
3481: IF (x_sao_rec.attribute10 = Okc_Api.G_MISS_CHAR)
3477: IF (x_sao_rec.attribute9 = Okc_Api.G_MISS_CHAR)
3478: THEN
3479: x_sao_rec.attribute9 := l_sao_rec.attribute9;
3480: END IF;
3481: IF (x_sao_rec.attribute10 = Okc_Api.G_MISS_CHAR)
3482: THEN
3483: x_sao_rec.attribute10 := l_sao_rec.attribute10;
3484: END IF;
3485: IF (x_sao_rec.attribute11 = Okc_Api.G_MISS_CHAR)
3481: IF (x_sao_rec.attribute10 = Okc_Api.G_MISS_CHAR)
3482: THEN
3483: x_sao_rec.attribute10 := l_sao_rec.attribute10;
3484: END IF;
3485: IF (x_sao_rec.attribute11 = Okc_Api.G_MISS_CHAR)
3486: THEN
3487: x_sao_rec.attribute11 := l_sao_rec.attribute11;
3488: END IF;
3489: IF (x_sao_rec.attribute12 = Okc_Api.G_MISS_CHAR)
3485: IF (x_sao_rec.attribute11 = Okc_Api.G_MISS_CHAR)
3486: THEN
3487: x_sao_rec.attribute11 := l_sao_rec.attribute11;
3488: END IF;
3489: IF (x_sao_rec.attribute12 = Okc_Api.G_MISS_CHAR)
3490: THEN
3491: x_sao_rec.attribute12 := l_sao_rec.attribute12;
3492: END IF;
3493: IF (x_sao_rec.attribute13 = Okc_Api.G_MISS_CHAR)
3489: IF (x_sao_rec.attribute12 = Okc_Api.G_MISS_CHAR)
3490: THEN
3491: x_sao_rec.attribute12 := l_sao_rec.attribute12;
3492: END IF;
3493: IF (x_sao_rec.attribute13 = Okc_Api.G_MISS_CHAR)
3494: THEN
3495: x_sao_rec.attribute13 := l_sao_rec.attribute13;
3496: END IF;
3497: IF (x_sao_rec.attribute14 = Okc_Api.G_MISS_CHAR)
3493: IF (x_sao_rec.attribute13 = Okc_Api.G_MISS_CHAR)
3494: THEN
3495: x_sao_rec.attribute13 := l_sao_rec.attribute13;
3496: END IF;
3497: IF (x_sao_rec.attribute14 = Okc_Api.G_MISS_CHAR)
3498: THEN
3499: x_sao_rec.attribute14 := l_sao_rec.attribute14;
3500: END IF;
3501: IF (x_sao_rec.attribute15 = Okc_Api.G_MISS_CHAR)
3497: IF (x_sao_rec.attribute14 = Okc_Api.G_MISS_CHAR)
3498: THEN
3499: x_sao_rec.attribute14 := l_sao_rec.attribute14;
3500: END IF;
3501: IF (x_sao_rec.attribute15 = Okc_Api.G_MISS_CHAR)
3502: THEN
3503: x_sao_rec.attribute15 := l_sao_rec.attribute15;
3504: END IF;
3505: IF (x_sao_rec.created_by = Okc_Api.G_MISS_NUM)
3501: IF (x_sao_rec.attribute15 = Okc_Api.G_MISS_CHAR)
3502: THEN
3503: x_sao_rec.attribute15 := l_sao_rec.attribute15;
3504: END IF;
3505: IF (x_sao_rec.created_by = Okc_Api.G_MISS_NUM)
3506: THEN
3507: x_sao_rec.created_by := l_sao_rec.created_by;
3508: END IF;
3509: IF (x_sao_rec.creation_date = Okc_Api.G_MISS_DATE)
3505: IF (x_sao_rec.created_by = Okc_Api.G_MISS_NUM)
3506: THEN
3507: x_sao_rec.created_by := l_sao_rec.created_by;
3508: END IF;
3509: IF (x_sao_rec.creation_date = Okc_Api.G_MISS_DATE)
3510: THEN
3511: x_sao_rec.creation_date := l_sao_rec.creation_date;
3512: END IF;
3513: IF (x_sao_rec.last_updated_by = Okc_Api.G_MISS_NUM)
3509: IF (x_sao_rec.creation_date = Okc_Api.G_MISS_DATE)
3510: THEN
3511: x_sao_rec.creation_date := l_sao_rec.creation_date;
3512: END IF;
3513: IF (x_sao_rec.last_updated_by = Okc_Api.G_MISS_NUM)
3514: THEN
3515: x_sao_rec.last_updated_by := l_sao_rec.last_updated_by;
3516: END IF;
3517: IF (x_sao_rec.last_update_date = Okc_Api.G_MISS_DATE)
3513: IF (x_sao_rec.last_updated_by = Okc_Api.G_MISS_NUM)
3514: THEN
3515: x_sao_rec.last_updated_by := l_sao_rec.last_updated_by;
3516: END IF;
3517: IF (x_sao_rec.last_update_date = Okc_Api.G_MISS_DATE)
3518: THEN
3519: x_sao_rec.last_update_date := l_sao_rec.last_update_date;
3520: END IF;
3521: IF (x_sao_rec.last_update_login = Okc_Api.G_MISS_NUM)
3517: IF (x_sao_rec.last_update_date = Okc_Api.G_MISS_DATE)
3518: THEN
3519: x_sao_rec.last_update_date := l_sao_rec.last_update_date;
3520: END IF;
3521: IF (x_sao_rec.last_update_login = Okc_Api.G_MISS_NUM)
3522: THEN
3523: x_sao_rec.last_update_login := l_sao_rec.last_update_login;
3524: END IF;
3525:
3524: END IF;
3525:
3526: /* Changed made by Kanti on 06/21/2001. To make it consistent with database table
3527: Changes start here */
3528: IF (x_sao_rec.cc_apply_rounding_difference = Okc_Api.G_MISS_CHAR)
3529: THEN
3530: x_sao_rec.cc_apply_rounding_difference := l_sao_rec.cc_apply_rounding_difference;
3531: END IF;
3532: IF (x_sao_rec.ael_apply_rounding_difference = Okc_Api.G_MISS_CHAR)
3528: IF (x_sao_rec.cc_apply_rounding_difference = Okc_Api.G_MISS_CHAR)
3529: THEN
3530: x_sao_rec.cc_apply_rounding_difference := l_sao_rec.cc_apply_rounding_difference;
3531: END IF;
3532: IF (x_sao_rec.ael_apply_rounding_difference = Okc_Api.G_MISS_CHAR)
3533: THEN
3534: x_sao_rec.ael_apply_rounding_difference := l_sao_rec.ael_apply_rounding_difference;
3535: END IF;
3536:
3534: x_sao_rec.ael_apply_rounding_difference := l_sao_rec.ael_apply_rounding_difference;
3535: END IF;
3536:
3537: /* Changes End here */
3538: IF (x_sao_rec.accrual_reversal_days = Okc_Api.G_MISS_NUM)
3539: THEN
3540: x_sao_rec.accrual_reversal_days := l_sao_rec.accrual_reversal_days;
3541: END IF;
3542:
3540: x_sao_rec.accrual_reversal_days := l_sao_rec.accrual_reversal_days;
3541: END IF;
3542:
3543: -- Added new field lke_hold_days for the bug 2331564 by Santonyr
3544: IF (x_sao_rec.lke_hold_days = Okc_Api.G_MISS_NUM) THEN
3545: x_sao_rec.lke_hold_days := l_sao_rec.lke_hold_days;
3546: END IF;
3547:
3548: --Added by Keerthi 10-Sep-2003 for Rounding of Amounts in Streams
3546: END IF;
3547:
3548: --Added by Keerthi 10-Sep-2003 for Rounding of Amounts in Streams
3549:
3550: IF (x_sao_rec.stm_apply_rounding_difference = Okc_Api.G_MISS_CHAR)
3551: THEN
3552: x_sao_rec.stm_apply_rounding_difference := l_sao_rec.stm_apply_rounding_difference;
3553: END IF;
3554:
3551: THEN
3552: x_sao_rec.stm_apply_rounding_difference := l_sao_rec.stm_apply_rounding_difference;
3553: END IF;
3554:
3555: IF (x_sao_rec.stm_rounding_rule = Okc_Api.G_MISS_CHAR)
3556: THEN
3557: x_sao_rec.stm_rounding_rule := l_sao_rec.stm_rounding_rule;
3558: END IF;
3559: --Added new field for bug 4884618(H)
3556: THEN
3557: x_sao_rec.stm_rounding_rule := l_sao_rec.stm_rounding_rule;
3558: END IF;
3559: --Added new field for bug 4884618(H)
3560: IF (x_sao_rec.validate_khr_start_date = Okc_Api.G_MISS_CHAR)
3561: THEN
3562: x_sao_rec.validate_khr_start_date := l_sao_rec.validate_khr_start_date;
3563: END IF;
3564: -- R12 SLA Uptake: Begin
3561: THEN
3562: x_sao_rec.validate_khr_start_date := l_sao_rec.validate_khr_start_date;
3563: END IF;
3564: -- R12 SLA Uptake: Begin
3565: IF (x_sao_rec.account_derivation = Okc_Api.G_MISS_CHAR)
3566: THEN
3567: x_sao_rec.account_derivation := l_sao_rec.account_derivation;
3568: END IF;
3569: -- R12 SLA Uptake: End
3567: x_sao_rec.account_derivation := l_sao_rec.account_derivation;
3568: END IF;
3569: -- R12 SLA Uptake: End
3570:
3571: IF (x_sao_rec.isg_arrears_pay_dates_option = Okc_Api.G_MISS_CHAR)
3572: THEN
3573: x_sao_rec.isg_arrears_pay_dates_option := l_sao_rec.isg_arrears_pay_dates_option;
3574: END IF;
3575: IF (x_sao_rec.PAY_DIST_SET_ID = Okc_Api.G_MISS_NUM)
3571: IF (x_sao_rec.isg_arrears_pay_dates_option = Okc_Api.G_MISS_CHAR)
3572: THEN
3573: x_sao_rec.isg_arrears_pay_dates_option := l_sao_rec.isg_arrears_pay_dates_option;
3574: END IF;
3575: IF (x_sao_rec.PAY_DIST_SET_ID = Okc_Api.G_MISS_NUM)
3576: THEN
3577: x_sao_rec.PAY_DIST_SET_ID := l_sao_rec.PAY_DIST_SET_ID;
3578: END IF;
3579:
3577: x_sao_rec.PAY_DIST_SET_ID := l_sao_rec.PAY_DIST_SET_ID;
3578: END IF;
3579:
3580: -- Bug# 8370699
3581: IF (x_sao_rec.amort_inc_adj_rev_dt_yn = Okc_Api.G_MISS_CHAR)
3582: THEN
3583: x_sao_rec.amort_inc_adj_rev_dt_yn := l_sao_rec.amort_inc_adj_rev_dt_yn;
3584: END IF;
3585:
3591: FUNCTION Set_Attributes (
3592: p_sao_rec IN sao_rec_type,
3593: x_sao_rec OUT NOCOPY sao_rec_type
3594: ) RETURN VARCHAR2 IS
3595: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3596: BEGIN
3597: x_sao_rec := p_sao_rec;
3598: RETURN(l_return_status);
3599: END set_attributes;
3597: x_sao_rec := p_sao_rec;
3598: RETURN(l_return_status);
3599: END set_attributes;
3600: BEGIN
3601: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
3602: p_init_msg_list,
3603: '_PVT',
3604: x_return_status);
3605: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3601: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
3602: p_init_msg_list,
3603: '_PVT',
3604: x_return_status);
3605: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3606: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3607: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3608: RAISE Okc_Api.G_EXCEPTION_ERROR;
3609: END IF;
3602: p_init_msg_list,
3603: '_PVT',
3604: x_return_status);
3605: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3606: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3607: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3608: RAISE Okc_Api.G_EXCEPTION_ERROR;
3609: END IF;
3610: --- Setting item attributes
3603: '_PVT',
3604: x_return_status);
3605: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3606: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3607: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3608: RAISE Okc_Api.G_EXCEPTION_ERROR;
3609: END IF;
3610: --- Setting item attributes
3611: l_return_status := Set_Attributes(
3604: x_return_status);
3605: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3606: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3607: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3608: RAISE Okc_Api.G_EXCEPTION_ERROR;
3609: END IF;
3610: --- Setting item attributes
3611: l_return_status := Set_Attributes(
3612: p_sao_rec, -- IN
3611: l_return_status := Set_Attributes(
3612: p_sao_rec, -- IN
3613: l_sao_rec); -- OUT
3614: --- If any errors happen abort API
3615: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3616: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3617: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3618: RAISE Okc_Api.G_EXCEPTION_ERROR;
3619: END IF;
3612: p_sao_rec, -- IN
3613: l_sao_rec); -- OUT
3614: --- If any errors happen abort API
3615: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3616: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3617: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3618: RAISE Okc_Api.G_EXCEPTION_ERROR;
3619: END IF;
3620: l_return_status := populate_new_record(l_sao_rec, l_def_sao_rec);
3613: l_sao_rec); -- OUT
3614: --- If any errors happen abort API
3615: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3616: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3617: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3618: RAISE Okc_Api.G_EXCEPTION_ERROR;
3619: END IF;
3620: l_return_status := populate_new_record(l_sao_rec, l_def_sao_rec);
3621: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3614: --- If any errors happen abort API
3615: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3616: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3617: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3618: RAISE Okc_Api.G_EXCEPTION_ERROR;
3619: END IF;
3620: l_return_status := populate_new_record(l_sao_rec, l_def_sao_rec);
3621: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3622: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3617: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3618: RAISE Okc_Api.G_EXCEPTION_ERROR;
3619: END IF;
3620: l_return_status := populate_new_record(l_sao_rec, l_def_sao_rec);
3621: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3622: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3623: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3624: RAISE Okc_Api.G_EXCEPTION_ERROR;
3625: END IF;
3618: RAISE Okc_Api.G_EXCEPTION_ERROR;
3619: END IF;
3620: l_return_status := populate_new_record(l_sao_rec, l_def_sao_rec);
3621: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3622: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3623: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3624: RAISE Okc_Api.G_EXCEPTION_ERROR;
3625: END IF;
3626: UPDATE OKL_SYS_ACCT_OPTS
3619: END IF;
3620: l_return_status := populate_new_record(l_sao_rec, l_def_sao_rec);
3621: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3622: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3623: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3624: RAISE Okc_Api.G_EXCEPTION_ERROR;
3625: END IF;
3626: UPDATE OKL_SYS_ACCT_OPTS
3627: SET CC_REP_CURRENCY_CODE = l_def_sao_rec.cc_rep_currency_code,
3620: l_return_status := populate_new_record(l_sao_rec, l_def_sao_rec);
3621: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3622: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3623: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3624: RAISE Okc_Api.G_EXCEPTION_ERROR;
3625: END IF;
3626: UPDATE OKL_SYS_ACCT_OPTS
3627: SET CC_REP_CURRENCY_CODE = l_def_sao_rec.cc_rep_currency_code,
3628: CODE_COMBINATION_ID = l_def_sao_rec.code_combination_id,
3693: ,AMORT_INC_ADJ_REV_DT_YN = l_def_sao_rec.amort_inc_adj_rev_dt_yn
3694: WHERE ID = l_def_sao_rec.id;
3695:
3696: x_sao_rec := l_def_sao_rec;
3697: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3698: EXCEPTION
3699: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
3700: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
3701: (
3695:
3696: x_sao_rec := l_def_sao_rec;
3697: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3698: EXCEPTION
3699: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
3700: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
3701: (
3702: l_api_name,
3703: G_PKG_NAME,
3696: x_sao_rec := l_def_sao_rec;
3697: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3698: EXCEPTION
3699: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
3700: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
3701: (
3702: l_api_name,
3703: G_PKG_NAME,
3704: 'OKC_API.G_RET_STS_ERROR',
3700: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
3701: (
3702: l_api_name,
3703: G_PKG_NAME,
3704: 'OKC_API.G_RET_STS_ERROR',
3705: x_msg_count,
3706: x_msg_data,
3707: '_PVT'
3708: );
3705: x_msg_count,
3706: x_msg_data,
3707: '_PVT'
3708: );
3709: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
3710: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3711: (
3712: l_api_name,
3713: G_PKG_NAME,
3706: x_msg_data,
3707: '_PVT'
3708: );
3709: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
3710: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3711: (
3712: l_api_name,
3713: G_PKG_NAME,
3714: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3710: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3711: (
3712: l_api_name,
3713: G_PKG_NAME,
3714: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3715: x_msg_count,
3716: x_msg_data,
3717: '_PVT'
3718: );
3716: x_msg_data,
3717: '_PVT'
3718: );
3719: WHEN OTHERS THEN
3720: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
3721: (
3722: l_api_name,
3723: G_PKG_NAME,
3724: 'OTHERS',
3731: -- update_row for:OKL_SYS_ACCT_OPTS_V --
3732: ----------------------------------------
3733: PROCEDURE update_row(
3734: p_api_version IN NUMBER,
3735: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
3736: x_return_status OUT NOCOPY VARCHAR2,
3737: x_msg_count OUT NOCOPY NUMBER,
3738: x_msg_data OUT NOCOPY VARCHAR2,
3739: p_saov_rec IN saov_rec_type,
3740: x_saov_rec OUT NOCOPY saov_rec_type) IS
3741:
3742: l_api_version CONSTANT NUMBER := 1;
3743: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
3744: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3745: l_saov_rec saov_rec_type := p_saov_rec;
3746: l_def_saov_rec saov_rec_type;
3747: l_sao_rec sao_rec_type;
3748: lx_sao_rec sao_rec_type;
3767: x_saov_rec OUT NOCOPY saov_rec_type
3768: ) RETURN VARCHAR2 IS
3769: l_saov_rec saov_rec_type;
3770: l_row_notfound BOOLEAN := TRUE;
3771: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3772: BEGIN
3773: x_saov_rec := p_saov_rec;
3774: -- Get current database values
3775: l_saov_rec := get_rec(p_saov_rec, l_row_notfound);
3773: x_saov_rec := p_saov_rec;
3774: -- Get current database values
3775: l_saov_rec := get_rec(p_saov_rec, l_row_notfound);
3776: IF (l_row_notfound) THEN
3777: l_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
3778: END IF;
3779: IF (x_saov_rec.id = Okc_Api.G_MISS_NUM)
3780: THEN
3781: x_saov_rec.id := l_saov_rec.id;
3775: l_saov_rec := get_rec(p_saov_rec, l_row_notfound);
3776: IF (l_row_notfound) THEN
3777: l_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
3778: END IF;
3779: IF (x_saov_rec.id = Okc_Api.G_MISS_NUM)
3780: THEN
3781: x_saov_rec.id := l_saov_rec.id;
3782: END IF;
3783: IF (x_saov_rec.object_version_number = Okc_Api.G_MISS_NUM)
3779: IF (x_saov_rec.id = Okc_Api.G_MISS_NUM)
3780: THEN
3781: x_saov_rec.id := l_saov_rec.id;
3782: END IF;
3783: IF (x_saov_rec.object_version_number = Okc_Api.G_MISS_NUM)
3784: THEN
3785: x_saov_rec.object_version_number := l_saov_rec.object_version_number;
3786: END IF;
3787: IF (x_saov_rec.set_of_books_id = Okc_Api.G_MISS_NUM)
3783: IF (x_saov_rec.object_version_number = Okc_Api.G_MISS_NUM)
3784: THEN
3785: x_saov_rec.object_version_number := l_saov_rec.object_version_number;
3786: END IF;
3787: IF (x_saov_rec.set_of_books_id = Okc_Api.G_MISS_NUM)
3788: THEN
3789: x_saov_rec.set_of_books_id := l_saov_rec.set_of_books_id;
3790: END IF;
3791: IF (x_saov_rec.SECONDARY_REP_METHOD = Okc_Api.G_MISS_CHAR)
3787: IF (x_saov_rec.set_of_books_id = Okc_Api.G_MISS_NUM)
3788: THEN
3789: x_saov_rec.set_of_books_id := l_saov_rec.set_of_books_id;
3790: END IF;
3791: IF (x_saov_rec.SECONDARY_REP_METHOD = Okc_Api.G_MISS_CHAR)
3792: THEN
3793: x_saov_rec.SECONDARY_REP_METHOD := l_saov_rec.SECONDARY_REP_METHOD;
3794: END IF;
3795: IF (x_saov_rec.code_combination_id = Okc_Api.G_MISS_NUM)
3791: IF (x_saov_rec.SECONDARY_REP_METHOD = Okc_Api.G_MISS_CHAR)
3792: THEN
3793: x_saov_rec.SECONDARY_REP_METHOD := l_saov_rec.SECONDARY_REP_METHOD;
3794: END IF;
3795: IF (x_saov_rec.code_combination_id = Okc_Api.G_MISS_NUM)
3796: THEN
3797: x_saov_rec.code_combination_id := l_saov_rec.code_combination_id;
3798: END IF;
3799: IF (x_saov_rec.cc_rep_currency_code = Okc_Api.G_MISS_CHAR)
3795: IF (x_saov_rec.code_combination_id = Okc_Api.G_MISS_NUM)
3796: THEN
3797: x_saov_rec.code_combination_id := l_saov_rec.code_combination_id;
3798: END IF;
3799: IF (x_saov_rec.cc_rep_currency_code = Okc_Api.G_MISS_CHAR)
3800: THEN
3801: x_saov_rec.cc_rep_currency_code := l_saov_rec.cc_rep_currency_code;
3802: END IF;
3803: IF (x_saov_rec.ael_rep_currency_code = Okc_Api.G_MISS_CHAR)
3799: IF (x_saov_rec.cc_rep_currency_code = Okc_Api.G_MISS_CHAR)
3800: THEN
3801: x_saov_rec.cc_rep_currency_code := l_saov_rec.cc_rep_currency_code;
3802: END IF;
3803: IF (x_saov_rec.ael_rep_currency_code = Okc_Api.G_MISS_CHAR)
3804: THEN
3805: x_saov_rec.ael_rep_currency_code := l_saov_rec.ael_rep_currency_code;
3806: END IF;
3807: IF (x_saov_rec.rec_ccid = Okc_Api.G_MISS_NUM)
3803: IF (x_saov_rec.ael_rep_currency_code = Okc_Api.G_MISS_CHAR)
3804: THEN
3805: x_saov_rec.ael_rep_currency_code := l_saov_rec.ael_rep_currency_code;
3806: END IF;
3807: IF (x_saov_rec.rec_ccid = Okc_Api.G_MISS_NUM)
3808: THEN
3809: x_saov_rec.rec_ccid := l_saov_rec.rec_ccid;
3810: END IF;
3811: IF (x_saov_rec.realized_gain_ccid = Okc_Api.G_MISS_NUM)
3807: IF (x_saov_rec.rec_ccid = Okc_Api.G_MISS_NUM)
3808: THEN
3809: x_saov_rec.rec_ccid := l_saov_rec.rec_ccid;
3810: END IF;
3811: IF (x_saov_rec.realized_gain_ccid = Okc_Api.G_MISS_NUM)
3812: THEN
3813: x_saov_rec.realized_gain_ccid := l_saov_rec.realized_gain_ccid;
3814: END IF;
3815: IF (x_saov_rec.realized_loss_ccid = Okc_Api.G_MISS_NUM)
3811: IF (x_saov_rec.realized_gain_ccid = Okc_Api.G_MISS_NUM)
3812: THEN
3813: x_saov_rec.realized_gain_ccid := l_saov_rec.realized_gain_ccid;
3814: END IF;
3815: IF (x_saov_rec.realized_loss_ccid = Okc_Api.G_MISS_NUM)
3816: THEN
3817: x_saov_rec.realized_loss_ccid := l_saov_rec.realized_loss_ccid;
3818: END IF;
3819: IF (x_saov_rec.tax_ccid = Okc_Api.G_MISS_NUM)
3815: IF (x_saov_rec.realized_loss_ccid = Okc_Api.G_MISS_NUM)
3816: THEN
3817: x_saov_rec.realized_loss_ccid := l_saov_rec.realized_loss_ccid;
3818: END IF;
3819: IF (x_saov_rec.tax_ccid = Okc_Api.G_MISS_NUM)
3820: THEN
3821: x_saov_rec.tax_ccid := l_saov_rec.tax_ccid;
3822: END IF;
3823: IF (x_saov_rec.cross_currency_ccid = Okc_Api.G_MISS_NUM)
3819: IF (x_saov_rec.tax_ccid = Okc_Api.G_MISS_NUM)
3820: THEN
3821: x_saov_rec.tax_ccid := l_saov_rec.tax_ccid;
3822: END IF;
3823: IF (x_saov_rec.cross_currency_ccid = Okc_Api.G_MISS_NUM)
3824: THEN
3825: x_saov_rec.cross_currency_ccid := l_saov_rec.cross_currency_ccid;
3826: END IF;
3827: IF (x_saov_rec.rounding_ccid = Okc_Api.G_MISS_NUM)
3823: IF (x_saov_rec.cross_currency_ccid = Okc_Api.G_MISS_NUM)
3824: THEN
3825: x_saov_rec.cross_currency_ccid := l_saov_rec.cross_currency_ccid;
3826: END IF;
3827: IF (x_saov_rec.rounding_ccid = Okc_Api.G_MISS_NUM)
3828: THEN
3829: x_saov_rec.rounding_ccid := l_saov_rec.rounding_ccid;
3830: END IF;
3831: IF (x_saov_rec.ar_clearing_ccid = Okc_Api.G_MISS_NUM)
3827: IF (x_saov_rec.rounding_ccid = Okc_Api.G_MISS_NUM)
3828: THEN
3829: x_saov_rec.rounding_ccid := l_saov_rec.rounding_ccid;
3830: END IF;
3831: IF (x_saov_rec.ar_clearing_ccid = Okc_Api.G_MISS_NUM)
3832: THEN
3833: x_saov_rec.ar_clearing_ccid := l_saov_rec.ar_clearing_ccid;
3834: END IF;
3835: IF (x_saov_rec.payables_ccid = Okc_Api.G_MISS_NUM)
3831: IF (x_saov_rec.ar_clearing_ccid = Okc_Api.G_MISS_NUM)
3832: THEN
3833: x_saov_rec.ar_clearing_ccid := l_saov_rec.ar_clearing_ccid;
3834: END IF;
3835: IF (x_saov_rec.payables_ccid = Okc_Api.G_MISS_NUM)
3836: THEN
3837: x_saov_rec.payables_ccid := l_saov_rec.payables_ccid;
3838: END IF;
3839: IF (x_saov_rec.liablity_ccid = Okc_Api.G_MISS_NUM)
3835: IF (x_saov_rec.payables_ccid = Okc_Api.G_MISS_NUM)
3836: THEN
3837: x_saov_rec.payables_ccid := l_saov_rec.payables_ccid;
3838: END IF;
3839: IF (x_saov_rec.liablity_ccid = Okc_Api.G_MISS_NUM)
3840: THEN
3841: x_saov_rec.liablity_ccid := l_saov_rec.liablity_ccid;
3842: END IF;
3843: IF (x_saov_rec.pre_payment_ccid = Okc_Api.G_MISS_NUM)
3839: IF (x_saov_rec.liablity_ccid = Okc_Api.G_MISS_NUM)
3840: THEN
3841: x_saov_rec.liablity_ccid := l_saov_rec.liablity_ccid;
3842: END IF;
3843: IF (x_saov_rec.pre_payment_ccid = Okc_Api.G_MISS_NUM)
3844: THEN
3845: x_saov_rec.pre_payment_ccid := l_saov_rec.pre_payment_ccid;
3846: END IF;
3847: IF (x_saov_rec.fut_date_pay_ccid = Okc_Api.G_MISS_NUM)
3843: IF (x_saov_rec.pre_payment_ccid = Okc_Api.G_MISS_NUM)
3844: THEN
3845: x_saov_rec.pre_payment_ccid := l_saov_rec.pre_payment_ccid;
3846: END IF;
3847: IF (x_saov_rec.fut_date_pay_ccid = Okc_Api.G_MISS_NUM)
3848: THEN
3849: x_saov_rec.fut_date_pay_ccid := l_saov_rec.fut_date_pay_ccid;
3850: END IF;
3851: IF (x_saov_rec.dis_taken_ccid = Okc_Api.G_MISS_NUM)
3847: IF (x_saov_rec.fut_date_pay_ccid = Okc_Api.G_MISS_NUM)
3848: THEN
3849: x_saov_rec.fut_date_pay_ccid := l_saov_rec.fut_date_pay_ccid;
3850: END IF;
3851: IF (x_saov_rec.dis_taken_ccid = Okc_Api.G_MISS_NUM)
3852: THEN
3853: x_saov_rec.dis_taken_ccid := l_saov_rec.dis_taken_ccid;
3854: END IF;
3855: IF (x_saov_rec.ap_clearing_ccid = Okc_Api.G_MISS_NUM)
3851: IF (x_saov_rec.dis_taken_ccid = Okc_Api.G_MISS_NUM)
3852: THEN
3853: x_saov_rec.dis_taken_ccid := l_saov_rec.dis_taken_ccid;
3854: END IF;
3855: IF (x_saov_rec.ap_clearing_ccid = Okc_Api.G_MISS_NUM)
3856: THEN
3857: x_saov_rec.ap_clearing_ccid := l_saov_rec.ap_clearing_ccid;
3858: END IF;
3859: IF (x_saov_rec.ael_rounding_rule = Okc_Api.G_MISS_CHAR)
3855: IF (x_saov_rec.ap_clearing_ccid = Okc_Api.G_MISS_NUM)
3856: THEN
3857: x_saov_rec.ap_clearing_ccid := l_saov_rec.ap_clearing_ccid;
3858: END IF;
3859: IF (x_saov_rec.ael_rounding_rule = Okc_Api.G_MISS_CHAR)
3860: THEN
3861: x_saov_rec.ael_rounding_rule := l_saov_rec.ael_rounding_rule;
3862: END IF;
3863: IF (x_saov_rec.ael_precision = Okc_Api.G_MISS_NUM)
3859: IF (x_saov_rec.ael_rounding_rule = Okc_Api.G_MISS_CHAR)
3860: THEN
3861: x_saov_rec.ael_rounding_rule := l_saov_rec.ael_rounding_rule;
3862: END IF;
3863: IF (x_saov_rec.ael_precision = Okc_Api.G_MISS_NUM)
3864: THEN
3865: x_saov_rec.ael_precision := l_saov_rec.ael_precision;
3866: END IF;
3867: IF (x_saov_rec.ael_min_acct_unit = Okc_Api.G_MISS_NUM)
3863: IF (x_saov_rec.ael_precision = Okc_Api.G_MISS_NUM)
3864: THEN
3865: x_saov_rec.ael_precision := l_saov_rec.ael_precision;
3866: END IF;
3867: IF (x_saov_rec.ael_min_acct_unit = Okc_Api.G_MISS_NUM)
3868: THEN
3869: x_saov_rec.ael_min_acct_unit := l_saov_rec.ael_min_acct_unit;
3870: END IF;
3871: IF (x_saov_rec.cc_rounding_rule = Okc_Api.G_MISS_CHAR)
3867: IF (x_saov_rec.ael_min_acct_unit = Okc_Api.G_MISS_NUM)
3868: THEN
3869: x_saov_rec.ael_min_acct_unit := l_saov_rec.ael_min_acct_unit;
3870: END IF;
3871: IF (x_saov_rec.cc_rounding_rule = Okc_Api.G_MISS_CHAR)
3872: THEN
3873: x_saov_rec.cc_rounding_rule := l_saov_rec.cc_rounding_rule;
3874: END IF;
3875: IF (x_saov_rec.cc_precision = Okc_Api.G_MISS_NUM)
3871: IF (x_saov_rec.cc_rounding_rule = Okc_Api.G_MISS_CHAR)
3872: THEN
3873: x_saov_rec.cc_rounding_rule := l_saov_rec.cc_rounding_rule;
3874: END IF;
3875: IF (x_saov_rec.cc_precision = Okc_Api.G_MISS_NUM)
3876: THEN
3877: x_saov_rec.cc_precision := l_saov_rec.cc_precision;
3878: END IF;
3879: IF (x_saov_rec.cc_min_acct_unit = Okc_Api.G_MISS_NUM)
3875: IF (x_saov_rec.cc_precision = Okc_Api.G_MISS_NUM)
3876: THEN
3877: x_saov_rec.cc_precision := l_saov_rec.cc_precision;
3878: END IF;
3879: IF (x_saov_rec.cc_min_acct_unit = Okc_Api.G_MISS_NUM)
3880: THEN
3881: x_saov_rec.cc_min_acct_unit := l_saov_rec.cc_min_acct_unit;
3882: END IF;
3883: IF (x_saov_rec.attribute_category = Okc_Api.G_MISS_CHAR)
3879: IF (x_saov_rec.cc_min_acct_unit = Okc_Api.G_MISS_NUM)
3880: THEN
3881: x_saov_rec.cc_min_acct_unit := l_saov_rec.cc_min_acct_unit;
3882: END IF;
3883: IF (x_saov_rec.attribute_category = Okc_Api.G_MISS_CHAR)
3884: THEN
3885: x_saov_rec.attribute_category := l_saov_rec.attribute_category;
3886: END IF;
3887: IF (x_saov_rec.attribute1 = Okc_Api.G_MISS_CHAR)
3883: IF (x_saov_rec.attribute_category = Okc_Api.G_MISS_CHAR)
3884: THEN
3885: x_saov_rec.attribute_category := l_saov_rec.attribute_category;
3886: END IF;
3887: IF (x_saov_rec.attribute1 = Okc_Api.G_MISS_CHAR)
3888: THEN
3889: x_saov_rec.attribute1 := l_saov_rec.attribute1;
3890: END IF;
3891: IF (x_saov_rec.attribute2 = Okc_Api.G_MISS_CHAR)
3887: IF (x_saov_rec.attribute1 = Okc_Api.G_MISS_CHAR)
3888: THEN
3889: x_saov_rec.attribute1 := l_saov_rec.attribute1;
3890: END IF;
3891: IF (x_saov_rec.attribute2 = Okc_Api.G_MISS_CHAR)
3892: THEN
3893: x_saov_rec.attribute2 := l_saov_rec.attribute2;
3894: END IF;
3895: IF (x_saov_rec.attribute3 = Okc_Api.G_MISS_CHAR)
3891: IF (x_saov_rec.attribute2 = Okc_Api.G_MISS_CHAR)
3892: THEN
3893: x_saov_rec.attribute2 := l_saov_rec.attribute2;
3894: END IF;
3895: IF (x_saov_rec.attribute3 = Okc_Api.G_MISS_CHAR)
3896: THEN
3897: x_saov_rec.attribute3 := l_saov_rec.attribute3;
3898: END IF;
3899: IF (x_saov_rec.attribute4 = Okc_Api.G_MISS_CHAR)
3895: IF (x_saov_rec.attribute3 = Okc_Api.G_MISS_CHAR)
3896: THEN
3897: x_saov_rec.attribute3 := l_saov_rec.attribute3;
3898: END IF;
3899: IF (x_saov_rec.attribute4 = Okc_Api.G_MISS_CHAR)
3900: THEN
3901: x_saov_rec.attribute4 := l_saov_rec.attribute4;
3902: END IF;
3903: IF (x_saov_rec.attribute5 = Okc_Api.G_MISS_CHAR)
3899: IF (x_saov_rec.attribute4 = Okc_Api.G_MISS_CHAR)
3900: THEN
3901: x_saov_rec.attribute4 := l_saov_rec.attribute4;
3902: END IF;
3903: IF (x_saov_rec.attribute5 = Okc_Api.G_MISS_CHAR)
3904: THEN
3905: x_saov_rec.attribute5 := l_saov_rec.attribute5;
3906: END IF;
3907: IF (x_saov_rec.attribute6 = Okc_Api.G_MISS_CHAR)
3903: IF (x_saov_rec.attribute5 = Okc_Api.G_MISS_CHAR)
3904: THEN
3905: x_saov_rec.attribute5 := l_saov_rec.attribute5;
3906: END IF;
3907: IF (x_saov_rec.attribute6 = Okc_Api.G_MISS_CHAR)
3908: THEN
3909: x_saov_rec.attribute6 := l_saov_rec.attribute6;
3910: END IF;
3911: IF (x_saov_rec.attribute7 = Okc_Api.G_MISS_CHAR)
3907: IF (x_saov_rec.attribute6 = Okc_Api.G_MISS_CHAR)
3908: THEN
3909: x_saov_rec.attribute6 := l_saov_rec.attribute6;
3910: END IF;
3911: IF (x_saov_rec.attribute7 = Okc_Api.G_MISS_CHAR)
3912: THEN
3913: x_saov_rec.attribute7 := l_saov_rec.attribute7;
3914: END IF;
3915: IF (x_saov_rec.attribute8 = Okc_Api.G_MISS_CHAR)
3911: IF (x_saov_rec.attribute7 = Okc_Api.G_MISS_CHAR)
3912: THEN
3913: x_saov_rec.attribute7 := l_saov_rec.attribute7;
3914: END IF;
3915: IF (x_saov_rec.attribute8 = Okc_Api.G_MISS_CHAR)
3916: THEN
3917: x_saov_rec.attribute8 := l_saov_rec.attribute8;
3918: END IF;
3919: IF (x_saov_rec.attribute9 = Okc_Api.G_MISS_CHAR)
3915: IF (x_saov_rec.attribute8 = Okc_Api.G_MISS_CHAR)
3916: THEN
3917: x_saov_rec.attribute8 := l_saov_rec.attribute8;
3918: END IF;
3919: IF (x_saov_rec.attribute9 = Okc_Api.G_MISS_CHAR)
3920: THEN
3921: x_saov_rec.attribute9 := l_saov_rec.attribute9;
3922: END IF;
3923: IF (x_saov_rec.attribute10 = Okc_Api.G_MISS_CHAR)
3919: IF (x_saov_rec.attribute9 = Okc_Api.G_MISS_CHAR)
3920: THEN
3921: x_saov_rec.attribute9 := l_saov_rec.attribute9;
3922: END IF;
3923: IF (x_saov_rec.attribute10 = Okc_Api.G_MISS_CHAR)
3924: THEN
3925: x_saov_rec.attribute10 := l_saov_rec.attribute10;
3926: END IF;
3927: IF (x_saov_rec.attribute11 = Okc_Api.G_MISS_CHAR)
3923: IF (x_saov_rec.attribute10 = Okc_Api.G_MISS_CHAR)
3924: THEN
3925: x_saov_rec.attribute10 := l_saov_rec.attribute10;
3926: END IF;
3927: IF (x_saov_rec.attribute11 = Okc_Api.G_MISS_CHAR)
3928: THEN
3929: x_saov_rec.attribute11 := l_saov_rec.attribute11;
3930: END IF;
3931: IF (x_saov_rec.attribute12 = Okc_Api.G_MISS_CHAR)
3927: IF (x_saov_rec.attribute11 = Okc_Api.G_MISS_CHAR)
3928: THEN
3929: x_saov_rec.attribute11 := l_saov_rec.attribute11;
3930: END IF;
3931: IF (x_saov_rec.attribute12 = Okc_Api.G_MISS_CHAR)
3932: THEN
3933: x_saov_rec.attribute12 := l_saov_rec.attribute12;
3934: END IF;
3935: IF (x_saov_rec.attribute13 = Okc_Api.G_MISS_CHAR)
3931: IF (x_saov_rec.attribute12 = Okc_Api.G_MISS_CHAR)
3932: THEN
3933: x_saov_rec.attribute12 := l_saov_rec.attribute12;
3934: END IF;
3935: IF (x_saov_rec.attribute13 = Okc_Api.G_MISS_CHAR)
3936: THEN
3937: x_saov_rec.attribute13 := l_saov_rec.attribute13;
3938: END IF;
3939: IF (x_saov_rec.attribute14 = Okc_Api.G_MISS_CHAR)
3935: IF (x_saov_rec.attribute13 = Okc_Api.G_MISS_CHAR)
3936: THEN
3937: x_saov_rec.attribute13 := l_saov_rec.attribute13;
3938: END IF;
3939: IF (x_saov_rec.attribute14 = Okc_Api.G_MISS_CHAR)
3940: THEN
3941: x_saov_rec.attribute14 := l_saov_rec.attribute14;
3942: END IF;
3943: IF (x_saov_rec.attribute15 = Okc_Api.G_MISS_CHAR)
3939: IF (x_saov_rec.attribute14 = Okc_Api.G_MISS_CHAR)
3940: THEN
3941: x_saov_rec.attribute14 := l_saov_rec.attribute14;
3942: END IF;
3943: IF (x_saov_rec.attribute15 = Okc_Api.G_MISS_CHAR)
3944: THEN
3945: x_saov_rec.attribute15 := l_saov_rec.attribute15;
3946: END IF;
3947: IF (x_saov_rec.org_id = Okc_Api.G_MISS_NUM)
3943: IF (x_saov_rec.attribute15 = Okc_Api.G_MISS_CHAR)
3944: THEN
3945: x_saov_rec.attribute15 := l_saov_rec.attribute15;
3946: END IF;
3947: IF (x_saov_rec.org_id = Okc_Api.G_MISS_NUM)
3948: THEN
3949: x_saov_rec.org_id := l_saov_rec.org_id;
3950: END IF;
3951: IF (x_saov_rec.created_by = Okc_Api.G_MISS_NUM)
3947: IF (x_saov_rec.org_id = Okc_Api.G_MISS_NUM)
3948: THEN
3949: x_saov_rec.org_id := l_saov_rec.org_id;
3950: END IF;
3951: IF (x_saov_rec.created_by = Okc_Api.G_MISS_NUM)
3952: THEN
3953: x_saov_rec.created_by := l_saov_rec.created_by;
3954: END IF;
3955: IF (x_saov_rec.creation_date = Okc_Api.G_MISS_DATE)
3951: IF (x_saov_rec.created_by = Okc_Api.G_MISS_NUM)
3952: THEN
3953: x_saov_rec.created_by := l_saov_rec.created_by;
3954: END IF;
3955: IF (x_saov_rec.creation_date = Okc_Api.G_MISS_DATE)
3956: THEN
3957: x_saov_rec.creation_date := l_saov_rec.creation_date;
3958: END IF;
3959: IF (x_saov_rec.last_updated_by = Okc_Api.G_MISS_NUM)
3955: IF (x_saov_rec.creation_date = Okc_Api.G_MISS_DATE)
3956: THEN
3957: x_saov_rec.creation_date := l_saov_rec.creation_date;
3958: END IF;
3959: IF (x_saov_rec.last_updated_by = Okc_Api.G_MISS_NUM)
3960: THEN
3961: x_saov_rec.last_updated_by := l_saov_rec.last_updated_by;
3962: END IF;
3963: IF (x_saov_rec.last_update_date = Okc_Api.G_MISS_DATE)
3959: IF (x_saov_rec.last_updated_by = Okc_Api.G_MISS_NUM)
3960: THEN
3961: x_saov_rec.last_updated_by := l_saov_rec.last_updated_by;
3962: END IF;
3963: IF (x_saov_rec.last_update_date = Okc_Api.G_MISS_DATE)
3964: THEN
3965: x_saov_rec.last_update_date := l_saov_rec.last_update_date;
3966: END IF;
3967: IF (x_saov_rec.last_update_login = Okc_Api.G_MISS_NUM)
3963: IF (x_saov_rec.last_update_date = Okc_Api.G_MISS_DATE)
3964: THEN
3965: x_saov_rec.last_update_date := l_saov_rec.last_update_date;
3966: END IF;
3967: IF (x_saov_rec.last_update_login = Okc_Api.G_MISS_NUM)
3968: THEN
3969: x_saov_rec.last_update_login := l_saov_rec.last_update_login;
3970: END IF;
3971:
3970: END IF;
3971:
3972: /* Changes made by Kanti on 06/21/2001 to make TAPI consistent with table definition */
3973:
3974: IF (x_saov_rec.cc_apply_rounding_difference = Okc_Api.G_MISS_CHAR)
3975: THEN
3976: x_saov_rec.cc_apply_rounding_difference := l_saov_rec.cc_apply_rounding_difference;
3977: END IF;
3978:
3975: THEN
3976: x_saov_rec.cc_apply_rounding_difference := l_saov_rec.cc_apply_rounding_difference;
3977: END IF;
3978:
3979: IF (x_saov_rec.ael_apply_rounding_difference = Okc_Api.G_MISS_CHAR)
3980: THEN
3981: x_saov_rec.ael_apply_rounding_difference := l_saov_rec.ael_apply_rounding_difference;
3982: END IF;
3983:
3982: END IF;
3983:
3984: /* Changes End here */
3985:
3986: IF (x_saov_rec.accrual_reversal_days = Okc_Api.G_MISS_NUM)
3987: THEN
3988: x_saov_rec.accrual_reversal_days := l_saov_rec.accrual_reversal_days;
3989: END IF;
3990: -- Added new field lke_hold_days for the bug 2331564 by Santonyr
3987: THEN
3988: x_saov_rec.accrual_reversal_days := l_saov_rec.accrual_reversal_days;
3989: END IF;
3990: -- Added new field lke_hold_days for the bug 2331564 by Santonyr
3991: IF (x_saov_rec.lke_hold_days = Okc_Api.G_MISS_NUM) THEN
3992: x_saov_rec.lke_hold_days := l_saov_rec.lke_hold_days;
3993: END IF;
3994:
3995: -- Added by Keerthi 10-Sep-2003 for Rounding of Amounts in Streams
3992: x_saov_rec.lke_hold_days := l_saov_rec.lke_hold_days;
3993: END IF;
3994:
3995: -- Added by Keerthi 10-Sep-2003 for Rounding of Amounts in Streams
3996: IF (x_saov_rec.stm_apply_rounding_difference = Okc_Api.G_MISS_CHAR)
3997: THEN
3998: x_saov_rec.stm_apply_rounding_difference := l_saov_rec.stm_apply_rounding_difference;
3999: END IF;
4000:
3997: THEN
3998: x_saov_rec.stm_apply_rounding_difference := l_saov_rec.stm_apply_rounding_difference;
3999: END IF;
4000:
4001: IF (x_saov_rec.stm_rounding_rule = Okc_Api.G_MISS_CHAR)
4002: THEN
4003: x_saov_rec.stm_rounding_rule := l_saov_rec.stm_rounding_rule;
4004: END IF;
4005: --Added new field for bug 4884618(H)
4002: THEN
4003: x_saov_rec.stm_rounding_rule := l_saov_rec.stm_rounding_rule;
4004: END IF;
4005: --Added new field for bug 4884618(H)
4006: IF (x_saov_rec.validate_khr_start_date = Okc_Api.G_MISS_CHAR)
4007: THEN
4008: x_saov_rec.validate_khr_start_date := l_saov_rec.validate_khr_start_date;
4009: END IF;
4010: -- R12 SLA Uptake: Begin
4007: THEN
4008: x_saov_rec.validate_khr_start_date := l_saov_rec.validate_khr_start_date;
4009: END IF;
4010: -- R12 SLA Uptake: Begin
4011: IF (x_saov_rec.account_derivation = Okc_Api.G_MISS_CHAR)
4012: THEN
4013: x_saov_rec.account_derivation := l_saov_rec.account_derivation;
4014: END IF;
4015: -- R12 SLA Uptake: End
4012: THEN
4013: x_saov_rec.account_derivation := l_saov_rec.account_derivation;
4014: END IF;
4015: -- R12 SLA Uptake: End
4016: IF (x_saov_rec.isg_arrears_pay_dates_option = Okc_Api.G_MISS_CHAR)
4017: THEN
4018: x_saov_rec.isg_arrears_pay_dates_option := l_saov_rec.isg_arrears_pay_dates_option;
4019: END IF;
4020: IF (x_saov_rec.PAY_DIST_SET_ID = Okc_Api.G_MISS_NUM)
4016: IF (x_saov_rec.isg_arrears_pay_dates_option = Okc_Api.G_MISS_CHAR)
4017: THEN
4018: x_saov_rec.isg_arrears_pay_dates_option := l_saov_rec.isg_arrears_pay_dates_option;
4019: END IF;
4020: IF (x_saov_rec.PAY_DIST_SET_ID = Okc_Api.G_MISS_NUM)
4021: THEN
4022: x_saov_rec.PAY_DIST_SET_ID := l_saov_rec.PAY_DIST_SET_ID ;
4023: END IF;
4024:
4022: x_saov_rec.PAY_DIST_SET_ID := l_saov_rec.PAY_DIST_SET_ID ;
4023: END IF;
4024:
4025: --Bug# 8370699
4026: IF (x_saov_rec.amort_inc_adj_rev_dt_yn = Okc_Api.G_MISS_CHAR)
4027: THEN
4028: x_saov_rec.amort_inc_adj_rev_dt_yn := l_saov_rec.amort_inc_adj_rev_dt_yn;
4029: END IF;
4030:
4036: FUNCTION Set_Attributes (
4037: p_saov_rec IN saov_rec_type,
4038: x_saov_rec OUT NOCOPY saov_rec_type
4039: ) RETURN VARCHAR2 IS
4040: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4041: BEGIN
4042: x_saov_rec := p_saov_rec;
4043: RETURN(l_return_status);
4044: END Set_Attributes;
4042: x_saov_rec := p_saov_rec;
4043: RETURN(l_return_status);
4044: END Set_Attributes;
4045: BEGIN
4046: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
4047: G_PKG_NAME,
4048: p_init_msg_list,
4049: l_api_version,
4050: p_api_version,
4049: l_api_version,
4050: p_api_version,
4051: '_PVT',
4052: x_return_status);
4053: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4054: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4055: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4056: RAISE Okc_Api.G_EXCEPTION_ERROR;
4057: END IF;
4050: p_api_version,
4051: '_PVT',
4052: x_return_status);
4053: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4054: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4055: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4056: RAISE Okc_Api.G_EXCEPTION_ERROR;
4057: END IF;
4058: --- Setting item attributes
4051: '_PVT',
4052: x_return_status);
4053: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4054: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4055: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4056: RAISE Okc_Api.G_EXCEPTION_ERROR;
4057: END IF;
4058: --- Setting item attributes
4059: l_return_status := Set_Attributes(
4052: x_return_status);
4053: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4054: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4055: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4056: RAISE Okc_Api.G_EXCEPTION_ERROR;
4057: END IF;
4058: --- Setting item attributes
4059: l_return_status := Set_Attributes(
4060: p_saov_rec, -- IN
4059: l_return_status := Set_Attributes(
4060: p_saov_rec, -- IN
4061: l_saov_rec); -- OUT
4062: --- If any errors happen abort API
4063: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4064: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4065: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4066: RAISE Okc_Api.G_EXCEPTION_ERROR;
4067: END IF;
4060: p_saov_rec, -- IN
4061: l_saov_rec); -- OUT
4062: --- If any errors happen abort API
4063: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4064: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4065: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4066: RAISE Okc_Api.G_EXCEPTION_ERROR;
4067: END IF;
4068: l_return_status := populate_new_record(l_saov_rec, l_def_saov_rec);
4061: l_saov_rec); -- OUT
4062: --- If any errors happen abort API
4063: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4064: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4065: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4066: RAISE Okc_Api.G_EXCEPTION_ERROR;
4067: END IF;
4068: l_return_status := populate_new_record(l_saov_rec, l_def_saov_rec);
4069: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4062: --- If any errors happen abort API
4063: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4064: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4065: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4066: RAISE Okc_Api.G_EXCEPTION_ERROR;
4067: END IF;
4068: l_return_status := populate_new_record(l_saov_rec, l_def_saov_rec);
4069: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4070: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4065: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4066: RAISE Okc_Api.G_EXCEPTION_ERROR;
4067: END IF;
4068: l_return_status := populate_new_record(l_saov_rec, l_def_saov_rec);
4069: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4070: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4071: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4072: RAISE Okc_Api.G_EXCEPTION_ERROR;
4073: END IF;
4066: RAISE Okc_Api.G_EXCEPTION_ERROR;
4067: END IF;
4068: l_return_status := populate_new_record(l_saov_rec, l_def_saov_rec);
4069: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4070: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4071: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4072: RAISE Okc_Api.G_EXCEPTION_ERROR;
4073: END IF;
4074: l_def_saov_rec := fill_who_columns(l_def_saov_rec);
4067: END IF;
4068: l_return_status := populate_new_record(l_saov_rec, l_def_saov_rec);
4069: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4070: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4071: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4072: RAISE Okc_Api.G_EXCEPTION_ERROR;
4073: END IF;
4074: l_def_saov_rec := fill_who_columns(l_def_saov_rec);
4075: --- Validate all non-missing attributes (Item Level Validation)
4068: l_return_status := populate_new_record(l_saov_rec, l_def_saov_rec);
4069: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4070: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4071: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4072: RAISE Okc_Api.G_EXCEPTION_ERROR;
4073: END IF;
4074: l_def_saov_rec := fill_who_columns(l_def_saov_rec);
4075: --- Validate all non-missing attributes (Item Level Validation)
4076: l_return_status := Validate_Attributes(l_def_saov_rec);
4074: l_def_saov_rec := fill_who_columns(l_def_saov_rec);
4075: --- Validate all non-missing attributes (Item Level Validation)
4076: l_return_status := Validate_Attributes(l_def_saov_rec);
4077: --- If any errors happen abort API
4078: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4079: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4080: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4081: RAISE Okc_Api.G_EXCEPTION_ERROR;
4082: END IF;
4075: --- Validate all non-missing attributes (Item Level Validation)
4076: l_return_status := Validate_Attributes(l_def_saov_rec);
4077: --- If any errors happen abort API
4078: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4079: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4080: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4081: RAISE Okc_Api.G_EXCEPTION_ERROR;
4082: END IF;
4083: l_return_status := Validate_Record(l_def_saov_rec);
4076: l_return_status := Validate_Attributes(l_def_saov_rec);
4077: --- If any errors happen abort API
4078: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4079: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4080: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4081: RAISE Okc_Api.G_EXCEPTION_ERROR;
4082: END IF;
4083: l_return_status := Validate_Record(l_def_saov_rec);
4084: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4077: --- If any errors happen abort API
4078: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4079: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4080: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4081: RAISE Okc_Api.G_EXCEPTION_ERROR;
4082: END IF;
4083: l_return_status := Validate_Record(l_def_saov_rec);
4084: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4085: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4080: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4081: RAISE Okc_Api.G_EXCEPTION_ERROR;
4082: END IF;
4083: l_return_status := Validate_Record(l_def_saov_rec);
4084: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4085: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4086: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4087: RAISE Okc_Api.G_EXCEPTION_ERROR;
4088: END IF;
4081: RAISE Okc_Api.G_EXCEPTION_ERROR;
4082: END IF;
4083: l_return_status := Validate_Record(l_def_saov_rec);
4084: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4085: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4086: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4087: RAISE Okc_Api.G_EXCEPTION_ERROR;
4088: END IF;
4089:
4082: END IF;
4083: l_return_status := Validate_Record(l_def_saov_rec);
4084: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4085: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4086: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4087: RAISE Okc_Api.G_EXCEPTION_ERROR;
4088: END IF;
4089:
4090: --------------------------------------
4083: l_return_status := Validate_Record(l_def_saov_rec);
4084: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4085: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4086: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4087: RAISE Okc_Api.G_EXCEPTION_ERROR;
4088: END IF;
4089:
4090: --------------------------------------
4091: -- Move VIEW record to "Child" records
4101: x_msg_data,
4102: l_sao_rec,
4103: lx_sao_rec
4104: );
4105: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4106: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4107: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4108: RAISE Okc_Api.G_EXCEPTION_ERROR;
4109: END IF;
4102: l_sao_rec,
4103: lx_sao_rec
4104: );
4105: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4106: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4107: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4108: RAISE Okc_Api.G_EXCEPTION_ERROR;
4109: END IF;
4110: migrate(lx_sao_rec, l_def_saov_rec);
4103: lx_sao_rec
4104: );
4105: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4106: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4107: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4108: RAISE Okc_Api.G_EXCEPTION_ERROR;
4109: END IF;
4110: migrate(lx_sao_rec, l_def_saov_rec);
4111: x_saov_rec := l_def_saov_rec;
4104: );
4105: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4106: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4107: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4108: RAISE Okc_Api.G_EXCEPTION_ERROR;
4109: END IF;
4110: migrate(lx_sao_rec, l_def_saov_rec);
4111: x_saov_rec := l_def_saov_rec;
4112: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
4108: RAISE Okc_Api.G_EXCEPTION_ERROR;
4109: END IF;
4110: migrate(lx_sao_rec, l_def_saov_rec);
4111: x_saov_rec := l_def_saov_rec;
4112: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
4113: EXCEPTION
4114: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
4115: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4116: (
4110: migrate(lx_sao_rec, l_def_saov_rec);
4111: x_saov_rec := l_def_saov_rec;
4112: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
4113: EXCEPTION
4114: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
4115: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4116: (
4117: l_api_name,
4118: G_PKG_NAME,
4111: x_saov_rec := l_def_saov_rec;
4112: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
4113: EXCEPTION
4114: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
4115: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4116: (
4117: l_api_name,
4118: G_PKG_NAME,
4119: 'OKC_API.G_RET_STS_ERROR',
4115: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4116: (
4117: l_api_name,
4118: G_PKG_NAME,
4119: 'OKC_API.G_RET_STS_ERROR',
4120: x_msg_count,
4121: x_msg_data,
4122: '_PVT'
4123: );
4120: x_msg_count,
4121: x_msg_data,
4122: '_PVT'
4123: );
4124: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
4125: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4126: (
4127: l_api_name,
4128: G_PKG_NAME,
4121: x_msg_data,
4122: '_PVT'
4123: );
4124: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
4125: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4126: (
4127: l_api_name,
4128: G_PKG_NAME,
4129: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4125: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4126: (
4127: l_api_name,
4128: G_PKG_NAME,
4129: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4130: x_msg_count,
4131: x_msg_data,
4132: '_PVT'
4133: );
4131: x_msg_data,
4132: '_PVT'
4133: );
4134: WHEN OTHERS THEN
4135: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4136: (
4137: l_api_name,
4138: G_PKG_NAME,
4139: 'OTHERS',
4146: -- PL/SQL TBL update_row for:SAOV_TBL --
4147: ----------------------------------------
4148: PROCEDURE update_row(
4149: p_api_version IN NUMBER,
4150: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
4151: x_return_status OUT NOCOPY VARCHAR2,
4152: x_msg_count OUT NOCOPY NUMBER,
4153: x_msg_data OUT NOCOPY VARCHAR2,
4154: p_saov_tbl IN saov_tbl_type,
4155: x_saov_tbl OUT NOCOPY saov_tbl_type) IS
4156:
4157: l_api_version CONSTANT NUMBER := 1;
4158: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
4159: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4160: i NUMBER := 0;
4161: -- START change : mvasudev, 05/15/2001
4162: -- Adding OverAll Status Flag
4163: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4159: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4160: i NUMBER := 0;
4161: -- START change : mvasudev, 05/15/2001
4162: -- Adding OverAll Status Flag
4163: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4164: -- END change : mvasudev
4165: BEGIN
4166: Okc_Api.init_msg_list(p_init_msg_list);
4167: -- Make sure PL/SQL table has records in it before passing
4162: -- Adding OverAll Status Flag
4163: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4164: -- END change : mvasudev
4165: BEGIN
4166: Okc_Api.init_msg_list(p_init_msg_list);
4167: -- Make sure PL/SQL table has records in it before passing
4168: IF (p_saov_tbl.COUNT > 0) THEN
4169: i := p_saov_tbl.FIRST;
4170: LOOP
4169: i := p_saov_tbl.FIRST;
4170: LOOP
4171: update_row (
4172: p_api_version => p_api_version,
4173: p_init_msg_list => Okc_Api.G_FALSE,
4174: x_return_status => x_return_status,
4175: x_msg_count => x_msg_count,
4176: x_msg_data => x_msg_data,
4177: p_saov_rec => p_saov_tbl(i),
4177: p_saov_rec => p_saov_tbl(i),
4178: x_saov_rec => x_saov_tbl(i));
4179: -- START change : mvasudev, 05/15/2001
4180: -- store the highest degree of error
4181: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
4182: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
4183: l_overall_status := x_return_status;
4184: END IF;
4185: END IF;
4178: x_saov_rec => x_saov_tbl(i));
4179: -- START change : mvasudev, 05/15/2001
4180: -- store the highest degree of error
4181: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
4182: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
4183: l_overall_status := x_return_status;
4184: END IF;
4185: END IF;
4186: -- END change : mvasudev
4192: x_return_status := l_overall_status;
4193: -- END change : mvasudev
4194: END IF;
4195: EXCEPTION
4196: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
4197: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4198: (
4199: l_api_name,
4200: G_PKG_NAME,
4193: -- END change : mvasudev
4194: END IF;
4195: EXCEPTION
4196: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
4197: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4198: (
4199: l_api_name,
4200: G_PKG_NAME,
4201: 'OKC_API.G_RET_STS_ERROR',
4197: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4198: (
4199: l_api_name,
4200: G_PKG_NAME,
4201: 'OKC_API.G_RET_STS_ERROR',
4202: x_msg_count,
4203: x_msg_data,
4204: '_PVT'
4205: );
4202: x_msg_count,
4203: x_msg_data,
4204: '_PVT'
4205: );
4206: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
4207: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4208: (
4209: l_api_name,
4210: G_PKG_NAME,
4203: x_msg_data,
4204: '_PVT'
4205: );
4206: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
4207: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4208: (
4209: l_api_name,
4210: G_PKG_NAME,
4211: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4207: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4208: (
4209: l_api_name,
4210: G_PKG_NAME,
4211: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4212: x_msg_count,
4213: x_msg_data,
4214: '_PVT'
4215: );
4213: x_msg_data,
4214: '_PVT'
4215: );
4216: WHEN OTHERS THEN
4217: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4218: (
4219: l_api_name,
4220: G_PKG_NAME,
4221: 'OTHERS',
4231: --------------------------------------
4232: -- delete_row for:OKL_SYS_ACCT_OPTS --
4233: --------------------------------------
4234: PROCEDURE delete_row(
4235: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
4236: x_return_status OUT NOCOPY VARCHAR2,
4237: x_msg_count OUT NOCOPY NUMBER,
4238: x_msg_data OUT NOCOPY VARCHAR2,
4239: p_sao_rec IN sao_rec_type) IS
4239: p_sao_rec IN sao_rec_type) IS
4240:
4241: l_api_version CONSTANT NUMBER := 1;
4242: l_api_name CONSTANT VARCHAR2(30) := 'OPTS_delete_row';
4243: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4244: l_sao_rec sao_rec_type:= p_sao_rec;
4245: l_row_notfound BOOLEAN := TRUE;
4246: BEGIN
4247: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
4243: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4244: l_sao_rec sao_rec_type:= p_sao_rec;
4245: l_row_notfound BOOLEAN := TRUE;
4246: BEGIN
4247: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
4248: p_init_msg_list,
4249: '_PVT',
4250: x_return_status);
4251: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4247: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
4248: p_init_msg_list,
4249: '_PVT',
4250: x_return_status);
4251: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4252: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4253: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4254: RAISE Okc_Api.G_EXCEPTION_ERROR;
4255: END IF;
4248: p_init_msg_list,
4249: '_PVT',
4250: x_return_status);
4251: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4252: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4253: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4254: RAISE Okc_Api.G_EXCEPTION_ERROR;
4255: END IF;
4256: DELETE FROM OKL_SYS_ACCT_OPTS
4249: '_PVT',
4250: x_return_status);
4251: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4252: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4253: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4254: RAISE Okc_Api.G_EXCEPTION_ERROR;
4255: END IF;
4256: DELETE FROM OKL_SYS_ACCT_OPTS
4257: WHERE ID = l_sao_rec.id;
4250: x_return_status);
4251: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4252: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4253: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4254: RAISE Okc_Api.G_EXCEPTION_ERROR;
4255: END IF;
4256: DELETE FROM OKL_SYS_ACCT_OPTS
4257: WHERE ID = l_sao_rec.id;
4258:
4255: END IF;
4256: DELETE FROM OKL_SYS_ACCT_OPTS
4257: WHERE ID = l_sao_rec.id;
4258:
4259: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
4260: EXCEPTION
4261: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
4262: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4263: (
4257: WHERE ID = l_sao_rec.id;
4258:
4259: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
4260: EXCEPTION
4261: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
4262: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4263: (
4264: l_api_name,
4265: G_PKG_NAME,
4258:
4259: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
4260: EXCEPTION
4261: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
4262: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4263: (
4264: l_api_name,
4265: G_PKG_NAME,
4266: 'OKC_API.G_RET_STS_ERROR',
4262: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4263: (
4264: l_api_name,
4265: G_PKG_NAME,
4266: 'OKC_API.G_RET_STS_ERROR',
4267: x_msg_count,
4268: x_msg_data,
4269: '_PVT'
4270: );
4267: x_msg_count,
4268: x_msg_data,
4269: '_PVT'
4270: );
4271: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
4272: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4273: (
4274: l_api_name,
4275: G_PKG_NAME,
4268: x_msg_data,
4269: '_PVT'
4270: );
4271: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
4272: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4273: (
4274: l_api_name,
4275: G_PKG_NAME,
4276: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4272: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4273: (
4274: l_api_name,
4275: G_PKG_NAME,
4276: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4277: x_msg_count,
4278: x_msg_data,
4279: '_PVT'
4280: );
4278: x_msg_data,
4279: '_PVT'
4280: );
4281: WHEN OTHERS THEN
4282: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4283: (
4284: l_api_name,
4285: G_PKG_NAME,
4286: 'OTHERS',
4293: -- delete_row for:OKL_SYS_ACCT_OPTS_V --
4294: ----------------------------------------
4295: PROCEDURE delete_row(
4296: p_api_version IN NUMBER,
4297: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
4298: x_return_status OUT NOCOPY VARCHAR2,
4299: x_msg_count OUT NOCOPY NUMBER,
4300: x_msg_data OUT NOCOPY VARCHAR2,
4301: p_saov_rec IN saov_rec_type) IS
4301: p_saov_rec IN saov_rec_type) IS
4302:
4303: l_api_version CONSTANT NUMBER := 1;
4304: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
4305: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4306: l_saov_rec saov_rec_type := p_saov_rec;
4307: l_sao_rec sao_rec_type;
4308: BEGIN
4309: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
4305: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4306: l_saov_rec saov_rec_type := p_saov_rec;
4307: l_sao_rec sao_rec_type;
4308: BEGIN
4309: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
4310: G_PKG_NAME,
4311: p_init_msg_list,
4312: l_api_version,
4313: p_api_version,
4312: l_api_version,
4313: p_api_version,
4314: '_PVT',
4315: x_return_status);
4316: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4317: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4318: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4319: RAISE Okc_Api.G_EXCEPTION_ERROR;
4320: END IF;
4313: p_api_version,
4314: '_PVT',
4315: x_return_status);
4316: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4317: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4318: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4319: RAISE Okc_Api.G_EXCEPTION_ERROR;
4320: END IF;
4321: --------------------------------------
4314: '_PVT',
4315: x_return_status);
4316: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4317: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4318: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4319: RAISE Okc_Api.G_EXCEPTION_ERROR;
4320: END IF;
4321: --------------------------------------
4322: -- Move VIEW record to "Child" records
4315: x_return_status);
4316: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4317: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4318: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4319: RAISE Okc_Api.G_EXCEPTION_ERROR;
4320: END IF;
4321: --------------------------------------
4322: -- Move VIEW record to "Child" records
4323: --------------------------------------
4331: x_msg_count,
4332: x_msg_data,
4333: l_sao_rec
4334: );
4335: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4336: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4337: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4338: RAISE Okc_Api.G_EXCEPTION_ERROR;
4339: END IF;
4332: x_msg_data,
4333: l_sao_rec
4334: );
4335: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4336: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4337: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4338: RAISE Okc_Api.G_EXCEPTION_ERROR;
4339: END IF;
4340: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
4333: l_sao_rec
4334: );
4335: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4336: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4337: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4338: RAISE Okc_Api.G_EXCEPTION_ERROR;
4339: END IF;
4340: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
4341: EXCEPTION
4334: );
4335: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
4336: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4337: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4338: RAISE Okc_Api.G_EXCEPTION_ERROR;
4339: END IF;
4340: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
4341: EXCEPTION
4342: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
4336: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
4337: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
4338: RAISE Okc_Api.G_EXCEPTION_ERROR;
4339: END IF;
4340: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
4341: EXCEPTION
4342: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
4343: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4344: (
4338: RAISE Okc_Api.G_EXCEPTION_ERROR;
4339: END IF;
4340: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
4341: EXCEPTION
4342: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
4343: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4344: (
4345: l_api_name,
4346: G_PKG_NAME,
4339: END IF;
4340: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
4341: EXCEPTION
4342: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
4343: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4344: (
4345: l_api_name,
4346: G_PKG_NAME,
4347: 'OKC_API.G_RET_STS_ERROR',
4343: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4344: (
4345: l_api_name,
4346: G_PKG_NAME,
4347: 'OKC_API.G_RET_STS_ERROR',
4348: x_msg_count,
4349: x_msg_data,
4350: '_PVT'
4351: );
4348: x_msg_count,
4349: x_msg_data,
4350: '_PVT'
4351: );
4352: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
4353: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4354: (
4355: l_api_name,
4356: G_PKG_NAME,
4349: x_msg_data,
4350: '_PVT'
4351: );
4352: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
4353: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4354: (
4355: l_api_name,
4356: G_PKG_NAME,
4357: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4353: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4354: (
4355: l_api_name,
4356: G_PKG_NAME,
4357: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4358: x_msg_count,
4359: x_msg_data,
4360: '_PVT'
4361: );
4359: x_msg_data,
4360: '_PVT'
4361: );
4362: WHEN OTHERS THEN
4363: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4364: (
4365: l_api_name,
4366: G_PKG_NAME,
4367: 'OTHERS',
4374: -- PL/SQL TBL delete_row for:SAOV_TBL --
4375: ----------------------------------------
4376: PROCEDURE delete_row(
4377: p_api_version IN NUMBER,
4378: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
4379: x_return_status OUT NOCOPY VARCHAR2,
4380: x_msg_count OUT NOCOPY NUMBER,
4381: x_msg_data OUT NOCOPY VARCHAR2,
4382: p_saov_tbl IN saov_tbl_type) IS
4382: p_saov_tbl IN saov_tbl_type) IS
4383:
4384: l_api_version CONSTANT NUMBER := 1;
4385: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
4386: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4387: i NUMBER := 0;
4388: -- START change : mvasudev, 05/15/2001
4389: -- Adding OverAll Status Flag
4390: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4386: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4387: i NUMBER := 0;
4388: -- START change : mvasudev, 05/15/2001
4389: -- Adding OverAll Status Flag
4390: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4391: -- END change : mvasudev
4392: BEGIN
4393: Okc_Api.init_msg_list(p_init_msg_list);
4394: -- Make sure PL/SQL table has records in it before passing
4389: -- Adding OverAll Status Flag
4390: l_overall_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
4391: -- END change : mvasudev
4392: BEGIN
4393: Okc_Api.init_msg_list(p_init_msg_list);
4394: -- Make sure PL/SQL table has records in it before passing
4395: IF (p_saov_tbl.COUNT > 0) THEN
4396: i := p_saov_tbl.FIRST;
4397: LOOP
4396: i := p_saov_tbl.FIRST;
4397: LOOP
4398: delete_row (
4399: p_api_version => p_api_version,
4400: p_init_msg_list => Okc_Api.G_FALSE,
4401: x_return_status => x_return_status,
4402: x_msg_count => x_msg_count,
4403: x_msg_data => x_msg_data,
4404: p_saov_rec => p_saov_tbl(i));
4403: x_msg_data => x_msg_data,
4404: p_saov_rec => p_saov_tbl(i));
4405: -- START change : mvasudev, 05/15/2001
4406: -- store the highest degree of error
4407: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
4408: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
4409: l_overall_status := x_return_status;
4410: END IF;
4411: END IF;
4404: p_saov_rec => p_saov_tbl(i));
4405: -- START change : mvasudev, 05/15/2001
4406: -- store the highest degree of error
4407: IF x_return_status <> Okc_Api.G_RET_STS_SUCCESS THEN
4408: IF l_overall_status <> Okc_Api.G_RET_STS_UNEXP_ERROR THEN
4409: l_overall_status := x_return_status;
4410: END IF;
4411: END IF;
4412: -- END change : mvasudev
4418: x_return_status := l_overall_status;
4419: -- END change : mvasudev
4420: END IF;
4421: EXCEPTION
4422: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
4423: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4424: (
4425: l_api_name,
4426: G_PKG_NAME,
4419: -- END change : mvasudev
4420: END IF;
4421: EXCEPTION
4422: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
4423: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4424: (
4425: l_api_name,
4426: G_PKG_NAME,
4427: 'OKC_API.G_RET_STS_ERROR',
4423: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
4424: (
4425: l_api_name,
4426: G_PKG_NAME,
4427: 'OKC_API.G_RET_STS_ERROR',
4428: x_msg_count,
4429: x_msg_data,
4430: '_PVT'
4431: );
4428: x_msg_count,
4429: x_msg_data,
4430: '_PVT'
4431: );
4432: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
4433: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4434: (
4435: l_api_name,
4436: G_PKG_NAME,
4429: x_msg_data,
4430: '_PVT'
4431: );
4432: WHEN Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
4433: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4434: (
4435: l_api_name,
4436: G_PKG_NAME,
4437: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4433: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4434: (
4435: l_api_name,
4436: G_PKG_NAME,
4437: 'OKC_API.G_RET_STS_UNEXP_ERROR',
4438: x_msg_count,
4439: x_msg_data,
4440: '_PVT'
4441: );
4439: x_msg_data,
4440: '_PVT'
4441: );
4442: WHEN OTHERS THEN
4443: x_return_status :=Okc_Api.HANDLE_EXCEPTIONS
4444: (
4445: l_api_name,
4446: G_PKG_NAME,
4447: 'OTHERS',