7:
8: -- Procedure Clear_Dependent_Attr
9:
10: PROCEDURE Clear_Dependent_Attr
11: ( p_attr_id IN NUMBER := FND_API.G_MISS_NUM
12: , p_SSC_rec IN QP_Attr_Map_PUB.Ssc_Rec_Type
13: , p_old_SSC_rec IN QP_Attr_Map_PUB.Ssc_Rec_Type :=
14: QP_Attr_Map_PUB.G_MISS_SSC_REC
15: , x_SSC_rec OUT NOCOPY /* file.sql.39 change */ QP_Attr_Map_PUB.Ssc_Rec_Type
26:
27: -- If attr_id is missing compare old and new records and for
28: -- every changed attribute clear its dependent fields.
29:
30: IF p_attr_id = FND_API.G_MISS_NUM THEN
31:
32: IF NOT QP_GLOBALS.Equal(p_SSC_rec.application_short_name,p_old_SSC_rec.application_short_name)
33: THEN
34: l_index := l_index + 1;
451: IS
452: l_SSC_rec QP_Attr_Map_PUB.Ssc_Rec_Type := p_SSC_rec;
453: BEGIN
454:
455: IF l_SSC_rec.application_short_name = FND_API.G_MISS_CHAR THEN
456: l_SSC_rec.application_short_name := p_old_SSC_rec.application_short_name;
457: END IF;
458:
459: IF l_SSC_rec.attribute1 = FND_API.G_MISS_CHAR THEN
455: IF l_SSC_rec.application_short_name = FND_API.G_MISS_CHAR THEN
456: l_SSC_rec.application_short_name := p_old_SSC_rec.application_short_name;
457: END IF;
458:
459: IF l_SSC_rec.attribute1 = FND_API.G_MISS_CHAR THEN
460: l_SSC_rec.attribute1 := p_old_SSC_rec.attribute1;
461: END IF;
462:
463: IF l_SSC_rec.attribute10 = FND_API.G_MISS_CHAR THEN
459: IF l_SSC_rec.attribute1 = FND_API.G_MISS_CHAR THEN
460: l_SSC_rec.attribute1 := p_old_SSC_rec.attribute1;
461: END IF;
462:
463: IF l_SSC_rec.attribute10 = FND_API.G_MISS_CHAR THEN
464: l_SSC_rec.attribute10 := p_old_SSC_rec.attribute10;
465: END IF;
466:
467: IF l_SSC_rec.attribute11 = FND_API.G_MISS_CHAR THEN
463: IF l_SSC_rec.attribute10 = FND_API.G_MISS_CHAR THEN
464: l_SSC_rec.attribute10 := p_old_SSC_rec.attribute10;
465: END IF;
466:
467: IF l_SSC_rec.attribute11 = FND_API.G_MISS_CHAR THEN
468: l_SSC_rec.attribute11 := p_old_SSC_rec.attribute11;
469: END IF;
470:
471: IF l_SSC_rec.attribute12 = FND_API.G_MISS_CHAR THEN
467: IF l_SSC_rec.attribute11 = FND_API.G_MISS_CHAR THEN
468: l_SSC_rec.attribute11 := p_old_SSC_rec.attribute11;
469: END IF;
470:
471: IF l_SSC_rec.attribute12 = FND_API.G_MISS_CHAR THEN
472: l_SSC_rec.attribute12 := p_old_SSC_rec.attribute12;
473: END IF;
474:
475: IF l_SSC_rec.attribute13 = FND_API.G_MISS_CHAR THEN
471: IF l_SSC_rec.attribute12 = FND_API.G_MISS_CHAR THEN
472: l_SSC_rec.attribute12 := p_old_SSC_rec.attribute12;
473: END IF;
474:
475: IF l_SSC_rec.attribute13 = FND_API.G_MISS_CHAR THEN
476: l_SSC_rec.attribute13 := p_old_SSC_rec.attribute13;
477: END IF;
478:
479: IF l_SSC_rec.attribute14 = FND_API.G_MISS_CHAR THEN
475: IF l_SSC_rec.attribute13 = FND_API.G_MISS_CHAR THEN
476: l_SSC_rec.attribute13 := p_old_SSC_rec.attribute13;
477: END IF;
478:
479: IF l_SSC_rec.attribute14 = FND_API.G_MISS_CHAR THEN
480: l_SSC_rec.attribute14 := p_old_SSC_rec.attribute14;
481: END IF;
482:
483: IF l_SSC_rec.attribute15 = FND_API.G_MISS_CHAR THEN
479: IF l_SSC_rec.attribute14 = FND_API.G_MISS_CHAR THEN
480: l_SSC_rec.attribute14 := p_old_SSC_rec.attribute14;
481: END IF;
482:
483: IF l_SSC_rec.attribute15 = FND_API.G_MISS_CHAR THEN
484: l_SSC_rec.attribute15 := p_old_SSC_rec.attribute15;
485: END IF;
486:
487: IF l_SSC_rec.attribute2 = FND_API.G_MISS_CHAR THEN
483: IF l_SSC_rec.attribute15 = FND_API.G_MISS_CHAR THEN
484: l_SSC_rec.attribute15 := p_old_SSC_rec.attribute15;
485: END IF;
486:
487: IF l_SSC_rec.attribute2 = FND_API.G_MISS_CHAR THEN
488: l_SSC_rec.attribute2 := p_old_SSC_rec.attribute2;
489: END IF;
490:
491: IF l_SSC_rec.attribute3 = FND_API.G_MISS_CHAR THEN
487: IF l_SSC_rec.attribute2 = FND_API.G_MISS_CHAR THEN
488: l_SSC_rec.attribute2 := p_old_SSC_rec.attribute2;
489: END IF;
490:
491: IF l_SSC_rec.attribute3 = FND_API.G_MISS_CHAR THEN
492: l_SSC_rec.attribute3 := p_old_SSC_rec.attribute3;
493: END IF;
494:
495: IF l_SSC_rec.attribute4 = FND_API.G_MISS_CHAR THEN
491: IF l_SSC_rec.attribute3 = FND_API.G_MISS_CHAR THEN
492: l_SSC_rec.attribute3 := p_old_SSC_rec.attribute3;
493: END IF;
494:
495: IF l_SSC_rec.attribute4 = FND_API.G_MISS_CHAR THEN
496: l_SSC_rec.attribute4 := p_old_SSC_rec.attribute4;
497: END IF;
498:
499: IF l_SSC_rec.attribute5 = FND_API.G_MISS_CHAR THEN
495: IF l_SSC_rec.attribute4 = FND_API.G_MISS_CHAR THEN
496: l_SSC_rec.attribute4 := p_old_SSC_rec.attribute4;
497: END IF;
498:
499: IF l_SSC_rec.attribute5 = FND_API.G_MISS_CHAR THEN
500: l_SSC_rec.attribute5 := p_old_SSC_rec.attribute5;
501: END IF;
502:
503: IF l_SSC_rec.attribute6 = FND_API.G_MISS_CHAR THEN
499: IF l_SSC_rec.attribute5 = FND_API.G_MISS_CHAR THEN
500: l_SSC_rec.attribute5 := p_old_SSC_rec.attribute5;
501: END IF;
502:
503: IF l_SSC_rec.attribute6 = FND_API.G_MISS_CHAR THEN
504: l_SSC_rec.attribute6 := p_old_SSC_rec.attribute6;
505: END IF;
506:
507: IF l_SSC_rec.attribute7 = FND_API.G_MISS_CHAR THEN
503: IF l_SSC_rec.attribute6 = FND_API.G_MISS_CHAR THEN
504: l_SSC_rec.attribute6 := p_old_SSC_rec.attribute6;
505: END IF;
506:
507: IF l_SSC_rec.attribute7 = FND_API.G_MISS_CHAR THEN
508: l_SSC_rec.attribute7 := p_old_SSC_rec.attribute7;
509: END IF;
510:
511: IF l_SSC_rec.attribute8 = FND_API.G_MISS_CHAR THEN
507: IF l_SSC_rec.attribute7 = FND_API.G_MISS_CHAR THEN
508: l_SSC_rec.attribute7 := p_old_SSC_rec.attribute7;
509: END IF;
510:
511: IF l_SSC_rec.attribute8 = FND_API.G_MISS_CHAR THEN
512: l_SSC_rec.attribute8 := p_old_SSC_rec.attribute8;
513: END IF;
514:
515: IF l_SSC_rec.attribute9 = FND_API.G_MISS_CHAR THEN
511: IF l_SSC_rec.attribute8 = FND_API.G_MISS_CHAR THEN
512: l_SSC_rec.attribute8 := p_old_SSC_rec.attribute8;
513: END IF;
514:
515: IF l_SSC_rec.attribute9 = FND_API.G_MISS_CHAR THEN
516: l_SSC_rec.attribute9 := p_old_SSC_rec.attribute9;
517: END IF;
518:
519: IF l_SSC_rec.context = FND_API.G_MISS_CHAR THEN
515: IF l_SSC_rec.attribute9 = FND_API.G_MISS_CHAR THEN
516: l_SSC_rec.attribute9 := p_old_SSC_rec.attribute9;
517: END IF;
518:
519: IF l_SSC_rec.context = FND_API.G_MISS_CHAR THEN
520: l_SSC_rec.context := p_old_SSC_rec.context;
521: END IF;
522:
523: IF l_SSC_rec.created_by = FND_API.G_MISS_NUM THEN
519: IF l_SSC_rec.context = FND_API.G_MISS_CHAR THEN
520: l_SSC_rec.context := p_old_SSC_rec.context;
521: END IF;
522:
523: IF l_SSC_rec.created_by = FND_API.G_MISS_NUM THEN
524: l_SSC_rec.created_by := p_old_SSC_rec.created_by;
525: END IF;
526:
527: IF l_SSC_rec.creation_date = FND_API.G_MISS_DATE THEN
523: IF l_SSC_rec.created_by = FND_API.G_MISS_NUM THEN
524: l_SSC_rec.created_by := p_old_SSC_rec.created_by;
525: END IF;
526:
527: IF l_SSC_rec.creation_date = FND_API.G_MISS_DATE THEN
528: l_SSC_rec.creation_date := p_old_SSC_rec.creation_date;
529: END IF;
530:
531: IF l_SSC_rec.enabled_flag = FND_API.G_MISS_CHAR THEN
527: IF l_SSC_rec.creation_date = FND_API.G_MISS_DATE THEN
528: l_SSC_rec.creation_date := p_old_SSC_rec.creation_date;
529: END IF;
530:
531: IF l_SSC_rec.enabled_flag = FND_API.G_MISS_CHAR THEN
532: l_SSC_rec.enabled_flag := p_old_SSC_rec.enabled_flag;
533: END IF;
534:
535: IF l_SSC_rec.last_updated_by = FND_API.G_MISS_NUM THEN
531: IF l_SSC_rec.enabled_flag = FND_API.G_MISS_CHAR THEN
532: l_SSC_rec.enabled_flag := p_old_SSC_rec.enabled_flag;
533: END IF;
534:
535: IF l_SSC_rec.last_updated_by = FND_API.G_MISS_NUM THEN
536: l_SSC_rec.last_updated_by := p_old_SSC_rec.last_updated_by;
537: END IF;
538:
539: IF l_SSC_rec.last_update_date = FND_API.G_MISS_DATE THEN
535: IF l_SSC_rec.last_updated_by = FND_API.G_MISS_NUM THEN
536: l_SSC_rec.last_updated_by := p_old_SSC_rec.last_updated_by;
537: END IF;
538:
539: IF l_SSC_rec.last_update_date = FND_API.G_MISS_DATE THEN
540: l_SSC_rec.last_update_date := p_old_SSC_rec.last_update_date;
541: END IF;
542:
543: IF l_SSC_rec.last_update_login = FND_API.G_MISS_NUM THEN
539: IF l_SSC_rec.last_update_date = FND_API.G_MISS_DATE THEN
540: l_SSC_rec.last_update_date := p_old_SSC_rec.last_update_date;
541: END IF;
542:
543: IF l_SSC_rec.last_update_login = FND_API.G_MISS_NUM THEN
544: l_SSC_rec.last_update_login := p_old_SSC_rec.last_update_login;
545: END IF;
546:
547: IF l_SSC_rec.program_application_id = FND_API.G_MISS_NUM THEN
543: IF l_SSC_rec.last_update_login = FND_API.G_MISS_NUM THEN
544: l_SSC_rec.last_update_login := p_old_SSC_rec.last_update_login;
545: END IF;
546:
547: IF l_SSC_rec.program_application_id = FND_API.G_MISS_NUM THEN
548: l_SSC_rec.program_application_id := p_old_SSC_rec.program_application_id;
549: END IF;
550:
551: IF l_SSC_rec.program_id = FND_API.G_MISS_NUM THEN
547: IF l_SSC_rec.program_application_id = FND_API.G_MISS_NUM THEN
548: l_SSC_rec.program_application_id := p_old_SSC_rec.program_application_id;
549: END IF;
550:
551: IF l_SSC_rec.program_id = FND_API.G_MISS_NUM THEN
552: l_SSC_rec.program_id := p_old_SSC_rec.program_id;
553: END IF;
554:
555: IF l_SSC_rec.program_update_date = FND_API.G_MISS_DATE THEN
551: IF l_SSC_rec.program_id = FND_API.G_MISS_NUM THEN
552: l_SSC_rec.program_id := p_old_SSC_rec.program_id;
553: END IF;
554:
555: IF l_SSC_rec.program_update_date = FND_API.G_MISS_DATE THEN
556: l_SSC_rec.program_update_date := p_old_SSC_rec.program_update_date;
557: END IF;
558:
559: IF l_SSC_rec.pte_code = FND_API.G_MISS_CHAR THEN
555: IF l_SSC_rec.program_update_date = FND_API.G_MISS_DATE THEN
556: l_SSC_rec.program_update_date := p_old_SSC_rec.program_update_date;
557: END IF;
558:
559: IF l_SSC_rec.pte_code = FND_API.G_MISS_CHAR THEN
560: l_SSC_rec.pte_code := p_old_SSC_rec.pte_code;
561: END IF;
562:
563: IF l_SSC_rec.pte_source_system_id = FND_API.G_MISS_NUM THEN
559: IF l_SSC_rec.pte_code = FND_API.G_MISS_CHAR THEN
560: l_SSC_rec.pte_code := p_old_SSC_rec.pte_code;
561: END IF;
562:
563: IF l_SSC_rec.pte_source_system_id = FND_API.G_MISS_NUM THEN
564: l_SSC_rec.pte_source_system_id := p_old_SSC_rec.pte_source_system_id;
565: END IF;
566:
567: RETURN l_SSC_rec;
576: IS
577: l_SSC_rec QP_Attr_Map_PUB.Ssc_Rec_Type := p_SSC_rec;
578: BEGIN
579:
580: IF l_SSC_rec.application_short_name = FND_API.G_MISS_CHAR THEN
581: l_SSC_rec.application_short_name := NULL;
582: END IF;
583:
584: IF l_SSC_rec.attribute1 = FND_API.G_MISS_CHAR THEN
580: IF l_SSC_rec.application_short_name = FND_API.G_MISS_CHAR THEN
581: l_SSC_rec.application_short_name := NULL;
582: END IF;
583:
584: IF l_SSC_rec.attribute1 = FND_API.G_MISS_CHAR THEN
585: l_SSC_rec.attribute1 := NULL;
586: END IF;
587:
588: IF l_SSC_rec.attribute10 = FND_API.G_MISS_CHAR THEN
584: IF l_SSC_rec.attribute1 = FND_API.G_MISS_CHAR THEN
585: l_SSC_rec.attribute1 := NULL;
586: END IF;
587:
588: IF l_SSC_rec.attribute10 = FND_API.G_MISS_CHAR THEN
589: l_SSC_rec.attribute10 := NULL;
590: END IF;
591:
592: IF l_SSC_rec.attribute11 = FND_API.G_MISS_CHAR THEN
588: IF l_SSC_rec.attribute10 = FND_API.G_MISS_CHAR THEN
589: l_SSC_rec.attribute10 := NULL;
590: END IF;
591:
592: IF l_SSC_rec.attribute11 = FND_API.G_MISS_CHAR THEN
593: l_SSC_rec.attribute11 := NULL;
594: END IF;
595:
596: IF l_SSC_rec.attribute12 = FND_API.G_MISS_CHAR THEN
592: IF l_SSC_rec.attribute11 = FND_API.G_MISS_CHAR THEN
593: l_SSC_rec.attribute11 := NULL;
594: END IF;
595:
596: IF l_SSC_rec.attribute12 = FND_API.G_MISS_CHAR THEN
597: l_SSC_rec.attribute12 := NULL;
598: END IF;
599:
600: IF l_SSC_rec.attribute13 = FND_API.G_MISS_CHAR THEN
596: IF l_SSC_rec.attribute12 = FND_API.G_MISS_CHAR THEN
597: l_SSC_rec.attribute12 := NULL;
598: END IF;
599:
600: IF l_SSC_rec.attribute13 = FND_API.G_MISS_CHAR THEN
601: l_SSC_rec.attribute13 := NULL;
602: END IF;
603:
604: IF l_SSC_rec.attribute14 = FND_API.G_MISS_CHAR THEN
600: IF l_SSC_rec.attribute13 = FND_API.G_MISS_CHAR THEN
601: l_SSC_rec.attribute13 := NULL;
602: END IF;
603:
604: IF l_SSC_rec.attribute14 = FND_API.G_MISS_CHAR THEN
605: l_SSC_rec.attribute14 := NULL;
606: END IF;
607:
608: IF l_SSC_rec.attribute15 = FND_API.G_MISS_CHAR THEN
604: IF l_SSC_rec.attribute14 = FND_API.G_MISS_CHAR THEN
605: l_SSC_rec.attribute14 := NULL;
606: END IF;
607:
608: IF l_SSC_rec.attribute15 = FND_API.G_MISS_CHAR THEN
609: l_SSC_rec.attribute15 := NULL;
610: END IF;
611:
612: IF l_SSC_rec.attribute2 = FND_API.G_MISS_CHAR THEN
608: IF l_SSC_rec.attribute15 = FND_API.G_MISS_CHAR THEN
609: l_SSC_rec.attribute15 := NULL;
610: END IF;
611:
612: IF l_SSC_rec.attribute2 = FND_API.G_MISS_CHAR THEN
613: l_SSC_rec.attribute2 := NULL;
614: END IF;
615:
616: IF l_SSC_rec.attribute3 = FND_API.G_MISS_CHAR THEN
612: IF l_SSC_rec.attribute2 = FND_API.G_MISS_CHAR THEN
613: l_SSC_rec.attribute2 := NULL;
614: END IF;
615:
616: IF l_SSC_rec.attribute3 = FND_API.G_MISS_CHAR THEN
617: l_SSC_rec.attribute3 := NULL;
618: END IF;
619:
620: IF l_SSC_rec.attribute4 = FND_API.G_MISS_CHAR THEN
616: IF l_SSC_rec.attribute3 = FND_API.G_MISS_CHAR THEN
617: l_SSC_rec.attribute3 := NULL;
618: END IF;
619:
620: IF l_SSC_rec.attribute4 = FND_API.G_MISS_CHAR THEN
621: l_SSC_rec.attribute4 := NULL;
622: END IF;
623:
624: IF l_SSC_rec.attribute5 = FND_API.G_MISS_CHAR THEN
620: IF l_SSC_rec.attribute4 = FND_API.G_MISS_CHAR THEN
621: l_SSC_rec.attribute4 := NULL;
622: END IF;
623:
624: IF l_SSC_rec.attribute5 = FND_API.G_MISS_CHAR THEN
625: l_SSC_rec.attribute5 := NULL;
626: END IF;
627:
628: IF l_SSC_rec.attribute6 = FND_API.G_MISS_CHAR THEN
624: IF l_SSC_rec.attribute5 = FND_API.G_MISS_CHAR THEN
625: l_SSC_rec.attribute5 := NULL;
626: END IF;
627:
628: IF l_SSC_rec.attribute6 = FND_API.G_MISS_CHAR THEN
629: l_SSC_rec.attribute6 := NULL;
630: END IF;
631:
632: IF l_SSC_rec.attribute7 = FND_API.G_MISS_CHAR THEN
628: IF l_SSC_rec.attribute6 = FND_API.G_MISS_CHAR THEN
629: l_SSC_rec.attribute6 := NULL;
630: END IF;
631:
632: IF l_SSC_rec.attribute7 = FND_API.G_MISS_CHAR THEN
633: l_SSC_rec.attribute7 := NULL;
634: END IF;
635:
636: IF l_SSC_rec.attribute8 = FND_API.G_MISS_CHAR THEN
632: IF l_SSC_rec.attribute7 = FND_API.G_MISS_CHAR THEN
633: l_SSC_rec.attribute7 := NULL;
634: END IF;
635:
636: IF l_SSC_rec.attribute8 = FND_API.G_MISS_CHAR THEN
637: l_SSC_rec.attribute8 := NULL;
638: END IF;
639:
640: IF l_SSC_rec.attribute9 = FND_API.G_MISS_CHAR THEN
636: IF l_SSC_rec.attribute8 = FND_API.G_MISS_CHAR THEN
637: l_SSC_rec.attribute8 := NULL;
638: END IF;
639:
640: IF l_SSC_rec.attribute9 = FND_API.G_MISS_CHAR THEN
641: l_SSC_rec.attribute9 := NULL;
642: END IF;
643:
644: IF l_SSC_rec.context = FND_API.G_MISS_CHAR THEN
640: IF l_SSC_rec.attribute9 = FND_API.G_MISS_CHAR THEN
641: l_SSC_rec.attribute9 := NULL;
642: END IF;
643:
644: IF l_SSC_rec.context = FND_API.G_MISS_CHAR THEN
645: l_SSC_rec.context := NULL;
646: END IF;
647:
648: IF l_SSC_rec.created_by = FND_API.G_MISS_NUM THEN
644: IF l_SSC_rec.context = FND_API.G_MISS_CHAR THEN
645: l_SSC_rec.context := NULL;
646: END IF;
647:
648: IF l_SSC_rec.created_by = FND_API.G_MISS_NUM THEN
649: l_SSC_rec.created_by := NULL;
650: END IF;
651:
652: IF l_SSC_rec.creation_date = FND_API.G_MISS_DATE THEN
648: IF l_SSC_rec.created_by = FND_API.G_MISS_NUM THEN
649: l_SSC_rec.created_by := NULL;
650: END IF;
651:
652: IF l_SSC_rec.creation_date = FND_API.G_MISS_DATE THEN
653: l_SSC_rec.creation_date := NULL;
654: END IF;
655:
656: IF l_SSC_rec.enabled_flag = FND_API.G_MISS_CHAR THEN
652: IF l_SSC_rec.creation_date = FND_API.G_MISS_DATE THEN
653: l_SSC_rec.creation_date := NULL;
654: END IF;
655:
656: IF l_SSC_rec.enabled_flag = FND_API.G_MISS_CHAR THEN
657: l_SSC_rec.enabled_flag := NULL;
658: END IF;
659:
660: IF l_SSC_rec.last_updated_by = FND_API.G_MISS_NUM THEN
656: IF l_SSC_rec.enabled_flag = FND_API.G_MISS_CHAR THEN
657: l_SSC_rec.enabled_flag := NULL;
658: END IF;
659:
660: IF l_SSC_rec.last_updated_by = FND_API.G_MISS_NUM THEN
661: l_SSC_rec.last_updated_by := NULL;
662: END IF;
663:
664: IF l_SSC_rec.last_update_date = FND_API.G_MISS_DATE THEN
660: IF l_SSC_rec.last_updated_by = FND_API.G_MISS_NUM THEN
661: l_SSC_rec.last_updated_by := NULL;
662: END IF;
663:
664: IF l_SSC_rec.last_update_date = FND_API.G_MISS_DATE THEN
665: l_SSC_rec.last_update_date := NULL;
666: END IF;
667:
668: IF l_SSC_rec.last_update_login = FND_API.G_MISS_NUM THEN
664: IF l_SSC_rec.last_update_date = FND_API.G_MISS_DATE THEN
665: l_SSC_rec.last_update_date := NULL;
666: END IF;
667:
668: IF l_SSC_rec.last_update_login = FND_API.G_MISS_NUM THEN
669: l_SSC_rec.last_update_login := NULL;
670: END IF;
671:
672: IF l_SSC_rec.program_application_id = FND_API.G_MISS_NUM THEN
668: IF l_SSC_rec.last_update_login = FND_API.G_MISS_NUM THEN
669: l_SSC_rec.last_update_login := NULL;
670: END IF;
671:
672: IF l_SSC_rec.program_application_id = FND_API.G_MISS_NUM THEN
673: l_SSC_rec.program_application_id := NULL;
674: END IF;
675:
676: IF l_SSC_rec.program_id = FND_API.G_MISS_NUM THEN
672: IF l_SSC_rec.program_application_id = FND_API.G_MISS_NUM THEN
673: l_SSC_rec.program_application_id := NULL;
674: END IF;
675:
676: IF l_SSC_rec.program_id = FND_API.G_MISS_NUM THEN
677: l_SSC_rec.program_id := NULL;
678: END IF;
679:
680: IF l_SSC_rec.program_update_date = FND_API.G_MISS_DATE THEN
676: IF l_SSC_rec.program_id = FND_API.G_MISS_NUM THEN
677: l_SSC_rec.program_id := NULL;
678: END IF;
679:
680: IF l_SSC_rec.program_update_date = FND_API.G_MISS_DATE THEN
681: l_SSC_rec.program_update_date := NULL;
682: END IF;
683:
684: IF l_SSC_rec.pte_code = FND_API.G_MISS_CHAR THEN
680: IF l_SSC_rec.program_update_date = FND_API.G_MISS_DATE THEN
681: l_SSC_rec.program_update_date := NULL;
682: END IF;
683:
684: IF l_SSC_rec.pte_code = FND_API.G_MISS_CHAR THEN
685: l_SSC_rec.pte_code := NULL;
686: END IF;
687:
688: IF l_SSC_rec.pte_source_system_id = FND_API.G_MISS_NUM THEN
684: IF l_SSC_rec.pte_code = FND_API.G_MISS_CHAR THEN
685: l_SSC_rec.pte_code := NULL;
686: END IF;
687:
688: IF l_SSC_rec.pte_source_system_id = FND_API.G_MISS_NUM THEN
689: l_SSC_rec.pte_source_system_id := NULL;
690: END IF;
691:
692: RETURN l_SSC_rec;
744: , 'Update_Row'
745: );
746: END IF;
747:
748: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
749:
750: END Update_Row;
751:
752: -- Procedure Insert_Row
829: , 'Insert_Row'
830: );
831: END IF;
832:
833: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
834:
835: END Insert_Row;
836:
837: -- Procedure Delete_Row
857: , 'Delete_Row'
858: );
859: END IF;
860:
861: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
862:
863: END Delete_Row;
864:
865: -- Function Query_Row
881: --
882:
883: FUNCTION Query_Rows
884: ( p_pte_source_system_id IN NUMBER :=
885: FND_API.G_MISS_NUM
886: , p_lookup_code IN VARCHAR2 :=
887: FND_API.G_MISS_CHAR
888: ) RETURN QP_Attr_Map_PUB.Ssc_Tbl_Type
889: IS
883: FUNCTION Query_Rows
884: ( p_pte_source_system_id IN NUMBER :=
885: FND_API.G_MISS_NUM
886: , p_lookup_code IN VARCHAR2 :=
887: FND_API.G_MISS_CHAR
888: ) RETURN QP_Attr_Map_PUB.Ssc_Tbl_Type
889: IS
890: l_SSC_rec QP_Attr_Map_PUB.Ssc_Rec_Type;
891: l_SSC_tbl QP_Attr_Map_PUB.Ssc_Tbl_Type;
930:
931: IF
932: (p_pte_source_system_id IS NOT NULL
933: AND
934: p_pte_source_system_id <> FND_API.G_MISS_NUM)
935: AND
936: (p_lookup_code IS NOT NULL
937: AND
938: p_lookup_code <> FND_API.G_MISS_CHAR)
934: p_pte_source_system_id <> FND_API.G_MISS_NUM)
935: AND
936: (p_lookup_code IS NOT NULL
937: AND
938: p_lookup_code <> FND_API.G_MISS_CHAR)
939: THEN
940: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
941: THEN
942: OE_MSG_PUB.Add_Exc_Msg
945: , 'Keys are mutually exclusive: pte_source_system_id = '|| p_pte_source_system_id || ', lookup_code = '|| p_lookup_code
946: );
947: END IF;
948:
949: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
950:
951: END IF;
952:
953:
993:
994: IF
995: (p_pte_source_system_id IS NOT NULL
996: AND
997: p_pte_source_system_id <> FND_API.G_MISS_NUM)
998: AND
999: (l_SSC_tbl.COUNT = 0)
1000: THEN
1001: RAISE NO_DATA_FOUND;
1007: RETURN l_SSC_tbl;
1008:
1009: EXCEPTION
1010:
1011: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1012:
1013: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1014:
1015: WHEN OTHERS THEN
1009: EXCEPTION
1010:
1011: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1012:
1013: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1014:
1015: WHEN OTHERS THEN
1016:
1017: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1021: , 'Query_Rows'
1022: );
1023: END IF;
1024:
1025: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1026:
1027: END Query_Rows;
1028:
1029: -- Procedure lock_Row
1163: x_SSC_rec := l_SSC_rec;
1164:
1165: -- Set return status
1166:
1167: x_return_status := FND_API.G_RET_STS_SUCCESS;
1168: x_SSC_rec.return_status := FND_API.G_RET_STS_SUCCESS;
1169:
1170: ELSE
1171:
1164:
1165: -- Set return status
1166:
1167: x_return_status := FND_API.G_RET_STS_SUCCESS;
1168: x_SSC_rec.return_status := FND_API.G_RET_STS_SUCCESS;
1169:
1170: ELSE
1171:
1172: -- Row has changed by another user.
1170: ELSE
1171:
1172: -- Row has changed by another user.
1173:
1174: x_return_status := FND_API.G_RET_STS_ERROR;
1175: x_SSC_rec.return_status := FND_API.G_RET_STS_ERROR;
1176:
1177: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1178: THEN
1171:
1172: -- Row has changed by another user.
1173:
1174: x_return_status := FND_API.G_RET_STS_ERROR;
1175: x_SSC_rec.return_status := FND_API.G_RET_STS_ERROR;
1176:
1177: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1178: THEN
1179:
1187: EXCEPTION
1188:
1189: WHEN NO_DATA_FOUND THEN
1190:
1191: x_return_status := FND_API.G_RET_STS_ERROR;
1192: x_SSC_rec.return_status := FND_API.G_RET_STS_ERROR;
1193:
1194: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1195: THEN
1188:
1189: WHEN NO_DATA_FOUND THEN
1190:
1191: x_return_status := FND_API.G_RET_STS_ERROR;
1192: x_SSC_rec.return_status := FND_API.G_RET_STS_ERROR;
1193:
1194: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1195: THEN
1196:
1199:
1200: END IF;
1201: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
1202:
1203: x_return_status := FND_API.G_RET_STS_ERROR;
1204: x_SSC_rec.return_status := FND_API.G_RET_STS_ERROR;
1205:
1206: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1207: THEN
1200: END IF;
1201: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
1202:
1203: x_return_status := FND_API.G_RET_STS_ERROR;
1204: x_SSC_rec.return_status := FND_API.G_RET_STS_ERROR;
1205:
1206: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1207: THEN
1208:
1211:
1212: END IF;
1213: WHEN OTHERS THEN
1214:
1215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1216: x_SSC_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1217:
1218: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1219: THEN
1212: END IF;
1213: WHEN OTHERS THEN
1214:
1215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1216: x_SSC_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1217:
1218: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1219: THEN
1220: OE_MSG_PUB.Add_Exc_Msg
1236: l_SSC_val_rec QP_Attr_Map_PUB.Ssc_Val_Rec_Type;
1237: BEGIN
1238:
1239: IF p_SSC_rec.enabled_flag IS NOT NULL AND
1240: p_SSC_rec.enabled_flag <> FND_API.G_MISS_CHAR AND
1241: NOT QP_GLOBALS.Equal(p_SSC_rec.enabled_flag,
1242: p_old_SSC_rec.enabled_flag)
1243: THEN
1244: l_SSC_val_rec.enabled := QP_Id_To_Value.Enabled
1246: );
1247: END IF;
1248:
1249: IF p_SSC_rec.pte_code IS NOT NULL AND
1250: p_SSC_rec.pte_code <> FND_API.G_MISS_CHAR AND
1251: NOT QP_GLOBALS.Equal(p_SSC_rec.pte_code,
1252: p_old_SSC_rec.pte_code)
1253: THEN
1254: l_SSC_val_rec.pte := QP_Id_To_Value.Pte
1256: );
1257: END IF;
1258:
1259: IF p_SSC_rec.pte_source_system_id IS NOT NULL AND
1260: p_SSC_rec.pte_source_system_id <> FND_API.G_MISS_NUM AND
1261: NOT QP_GLOBALS.Equal(p_SSC_rec.pte_source_system_id,
1262: p_old_SSC_rec.pte_source_system_id)
1263: THEN
1264: l_SSC_val_rec.pte_source_system := QP_Id_To_Value.Pte_Source_System
1281: BEGIN
1282:
1283: -- initialize return_status.
1284:
1285: l_SSC_rec.return_status := FND_API.G_RET_STS_SUCCESS;
1286:
1287: -- initialize l_SSC_rec.
1288:
1289: l_SSC_rec := p_SSC_rec;
1287: -- initialize l_SSC_rec.
1288:
1289: l_SSC_rec := p_SSC_rec;
1290:
1291: IF p_SSC_val_rec.enabled <> FND_API.G_MISS_CHAR
1292: THEN
1293:
1294: IF p_SSC_rec.enabled_flag <> FND_API.G_MISS_CHAR THEN
1295:
1290:
1291: IF p_SSC_val_rec.enabled <> FND_API.G_MISS_CHAR
1292: THEN
1293:
1294: IF p_SSC_rec.enabled_flag <> FND_API.G_MISS_CHAR THEN
1295:
1296: l_SSC_rec.enabled_flag := p_SSC_rec.enabled_flag;
1297:
1298: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_SUCCESS)
1309: l_SSC_rec.enabled_flag := QP_Value_To_Id.enabled
1310: ( p_enabled => p_SSC_val_rec.enabled
1311: );
1312:
1313: IF l_SSC_rec.enabled_flag = FND_API.G_MISS_CHAR THEN
1314: l_SSC_rec.return_status := FND_API.G_RET_STS_ERROR;
1315: END IF;
1316:
1317: END IF;
1310: ( p_enabled => p_SSC_val_rec.enabled
1311: );
1312:
1313: IF l_SSC_rec.enabled_flag = FND_API.G_MISS_CHAR THEN
1314: l_SSC_rec.return_status := FND_API.G_RET_STS_ERROR;
1315: END IF;
1316:
1317: END IF;
1318:
1317: END IF;
1318:
1319: END IF;
1320:
1321: IF p_SSC_val_rec.pte <> FND_API.G_MISS_CHAR
1322: THEN
1323:
1324: IF p_SSC_rec.pte_code <> FND_API.G_MISS_CHAR THEN
1325:
1320:
1321: IF p_SSC_val_rec.pte <> FND_API.G_MISS_CHAR
1322: THEN
1323:
1324: IF p_SSC_rec.pte_code <> FND_API.G_MISS_CHAR THEN
1325:
1326: l_SSC_rec.pte_code := p_SSC_rec.pte_code;
1327:
1328: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_SUCCESS)
1339: l_SSC_rec.pte_code := QP_Value_To_Id.pte
1340: ( p_pte => p_SSC_val_rec.pte
1341: );
1342:
1343: IF l_SSC_rec.pte_code = FND_API.G_MISS_CHAR THEN
1344: l_SSC_rec.return_status := FND_API.G_RET_STS_ERROR;
1345: END IF;
1346:
1347: END IF;
1340: ( p_pte => p_SSC_val_rec.pte
1341: );
1342:
1343: IF l_SSC_rec.pte_code = FND_API.G_MISS_CHAR THEN
1344: l_SSC_rec.return_status := FND_API.G_RET_STS_ERROR;
1345: END IF;
1346:
1347: END IF;
1348:
1347: END IF;
1348:
1349: END IF;
1350:
1351: IF p_SSC_val_rec.pte_source_system <> FND_API.G_MISS_CHAR
1352: THEN
1353:
1354: IF p_SSC_rec.pte_source_system_id <> FND_API.G_MISS_NUM THEN
1355:
1350:
1351: IF p_SSC_val_rec.pte_source_system <> FND_API.G_MISS_CHAR
1352: THEN
1353:
1354: IF p_SSC_rec.pte_source_system_id <> FND_API.G_MISS_NUM THEN
1355:
1356: l_SSC_rec.pte_source_system_id := p_SSC_rec.pte_source_system_id;
1357:
1358: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_SUCCESS)
1369: l_SSC_rec.pte_source_system_id := QP_Value_To_Id.pte_source_system
1370: ( p_pte_source_system => p_SSC_val_rec.pte_source_system
1371: );
1372:
1373: IF l_SSC_rec.pte_source_system_id = FND_API.G_MISS_NUM THEN
1374: l_SSC_rec.return_status := FND_API.G_RET_STS_ERROR;
1375: END IF;
1376:
1377: END IF;
1370: ( p_pte_source_system => p_SSC_val_rec.pte_source_system
1371: );
1372:
1373: IF l_SSC_rec.pte_source_system_id = FND_API.G_MISS_NUM THEN
1374: l_SSC_rec.return_status := FND_API.G_RET_STS_ERROR;
1375: END IF;
1376:
1377: END IF;
1378: