97:
98: -- If there is an error in conversion precessing, raise an error.
99: IF l_any_errors
100: THEN
101: raise FND_API.G_EXC_ERROR;
102: END IF;
103:
104: END CONVERT_CSC_CUST_PLANS;
105:
355: -- Standard Start of API savepoint
356: SAVEPOINT CREATE_CUST_PLANS_PUB;
357:
358: -- Standard call to check for call compatibility.
359: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
360: p_api_version_number,
361: l_api_name,
362: G_PKG_NAME)
363: THEN
360: p_api_version_number,
361: l_api_name,
362: G_PKG_NAME)
363: THEN
364: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
365: END IF;
366:
367: -- Initialize message list if p_init_msg_list is set to TRUE.
368: IF FND_API.to_Boolean( p_init_msg_list )
364: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
365: END IF;
366:
367: -- Initialize message list if p_init_msg_list is set to TRUE.
368: IF FND_API.to_Boolean( p_init_msg_list )
369: THEN
370: FND_MSG_PUB.initialize;
371: END IF;
372:
370: FND_MSG_PUB.initialize;
371: END IF;
372:
373: -- Initialize API return status to SUCCESS
374: x_return_status := FND_API.G_RET_STS_SUCCESS;
375:
376: -- Convert the values to ids
377: --
378: CONVERT_CSC_CUST_PLANS (
383: -- Hint: Primary key needs to be returned
384:
385: CSC_cust_plans_PVT.Create_cust_plans(
386: P_Api_Version_Number => 1.0,
387: P_Init_Msg_List => FND_API.G_FALSE,
388: P_Commit => FND_API.G_FALSE,
389: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
390: P_CSC_CUST_PLANS_Rec => l_pvt_CSC_CUST_PLANS_Rec ,
391: X_CUST_PLAN_ID => x_CUST_PLAN_ID,
384:
385: CSC_cust_plans_PVT.Create_cust_plans(
386: P_Api_Version_Number => 1.0,
387: P_Init_Msg_List => FND_API.G_FALSE,
388: P_Commit => FND_API.G_FALSE,
389: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
390: P_CSC_CUST_PLANS_Rec => l_pvt_CSC_CUST_PLANS_Rec ,
391: X_CUST_PLAN_ID => x_CUST_PLAN_ID,
392: X_OBJECT_VERSION_NUMBER => x_object_version_number,
385: CSC_cust_plans_PVT.Create_cust_plans(
386: P_Api_Version_Number => 1.0,
387: P_Init_Msg_List => FND_API.G_FALSE,
388: P_Commit => FND_API.G_FALSE,
389: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
390: P_CSC_CUST_PLANS_Rec => l_pvt_CSC_CUST_PLANS_Rec ,
391: X_CUST_PLAN_ID => x_CUST_PLAN_ID,
392: X_OBJECT_VERSION_NUMBER => x_object_version_number,
393: X_Return_Status => x_return_status,
394: X_Msg_Count => x_msg_count,
395: X_Msg_Data => x_msg_data);
396:
397: -- Check return status from the above procedure call
398: IF x_return_status = FND_API.G_RET_STS_ERROR then
399: raise FND_API.G_EXC_ERROR;
400: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
401: raise FND_API.G_EXC_UNEXPECTED_ERROR;
402: END IF;
395: X_Msg_Data => x_msg_data);
396:
397: -- Check return status from the above procedure call
398: IF x_return_status = FND_API.G_RET_STS_ERROR then
399: raise FND_API.G_EXC_ERROR;
400: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
401: raise FND_API.G_EXC_UNEXPECTED_ERROR;
402: END IF;
403:
396:
397: -- Check return status from the above procedure call
398: IF x_return_status = FND_API.G_RET_STS_ERROR then
399: raise FND_API.G_EXC_ERROR;
400: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
401: raise FND_API.G_EXC_UNEXPECTED_ERROR;
402: END IF;
403:
404: -- Standard check for p_commit
397: -- Check return status from the above procedure call
398: IF x_return_status = FND_API.G_RET_STS_ERROR then
399: raise FND_API.G_EXC_ERROR;
400: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
401: raise FND_API.G_EXC_UNEXPECTED_ERROR;
402: END IF;
403:
404: -- Standard check for p_commit
405: IF FND_API.to_Boolean( p_commit )
401: raise FND_API.G_EXC_UNEXPECTED_ERROR;
402: END IF;
403:
404: -- Standard check for p_commit
405: IF FND_API.to_Boolean( p_commit )
406: THEN
407: COMMIT WORK;
408: END IF;
409:
412: ( p_count => x_msg_count,
413: p_data => x_msg_data );
414:
415: EXCEPTION
416: WHEN FND_API.G_EXC_ERROR THEN
417: CSC_CORE_UTILS_PVT.HANDLE_EXCEPTIONS(
418: P_API_NAME => L_API_NAME,
419: P_PKG_NAME => G_PKG_NAME,
420: P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR,
423: X_MSG_DATA => X_MSG_DATA,
424: X_RETURN_STATUS => X_RETURN_STATUS);
425: --APP_EXCEPTION.RAISE_EXCEPTION;
426:
427: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
428: CSC_CORE_UTILS_PVT.HANDLE_EXCEPTIONS(
429: P_API_NAME => L_API_NAME,
430: P_PKG_NAME => G_PKG_NAME,
431: P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR,
595: -- Standard Start of API savepoint
596: SAVEPOINT UPDATE_CUST_PLANS_PUB;
597:
598: -- Standard call to check for call compatibility.
599: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
600: p_api_version_number,
601: l_api_name,
602: G_PKG_NAME)
603: THEN
600: p_api_version_number,
601: l_api_name,
602: G_PKG_NAME)
603: THEN
604: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
605: END IF;
606:
607: -- Initialize message list if p_init_msg_list is set to TRUE.
608: IF FND_API.to_Boolean( p_init_msg_list )
604: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
605: END IF;
606:
607: -- Initialize message list if p_init_msg_list is set to TRUE.
608: IF FND_API.to_Boolean( p_init_msg_list )
609: THEN
610: FND_MSG_PUB.initialize;
611: END IF;
612:
610: FND_MSG_PUB.initialize;
611: END IF;
612:
613: -- Initialize API return status to SUCCESS
614: x_return_status := FND_API.G_RET_STS_SUCCESS;
615:
616: -- Convert the values to ids
617: --
618: CONVERT_CSC_CUST_PLANS (
620: x_pvt_CSC_CUST_PLANS_rec => l_pvt_CSC_CUST_PLANS_rec );
621:
622: CSC_cust_plans_PVT.Update_cust_plans(
623: P_Api_Version_Number => 1.0,
624: P_Init_Msg_List => FND_API.G_FALSE,
625: P_Commit => p_commit,
626: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
627: P_CSC_CUST_PLANS_Rec => l_pvt_CSC_CUST_PLANS_Rec ,
628: X_OBJECT_VERSION_NUMBER => x_object_version_number,
622: CSC_cust_plans_PVT.Update_cust_plans(
623: P_Api_Version_Number => 1.0,
624: P_Init_Msg_List => FND_API.G_FALSE,
625: P_Commit => p_commit,
626: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
627: P_CSC_CUST_PLANS_Rec => l_pvt_CSC_CUST_PLANS_Rec ,
628: X_OBJECT_VERSION_NUMBER => x_object_version_number,
629: X_Return_Status => x_return_status,
630: X_Msg_Count => x_msg_count,
630: X_Msg_Count => x_msg_count,
631: X_Msg_Data => x_msg_data);
632:
633: -- Check return status from the above procedure call
634: IF x_return_status = FND_API.G_RET_STS_ERROR then
635: raise FND_API.G_EXC_ERROR;
636: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
637: raise FND_API.G_EXC_UNEXPECTED_ERROR;
638: END IF;
631: X_Msg_Data => x_msg_data);
632:
633: -- Check return status from the above procedure call
634: IF x_return_status = FND_API.G_RET_STS_ERROR then
635: raise FND_API.G_EXC_ERROR;
636: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
637: raise FND_API.G_EXC_UNEXPECTED_ERROR;
638: END IF;
639:
632:
633: -- Check return status from the above procedure call
634: IF x_return_status = FND_API.G_RET_STS_ERROR then
635: raise FND_API.G_EXC_ERROR;
636: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
637: raise FND_API.G_EXC_UNEXPECTED_ERROR;
638: END IF;
639:
640: -- Standard check for p_commit
633: -- Check return status from the above procedure call
634: IF x_return_status = FND_API.G_RET_STS_ERROR then
635: raise FND_API.G_EXC_ERROR;
636: elsif x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
637: raise FND_API.G_EXC_UNEXPECTED_ERROR;
638: END IF;
639:
640: -- Standard check for p_commit
641: IF FND_API.to_Boolean( p_commit )
637: raise FND_API.G_EXC_UNEXPECTED_ERROR;
638: END IF;
639:
640: -- Standard check for p_commit
641: IF FND_API.to_Boolean( p_commit )
642: THEN
643: COMMIT WORK;
644: END IF;
645:
648: ( p_count => x_msg_count,
649: p_data => x_msg_data );
650:
651: EXCEPTION
652: WHEN FND_API.G_EXC_ERROR THEN
653: CSC_CORE_UTILS_PVT.HANDLE_EXCEPTIONS(
654: P_API_NAME => L_API_NAME,
655: P_PKG_NAME => G_PKG_NAME,
656: P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR,
659: X_MSG_DATA => X_MSG_DATA,
660: X_RETURN_STATUS => X_RETURN_STATUS);
661: --APP_EXCEPTION.RAISE_EXCEPTION;
662:
663: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
664: CSC_CORE_UTILS_PVT.HANDLE_EXCEPTIONS(
665: P_API_NAME => L_API_NAME,
666: P_PKG_NAME => G_PKG_NAME,
667: P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR,
704: -- Standard Start of API savepoint
705: SAVEPOINT ENABLE_PLAN_PUB;
706:
707: -- Standard call to check for call compatibility.
708: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
709: p_api_version_number,
710: l_api_name,
711: G_PKG_NAME)
712: THEN
709: p_api_version_number,
710: l_api_name,
711: G_PKG_NAME)
712: THEN
713: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
714: END IF;
715:
716: -- Initialize message list if p_init_msg_list is set to TRUE.
717: IF FND_API.to_Boolean( p_init_msg_list )
713: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
714: END IF;
715:
716: -- Initialize message list if p_init_msg_list is set to TRUE.
717: IF FND_API.to_Boolean( p_init_msg_list )
718: THEN
719: FND_MSG_PUB.initialize;
720: END IF;
721:
719: FND_MSG_PUB.initialize;
720: END IF;
721:
722: -- Initialize API return status to SUCCESS
723: x_return_status := FND_API.G_RET_STS_SUCCESS;
724:
725: l_csc_cust_plans_rec.plan_status_code := p_plan_status_code;
726: l_csc_cust_plans_rec.plan_id := p_plan_id;
727: l_csc_cust_plans_rec.object_version_number := 1;
733: csc_cust_plans_pvt.update_cust_plans(
734: P_Api_Version_Number => p_api_version_number,
735: P_Init_Msg_List => p_init_msg_list,
736: P_Commit => p_commit,
737: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
738: P_CSC_CUST_PLANS_Rec => l_csc_cust_plans_rec,
739: X_OBJECT_VERSION_NUMBER => x_object_version_number,
740: X_Return_Status => x_return_status,
741: X_Msg_Count => x_msg_count,
740: X_Return_Status => x_return_status,
741: X_Msg_Count => x_msg_count,
742: X_Msg_Data => x_msg_data );
743:
744: if ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) then
745: APP_EXCEPTION.RAISE_EXCEPTION;
746: end if;
747:
748: -- Standard check for p_commit
745: APP_EXCEPTION.RAISE_EXCEPTION;
746: end if;
747:
748: -- Standard check for p_commit
749: IF FND_API.to_Boolean( p_commit )
750: THEN
751: COMMIT WORK;
752: END IF;
753:
778: -- Standard Start of API savepoint
779: SAVEPOINT DISABLE_PLAN_PUB;
780:
781: -- Standard call to check for call compatibility.
782: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
783: p_api_version_number,
784: l_api_name,
785: G_PKG_NAME)
786: THEN
783: p_api_version_number,
784: l_api_name,
785: G_PKG_NAME)
786: THEN
787: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
788: END IF;
789:
790: -- Initialize message list if p_init_msg_list is set to TRUE.
791: IF FND_API.to_Boolean( p_init_msg_list )
787: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
788: END IF;
789:
790: -- Initialize message list if p_init_msg_list is set to TRUE.
791: IF FND_API.to_Boolean( p_init_msg_list )
792: THEN
793: FND_MSG_PUB.initialize;
794: END IF;
795:
793: FND_MSG_PUB.initialize;
794: END IF;
795:
796: -- Initialize API return status to SUCCESS
797: x_return_status := FND_API.G_RET_STS_SUCCESS;
798:
799: l_csc_cust_plans_rec.plan_status_code := p_plan_status_code;
800: l_csc_cust_plans_rec.plan_id := p_plan_id;
801: l_csc_cust_plans_rec.object_version_number := 1;
803: csc_cust_plans_pvt.update_cust_plans(
804: P_Api_Version_Number => p_api_version_number,
805: P_Init_Msg_List => p_init_msg_list,
806: P_Commit => p_commit,
807: p_validation_level => FND_API.G_VALID_LEVEL_NONE,
808: P_CSC_CUST_PLANS_Rec => l_csc_cust_plans_rec,
809: X_OBJECT_VERSION_NUMBER => x_object_version_number,
810: X_Return_Status => x_return_status,
811: X_Msg_Count => x_msg_count,
810: X_Return_Status => x_return_status,
811: X_Msg_Count => x_msg_count,
812: X_Msg_Data => x_msg_data );
813:
814: if ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) then
815: APP_EXCEPTION.RAISE_EXCEPTION;
816: end if;
817:
818: -- Standard check for p_commit
815: APP_EXCEPTION.RAISE_EXCEPTION;
816: end if;
817:
818: -- Standard check for p_commit
819: IF FND_API.to_Boolean( p_commit )
820: THEN
821: COMMIT WORK;
822: END IF;
823:
845: -- Standard Start of API savepoint
846: SAVEPOINT DELETE_CUST_PLANS_PUB;
847:
848: -- Standard call to check for call compatibility.
849: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
850: p_api_version_number,
851: l_api_name,
852: G_PKG_NAME)
853: THEN
850: p_api_version_number,
851: l_api_name,
852: G_PKG_NAME)
853: THEN
854: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
855: END IF;
856:
857: -- Initialize message list if p_init_msg_list is set to TRUE.
858: IF FND_API.to_Boolean( p_init_msg_list )
854: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
855: END IF;
856:
857: -- Initialize message list if p_init_msg_list is set to TRUE.
858: IF FND_API.to_Boolean( p_init_msg_list )
859: THEN
860: FND_MSG_PUB.initialize;
861: END IF;
862:
860: FND_MSG_PUB.initialize;
861: END IF;
862:
863: -- Initialize API return status to SUCCESS
864: x_return_status := FND_API.G_RET_STS_SUCCESS;
865:
866: CSC_CUST_PLANS_PKG.Delete_Row(
867: P_CUST_PLAN_ID => P_CUST_PLAN_ID);
868:
866: CSC_CUST_PLANS_PKG.Delete_Row(
867: P_CUST_PLAN_ID => P_CUST_PLAN_ID);
868:
869: -- Standard check for p_commit
870: IF FND_API.to_Boolean( p_commit )
871: THEN
872: COMMIT WORK;
873: END IF;
874:
877: ( p_count => x_msg_count,
878: p_data => x_msg_data );
879:
880: EXCEPTION
881: WHEN FND_API.G_EXC_ERROR THEN
882: CSC_CORE_UTILS_PVT.HANDLE_EXCEPTIONS(
883: P_API_NAME => L_API_NAME,
884: P_PKG_NAME => G_PKG_NAME,
885: P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR,
888: X_MSG_DATA => X_MSG_DATA,
889: X_RETURN_STATUS => X_RETURN_STATUS);
890: --APP_EXCEPTION.RAISE_EXCEPTION;
891:
892: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
893: CSC_CORE_UTILS_PVT.HANDLE_EXCEPTIONS(
894: P_API_NAME => L_API_NAME,
895: P_PKG_NAME => G_PKG_NAME,
896: P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR,