1: PACKAGE BODY MRP_Src_Assignment_PUB AS
2: /* $Header: MRPPASNB.pls 120.2 2005/06/27 17:09:55 ichoudhu noship $ */
3:
4: -- Global constant holding the package name
5:
2: /* $Header: MRPPASNB.pls 120.2 2005/06/27 17:09:55 ichoudhu noship $ */
3:
4: -- Global constant holding the package name
5:
6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'MRP_Src_Assignment_PUB';
7:
8: -- Forward declaration of Procedure Id_To_Value
9:
10: PROCEDURE Id_To_Value
385: IS
386: l_api_version_number CONSTANT NUMBER := 1.0;
387: l_api_name CONSTANT VARCHAR2(30):= 'Get_Assignment';
388: l_Assignment_Set_Id NUMBER := p_Assignment_Set_Id;
389: l_Assignment_Set_rec MRP_Src_Assignment_PUB.Assignment_Set_Rec_Type;
390: l_Assignment_Set_val_rec MRP_Src_Assignment_PUB.Assignment_Set_Val_Rec_Type;
391: l_Assignment_tbl MRP_Src_Assignment_PUB.Assignment_Tbl_Type;
392: l_Assignment_val_tbl MRP_Src_Assignment_PUB.Assignment_Val_Tbl_Type;
393: BEGIN
386: l_api_version_number CONSTANT NUMBER := 1.0;
387: l_api_name CONSTANT VARCHAR2(30):= 'Get_Assignment';
388: l_Assignment_Set_Id NUMBER := p_Assignment_Set_Id;
389: l_Assignment_Set_rec MRP_Src_Assignment_PUB.Assignment_Set_Rec_Type;
390: l_Assignment_Set_val_rec MRP_Src_Assignment_PUB.Assignment_Set_Val_Rec_Type;
391: l_Assignment_tbl MRP_Src_Assignment_PUB.Assignment_Tbl_Type;
392: l_Assignment_val_tbl MRP_Src_Assignment_PUB.Assignment_Val_Tbl_Type;
393: BEGIN
394:
387: l_api_name CONSTANT VARCHAR2(30):= 'Get_Assignment';
388: l_Assignment_Set_Id NUMBER := p_Assignment_Set_Id;
389: l_Assignment_Set_rec MRP_Src_Assignment_PUB.Assignment_Set_Rec_Type;
390: l_Assignment_Set_val_rec MRP_Src_Assignment_PUB.Assignment_Set_Val_Rec_Type;
391: l_Assignment_tbl MRP_Src_Assignment_PUB.Assignment_Tbl_Type;
392: l_Assignment_val_tbl MRP_Src_Assignment_PUB.Assignment_Val_Tbl_Type;
393: BEGIN
394:
395:
388: l_Assignment_Set_Id NUMBER := p_Assignment_Set_Id;
389: l_Assignment_Set_rec MRP_Src_Assignment_PUB.Assignment_Set_Rec_Type;
390: l_Assignment_Set_val_rec MRP_Src_Assignment_PUB.Assignment_Set_Val_Rec_Type;
391: l_Assignment_tbl MRP_Src_Assignment_PUB.Assignment_Tbl_Type;
392: l_Assignment_val_tbl MRP_Src_Assignment_PUB.Assignment_Val_Tbl_Type;
393: BEGIN
394:
395:
396: -- Standard call to check for call compatibility
632: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
633:
634: END Value_To_Id;
635:
636: END MRP_Src_Assignment_PUB;