278: is
279: cursor C is select ROWID from FA_ASSET_HIERARCHY
280: where asset_hierarchy_id = X_asset_hierarchy_id ;
281:
282: CURSOR C1 is Select FA_ASSET_HIERARCHY_S.nextval from sys.dual;
283: l_name FA_ASSET_HIERARCHY.name%TYPE;
284: begin
285: if X_asset_hierarchy_id is null then
286: open C1;
376: ,x_err_code in out nocopy varchar2
377: ,x_err_stage in out nocopy varchar2
378: ,x_err_stack in out nocopy varchar2)
379: is
380: Cursor C is select FA_HIERARCHY_DIST_SET_S.nextval from dual;
381: Cursor C_CofA_id is select accounting_flex_structure
382: from fa_book_controls
383: where book_type_code = x_book_type_code;
384: l_CofA_id number;
479: return boolean
480: is
481: dummy number;
482: begin
483: select 1 into dummy from dual
484: where exists(select 1 from fa_categories
485: where category_id = x_catg_id
486: and category_type = 'NON-LEASE');
487: return(TRUE);
1798: is
1799: dummy number;
1800: Begin
1801: select 1 into dummy
1802: from dual
1803: where exists (Select 1 from fa_asset_hierarchy
1804: where parent_hierarchy_id = x_asset_hierarchy_id
1805: and nvl(asset_id,0) <> 0);
1806: return (TRUE);
1813: return BOOLEAN
1814: is
1815: dummy number;
1816: begin
1817: select 1 into dummy from dual
1818: where exists(select 1 from fa_asset_hierarchy
1819: where parent_hierarchy_id = x_asset_hierarchy_id);
1820: return(TRUE);
1821: Exception
1827: Function is_assets_attached_node(x_node_id in number) return boolean
1828: is
1829: dummy number;
1830: Begin
1831: select 1 into dummy from dual
1832: where exists ( select asset_hierarchy_id
1833: from fa_asset_hierarchy
1834: where nvl(asset_id,0) <> 0
1835: start with asset_hierarchy_id = x_node_id