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_trohdr_rec IN inv_move_order_pub.trohdr_rec_type
13: , p_old_trohdr_rec IN inv_move_order_pub.trohdr_rec_type := inv_move_order_pub.g_miss_trohdr_rec
14: , x_trohdr_rec IN OUT NOCOPY inv_move_order_pub.trohdr_rec_type
15: ) IS
23:
24: -- If attr_id is missing compare old and new records and for
25: -- every changed attribute clear its dependent fields.
26:
27: IF p_attr_id = fnd_api.g_miss_num THEN
28: IF NOT inv_globals.equal(p_trohdr_rec.attribute1, p_old_trohdr_rec.attribute1) THEN
29: l_index := l_index + 1;
30: l_src_attr_tbl(l_index) := inv_trohdr_util.g_attribute1;
31: END IF;
497: FUNCTION complete_record(p_trohdr_rec IN inv_move_order_pub.trohdr_rec_type, p_old_trohdr_rec IN inv_move_order_pub.trohdr_rec_type)
498: RETURN inv_move_order_pub.trohdr_rec_type IS
499: l_trohdr_rec inv_move_order_pub.trohdr_rec_type := p_trohdr_rec;
500: BEGIN
501: IF l_trohdr_rec.attribute1 = fnd_api.g_miss_char THEN
502: l_trohdr_rec.attribute1 := p_old_trohdr_rec.attribute1;
503: END IF;
504:
505: IF l_trohdr_rec.attribute10 = fnd_api.g_miss_char THEN
501: IF l_trohdr_rec.attribute1 = fnd_api.g_miss_char THEN
502: l_trohdr_rec.attribute1 := p_old_trohdr_rec.attribute1;
503: END IF;
504:
505: IF l_trohdr_rec.attribute10 = fnd_api.g_miss_char THEN
506: l_trohdr_rec.attribute10 := p_old_trohdr_rec.attribute10;
507: END IF;
508:
509: IF l_trohdr_rec.attribute11 = fnd_api.g_miss_char THEN
505: IF l_trohdr_rec.attribute10 = fnd_api.g_miss_char THEN
506: l_trohdr_rec.attribute10 := p_old_trohdr_rec.attribute10;
507: END IF;
508:
509: IF l_trohdr_rec.attribute11 = fnd_api.g_miss_char THEN
510: l_trohdr_rec.attribute11 := p_old_trohdr_rec.attribute11;
511: END IF;
512:
513: IF l_trohdr_rec.attribute12 = fnd_api.g_miss_char THEN
509: IF l_trohdr_rec.attribute11 = fnd_api.g_miss_char THEN
510: l_trohdr_rec.attribute11 := p_old_trohdr_rec.attribute11;
511: END IF;
512:
513: IF l_trohdr_rec.attribute12 = fnd_api.g_miss_char THEN
514: l_trohdr_rec.attribute12 := p_old_trohdr_rec.attribute12;
515: END IF;
516:
517: IF l_trohdr_rec.attribute13 = fnd_api.g_miss_char THEN
513: IF l_trohdr_rec.attribute12 = fnd_api.g_miss_char THEN
514: l_trohdr_rec.attribute12 := p_old_trohdr_rec.attribute12;
515: END IF;
516:
517: IF l_trohdr_rec.attribute13 = fnd_api.g_miss_char THEN
518: l_trohdr_rec.attribute13 := p_old_trohdr_rec.attribute13;
519: END IF;
520:
521: IF l_trohdr_rec.attribute14 = fnd_api.g_miss_char THEN
517: IF l_trohdr_rec.attribute13 = fnd_api.g_miss_char THEN
518: l_trohdr_rec.attribute13 := p_old_trohdr_rec.attribute13;
519: END IF;
520:
521: IF l_trohdr_rec.attribute14 = fnd_api.g_miss_char THEN
522: l_trohdr_rec.attribute14 := p_old_trohdr_rec.attribute14;
523: END IF;
524:
525: IF l_trohdr_rec.attribute15 = fnd_api.g_miss_char THEN
521: IF l_trohdr_rec.attribute14 = fnd_api.g_miss_char THEN
522: l_trohdr_rec.attribute14 := p_old_trohdr_rec.attribute14;
523: END IF;
524:
525: IF l_trohdr_rec.attribute15 = fnd_api.g_miss_char THEN
526: l_trohdr_rec.attribute15 := p_old_trohdr_rec.attribute15;
527: END IF;
528:
529: IF l_trohdr_rec.attribute2 = fnd_api.g_miss_char THEN
525: IF l_trohdr_rec.attribute15 = fnd_api.g_miss_char THEN
526: l_trohdr_rec.attribute15 := p_old_trohdr_rec.attribute15;
527: END IF;
528:
529: IF l_trohdr_rec.attribute2 = fnd_api.g_miss_char THEN
530: l_trohdr_rec.attribute2 := p_old_trohdr_rec.attribute2;
531: END IF;
532:
533: IF l_trohdr_rec.attribute3 = fnd_api.g_miss_char THEN
529: IF l_trohdr_rec.attribute2 = fnd_api.g_miss_char THEN
530: l_trohdr_rec.attribute2 := p_old_trohdr_rec.attribute2;
531: END IF;
532:
533: IF l_trohdr_rec.attribute3 = fnd_api.g_miss_char THEN
534: l_trohdr_rec.attribute3 := p_old_trohdr_rec.attribute3;
535: END IF;
536:
537: IF l_trohdr_rec.attribute4 = fnd_api.g_miss_char THEN
533: IF l_trohdr_rec.attribute3 = fnd_api.g_miss_char THEN
534: l_trohdr_rec.attribute3 := p_old_trohdr_rec.attribute3;
535: END IF;
536:
537: IF l_trohdr_rec.attribute4 = fnd_api.g_miss_char THEN
538: l_trohdr_rec.attribute4 := p_old_trohdr_rec.attribute4;
539: END IF;
540:
541: IF l_trohdr_rec.attribute5 = fnd_api.g_miss_char THEN
537: IF l_trohdr_rec.attribute4 = fnd_api.g_miss_char THEN
538: l_trohdr_rec.attribute4 := p_old_trohdr_rec.attribute4;
539: END IF;
540:
541: IF l_trohdr_rec.attribute5 = fnd_api.g_miss_char THEN
542: l_trohdr_rec.attribute5 := p_old_trohdr_rec.attribute5;
543: END IF;
544:
545: IF l_trohdr_rec.attribute6 = fnd_api.g_miss_char THEN
541: IF l_trohdr_rec.attribute5 = fnd_api.g_miss_char THEN
542: l_trohdr_rec.attribute5 := p_old_trohdr_rec.attribute5;
543: END IF;
544:
545: IF l_trohdr_rec.attribute6 = fnd_api.g_miss_char THEN
546: l_trohdr_rec.attribute6 := p_old_trohdr_rec.attribute6;
547: END IF;
548:
549: IF l_trohdr_rec.attribute7 = fnd_api.g_miss_char THEN
545: IF l_trohdr_rec.attribute6 = fnd_api.g_miss_char THEN
546: l_trohdr_rec.attribute6 := p_old_trohdr_rec.attribute6;
547: END IF;
548:
549: IF l_trohdr_rec.attribute7 = fnd_api.g_miss_char THEN
550: l_trohdr_rec.attribute7 := p_old_trohdr_rec.attribute7;
551: END IF;
552:
553: IF l_trohdr_rec.attribute8 = fnd_api.g_miss_char THEN
549: IF l_trohdr_rec.attribute7 = fnd_api.g_miss_char THEN
550: l_trohdr_rec.attribute7 := p_old_trohdr_rec.attribute7;
551: END IF;
552:
553: IF l_trohdr_rec.attribute8 = fnd_api.g_miss_char THEN
554: l_trohdr_rec.attribute8 := p_old_trohdr_rec.attribute8;
555: END IF;
556:
557: IF l_trohdr_rec.attribute9 = fnd_api.g_miss_char THEN
553: IF l_trohdr_rec.attribute8 = fnd_api.g_miss_char THEN
554: l_trohdr_rec.attribute8 := p_old_trohdr_rec.attribute8;
555: END IF;
556:
557: IF l_trohdr_rec.attribute9 = fnd_api.g_miss_char THEN
558: l_trohdr_rec.attribute9 := p_old_trohdr_rec.attribute9;
559: END IF;
560:
561: IF l_trohdr_rec.attribute_category = fnd_api.g_miss_char THEN
557: IF l_trohdr_rec.attribute9 = fnd_api.g_miss_char THEN
558: l_trohdr_rec.attribute9 := p_old_trohdr_rec.attribute9;
559: END IF;
560:
561: IF l_trohdr_rec.attribute_category = fnd_api.g_miss_char THEN
562: l_trohdr_rec.attribute_category := p_old_trohdr_rec.attribute_category;
563: END IF;
564:
565: IF l_trohdr_rec.created_by = fnd_api.g_miss_num THEN
561: IF l_trohdr_rec.attribute_category = fnd_api.g_miss_char THEN
562: l_trohdr_rec.attribute_category := p_old_trohdr_rec.attribute_category;
563: END IF;
564:
565: IF l_trohdr_rec.created_by = fnd_api.g_miss_num THEN
566: l_trohdr_rec.created_by := p_old_trohdr_rec.created_by;
567: END IF;
568:
569: IF l_trohdr_rec.creation_date = fnd_api.g_miss_date THEN
565: IF l_trohdr_rec.created_by = fnd_api.g_miss_num THEN
566: l_trohdr_rec.created_by := p_old_trohdr_rec.created_by;
567: END IF;
568:
569: IF l_trohdr_rec.creation_date = fnd_api.g_miss_date THEN
570: l_trohdr_rec.creation_date := p_old_trohdr_rec.creation_date;
571: END IF;
572:
573: IF l_trohdr_rec.date_required = fnd_api.g_miss_date THEN
569: IF l_trohdr_rec.creation_date = fnd_api.g_miss_date THEN
570: l_trohdr_rec.creation_date := p_old_trohdr_rec.creation_date;
571: END IF;
572:
573: IF l_trohdr_rec.date_required = fnd_api.g_miss_date THEN
574: l_trohdr_rec.date_required := p_old_trohdr_rec.date_required;
575: END IF;
576:
577: IF l_trohdr_rec.description = fnd_api.g_miss_char THEN
573: IF l_trohdr_rec.date_required = fnd_api.g_miss_date THEN
574: l_trohdr_rec.date_required := p_old_trohdr_rec.date_required;
575: END IF;
576:
577: IF l_trohdr_rec.description = fnd_api.g_miss_char THEN
578: l_trohdr_rec.description := p_old_trohdr_rec.description;
579: END IF;
580:
581: IF l_trohdr_rec.from_subinventory_code = fnd_api.g_miss_char THEN
577: IF l_trohdr_rec.description = fnd_api.g_miss_char THEN
578: l_trohdr_rec.description := p_old_trohdr_rec.description;
579: END IF;
580:
581: IF l_trohdr_rec.from_subinventory_code = fnd_api.g_miss_char THEN
582: l_trohdr_rec.from_subinventory_code := p_old_trohdr_rec.from_subinventory_code;
583: END IF;
584:
585: IF l_trohdr_rec.header_id = fnd_api.g_miss_num THEN
581: IF l_trohdr_rec.from_subinventory_code = fnd_api.g_miss_char THEN
582: l_trohdr_rec.from_subinventory_code := p_old_trohdr_rec.from_subinventory_code;
583: END IF;
584:
585: IF l_trohdr_rec.header_id = fnd_api.g_miss_num THEN
586: l_trohdr_rec.header_id := p_old_trohdr_rec.header_id;
587: END IF;
588:
589: IF l_trohdr_rec.header_status = fnd_api.g_miss_num THEN
585: IF l_trohdr_rec.header_id = fnd_api.g_miss_num THEN
586: l_trohdr_rec.header_id := p_old_trohdr_rec.header_id;
587: END IF;
588:
589: IF l_trohdr_rec.header_status = fnd_api.g_miss_num THEN
590: l_trohdr_rec.header_status := p_old_trohdr_rec.header_status;
591: END IF;
592:
593: IF l_trohdr_rec.last_updated_by = fnd_api.g_miss_num THEN
589: IF l_trohdr_rec.header_status = fnd_api.g_miss_num THEN
590: l_trohdr_rec.header_status := p_old_trohdr_rec.header_status;
591: END IF;
592:
593: IF l_trohdr_rec.last_updated_by = fnd_api.g_miss_num THEN
594: l_trohdr_rec.last_updated_by := p_old_trohdr_rec.last_updated_by;
595: END IF;
596:
597: IF l_trohdr_rec.last_update_date = fnd_api.g_miss_date THEN
593: IF l_trohdr_rec.last_updated_by = fnd_api.g_miss_num THEN
594: l_trohdr_rec.last_updated_by := p_old_trohdr_rec.last_updated_by;
595: END IF;
596:
597: IF l_trohdr_rec.last_update_date = fnd_api.g_miss_date THEN
598: l_trohdr_rec.last_update_date := p_old_trohdr_rec.last_update_date;
599: END IF;
600:
601: IF l_trohdr_rec.last_update_login = fnd_api.g_miss_num THEN
597: IF l_trohdr_rec.last_update_date = fnd_api.g_miss_date THEN
598: l_trohdr_rec.last_update_date := p_old_trohdr_rec.last_update_date;
599: END IF;
600:
601: IF l_trohdr_rec.last_update_login = fnd_api.g_miss_num THEN
602: l_trohdr_rec.last_update_login := p_old_trohdr_rec.last_update_login;
603: END IF;
604:
605: IF l_trohdr_rec.organization_id = fnd_api.g_miss_num THEN
601: IF l_trohdr_rec.last_update_login = fnd_api.g_miss_num THEN
602: l_trohdr_rec.last_update_login := p_old_trohdr_rec.last_update_login;
603: END IF;
604:
605: IF l_trohdr_rec.organization_id = fnd_api.g_miss_num THEN
606: l_trohdr_rec.organization_id := p_old_trohdr_rec.organization_id;
607: END IF;
608:
609: IF l_trohdr_rec.program_application_id = fnd_api.g_miss_num THEN
605: IF l_trohdr_rec.organization_id = fnd_api.g_miss_num THEN
606: l_trohdr_rec.organization_id := p_old_trohdr_rec.organization_id;
607: END IF;
608:
609: IF l_trohdr_rec.program_application_id = fnd_api.g_miss_num THEN
610: l_trohdr_rec.program_application_id := p_old_trohdr_rec.program_application_id;
611: END IF;
612:
613: IF l_trohdr_rec.program_id = fnd_api.g_miss_num THEN
609: IF l_trohdr_rec.program_application_id = fnd_api.g_miss_num THEN
610: l_trohdr_rec.program_application_id := p_old_trohdr_rec.program_application_id;
611: END IF;
612:
613: IF l_trohdr_rec.program_id = fnd_api.g_miss_num THEN
614: l_trohdr_rec.program_id := p_old_trohdr_rec.program_id;
615: END IF;
616:
617: IF l_trohdr_rec.program_update_date = fnd_api.g_miss_date THEN
613: IF l_trohdr_rec.program_id = fnd_api.g_miss_num THEN
614: l_trohdr_rec.program_id := p_old_trohdr_rec.program_id;
615: END IF;
616:
617: IF l_trohdr_rec.program_update_date = fnd_api.g_miss_date THEN
618: l_trohdr_rec.program_update_date := p_old_trohdr_rec.program_update_date;
619: END IF;
620:
621: IF l_trohdr_rec.request_id = fnd_api.g_miss_num THEN
617: IF l_trohdr_rec.program_update_date = fnd_api.g_miss_date THEN
618: l_trohdr_rec.program_update_date := p_old_trohdr_rec.program_update_date;
619: END IF;
620:
621: IF l_trohdr_rec.request_id = fnd_api.g_miss_num THEN
622: l_trohdr_rec.request_id := p_old_trohdr_rec.request_id;
623: END IF;
624:
625: IF l_trohdr_rec.request_number = fnd_api.g_miss_char THEN
621: IF l_trohdr_rec.request_id = fnd_api.g_miss_num THEN
622: l_trohdr_rec.request_id := p_old_trohdr_rec.request_id;
623: END IF;
624:
625: IF l_trohdr_rec.request_number = fnd_api.g_miss_char THEN
626: l_trohdr_rec.request_number := p_old_trohdr_rec.request_number;
627: END IF;
628:
629: IF l_trohdr_rec.status_date = fnd_api.g_miss_date THEN
625: IF l_trohdr_rec.request_number = fnd_api.g_miss_char THEN
626: l_trohdr_rec.request_number := p_old_trohdr_rec.request_number;
627: END IF;
628:
629: IF l_trohdr_rec.status_date = fnd_api.g_miss_date THEN
630: l_trohdr_rec.status_date := p_old_trohdr_rec.status_date;
631: END IF;
632:
633: IF l_trohdr_rec.to_account_id = fnd_api.g_miss_num THEN
629: IF l_trohdr_rec.status_date = fnd_api.g_miss_date THEN
630: l_trohdr_rec.status_date := p_old_trohdr_rec.status_date;
631: END IF;
632:
633: IF l_trohdr_rec.to_account_id = fnd_api.g_miss_num THEN
634: l_trohdr_rec.to_account_id := p_old_trohdr_rec.to_account_id;
635: END IF;
636:
637: IF l_trohdr_rec.to_subinventory_code = fnd_api.g_miss_char THEN
633: IF l_trohdr_rec.to_account_id = fnd_api.g_miss_num THEN
634: l_trohdr_rec.to_account_id := p_old_trohdr_rec.to_account_id;
635: END IF;
636:
637: IF l_trohdr_rec.to_subinventory_code = fnd_api.g_miss_char THEN
638: l_trohdr_rec.to_subinventory_code := p_old_trohdr_rec.to_subinventory_code;
639: END IF;
640:
641: IF l_trohdr_rec.move_order_type = fnd_api.g_miss_num THEN
637: IF l_trohdr_rec.to_subinventory_code = fnd_api.g_miss_char THEN
638: l_trohdr_rec.to_subinventory_code := p_old_trohdr_rec.to_subinventory_code;
639: END IF;
640:
641: IF l_trohdr_rec.move_order_type = fnd_api.g_miss_num THEN
642: l_trohdr_rec.move_order_type := p_old_trohdr_rec.move_order_type;
643: END IF;
644:
645: IF l_trohdr_rec.transaction_type_id = fnd_api.g_miss_num THEN
641: IF l_trohdr_rec.move_order_type = fnd_api.g_miss_num THEN
642: l_trohdr_rec.move_order_type := p_old_trohdr_rec.move_order_type;
643: END IF;
644:
645: IF l_trohdr_rec.transaction_type_id = fnd_api.g_miss_num THEN
646: l_trohdr_rec.transaction_type_id := p_old_trohdr_rec.transaction_type_id;
647: END IF;
648:
649: IF l_trohdr_rec.ship_to_location_id = fnd_api.g_miss_num THEN
645: IF l_trohdr_rec.transaction_type_id = fnd_api.g_miss_num THEN
646: l_trohdr_rec.transaction_type_id := p_old_trohdr_rec.transaction_type_id;
647: END IF;
648:
649: IF l_trohdr_rec.ship_to_location_id = fnd_api.g_miss_num THEN
650: l_trohdr_rec.ship_to_location_id := p_old_trohdr_rec.ship_to_location_id;
651: END IF;
652:
653: RETURN l_trohdr_rec;
658: FUNCTION convert_miss_to_null(p_trohdr_rec IN inv_move_order_pub.trohdr_rec_type)
659: RETURN inv_move_order_pub.trohdr_rec_type IS
660: l_trohdr_rec inv_move_order_pub.trohdr_rec_type := p_trohdr_rec;
661: BEGIN
662: IF l_trohdr_rec.attribute1 = fnd_api.g_miss_char THEN
663: l_trohdr_rec.attribute1 := NULL;
664: END IF;
665:
666: IF l_trohdr_rec.attribute10 = fnd_api.g_miss_char THEN
662: IF l_trohdr_rec.attribute1 = fnd_api.g_miss_char THEN
663: l_trohdr_rec.attribute1 := NULL;
664: END IF;
665:
666: IF l_trohdr_rec.attribute10 = fnd_api.g_miss_char THEN
667: l_trohdr_rec.attribute10 := NULL;
668: END IF;
669:
670: IF l_trohdr_rec.attribute11 = fnd_api.g_miss_char THEN
666: IF l_trohdr_rec.attribute10 = fnd_api.g_miss_char THEN
667: l_trohdr_rec.attribute10 := NULL;
668: END IF;
669:
670: IF l_trohdr_rec.attribute11 = fnd_api.g_miss_char THEN
671: l_trohdr_rec.attribute11 := NULL;
672: END IF;
673:
674: IF l_trohdr_rec.attribute12 = fnd_api.g_miss_char THEN
670: IF l_trohdr_rec.attribute11 = fnd_api.g_miss_char THEN
671: l_trohdr_rec.attribute11 := NULL;
672: END IF;
673:
674: IF l_trohdr_rec.attribute12 = fnd_api.g_miss_char THEN
675: l_trohdr_rec.attribute12 := NULL;
676: END IF;
677:
678: IF l_trohdr_rec.attribute13 = fnd_api.g_miss_char THEN
674: IF l_trohdr_rec.attribute12 = fnd_api.g_miss_char THEN
675: l_trohdr_rec.attribute12 := NULL;
676: END IF;
677:
678: IF l_trohdr_rec.attribute13 = fnd_api.g_miss_char THEN
679: l_trohdr_rec.attribute13 := NULL;
680: END IF;
681:
682: IF l_trohdr_rec.attribute14 = fnd_api.g_miss_char THEN
678: IF l_trohdr_rec.attribute13 = fnd_api.g_miss_char THEN
679: l_trohdr_rec.attribute13 := NULL;
680: END IF;
681:
682: IF l_trohdr_rec.attribute14 = fnd_api.g_miss_char THEN
683: l_trohdr_rec.attribute14 := NULL;
684: END IF;
685:
686: IF l_trohdr_rec.attribute15 = fnd_api.g_miss_char THEN
682: IF l_trohdr_rec.attribute14 = fnd_api.g_miss_char THEN
683: l_trohdr_rec.attribute14 := NULL;
684: END IF;
685:
686: IF l_trohdr_rec.attribute15 = fnd_api.g_miss_char THEN
687: l_trohdr_rec.attribute15 := NULL;
688: END IF;
689:
690: IF l_trohdr_rec.attribute2 = fnd_api.g_miss_char THEN
686: IF l_trohdr_rec.attribute15 = fnd_api.g_miss_char THEN
687: l_trohdr_rec.attribute15 := NULL;
688: END IF;
689:
690: IF l_trohdr_rec.attribute2 = fnd_api.g_miss_char THEN
691: l_trohdr_rec.attribute2 := NULL;
692: END IF;
693:
694: IF l_trohdr_rec.attribute3 = fnd_api.g_miss_char THEN
690: IF l_trohdr_rec.attribute2 = fnd_api.g_miss_char THEN
691: l_trohdr_rec.attribute2 := NULL;
692: END IF;
693:
694: IF l_trohdr_rec.attribute3 = fnd_api.g_miss_char THEN
695: l_trohdr_rec.attribute3 := NULL;
696: END IF;
697:
698: IF l_trohdr_rec.attribute4 = fnd_api.g_miss_char THEN
694: IF l_trohdr_rec.attribute3 = fnd_api.g_miss_char THEN
695: l_trohdr_rec.attribute3 := NULL;
696: END IF;
697:
698: IF l_trohdr_rec.attribute4 = fnd_api.g_miss_char THEN
699: l_trohdr_rec.attribute4 := NULL;
700: END IF;
701:
702: IF l_trohdr_rec.attribute5 = fnd_api.g_miss_char THEN
698: IF l_trohdr_rec.attribute4 = fnd_api.g_miss_char THEN
699: l_trohdr_rec.attribute4 := NULL;
700: END IF;
701:
702: IF l_trohdr_rec.attribute5 = fnd_api.g_miss_char THEN
703: l_trohdr_rec.attribute5 := NULL;
704: END IF;
705:
706: IF l_trohdr_rec.attribute6 = fnd_api.g_miss_char THEN
702: IF l_trohdr_rec.attribute5 = fnd_api.g_miss_char THEN
703: l_trohdr_rec.attribute5 := NULL;
704: END IF;
705:
706: IF l_trohdr_rec.attribute6 = fnd_api.g_miss_char THEN
707: l_trohdr_rec.attribute6 := NULL;
708: END IF;
709:
710: IF l_trohdr_rec.attribute7 = fnd_api.g_miss_char THEN
706: IF l_trohdr_rec.attribute6 = fnd_api.g_miss_char THEN
707: l_trohdr_rec.attribute6 := NULL;
708: END IF;
709:
710: IF l_trohdr_rec.attribute7 = fnd_api.g_miss_char THEN
711: l_trohdr_rec.attribute7 := NULL;
712: END IF;
713:
714: IF l_trohdr_rec.attribute8 = fnd_api.g_miss_char THEN
710: IF l_trohdr_rec.attribute7 = fnd_api.g_miss_char THEN
711: l_trohdr_rec.attribute7 := NULL;
712: END IF;
713:
714: IF l_trohdr_rec.attribute8 = fnd_api.g_miss_char THEN
715: l_trohdr_rec.attribute8 := NULL;
716: END IF;
717:
718: IF l_trohdr_rec.attribute9 = fnd_api.g_miss_char THEN
714: IF l_trohdr_rec.attribute8 = fnd_api.g_miss_char THEN
715: l_trohdr_rec.attribute8 := NULL;
716: END IF;
717:
718: IF l_trohdr_rec.attribute9 = fnd_api.g_miss_char THEN
719: l_trohdr_rec.attribute9 := NULL;
720: END IF;
721:
722: IF l_trohdr_rec.attribute_category = fnd_api.g_miss_char THEN
718: IF l_trohdr_rec.attribute9 = fnd_api.g_miss_char THEN
719: l_trohdr_rec.attribute9 := NULL;
720: END IF;
721:
722: IF l_trohdr_rec.attribute_category = fnd_api.g_miss_char THEN
723: l_trohdr_rec.attribute_category := NULL;
724: END IF;
725:
726: IF l_trohdr_rec.created_by = fnd_api.g_miss_num THEN
722: IF l_trohdr_rec.attribute_category = fnd_api.g_miss_char THEN
723: l_trohdr_rec.attribute_category := NULL;
724: END IF;
725:
726: IF l_trohdr_rec.created_by = fnd_api.g_miss_num THEN
727: l_trohdr_rec.created_by := NULL;
728: END IF;
729:
730: IF l_trohdr_rec.creation_date = fnd_api.g_miss_date THEN
726: IF l_trohdr_rec.created_by = fnd_api.g_miss_num THEN
727: l_trohdr_rec.created_by := NULL;
728: END IF;
729:
730: IF l_trohdr_rec.creation_date = fnd_api.g_miss_date THEN
731: l_trohdr_rec.creation_date := NULL;
732: END IF;
733:
734: IF l_trohdr_rec.date_required = fnd_api.g_miss_date THEN
730: IF l_trohdr_rec.creation_date = fnd_api.g_miss_date THEN
731: l_trohdr_rec.creation_date := NULL;
732: END IF;
733:
734: IF l_trohdr_rec.date_required = fnd_api.g_miss_date THEN
735: l_trohdr_rec.date_required := NULL;
736: END IF;
737:
738: IF l_trohdr_rec.description = fnd_api.g_miss_char THEN
734: IF l_trohdr_rec.date_required = fnd_api.g_miss_date THEN
735: l_trohdr_rec.date_required := NULL;
736: END IF;
737:
738: IF l_trohdr_rec.description = fnd_api.g_miss_char THEN
739: l_trohdr_rec.description := NULL;
740: END IF;
741:
742: IF l_trohdr_rec.from_subinventory_code = fnd_api.g_miss_char THEN
738: IF l_trohdr_rec.description = fnd_api.g_miss_char THEN
739: l_trohdr_rec.description := NULL;
740: END IF;
741:
742: IF l_trohdr_rec.from_subinventory_code = fnd_api.g_miss_char THEN
743: l_trohdr_rec.from_subinventory_code := NULL;
744: END IF;
745:
746: IF l_trohdr_rec.header_id = fnd_api.g_miss_num THEN
742: IF l_trohdr_rec.from_subinventory_code = fnd_api.g_miss_char THEN
743: l_trohdr_rec.from_subinventory_code := NULL;
744: END IF;
745:
746: IF l_trohdr_rec.header_id = fnd_api.g_miss_num THEN
747: l_trohdr_rec.header_id := NULL;
748: END IF;
749:
750: IF l_trohdr_rec.header_status = fnd_api.g_miss_num THEN
746: IF l_trohdr_rec.header_id = fnd_api.g_miss_num THEN
747: l_trohdr_rec.header_id := NULL;
748: END IF;
749:
750: IF l_trohdr_rec.header_status = fnd_api.g_miss_num THEN
751: l_trohdr_rec.header_status := NULL;
752: END IF;
753:
754: IF l_trohdr_rec.last_updated_by = fnd_api.g_miss_num THEN
750: IF l_trohdr_rec.header_status = fnd_api.g_miss_num THEN
751: l_trohdr_rec.header_status := NULL;
752: END IF;
753:
754: IF l_trohdr_rec.last_updated_by = fnd_api.g_miss_num THEN
755: l_trohdr_rec.last_updated_by := NULL;
756: END IF;
757:
758: IF l_trohdr_rec.last_update_date = fnd_api.g_miss_date THEN
754: IF l_trohdr_rec.last_updated_by = fnd_api.g_miss_num THEN
755: l_trohdr_rec.last_updated_by := NULL;
756: END IF;
757:
758: IF l_trohdr_rec.last_update_date = fnd_api.g_miss_date THEN
759: l_trohdr_rec.last_update_date := NULL;
760: END IF;
761:
762: IF l_trohdr_rec.last_update_login = fnd_api.g_miss_num THEN
758: IF l_trohdr_rec.last_update_date = fnd_api.g_miss_date THEN
759: l_trohdr_rec.last_update_date := NULL;
760: END IF;
761:
762: IF l_trohdr_rec.last_update_login = fnd_api.g_miss_num THEN
763: l_trohdr_rec.last_update_login := NULL;
764: END IF;
765:
766: IF l_trohdr_rec.organization_id = fnd_api.g_miss_num THEN
762: IF l_trohdr_rec.last_update_login = fnd_api.g_miss_num THEN
763: l_trohdr_rec.last_update_login := NULL;
764: END IF;
765:
766: IF l_trohdr_rec.organization_id = fnd_api.g_miss_num THEN
767: l_trohdr_rec.organization_id := NULL;
768: END IF;
769:
770: IF l_trohdr_rec.program_application_id = fnd_api.g_miss_num THEN
766: IF l_trohdr_rec.organization_id = fnd_api.g_miss_num THEN
767: l_trohdr_rec.organization_id := NULL;
768: END IF;
769:
770: IF l_trohdr_rec.program_application_id = fnd_api.g_miss_num THEN
771: l_trohdr_rec.program_application_id := NULL;
772: END IF;
773:
774: IF l_trohdr_rec.program_id = fnd_api.g_miss_num THEN
770: IF l_trohdr_rec.program_application_id = fnd_api.g_miss_num THEN
771: l_trohdr_rec.program_application_id := NULL;
772: END IF;
773:
774: IF l_trohdr_rec.program_id = fnd_api.g_miss_num THEN
775: l_trohdr_rec.program_id := NULL;
776: END IF;
777:
778: IF l_trohdr_rec.program_update_date = fnd_api.g_miss_date THEN
774: IF l_trohdr_rec.program_id = fnd_api.g_miss_num THEN
775: l_trohdr_rec.program_id := NULL;
776: END IF;
777:
778: IF l_trohdr_rec.program_update_date = fnd_api.g_miss_date THEN
779: l_trohdr_rec.program_update_date := NULL;
780: END IF;
781:
782: IF l_trohdr_rec.request_id = fnd_api.g_miss_num THEN
778: IF l_trohdr_rec.program_update_date = fnd_api.g_miss_date THEN
779: l_trohdr_rec.program_update_date := NULL;
780: END IF;
781:
782: IF l_trohdr_rec.request_id = fnd_api.g_miss_num THEN
783: l_trohdr_rec.request_id := NULL;
784: END IF;
785:
786: IF l_trohdr_rec.request_number = fnd_api.g_miss_char THEN
782: IF l_trohdr_rec.request_id = fnd_api.g_miss_num THEN
783: l_trohdr_rec.request_id := NULL;
784: END IF;
785:
786: IF l_trohdr_rec.request_number = fnd_api.g_miss_char THEN
787: l_trohdr_rec.request_number := NULL;
788: END IF;
789:
790: IF l_trohdr_rec.status_date = fnd_api.g_miss_date THEN
786: IF l_trohdr_rec.request_number = fnd_api.g_miss_char THEN
787: l_trohdr_rec.request_number := NULL;
788: END IF;
789:
790: IF l_trohdr_rec.status_date = fnd_api.g_miss_date THEN
791: l_trohdr_rec.status_date := NULL;
792: END IF;
793:
794: IF l_trohdr_rec.to_account_id = fnd_api.g_miss_num THEN
790: IF l_trohdr_rec.status_date = fnd_api.g_miss_date THEN
791: l_trohdr_rec.status_date := NULL;
792: END IF;
793:
794: IF l_trohdr_rec.to_account_id = fnd_api.g_miss_num THEN
795: l_trohdr_rec.to_account_id := NULL;
796: END IF;
797:
798: IF l_trohdr_rec.to_subinventory_code = fnd_api.g_miss_char THEN
794: IF l_trohdr_rec.to_account_id = fnd_api.g_miss_num THEN
795: l_trohdr_rec.to_account_id := NULL;
796: END IF;
797:
798: IF l_trohdr_rec.to_subinventory_code = fnd_api.g_miss_char THEN
799: l_trohdr_rec.to_subinventory_code := NULL;
800: END IF;
801:
802: IF l_trohdr_rec.move_order_type = fnd_api.g_miss_num THEN
798: IF l_trohdr_rec.to_subinventory_code = fnd_api.g_miss_char THEN
799: l_trohdr_rec.to_subinventory_code := NULL;
800: END IF;
801:
802: IF l_trohdr_rec.move_order_type = fnd_api.g_miss_num THEN
803: l_trohdr_rec.move_order_type := NULL;
804: END IF;
805:
806: IF l_trohdr_rec.transaction_type_id = fnd_api.g_miss_num THEN
802: IF l_trohdr_rec.move_order_type = fnd_api.g_miss_num THEN
803: l_trohdr_rec.move_order_type := NULL;
804: END IF;
805:
806: IF l_trohdr_rec.transaction_type_id = fnd_api.g_miss_num THEN
807: l_trohdr_rec.transaction_type_id := NULL;
808: END IF;
809:
810: IF l_trohdr_rec.ship_to_location_id = fnd_api.g_miss_num THEN
806: IF l_trohdr_rec.transaction_type_id = fnd_api.g_miss_num THEN
807: l_trohdr_rec.transaction_type_id := NULL;
808: END IF;
809:
810: IF l_trohdr_rec.ship_to_location_id = fnd_api.g_miss_num THEN
811: l_trohdr_rec.ship_to_location_id := NULL;
812: END IF;
813:
814: RETURN l_trohdr_rec;
819: FUNCTION convert_miss_to_null(p_trohdr_val_rec IN inv_move_order_pub.trohdr_val_rec_type)
820: RETURN inv_move_order_pub.trohdr_val_rec_type IS
821: l_trohdr_val_rec inv_move_order_pub.trohdr_val_rec_type := p_trohdr_val_rec;
822: BEGIN
823: IF l_trohdr_val_rec.from_subinventory = FND_API.g_miss_char THEN
824: l_trohdr_val_rec.from_subinventory := NULL;
825: END IF;
826:
827: IF l_trohdr_val_rec.header = FND_API.g_miss_char THEN
823: IF l_trohdr_val_rec.from_subinventory = FND_API.g_miss_char THEN
824: l_trohdr_val_rec.from_subinventory := NULL;
825: END IF;
826:
827: IF l_trohdr_val_rec.header = FND_API.g_miss_char THEN
828: l_trohdr_val_rec.header := NULL;
829: END IF;
830:
831: IF l_trohdr_val_rec.ORGANIZATION = FND_API.g_miss_char THEN
827: IF l_trohdr_val_rec.header = FND_API.g_miss_char THEN
828: l_trohdr_val_rec.header := NULL;
829: END IF;
830:
831: IF l_trohdr_val_rec.ORGANIZATION = FND_API.g_miss_char THEN
832: l_trohdr_val_rec.ORGANIZATION := NULL;
833: END IF;
834:
835: IF l_trohdr_val_rec.to_account = FND_API.g_miss_char THEN
831: IF l_trohdr_val_rec.ORGANIZATION = FND_API.g_miss_char THEN
832: l_trohdr_val_rec.ORGANIZATION := NULL;
833: END IF;
834:
835: IF l_trohdr_val_rec.to_account = FND_API.g_miss_char THEN
836: l_trohdr_val_rec.to_account := NULL;
837: END IF;
838:
839: IF l_trohdr_val_rec.to_subinventory = FND_API.g_miss_char THEN
835: IF l_trohdr_val_rec.to_account = FND_API.g_miss_char THEN
836: l_trohdr_val_rec.to_account := NULL;
837: END IF;
838:
839: IF l_trohdr_val_rec.to_subinventory = FND_API.g_miss_char THEN
840: l_trohdr_val_rec.to_subinventory := NULL;
841: END IF;
842:
843: IF l_trohdr_val_rec.move_order_type = FND_API.g_miss_char THEN
839: IF l_trohdr_val_rec.to_subinventory = FND_API.g_miss_char THEN
840: l_trohdr_val_rec.to_subinventory := NULL;
841: END IF;
842:
843: IF l_trohdr_val_rec.move_order_type = FND_API.g_miss_char THEN
844: l_trohdr_val_rec.move_order_type := NULL;
845: END IF;
846:
847: IF l_trohdr_val_rec.transaction_type = FND_API.g_miss_char THEN
843: IF l_trohdr_val_rec.move_order_type = FND_API.g_miss_char THEN
844: l_trohdr_val_rec.move_order_type := NULL;
845: END IF;
846:
847: IF l_trohdr_val_rec.transaction_type = FND_API.g_miss_char THEN
848: l_trohdr_val_rec.transaction_type := NULL;
849: END IF;
850:
851: RETURN l_trohdr_val_rec;
900: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
901: fnd_msg_pub.add_exc_msg(g_pkg_name, 'Update_Row');
902: END IF;
903:
904: RAISE fnd_api.g_exc_unexpected_error;
905: END update_row;
906:
907: -- Procedure Insert_Row
908:
996: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
997: fnd_msg_pub.add_exc_msg(g_pkg_name, 'Insert_Row');
998: END IF;
999:
1000: RAISE fnd_api.g_exc_unexpected_error;
1001: END insert_row;
1002:
1003: -- Procedure Delete_Row
1004:
1011: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1012: fnd_msg_pub.add_exc_msg(g_pkg_name, 'Delete_Row');
1013: END IF;
1014:
1015: RAISE fnd_api.g_exc_unexpected_error;
1016: END delete_row;
1017:
1018: -- Procedure Update_Row_Status
1019:
1031: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1032: fnd_msg_pub.add_exc_msg(g_pkg_name, 'Update_Row_Status');
1033: END IF;
1034:
1035: RAISE fnd_api.g_exc_unexpected_error;
1036: END update_row_status;
1037:
1038: -- Function Query_Row
1039:
1128: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1129: fnd_msg_pub.add_exc_msg(g_pkg_name, 'Query_Row');
1130: END IF;
1131:
1132: RAISE fnd_api.g_exc_unexpected_error;
1133: END query_row;
1134:
1135: -- Procedure lock_Row
1136: --
1265:
1266: x_trohdr_rec := l_trohdr_rec;
1267: -- Set return status
1268:
1269: x_return_status := fnd_api.g_ret_sts_success;
1270: x_trohdr_rec.return_status := fnd_api.g_ret_sts_success;
1271: ELSE
1272: -- Row has changed by another user.
1273:
1266: x_trohdr_rec := l_trohdr_rec;
1267: -- Set return status
1268:
1269: x_return_status := fnd_api.g_ret_sts_success;
1270: x_trohdr_rec.return_status := fnd_api.g_ret_sts_success;
1271: ELSE
1272: -- Row has changed by another user.
1273:
1274: x_return_status := fnd_api.g_ret_sts_error;
1270: x_trohdr_rec.return_status := fnd_api.g_ret_sts_success;
1271: ELSE
1272: -- Row has changed by another user.
1273:
1274: x_return_status := fnd_api.g_ret_sts_error;
1275: x_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1276:
1277: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
1278: fnd_message.set_name('INV', 'OE_LOCK_ROW_CHANGED');
1271: ELSE
1272: -- Row has changed by another user.
1273:
1274: x_return_status := fnd_api.g_ret_sts_error;
1275: x_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1276:
1277: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
1278: fnd_message.set_name('INV', 'OE_LOCK_ROW_CHANGED');
1279: fnd_msg_pub.ADD;
1280: END IF;
1281: END IF;
1282: EXCEPTION
1283: WHEN NO_DATA_FOUND THEN
1284: x_return_status := fnd_api.g_ret_sts_error;
1285: x_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1286:
1287: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
1288: fnd_message.set_name('INV', 'OE_LOCK_ROW_DELETED');
1281: END IF;
1282: EXCEPTION
1283: WHEN NO_DATA_FOUND THEN
1284: x_return_status := fnd_api.g_ret_sts_error;
1285: x_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1286:
1287: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
1288: fnd_message.set_name('INV', 'OE_LOCK_ROW_DELETED');
1289: fnd_msg_pub.ADD;
1288: fnd_message.set_name('INV', 'OE_LOCK_ROW_DELETED');
1289: fnd_msg_pub.ADD;
1290: END IF;
1291: WHEN app_exceptions.record_lock_exception THEN
1292: x_return_status := fnd_api.g_ret_sts_error;
1293: x_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1294:
1295: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
1296: fnd_message.set_name('INV', 'OE_LOCK_ROW_ALREADY_LOCKED');
1289: fnd_msg_pub.ADD;
1290: END IF;
1291: WHEN app_exceptions.record_lock_exception THEN
1292: x_return_status := fnd_api.g_ret_sts_error;
1293: x_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1294:
1295: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
1296: fnd_message.set_name('INV', 'OE_LOCK_ROW_ALREADY_LOCKED');
1297: fnd_msg_pub.ADD;
1296: fnd_message.set_name('INV', 'OE_LOCK_ROW_ALREADY_LOCKED');
1297: fnd_msg_pub.ADD;
1298: END IF;
1299: WHEN OTHERS THEN
1300: x_return_status := fnd_api.g_ret_sts_unexp_error;
1301: x_trohdr_rec.return_status := fnd_api.g_ret_sts_unexp_error;
1302:
1303: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1304: fnd_msg_pub.add_exc_msg(g_pkg_name, 'Lock_Row');
1297: fnd_msg_pub.ADD;
1298: END IF;
1299: WHEN OTHERS THEN
1300: x_return_status := fnd_api.g_ret_sts_unexp_error;
1301: x_trohdr_rec.return_status := fnd_api.g_ret_sts_unexp_error;
1302:
1303: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
1304: fnd_msg_pub.add_exc_msg(g_pkg_name, 'Lock_Row');
1305: END IF;
1311: RETURN inv_move_order_pub.trohdr_val_rec_type IS
1312: l_trohdr_val_rec inv_move_order_pub.trohdr_val_rec_type;
1313: BEGIN
1314: -- IF p_trohdr_rec.from_subinventory_code IS NOT NULL AND
1315: -- p_trohdr_rec.from_subinventory_code <> FND_API.G_MISS_CHAR AND
1316: -- NOT INV_GLOBALS.Equal(p_trohdr_rec.from_subinventory_code,
1317: -- p_old_trohdr_rec.from_subinventory_code)
1318: -- THEN
1319: -- l_trohdr_val_rec.from_subinventory := INV_Id_To_Value.From_Subinventory
1321: -- );
1322: -- END IF;
1323:
1324: IF p_trohdr_rec.header_id IS NOT NULL
1325: AND p_trohdr_rec.header_id <> fnd_api.g_miss_num
1326: AND NOT inv_globals.equal(p_trohdr_rec.header_id, p_old_trohdr_rec.header_id) THEN
1327: l_trohdr_val_rec.header := inv_id_to_value.header(p_header_id => p_trohdr_rec.header_id);
1328: END IF;
1329:
1327: l_trohdr_val_rec.header := inv_id_to_value.header(p_header_id => p_trohdr_rec.header_id);
1328: END IF;
1329:
1330: IF p_trohdr_rec.organization_id IS NOT NULL
1331: AND p_trohdr_rec.organization_id <> fnd_api.g_miss_num
1332: AND NOT inv_globals.equal(p_trohdr_rec.organization_id, p_old_trohdr_rec.organization_id) THEN
1333: l_trohdr_val_rec.ORGANIZATION := inv_id_to_value.ORGANIZATION(p_organization_id => p_trohdr_rec.organization_id);
1334: END IF;
1335:
1333: l_trohdr_val_rec.ORGANIZATION := inv_id_to_value.ORGANIZATION(p_organization_id => p_trohdr_rec.organization_id);
1334: END IF;
1335:
1336: IF p_trohdr_rec.to_account_id IS NOT NULL
1337: AND p_trohdr_rec.to_account_id <> fnd_api.g_miss_num
1338: AND NOT inv_globals.equal(p_trohdr_rec.to_account_id, p_old_trohdr_rec.to_account_id) THEN
1339: l_trohdr_val_rec.to_account := inv_id_to_value.to_account(p_to_account_id => p_trohdr_rec.to_account_id);
1340: END IF;
1341:
1339: l_trohdr_val_rec.to_account := inv_id_to_value.to_account(p_to_account_id => p_trohdr_rec.to_account_id);
1340: END IF;
1341:
1342: -- IF p_trohdr_rec.to_subinventory_code IS NOT NULL AND
1343: -- p_trohdr_rec.to_subinventory_code <> FND_API.G_MISS_CHAR AND
1344: -- NOT INV_GLOBALS.Equal(p_trohdr_rec.to_subinventory_code,
1345: -- p_old_trohdr_rec.to_subinventory_code)
1346: -- THEN
1347: -- l_trohdr_val_rec.to_subinventory := INV_Id_To_Value.To_Subinventory
1349: -- );
1350: -- END IF;
1351:
1352: IF p_trohdr_rec.move_order_type IS NOT NULL
1353: AND p_trohdr_rec.move_order_type <> fnd_api.g_miss_num
1354: AND NOT inv_globals.equal(p_trohdr_rec.move_order_type, p_old_trohdr_rec.move_order_type) THEN
1355: l_trohdr_val_rec.move_order_type := inv_id_to_value.move_order_type(p_move_order_type => p_trohdr_rec.move_order_type);
1356: END IF;
1357:
1355: l_trohdr_val_rec.move_order_type := inv_id_to_value.move_order_type(p_move_order_type => p_trohdr_rec.move_order_type);
1356: END IF;
1357:
1358: /*IF p_trohdr_rec.transaction_type_id IS NOT NULL AND
1359: p_trohdr_rec.transaction_type_id <> FND_API.G_MISS_NUM AND
1360: NOT INV_GLOBALS.Equal(p_trohdr_rec.transaction_type_id,
1361: p_old_trohdr_rec.transaction_type_id)
1362: THEN
1363: l_trohdr_val_rec.transaction_type_id := INV_Id_To_Value.Transaction_Type_Id
1375: l_trohdr_rec inv_move_order_pub.trohdr_rec_type;
1376: BEGIN
1377: -- initialize return_status.
1378:
1379: l_trohdr_rec.return_status := fnd_api.g_ret_sts_success;
1380: -- initialize l_trohdr_rec.
1381:
1382: l_trohdr_rec := p_trohdr_rec;
1383:
1380: -- initialize l_trohdr_rec.
1381:
1382: l_trohdr_rec := p_trohdr_rec;
1383:
1384: IF p_trohdr_val_rec.from_subinventory <> fnd_api.g_miss_char THEN
1385: IF p_trohdr_rec.from_subinventory_code <> fnd_api.g_miss_char THEN
1386: l_trohdr_rec.from_subinventory_code := p_trohdr_rec.from_subinventory_code;
1387:
1388: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_success) THEN
1381:
1382: l_trohdr_rec := p_trohdr_rec;
1383:
1384: IF p_trohdr_val_rec.from_subinventory <> fnd_api.g_miss_char THEN
1385: IF p_trohdr_rec.from_subinventory_code <> fnd_api.g_miss_char THEN
1386: l_trohdr_rec.from_subinventory_code := p_trohdr_rec.from_subinventory_code;
1387:
1388: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_success) THEN
1389: fnd_message.set_name('INV', 'FND_BOTH_VAL_AND_ID_EXIST');
1392: END IF;
1393: ELSE
1394: l_trohdr_rec.from_subinventory_code := inv_value_to_id.from_subinventory(p_organization_id => p_trohdr_rec.organization_id, p_from_subinventory => p_trohdr_val_rec.from_subinventory);
1395:
1396: IF l_trohdr_rec.from_subinventory_code = fnd_api.g_miss_char THEN
1397: l_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1398: END IF;
1399: END IF;
1400: END IF;
1393: ELSE
1394: l_trohdr_rec.from_subinventory_code := inv_value_to_id.from_subinventory(p_organization_id => p_trohdr_rec.organization_id, p_from_subinventory => p_trohdr_val_rec.from_subinventory);
1395:
1396: IF l_trohdr_rec.from_subinventory_code = fnd_api.g_miss_char THEN
1397: l_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1398: END IF;
1399: END IF;
1400: END IF;
1401:
1398: END IF;
1399: END IF;
1400: END IF;
1401:
1402: IF p_trohdr_val_rec.header <> fnd_api.g_miss_char THEN
1403: IF p_trohdr_rec.header_id <> fnd_api.g_miss_num THEN
1404: l_trohdr_rec.header_id := p_trohdr_rec.header_id;
1405:
1406: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_success) THEN
1399: END IF;
1400: END IF;
1401:
1402: IF p_trohdr_val_rec.header <> fnd_api.g_miss_char THEN
1403: IF p_trohdr_rec.header_id <> fnd_api.g_miss_num THEN
1404: l_trohdr_rec.header_id := p_trohdr_rec.header_id;
1405:
1406: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_success) THEN
1407: fnd_message.set_name('INV', 'FND_BOTH_VAL_AND_ID_EXIST');
1410: END IF;
1411: ELSE
1412: l_trohdr_rec.header_id := inv_value_to_id.header(p_header => p_trohdr_val_rec.header);
1413:
1414: IF l_trohdr_rec.header_id = fnd_api.g_miss_num THEN
1415: l_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1416: END IF;
1417: END IF;
1418: END IF;
1411: ELSE
1412: l_trohdr_rec.header_id := inv_value_to_id.header(p_header => p_trohdr_val_rec.header);
1413:
1414: IF l_trohdr_rec.header_id = fnd_api.g_miss_num THEN
1415: l_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1416: END IF;
1417: END IF;
1418: END IF;
1419:
1416: END IF;
1417: END IF;
1418: END IF;
1419:
1420: IF p_trohdr_val_rec.ORGANIZATION <> fnd_api.g_miss_char THEN
1421: IF p_trohdr_rec.organization_id <> fnd_api.g_miss_num THEN
1422: l_trohdr_rec.organization_id := p_trohdr_rec.organization_id;
1423:
1424: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_success) THEN
1417: END IF;
1418: END IF;
1419:
1420: IF p_trohdr_val_rec.ORGANIZATION <> fnd_api.g_miss_char THEN
1421: IF p_trohdr_rec.organization_id <> fnd_api.g_miss_num THEN
1422: l_trohdr_rec.organization_id := p_trohdr_rec.organization_id;
1423:
1424: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_success) THEN
1425: fnd_message.set_name('INV', 'FND_BOTH_VAL_AND_ID_EXIST');
1428: END IF;
1429: ELSE
1430: l_trohdr_rec.organization_id := inv_value_to_id.ORGANIZATION(p_organization => p_trohdr_val_rec.ORGANIZATION);
1431:
1432: IF l_trohdr_rec.organization_id = fnd_api.g_miss_num THEN
1433: l_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1434: END IF;
1435: END IF;
1436: END IF;
1429: ELSE
1430: l_trohdr_rec.organization_id := inv_value_to_id.ORGANIZATION(p_organization => p_trohdr_val_rec.ORGANIZATION);
1431:
1432: IF l_trohdr_rec.organization_id = fnd_api.g_miss_num THEN
1433: l_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1434: END IF;
1435: END IF;
1436: END IF;
1437:
1434: END IF;
1435: END IF;
1436: END IF;
1437:
1438: IF p_trohdr_val_rec.to_account <> fnd_api.g_miss_char THEN
1439: IF p_trohdr_rec.to_account_id <> fnd_api.g_miss_num THEN
1440: l_trohdr_rec.to_account_id := p_trohdr_rec.to_account_id;
1441:
1442: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_success) THEN
1435: END IF;
1436: END IF;
1437:
1438: IF p_trohdr_val_rec.to_account <> fnd_api.g_miss_char THEN
1439: IF p_trohdr_rec.to_account_id <> fnd_api.g_miss_num THEN
1440: l_trohdr_rec.to_account_id := p_trohdr_rec.to_account_id;
1441:
1442: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_success) THEN
1443: fnd_message.set_name('INV', 'FND_BOTH_VAL_AND_ID_EXIST');
1446: END IF;
1447: ELSE
1448: l_trohdr_rec.to_account_id := inv_value_to_id.to_account(p_organization_id => p_trohdr_rec.organization_id, p_to_account => p_trohdr_val_rec.to_account);
1449:
1450: IF l_trohdr_rec.to_account_id = fnd_api.g_miss_num THEN
1451: l_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1452: END IF;
1453: END IF;
1454: END IF;
1447: ELSE
1448: l_trohdr_rec.to_account_id := inv_value_to_id.to_account(p_organization_id => p_trohdr_rec.organization_id, p_to_account => p_trohdr_val_rec.to_account);
1449:
1450: IF l_trohdr_rec.to_account_id = fnd_api.g_miss_num THEN
1451: l_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1452: END IF;
1453: END IF;
1454: END IF;
1455:
1452: END IF;
1453: END IF;
1454: END IF;
1455:
1456: IF p_trohdr_val_rec.to_subinventory <> fnd_api.g_miss_char THEN
1457: IF p_trohdr_rec.to_subinventory_code <> fnd_api.g_miss_char THEN
1458: l_trohdr_rec.to_subinventory_code := p_trohdr_rec.to_subinventory_code;
1459:
1460: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_success) THEN
1453: END IF;
1454: END IF;
1455:
1456: IF p_trohdr_val_rec.to_subinventory <> fnd_api.g_miss_char THEN
1457: IF p_trohdr_rec.to_subinventory_code <> fnd_api.g_miss_char THEN
1458: l_trohdr_rec.to_subinventory_code := p_trohdr_rec.to_subinventory_code;
1459:
1460: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_success) THEN
1461: fnd_message.set_name('INV', 'FND_BOTH_VAL_AND_ID_EXIST');
1464: END IF;
1465: ELSE
1466: l_trohdr_rec.to_subinventory_code := inv_value_to_id.to_subinventory(p_organization_id => p_trohdr_rec.organization_id, p_to_subinventory => p_trohdr_val_rec.to_subinventory);
1467:
1468: IF l_trohdr_rec.to_subinventory_code = fnd_api.g_miss_char THEN
1469: l_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1470: END IF;
1471: END IF;
1472: END IF;
1465: ELSE
1466: l_trohdr_rec.to_subinventory_code := inv_value_to_id.to_subinventory(p_organization_id => p_trohdr_rec.organization_id, p_to_subinventory => p_trohdr_val_rec.to_subinventory);
1467:
1468: IF l_trohdr_rec.to_subinventory_code = fnd_api.g_miss_char THEN
1469: l_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1470: END IF;
1471: END IF;
1472: END IF;
1473:
1470: END IF;
1471: END IF;
1472: END IF;
1473:
1474: IF p_trohdr_val_rec.move_order_type <> fnd_api.g_miss_char THEN
1475: IF p_trohdr_rec.move_order_type <> fnd_api.g_miss_num THEN
1476: l_trohdr_rec.move_order_type := p_trohdr_rec.move_order_type;
1477:
1478: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_success) THEN
1471: END IF;
1472: END IF;
1473:
1474: IF p_trohdr_val_rec.move_order_type <> fnd_api.g_miss_char THEN
1475: IF p_trohdr_rec.move_order_type <> fnd_api.g_miss_num THEN
1476: l_trohdr_rec.move_order_type := p_trohdr_rec.move_order_type;
1477:
1478: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_success) THEN
1479: fnd_message.set_name('INV', 'FND_BOTH_VAL_AND_ID_EXIST');
1482: END IF;
1483: ELSE
1484: l_trohdr_rec.move_order_type := inv_value_to_id.move_order_type(p_move_order_type => p_trohdr_val_rec.move_order_type);
1485:
1486: IF l_trohdr_rec.move_order_type = fnd_api.g_miss_num THEN
1487: l_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1488: END IF;
1489: END IF;
1490: END IF;
1483: ELSE
1484: l_trohdr_rec.move_order_type := inv_value_to_id.move_order_type(p_move_order_type => p_trohdr_val_rec.move_order_type);
1485:
1486: IF l_trohdr_rec.move_order_type = fnd_api.g_miss_num THEN
1487: l_trohdr_rec.return_status := fnd_api.g_ret_sts_error;
1488: END IF;
1489: END IF;
1490: END IF;
1491:
1489: END IF;
1490: END IF;
1491:
1492: /*
1493: IF p_trohdr_rec.transaction_type_id <> FND_API.G_MISS_NUM THEN
1494:
1495: l_trohdr_rec.transaction_type_id := p_trohdr_rec.transaction_type_id;
1496:
1497: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)