DBA Data[Home] [Help]

APPS.INV_ITEM_REVISION_PUB dependencies on FND_API

Line 14: G_Miss_Char VARCHAR2(1) := fnd_api.G_MISS_CHAR;

10:
11: G_USER_ID NUMBER := FND_GLOBAL.User_Id;
12: G_LOGIN_ID NUMBER := FND_GLOBAL.Conc_Login_Id;
13:
14: G_Miss_Char VARCHAR2(1) := fnd_api.G_MISS_CHAR;
15: G_Miss_Num NUMBER := fnd_api.G_MISS_NUM;
16: G_Miss_Date DATE := fnd_api.G_MISS_DATE;
17:
18: G_Language_Code VARCHAR2(4);

Line 15: G_Miss_Num NUMBER := fnd_api.G_MISS_NUM;

11: G_USER_ID NUMBER := FND_GLOBAL.User_Id;
12: G_LOGIN_ID NUMBER := FND_GLOBAL.Conc_Login_Id;
13:
14: G_Miss_Char VARCHAR2(1) := fnd_api.G_MISS_CHAR;
15: G_Miss_Num NUMBER := fnd_api.G_MISS_NUM;
16: G_Miss_Date DATE := fnd_api.G_MISS_DATE;
17:
18: G_Language_Code VARCHAR2(4);
19: G_Revision_Id NUMBER;

Line 16: G_Miss_Date DATE := fnd_api.G_MISS_DATE;

12: G_LOGIN_ID NUMBER := FND_GLOBAL.Conc_Login_Id;
13:
14: G_Miss_Char VARCHAR2(1) := fnd_api.G_MISS_CHAR;
15: G_Miss_Num NUMBER := fnd_api.G_MISS_NUM;
16: G_Miss_Date DATE := fnd_api.G_MISS_DATE;
17:
18: G_Language_Code VARCHAR2(4);
19: G_Revision_Id NUMBER;
20: G_Object_Version_Number NUMBER;

Line 234: x_return_status := FND_API.g_RET_STS_SUCCESS;

230:
231: BEGIN
232:
233: -- Initialize API return status to success
234: x_return_status := FND_API.g_RET_STS_SUCCESS;
235:
236: IF ( p_Item_Revision_rec.effectivity_date = FND_API.g_MISS_DATE ) THEN
237: RETURN;
238: END IF;

Line 236: IF ( p_Item_Revision_rec.effectivity_date = FND_API.g_MISS_DATE ) THEN

232:
233: -- Initialize API return status to success
234: x_return_status := FND_API.g_RET_STS_SUCCESS;
235:
236: IF ( p_Item_Revision_rec.effectivity_date = FND_API.g_MISS_DATE ) THEN
237: RETURN;
238: END IF;
239:
240: v_count := 0;

Line 281: x_return_status := FND_API.g_RET_STS_ERROR;

277: )
278: THEN
279: -- inv_UTILITY_PVT.debug_message(' BAD DATE...... ');
280:
281: x_return_status := FND_API.g_RET_STS_ERROR;
282: Add_Message ('INV', 'INV_ITM_REV_OUT_EFF_DATE');
283:
284: END IF;
285:

Line 294: x_return_status := FND_API.g_RET_STS_ERROR;

290: -- -----------------------------------------------------
291:
292: IF ( p_Item_Revision_rec.effectivity_date > item_rev_rec.effectivity_date )
293: THEN
294: x_return_status := FND_API.g_RET_STS_ERROR;
295: Add_Message ('INV', 'INV_ITM_REV_OUT_EFF_DATE');
296: END IF;
297:
298: END IF; -- v_count > 1

Line 332: x_return_status := FND_API.g_RET_STS_ERROR;

328:
329: -- Effectivity Date must be past the date of the greatest revision
330:
331: IF ( p_Item_Revision_rec.effectivity_date <= v_effectivity_date ) THEN
332: x_return_status := FND_API.g_RET_STS_ERROR;
333: Add_Message ('INV', 'INV_ITM_REV_OUT_EFF_DATE');
334: END IF;
335:
336: ELSE

Line 337: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;

333: Add_Message ('INV', 'INV_ITM_REV_OUT_EFF_DATE');
334: END IF;
335:
336: ELSE
337: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;
338: Add_Message ('INV', 'INV_ITM_INVALID_REVISION_CODE');
339: END IF;
340:
341: END IF; -- NOT rev_place_found AND v_count > 0

Line 351: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;

