The following lines contain the word 'select', 'insert', 'update' or 'delete':
| PROCEDURE Insert_Row |
+=======================================================================*/
PROCEDURE Insert_Row
(
p_api_version 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_return_status OUT NOCOPY VARCHAR2,
p_msg_count OUT NOCOPY NUMBER,
p_msg_data OUT NOCOPY VARCHAR2,
p_Row_Id IN OUT NOCOPY VARCHAR2,
--
p_Flex_Mapping_Set_ID IN NUMBER,
p_Flex_Mapping_Value_ID IN NUMBER,
p_Budget_Year_Type_ID IN NUMBER,
p_Application_Column_Name IN VARCHAR2,
p_Flex_Value_Set_ID IN NUMBER,
p_Flex_Value_ID IN NUMBER,
p_From_Flex_Value_ID IN NUMBER,
p_mode in varchar2
)
IS
CURSOR C IS
SELECT rowid
FROM psb_flex_mapping_set_values
WHERE flex_mapping_value_id = p_flex_mapping_value_id ;
P_LAST_UPDATE_DATE DATE;
P_LAST_UPDATED_BY NUMBER;
P_LAST_UPDATE_LOGIN NUMBER;
l_api_name CONSTANT VARCHAR2(30) := 'Insert_Row';
SAVEPOINT Insert_Row_Pvt ;
P_LAST_UPDATE_DATE := SYSDATE;
P_LAST_UPDATED_BY := 1;
P_LAST_UPDATE_LOGIN := 0;
P_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
if P_LAST_UPDATED_BY is NULL then
P_LAST_UPDATED_BY := -1;
P_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
if P_LAST_UPDATE_LOGIN is NULL then
P_LAST_UPDATE_LOGIN := -1;
INSERT INTO psb_flex_mapping_set_values
( flex_mapping_set_id,
flex_mapping_value_id,
budget_year_type_id,
application_column_name,
flex_value_set_id,
flex_value_id ,
from_flex_value_id ,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login
)
VALUES
( p_flex_mapping_set_id,
p_flex_mapping_value_id,
p_budget_year_type_id,
p_application_column_name,
p_flex_value_set_id,
p_flex_value_id ,
p_from_flex_value_id ,
p_last_update_date,
p_last_updated_by,
p_last_update_date,
p_last_updated_by,
p_last_update_login
);
ROLLBACK TO Insert_Row_Pvt ;
ROLLBACK TO Insert_Row_Pvt ;
ROLLBACK TO Insert_Row_Pvt ;
END Insert_Row;
SELECT Flex_Mapping_Set_ID,
Flex_Mapping_Value_ID,
Budget_Year_Type_ID ,
Application_Column_Name,
Flex_Value_Set_ID,
Flex_Value_ID,
From_Flex_Value_ID
FROM psb_flex_mapping_set_values
WHERE Flex_Mapping_Value_ID = p_Flex_Mapping_Value_ID
FOR UPDATE of Flex_Mapping_Value_ID NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
| PROCEDURE Update_Row |
+==========================================================================*/
PROCEDURE Update_Row
(
p_api_version 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_return_status OUT NOCOPY VARCHAR2,
p_msg_count OUT NOCOPY NUMBER,
p_msg_data OUT NOCOPY VARCHAR2,
--
p_Flex_Mapping_Set_ID IN NUMBER,
p_Flex_Mapping_Value_ID IN NUMBER,
p_Budget_Year_Type_ID IN NUMBER,
p_Application_Column_Name IN VARCHAR2,
p_Flex_Value_Set_ID IN NUMBER,
p_Flex_Value_ID IN NUMBER,
p_From_Flex_Value_ID IN NUMBER,
--
p_mode in varchar2
)
IS
P_LAST_UPDATE_DATE DATE;
P_LAST_UPDATED_BY NUMBER;
P_LAST_UPDATE_LOGIN NUMBER;
l_api_name CONSTANT VARCHAR2(30) := 'Update_Row';
SAVEPOINT Update_Row_Pvt ;
P_LAST_UPDATE_DATE := SYSDATE;
P_LAST_UPDATED_BY := 1;
P_LAST_UPDATE_LOGIN := 0;
P_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
if P_LAST_UPDATED_BY is NULL then
P_LAST_UPDATED_BY := -1;
P_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
if P_LAST_UPDATE_LOGIN is NULL then
P_LAST_UPDATE_LOGIN := -1;
UPDATE psb_flex_mapping_set_values
SET
Flex_Mapping_Set_ID = p_Flex_Mapping_Set_ID,
Flex_Mapping_Value_ID = p_Flex_Mapping_Value_ID ,
Budget_Year_Type_ID = p_Budget_Year_Type_ID ,
Application_Column_Name = p_Application_Column_Name ,
Flex_Value_Set_ID = p_Flex_Value_Set_ID ,
Flex_Value_ID = p_Flex_Value_ID ,
From_Flex_Value_ID = p_From_Flex_Value_ID ,
last_update_date = p_last_update_date,
last_updated_by = p_last_updated_by,
last_update_login = p_last_update_login
WHERE Flex_Mapping_Value_ID = p_Flex_Mapping_Value_ID;
ROLLBACK TO Update_Row_Pvt ;
ROLLBACK TO Update_Row_Pvt ;
ROLLBACK TO Update_Row_Pvt ;
END Update_Row;
| PROCEDURE Delete_Row |
+==========================================================================*/
PROCEDURE Delete_Row
(
p_api_version 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_return_status OUT NOCOPY VARCHAR2,
p_msg_count OUT NOCOPY NUMBER,
p_msg_data OUT NOCOPY VARCHAR2,
--
p_Flex_Mapping_Value_ID IN NUMBER
)
IS
--
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Row';
SAVEPOINT Delete_Row_Pvt ;
DELETE psb_flex_mapping_set_values
WHERE Flex_Mapping_Value_ID = p_Flex_Mapping_Value_ID;
ROLLBACK TO Delete_Row_Pvt ;
ROLLBACK TO Delete_Row_Pvt ;
ROLLBACK TO Delete_Row_Pvt ;
END Delete_Row;
PROCEDURE Sets_Insert_Row
(
p_api_version 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_return_status OUT NOCOPY VARCHAR2,
p_msg_count OUT NOCOPY NUMBER,
p_msg_data OUT NOCOPY VARCHAR2,
--
p_Flex_Mapping_Set_ID IN NUMBER,
p_Name IN VARCHAR2,
p_Description IN VARCHAR2,
p_set_of_books_id IN NUMBER,
--
p_mode in varchar2
)
IS
CURSOR C IS
SELECT rowid
FROM psb_flex_mapping_sets
WHERE Flex_Mapping_Set_ID = p_Flex_Mapping_Set_ID ;
P_LAST_UPDATE_DATE DATE;
P_LAST_UPDATED_BY NUMBER;
P_LAST_UPDATE_LOGIN NUMBER;
l_api_name CONSTANT VARCHAR2(30) := 'Sets_Insert_Row';
SAVEPOINT Sets_Insert_Row_Pvt ;
P_LAST_UPDATE_DATE := SYSDATE;
P_LAST_UPDATED_BY := 1;
P_LAST_UPDATE_LOGIN := 0;
P_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
if P_LAST_UPDATED_BY is NULL then
P_LAST_UPDATED_BY := -1;
P_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
if P_LAST_UPDATE_LOGIN is NULL then
P_LAST_UPDATE_LOGIN := -1;
INSERT INTO psb_flex_mapping_sets
( Flex_Mapping_Set_ID ,
Name,
Description,
set_of_books_id,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login
)
VALUES
( p_Flex_Mapping_Set_ID,
p_Name,
p_Description,
p_Set_of_Books_ID,
p_last_update_date,
p_last_updated_by,
p_last_update_date,
p_last_updated_by,
p_last_update_login
);
ROLLBACK TO Sets_Insert_Row_Pvt ;
ROLLBACK TO Sets_Insert_Row_Pvt ;
ROLLBACK TO Sets_Insert_Row_Pvt ;
END Sets_Insert_Row;
| PROCEDURE Delete_Row |
+==========================================================================*/
PROCEDURE Sets_Delete_Row
(
p_api_version 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_return_status OUT NOCOPY VARCHAR2,
p_msg_count OUT NOCOPY NUMBER,
p_msg_data OUT NOCOPY VARCHAR2,
--
p_Flex_Mapping_Set_ID IN NUMBER
)
IS
--
l_api_name CONSTANT VARCHAR2(30) := 'Delete_Row';
SAVEPOINT Sets_Delete_Row_Pvt ;
DELETE psb_flex_mapping_set_values
WHERE flex_mapping_set_id = p_flex_mapping_set_id ;
DELETE psb_flex_mapping_sets
WHERE flex_mapping_set_id = p_flex_mapping_set_id;
ROLLBACK TO Sets_Delete_Row_Pvt ;
ROLLBACK TO Sets_Delete_Row_Pvt ;
ROLLBACK TO Sets_Delete_Row_Pvt ;
END Sets_Delete_Row;
SELECT Flex_Mapping_Set_ID,
Name,
description ,
set_of_books_id
FROM psb_flex_mapping_sets
WHERE Flex_Mapping_Set_Id = p_Flex_Mapping_Set_Id
FOR UPDATE of Flex_Mapping_Set_Id NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
| PROCEDURE Update_Row |
+==========================================================================*/
PROCEDURE Sets_Update_Row
(
p_api_version 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_return_status OUT NOCOPY VARCHAR2,
p_msg_count OUT NOCOPY NUMBER,
p_msg_data OUT NOCOPY VARCHAR2,
--
p_Flex_Mapping_Set_ID IN NUMBER,
p_Name IN VARCHAR2,
p_Description IN VARCHAR2,
p_set_of_books_id IN NUMBER,
--
p_mode in varchar2
)
IS
P_LAST_UPDATE_DATE DATE;
P_LAST_UPDATED_BY NUMBER;
P_LAST_UPDATE_LOGIN NUMBER;
l_api_name CONSTANT VARCHAR2(30) := 'Update_Row';
SAVEPOINT Update_Row_Pvt ;
P_LAST_UPDATE_DATE := SYSDATE;
P_LAST_UPDATED_BY := 1;
P_LAST_UPDATE_LOGIN := 0;
P_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
if P_LAST_UPDATED_BY is NULL then
P_LAST_UPDATED_BY := -1;
P_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
if P_LAST_UPDATE_LOGIN is NULL then
P_LAST_UPDATE_LOGIN := -1;
UPDATE psb_flex_mapping_sets
SET
Flex_Mapping_Set_ID = p_Flex_Mapping_Set_ID,
Name = p_Name ,
Description = p_Description ,
Set_of_Books_ID = p_Set_of_Books_ID ,
last_update_date = p_last_update_date,
last_updated_by = p_last_updated_by,
last_update_login = p_last_update_login
WHERE Flex_Mapping_Set_ID = p_Flex_Mapping_Set_ID;
ROLLBACK TO Update_Row_Pvt ;
ROLLBACK TO Update_Row_Pvt ;
ROLLBACK TO Update_Row_Pvt ;
END Sets_Update_Row;
SELECT s.chart_of_accounts_id
FROM psb_flex_mapping_sets f,
gl_sets_of_books s
WHERE flex_mapping_set_id = p_flexfield_mapping_set_id AND
f.set_of_books_id = s.set_of_books_id ;
select fval.flex_value to_val ,
fromval.flex_value from_val
from fnd_flex_values_vl fval,
fnd_flex_values_vl fromval,
psb_flex_mapping_set_values map,
fnd_id_flex_segments seg
where flex_mapping_set_id = p_flexfield_mapping_set_id
and budget_year_type_id = p_budget_year_type_id
and map.flex_value_id = fval.flex_value_id(+)
and map.from_flex_value_id = fromval.flex_value_id
and seg.application_id = 101
and seg.id_flex_code = 'GL#'
and seg.id_flex_num = l_flex_code
and seg.enabled_flag = 'Y'
and seg.application_column_name = map.application_column_name
and map.application_column_name = g_seg_name(l_segment_num)
and ( fval.flex_value is null
or fromval.flex_value = l_seg_val(l_segment_num) )
order by fromval.flex_value
;
select fval.flex_value from_val , seg.application_column_name
from fnd_flex_values_vl fval,
psb_flex_mapping_set_values map,
fnd_id_flex_segments seg
where flex_mapping_set_id = p_flexfield_mapping_set_id
and budget_year_type_id = l_cy_budget_year_type_id
and map.from_flex_value_id = fval.flex_value_id
and seg.application_id = 101
and seg.id_flex_code = 'GL#'
and seg.id_flex_num = l_flex_code
and seg.enabled_flag = 'Y'
and seg.application_column_name = map.application_column_name ;
select fval.flex_value curr_val
from fnd_flex_values_vl fval,
psb_flex_mapping_set_values map,
fnd_id_flex_segments seg
where flex_mapping_set_id = p_flexfield_mapping_set_id
and budget_year_type_id = l_cy_budget_year_type_id
and map.from_flex_value_id = fval.flex_value_id
and seg.application_id = 101
and seg.id_flex_code = 'GL#'
and seg.id_flex_num = l_flex_code
and seg.enabled_flag = 'Y'
and seg.application_column_name = map.application_column_name
and map.application_column_name = g_seg_name(l_segment_num)
;
select fval.flex_value curr_val
from fnd_flex_values_vl fval,
psb_flex_mapping_set_values map,
fnd_id_flex_segments seg
where flex_mapping_set_id = p_flexfield_mapping_set_id
and budget_year_type_id = l_py_budget_year_type_id
and map.from_flex_value_id = fval.flex_value_id
and seg.application_id = 101
and seg.id_flex_code = 'GL#'
and seg.id_flex_num = l_flex_code
and seg.enabled_flag = 'Y'
and seg.application_column_name = map.application_column_name
and map.application_column_name = g_seg_name(l_segment_num)
;
select budget_year_type_id
from psb_budget_year_types_vl
where year_category_type = 'CY';
select budget_year_type_id
from psb_budget_year_types_vl y
where year_category_type = 'PY'
and budget_year_type_id = p_budget_year_type_id
;
SELECT s.chart_of_accounts_id,fnd.concatenated_segment_delimiter
FROM psb_flex_mapping_sets f,
gl_sets_of_books s,
fnd_id_flex_structures_vl fnd
WHERE flex_mapping_set_id = p_flexfield_mapping_set_id AND
f.set_of_books_id = s.set_of_books_id AND
s.chart_of_accounts_id = fnd.id_flex_num AND
application_id = 101 AND
id_flex_code = 'GL#'
;
select fval.flex_value to_val ,
fromval.flex_value from_val
from fnd_flex_values_vl fval,
fnd_flex_values_vl fromval,
psb_flex_mapping_set_values map,
fnd_id_flex_segments seg
where flex_mapping_set_id = p_flexfield_mapping_set_id
and budget_year_type_id = p_budget_year_type_id
and map.flex_value_id = fval.flex_value_id(+)
and map.from_flex_value_id = fromval.flex_value_id
and seg.application_id = 101
and seg.id_flex_code = 'GL#'
and seg.id_flex_num = l_flex_code
and seg.enabled_flag = 'Y'
and seg.application_column_name = map.application_column_name
and map.application_column_name = g_seg_name(l_segment_num)
and ( fval.flex_value is null
or fromval.flex_value = l_seg_val(l_segment_num) )
order by fromval.flex_value
;
select fval.flex_value curr_val
from fnd_flex_values_vl fval,
psb_flex_mapping_set_values map,
fnd_id_flex_segments seg
where flex_mapping_set_id = p_flexfield_mapping_set_id
and budget_year_type_id = l_cy_budget_year_type_id
and map.from_flex_value_id = fval.flex_value_id
and seg.application_id = 101
and seg.id_flex_code = 'GL#'
and seg.id_flex_num = l_flex_code
and seg.enabled_flag = 'Y'
and seg.application_column_name = map.application_column_name
and map.application_column_name = g_seg_name(l_segment_num)
;
select budget_year_type_id
from psb_budget_year_types_vl
where year_category_type = 'CY'
;
select 'Exists'
from dual
where exists
(select 1
from psb_budget_year_types_vl
where budget_year_type_id = p_Budget_Year_Type_ID
and year_category_type = 'PY'
);
select application_column_name,segment_num
from fnd_id_flex_segments
where application_id = 101
and id_flex_code = 'GL#'
and id_flex_num = p_flex_code
and enabled_flag = 'Y'
order by segment_num;