The following lines contain the word 'select', 'insert', 'update' or 'delete':
if l_Dataset_Rec.Bsc_Measure_Last_Update_By is null then
l_Dataset_Rec.Bsc_Measure_Last_Update_By := fnd_global.USER_ID;
if l_Dataset_Rec.Bsc_Measure_Last_Update_Login is null then
l_Dataset_Rec.Bsc_Measure_Last_Update_Login := fnd_global.LOGIN_ID;
if l_Dataset_Rec.Bsc_Measure_Last_Update_By is null then
l_Dataset_Rec.Bsc_Measure_Last_Update_By := fnd_global.USER_ID;
if l_Dataset_Rec.Bsc_Measure_Last_Update_Login is null then
l_Dataset_Rec.Bsc_Measure_Last_Update_Login := fnd_global.LOGIN_ID;
procedure Update_Measures(
p_commit IN varchar2 := FND_API.G_FALSE
,p_Dataset_Rec IN BSC_DATASETS_PUB.Bsc_Dataset_Rec_Type
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
) is
begin
x_return_status := FND_API.G_RET_STS_SUCCESS;
BSC_DATASETS_PVT.Update_Measures( p_commit
,p_Dataset_Rec
,x_return_status
,x_msg_count
,x_msg_data);
Update_Dataset( p_commit
,p_Dataset_Rec
,x_return_status
,x_msg_count
,x_msg_data);
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Update_Measures ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Update_Measures ';
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Update_Measures ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Update_Measures ';
end Update_Measures;
procedure Update_Measures(
p_commit IN varchar2 := FND_API.G_FALSE
,p_Dataset_Rec IN BSC_DATASETS_PUB.Bsc_Dataset_Rec_Type
,p_update_dset_calc IN BOOLEAN
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
)is
begin
x_return_status := FND_API.G_RET_STS_SUCCESS;
BSC_DATASETS_PVT.Update_Measures( p_commit
,p_Dataset_Rec
,x_return_status
,x_msg_count
,x_msg_data);
Update_Dataset( p_commit
,p_Dataset_Rec
,p_update_dset_calc
,x_return_status
,x_msg_count
,x_msg_data);
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Update_Measures ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Update_Measures ';
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Update_Measures ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Update_Measures ';
end Update_Measures;
procedure Delete_Measures(
p_commit IN varchar2 := FND_API.G_FALSE
,p_Dataset_Rec IN BSC_DATASETS_PUB.Bsc_Dataset_Rec_Type
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
) is
begin
x_return_status := FND_API.G_RET_STS_SUCCESS;
Delete_Dataset( p_commit
,p_Dataset_Rec
,x_return_status
,x_msg_count
,x_msg_data);
BSC_DATASETS_PVT.Delete_Measures( p_commit
,p_Dataset_Rec
,x_return_status
,x_msg_count
,x_msg_data);
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Delete_Measures ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Delete_Measures ';
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Delete_Measures ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Delete_Measures ';
end Delete_Measures;
procedure Delete_Formats(
p_commit IN varchar2 := FND_API.G_FALSE
,p_Dataset_Rec IN BSC_DATASETS_PUB.Bsc_Dataset_Rec_Type
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
) is
begin
x_return_status := FND_API.G_RET_STS_SUCCESS;
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Delete_Formats ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Delete_Formats ';
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Delete_Formats ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Delete_Formats ';
end Delete_Formats;
if l_Dataset_Rec.Bsc_Dataset_Last_Update_By is null then
l_Dataset_Rec.Bsc_Dataset_Last_Update_By := fnd_global.USER_ID;
if l_Dataset_Rec.Bsc_Dataset_Last_Update_Login is null then
l_Dataset_Rec.Bsc_Dataset_Last_Update_Login := fnd_global.LOGIN_ID;
select count(*)
into l_count
from BSC_SYS_DATASETS_TL a
,BSC_SYS_DATASETS_B b
where upper(a.name) = upper(l_Dataset_Rec.Bsc_Dataset_Name)
and upper(b.source) = upper(l_Dataset_Rec.Bsc_Source)
and a.dataset_id = b.dataset_id;
if l_Dataset_Rec.Bsc_Dataset_Last_Update_By is null then
l_Dataset_Rec.Bsc_Dataset_Last_Update_By := fnd_global.USER_ID;
if l_Dataset_Rec.Bsc_Dataset_Last_Update_Login is null then
l_Dataset_Rec.Bsc_Dataset_Last_Update_Login := fnd_global.LOGIN_ID;
select count(*)
into l_count
from BSC_SYS_DATASETS_TL a
,BSC_SYS_DATASETS_B b
where upper(a.name) = upper(l_Dataset_Rec.Bsc_Dataset_Name)
and upper(b.source) = upper(l_Dataset_Rec.Bsc_Source)
and a.dataset_id = b.dataset_id;
procedure Update_Dataset(
p_commit IN varchar2 := FND_API.G_FALSE
,p_Dataset_Rec IN BSC_DATASETS_PUB.Bsc_Dataset_Rec_Type
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
) is
begin
x_return_status := FND_API.G_RET_STS_SUCCESS;
BSC_DATASETS_PVT.Update_Dataset( p_commit
,p_Dataset_Rec
,x_return_status
,x_msg_count
,x_msg_data);
Update_Dataset_Calc( p_commit
,p_Dataset_Rec
,x_return_status
,x_msg_count
,x_msg_data);
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Update_Dataset ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Update_Dataset ';
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Update_Dataset ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Update_Dataset ';
end Update_Dataset; */
procedure Update_Dataset(
p_commit IN varchar2 := FND_API.G_FALSE
,p_Dataset_Rec IN BSC_DATASETS_PUB.Bsc_Dataset_Rec_Type
,p_update_dset_calc IN BOOLEAN
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
) is
begin
x_return_status := FND_API.G_RET_STS_SUCCESS;
BSC_DATASETS_PVT.Update_Dataset( p_commit
,p_Dataset_Rec
,x_return_status
,x_msg_count
,x_msg_data);
IF (p_update_dset_calc) THEN
Update_Dataset_Calc( p_commit
,p_Dataset_Rec
,x_return_status
,x_msg_count
,x_msg_data);
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Update_Dataset ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Update_Dataset ';
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Update_Dataset ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Update_Dataset ';
end Update_Dataset;
procedure Update_Dataset(
p_commit IN varchar2 := FND_API.G_FALSE
,p_Dataset_Rec IN BSC_DATASETS_PUB.Bsc_Dataset_Rec_Type
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
) is
begin
x_return_status := FND_API.G_RET_STS_SUCCESS;
Update_Dataset(
p_commit => p_commit
,p_Dataset_Rec => p_Dataset_Rec
,p_update_dset_calc => TRUE
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Update_Dataset ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Update_Dataset ';
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Update_Dataset ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Update_Dataset ';
end Update_Dataset;
procedure Delete_Dataset(
p_commit IN varchar2 := FND_API.G_FALSE
,p_Dataset_Rec IN BSC_DATASETS_PUB.Bsc_Dataset_Rec_Type
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
) is
begin
x_return_status := FND_API.G_RET_STS_SUCCESS;
Delete_Dataset_Calc( p_commit
,p_Dataset_Rec
,x_return_status
,x_msg_count
,x_msg_data);
BSC_DATASETS_PVT.Delete_Dataset( p_commit
,p_Dataset_Rec
,x_return_status
,x_msg_count
,x_msg_data);
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Delete_Dataset ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Delete_Dataset ';
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Delete_Dataset ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Delete_Dataset ';
end Delete_Dataset;
procedure Update_Dataset_Calc(
p_commit IN varchar2 := FND_API.G_FALSE
,p_Dataset_Rec IN BSC_DATASETS_PUB.Bsc_Dataset_Rec_Type
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
) is
begin
x_return_status := FND_API.G_RET_STS_SUCCESS;
BSC_DATASETS_PVT.Update_Dataset_Calc( p_commit
,p_Dataset_Rec
,x_return_status
,x_msg_count
,x_msg_data);
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Update_Dataset_Calc ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Update_Dataset_Calc ';
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Update_Dataset_Calc ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Update_Dataset_Calc ';
end Update_Dataset_Calc;
procedure Delete_Dataset_Calc(
p_commit IN varchar2 := FND_API.G_FALSE
,p_Dataset_Rec IN BSC_DATASETS_PUB.Bsc_Dataset_Rec_Type
,x_return_status OUT NOCOPY varchar2
,x_msg_count OUT NOCOPY number
,x_msg_data OUT NOCOPY varchar2
) is
begin
x_return_status := FND_API.G_RET_STS_SUCCESS;
BSC_DATASETS_PVT.Delete_Dataset_Calc( p_commit
,p_Dataset_Rec
,x_return_status
,x_msg_count
,x_msg_data);
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Delete_Dataset_Calc ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Delete_Dataset_Calc ';
x_msg_data := x_msg_data||' -> BSC_DATASETS_PUB.Delete_Dataset_Calc ';
x_msg_data := SQLERRM||' at BSC_DATASETS_PUB.Delete_Dataset_Calc ';
end Delete_Dataset_Calc;
SELECT name
FROM bsc_sys_datasets_vl
WHERE dataset_id = p_DataSet_Id;
SELECT NVL(source,'BSC')
FROM bsc_sys_datasets_vl
WHERE dataset_id = p_DataSet_Id;
SELECT d.name || ' [' ||
NVL(DECODE(i.function_name, NULL,
DECODE(i.actual_data_source, NULL, NULL,
(SELECT user_function_name
FROM fnd_form_functions_vl
WHERE (
(type = 'JSP' AND (web_html_call LIKE 'bisviewm.jsp%'
OR web_html_call LIKE 'OA.jsp?page=/oracle/apps/bis/report/webui/BISReportPG%')
)
OR (type = 'WWW' AND LOWER(web_html_call) LIKE 'bisviewer.showreport%')
)
AND UPPER(parameters) LIKE '%PREGIONCODE=' ||
UPPER(SUBSTR(i.actual_data_source, 1, INSTR(i.actual_data_source, '.') - 1)) || '%'
AND type is not null
AND parameters is not null
AND web_html_call is not null
AND rownum < 2
)
),
(SELECT ff.user_function_name FROM fnd_form_functions_vl ff WHERE ff.function_name = i.function_name)
) , p_No_Report_Message) || ']' name
FROM
bis_indicators i,bsc_sys_datasets_vl d
WHERE
i.dataset_id = d.dataset_id AND
d.source = 'PMF' AND
i.dataset_id = p_DataSet_Id
UNION
SELECT
d.Name
FROM
bsc_sys_datasets_vl d
WHERE
d.dataset_id = p_DataSet_Id AND
NVL(d.source,'BSC') <> 'PMF';