347: IF ( Item_Revs_cur%ISOPEN ) THEN
348: CLOSE Item_Revs_cur;
349: END IF;
350:
351: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;
352:
353: Add_Message
354: ( p_api_name => l_api_name
355: , p_message_text => 'UNEXP_ERROR : ' || SQLERRM

Line 567: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

563:
564: PROCEDURE Create_Item_Revision
565: (
566: p_api_version IN NUMBER
567: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
568: , p_commit IN VARCHAR2 := FND_API.G_FALSE
569: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
570: , p_process_control IN VARCHAR2 := NULL
571: , x_return_status OUT NOCOPY VARCHAR2

Line 568: , p_commit IN VARCHAR2 := FND_API.G_FALSE

564: PROCEDURE Create_Item_Revision
565: (
566: p_api_version IN NUMBER
567: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
568: , p_commit IN VARCHAR2 := FND_API.G_FALSE
569: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
570: , p_process_control IN VARCHAR2 := NULL
571: , x_return_status OUT NOCOPY VARCHAR2
572: , x_msg_count OUT NOCOPY NUMBER

Line 569: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

565: (
566: p_api_version IN NUMBER
567: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
568: , p_commit IN VARCHAR2 := FND_API.G_FALSE
569: , p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
570: , p_process_control IN VARCHAR2 := NULL
571: , x_return_status OUT NOCOPY VARCHAR2
572: , x_msg_count OUT NOCOPY NUMBER
573: , x_msg_data OUT NOCOPY VARCHAR2

Line 622: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,

618: l_sysdate := SYSDATE;
619: END IF;
620:
621: -- Check for call compatibility
622: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
623: l_api_name, G_PKG_NAME)
624: THEN
625: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;
626: END IF;

Line 625: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;

621: -- Check for call compatibility
622: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
623: l_api_name, G_PKG_NAME)
624: THEN
625: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;
626: END IF;
627:
628: -- Initialize message list
629: IF G_Message_API = 'FND' THEN

Line 630: IF FND_API.To_Boolean (p_init_msg_list) THEN

626: END IF;
627:
628: -- Initialize message list
629: IF G_Message_API = 'FND' THEN
630: IF FND_API.To_Boolean (p_init_msg_list) THEN
631: FND_MSG_PUB.Initialize;
632: END IF;
633: END IF;
634:

Line 640: x_return_status := FND_API.g_RET_STS_SUCCESS;

636: -- Mctx.Package_Name := G_PKG_NAME;
637: -- Mctx.Procedure_Name := l_api_name;
638:
639: -- Initialize API return status to success
640: x_return_status := FND_API.g_RET_STS_SUCCESS;
641:
642: -- Debug Message
643: -- AMS_UTILITY_PVT.debug_message('API: ' || l_api_name || ': start');
644:

Line 651: IF ( p_Item_Revision_rec.inventory_item_id = fnd_api.G_MISS_NUM )

647: -- ------------------------------------
648: -- Check for missing or NULL PK values
649: -- ------------------------------------
650:
651: IF ( p_Item_Revision_rec.inventory_item_id = fnd_api.G_MISS_NUM )
652: OR ( p_Item_Revision_rec.inventory_item_id IS NULL )
653: THEN
654: Add_Message ('INV', 'INV_ITM_MISS_ITEM_ID');
655: END IF;

Line 657: IF ( p_Item_Revision_rec.organization_id = fnd_api.G_MISS_NUM )

653: THEN
654: Add_Message ('INV', 'INV_ITM_MISS_ITEM_ID');
655: END IF;
656:
657: IF ( p_Item_Revision_rec.organization_id = fnd_api.G_MISS_NUM )
658: OR ( p_Item_Revision_rec.organization_id IS NULL )
659: THEN
660: Add_Message ('INV', 'INV_ITM_MISS_ORG_ID');
661: END IF;

Line 663: IF ( p_Item_Revision_rec.revision = fnd_api.G_MISS_CHAR )

659: THEN
660: Add_Message ('INV', 'INV_ITM_MISS_ORG_ID');
661: END IF;
662:
663: IF ( p_Item_Revision_rec.revision = fnd_api.G_MISS_CHAR )
664: OR ( p_Item_Revision_rec.revision IS NULL )
665: THEN
666: Add_Message ('INV', 'INV_ITM_MISS_REVISION_CODE');
667: END IF;

Line 669: IF ( x_return_status <> fnd_api.G_RET_STS_SUCCESS ) THEN

665: THEN
666: Add_Message ('INV', 'INV_ITM_MISS_REVISION_CODE');
667: END IF;
668:
669: IF ( x_return_status <> fnd_api.G_RET_STS_SUCCESS ) THEN
670: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;
671: END IF;
672:
673: -- ------------------------------------------------

Line 670: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;

666: Add_Message ('INV', 'INV_ITM_MISS_REVISION_CODE');
667: END IF;
668:
669: IF ( x_return_status <> fnd_api.G_RET_STS_SUCCESS ) THEN
670: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;
671: END IF;
672:
673: -- ------------------------------------------------
674: -- Validate a part of Revision PK - foreign key to

Line 690: RAISE FND_API.g_EXC_ERROR;

686:
687: IF ( org_item_exists_cur%NOTFOUND ) THEN
688: CLOSE org_item_exists_cur;
689: Add_Message ('INV', 'INV_ITM_INVALID_ORGITEM_ID');
690: RAISE FND_API.g_EXC_ERROR;
691: END IF;
692:
693: CLOSE org_item_exists_cur;
694:

Line 710: RAISE FND_API.g_EXC_ERROR;

706:
707: IF ( Item_Revision_Exists_cur%FOUND ) THEN
708: CLOSE Item_Revision_Exists_cur;
709: Add_Message ('INV', 'INV_ITM_DUPLICATE_REVISION');
710: RAISE FND_API.g_EXC_ERROR;
711: END IF;
712:
713: CLOSE Item_Revision_Exists_cur;
714:

Line 731: RAISE FND_API.g_EXC_ERROR;

727:
728: IF (l_revision_ascii_diff < 0 ) THEN
729: CLOSE Item_Revision_Lower_cur;
730: Add_Message ('INV', 'INV_IOI_REV_BAD_ORDER');
731: RAISE FND_API.g_EXC_ERROR;
732: END IF;
733:
734: CLOSE Item_Revision_Lower_cur;
735: */

Line 743: IF ( p_Item_Revision_rec.description = fnd_api.G_MISS_CHAR ) THEN

739: -- Description is a mandatory attribute for a new revision
740: -- Bug: 3055810 Description is Optional comparing with forms ui.
741: -- --------------------------------------------------------
742:
743: IF ( p_Item_Revision_rec.description = fnd_api.G_MISS_CHAR ) THEN
744:
745: p_Item_Revision_rec.description := NULL;
746: -- x_return_status := FND_API.g_RET_STS_ERROR;
747: -- Add_Message ('INV', 'INV_ITM_REV_MISS_DESCRIPTION');

Line 746: -- x_return_status := FND_API.g_RET_STS_ERROR;

742:
743: IF ( p_Item_Revision_rec.description = fnd_api.G_MISS_CHAR ) THEN
744:
745: p_Item_Revision_rec.description := NULL;
746: -- x_return_status := FND_API.g_RET_STS_ERROR;
747: -- Add_Message ('INV', 'INV_ITM_REV_MISS_DESCRIPTION');
748: END IF;
749: /* Bug:3055810
750: IF ( p_Item_Revision_rec.description IS NULL ) THEN

Line 751: x_return_status := FND_API.g_RET_STS_ERROR;

747: -- Add_Message ('INV', 'INV_ITM_REV_MISS_DESCRIPTION');
748: END IF;
749: /* Bug:3055810
750: IF ( p_Item_Revision_rec.description IS NULL ) THEN
751: x_return_status := FND_API.g_RET_STS_ERROR;
752: Add_Message ('INV', 'INV_ITM_REV_NULL_DESCRIPTION');
753: END IF;
754: */
755: -- -------------------------------------------------------------

Line 759: IF ( p_Item_Revision_rec.effectivity_date = FND_API.g_MISS_DATE ) THEN

755: -- -------------------------------------------------------------
756: -- Effectivity Date is a mandatory attribute for a new revision
757: -- -------------------------------------------------------------
758:
759: IF ( p_Item_Revision_rec.effectivity_date = FND_API.g_MISS_DATE ) THEN
760: x_return_status := FND_API.g_RET_STS_ERROR;
761: Add_Message ('INV', 'INV_ITM_REV_MISS_EFF_DATE');
762: END IF;
763:

Line 760: x_return_status := FND_API.g_RET_STS_ERROR;

756: -- Effectivity Date is a mandatory attribute for a new revision
757: -- -------------------------------------------------------------
758:
759: IF ( p_Item_Revision_rec.effectivity_date = FND_API.g_MISS_DATE ) THEN
760: x_return_status := FND_API.g_RET_STS_ERROR;
761: Add_Message ('INV', 'INV_ITM_REV_MISS_EFF_DATE');
762: END IF;
763:
764: -- New revision Effectivity Date value cannot be NULL

Line 767: x_return_status := FND_API.g_RET_STS_ERROR;

763:
764: -- New revision Effectivity Date value cannot be NULL
765:
766: IF ( p_Item_Revision_rec.effectivity_date IS NULL ) THEN
767: x_return_status := FND_API.g_RET_STS_ERROR;
768: Add_Message ('INV', 'INV_ITM_REV_NULL_EFF_DATE');
769: END IF;
770:
771: -- If the effectivity date is current date, then it is

Line 786: x_return_status := FND_API.g_RET_STS_ERROR;

782:
783: -- New revision Effectivity Date must be past the current date
784:
785: IF ( p_Item_Revision_rec.effectivity_date < l_sysdate ) THEN
786: x_return_status := FND_API.g_RET_STS_ERROR;
787: Add_Message ('INV', 'INV_ITM_REV_OLD_EFF_DATE');
788: END IF;
789: END IF;
790:

Line 791: IF ( x_return_status <> FND_API.g_RET_STS_SUCCESS ) THEN

787: Add_Message ('INV', 'INV_ITM_REV_OLD_EFF_DATE');
788: END IF;
789: END IF;
790:
791: IF ( x_return_status <> FND_API.g_RET_STS_SUCCESS ) THEN
792: RAISE fnd_api.G_EXC_ERROR;
793: END IF;
794:
795: -- -----------------------------------------------------

Line 792: RAISE fnd_api.G_EXC_ERROR;

788: END IF;
789: END IF;
790:
791: IF ( x_return_status <> FND_API.g_RET_STS_SUCCESS ) THEN
792: RAISE fnd_api.G_EXC_ERROR;
793: END IF;
794:
795: -- -----------------------------------------------------
796: -- Validate all the other Effectivity Date dependencies

Line 807: IF ( l_return_status = FND_API.g_RET_STS_ERROR ) THEN

803: p_Item_Revision_rec => p_Item_Revision_rec
804: , x_return_status => l_return_status
805: );
806:
807: IF ( l_return_status = FND_API.g_RET_STS_ERROR ) THEN
808: RAISE fnd_api.G_EXC_ERROR;
809: ELSIF ( l_return_status = FND_API.g_RET_STS_UNEXP_ERROR ) THEN
810: RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;
811: END IF;

Line 808: RAISE fnd_api.G_EXC_ERROR;

804: , x_return_status => l_return_status
805: );
806:
807: IF ( l_return_status = FND_API.g_RET_STS_ERROR ) THEN
808: RAISE fnd_api.G_EXC_ERROR;
809: ELSIF ( l_return_status = FND_API.g_RET_STS_UNEXP_ERROR ) THEN
810: RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;
811: END IF;
812:

Line 809: ELSIF ( l_return_status = FND_API.g_RET_STS_UNEXP_ERROR ) THEN

805: );
806:
807: IF ( l_return_status = FND_API.g_RET_STS_ERROR ) THEN
808: RAISE fnd_api.G_EXC_ERROR;
809: ELSIF ( l_return_status = FND_API.g_RET_STS_UNEXP_ERROR ) THEN
810: RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;
811: END IF;
812:
813: -- ---------------------------

Line 810: RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;

806:
807: IF ( l_return_status = FND_API.g_RET_STS_ERROR ) THEN
808: RAISE fnd_api.G_EXC_ERROR;
809: ELSIF ( l_return_status = FND_API.g_RET_STS_UNEXP_ERROR ) THEN
810: RAISE fnd_api.G_EXC_UNEXPECTED_ERROR;
811: END IF;
812:
813: -- ---------------------------
814: -- Default missing attributes

Line 817: IF ( p_Item_Revision_rec.change_notice = FND_API.g_MISS_CHAR ) THEN

813: -- ---------------------------
814: -- Default missing attributes
815: -- ---------------------------
816:
817: IF ( p_Item_Revision_rec.change_notice = FND_API.g_MISS_CHAR ) THEN
818: p_Item_Revision_rec.change_notice := NULL;
819: END IF;
820:
821: IF ( p_Item_Revision_rec.ecn_initiation_date = FND_API.g_MISS_DATE ) THEN

Line 821: IF ( p_Item_Revision_rec.ecn_initiation_date = FND_API.g_MISS_DATE ) THEN

817: IF ( p_Item_Revision_rec.change_notice = FND_API.g_MISS_CHAR ) THEN
818: p_Item_Revision_rec.change_notice := NULL;
819: END IF;
820:
821: IF ( p_Item_Revision_rec.ecn_initiation_date = FND_API.g_MISS_DATE ) THEN
822: p_Item_Revision_rec.ecn_initiation_date := NULL;
823: END IF;
824:
825: /*

Line 826: IF ( p_Item_Revision_rec.implementation_date = FND_API.g_MISS_DATE ) OR

822: p_Item_Revision_rec.ecn_initiation_date := NULL;
823: END IF;
824:
825: /*
826: IF ( p_Item_Revision_rec.implementation_date = FND_API.g_MISS_DATE ) OR
827: p_Item_Revision_rec.implementation_date IS NULL THEN
828: p_Item_Revision_rec.implementation_date := p_Item_Revision_rec.effectivity_date;
829: END IF;
830: */

Line 840: IF ( p_Item_Revision_rec.revised_item_sequence_id = FND_API.g_MISS_NUM ) THEN

836: p_Item_Revision_rec.implementation_date := p_Item_Revision_rec.effectivity_date;
837: END IF;
838:
839:
840: IF ( p_Item_Revision_rec.revised_item_sequence_id = FND_API.g_MISS_NUM ) THEN
841: p_Item_Revision_rec.revised_item_sequence_id := NULL;
842: END IF;
843:
844: --

Line 848: IF ( p_Item_Revision_rec.revision_label = FND_API.g_MISS_CHAR OR

844: --
845: -- Revision label cannot be null. If the user did not pass any value or the
846: -- value is missing, then revision_label will be same as revision
847: --
848: IF ( p_Item_Revision_rec.revision_label = FND_API.g_MISS_CHAR OR
849: p_Item_Revision_rec.revision_label IS NULL ) THEN
850: p_Item_Revision_rec.revision_label := p_Item_Revision_rec.revision;
851: END IF;
852:

Line 853: IF ( p_Item_Revision_rec.revision_reason = FND_API.g_MISS_CHAR ) THEN

849: p_Item_Revision_rec.revision_label IS NULL ) THEN
850: p_Item_Revision_rec.revision_label := p_Item_Revision_rec.revision;
851: END IF;
852:
853: IF ( p_Item_Revision_rec.revision_reason = FND_API.g_MISS_CHAR ) THEN
854: p_Item_Revision_rec.revision_reason := NULL;
855: END IF;
856:
857: IF ( p_Item_Revision_rec.lifecycle_id = FND_API.g_MISS_NUM ) THEN

Line 857: IF ( p_Item_Revision_rec.lifecycle_id = FND_API.g_MISS_NUM ) THEN

853: IF ( p_Item_Revision_rec.revision_reason = FND_API.g_MISS_CHAR ) THEN
854: p_Item_Revision_rec.revision_reason := NULL;
855: END IF;
856:
857: IF ( p_Item_Revision_rec.lifecycle_id = FND_API.g_MISS_NUM ) THEN
858: p_Item_Revision_rec.lifecycle_id := NULL;
859: p_Item_Revision_rec.current_phase_id := NULL;
860: END IF;
861:

Line 862: IF ( p_Item_Revision_rec.current_phase_id = FND_API.g_MISS_NUM ) THEN

858: p_Item_Revision_rec.lifecycle_id := NULL;
859: p_Item_Revision_rec.current_phase_id := NULL;
860: END IF;
861:
862: IF ( p_Item_Revision_rec.current_phase_id = FND_API.g_MISS_NUM ) THEN
863: p_Item_Revision_rec.current_phase_id := NULL;
864: END IF;
865:
866: --

Line 877: RAISE FND_API.g_EXC_ERROR;

873: INV_EGO_REVISION_VALIDATE.Get_Initial_Lifecycle_Phase (p_Item_Revision_rec.lifecycle_id);
874:
875: IF ( p_Item_Revision_rec.current_phase_id = 0 ) THEN
876: Add_Message ('INV', 'INV_REV_LIFECYCLE_INVALID');
877: RAISE FND_API.g_EXC_ERROR;
878: END IF;
879:
880: END IF;
881:

Line 883: IF p_Item_Revision_rec.template_id = FND_API.g_MISS_NUM THEN

879:
880: END IF;
881:
882: -- Start :5208102: Supporting template for UDA's at revisions
883: IF p_Item_Revision_rec.template_id = FND_API.g_MISS_NUM THEN
884: p_Item_Revision_rec.template_id := NULL;
885: END IF;
886: IF p_Item_Revision_rec.template_name = FND_API.g_MISS_CHAR THEN
887: p_Item_Revision_rec.template_name := NULL;

Line 886: IF p_Item_Revision_rec.template_name = FND_API.g_MISS_CHAR THEN

882: -- Start :5208102: Supporting template for UDA's at revisions
883: IF p_Item_Revision_rec.template_id = FND_API.g_MISS_NUM THEN
884: p_Item_Revision_rec.template_id := NULL;
885: END IF;
886: IF p_Item_Revision_rec.template_name = FND_API.g_MISS_CHAR THEN
887: p_Item_Revision_rec.template_name := NULL;
888: END IF;
889:
890: IF (p_Item_Revision_rec.template_id IS NOT NULL)

Line 917: RAISE FND_API.g_EXC_ERROR;

913: END IF;
914:
915: IF l_message_name IS NOT NULL THEN
916: Add_Message ('INV', l_message_name);
917: RAISE FND_API.g_EXC_ERROR;
918: ELSE
919: l_apply_template := TRUE;
920: END IF;
921: END IF;

Line 925: IF ( p_Item_Revision_rec.revision_id = FND_API.g_MISS_NUM ) THEN

921: END IF;
922: -- End :5208102: Supporting template for UDA's at revisions
923:
924: --Supporting revision id during revision create.
925: IF ( p_Item_Revision_rec.revision_id = FND_API.g_MISS_NUM ) THEN
926: p_Item_Revision_rec.revision_id := NULL;
927: END IF;
928:
929: IF p_Item_Revision_rec.revision_id IS NOT NULL THEN

Line 935: RAISE FND_API.g_EXC_ERROR;

931: SELECT mtl_item_revisions_b_s.CURRVAL
932: INTO l_revision_id FROM DUAL;
933: IF p_Item_Revision_rec.revision_id > l_revision_id THEN
934: Add_Message ('INV', 'INV_INVALID_REVISION_ID');
935: RAISE FND_API.g_EXC_ERROR;
936: END IF;
937: EXCEPTION
938: WHEN OTHERS THEN
939: Add_Message ('INV', 'INV_INVALID_REVISION_ID');

Line 940: RAISE FND_API.g_EXC_ERROR;

936: END IF;
937: EXCEPTION
938: WHEN OTHERS THEN
939: Add_Message ('INV', 'INV_INVALID_REVISION_ID');
940: RAISE FND_API.g_EXC_ERROR;
941: END;
942: END IF;
943:
944: IF p_Item_Revision_rec.revision_id IS NULL THEN

Line 1174: IF FND_API.To_Boolean (p_commit) THEN

1170: */ /* R12: Business Event Enhancement:
1171: Raise Event if Revision got Created successfully */
1172:
1173: -- Standard check of p_commit
1174: IF FND_API.To_Boolean (p_commit) THEN
1175: --INV_ITEM_MSG.Debug(Mctx, 'before COMMIT WORK');
1176: COMMIT WORK;
1177: END IF;
1178:

Line 1191: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE );

1187: );
1188:
1189: /*Bug 6853558 Added to get the message if count is > 1 */
1190: IF( x_msg_count > 1 ) THEN
1191: x_msg_data := fnd_msg_pub.get(x_msg_count, FND_API.G_FALSE );
1192: END IF;
1193: END IF;
1194:
1195: EXCEPTION

Line 1197: WHEN FND_API.g_EXC_ERROR THEN

1193: END IF;
1194:
1195: EXCEPTION
1196:
1197: WHEN FND_API.g_EXC_ERROR THEN
1198:
1199: ROLLBACK TO Create_Item_Revision_PUB;
1200: x_return_status := FND_API.g_RET_STS_ERROR;
1201: /*Added for Bug 8679971 to ensure error message is displayed*/

Line 1200: x_return_status := FND_API.g_RET_STS_ERROR;

1196:
1197: WHEN FND_API.g_EXC_ERROR THEN
1198:
1199: ROLLBACK TO Create_Item_Revision_PUB;
1200: x_return_status := FND_API.g_RET_STS_ERROR;
1201: /*Added for Bug 8679971 to ensure error message is displayed*/
1202: IF G_Message_API = 'BOM' THEN
1203: x_msg_count := Error_Handler.Get_Message_Count;
1204: Error_Handler.Get_Message

Line 1218: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE );

1214: , p_data => x_msg_data
1215: );
1216: /*Bug 6853558 Added to get the message if count is > 1 */
1217: IF( x_msg_count > 1 ) THEN
1218: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE );
1219: END IF;
1220: END IF;
1221:
1222: WHEN FND_API.g_EXC_UNEXPECTED_ERROR THEN

Line 1222: WHEN FND_API.g_EXC_UNEXPECTED_ERROR THEN

1218: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE );
1219: END IF;
1220: END IF;
1221:
1222: WHEN FND_API.g_EXC_UNEXPECTED_ERROR THEN
1223:
1224: ROLLBACK TO Create_Item_Revision_PUB;
1225: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;
1226:

Line 1225: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;

1221:
1222: WHEN FND_API.g_EXC_UNEXPECTED_ERROR THEN
1223:
1224: ROLLBACK TO Create_Item_Revision_PUB;
1225: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;
1226:
1227: IF G_Message_API = 'BOM' THEN
1228: x_msg_count := Error_Handler.Get_Message_Count;
1229: ELSE

Line 1236: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);

1232: , p_data => x_msg_data
1233: );
1234: /*Bug 6853558 Added to get the message if count is > 1 */
1235: IF( x_msg_count > 1 ) THEN
1236: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
1237: END IF;
1238: END IF;
1239:
1240: WHEN others THEN

Line 1243: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;

1239:
1240: WHEN others THEN
1241:
1242: ROLLBACK TO Create_Item_Revision_PUB;
1243: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;
1244:
1245: Add_Message
1246: ( p_api_name => l_api_name
1247: , p_message_text => 'UNEXP_ERROR : ' || SQLERRM

Line 1259: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);

1255: , p_data => x_msg_data
1256: );
1257: /*Bug 6853558 Added to get the message if count is > 1 */
1258: IF( x_msg_count > 1 ) THEN
1259: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
1260: END IF;
1261: END IF;
1262:
1263: END Create_Item_Revision;

Line 1273: , p_init_msg_list IN VARCHAR2 := FND_API.g_FALSE

