The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT (NVL(MAX(IND_GROUP_ID), 0) + 1)
INTO l_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Id
FROM BSC_TAB_IND_GROUPS_B;
procedure Update_Kpi_Group(
p_commit IN varchar2 := FND_API.G_FALSE
,p_Bsc_Kpi_Group_Rec IN BSC_KPI_GROUP_PUB.Bsc_Kpi_Group_Rec
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
) is
begin
FND_MSG_PUB.Initialize;
SAVEPOINT BSCUpdateKPIGROUP;
BSC_KPI_GROUP_PVT.Update_Kpi_Group( p_commit
,p_Bsc_Kpi_Group_Rec
,x_return_status
,x_msg_count
,x_msg_data);
ROLLBACK TO BSCUpdateKPIGROUP;
ROLLBACK TO BSCUpdateKPIGROUP;
ROLLBACK TO BSCUpdateKPIGROUP;
x_msg_data := x_msg_data||' -> BSC_KPI_GROUP_PUB.Update_Kpi_Group ';
x_msg_data := SQLERRM||' at BSC_KPI_GROUP_PUB.Update_Kpi_Group ';
ROLLBACK TO BSCUpdateKPIGROUP;
x_msg_data := x_msg_data||' -> BSC_KPI_GROUP_PUB.Update_Kpi_Group ';
x_msg_data := SQLERRM||' at BSC_KPI_GROUP_PUB.Update_Kpi_Group ';
end Update_Kpi_Group;
procedure Delete_Kpi_Group(
p_commit IN varchar2 := FND_API.G_FALSE
,p_Bsc_Kpi_Group_Rec IN BSC_KPI_GROUP_PUB.Bsc_Kpi_Group_Rec
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
) is
l_Bsc_Kpi_Group_Rec BSC_KPI_GROUP_PUB.Bsc_Kpi_Group_Rec;
SAVEPOINT BSCDeleteKPIGROUP;
select distinct(name)
into l_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Name
from BSC_TAB_IND_GROUPS_VL
where ind_group_id = l_Bsc_Kpi_Group_Rec.Bsc_Kpi_Group_Id;
BSC_KPI_GROUP_PVT.Delete_Kpi_Group( p_commit
,l_Bsc_Kpi_Group_Rec
,x_return_status
,x_msg_count
,x_msg_data);
ROLLBACK TO BSCDeleteKPIGROUP;
ROLLBACK TO BSCDeleteKPIGROUP;
ROLLBACK TO BSCDeleteKPIGROUP;
x_msg_data := x_msg_data||' -> BSC_KPI_GROUP_PUB.Delete_Kpi_Group ';
x_msg_data := SQLERRM||' at BSC_KPI_GROUP_PUB.Delete_Kpi_Group ';
ROLLBACK TO BSCDeleteKPIGROUP;
x_msg_data := x_msg_data||' -> BSC_KPI_GROUP_PUB.Delete_Kpi_Group ';
x_msg_data := SQLERRM||' at BSC_KPI_GROUP_PUB.Delete_Kpi_Group ';
end Delete_Kpi_Group;