The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Update_Association_Type(
P_Api_Version_Number IN NUMBER,
P_Init_Msg_List IN VARCHAR2 ,--:= FND_API.G_FALSE,
P_Commit IN VARCHAR2 ,--:= FND_API.G_FALSE,
P_Validation_Level IN NUMBER ,--:= FND_API.G_VALID_LEVEL_FULL,
P_Association_Type_Rec IN Ibc_Association_Types_Pvt.Association_Type_Rec_Type,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
);
SELECT Association_Type_Code
FROM ibc_Association_types_b
WHERE association_Type_Code = p_Association_Type_Code;
Ibc_Association_Types_Pkg.insert_row (
x_rowid => lx_rowid,
p_ASSOCIATION_TYPE_CODE => l_association_type_rec.ASSOCIATION_TYPE_CODE,
p_ASSOCIATION_TYPE_NAME => l_association_type_rec.ASSOCIATION_TYPE_NAME,
p_CALL_BACK_PKG => l_association_type_rec.CALL_BACK_PKG,
p_CREATED_BY => l_association_type_rec.CREATED_BY,
p_CREATION_DATE => l_association_type_rec.CREATION_DATE,
p_DESCRIPTION => l_association_type_rec.DESCRIPTION,
p_LAST_UPDATED_BY => l_association_type_rec.LAST_UPDATED_BY,
p_LAST_UPDATE_DATE => l_association_type_rec.LAST_UPDATE_DATE,
p_LAST_UPDATE_LOGIN => l_association_type_rec.LAST_UPDATE_LOGIN,
p_OBJECT_VERSION_NUMBER => l_association_type_rec.OBJECT_VERSION_NUMBER,
p_SEARCH_PAGE => l_association_type_rec.SEARCH_PAGE
);
FND_MESSAGE.Set_Name('IBC', 'IBC_INSERT_ERROR');
PROCEDURE Update_Association_Types(
P_Api_Version_Number IN NUMBER,
P_Init_Msg_List IN VARCHAR2 ,--:= FND_API.G_FALSE,
P_Commit IN VARCHAR2 ,--:= FND_API.G_FALSE,
P_Validation_Level IN NUMBER ,--:= FND_API.G_VALID_LEVEL_FULL,
P_Association_Type_Tbl IN Ibc_Association_Types_Pvt.Association_Type_Tbl_Type ,--:= Ibc_Association_Types_Pvt.G_Miss_Association_Type_Tbl,
x_Association_Type_Tbl OUT NOCOPY Ibc_Association_Types_Pvt.Association_Type_Tbl_Type,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
)
IS
l_temp CHAR(1);
l_api_name VARCHAR2(50) := 'Update_Association_Type';
Update_Association_Type(
P_Api_Version_Number =>P_Api_Version_Number,
P_Init_Msg_List =>P_Init_Msg_List,
P_Commit =>P_Commit,
P_Validation_Level =>FND_API.G_VALID_LEVEL_FULL,
P_Association_Type_Rec =>l_Association_Type_Tbl(i),
X_Return_Status =>X_Return_Status,
X_Msg_Count =>X_Msg_Count,
X_Msg_Data =>X_Msg_Data);
FND_MESSAGE.Set_Name('IBC', 'IBC_UPDATE_ERROR');
END Update_Association_types;
PROCEDURE delete_Association_Type(
P_Api_Version_Number IN NUMBER,
P_Init_Msg_List IN VARCHAR2 ,--:= FND_API.G_FALSE,
P_Commit IN VARCHAR2 ,--:= FND_API.G_FALSE,
P_Validation_Level IN NUMBER ,--:= FND_API.G_VALID_LEVEL_FULL,
P_Association_Type_Code IN VARCHAR2,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
)
IS
CURSOR C_Association_Type IS
SELECT
Association_Type_Code
FROM ibc_Association_types_b
WHERE Association_Type_Code = p_Association_Type_Code;
l_api_name VARCHAR2(50) := 'Delete_Association_Type';
FND_MESSAGE.Set_Name('IBC', 'Cannot Find Record to be Deleted');
Ibc_Association_Types_Pkg.delete_row (
p_Association_type_code =>p_Association_type_code
);
Ibc_Association_Types_Pkg.DELETE_ROW (
p_Association_TYPE_CODE =>p_Association_TYPE_CODE);
FND_MESSAGE.Set_Name('IBC', 'IBC_DELETE_ERROR');
END delete_Association_type;
PROCEDURE Update_Association_Type(
P_Api_Version_Number IN NUMBER,
P_Init_Msg_List IN VARCHAR2 ,--:= FND_API.G_FALSE,
P_Commit IN VARCHAR2 ,--:= FND_API.G_FALSE,
P_Validation_Level IN NUMBER ,--:= FND_API.G_VALID_LEVEL_FULL,
P_Association_Type_Rec IN Ibc_Association_Types_Pvt.Association_Type_Rec_Type,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
)
IS
CURSOR C_Association_Type(p_Association_Type_Code IN VARCHAR2) IS
SELECT Association_Type_Code
FROM ibc_Association_types_b
WHERE Association_Type_Code = p_Association_Type_Code;
l_api_name VARCHAR2(50) := 'Update_Association_Type';
Ibc_Association_Types_Pkg.Update_row (
p_ASSOCIATION_TYPE_CODE => l_association_type_rec.ASSOCIATION_TYPE_CODE,
p_ASSOCIATION_TYPE_NAME => l_association_type_rec.ASSOCIATION_TYPE_NAME,
p_CALL_BACK_PKG => l_association_type_rec.CALL_BACK_PKG,
p_DESCRIPTION => l_association_type_rec.DESCRIPTION,
p_LAST_UPDATED_BY => l_association_type_rec.LAST_UPDATED_BY,
p_LAST_UPDATE_DATE => l_association_type_rec.LAST_UPDATE_DATE,
p_LAST_UPDATE_LOGIN => l_association_type_rec.LAST_UPDATE_LOGIN,
p_OBJECT_VERSION_NUMBER => l_association_type_rec.OBJECT_VERSION_NUMBER,
p_SEARCH_PAGE => l_association_type_rec.SEARCH_PAGE);
END Update_Association_type;
PROCEDURE delete_Association_Type(
P_Api_Version_Number IN NUMBER,
P_Init_Msg_List IN VARCHAR2 ,--:= FND_API.G_FALSE,
P_Commit IN VARCHAR2 ,--:= FND_API.G_FALSE,
P_Validation_Level IN NUMBER ,--:= FND_API.G_VALID_LEVEL_FULL,
P_Association_Type_Rec IN Ibc_Association_Types_Pvt.Association_Type_Rec_Type,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
)
IS
CURSOR C_Association_Type(p_Association_Type_Code IN VARCHAR2) IS
SELECT Association_Type_Code
FROM ibc_Association_types_b
WHERE Association_Type_Code = p_Association_Type_Code;
l_api_name VARCHAR2(50) := 'delete_Association_Type';
Ibc_Association_Types_Pkg.delete_row (
p_Association_type_code =>l_Association_type_rec.Association_type_code);
END delete_Association_type;
SELECT
ASSOCIATION_TYPE_CODE
,CALL_BACK_PKG
,SEARCH_PAGE
,CREATED_BY
,CREATION_DATE
,LAST_UPDATED_BY
,LAST_UPDATE_DATE
,LAST_UPDATE_LOGIN
,OBJECT_VERSION_NUMBER
,ASSOCIATION_TYPE_NAME
,DESCRIPTION
INTO
l_Association_Type_Rec.ASSOCIATION_TYPE_CODE ,
l_Association_Type_Rec.CALL_BACK_PKG ,
l_Association_Type_Rec.SEARCH_PAGE ,
l_Association_Type_Rec.CREATED_BY ,
l_Association_Type_Rec.CREATION_DATE ,
l_Association_Type_Rec.LAST_UPDATED_BY ,
l_Association_Type_Rec.LAST_UPDATE_DATE ,
l_Association_Type_Rec.LAST_UPDATE_LOGIN ,
l_Association_Type_Rec.OBJECT_VERSION_NUMBER ,
l_Association_Type_Rec.ASSOCIATION_TYPE_NAME ,
l_Association_Type_Rec.DESCRIPTION
FROM IBC_Association_TYPES_VL
WHERE Association_type_code = p_Association_type_code;