1269:
1270: PROCEDURE Update_Item_Revision
1271: (
1272: p_api_version IN NUMBER
1273: , p_init_msg_list IN VARCHAR2 := FND_API.g_FALSE
1274: , p_commit IN VARCHAR2 := FND_API.g_FALSE
1275: , p_validation_level IN NUMBER := FND_API.g_VALID_LEVEL_FULL
1276: , p_process_control IN VARCHAR2 := NULL
1277: , x_return_status OUT NOCOPY VARCHAR2

Line 1274: , p_commit IN VARCHAR2 := FND_API.g_FALSE

1270: PROCEDURE Update_Item_Revision
1271: (
1272: p_api_version IN NUMBER
1273: , p_init_msg_list IN VARCHAR2 := FND_API.g_FALSE
1274: , p_commit IN VARCHAR2 := FND_API.g_FALSE
1275: , p_validation_level IN NUMBER := FND_API.g_VALID_LEVEL_FULL
1276: , p_process_control IN VARCHAR2 := NULL
1277: , x_return_status OUT NOCOPY VARCHAR2
1278: , x_msg_count OUT NOCOPY NUMBER

Line 1275: , p_validation_level IN NUMBER := FND_API.g_VALID_LEVEL_FULL

1271: (
1272: p_api_version IN NUMBER
1273: , p_init_msg_list IN VARCHAR2 := FND_API.g_FALSE
1274: , p_commit IN VARCHAR2 := FND_API.g_FALSE
1275: , p_validation_level IN NUMBER := FND_API.g_VALID_LEVEL_FULL
1276: , p_process_control IN VARCHAR2 := NULL
1277: , x_return_status OUT NOCOPY VARCHAR2
1278: , x_msg_count OUT NOCOPY NUMBER
1279: , x_msg_data OUT NOCOPY VARCHAR2

Line 1340: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,

1336: l_sysdate := SYSDATE;
1337: END IF;
1338:
1339: -- Check for call compatibility
1340: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
1341: l_api_name, G_PKG_NAME)
1342: THEN
1343: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;
1344: END IF;

Line 1343: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;

1339: -- Check for call compatibility
1340: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
1341: l_api_name, G_PKG_NAME)
1342: THEN
1343: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;
1344: END IF;
1345:
1346: -- Initialize message list
1347: IF G_Message_API = 'FND' THEN

Line 1348: IF FND_API.To_Boolean (p_init_msg_list) THEN

1344: END IF;
1345:
1346: -- Initialize message list
1347: IF G_Message_API = 'FND' THEN
1348: IF FND_API.To_Boolean (p_init_msg_list) THEN
1349: FND_MSG_PUB.Initialize;
1350: END IF;
1351: END IF;
1352:

Line 1358: x_return_status := FND_API.g_RET_STS_SUCCESS;

1354: -- Mctx.Package_Name := G_PKG_NAME;
1355: -- Mctx.Procedure_Name := l_api_name;
1356:
1357: -- Initialize API return status to success
1358: x_return_status := FND_API.g_RET_STS_SUCCESS;
1359:
1360: -- code for req, unique and fk checks
1361:
1362: -- ------------------------------------

Line 1366: IF ( p_Item_Revision_rec.inventory_item_id = FND_API.g_MISS_NUM )

1362: -- ------------------------------------
1363: -- Check for missing or NULL PK values
1364: -- ------------------------------------
1365:
1366: IF ( p_Item_Revision_rec.inventory_item_id = FND_API.g_MISS_NUM )
1367: OR ( p_Item_Revision_rec.inventory_item_id IS NULL )
1368: THEN
1369: Add_Message ('INV', 'INV_ITM_MISS_ITEM_ID');
1370: END IF;

Line 1372: IF ( p_Item_Revision_rec.organization_id = FND_API.g_MISS_NUM )

1368: THEN
1369: Add_Message ('INV', 'INV_ITM_MISS_ITEM_ID');
1370: END IF;
1371:
1372: IF ( p_Item_Revision_rec.organization_id = FND_API.g_MISS_NUM )
1373: OR ( p_Item_Revision_rec.organization_id IS NULL )
1374: THEN
1375: Add_Message ('INV', 'INV_ITM_MISS_ORG_ID');
1376: END IF;

Line 1378: IF ( p_Item_Revision_rec.revision = FND_API.g_MISS_CHAR )

1374: THEN
1375: Add_Message ('INV', 'INV_ITM_MISS_ORG_ID');
1376: END IF;
1377:
1378: IF ( p_Item_Revision_rec.revision = FND_API.g_MISS_CHAR )
1379: OR ( p_Item_Revision_rec.revision IS NULL )
1380: THEN
1381: Add_Message ('INV', 'INV_ITM_MISS_REVISION_CODE');
1382: END IF;

Line 1385: IF ( x_return_status <> FND_API.g_RET_STS_SUCCESS ) THEN

1381: Add_Message ('INV', 'INV_ITM_MISS_REVISION_CODE');
1382: END IF;
1383:
1384: -- Return with errors accumulated so far
1385: IF ( x_return_status <> FND_API.g_RET_STS_SUCCESS ) THEN
1386: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;
1387: END IF;
1388:
1389: -- ------------------------------------------------

Line 1386: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;

1382: END IF;
1383:
1384: -- Return with errors accumulated so far
1385: IF ( x_return_status <> FND_API.g_RET_STS_SUCCESS ) THEN
1386: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;
1387: END IF;
1388:
1389: -- ------------------------------------------------
1390: -- Validate a part of Revision PK - foreign key to

Line 1406: RAISE FND_API.g_EXC_ERROR;

1402:
1403: IF ( org_item_exists_cur%NOTFOUND ) THEN
1404: CLOSE org_item_exists_cur;
1405: Add_Message ('INV', 'INV_ITM_INVALID_ORGITEM_ID');
1406: RAISE FND_API.g_EXC_ERROR;
1407: END IF;
1408:
1409: CLOSE org_item_exists_cur;
1410:

Line 1424: RAISE FND_API.g_EXC_ERROR;

1420: FETCH Item_Revision_Id_Exists_cur INTO l_object_version_number;
1421: IF ( Item_Revision_Id_Exists_cur%NOTFOUND ) THEN
1422: CLOSE Item_Revision_Id_Exists_cur;
1423: Add_Message ('INV', 'INV_ITM_INVALID_REVISION_CODE');
1424: RAISE FND_API.g_EXC_ERROR;
1425: END IF;
1426: CLOSE Item_Revision_Id_Exists_cur;
1427:
1428: --3655522 begin

Line 1437: RAISE FND_API.g_EXC_ERROR;

1433: FETCH Upd_Item_Rev_Exists_cur INTO l_object_version_number;
1434: IF ( Upd_Item_Rev_Exists_cur%FOUND ) THEN
1435: CLOSE Upd_Item_Rev_Exists_cur;
1436: Add_Message ('INV', 'INV_ITM_DUPLICATE_REVISION');
1437: RAISE FND_API.g_EXC_ERROR;
1438: END IF;
1439: CLOSE Upd_Item_Rev_Exists_cur;
1440: --3655522 end
1441:

Line 1451: RAISE FND_API.g_EXC_ERROR;

1447: FETCH Item_Revision_Exists_cur INTO l_object_version_number;
1448: IF ( Item_Revision_Exists_cur%NOTFOUND ) THEN
1449: CLOSE Item_Revision_Exists_cur;
1450: Add_Message ('INV', 'INV_ITM_INVALID_REVISION_CODE');
1451: RAISE FND_API.g_EXC_ERROR;
1452: END IF;
1453: CLOSE Item_Revision_Exists_cur;
1454: END IF;
1455:

Line 1461: IF ( p_Item_Revision_rec.description = FND_API.g_MISS_CHAR ) THEN

1457: -- Description cannot be updated to NULL
1458: -- Bug: 3055810 Description is optional.
1459: -- --------------------------------------
1460: /*
1461: IF ( p_Item_Revision_rec.description = FND_API.g_MISS_CHAR ) THEN
1462: x_return_status := FND_API.g_RET_STS_ERROR;
1463: Add_Message ('INV', 'INV_ITM_REV_NULL_DESCRIPTION');
1464: END IF;
1465: */

Line 1462: x_return_status := FND_API.g_RET_STS_ERROR;

1458: -- Bug: 3055810 Description is optional.
1459: -- --------------------------------------
1460: /*
1461: IF ( p_Item_Revision_rec.description = FND_API.g_MISS_CHAR ) THEN
1462: x_return_status := FND_API.g_RET_STS_ERROR;
1463: Add_Message ('INV', 'INV_ITM_REV_NULL_DESCRIPTION');
1464: END IF;
1465: */
1466: -- -------------------------------------------

Line 1472: IF ( p_Item_Revision_rec.effectivity_date = FND_API.g_MISS_DATE ) THEN

1468: -- -------------------------------------------
1469:
1470: --Dbms_output.put_line('UPDATE: Checking for missing effectivity date');
1471:
1472: IF ( p_Item_Revision_rec.effectivity_date = FND_API.g_MISS_DATE ) THEN
1473: x_return_status := FND_API.g_RET_STS_ERROR;
1474: Add_Message ('INV', 'INV_ITM_REV_NULL_EFF_DATE');
1475: END IF;
1476:

Line 1473: x_return_status := FND_API.g_RET_STS_ERROR;

1469:
1470: --Dbms_output.put_line('UPDATE: Checking for missing effectivity date');
1471:
1472: IF ( p_Item_Revision_rec.effectivity_date = FND_API.g_MISS_DATE ) THEN
1473: x_return_status := FND_API.g_RET_STS_ERROR;
1474: Add_Message ('INV', 'INV_ITM_REV_NULL_EFF_DATE');
1475: END IF;
1476:
1477: IF x_return_status <> FND_API.g_RET_STS_SUCCESS THEN

Line 1477: IF x_return_status <> FND_API.g_RET_STS_SUCCESS THEN

1473: x_return_status := FND_API.g_RET_STS_ERROR;
1474: Add_Message ('INV', 'INV_ITM_REV_NULL_EFF_DATE');
1475: END IF;
1476:
1477: IF x_return_status <> FND_API.g_RET_STS_SUCCESS THEN
1478: RAISE FND_API.g_EXC_ERROR;
1479: END IF;
1480:
1481: -- ------------------------------------------------------------------------------

Line 1478: RAISE FND_API.g_EXC_ERROR;

1474: Add_Message ('INV', 'INV_ITM_REV_NULL_EFF_DATE');
1475: END IF;
1476:
1477: IF x_return_status <> FND_API.g_RET_STS_SUCCESS THEN
1478: RAISE FND_API.g_EXC_ERROR;
1479: END IF;
1480:
1481: -- ------------------------------------------------------------------------------
1482: -- Revision is not updateable when Effectivity Date is prior to the current date

Line 1522: x_return_status := FND_API.g_RET_STS_ERROR;

1518: IF (( l_orig_effectivity_date < l_sysdate AND
1519: l_orig_implementation_date IS NOT NULL )
1520: OR p_Item_Revision_rec.effectivity_date < l_sysdate ) THEN
1521: --3655522 if rev is not implemented, then we allow changing effectivity date
1522: x_return_status := FND_API.g_RET_STS_ERROR;
1523: Add_Message ('INV','INV_ITM_REV_EFF_DATE_NON_UPD');
1524: RAISE FND_API.g_EXC_ERROR;
1525: END IF;
1526:

Line 1524: RAISE FND_API.g_EXC_ERROR;

1520: OR p_Item_Revision_rec.effectivity_date < l_sysdate ) THEN
1521: --3655522 if rev is not implemented, then we allow changing effectivity date
1522: x_return_status := FND_API.g_RET_STS_ERROR;
1523: Add_Message ('INV','INV_ITM_REV_EFF_DATE_NON_UPD');
1524: RAISE FND_API.g_EXC_ERROR;
1525: END IF;
1526:
1527: END IF;
1528:

Line 1549: IF ( l_return_status = FND_API.g_RET_STS_ERROR ) THEN

1545: p_Item_Revision_rec => p_Item_Revision_rec
1546: , x_return_status => l_return_status
1547: );
1548:
1549: IF ( l_return_status = FND_API.g_RET_STS_ERROR ) THEN
1550: RAISE FND_API.g_EXC_ERROR;
1551: ELSIF ( l_return_status = FND_API.g_RET_STS_UNEXP_ERROR ) THEN
1552: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;
1553: END IF;

Line 1550: RAISE FND_API.g_EXC_ERROR;

1546: , x_return_status => l_return_status
1547: );
1548:
1549: IF ( l_return_status = FND_API.g_RET_STS_ERROR ) THEN
1550: RAISE FND_API.g_EXC_ERROR;
1551: ELSIF ( l_return_status = FND_API.g_RET_STS_UNEXP_ERROR ) THEN
1552: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;
1553: END IF;
1554:

Line 1551: ELSIF ( l_return_status = FND_API.g_RET_STS_UNEXP_ERROR ) THEN

1547: );
1548:
1549: IF ( l_return_status = FND_API.g_RET_STS_ERROR ) THEN
1550: RAISE FND_API.g_EXC_ERROR;
1551: ELSIF ( l_return_status = FND_API.g_RET_STS_UNEXP_ERROR ) THEN
1552: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;
1553: END IF;
1554:
1555: END IF;

Line 1552: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;

1548:
1549: IF ( l_return_status = FND_API.g_RET_STS_ERROR ) THEN
1550: RAISE FND_API.g_EXC_ERROR;
1551: ELSIF ( l_return_status = FND_API.g_RET_STS_UNEXP_ERROR ) THEN
1552: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;
1553: END IF;
1554:
1555: END IF;
1556:

Line 1567: -- RAISE FND_API.g_EXC_ERROR;

1563: -- IF l_orig_lifecycle_id IS NOT NULL AND
1564: -- nvl(p_Item_Revision_rec.lifecycle_id,l_orig_lifecycle_id) <> l_orig_lifecycle_id THEN
1565: --
1566: -- Add_Message ('INV', 'INV_CANNOT_CHANGE_LIFECYCLE');
1567: -- RAISE FND_API.g_EXC_ERROR;
1568: -- END IF;
1569: --
1570: --
1571: -- Now either the user tries to update an existing life cycle (can update only the current phase)

Line 1580: IF l_lifecycle_id = FND_API.g_MISS_NUM THEN

1576: --
1577: -- When the lifecycle id is a MISSING value, then assign NULL to both lifecycle and
1578: -- current phase
1579: --
1580: IF l_lifecycle_id = FND_API.g_MISS_NUM THEN
1581:
1582: l_lifecycle_id := NULL;
1583: l_current_phase_id := NULL;
1584:

Line 1602: ELSIF l_current_phase_id IS NULL OR l_current_phase_id = FND_API.g_MISS_NUM THEN

1598: -- When there is a lifecycle and the current phase id is null or missing, then
1599: -- default it from the database.
1600: -- If the user has passed a valid current phase id, then use that
1601:
1602: ELSIF l_current_phase_id IS NULL OR l_current_phase_id = FND_API.g_MISS_NUM THEN
1603: l_current_phase_id := l_orig_current_phase_id;
1604: END IF;
1605:
1606: ELSIF l_lifecycle_id IS NOT NULL THEN

Line 1613: IF l_current_phase_id IS NULL OR l_current_phase_id = FND_API.g_MISS_NUM THEN

1609: -- or missing for the current phase, then default the old from the database
1610: --
1611: IF l_orig_lifecycle_id IS NOT NULL THEN
1612:
1613: IF l_current_phase_id IS NULL OR l_current_phase_id = FND_API.g_MISS_NUM THEN
1614: l_current_phase_id := l_orig_current_phase_id;
1615: END IF;
1616:
1617: ELSE

Line 1622: IF l_current_phase_id IS NULL OR l_current_phase_id = FND_API.g_MISS_NUM THEN

1618: --
1619: -- If the life cycle does not exist, and the user has passed null or missing for
1620: -- the current phase, then derive the current phase id
1621: --
1622: IF l_current_phase_id IS NULL OR l_current_phase_id = FND_API.g_MISS_NUM THEN
1623:
1624: l_current_phase_id :=
1625: INV_EGO_REVISION_VALIDATE.Get_Initial_Lifecycle_Phase (l_lifecycle_id);
1626: IF l_current_phase_id = 0 THEN

Line 1628: RAISE FND_API.g_EXC_ERROR;

1624: l_current_phase_id :=
1625: INV_EGO_REVISION_VALIDATE.Get_Initial_Lifecycle_Phase (l_lifecycle_id);
1626: IF l_current_phase_id = 0 THEN
1627: Add_Message ('INV', 'INV_REV_LIFECYCLE_INVALID');
1628: RAISE FND_API.g_EXC_ERROR;
1629: END IF;
1630:
1631: END IF;
1632:

Line 1640: ||' ,P_COMMIT => FND_API.G_FALSE '

1636: EXECUTE IMMEDIATE
1637: ' BEGIN '
1638: ||' EGO_INV_ITEM_CATALOG_PVT.VALIDATE_AND_CHANGE_ITEM_LC( '
1639: ||' P_API_VERSION => 1.0 '
1640: ||' ,P_COMMIT => FND_API.G_FALSE '
1641: ||' ,P_INVENTORY_ITEM_ID => :p_Item_Revision_rec.inventory_item_id'
1642: ||' ,P_ORGANIZATION_ID => :p_Item_Revision_rec.organization_id '
1643: ||' ,P_ITEM_REVISION_ID => :p_Item_Revision_rec.revision_id '
1644: ||' ,P_FETCH_CURR_VALUES => FND_API.G_TRUE '

Line 1644: ||' ,P_FETCH_CURR_VALUES => FND_API.G_TRUE '

1640: ||' ,P_COMMIT => FND_API.G_FALSE '
1641: ||' ,P_INVENTORY_ITEM_ID => :p_Item_Revision_rec.inventory_item_id'
1642: ||' ,P_ORGANIZATION_ID => :p_Item_Revision_rec.organization_id '
1643: ||' ,P_ITEM_REVISION_ID => :p_Item_Revision_rec.revision_id '
1644: ||' ,P_FETCH_CURR_VALUES => FND_API.G_TRUE '
1645: ||' ,P_CURR_CC_ID => NULL '
1646: ||' ,P_NEW_CC_ID => NULL '
1647: ||' ,P_CURR_LC_ID => NULL '
1648: ||' ,P_NEW_LC_ID => :l_lifecycle_id '

Line 1651: ||' ,P_IS_NEW_CC_IN_HIER => FND_API.G_TRUE '

1647: ||' ,P_CURR_LC_ID => NULL '
1648: ||' ,P_NEW_LC_ID => :l_lifecycle_id '
1649: ||' ,P_NEW_LCP_ID => :l_current_phase_id '
1650: ||' ,P_CURR_LCP_ID => NULL '
1651: ||' ,P_IS_NEW_CC_IN_HIER => FND_API.G_TRUE '
1652: ||' ,P_CHANGE_ID => NULL '
1653: ||' ,P_CHANGE_LINE_ID => NULL '
1654: ||' ,X_RETURN_STATUS => :l_return_status '
1655: ||' ,X_MSG_COUNT => :l_msg_count '

Line 1670: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1666: OUT l_return_status,
1667: OUT l_msg_count,
1668: OUT l_msg_text;
1669:
1670: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1671: Add_Message (p_message_text => l_msg_text);
1672: RAISE FND_API.g_EXC_ERROR;
1673: END IF;
1674:

