The following lines contain the word 'select', 'insert', 'update' or 'delete':
Cursor C_1 is select asset_hierarchy_purpose_id
from fa_asset_hierarchy_purpose
where asset_hierarchy_purpose_id = x_purpose_id;
Cursor C_1 is select category_type
from fa_categories
where category_id = x_asset_category_id;
Cursor C_2 is select 1
from fa_category_books
where category_id = x_asset_category_id
and book_type_code = x_book_type_code;
Cursor C_1 is select lease_id
from fa_leases
where lease_id = x_lease_id;
Cursor C_1 is select code_combination_id
from fa_asset_keywords
where code_combination_id = x_asset_key_ccid;
Cursor C_1 is select location_id
from fa_locations
where location_id = x_location_id;
Cursor C_1 is select code_combination_id
from gl_code_combinations
where code_combination_id = x_gl_ccid
and chart_of_accounts_id = x_CofA_id
and account_type = 'E'
and enabled_flag = 'Y'
and summary_flag = 'N'
and template_id is null
and detail_posting_allowed_flag = 'Y';
Cursor C_1 is select employee_id
from fa_employees
where employee_id = x_employee_id;
Cursor C is select dist_set_id
from FA_HIERARCHY_DISTRIBUTIONS
where dist_set_id = x_dist_set_id;
Cursor C_NAME is select asset_hierarchy_id
from fa_asset_hierarchy
where name = x_name
and asset_hierarchy_purpose_id = x_purpose_id
and nvl(asset_id,0) = decode(x_node_type,'N',0,asset_id);
Procedure Insert_row ( x_rowid in out nocopy varchar2
, x_asset_hierarchy_purpose_id in number
, x_asset_hierarchy_id in out nocopy number
, x_name in varchar2 default null
, x_level_number in number
, x_hierarchy_rule_set_id in number
, X_CREATION_DATE in date
, X_CREATED_BY in number
, X_LAST_UPDATE_DATE in date
, X_LAST_UPDATED_BY in number
, X_LAST_UPDATE_LOGIN in number
, x_description in varchar2
, x_parent_hierarchy_id in number
, x_lowest_level_flag in number
, x_depreciation_start_date in date
, x_asset_id in number
, X_ATTRIBUTE_CATEGORY in varchar2
, X_ATTRIBUTE1 in varchar2
, X_ATTRIBUTE2 in varchar2
, X_ATTRIBUTE3 in varchar2
, X_ATTRIBUTE4 in varchar2
, X_ATTRIBUTE5 in varchar2
, X_ATTRIBUTE6 in varchar2
, X_ATTRIBUTE7 in varchar2
, X_ATTRIBUTE8 in varchar2
, X_ATTRIBUTE9 in varchar2
, X_ATTRIBUTE10 in varchar2
, X_ATTRIBUTE11 in varchar2
, X_ATTRIBUTE12 in varchar2
, X_ATTRIBUTE13 in varchar2
, X_ATTRIBUTE14 in varchar2
, X_ATTRIBUTE15 in varchar2
)
is
cursor C is select ROWID from FA_ASSET_HIERARCHY
where asset_hierarchy_id = X_asset_hierarchy_id ;
CURSOR C1 is Select FA_ASSET_HIERARCHY_S.nextval from sys.dual;
insert into FA_ASSET_HIERARCHY
( asset_hierarchy_purpose_id
, asset_hierarchy_id
, name
, level_number
, hierarchy_rule_set_id
, CREATION_DATE
, CREATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATED_BY
, LAST_UPDATE_LOGIN
, description
, parent_hierarchy_id
, lowest_level_flag
, depreciation_start_date
, asset_id
, ATTRIBUTE_CATEGORY
, ATTRIBUTE1
, ATTRIBUTE2
, ATTRIBUTE3
, ATTRIBUTE4
, ATTRIBUTE5
, ATTRIBUTE6
, ATTRIBUTE7
, ATTRIBUTE8
, ATTRIBUTE9
, ATTRIBUTE10
, ATTRIBUTE11
, ATTRIBUTE12
, ATTRIBUTE13
, ATTRIBUTE14
, ATTRIBUTE15 )
Values
(x_asset_hierarchy_purpose_id
, x_asset_hierarchy_id
, nvl(x_name,l_name)
, x_level_number
, x_hierarchy_rule_set_id
, X_CREATION_DATE
, X_CREATED_BY
, X_LAST_UPDATE_DATE
, X_LAST_UPDATED_BY
, X_LAST_UPDATE_LOGIN
, x_description
, x_parent_hierarchy_id
, x_lowest_level_flag
, x_depreciation_start_date
, x_asset_id
, X_ATTRIBUTE_CATEGORY
, X_ATTRIBUTE1
, X_ATTRIBUTE2
, X_ATTRIBUTE3
, X_ATTRIBUTE4
, X_ATTRIBUTE5
, X_ATTRIBUTE6
, X_ATTRIBUTE7
, X_ATTRIBUTE8
, X_ATTRIBUTE9
, X_ATTRIBUTE10
, X_ATTRIBUTE11
, X_ATTRIBUTE12
, X_ATTRIBUTE13
, X_ATTRIBUTE14
, X_ATTRIBUTE15 );
end INSERT_ROW;
Cursor C is select FA_HIERARCHY_DIST_SET_S.nextval from dual;
Cursor C_CofA_id is select accounting_flex_structure
from fa_book_controls
where book_type_code = x_book_type_code;
x_err_stage := 'Inserting into FA_HIERARCHY_DISTRIBUTIONS table';
FA_CUA_HR_DISTRIBUTION_PKG.Insert_row (
l_rowid
, l_distribution_id
, x_dist_set_id
--, x_asset_hierarchy_purpose_id
--, x_asset_hierarchy_id
, x_book_type_code
, x_distribution_tab(I).distribution_line_percentage
, x_distribution_tab(I).code_combination_id
, x_distribution_tab(I).location_id
, x_distribution_tab(I).assigned_to
, l_CREATION_DATE
, l_CREATED_BY
, l_CREATION_DATE
, l_CREATED_BY
, l_CREATED_BY );
select 1 into dummy from dual
where exists(select 1 from fa_categories
where category_id = x_catg_id
and category_type = 'NON-LEASE');
select ASSET_HIERARCHY_PURPOSE_ID,
LEVEL_NUMBER,
CATEGORY_MANDATORY_FLAG,
LEASE_MANDATORY_FLAG,
ASSET_KEY_MANDATORY_FLAG,
SERIAL_NUMBER_MANDATORY_FLAG,
DISTRIBUTION_MANDATORY_FLAG,
LIFE_END_DATE_MANDATORY_FLAG,
DPIS_MANDATORY_FLAG,
CREATED_BY,
CREATION_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN
from FA_HIERARCHY_CONTROLS
where asset_hierarchy_purpose_id = x_asset_hierarchy_purpose_id
and level_number = x_level_number;
Cursor C_name_insert is Select name
from FA_ASSET_HIERARCHY
where name = x_name
and decode(nvl(asset_id,0),0,'N','A') = decode(nvl(x_asset_id,0),0,'N','A')
and asset_hierarchy_purpose_id = x_purpose_id;
Cursor C_name_update is Select name
from FA_ASSET_HIERARCHY
where name = x_name
and decode(nvl(asset_id,0),0,'N','A') = decode(nvl(x_asset_id,0),0,'N','A')
and asset_hierarchy_purpose_id = x_purpose_id
and asset_hierarchy_id <> nvl(x_asset_hierarchy_id,0);
if(x_event = 'INSERT') then
-- validate for name uniqueness if passed
-- x_err_stage := 'Validating name uniqueness';
open C_NAME_insert;
fetch c_name_insert into l_name;
if(C_NAME_insert%FOUND) then
close C_NAME_insert;
close C_NAME_insert;
elsif(x_name = 'UPDATE') then
open C_NAME_update;
fetch c_name_update into l_name;
if(C_NAME_update%FOUND) then
close C_NAME_update;
close C_NAME_update;
Select book_class from FA_BOOK_CONTROLS
where book_type_code = x_book_type_code;
select book_type_code from FA_ASSET_HIERARCHY_PURPOSE
where asset_hierarchy_purpose_id = (Select asset_hierarchy_purpose_id
from fa_asset_hierarchy
where asset_hierarchy_id = x_parent_hierarchy_id);
Select book_type_code from FA_HIERARCHY_RULE_SET
where hierarchy_rule_set_id = x_hierarchy_rule_set_id;
Cursor C_PURPOSE is select asset_hierarchy_purpose_id,mandatory_asset_flag
from FA_ASSET_HIERARCHY_PURPOSE
where book_type_code = x_book_type_code;
select nvl(permissible_levels,0)
from FA_ASSET_HIERARCHY_PURPOSE
where asset_hierarchy_purpose_id = x_asset_hierarchy_purpose_id;
Cursor C_PARENT_LEVEL is select level_number
from FA_ASSET_HIERARCHY
where asset_hierarchy_id = x_parent_hierarchy_id;
select 1 into dummy
from fa_asset_hierarchy_purpose
where asset_hierarchy_purpose_id = x_asset_hierarchy_purpose_id;
, X_LAST_UPDATE_DATE in DATE default trunc(sysdate)
, X_LAST_UPDATED_BY in NUMBER := FND_GLOBAL.USER_ID
, X_LAST_UPDATE_LOGIN in NUMBER := FND_GLOBAL.USER_ID
, x_description in VARCHAR2 default null
, x_parent_hierarchy_id in NUMBER default null
, x_lowest_level_flag in NUMBER default null
, x_depreciation_start_date in date default null
, x_asset_id in number default null
, X_ATTRIBUTE_CATEGORY in VARCHAR2 default null
, X_ATTRIBUTE1 in VARCHAR2 default null
, X_ATTRIBUTE2 in VARCHAR2 default null
, X_ATTRIBUTE3 in VARCHAR2 default null
, X_ATTRIBUTE4 in VARCHAR2 default null
, X_ATTRIBUTE5 in VARCHAR2 default null
, X_ATTRIBUTE6 in VARCHAR2 default null
, X_ATTRIBUTE7 in VARCHAR2 default null
, X_ATTRIBUTE8 in VARCHAR2 default null
, X_ATTRIBUTE9 in VARCHAR2 default null
, X_ATTRIBUTE10 in VARCHAR2 default null
, X_ATTRIBUTE11 in VARCHAR2 default null
, X_ATTRIBUTE12 in VARCHAR2 default null
, X_ATTRIBUTE13 in VARCHAR2 default null
, X_ATTRIBUTE14 in VARCHAR2 default null
, X_ATTRIBUTE15 in VARCHAR2 default null
--Parameters for Node Attributes
,x_attribute_book_type_code in varchar2 default null
,x_asset_category_id in number default null
,x_lease_id in NUMBER default null
,x_asset_key_ccid in number default null
,x_serial_number in varchar2 default null
,x_life_end_date in date default null
,x_distribution_tab in FA_CUA_HIERARCHY_PKG.distribution_tabtype default FA_CUA_HIERARCHY_PKG.distribution_tab
)
is
l_old_err_stack varchar2(640);
, X_LAST_UPDATE_DATE
, X_LAST_UPDATED_BY
, X_LAST_UPDATE_LOGIN
, x_description
, x_parent_hierarchy_id
, x_lowest_level_flag
, x_depreciation_start_date
, x_asset_id
, X_ATTRIBUTE_CATEGORY
, X_ATTRIBUTE1
, X_ATTRIBUTE2
, X_ATTRIBUTE3
, X_ATTRIBUTE4
, X_ATTRIBUTE5
, X_ATTRIBUTE6
, X_ATTRIBUTE7
, X_ATTRIBUTE8
, X_ATTRIBUTE9
, X_ATTRIBUTE10
, X_ATTRIBUTE11
, X_ATTRIBUTE12
, X_ATTRIBUTE13
, X_ATTRIBUTE14
, X_ATTRIBUTE15
);
x_err_stage := 'Inserting into FA_ASSET_HIERARCHY_VALES table';
FA_CUA_HIERARCHY_VALUES_PKG.Insert_row (
l_rowid
, x_asset_hierarchy_id
, x_attribute_book_type_code
, x_asset_category_id
, x_lease_id
, x_asset_key_ccid
, x_serial_number
, x_life_end_date
, l_dist_set_id
, X_CREATION_DATE
, X_CREATED_BY
, X_LAST_UPDATE_DATE
, X_LAST_UPDATED_BY
, X_LAST_UPDATE_LOGIN );
x_err_stage := 'Inserting into FA_HIERARCHY_DISTRIBUTIONS table';
FA_CUA_HR_DISTRIBUTION_PKG.Insert_row (
l_rowid
, l_distribution_id
, x_asset_hierarchy_purpose_id
, x_asset_hierarchy_id
, x_attribute_book_type_code
, x_distribution_tab(I).distribution_line_percentage
, x_distribution_tab(I).code_combination_id
, x_distribution_tab(I).location_id
, x_distribution_tab(I).assigned_to
, X_CREATION_DATE
, X_CREATED_BY
, X_LAST_UPDATE_DATE
, X_LAST_UPDATED_BY
, X_LAST_UPDATE_LOGIN );
, X_LAST_UPDATE_DATE in DATE default trunc(sysdate)
, X_LAST_UPDATED_BY in NUMBER := FND_GLOBAL.USER_ID
, X_LAST_UPDATE_LOGIN in NUMBER := FND_GLOBAL.USER_ID
, x_description in VARCHAR2 default null
, x_parent_hierarchy_id in NUMBER default null
, x_lowest_level_flag in NUMBER default null
, x_depreciation_start_date in date default null
, x_asset_id in number default null
, X_ATTRIBUTE_CATEGORY in VARCHAR2 default null
, X_ATTRIBUTE1 in VARCHAR2 default null
, X_ATTRIBUTE2 in VARCHAR2 default null
, X_ATTRIBUTE3 in VARCHAR2 default null
, X_ATTRIBUTE4 in VARCHAR2 default null
, X_ATTRIBUTE5 in VARCHAR2 default null
, X_ATTRIBUTE6 in VARCHAR2 default null
, X_ATTRIBUTE7 in VARCHAR2 default null
, X_ATTRIBUTE8 in VARCHAR2 default null
, X_ATTRIBUTE9 in VARCHAR2 default null
, X_ATTRIBUTE10 in VARCHAR2 default null
, X_ATTRIBUTE11 in VARCHAR2 default null
, X_ATTRIBUTE12 in VARCHAR2 default null
, X_ATTRIBUTE13 in VARCHAR2 default null
, X_ATTRIBUTE14 in VARCHAR2 default null
, X_ATTRIBUTE15 in VARCHAR2 default null
)
is
Cursor C_PURPOSE_BOOK is select book_type_code
from FA_ASSET_HIERARCHY_PURPOSE
where asset_hierarchy_purpose_id = x_asset_hierarchy_purpose_id;
CURSOR C_NAME1 is SELECT ASSET_HIERARCHY_ID
FROM FA_ASSET_HIERARCHY
WHERE NAME = x_name
AND NVL (ASSET_ID, 0) = 0
AND ASSET_HIERARCHY_PURPOSE_ID = x_asset_hierarchy_purpose_id;
CURSOR C_NAME2 is SELECT ASSET_HIERARCHY_ID
FROM FA_ASSET_HIERARCHY
WHERE NAME = x_name
AND ASSET_ID = x_asset_id
AND ASSET_HIERARCHY_PURPOSE_ID = x_asset_hierarchy_purpose_id;
Cursor C_PERMIT_LEVELS is select nvl(permissible_levels,0)
from FA_ASSET_HIERARCHY_PURPOSE
where asset_hierarchy_purpose_id = x_asset_hierarchy_purpose_id;
x_err_stage := 'Inserting Node';
FA_CUA_HIERARCHY_PKG.Insert_row (
l_rowid
, x_asset_hierarchy_purpose_id
, x_asset_hierarchy_id
, x_name
, x_level_number
, x_hierarchy_rule_set_id
, X_CREATION_DATE
, X_CREATED_BY
, X_LAST_UPDATE_DATE
, X_LAST_UPDATED_BY
, X_LAST_UPDATE_LOGIN
, x_description
, x_parent_hierarchy_id
, x_lowest_level_flag
, x_depreciation_start_date
, x_asset_id
, X_ATTRIBUTE_CATEGORY
, X_ATTRIBUTE1
, X_ATTRIBUTE2
, X_ATTRIBUTE3
, X_ATTRIBUTE4
, X_ATTRIBUTE5
, X_ATTRIBUTE6
, X_ATTRIBUTE7
, X_ATTRIBUTE8
, X_ATTRIBUTE9
, X_ATTRIBUTE10
, X_ATTRIBUTE11
, X_ATTRIBUTE12
, X_ATTRIBUTE13
, X_ATTRIBUTE14
, X_ATTRIBUTE15 );
cursor c1 is select
name
, level_number
, hierarchy_rule_set_id
, description
, parent_hierarchy_id
, lowest_level_flag
, depreciation_start_date
, asset_id
, ATTRIBUTE_CATEGORY
, ATTRIBUTE1
, ATTRIBUTE2
, ATTRIBUTE3
, ATTRIBUTE4
, ATTRIBUTE5
, ATTRIBUTE6
, ATTRIBUTE7
, ATTRIBUTE8
, ATTRIBUTE9
, ATTRIBUTE10
, ATTRIBUTE11
, ATTRIBUTE12
, ATTRIBUTE13
, ATTRIBUTE14
, ATTRIBUTE15
from FA_ASSET_HIERARCHY
where asset_hierarchy_id = x_asset_hierarchy_id
and nvl(asset_hierarchy_purpose_id,1) = nvl(x_asset_hierarchy_purpose_id,1)
for update of asset_hierarchy_id nowait;
procedure UPDATE_ROW (
x_asset_hierarchy_purpose_id in NUMBER
, x_asset_hierarchy_id in NUMBER
, x_name in VARCHAR2
, x_level_number in NUMBER
, x_hierarchy_rule_set_id in NUMBER
, X_LAST_UPDATE_DATE in DATE
, X_LAST_UPDATED_BY in NUMBER
, X_LAST_UPDATE_LOGIN in NUMBER
, x_description in VARCHAR2
, x_parent_hierarchy_id in NUMBER
, x_lowest_level_flag in NUMBER
, X_DEPRECIATION_START_DATE in DATE
, x_asset_id in number
, X_ATTRIBUTE_CATEGORY in VARCHAR2
, X_ATTRIBUTE1 in VARCHAR2
, X_ATTRIBUTE2 in VARCHAR2
, X_ATTRIBUTE3 in VARCHAR2
, X_ATTRIBUTE4 in VARCHAR2
, X_ATTRIBUTE5 in VARCHAR2
, X_ATTRIBUTE6 in VARCHAR2
, X_ATTRIBUTE7 in VARCHAR2
, X_ATTRIBUTE8 in VARCHAR2
, X_ATTRIBUTE9 in VARCHAR2
, X_ATTRIBUTE10 in VARCHAR2
, X_ATTRIBUTE11 in VARCHAR2
, X_ATTRIBUTE12 in VARCHAR2
, X_ATTRIBUTE13 in VARCHAR2
, X_ATTRIBUTE14 in VARCHAR2
, X_ATTRIBUTE15 in VARCHAR2
)is
begin
update FA_ASSET_HIERARCHY set
name = x_name,
--level_number = x_level_number, --Level number is Non Updateable
hierarchy_rule_set_id = x_hierarchy_rule_set_id,
description = x_description,
parent_hierarchy_id = x_parent_hierarchy_id,
lowest_level_flag = x_lowest_level_flag,
depreciation_start_date = x_depreciation_start_date,
asset_id = x_asset_id,
ATTRIBUTE_CATEGORY = X_ATTRIBUTE_CATEGORY,
ATTRIBUTE1 = X_ATTRIBUTE1,
ATTRIBUTE2 = X_ATTRIBUTE2,
ATTRIBUTE3 = X_ATTRIBUTE3,
ATTRIBUTE4 = X_ATTRIBUTE4,
ATTRIBUTE5 = X_ATTRIBUTE5,
ATTRIBUTE6 = X_ATTRIBUTE6,
ATTRIBUTE7 = X_ATTRIBUTE7,
ATTRIBUTE8 = X_ATTRIBUTE8,
ATTRIBUTE9 = X_ATTRIBUTE9,
ATTRIBUTE10 = X_ATTRIBUTE10,
ATTRIBUTE11 = X_ATTRIBUTE11,
ATTRIBUTE12 = X_ATTRIBUTE12,
ATTRIBUTE13 = X_ATTRIBUTE13,
ATTRIBUTE14 = X_ATTRIBUTE14,
ATTRIBUTE15 = X_ATTRIBUTE15,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
where asset_hierarchy_id= X_asset_hierarchy_id
and nvl(asset_hierarchy_purpose_id,1) = nvl(x_asset_hierarchy_purpose_id,1);
end UPDATE_ROW;
procedure DELETE_ROW (
x_asset_hierarchy_purpose_id in number
, X_asset_hierarchy_id in NUMBER
) is
begin
delete from FA_ASSET_HIERARCHY
where asset_hierarchy_id = X_asset_hierarchy_id
and nvl(asset_hierarchy_purpose_id,1) = nvl(x_asset_hierarchy_purpose_id,1);
end DELETE_ROW;
select nvl(asset_id,0) from FA_ASSET_HIERARCHY
where asset_hierarchy_id = x_asset_hierarchy_id;
Cursor C is select 1
from fa_hierarchy_controls
where asset_hierarchy_purpose_id = x_hierarchy_purpose_id
and level_number = x_level_number
and nvl(decode(x_attribute_name,'CATEGORY',category_mandatory_flag
,'LEASE',lease_mandatory_flag
,'ASSET_KEY',asset_key_mandatory_flag
,'SERIAL_NUMBER',serial_number_mandatory_flag
,'DISTRIBUTION',distribution_mandatory_flag
,'LED',life_end_date_mandatory_flag
,'DPIS',dpis_mandatory_flag
),'N') = 'Y';
select 1 into dummy from fa_asset_hierarchy
where asset_hierarchy_id = x_asset_hierarchy_id
and nvl(asset_id,0) = 0
and not exists (Select 1
from fa_asset_hierarchy a
where nvl(a.asset_id,0) = 0
and a.parent_hierarchy_id = x_asset_hierarchy_id);
cursor C is select nvl(asset_id,0)
from fa_asset_hierarchy
where asset_hierarchy_id = x_asset_hierarchy_id;
select 1 into dummy
from dual
where exists (Select 1 from fa_asset_hierarchy
where parent_hierarchy_id = x_asset_hierarchy_id
and nvl(asset_id,0) <> 0);
select 1 into dummy from dual
where exists(select 1 from fa_asset_hierarchy
where parent_hierarchy_id = x_asset_hierarchy_id);
select 1 into dummy from dual
where exists ( select asset_hierarchy_id
from fa_asset_hierarchy
where nvl(asset_id,0) <> 0
start with asset_hierarchy_id = x_node_id
connect by prior asset_hierarchy_id = parent_hierarchy_id);