50: IS
51: BEGIN
52:
53: x_business_plan_rec.Business_Plan_ID
54: := BIS_UTILITIES_PVT.CheckMissNum(p_business_plan_rec.Business_Plan_ID);
55: x_business_plan_rec.Business_Plan_Short_Name
56: := BIS_UTILITIES_PVT.CheckMissChar
57: (p_business_plan_rec.Business_Plan_Short_Name);
58: x_business_plan_rec.Business_Plan_Name
52:
53: x_business_plan_rec.Business_Plan_ID
54: := BIS_UTILITIES_PVT.CheckMissNum(p_business_plan_rec.Business_Plan_ID);
55: x_business_plan_rec.Business_Plan_Short_Name
56: := BIS_UTILITIES_PVT.CheckMissChar
57: (p_business_plan_rec.Business_Plan_Short_Name);
58: x_business_plan_rec.Business_Plan_Name
59: := BIS_UTILITIES_PVT.CheckMissChar(p_business_plan_rec.Business_Plan_Name);
60: x_business_plan_rec.Description
55: x_business_plan_rec.Business_Plan_Short_Name
56: := BIS_UTILITIES_PVT.CheckMissChar
57: (p_business_plan_rec.Business_Plan_Short_Name);
58: x_business_plan_rec.Business_Plan_Name
59: := BIS_UTILITIES_PVT.CheckMissChar(p_business_plan_rec.Business_Plan_Name);
60: x_business_plan_rec.Description
61: := BIS_UTILITIES_PVT.CheckMissChar(p_business_plan_rec.Description);
62: x_business_plan_rec.Version_Number
63: := BIS_UTILITIES_PVT.CheckMissNum(p_business_plan_rec.Version_Number);
57: (p_business_plan_rec.Business_Plan_Short_Name);
58: x_business_plan_rec.Business_Plan_Name
59: := BIS_UTILITIES_PVT.CheckMissChar(p_business_plan_rec.Business_Plan_Name);
60: x_business_plan_rec.Description
61: := BIS_UTILITIES_PVT.CheckMissChar(p_business_plan_rec.Description);
62: x_business_plan_rec.Version_Number
63: := BIS_UTILITIES_PVT.CheckMissNum(p_business_plan_rec.Version_Number);
64: x_business_plan_rec.Current_Plan_Flag
65: := BIS_UTILITIES_PVT.CheckMissChar(p_business_plan_rec.Current_Plan_Flag);
59: := BIS_UTILITIES_PVT.CheckMissChar(p_business_plan_rec.Business_Plan_Name);
60: x_business_plan_rec.Description
61: := BIS_UTILITIES_PVT.CheckMissChar(p_business_plan_rec.Description);
62: x_business_plan_rec.Version_Number
63: := BIS_UTILITIES_PVT.CheckMissNum(p_business_plan_rec.Version_Number);
64: x_business_plan_rec.Current_Plan_Flag
65: := BIS_UTILITIES_PVT.CheckMissChar(p_business_plan_rec.Current_Plan_Flag);
66:
67: EXCEPTION
61: := BIS_UTILITIES_PVT.CheckMissChar(p_business_plan_rec.Description);
62: x_business_plan_rec.Version_Number
63: := BIS_UTILITIES_PVT.CheckMissNum(p_business_plan_rec.Version_Number);
64: x_business_plan_rec.Current_Plan_Flag
65: := BIS_UTILITIES_PVT.CheckMissChar(p_business_plan_rec.Current_Plan_Flag);
66:
67: EXCEPTION
68: WHEN FND_API.G_EXC_ERROR THEN
69: RAISE;
153: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
154: RAISE;
155: WHEN OTHERS THEN
156: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
157: BIS_UTILITIES_PVT.Add_Error_Message
158: ( p_error_table => x_error_Tbl
159: , p_error_msg_id => SQLCODE
160: , p_error_description => SQLERRM
161: , x_error_table => x_error_Tbl
210: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
211: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
212: when others then
213: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
214: BIS_UTILITIES_PVT.Add_Error_Message
215: ( p_error_msg_id => SQLCODE
216: , p_error_description => SQLERRM
217: , p_error_proc_name => G_PKG_NAME||'.Retrieve_Business_Plans'
218: );
259: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
260: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
261: when others then
262: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
263: BIS_UTILITIES_PVT.Add_Error_Message
264: ( p_error_msg_id => SQLCODE
265: , p_error_description => SQLERRM
266: , p_error_proc_name => G_PKG_NAME||'.Retrieve_Business_Plan'
267: );
291:
292: EXCEPTION
293: when others then
294: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
295: BIS_UTILITIES_PVT.Add_Error_Message
296: ( p_error_msg_id => SQLCODE
297: , p_error_description => SQLERRM
298: , p_error_proc_name => G_PKG_NAME||'.Retrieve_Business_Plan'
299: );
422: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
424: when others then
425: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
426: BIS_UTILITIES_PVT.Add_Error_Message
427: ( p_error_msg_id => SQLCODE
428: , p_error_description => SQLERRM
429: , p_error_proc_name => G_PKG_NAME||'.Create_Business_Plan'
430: );
454:
455: EXCEPTION
456: when others then
457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
458: BIS_UTILITIES_PVT.Add_Error_Message
459: ( p_error_msg_id => SQLCODE
460: , p_error_description => SQLERRM
461: , p_error_proc_name => G_PKG_NAME||'.Retrieve_Business_Plan'
462: );
548: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
549: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
550: when others then
551: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
552: BIS_UTILITIES_PVT.Add_Error_Message
553: ( p_error_msg_id => SQLCODE
554: , p_error_description => SQLERRM
555: , p_error_proc_name => G_PKG_NAME||'.Update_Business_Plan'
556: );
581:
582: EXCEPTION
583: when others then
584: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
585: BIS_UTILITIES_PVT.Add_Error_Message
586: ( p_error_msg_id => SQLCODE
587: , p_error_description => SQLERRM
588: , p_error_proc_name => G_PKG_NAME||'.Retrieve_Business_Plan'
589: );
663: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
664: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
665: when others then
666: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
667: BIS_UTILITIES_PVT.Add_Error_Message
668: ( p_error_msg_id => SQLCODE
669: , p_error_description => SQLERRM
670: , p_error_proc_name => G_PKG_NAME||'.Translate_Business_Plan'
671: );
695: );
696:
697: EXCEPTION
698: when FND_API.G_EXC_ERROR then
699: BIS_UTILITIES_PVT.concatenateErrorTables( x_error_Tbl
700: , l_error_Tbl
701: , x_error_tbl
702: );
703: x_return_status := FND_API.G_RET_STS_ERROR;
718: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
719: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
720: when others then
721: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
722: BIS_UTILITIES_PVT.Add_Error_Message
723: ( p_error_msg_id => SQLCODE
724: , p_error_description => SQLERRM
725: , p_error_proc_name => G_PKG_NAME||'.Validate_Business_Plan'
726: );
766: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
767: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
768: when others then
769: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
770: BIS_UTILITIES_PVT.Add_Error_Message
771: ( p_error_msg_id => SQLCODE
772: , p_error_description => SQLERRM
773: , p_error_proc_name => G_PKG_NAME||'.Value_ID_Conversion'
774: );
804: WHERE name = p_Business_Plan_Name
805: AND language = userenv('LANG');
806: else
807:
808: BIS_UTILITIES_PVT.Add_Error_Message
809: ( p_error_msg_name => 'BIS_NAME_SHORT_NAME_MISSING'
810: , p_error_msg_level => FND_MSG_PUB.G_MSG_LVL_ERROR
811: , p_error_proc_name => G_PKG_NAME||'.Value_ID_Conversion'
812: , p_error_type => BIS_UTILITIES_PUB.G_ERROR
826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
827: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
828: when others then
829: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
830: BIS_UTILITIES_PVT.Add_Error_Message
831: ( p_error_msg_id => SQLCODE
832: , p_error_description => SQLERRM
833: , p_error_proc_name => G_PKG_NAME||'.Value_ID_Conversion'
834: );