Line 1672: RAISE FND_API.g_EXC_ERROR;

1668: OUT l_msg_text;
1669:
1670: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1671: Add_Message (p_message_text => l_msg_text);
1672: RAISE FND_API.g_EXC_ERROR;
1673: END IF;
1674:
1675: --Bug: 3802017 ends
1676:

Line 1678: IF p_Item_Revision_rec.template_id = FND_API.g_MISS_NUM THEN

1674:
1675: --Bug: 3802017 ends
1676:
1677: -- Start :5208102: Supporting template for UDA's at revisions
1678: IF p_Item_Revision_rec.template_id = FND_API.g_MISS_NUM THEN
1679: p_Item_Revision_rec.template_id := NULL;
1680: END IF;
1681: IF p_Item_Revision_rec.template_name = FND_API.g_MISS_CHAR THEN
1682: p_Item_Revision_rec.template_name := NULL;

Line 1681: IF p_Item_Revision_rec.template_name = FND_API.g_MISS_CHAR THEN

1677: -- Start :5208102: Supporting template for UDA's at revisions
1678: IF p_Item_Revision_rec.template_id = FND_API.g_MISS_NUM THEN
1679: p_Item_Revision_rec.template_id := NULL;
1680: END IF;
1681: IF p_Item_Revision_rec.template_name = FND_API.g_MISS_CHAR THEN
1682: p_Item_Revision_rec.template_name := NULL;
1683: END IF;
1684:
1685: IF (p_Item_Revision_rec.template_id IS NOT NULL)

Line 1712: RAISE FND_API.g_EXC_ERROR;

1708: END IF;
1709:
1710: IF l_message_name IS NOT NULL THEN
1711: Add_Message ('INV', l_message_name);
1712: RAISE FND_API.g_EXC_ERROR;
1713: ELSE
1714: l_apply_template := TRUE;
1715: END IF;
1716: END IF;

Line 1767: RAISE FND_API.g_EXC_ERROR;

1763: RETURNING revision_id, object_version_number INTO G_revision_id, G_object_version_number;
1764:
1765: IF ( SQL%NOTFOUND ) THEN
1766: Add_Message ('INV', 'INV_ITM_REVISION_REC_CHANGED');
1767: RAISE FND_API.g_EXC_ERROR;
1768: END IF;
1769:
1770:
1771: --

Line 1867: IF FND_API.To_Boolean (p_commit) THEN

1863: Raise Event if Revision got Updated successfully */
1864:
1865:
1866: -- Standard check of p_commit
1867: IF FND_API.To_Boolean (p_commit) THEN
1868: --INV_ITEM_MSG.Debug(Mctx, 'before COMMIT WORK');
1869: COMMIT WORK;
1870: END IF;
1871:

Line 1883: x_msg_data := fnd_msg_pub.get( x_msg_count,FND_API.G_FALSE);

1879: , p_data => x_msg_data
1880: );
1881: /*Bug 6853558 Added to get the message if count is > 1 */
1882: IF( x_msg_count > 1 ) THEN
1883: x_msg_data := fnd_msg_pub.get( x_msg_count,FND_API.G_FALSE);
1884: END IF;
1885: END IF;
1886:
1887: EXCEPTION

Line 1889: WHEN FND_API.g_EXC_ERROR THEN

1885: END IF;
1886:
1887: EXCEPTION
1888:
1889: WHEN FND_API.g_EXC_ERROR THEN
1890:
1891: ROLLBACK TO Update_Item_Revision_PUB;
1892: x_return_status := FND_API.g_RET_STS_ERROR;
1893:

Line 1892: x_return_status := FND_API.g_RET_STS_ERROR;

1888:
1889: WHEN FND_API.g_EXC_ERROR THEN
1890:
1891: ROLLBACK TO Update_Item_Revision_PUB;
1892: x_return_status := FND_API.g_RET_STS_ERROR;
1893:
1894: IF G_Message_API = 'BOM' THEN
1895: x_msg_count := Error_Handler.Get_Message_Count;
1896: ELSE

Line 1903: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);

1899: , p_data => x_msg_data
1900: );
1901: /*Bug 6853558 Added to get the message if count is > 1 */
1902: IF( x_msg_count > 1 ) THEN
1903: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
1904: END IF;
1905: END IF;
1906:
1907: WHEN FND_API.g_EXC_UNEXPECTED_ERROR THEN

Line 1907: WHEN FND_API.g_EXC_UNEXPECTED_ERROR THEN

1903: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
1904: END IF;
1905: END IF;
1906:
1907: WHEN FND_API.g_EXC_UNEXPECTED_ERROR THEN
1908:
1909: ROLLBACK TO Update_Item_Revision_PUB;
1910: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;
1911:

Line 1910: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;

1906:
1907: WHEN FND_API.g_EXC_UNEXPECTED_ERROR THEN
1908:
1909: ROLLBACK TO Update_Item_Revision_PUB;
1910: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;
1911:
1912: IF G_Message_API = 'BOM' THEN
1913: x_msg_count := Error_Handler.Get_Message_Count;
1914: ELSE

Line 1921: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);

1917: , p_data => x_msg_data
1918: );
1919: /*Bug 6853558 Added to get the message if count is > 1 */
1920: IF( x_msg_count > 1 ) THEN
1921: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
1922: END IF;
1923: END IF;
1924:
1925: WHEN others THEN

Line 1928: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;

1924:
1925: WHEN others THEN
1926:
1927: ROLLBACK TO Update_Item_Revision_PUB;
1928: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;
1929:
1930: Add_Message
1931: ( p_api_name => l_api_name
1932: , p_message_text => 'UNEXP_ERROR : ' || SQLERRM

Line 1944: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);

1940: , p_data => x_msg_data
1941: );
1942: /**Bug 6853558 Added to get the message if count is > 1 */
1943: IF( x_msg_count > 1 ) THEN
1944: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
1945: END IF;
1946: END IF;
1947:
1948: END Update_Item_Revision;

Line 1958: , p_init_msg_list IN VARCHAR2 := FND_API.g_FALSE

1954:
1955: PROCEDURE Lock_Item_Revision
1956: (
1957: p_api_version IN NUMBER
1958: , p_init_msg_list IN VARCHAR2 := FND_API.g_FALSE
1959: , x_return_status OUT NOCOPY VARCHAR2
1960: , x_msg_count OUT NOCOPY NUMBER
1961: , x_msg_data OUT NOCOPY VARCHAR2
1962: , p_inventory_item_id IN NUMBER

Line 1994: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,

1990: -- Standard Start of API savepoint
1991: SAVEPOINT Lock_Item_Revision_PUB;
1992:
1993: -- Check for call compatibility
1994: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
1995: l_api_name, G_PKG_NAME)
1996: THEN
1997: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;
1998: END IF;

Line 1997: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;

1993: -- Check for call compatibility
1994: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
1995: l_api_name, G_PKG_NAME)
1996: THEN
1997: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;
1998: END IF;
1999:
2000: -- Initialize message list
2001: IF G_Message_API = 'FND' THEN

Line 2002: IF FND_API.To_Boolean (p_init_msg_list) THEN

1998: END IF;
1999:
2000: -- Initialize message list
2001: IF G_Message_API = 'FND' THEN
2002: IF FND_API.To_Boolean (p_init_msg_list) THEN
2003: FND_MSG_PUB.Initialize;
2004: END IF;
2005: END IF;
2006:

Line 2012: x_return_status := FND_API.g_RET_STS_SUCCESS;

2008: -- Mctx.Package_Name := G_PKG_NAME;
2009: -- Mctx.Procedure_Name := l_api_name;
2010:
2011: -- Initialize API return status to success
2012: x_return_status := FND_API.g_RET_STS_SUCCESS;
2013:
2014: -- ----------------------------------------------
2015: -- Check if revision exists, and lock the record
2016: -- ----------------------------------------------

Line 2027: RAISE FND_API.g_EXC_ERROR;

2023:
2024: IF ( Item_Revision_Lock_cur%NOTFOUND ) THEN
2025: CLOSE Item_Revision_Lock_cur;
2026: Add_Message ('INV', 'INV_ITM_REVISION_REC_DELETED');
2027: RAISE FND_API.g_EXC_ERROR;
2028: END IF;
2029:
2030: CLOSE Item_Revision_Lock_cur;
2031:

Line 2038: RAISE FND_API.g_EXC_ERROR;

2034: -- -------------------------------------
2035:
2036: IF ( nvl(l_object_version_number,0) <> nvl(p_object_version_number,0) ) THEN
2037: Add_Message ('INV', 'INV_ITM_REVISION_REC_CHANGED');
2038: RAISE FND_API.g_EXC_ERROR;
2039: END IF;
2040:
2041: -- Standard call to get message count and if count is 1, get message info.
2042:

Line 2052: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);

2048: , p_data => x_msg_data
2049: );
2050: /*Bug 6853558 Added to get the message if count is > 1 */
2051: IF( x_msg_count > 1 ) THEN
2052: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
2053: END IF;
2054: END IF;
2055:
2056: EXCEPTION

Line 2058: WHEN FND_API.g_EXC_ERROR THEN

2054: END IF;
2055:
2056: EXCEPTION
2057:
2058: WHEN FND_API.g_EXC_ERROR THEN
2059:
2060: ROLLBACK TO Lock_Item_Revision_PUB;
2061: x_return_status := FND_API.g_RET_STS_ERROR;
2062:

Line 2061: x_return_status := FND_API.g_RET_STS_ERROR;

