536: IF (p_genealogy_type = 5) THEN
537: IF (l_debug = 1) THEN mydebug(' Start of EAM Validations'); END IF;
538: -- validate that the parent and child are different objects
539: IF l_object_id = l_parent_object_id THEN
540: fnd_message.set_name('INV', 'INV_EAM_GENEALOGY_SAME_CH_PAR');
541: fnd_msg_pub.ADD;
542: RAISE lg_exc_error;
543: END IF;
544:
563: END IF;
564:
565: -- validate that the start date is not null
566: IF p_start_date_active IS NULL THEN
567: fnd_message.set_name('INV', 'INV_EAM_GEN_NULL_START_DATE');
568: fnd_msg_pub.ADD;
569: RAISE lg_exc_error;
570: END IF;
571:
571:
572: -- validate that the end date, if not null, is greater than the start date
573: IF p_end_date_active IS NOT NULL THEN
574: IF p_start_date_active > p_end_date_active THEN
575: fnd_message.set_name('INV', 'INV_EAM_START_END_DATE_INVALID');
576: fnd_message.set_token('ENTITY1', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
577: fnd_message.set_token('ENTITY2', TO_CHAR(p_end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
578: fnd_msg_pub.ADD;
579: RAISE lg_exc_error;
572: -- validate that the end date, if not null, is greater than the start date
573: IF p_end_date_active IS NOT NULL THEN
574: IF p_start_date_active > p_end_date_active THEN
575: fnd_message.set_name('INV', 'INV_EAM_START_END_DATE_INVALID');
576: fnd_message.set_token('ENTITY1', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
577: fnd_message.set_token('ENTITY2', TO_CHAR(p_end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
578: fnd_msg_pub.ADD;
579: RAISE lg_exc_error;
580: END IF;
573: IF p_end_date_active IS NOT NULL THEN
574: IF p_start_date_active > p_end_date_active THEN
575: fnd_message.set_name('INV', 'INV_EAM_START_END_DATE_INVALID');
576: fnd_message.set_token('ENTITY1', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
577: fnd_message.set_token('ENTITY2', TO_CHAR(p_end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
578: fnd_msg_pub.ADD;
579: RAISE lg_exc_error;
580: END IF;
581: END IF;
600: WHERE msi.inventory_item_id = l_parent_inventory_item_id
601: AND msi.organization_id = l_parent_org_id;
602:
603: IF l_parent_item_type IS NULL THEN
604: fnd_message.set_name('INV', 'INV_EAM_PARENT_ITEM_TYPE');
605: fnd_msg_pub.ADD;
606: RAISE lg_exc_error;
607: END IF;
608:
621: WHERE msi.inventory_item_id = l_inventory_item_id
622: AND msi.organization_id = l_org_id;
623:
624: IF l_child_item_type IS NULL THEN
625: fnd_message.set_name('INV', 'INV_EAM_CHILD_ITEM_TYPE');
626: fnd_msg_pub.ADD;
627: RAISE lg_exc_error;
628: END IF;
629:
632: -- rebuildables cannot be parents of assets
633: IF ((l_parent_item_type = 3)
634: AND (l_child_item_type = 1)
635: ) THEN
636: fnd_message.set_name('INV', 'INV_EAM_ASSET_REBUILD_PARENT');
637: fnd_msg_pub.ADD;
638: RAISE lg_exc_error;
639: END IF;
640:
646: -- If origin transaction id is null then genealogy origin
647: -- should show that it was a manual entry
648: IF p_origin_txn_id IS NULL THEN
649: IF p_genealogy_origin <> 3 THEN
650: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
651: fnd_message.set_token('ENTITY1', 'p_genealogy_origin');
652: fnd_msg_pub.ADD;
653: RAISE lg_exc_error;
654: END IF;
647: -- should show that it was a manual entry
648: IF p_origin_txn_id IS NULL THEN
649: IF p_genealogy_origin <> 3 THEN
650: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
651: fnd_message.set_token('ENTITY1', 'p_genealogy_origin');
652: fnd_msg_pub.ADD;
653: RAISE lg_exc_error;
654: END IF;
655: END IF;
701: and last_vld_organization_id = l_parent_org_id;
702:
703: end;
704:
705: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP');
706: fnd_message.set_token('ENTITY1', l_instance_number);
707: fnd_message.set_token('ENTITY2', l_parent_instance_number);
708: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
709: fnd_message.set_token('ENTITY4', TO_CHAR(i.end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
702:
703: end;
704:
705: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP');
706: fnd_message.set_token('ENTITY1', l_instance_number);
707: fnd_message.set_token('ENTITY2', l_parent_instance_number);
708: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
709: fnd_message.set_token('ENTITY4', TO_CHAR(i.end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
710: fnd_message.set_token('ENTITY5', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
703: end;
704:
705: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP');
706: fnd_message.set_token('ENTITY1', l_instance_number);
707: fnd_message.set_token('ENTITY2', l_parent_instance_number);
708: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
709: fnd_message.set_token('ENTITY4', TO_CHAR(i.end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
710: fnd_message.set_token('ENTITY5', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
711: fnd_message.set_token('ENTITY6', TO_CHAR(p_end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
704:
705: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP');
706: fnd_message.set_token('ENTITY1', l_instance_number);
707: fnd_message.set_token('ENTITY2', l_parent_instance_number);
708: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
709: fnd_message.set_token('ENTITY4', TO_CHAR(i.end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
710: fnd_message.set_token('ENTITY5', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
711: fnd_message.set_token('ENTITY6', TO_CHAR(p_end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
712: fnd_msg_pub.ADD;
705: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP');
706: fnd_message.set_token('ENTITY1', l_instance_number);
707: fnd_message.set_token('ENTITY2', l_parent_instance_number);
708: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
709: fnd_message.set_token('ENTITY4', TO_CHAR(i.end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
710: fnd_message.set_token('ENTITY5', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
711: fnd_message.set_token('ENTITY6', TO_CHAR(p_end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
712: fnd_msg_pub.ADD;
713: RAISE lg_exc_error;
706: fnd_message.set_token('ENTITY1', l_instance_number);
707: fnd_message.set_token('ENTITY2', l_parent_instance_number);
708: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
709: fnd_message.set_token('ENTITY4', TO_CHAR(i.end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
710: fnd_message.set_token('ENTITY5', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
711: fnd_message.set_token('ENTITY6', TO_CHAR(p_end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
712: fnd_msg_pub.ADD;
713: RAISE lg_exc_error;
714: END IF;
707: fnd_message.set_token('ENTITY2', l_parent_instance_number);
708: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
709: fnd_message.set_token('ENTITY4', TO_CHAR(i.end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
710: fnd_message.set_token('ENTITY5', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
711: fnd_message.set_token('ENTITY6', TO_CHAR(p_end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
712: fnd_msg_pub.ADD;
713: RAISE lg_exc_error;
714: END IF;
715: ELSE
729: and last_vld_organization_id = l_parent_org_id;
730:
731: end;
732:
733: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP2');
734: fnd_message.set_token('ENTITY1', l_instance_number);
735: fnd_message.set_token('ENTITY2', l_parent_instance_number);
736: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
737: fnd_message.set_token('ENTITY4', TO_CHAR(i.end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
730:
731: end;
732:
733: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP2');
734: fnd_message.set_token('ENTITY1', l_instance_number);
735: fnd_message.set_token('ENTITY2', l_parent_instance_number);
736: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
737: fnd_message.set_token('ENTITY4', TO_CHAR(i.end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
738: fnd_message.set_token('ENTITY5', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
731: end;
732:
733: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP2');
734: fnd_message.set_token('ENTITY1', l_instance_number);
735: fnd_message.set_token('ENTITY2', l_parent_instance_number);
736: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
737: fnd_message.set_token('ENTITY4', TO_CHAR(i.end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
738: fnd_message.set_token('ENTITY5', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
739: fnd_msg_pub.ADD;
732:
733: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP2');
734: fnd_message.set_token('ENTITY1', l_instance_number);
735: fnd_message.set_token('ENTITY2', l_parent_instance_number);
736: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
737: fnd_message.set_token('ENTITY4', TO_CHAR(i.end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
738: fnd_message.set_token('ENTITY5', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
739: fnd_msg_pub.ADD;
740: RAISE lg_exc_error;
733: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP2');
734: fnd_message.set_token('ENTITY1', l_instance_number);
735: fnd_message.set_token('ENTITY2', l_parent_instance_number);
736: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
737: fnd_message.set_token('ENTITY4', TO_CHAR(i.end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
738: fnd_message.set_token('ENTITY5', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
739: fnd_msg_pub.ADD;
740: RAISE lg_exc_error;
741: END IF;
734: fnd_message.set_token('ENTITY1', l_instance_number);
735: fnd_message.set_token('ENTITY2', l_parent_instance_number);
736: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
737: fnd_message.set_token('ENTITY4', TO_CHAR(i.end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
738: fnd_message.set_token('ENTITY5', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
739: fnd_msg_pub.ADD;
740: RAISE lg_exc_error;
741: END IF;
742: END IF;
757: and last_vld_organization_id = l_parent_org_id;
758:
759: end;
760:
761: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP3');
762: fnd_message.set_token('ENTITY1', l_instance_number);
763: fnd_message.set_token('ENTITY2', l_parent_instance_number);
764: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
765: fnd_message.set_token('ENTITY4', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
758:
759: end;
760:
761: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP3');
762: fnd_message.set_token('ENTITY1', l_instance_number);
763: fnd_message.set_token('ENTITY2', l_parent_instance_number);
764: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
765: fnd_message.set_token('ENTITY4', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
766: fnd_msg_pub.ADD;
759: end;
760:
761: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP3');
762: fnd_message.set_token('ENTITY1', l_instance_number);
763: fnd_message.set_token('ENTITY2', l_parent_instance_number);
764: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
765: fnd_message.set_token('ENTITY4', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
766: fnd_msg_pub.ADD;
767: RAISE lg_exc_error;
760:
761: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP3');
762: fnd_message.set_token('ENTITY1', l_instance_number);
763: fnd_message.set_token('ENTITY2', l_parent_instance_number);
764: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
765: fnd_message.set_token('ENTITY4', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
766: fnd_msg_pub.ADD;
767: RAISE lg_exc_error;
768: ELSIF (p_start_date_active >= i.start_date_active)
761: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP3');
762: fnd_message.set_token('ENTITY1', l_instance_number);
763: fnd_message.set_token('ENTITY2', l_parent_instance_number);
764: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
765: fnd_message.set_token('ENTITY4', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
766: fnd_msg_pub.ADD;
767: RAISE lg_exc_error;
768: ELSIF (p_start_date_active >= i.start_date_active)
769: OR (p_end_date_active >= i.start_date_active) THEN
782: and last_vld_organization_id = l_parent_org_id;
783:
784: end;
785:
786: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP1');
787: fnd_message.set_token('ENTITY1', l_instance_number);
788: fnd_message.set_token('ENTITY2', l_parent_instance_number);
789: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
790: fnd_message.set_token('ENTITY4', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
783:
784: end;
785:
786: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP1');
787: fnd_message.set_token('ENTITY1', l_instance_number);
788: fnd_message.set_token('ENTITY2', l_parent_instance_number);
789: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
790: fnd_message.set_token('ENTITY4', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
791: fnd_message.set_token('ENTITY5', TO_CHAR(p_end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
784: end;
785:
786: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP1');
787: fnd_message.set_token('ENTITY1', l_instance_number);
788: fnd_message.set_token('ENTITY2', l_parent_instance_number);
789: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
790: fnd_message.set_token('ENTITY4', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
791: fnd_message.set_token('ENTITY5', TO_CHAR(p_end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
792: fnd_msg_pub.ADD;
785:
786: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP1');
787: fnd_message.set_token('ENTITY1', l_instance_number);
788: fnd_message.set_token('ENTITY2', l_parent_instance_number);
789: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
790: fnd_message.set_token('ENTITY4', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
791: fnd_message.set_token('ENTITY5', TO_CHAR(p_end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
792: fnd_msg_pub.ADD;
793: RAISE lg_exc_error;
786: fnd_message.set_name('INV', 'INV_EAM_DATE_OVERLAP1');
787: fnd_message.set_token('ENTITY1', l_instance_number);
788: fnd_message.set_token('ENTITY2', l_parent_instance_number);
789: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
790: fnd_message.set_token('ENTITY4', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
791: fnd_message.set_token('ENTITY5', TO_CHAR(p_end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
792: fnd_msg_pub.ADD;
793: RAISE lg_exc_error;
794: END IF;
787: fnd_message.set_token('ENTITY1', l_instance_number);
788: fnd_message.set_token('ENTITY2', l_parent_instance_number);
789: fnd_message.set_token('ENTITY3', TO_CHAR(i.start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
790: fnd_message.set_token('ENTITY4', TO_CHAR(p_start_date_active, 'DD-MON-YYYY HH24:MI:SS'));
791: fnd_message.set_token('ENTITY5', TO_CHAR(p_end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
792: fnd_msg_pub.ADD;
793: RAISE lg_exc_error;
794: END IF;
795: END IF;
828: and last_vld_organization_id = l_parent_org_id;
829:
830: end;
831:
832: fnd_message.set_name('INV', 'INV_EAM_GENEALOGY_LOOP');
833: fnd_message.set_token('ENTITY1', l_parent_instance_number);
834: fnd_message.set_token('ENTITY2', l_instance_number);
835: fnd_msg_pub.ADD;
836: RAISE lg_exc_error;
829:
830: end;
831:
832: fnd_message.set_name('INV', 'INV_EAM_GENEALOGY_LOOP');
833: fnd_message.set_token('ENTITY1', l_parent_instance_number);
834: fnd_message.set_token('ENTITY2', l_instance_number);
835: fnd_msg_pub.ADD;
836: RAISE lg_exc_error;
837: END IF;
830: end;
831:
832: fnd_message.set_name('INV', 'INV_EAM_GENEALOGY_LOOP');
833: fnd_message.set_token('ENTITY1', l_parent_instance_number);
834: fnd_message.set_token('ENTITY2', l_instance_number);
835: fnd_msg_pub.ADD;
836: RAISE lg_exc_error;
837: END IF;
838: EXCEPTION
1110:
1111: -- API body
1112: -- Check for the mandatory parameters
1113: IF p_object_type IS NULL THEN
1114: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1115: fnd_message.set_token('ATTRIBUTE', 'p_object_type');
1116: fnd_msg_pub.ADD;
1117: RAISE lg_exc_error;
1118: END IF;
1111: -- API body
1112: -- Check for the mandatory parameters
1113: IF p_object_type IS NULL THEN
1114: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1115: fnd_message.set_token('ATTRIBUTE', 'p_object_type');
1116: fnd_msg_pub.ADD;
1117: RAISE lg_exc_error;
1118: END IF;
1119:
1121: IF p_object_number IS NULL
1122: OR p_inventory_item_id IS NULL
1123: OR p_org_id IS NULL THEN
1124: IF p_object_number IS NULL THEN
1125: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1126: fnd_message.set_token('ATTRIBUTE', 'p_object_number');
1127: fnd_msg_pub.ADD;
1128: END IF;
1129:
1122: OR p_inventory_item_id IS NULL
1123: OR p_org_id IS NULL THEN
1124: IF p_object_number IS NULL THEN
1125: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1126: fnd_message.set_token('ATTRIBUTE', 'p_object_number');
1127: fnd_msg_pub.ADD;
1128: END IF;
1129:
1130: IF p_inventory_item_id IS NULL THEN
1127: fnd_msg_pub.ADD;
1128: END IF;
1129:
1130: IF p_inventory_item_id IS NULL THEN
1131: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1132: fnd_message.set_token('ATTRIBUTE', 'p_inventory_item_id');
1133: fnd_msg_pub.ADD;
1134: END IF;
1135:
1128: END IF;
1129:
1130: IF p_inventory_item_id IS NULL THEN
1131: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1132: fnd_message.set_token('ATTRIBUTE', 'p_inventory_item_id');
1133: fnd_msg_pub.ADD;
1134: END IF;
1135:
1136: IF p_org_id IS NULL THEN
1133: fnd_msg_pub.ADD;
1134: END IF;
1135:
1136: IF p_org_id IS NULL THEN
1137: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1138: fnd_message.set_token('ATTRIBUTE', 'p_org_id');
1139: fnd_msg_pub.ADD;
1140: END IF;
1141:
1134: END IF;
1135:
1136: IF p_org_id IS NULL THEN
1137: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1138: fnd_message.set_token('ATTRIBUTE', 'p_org_id');
1139: fnd_msg_pub.ADD;
1140: END IF;
1141:
1142: RAISE lg_exc_error;
1146: -- Object type can be either 1 (lot number) or 2 (serial Number).
1147: -- If invalid return an error.
1148: IF p_object_type < 1
1149: OR p_object_type > 2 THEN
1150: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1151: fnd_message.set_token('ENTITY1', 'p_object_type');
1152: fnd_msg_pub.ADD;
1153: RAISE lg_exc_error;
1154: END IF;
1147: -- If invalid return an error.
1148: IF p_object_type < 1
1149: OR p_object_type > 2 THEN
1150: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1151: fnd_message.set_token('ENTITY1', 'p_object_type');
1152: fnd_msg_pub.ADD;
1153: RAISE lg_exc_error;
1154: END IF;
1155:
1163: FROM mtl_lot_numbers
1164: WHERE gen_object_id = p_object_id;
1165:
1166: IF l_dummy = 0 THEN
1167: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1168: fnd_message.set_token('ENTITY1', 'p_object_id');
1169: fnd_msg_pub.ADD;
1170: RAISE lg_exc_error;
1171: END IF;
1164: WHERE gen_object_id = p_object_id;
1165:
1166: IF l_dummy = 0 THEN
1167: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1168: fnd_message.set_token('ENTITY1', 'p_object_id');
1169: fnd_msg_pub.ADD;
1170: RAISE lg_exc_error;
1171: END IF;
1172:
1180: AND inventory_item_id = p_inventory_item_id
1181: AND organization_id = p_org_id;
1182: EXCEPTION
1183: WHEN NO_DATA_FOUND THEN
1184: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1185: fnd_message.set_token('ENTITY1', 'p_object_number, p_inventory_item_id and p_org_id combination');
1186: fnd_msg_pub.ADD;
1187: RAISE lg_exc_error;
1188: END;
1181: AND organization_id = p_org_id;
1182: EXCEPTION
1183: WHEN NO_DATA_FOUND THEN
1184: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1185: fnd_message.set_token('ENTITY1', 'p_object_number, p_inventory_item_id and p_org_id combination');
1186: fnd_msg_pub.ADD;
1187: RAISE lg_exc_error;
1188: END;
1189: END IF;
1194: FROM mtl_serial_numbers
1195: WHERE gen_object_id = p_object_id;
1196:
1197: IF l_dummy = 0 THEN
1198: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1199: fnd_message.set_token('ENTITY1', 'p_object_id');
1200: fnd_msg_pub.ADD;
1201: RAISE lg_exc_error;
1202: END IF;
1195: WHERE gen_object_id = p_object_id;
1196:
1197: IF l_dummy = 0 THEN
1198: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1199: fnd_message.set_token('ENTITY1', 'p_object_id');
1200: fnd_msg_pub.ADD;
1201: RAISE lg_exc_error;
1202: END IF;
1203:
1211: AND inventory_item_id = p_inventory_item_id
1212: AND current_organization_id = p_org_id;
1213: EXCEPTION
1214: WHEN NO_DATA_FOUND THEN
1215: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1216: fnd_message.set_token('ENTITY1', 'p_object_number, p_inventory_item_id and p_org_id combination');
1217: fnd_msg_pub.ADD;
1218: RAISE lg_exc_error;
1219: END;
1212: AND current_organization_id = p_org_id;
1213: EXCEPTION
1214: WHEN NO_DATA_FOUND THEN
1215: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1216: fnd_message.set_token('ENTITY1', 'p_object_number, p_inventory_item_id and p_org_id combination');
1217: fnd_msg_pub.ADD;
1218: RAISE lg_exc_error;
1219: END;
1220: END IF;
1227: WHERE lookup_type = 'INV_GENEALOGY_ORIGIN'
1228: AND lookup_code = p_genealogy_origin;
1229:
1230: IF l_dummy = 0 THEN
1231: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1232: fnd_message.set_token('ENTITY1', 'p_genealogy_origin');
1233: fnd_msg_pub.ADD;
1234: RAISE lg_exc_error;
1235: END IF;
1228: AND lookup_code = p_genealogy_origin;
1229:
1230: IF l_dummy = 0 THEN
1231: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1232: fnd_message.set_token('ENTITY1', 'p_genealogy_origin');
1233: fnd_msg_pub.ADD;
1234: RAISE lg_exc_error;
1235: END IF;
1236: END IF;
1243: -- if p_object_type = 2 then p_genealogy_type of 1 is valid
1244: -- otherwise all of the above are valid
1245: IF p_genealogy_type NOT IN (1, 2, 3, 5)
1246: AND p_genealogy_type IS NOT NULL THEN
1247: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1248: fnd_message.set_token('ENTITY1', 'P_genealogy_type');
1249: fnd_msg_pub.ADD;
1250: RAISE lg_exc_error;
1251: END IF;
1244: -- otherwise all of the above are valid
1245: IF p_genealogy_type NOT IN (1, 2, 3, 5)
1246: AND p_genealogy_type IS NOT NULL THEN
1247: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1248: fnd_message.set_token('ENTITY1', 'P_genealogy_type');
1249: fnd_msg_pub.ADD;
1250: RAISE lg_exc_error;
1251: END IF;
1252:
1251: END IF;
1252:
1253: IF p_object_type = 2 THEN
1254: IF p_genealogy_type NOT IN (1, 5) THEN
1255: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1256: fnd_message.set_token('ENTITY1', 'P_genealogy_type');
1257: fnd_msg_pub.ADD;
1258: RAISE lg_exc_error;
1259: END IF;
1252:
1253: IF p_object_type = 2 THEN
1254: IF p_genealogy_type NOT IN (1, 5) THEN
1255: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1256: fnd_message.set_token('ENTITY1', 'P_genealogy_type');
1257: fnd_msg_pub.ADD;
1258: RAISE lg_exc_error;
1259: END IF;
1260: END IF;
1262: -- If EAM object validate whether the object exists in the table
1263: -- If it does, check whether there exists a NULL end date for the last entry of the object
1264: IF p_genealogy_type = 5 THEN
1265: IF p_end_date_active IS NULL THEN
1266: fnd_message.set_name('INV', 'INV_EAM_NULL_END_DATE');
1267: fnd_msg_pub.ADD;
1268: RAISE lg_exc_error;
1269: END IF;
1270:
1285: AND object_id = l_object_id
1286: AND end_date_active IS NULL;
1287:
1288: IF (p_end_date_active < l_dummy_date) THEN
1289: fnd_message.set_name('INV', 'INV_EAM_END_START_DATE_INVALID');
1290: fnd_message.set_token('ENTITY1', TO_CHAR(p_end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
1291: fnd_message.set_token('ENTITY2', TO_CHAR(l_dummy_date, 'DD-MON-YYYY HH24:MI:SS'));
1292: fnd_msg_pub.ADD;
1293: RAISE lg_exc_error;
1286: AND end_date_active IS NULL;
1287:
1288: IF (p_end_date_active < l_dummy_date) THEN
1289: fnd_message.set_name('INV', 'INV_EAM_END_START_DATE_INVALID');
1290: fnd_message.set_token('ENTITY1', TO_CHAR(p_end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
1291: fnd_message.set_token('ENTITY2', TO_CHAR(l_dummy_date, 'DD-MON-YYYY HH24:MI:SS'));
1292: fnd_msg_pub.ADD;
1293: RAISE lg_exc_error;
1294: END IF;
1287:
1288: IF (p_end_date_active < l_dummy_date) THEN
1289: fnd_message.set_name('INV', 'INV_EAM_END_START_DATE_INVALID');
1290: fnd_message.set_token('ENTITY1', TO_CHAR(p_end_date_active, 'DD-MON-YYYY HH24:MI:SS'));
1291: fnd_message.set_token('ENTITY2', TO_CHAR(l_dummy_date, 'DD-MON-YYYY HH24:MI:SS'));
1292: fnd_msg_pub.ADD;
1293: RAISE lg_exc_error;
1294: END IF;
1295: EXCEPTION
1293: RAISE lg_exc_error;
1294: END IF;
1295: EXCEPTION
1296: WHEN NO_DATA_FOUND THEN
1297: fnd_message.set_name('INV', 'INV_EAM_GEN_NOEXIST');
1298: fnd_msg_pub.ADD;
1299: RAISE lg_exc_error;
1300: END;
1301: END IF;
1434: x_msg_count := 0;
1435: x_return_status := lg_ret_sts_success;
1436:
1437: IF p_transaction_source_id IS NULL THEN
1438: fnd_message.set_name('INV', 'INV_MISSING_REQUIRED_PARAMETER');
1439: fnd_msg_pub.ADD;
1440: RAISE lg_exc_error;
1441: END IF;
1442:
1440: RAISE lg_exc_error;
1441: END IF;
1442:
1443: IF p_completion_transaction_id IS NULL THEN
1444: fnd_message.set_name('INV', 'INV_MISSING_REQUIRED_PARAMETER');
1445: fnd_msg_pub.ADD;
1446: RAISE lg_exc_error;
1447: END IF;
1448:
1780: IF p_object_type IS NULL THEN
1781: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: P_object_type'); END IF;
1782:
1783: x_return_status := lg_ret_sts_error; -- R12
1784: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1785: fnd_message.set_token('ATTRIBUTE', 'p_object_type');
1786: fnd_msg_pub.ADD;
1787: END IF;
1788:
1781: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: P_object_type'); END IF;
1782:
1783: x_return_status := lg_ret_sts_error; -- R12
1784: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1785: fnd_message.set_token('ATTRIBUTE', 'p_object_type');
1786: fnd_msg_pub.ADD;
1787: END IF;
1788:
1789: IF p_object_id IS NULL THEN
1792: IF p_object_number IS NULL OR p_inventory_item_id IS NULL OR p_org_id IS NULL THEN
1793: IF p_object_number IS NULL THEN
1794: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_object_number'); END IF;
1795:
1796: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1797: fnd_message.set_token('ATTRIBUTE', 'p_object_number');
1798: fnd_msg_pub.ADD;
1799: END IF;
1800:
1793: IF p_object_number IS NULL THEN
1794: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_object_number'); END IF;
1795:
1796: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1797: fnd_message.set_token('ATTRIBUTE', 'p_object_number');
1798: fnd_msg_pub.ADD;
1799: END IF;
1800:
1801: --R12 IF p_inventory_item_id IS NULL THEN
1803: /* {{ - If object_id is not passed then inventory_item_id is necessary along with
1804: object_number and org_id only if this object is not of type JOB = 5 }} */
1805: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_inventory_item_id'); END IF;
1806:
1807: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1808: fnd_message.set_token('ATTRIBUTE', 'p_inventory_item_id');
1809: fnd_msg_pub.ADD;
1810: END IF;
1811:
1804: object_number and org_id only if this object is not of type JOB = 5 }} */
1805: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_inventory_item_id'); END IF;
1806:
1807: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1808: fnd_message.set_token('ATTRIBUTE', 'p_inventory_item_id');
1809: fnd_msg_pub.ADD;
1810: END IF;
1811:
1812: IF p_org_id IS NULL THEN
1811:
1812: IF p_org_id IS NULL THEN
1813: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_org_id'); END IF;
1814:
1815: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1816: fnd_message.set_token('ATTRIBUTE', 'p_org_id');
1817: fnd_msg_pub.ADD;
1818: END IF;
1819:
1812: IF p_org_id IS NULL THEN
1813: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_org_id'); END IF;
1814:
1815: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1816: fnd_message.set_token('ATTRIBUTE', 'p_org_id');
1817: fnd_msg_pub.ADD;
1818: END IF;
1819:
1820: x_return_status := lg_ret_sts_error; -- R12
1832:
1833: IF p_parent_object_number IS NULL THEN
1834: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_parent_object_number'); END IF;
1835:
1836: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1837: fnd_message.set_token('ATTRIBUTE', 'p_parent_object_number');
1838: fnd_msg_pub.ADD;
1839: END IF;
1840:
1833: IF p_parent_object_number IS NULL THEN
1834: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_parent_object_number'); END IF;
1835:
1836: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1837: fnd_message.set_token('ATTRIBUTE', 'p_parent_object_number');
1838: fnd_msg_pub.ADD;
1839: END IF;
1840:
1841: IF p_parent_object_type <> 5 AND p_parent_inventory_item_id IS NULL THEN
1840:
1841: IF p_parent_object_type <> 5 AND p_parent_inventory_item_id IS NULL THEN
1842: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_parent_inventory_item_id'); END IF;
1843:
1844: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1845: fnd_message.set_token('ATTRIBUTE', 'p_parent_inventory_item_id');
1846: fnd_msg_pub.ADD;
1847: END IF;
1848:
1841: IF p_parent_object_type <> 5 AND p_parent_inventory_item_id IS NULL THEN
1842: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_parent_inventory_item_id'); END IF;
1843:
1844: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1845: fnd_message.set_token('ATTRIBUTE', 'p_parent_inventory_item_id');
1846: fnd_msg_pub.ADD;
1847: END IF;
1848:
1849: IF p_parent_org_id IS NULL THEN
1848:
1849: IF p_parent_org_id IS NULL THEN
1850: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_parent_org_id'); END IF;
1851:
1852: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1853: fnd_message.set_token('ATTRIBUTE', 'p_parent_org_id');
1854: fnd_msg_pub.ADD;
1855: END IF;
1856:
1849: IF p_parent_org_id IS NULL THEN
1850: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_parent_org_id'); END IF;
1851:
1852: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1853: fnd_message.set_token('ATTRIBUTE', 'p_parent_org_id');
1854: fnd_msg_pub.ADD;
1855: END IF;
1856:
1857: x_return_status := lg_ret_sts_error; -- R12
1864: -- If invalid return an error.
1865: IF p_object_type < 1 OR p_object_type > 5 THEN
1866: x_return_status := lg_ret_sts_error; -- R12
1867: IF (p_debug = 1) THEN mydebug('INV_FIELD_INVALID - p_object_type'); END IF;
1868: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1869: fnd_message.set_token('ENTITY1', 'p_object_type');
1870: fnd_msg_pub.ADD;
1871: END IF;
1872:
1865: IF p_object_type < 1 OR p_object_type > 5 THEN
1866: x_return_status := lg_ret_sts_error; -- R12
1867: IF (p_debug = 1) THEN mydebug('INV_FIELD_INVALID - p_object_type'); END IF;
1868: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1869: fnd_message.set_token('ENTITY1', 'p_object_type');
1870: fnd_msg_pub.ADD;
1871: END IF;
1872:
1873: IF (p_parent_object_type < 1 OR p_parent_object_type > 5) THEN
1872:
1873: IF (p_parent_object_type < 1 OR p_parent_object_type > 5) THEN
1874: x_return_status := lg_ret_sts_error; -- R12
1875: IF (p_debug = 1) THEN mydebug('INV_FIELD_INVALID - p_parent_object_type'); END IF;
1876: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1877: fnd_message.set_token('ENTITY1', 'p_parent_object_type');
1878: fnd_msg_pub.ADD;
1879: END IF;
1880:
1873: IF (p_parent_object_type < 1 OR p_parent_object_type > 5) THEN
1874: x_return_status := lg_ret_sts_error; -- R12
1875: IF (p_debug = 1) THEN mydebug('INV_FIELD_INVALID - p_parent_object_type'); END IF;
1876: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1877: fnd_message.set_token('ENTITY1', 'p_parent_object_type');
1878: fnd_msg_pub.ADD;
1879: END IF;
1880:
1881: -- R12 Genealogy Enhancements : Validate second set of object and parent object details
1908: EXCEPTION WHEN NO_DATA_FOUND THEN
1909:
1910: IF (p_debug = 1) THEN mydebug('no data found ...child mtl_serial_numbers '); END IF;
1911: x_return_status := lg_ret_sts_error; -- R12
1912: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1913: fnd_message.set_token('ATTRIBUTE', 'l_inventory_item_id');
1914: fnd_msg_pub.ADD;
1915: END ;
1916:
1909:
1910: IF (p_debug = 1) THEN mydebug('no data found ...child mtl_serial_numbers '); END IF;
1911: x_return_status := lg_ret_sts_error; -- R12
1912: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1913: fnd_message.set_token('ATTRIBUTE', 'l_inventory_item_id');
1914: fnd_msg_pub.ADD;
1915: END ;
1916:
1917: IF (p_debug = 1) THEN mydebug('l_inventory_item_id :' || l_inventory_item_id); END IF;
1949: AND current_Organization_id = p_parent_org_id;
1950: EXCEPTION WHEN NO_DATA_FOUND THEN
1951: x_return_status := lg_ret_sts_error; -- R12
1952: IF (p_debug = 1) THEN mydebug('no data found ...parent mtl_serial_numbers '); END IF;
1953: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1954: fnd_message.set_token('ATTRIBUTE', 'l_parent_inventory_item_id');
1955: fnd_msg_pub.ADD;
1956: END ;
1957: IF (p_debug = 1) THEN mydebug('l_parent_inventory_item_id '|| l_parent_inventory_item_id ); END IF;
1950: EXCEPTION WHEN NO_DATA_FOUND THEN
1951: x_return_status := lg_ret_sts_error; -- R12
1952: IF (p_debug = 1) THEN mydebug('no data found ...parent mtl_serial_numbers '); END IF;
1953: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1954: fnd_message.set_token('ATTRIBUTE', 'l_parent_inventory_item_id');
1955: fnd_msg_pub.ADD;
1956: END ;
1957: IF (p_debug = 1) THEN mydebug('l_parent_inventory_item_id '|| l_parent_inventory_item_id ); END IF;
1958: END IF;
1975:
1976: IF (l_object_type2 IS NOT NULL AND l_object_type2 <> 1) THEN
1977: IF (p_debug = 1) THEN mydebug('{{- p_object_type2 can only be = 1 (lot) }} '); END IF;
1978: x_return_status := lg_ret_sts_error; -- R12
1979: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1980: fnd_message.set_token('ENTITY1', 'l_object_type2');
1981: fnd_msg_pub.ADD;
1982: ELSE
1983: IF (l_object_type2 IS NULL )
1976: IF (l_object_type2 IS NOT NULL AND l_object_type2 <> 1) THEN
1977: IF (p_debug = 1) THEN mydebug('{{- p_object_type2 can only be = 1 (lot) }} '); END IF;
1978: x_return_status := lg_ret_sts_error; -- R12
1979: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
1980: fnd_message.set_token('ENTITY1', 'l_object_type2');
1981: fnd_msg_pub.ADD;
1982: ELSE
1983: IF (l_object_type2 IS NULL )
1984: THEN
1998: ' or p_org_id is NULL'); END IF;
1999: IF p_object_number2 IS NULL THEN
2000: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_object_number2'); END IF;
2001:
2002: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
2003: fnd_message.set_token('ATTRIBUTE', 'p_object_number2');
2004: fnd_msg_pub.ADD;
2005: END IF;
2006: IF p_object_type <> 5 AND p_inventory_item_id IS NULL THEN
1999: IF p_object_number2 IS NULL THEN
2000: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_object_number2'); END IF;
2001:
2002: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
2003: fnd_message.set_token('ATTRIBUTE', 'p_object_number2');
2004: fnd_msg_pub.ADD;
2005: END IF;
2006: IF p_object_type <> 5 AND p_inventory_item_id IS NULL THEN
2007: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_inventory_item_id'); END IF;
2005: END IF;
2006: IF p_object_type <> 5 AND p_inventory_item_id IS NULL THEN
2007: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_inventory_item_id'); END IF;
2008:
2009: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
2010: fnd_message.set_token('ATTRIBUTE', 'p_inventory_item_id');
2011: fnd_msg_pub.ADD;
2012: END IF;
2013:
2006: IF p_object_type <> 5 AND p_inventory_item_id IS NULL THEN
2007: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_inventory_item_id'); END IF;
2008:
2009: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
2010: fnd_message.set_token('ATTRIBUTE', 'p_inventory_item_id');
2011: fnd_msg_pub.ADD;
2012: END IF;
2013:
2014:
2014:
2015: IF p_org_id IS NULL THEN
2016: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_org_id'); END IF;
2017:
2018: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
2019: fnd_message.set_token('ATTRIBUTE', 'p_org_id');
2020: fnd_msg_pub.ADD;
2021: END IF;
2022:
2015: IF p_org_id IS NULL THEN
2016: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_org_id'); END IF;
2017:
2018: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
2019: fnd_message.set_token('ATTRIBUTE', 'p_org_id');
2020: fnd_msg_pub.ADD;
2021: END IF;
2022:
2023: x_return_status := lg_ret_sts_error; -- R12
2033:
2034: IF l_parent_lot_control_code = 2 THEN
2035: IF (l_parent_object_type2 IS NOT NULL AND l_parent_object_type2 <> 1) THEN
2036: IF (p_debug = 1) THEN mydebug('{{- p_parent_object_type2 can only be = 1 (lot) }} '); END IF;
2037: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2038: fnd_message.set_token('ENTITY1', 'l_parent_object_type2');
2039: fnd_msg_pub.ADD;
2040: RAISE lg_exc_error;
2041: ELSE
2034: IF l_parent_lot_control_code = 2 THEN
2035: IF (l_parent_object_type2 IS NOT NULL AND l_parent_object_type2 <> 1) THEN
2036: IF (p_debug = 1) THEN mydebug('{{- p_parent_object_type2 can only be = 1 (lot) }} '); END IF;
2037: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2038: fnd_message.set_token('ENTITY1', 'l_parent_object_type2');
2039: fnd_msg_pub.ADD;
2040: RAISE lg_exc_error;
2041: ELSE
2042: IF (l_parent_object_type2 IS NULL )
2058: '<> 5 and p_inventory_item_id is NULL- or p_org_id is NUll'); END IF;
2059: IF p_parent_object_number2 IS NULL THEN
2060: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_parent_object_number2'); END IF;
2061:
2062: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
2063: fnd_message.set_token('ATTRIBUTE', 'p_parent_object_number2');
2064: fnd_msg_pub.ADD;
2065: END IF;
2066:
2059: IF p_parent_object_number2 IS NULL THEN
2060: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_parent_object_number2'); END IF;
2061:
2062: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
2063: fnd_message.set_token('ATTRIBUTE', 'p_parent_object_number2');
2064: fnd_msg_pub.ADD;
2065: END IF;
2066:
2067: IF l_parent_object_type2 <> 5 AND p_parent_inventory_item_id IS NULL THEN
2066:
2067: IF l_parent_object_type2 <> 5 AND p_parent_inventory_item_id IS NULL THEN
2068: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_parent_inventory_item_id'); END IF;
2069:
2070: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
2071: fnd_message.set_token('ATTRIBUTE', 'p_parent_inventory_item_id');
2072: fnd_msg_pub.ADD;
2073: END IF;
2074:
2067: IF l_parent_object_type2 <> 5 AND p_parent_inventory_item_id IS NULL THEN
2068: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_parent_inventory_item_id'); END IF;
2069:
2070: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
2071: fnd_message.set_token('ATTRIBUTE', 'p_parent_inventory_item_id');
2072: fnd_msg_pub.ADD;
2073: END IF;
2074:
2075: IF p_parent_org_id IS NULL THEN
2074:
2075: IF p_parent_org_id IS NULL THEN
2076: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_parent_org_id'); END IF;
2077:
2078: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
2079: fnd_message.set_token('ATTRIBUTE', 'p_parent_org_id');
2080: fnd_msg_pub.ADD;
2081: END IF;
2082:
2075: IF p_parent_org_id IS NULL THEN
2076: IF (p_debug = 1) THEN mydebug('INV_ATTRIBUTE_REQUIRED: p_parent_org_id'); END IF;
2077:
2078: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
2079: fnd_message.set_token('ATTRIBUTE', 'p_parent_org_id');
2080: fnd_msg_pub.ADD;
2081: END IF;
2082:
2083: x_return_status := lg_ret_sts_error; -- R12
2135:
2136: IF l_dummy = 0 THEN
2137: x_return_status := lg_ret_sts_error; -- R12
2138: IF (p_debug = 1) THEN mydebug('lot not found using - p_object_id'); END IF;
2139: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2140: fnd_message.set_token('ENTITY1', l_invalid_field_msg);
2141: fnd_msg_pub.ADD;
2142: --RAISE lg_exc_error;
2143: END IF;
2136: IF l_dummy = 0 THEN
2137: x_return_status := lg_ret_sts_error; -- R12
2138: IF (p_debug = 1) THEN mydebug('lot not found using - p_object_id'); END IF;
2139: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2140: fnd_message.set_token('ENTITY1', l_invalid_field_msg);
2141: fnd_msg_pub.ADD;
2142: --RAISE lg_exc_error;
2143: END IF;
2144: END IF;
2160: EXCEPTION
2161: WHEN NO_DATA_FOUND THEN
2162: x_return_status := lg_ret_sts_error; -- R12
2163: IF (p_debug = 1) THEN mydebug('lot not found using - p_object_number,'); END IF;
2164: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2165: fnd_message.set_token('ENTITY1', l_invalid_comb_msg);
2166: fnd_msg_pub.ADD;
2167: --RAISE lg_exc_error;
2168: END;
2161: WHEN NO_DATA_FOUND THEN
2162: x_return_status := lg_ret_sts_error; -- R12
2163: IF (p_debug = 1) THEN mydebug('lot not found using - p_object_number,'); END IF;
2164: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2165: fnd_message.set_token('ENTITY1', l_invalid_comb_msg);
2166: fnd_msg_pub.ADD;
2167: --RAISE lg_exc_error;
2168: END;
2169: END IF;
2177:
2178: IF l_dummy = 0 THEN
2179: x_return_status := lg_ret_sts_error; -- R12
2180: IF (p_debug = 1) THEN mydebug('Serial not found using - p_object_id,'); END IF;
2181: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2182: fnd_message.set_token('ENTITY1', l_invalid_field_msg);
2183: fnd_msg_pub.ADD;
2184: -- RAISE lg_exc_error;
2185: END IF;
2178: IF l_dummy = 0 THEN
2179: x_return_status := lg_ret_sts_error; -- R12
2180: IF (p_debug = 1) THEN mydebug('Serial not found using - p_object_id,'); END IF;
2181: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2182: fnd_message.set_token('ENTITY1', l_invalid_field_msg);
2183: fnd_msg_pub.ADD;
2184: -- RAISE lg_exc_error;
2185: END IF;
2186: END IF;
2202: EXCEPTION
2203: WHEN NO_DATA_FOUND THEN
2204: x_return_status := lg_ret_sts_error; -- R12
2205: IF (p_debug = 1) THEN mydebug('Serial not found using - p_object_number,'); END IF;
2206: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2207: fnd_message.set_token('ENTITY1', l_invalid_comb_msg);
2208: fnd_msg_pub.ADD;
2209: --RAISE lg_exc_error;
2210: END;
2203: WHEN NO_DATA_FOUND THEN
2204: x_return_status := lg_ret_sts_error; -- R12
2205: IF (p_debug = 1) THEN mydebug('Serial not found using - p_object_number,'); END IF;
2206: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2207: fnd_message.set_token('ENTITY1', l_invalid_comb_msg);
2208: fnd_msg_pub.ADD;
2209: --RAISE lg_exc_error;
2210: END;
2211: END IF;
2218:
2219: IF l_dummy = 0 THEN
2220: x_return_status := lg_ret_sts_error; -- R12
2221: IF (p_debug = 1) THEN mydebug('Job not found using - p_object_id,'); END IF;
2222: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2223: fnd_message.set_token('ENTITY1', l_invalid_field_msg);
2224: fnd_msg_pub.ADD;
2225: --RAISE lg_exc_error;
2226: END IF;
2219: IF l_dummy = 0 THEN
2220: x_return_status := lg_ret_sts_error; -- R12
2221: IF (p_debug = 1) THEN mydebug('Job not found using - p_object_id,'); END IF;
2222: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2223: fnd_message.set_token('ENTITY1', l_invalid_field_msg);
2224: fnd_msg_pub.ADD;
2225: --RAISE lg_exc_error;
2226: END IF;
2227:
2241: EXCEPTION
2242: WHEN NO_DATA_FOUND THEN
2243: x_return_status := lg_ret_sts_error; -- R12
2244: IF (p_debug = 1) THEN mydebug('Job not found using - p_object_number,'); END IF;
2245: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2246: fnd_message.set_token('ENTITY1', l_invalid_comb_msg);
2247: fnd_msg_pub.ADD;
2248: --RAISE lg_exc_error;
2249: END;
2242: WHEN NO_DATA_FOUND THEN
2243: x_return_status := lg_ret_sts_error; -- R12
2244: IF (p_debug = 1) THEN mydebug('Job not found using - p_object_number,'); END IF;
2245: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2246: fnd_message.set_token('ENTITY1', l_invalid_comb_msg);
2247: fnd_msg_pub.ADD;
2248: --RAISE lg_exc_error;
2249: END;
2250: END IF;
2271:
2272: IF l_dummy = 0 THEN
2273: x_return_status := lg_ret_sts_error; -- R12
2274: IF (p_debug = 1) THEN mydebug('Lot not found using - p_parent_object_id,'); END IF;
2275: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2276: fnd_message.set_token('ENTITY1', l_invalid_field_msg);
2277: fnd_msg_pub.ADD;
2278: --RAISE lg_exc_error;
2279: END IF;
2272: IF l_dummy = 0 THEN
2273: x_return_status := lg_ret_sts_error; -- R12
2274: IF (p_debug = 1) THEN mydebug('Lot not found using - p_parent_object_id,'); END IF;
2275: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2276: fnd_message.set_token('ENTITY1', l_invalid_field_msg);
2277: fnd_msg_pub.ADD;
2278: --RAISE lg_exc_error;
2279: END IF;
2280: END IF;
2294: IF (p_debug = 1) THEN mydebug('1: l_parent_object_id: ' || l_parent_object_id); END IF;
2295:
2296: EXCEPTION
2297: WHEN NO_DATA_FOUND THEN
2298: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2299: x_return_status := lg_ret_sts_error; -- R12
2300: IF (p_debug = 1) THEN mydebug('Lot not found using - p_parent_object_number,'); END IF;
2301: fnd_message.set_token('ENTITY1', l_invalid_comb_msg);
2302: fnd_msg_pub.ADD;
2297: WHEN NO_DATA_FOUND THEN
2298: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2299: x_return_status := lg_ret_sts_error; -- R12
2300: IF (p_debug = 1) THEN mydebug('Lot not found using - p_parent_object_number,'); END IF;
2301: fnd_message.set_token('ENTITY1', l_invalid_comb_msg);
2302: fnd_msg_pub.ADD;
2303: --RAISE lg_exc_error;
2304: END;
2305: END IF;
2316:
2317: IF l_dummy = 0 THEN
2318: x_return_status := lg_ret_sts_error; -- R12
2319: IF (p_debug = 1) THEN mydebug('Serial not found using - p_parent_object_id,'); END IF;
2320: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2321: fnd_message.set_token('ENTITY1', l_invalid_field_msg);
2322: fnd_msg_pub.ADD;
2323: --RAISE lg_exc_error;
2324: END IF;
2317: IF l_dummy = 0 THEN
2318: x_return_status := lg_ret_sts_error; -- R12
2319: IF (p_debug = 1) THEN mydebug('Serial not found using - p_parent_object_id,'); END IF;
2320: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2321: fnd_message.set_token('ENTITY1', l_invalid_field_msg);
2322: fnd_msg_pub.ADD;
2323: --RAISE lg_exc_error;
2324: END IF;
2325: END IF;
2341: EXCEPTION
2342: WHEN NO_DATA_FOUND THEN
2343: x_return_status := lg_ret_sts_error; -- R12
2344: IF (p_debug = 1) THEN mydebug('Serial not found using - p_parent_object_number,'); END IF;
2345: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2346: fnd_message.set_token('ENTITY1', l_invalid_comb_msg);
2347: fnd_msg_pub.ADD;
2348: --RAISE lg_exc_error;
2349: END;
2342: WHEN NO_DATA_FOUND THEN
2343: x_return_status := lg_ret_sts_error; -- R12
2344: IF (p_debug = 1) THEN mydebug('Serial not found using - p_parent_object_number,'); END IF;
2345: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2346: fnd_message.set_token('ENTITY1', l_invalid_comb_msg);
2347: fnd_msg_pub.ADD;
2348: --RAISE lg_exc_error;
2349: END;
2350: END IF;
2358:
2359: IF l_dummy = 0 THEN
2360: x_return_status := lg_ret_sts_error; -- R12
2361: IF (p_debug = 1) THEN mydebug('Job not found using - p_parent_object_id,'); END IF;
2362: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2363: fnd_message.set_token('ENTITY1', l_invalid_field_msg);
2364: fnd_msg_pub.ADD;
2365: -- RAISE lg_exc_error;
2366: END IF;
2359: IF l_dummy = 0 THEN
2360: x_return_status := lg_ret_sts_error; -- R12
2361: IF (p_debug = 1) THEN mydebug('Job not found using - p_parent_object_id,'); END IF;
2362: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2363: fnd_message.set_token('ENTITY1', l_invalid_field_msg);
2364: fnd_msg_pub.ADD;
2365: -- RAISE lg_exc_error;
2366: END IF;
2367:
2381: EXCEPTION
2382: WHEN NO_DATA_FOUND THEN
2383: x_return_status := lg_ret_sts_error; -- R12
2384: IF (p_debug = 1) THEN mydebug('Job not found using - p_parent_object_number,'); END IF;
2385: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2386: fnd_message.set_token('ENTITY1', l_invalid_comb_msg);
2387: fnd_msg_pub.ADD;
2388: --RAISE lg_exc_error;
2389: END;
2382: WHEN NO_DATA_FOUND THEN
2383: x_return_status := lg_ret_sts_error; -- R12
2384: IF (p_debug = 1) THEN mydebug('Job not found using - p_parent_object_number,'); END IF;
2385: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2386: fnd_message.set_token('ENTITY1', l_invalid_comb_msg);
2387: fnd_msg_pub.ADD;
2388: --RAISE lg_exc_error;
2389: END;
2390: END IF;
2412:
2413: IF l_dummy = 0 THEN
2414: x_return_status := lg_ret_sts_error; -- R12
2415: IF (p_debug = 1) THEN mydebug('Lot not found using - p_object_id2,'); END IF;
2416: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2417: fnd_message.set_token('ENTITY1', l_invalid_field_msg);
2418: fnd_msg_pub.ADD;
2419: --RAISE lg_exc_error;
2420: END IF;
2413: IF l_dummy = 0 THEN
2414: x_return_status := lg_ret_sts_error; -- R12
2415: IF (p_debug = 1) THEN mydebug('Lot not found using - p_object_id2,'); END IF;
2416: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2417: fnd_message.set_token('ENTITY1', l_invalid_field_msg);
2418: fnd_msg_pub.ADD;
2419: --RAISE lg_exc_error;
2420: END IF;
2421: END IF;
2433: EXCEPTION
2434: WHEN NO_DATA_FOUND THEN
2435: x_return_status := lg_ret_sts_error; -- R12
2436: IF (p_debug = 1) THEN mydebug('Lot not found using - p_object_number2,'); END IF;
2437: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2438: fnd_message.set_token('ENTITY1', l_invalid_comb_msg);
2439: fnd_msg_pub.ADD;
2440: --RAISE lg_exc_error;
2441: END;
2434: WHEN NO_DATA_FOUND THEN
2435: x_return_status := lg_ret_sts_error; -- R12
2436: IF (p_debug = 1) THEN mydebug('Lot not found using - p_object_number2,'); END IF;
2437: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2438: fnd_message.set_token('ENTITY1', l_invalid_comb_msg);
2439: fnd_msg_pub.ADD;
2440: --RAISE lg_exc_error;
2441: END;
2442: ELSE
2465:
2466: IF l_dummy = 0 THEN
2467: x_return_status := lg_ret_sts_error; -- R12
2468: IF (p_debug = 1) THEN mydebug('Lot not found using - p_parent_object_id2,'); END IF;
2469: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2470: fnd_message.set_token('ENTITY1', l_invalid_field_msg);
2471: fnd_msg_pub.ADD;
2472: --RAISE lg_exc_error;
2473: END IF;
2466: IF l_dummy = 0 THEN
2467: x_return_status := lg_ret_sts_error; -- R12
2468: IF (p_debug = 1) THEN mydebug('Lot not found using - p_parent_object_id2,'); END IF;
2469: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2470: fnd_message.set_token('ENTITY1', l_invalid_field_msg);
2471: fnd_msg_pub.ADD;
2472: --RAISE lg_exc_error;
2473: END IF;
2474: END IF;
2485: AND organization_id = p_parent_org_id;
2486: EXCEPTION
2487: WHEN NO_DATA_FOUND THEN
2488: x_return_status := lg_ret_sts_error; -- R12
2489: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2490: fnd_message.set_token('ENTITY1', l_invalid_comb_msg);
2491: fnd_msg_pub.ADD;
2492: IF (p_debug = 1) THEN mydebug('Lot not found using - p_parent_object_number2,'); END IF;
2493: --RAISE lg_exc_error;
2486: EXCEPTION
2487: WHEN NO_DATA_FOUND THEN
2488: x_return_status := lg_ret_sts_error; -- R12
2489: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2490: fnd_message.set_token('ENTITY1', l_invalid_comb_msg);
2491: fnd_msg_pub.ADD;
2492: IF (p_debug = 1) THEN mydebug('Lot not found using - p_parent_object_number2,'); END IF;
2493: --RAISE lg_exc_error;
2494: END;
2515: AND lookup_code = p_genealogy_origin;
2516:
2517: IF l_dummy = 0 THEN
2518: x_return_status := lg_ret_sts_error; -- R12
2519: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2520: fnd_message.set_token('ENTITY1', 'p_genealogy_origin:' || TO_CHAR(p_genealogy_origin));
2521: fnd_msg_pub.ADD;
2522: IF (p_debug = 1) THEN mydebug('Gene. Origin not found in mfg_lookups,'); END IF;
2523: --RAISE lg_exc_error;
2516:
2517: IF l_dummy = 0 THEN
2518: x_return_status := lg_ret_sts_error; -- R12
2519: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2520: fnd_message.set_token('ENTITY1', 'p_genealogy_origin:' || TO_CHAR(p_genealogy_origin));
2521: fnd_msg_pub.ADD;
2522: IF (p_debug = 1) THEN mydebug('Gene. Origin not found in mfg_lookups,'); END IF;
2523: --RAISE lg_exc_error;
2524: END IF;
2537: -- {{- only if p_validation_level is FULL that the input parameters p_genealogy_origin will be validated }}
2538: IF p_genealogy_type NOT IN (1, 2, 3, 4, 5)
2539: AND p_genealogy_type IS NOT NULL THEN
2540: x_return_status := lg_ret_sts_error; -- R12
2541: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2542: fnd_message.set_token('ENTITY1', 'P_genealogy_type');
2543: fnd_msg_pub.ADD;
2544: IF (p_debug = 1) THEN mydebug('Gene. Type is invalid ,'); END IF;
2545: --RAISE lg_exc_error;
2538: IF p_genealogy_type NOT IN (1, 2, 3, 4, 5)
2539: AND p_genealogy_type IS NOT NULL THEN
2540: x_return_status := lg_ret_sts_error; -- R12
2541: fnd_message.set_name('INV', 'INV_FIELD_INVALID');
2542: fnd_message.set_token('ENTITY1', 'P_genealogy_type');
2543: fnd_msg_pub.ADD;
2544: IF (p_debug = 1) THEN mydebug('Gene. Type is invalid ,'); END IF;
2545: --RAISE lg_exc_error;
2546: END IF;
2549: /* {{- Removed this condition for R12 since we will have more genealogy types for object_type = 2(serials) }}
2550:
2551: {{ IF p_object_type = 2 THEN }}
2552: {{ IF p_genealogy_type NOT IN (1, 5) THEN }}
2553: fnd_message.set_name('INV', {{' INV_FIELD_INVALID'}});
2554: fnd_message.set_token('ENTITY1', 'P_genealogy_type');
2555: fnd_msg_pub.ADD;
2556: RAISE lg_exc_error;
2557: END IF;
2550:
2551: {{ IF p_object_type = 2 THEN }}
2552: {{ IF p_genealogy_type NOT IN (1, 5) THEN }}
2553: fnd_message.set_name('INV', {{' INV_FIELD_INVALID'}});
2554: fnd_message.set_token('ENTITY1', 'P_genealogy_type');
2555: fnd_msg_pub.ADD;
2556: RAISE lg_exc_error;
2557: END IF;
2558: END IF; */
2570: END IF;
2571:
2572: IF l_object_id IS NULL OR l_parent_object_id IS NULL THEN
2573: x_return_status := lg_ret_sts_error;
2574: fnd_message.set_name('INV', 'INV_NULLOBJECTID'); -- mrana addmsg
2575: IF l_object_id is NULL THEN
2576: fnd_message.set_token('ENTITY1', 'p_object_number');
2577: ELSIF l_parent_object_id IS NULL THEN
2578: fnd_message.set_token('ENTITY1', 'p_parent_object_number');
2572: IF l_object_id IS NULL OR l_parent_object_id IS NULL THEN
2573: x_return_status := lg_ret_sts_error;
2574: fnd_message.set_name('INV', 'INV_NULLOBJECTID'); -- mrana addmsg
2575: IF l_object_id is NULL THEN
2576: fnd_message.set_token('ENTITY1', 'p_object_number');
2577: ELSIF l_parent_object_id IS NULL THEN
2578: fnd_message.set_token('ENTITY1', 'p_parent_object_number');
2579: END IF;
2580: fnd_msg_pub.ADD;
2574: fnd_message.set_name('INV', 'INV_NULLOBJECTID'); -- mrana addmsg
2575: IF l_object_id is NULL THEN
2576: fnd_message.set_token('ENTITY1', 'p_object_number');
2577: ELSIF l_parent_object_id IS NULL THEN
2578: fnd_message.set_token('ENTITY1', 'p_parent_object_number');
2579: END IF;
2580: fnd_msg_pub.ADD;
2581: IF (p_debug = 1) THEN mydebug('Gene. Type is invalid ,'); END IF;
2582: END IF;