2057:
2058: WHEN FND_API.g_EXC_ERROR THEN
2059:
2060: ROLLBACK TO Lock_Item_Revision_PUB;
2061: x_return_status := FND_API.g_RET_STS_ERROR;
2062:
2063: IF G_Message_API = 'BOM' THEN
2064: x_msg_count := Error_Handler.Get_Message_Count;
2065: ELSE

Line 2072: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);

2068: , p_data => x_msg_data
2069: );
2070: /*Bug 6853558 Added to get the message if count is > 1 */
2071: IF( x_msg_count > 1 ) THEN
2072: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
2073: END IF;
2074: END IF;
2075:
2076: WHEN FND_API.g_EXC_UNEXPECTED_ERROR THEN

Line 2076: WHEN FND_API.g_EXC_UNEXPECTED_ERROR THEN

2072: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
2073: END IF;
2074: END IF;
2075:
2076: WHEN FND_API.g_EXC_UNEXPECTED_ERROR THEN
2077:
2078: ROLLBACK TO Lock_Item_Revision_PUB;
2079: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;
2080:

Line 2079: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;

2075:
2076: WHEN FND_API.g_EXC_UNEXPECTED_ERROR THEN
2077:
2078: ROLLBACK TO Lock_Item_Revision_PUB;
2079: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;
2080:
2081: IF G_Message_API = 'BOM' THEN
2082: x_msg_count := Error_Handler.Get_Message_Count;
2083: ELSE

Line 2090: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);

2086: , p_data => x_msg_data
2087: );
2088: /*Bug 6853558 Added to get the message if count is > 1 */
2089: IF( x_msg_count > 1 ) THEN
2090: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
2091: END IF;
2092: END IF;
2093:
2094: WHEN others THEN

Line 2097: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;

2093:
2094: WHEN others THEN
2095:
2096: ROLLBACK TO Lock_Item_Revision_PUB;
2097: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;
2098:
2099: Add_Message
2100: ( p_api_name => l_api_name
2101: , p_message_text => 'UNEXP_ERROR : ' || SQLERRM

Line 2113: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);

2109: , p_data => x_msg_data
2110: );
2111: /*Bug 6853558 Added to get the message if count is > 1 */
2112: IF( x_msg_count > 1 ) THEN
2113: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
2114: END IF;
2115: END IF;
2116:
2117: END Lock_Item_Revision;

Line 2127: , p_init_msg_list IN VARCHAR2 := FND_API.g_FALSE

2123:
2124: PROCEDURE Delete_Item_Revision
2125: (
2126: p_api_version IN NUMBER
2127: , p_init_msg_list IN VARCHAR2 := FND_API.g_FALSE
2128: , p_commit IN VARCHAR2 := FND_API.g_FALSE
2129: , p_validation_level IN NUMBER := FND_API.g_VALID_LEVEL_FULL
2130: , x_return_status OUT NOCOPY VARCHAR2
2131: , x_msg_count OUT NOCOPY NUMBER

Line 2128: , p_commit IN VARCHAR2 := FND_API.g_FALSE

2124: PROCEDURE Delete_Item_Revision
2125: (
2126: p_api_version IN NUMBER
2127: , p_init_msg_list IN VARCHAR2 := FND_API.g_FALSE
2128: , p_commit IN VARCHAR2 := FND_API.g_FALSE
2129: , p_validation_level IN NUMBER := FND_API.g_VALID_LEVEL_FULL
2130: , x_return_status OUT NOCOPY VARCHAR2
2131: , x_msg_count OUT NOCOPY NUMBER
2132: , x_msg_data OUT NOCOPY VARCHAR2

Line 2129: , p_validation_level IN NUMBER := FND_API.g_VALID_LEVEL_FULL

2125: (
2126: p_api_version IN NUMBER
2127: , p_init_msg_list IN VARCHAR2 := FND_API.g_FALSE
2128: , p_commit IN VARCHAR2 := FND_API.g_FALSE
2129: , p_validation_level IN NUMBER := FND_API.g_VALID_LEVEL_FULL
2130: , x_return_status OUT NOCOPY VARCHAR2
2131: , x_msg_count OUT NOCOPY NUMBER
2132: , x_msg_data OUT NOCOPY VARCHAR2
2133: , p_inventory_item_id IN NUMBER

Line 2152: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,

2148: -- Standard Start of API savepoint
2149: SAVEPOINT Delete_Item_Revision_PUB;
2150:
2151: -- Check for call compatibility
2152: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
2153: l_api_name, G_PKG_NAME)
2154: THEN
2155: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;
2156: END IF;

Line 2155: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;

2151: -- Check for call compatibility
2152: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
2153: l_api_name, G_PKG_NAME)
2154: THEN
2155: RAISE FND_API.g_EXC_UNEXPECTED_ERROR;
2156: END IF;
2157:
2158: -- Initialize message list
2159: IF G_Message_API = 'FND' THEN

Line 2160: IF FND_API.To_Boolean (p_init_msg_list) THEN

2156: END IF;
2157:
2158: -- Initialize message list
2159: IF G_Message_API = 'FND' THEN
2160: IF FND_API.To_Boolean (p_init_msg_list) THEN
2161: FND_MSG_PUB.Initialize;
2162: END IF;
2163: END IF;
2164:

Line 2170: x_return_status := FND_API.g_RET_STS_SUCCESS;

2166: -- Mctx.Package_Name := G_PKG_NAME;
2167: -- Mctx.Procedure_Name := l_api_name;
2168:
2169: -- Initialize API return status to success
2170: x_return_status := FND_API.g_RET_STS_SUCCESS;
2171:
2172: -- -------------------------
2173: -- Check if revision exists
2174: -- -------------------------

Line 2185: RAISE FND_API.g_EXC_ERROR;

2181:
2182: IF ( Item_Revision_Exists_cur%NOTFOUND ) THEN
2183: CLOSE Item_Revision_Exists_cur;
2184: Add_Message ('INV', 'INV_ITM_REVISION_REC_DELETED');
2185: RAISE FND_API.g_EXC_ERROR;
2186: END IF;
2187:
2188: CLOSE Item_Revision_Exists_cur;
2189:

Line 2196: RAISE FND_API.g_EXC_ERROR;

2192: -- -------------------------------------
2193:
2194: IF ( l_object_version_number <> p_object_version_number ) THEN
2195: Add_Message ('INV', 'INV_ITM_REVISION_REC_CHANGED');
2196: RAISE FND_API.g_EXC_ERROR;
2197: END IF;
2198:
2199: --dbms_output.put_line('DELETE FROM mtl_item_revisions; x_return_status = ' || x_return_status);
2200:

Line 2211: RAISE FND_API.g_EXC_ERROR;

2207: RETURNING revision_id, object_version_number INTO G_revision_id, G_object_version_number;
2208:
2209: IF ( SQL%NOTFOUND ) THEN
2210: Add_Message ('INV', 'INV_ITM_REVISION_REC_CHANGED');
2211: RAISE FND_API.g_EXC_ERROR;
2212: END IF;
2213:
2214: --
2215: -- Remove the corresponding TL entries for this revision record

Line 2232: IF FND_API.To_Boolean (p_commit) THEN

2228:
2229: --dbms_output.put_line('done DELETEing FROM mtl_item_revisions; x_return_status = ' || x_return_status);
2230:
2231: -- Standard check of p_commit
2232: IF FND_API.To_Boolean (p_commit) THEN
2233: --INV_ITEM_MSG.Debug(Mctx, 'before COMMIT WORK');
2234: COMMIT WORK;
2235: END IF;
2236:

Line 2248: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);

2244: , p_data => x_msg_data
2245: );
2246: /*Bug 6853558 Added to get the message if count is > 1 */
2247: IF( x_msg_count > 1 ) THEN
2248: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
2249: END IF;
2250: END IF;
2251:
2252: EXCEPTION

Line 2254: WHEN FND_API.g_EXC_ERROR THEN

2250: END IF;
2251:
2252: EXCEPTION
2253:
2254: WHEN FND_API.g_EXC_ERROR THEN
2255:
2256: ROLLBACK TO Delete_Item_Revision_PUB;
2257: x_return_status := FND_API.g_RET_STS_ERROR;
2258:

Line 2257: x_return_status := FND_API.g_RET_STS_ERROR;

2253:
2254: WHEN FND_API.g_EXC_ERROR THEN
2255:
2256: ROLLBACK TO Delete_Item_Revision_PUB;
2257: x_return_status := FND_API.g_RET_STS_ERROR;
2258:
2259: IF G_Message_API = 'BOM' THEN
2260: x_msg_count := Error_Handler.Get_Message_Count;
2261: ELSE

Line 2268: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);

2264: , p_data => x_msg_data
2265: );
2266: /*Bug 6853558 Added to get the message if count is > 1 */
2267: IF( x_msg_count > 1 ) THEN
2268: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
2269: END IF;
2270: END IF;
2271:
2272: WHEN FND_API.g_EXC_UNEXPECTED_ERROR THEN

Line 2272: WHEN FND_API.g_EXC_UNEXPECTED_ERROR THEN

2268: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
2269: END IF;
2270: END IF;
2271:
2272: WHEN FND_API.g_EXC_UNEXPECTED_ERROR THEN
2273:
2274: ROLLBACK TO Delete_Item_Revision_PUB;
2275: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;
2276:

Line 2275: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;

2271:
2272: WHEN FND_API.g_EXC_UNEXPECTED_ERROR THEN
2273:
2274: ROLLBACK TO Delete_Item_Revision_PUB;
2275: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;
2276:
2277: IF G_Message_API = 'BOM' THEN
2278: x_msg_count := Error_Handler.Get_Message_Count;
2279: ELSE

Line 2286: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);

2282: , p_data => x_msg_data
2283: );
2284: /*Bug 6853558 Added to get the message if count is > 1 */
2285: IF( x_msg_count > 1 ) THEN
2286: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
2287: END IF;
2288: END IF;
2289:
2290: WHEN others THEN

Line 2293: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;

2289:
2290: WHEN others THEN
2291:
2292: ROLLBACK TO Delete_Item_Revision_PUB;
2293: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;
2294:
2295: Add_Message
2296: ( p_api_name => l_api_name
2297: , p_message_text => 'UNEXP_ERROR : ' || SQLERRM

Line 2309: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);

2305: , p_data => x_msg_data
2306: );
2307: /*Bug 6853558 Added to get the message if count is > 1 */
2308: IF( x_msg_count > 1 ) THEN
2309: x_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
2310: END IF;
2311: END IF;
2312:
2313: END Delete_Item_Revision;

Line 2352: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE

2348: , p_template_name IN VARCHAR2 := NULL --5208102
2349: , p_language_code IN VARCHAR2 := 'US'
2350: , p_transaction_type IN VARCHAR2
2351: , p_message_api IN VARCHAR2 := 'FND'
2352: , p_init_msg_list IN VARCHAR2 := FND_API.G_TRUE
2353: , x_Return_Status OUT NOCOPY VARCHAR2
2354: , x_msg_count OUT NOCOPY NUMBER
2355: , x_msg_data OUT NOCOPY VARCHAR2 /*Added for bug 8679971 to ensure error message is returned back*/
2356: , x_revision_id IN OUT NOCOPY NUMBER

Line 2385: IF FND_API.To_Boolean (p_init_msg_list) THEN

2381: G_Sysdate := SYSDATE;
2382:
2383: -- Initialize message list
2384: IF G_Message_API = 'BOM' THEN
2385: IF FND_API.To_Boolean (p_init_msg_list) THEN
2386: Error_Handler.Initialize;
2387: Error_Handler.Set_BO_Identifier ('INV_ITEM_REVISION');
2388: END IF;
2389: ELSE

Line 2391: IF FND_API.To_Boolean (p_init_msg_list) THEN

2387: Error_Handler.Set_BO_Identifier ('INV_ITEM_REVISION');
2388: END IF;
2389: ELSE
2390: /* G_Message_API = 'FND' THEN */
2391: IF FND_API.To_Boolean (p_init_msg_list) THEN
2392: FND_MSG_PUB.Initialize;
2393: END IF;
2394: END IF;
2395:

Line 2409: IF l_debug_return_status <> FND_API.g_RET_STS_SUCCESS THEN

2405: , x_return_status => l_debug_return_status
2406: , x_error_mesg => l_debug_error_message
2407: );
2408:
2409: IF l_debug_return_status <> FND_API.g_RET_STS_SUCCESS THEN
2410: -- Debug fail information can be inserted into the error table
2411: Null;
2412: END IF;
2413:

Line 2451: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;

2447: Bom_Globals.G_OPR_UPDATE,
2448: Bom_Globals.G_OPR_DELETE) THEN
2449:
2450: Add_Message ('INV', 'INV_INVALID_TRANS_TYPE');
2451: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;
2452:
2453: IF G_Message_API = 'BOM' THEN
2454: x_msg_count := Error_Handler.Get_Message_Count;
2455: ELSE

Line 2462: l_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);

2458: , p_data => l_msg_data
2459: );
2460: /*Bug 6853558 Added to get the message if count is > 1 */
2461: IF( x_msg_count > 1 ) THEN
2462: l_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
2463: END IF;
2464: END IF;
2465:
2466: IF Error_Handler.Get_Debug = 'Y' THEN

Line 2513: l_item_revision_rec.lifecycle_id := NVL(p_lifecycle_id,FND_API.G_MISS_NUM);

2509: l_item_revision_rec.revision_label := p_revision_label;
2510: l_item_revision_rec.revision_reason := p_revision_reason;
2511: --35557001
2512: -- lifecycle can be null, for API compatability, change it to MISS_NUM
2513: l_item_revision_rec.lifecycle_id := NVL(p_lifecycle_id,FND_API.G_MISS_NUM);
2514: l_item_revision_rec.current_phase_id := NVL(p_current_phase_id,FND_API.G_MISS_NUM);
2515:
2516: -- 5208102: Supporting template for UDA's at revisions
2517: l_item_revision_rec.template_id := p_template_id;

Line 2514: l_item_revision_rec.current_phase_id := NVL(p_current_phase_id,FND_API.G_MISS_NUM);

2510: l_item_revision_rec.revision_reason := p_revision_reason;
2511: --35557001
2512: -- lifecycle can be null, for API compatability, change it to MISS_NUM
2513: l_item_revision_rec.lifecycle_id := NVL(p_lifecycle_id,FND_API.G_MISS_NUM);
2514: l_item_revision_rec.current_phase_id := NVL(p_current_phase_id,FND_API.G_MISS_NUM);
2515:
2516: -- 5208102: Supporting template for UDA's at revisions
2517: l_item_revision_rec.template_id := p_template_id;
2518: l_item_revision_rec.template_name := p_template_name;

Line 2532: , p_init_msg_list => FND_API.G_TRUE

2528:
2529: Create_Item_Revision
2530: (
2531: p_api_version => 1.0
2532: , p_init_msg_list => FND_API.G_TRUE
2533: , x_return_status => x_return_status
2534: , x_msg_count => x_msg_count
2535: , x_msg_data => l_msg_data
2536: , p_Item_Revision_rec => l_item_revision_rec

Line 2561: , p_init_msg_list => FND_API.G_TRUE

2557:
2558: Update_Item_Revision
2559: (
2560: p_api_version => 1.0
2561: , p_init_msg_list => FND_API.G_TRUE
2562: , x_return_status => x_return_status
2563: , x_msg_count => x_msg_count
2564: , x_msg_data => l_msg_data
2565: , p_Item_Revision_rec => l_item_revision_rec

Line 2576: , p_init_msg_list => FND_API.G_TRUE

2572:
2573: Delete_Item_Revision
2574: (
2575: p_api_version => 1.0
2576: , p_init_msg_list => FND_API.G_TRUE
2577: , x_return_status => x_return_status
2578: , x_msg_count => x_msg_count
2579: , x_msg_data => l_msg_data
2580: , p_inventory_item_id => p_inventory_item_id

Line 2599: IF (l_item_revision_rec.transaction_type = Bom_Globals.G_OPR_CREATE or l_inherit =1) AND (x_return_status = FND_API. G_RET_STS_SUCCESS) Then

2595: -- bug 8986750, save the msg before calling inherit_icc_components
2596: x_msg_data := l_msg_data;
2597: --IF (l_item_revision_rec.transaction_type = Bom_Globals.G_OPR_CREATE or l_inherit =1) Then
2598: -- start Bug 13865319 added and condition
2599: IF (l_item_revision_rec.transaction_type = Bom_Globals.G_OPR_CREATE or l_inherit =1) AND (x_return_status = FND_API. G_RET_STS_SUCCESS) Then
2600: -- end Bug 13865319 added and condition
2601:
2602: EGO_ICC_STRUCTURE_PVT.inherit_icc_components(
2603: p_inventory_item_id => p_inventory_item_id,

Line 2618: x_Return_Status := FND_API.G_RET_STS_SUCCESS;

2614: -- bug 8986750, append the msg of inherit_icc_components with prev msg
2615: l_msg_data := x_msg_data || ' ' || l_msg_data;
2616: -- start Bug 13865319 change the return status to S incase of 0 , E in case of 1 and U for remaining
2617: IF x_Return_Status = 0 THEN
2618: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
2619: ELSIF x_Return_Status = 1 THEN
2620: x_Return_Status := FND_API.G_RET_STS_ERROR;
2621: ELSE
2622: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2620: x_Return_Status := FND_API.G_RET_STS_ERROR;

2616: -- start Bug 13865319 change the return status to S incase of 0 , E in case of 1 and U for remaining
2617: IF x_Return_Status = 0 THEN
2618: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
2619: ELSIF x_Return_Status = 1 THEN
2620: x_Return_Status := FND_API.G_RET_STS_ERROR;
2621: ELSE
2622: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
2623: END IF;
2624: -- end Bug 13865319 change the return status to S incase of 0 , E in case of 1 and U for remaining

Line 2622: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;

2618: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
2619: ELSIF x_Return_Status = 1 THEN
2620: x_Return_Status := FND_API.G_RET_STS_ERROR;
2621: ELSE
2622: x_Return_Status := FND_API.G_RET_STS_UNEXP_ERROR;
2623: END IF;
2624: -- end Bug 13865319 change the return status to S incase of 0 , E in case of 1 and U for remaining
2625: End If;
2626: /* End of inherit components... */

Line 2636: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;

2632: x_msg_data := l_msg_data;
2633: /*End of comment*/
2634: EXCEPTION WHEN OTHERS THEN
2635:
2636: x_return_status := FND_API.g_RET_STS_UNEXP_ERROR;
2637:
2638: Add_Message
2639: ( p_api_name => l_api_name
2640: , p_message_text => 'UNEXP_ERROR : ' || SQLERRM

Line 2652: l_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);

2648: , p_data => l_msg_data
2649: );
2650: /*Bug 6853558 Added to get the message if count is > 1 */
2651: IF( x_msg_count > 1 ) THEN
2652: l_msg_data := fnd_msg_pub.get(x_msg_count,FND_API.G_FALSE);
2653: END IF;
2654: END IF;
2655:
2656: IF Error_Handler.Get_Debug = 'Y' THEN