612: ;
613:
614: TYPE refcurtype IS ref CURSOR;
615: node_csr refcurtype;
616: l_parent_ext_id cn_hierarchy_nodes.external_id%TYPE ;
617: l_parent_value_id cn_hierarchy_nodes.value_id%TYPE ;
618: l_external_id cn_hierarchy_nodes.external_id%TYPE ;
619: l_value_id cn_hierarchy_nodes.value_id%TYPE ;
620:
613:
614: TYPE refcurtype IS ref CURSOR;
615: node_csr refcurtype;
616: l_parent_ext_id cn_hierarchy_nodes.external_id%TYPE ;
617: l_parent_value_id cn_hierarchy_nodes.value_id%TYPE ;
618: l_external_id cn_hierarchy_nodes.external_id%TYPE ;
619: l_value_id cn_hierarchy_nodes.value_id%TYPE ;
620:
621: BEGIN
614: TYPE refcurtype IS ref CURSOR;
615: node_csr refcurtype;
616: l_parent_ext_id cn_hierarchy_nodes.external_id%TYPE ;
617: l_parent_value_id cn_hierarchy_nodes.value_id%TYPE ;
618: l_external_id cn_hierarchy_nodes.external_id%TYPE ;
619: l_value_id cn_hierarchy_nodes.value_id%TYPE ;
620:
621: BEGIN
622: -- Initialize API return status to success
615: node_csr refcurtype;
616: l_parent_ext_id cn_hierarchy_nodes.external_id%TYPE ;
617: l_parent_value_id cn_hierarchy_nodes.value_id%TYPE ;
618: l_external_id cn_hierarchy_nodes.external_id%TYPE ;
619: l_value_id cn_hierarchy_nodes.value_id%TYPE ;
620:
621: BEGIN
622: -- Initialize API return status to success
623: x_return_status := FND_API.G_RET_STS_SUCCESS;
651: -- Get value id of parent Node
652: BEGIN
653: IF l_hierarchy_node_csr.parent_node_name <> p_def_base_name THEN
654: SELECT value_id INTO l_parent_value_id
655: FROM cn_hierarchy_nodes
656: WHERE dim_hierarchy_id = p_dim_hierarchy_id
657: AND org_id = p_org_id
658: AND name = l_hierarchy_node_csr.parent_node_name;
659: ELSE
657: AND org_id = p_org_id
658: AND name = l_hierarchy_node_csr.parent_node_name;
659: ELSE
660: SELECT value_id INTO l_parent_value_id
661: FROM cn_hierarchy_nodes
662: WHERE dim_hierarchy_id = p_dim_hierarchy_id
663: AND org_id = p_org_id
664: AND external_id IS NULL;
665: END IF;
664: AND external_id IS NULL;
665: END IF;
666: EXCEPTION
667: WHEN no_data_found THEN
668: -- parent_node not exist in cn_hierarchy_nodes
669: l_message :=
670: fnd_message.get_string('CN','CN_HIER_NF_PARENT_NODE');
671: l_error_code := 'CN_HIER_NF_PARENT_NODE';
672: RAISE FND_API.g_exc_error;
705:
706: -- Create hierarchy edge while not exist
707: BEGIN
708: SELECT value_id INTO l_value_id
709: FROM cn_hierarchy_nodes
710: WHERE dim_hierarchy_id = p_dim_hierarchy_id
711: AND org_id = p_org_id
712: AND name = l_hierarchy_node_csr.node_name
713: AND external_id = l_external_id;
823: -- API name : Hierarchy_Import
824: -- Type : Private.
825: -- Function : programtransfer data from staging table into
826: -- cn_dimension_vl,cn_head_hierarchies,cn_dim_hierarchies
827: -- cn_hierarchy_nodes, cn_hierarchy_edges
828: -- Pre-reqs : None.
829: -- Parameters :
830: -- IN : p_imp_header_id IN NUMBER,
831: -- OUT : errbuf OUT VARCHAR2 Required
864: l_hier_record imp_hier_rec_type;
865: l_base_tbl_id cn_obj_tables_v.table_id%TYPE;
866: l_primary_key_id cn_obj_columns_v.column_id%TYPE;
867: l_hier_value_id cn_obj_columns_v.column_id%TYPE;
868: l_def_base_name cn_hierarchy_nodes.name%TYPE;
869:
870: -- cursor to get all record missed required field
871: CURSOR c_miss_required_csr IS
872: SELECT imp_line_id,record_num FROM cn_hierarchy_imp_v
1207: EXCEPTION
1208: WHEN no_data_found THEN
1209: -- get default name from DB
1210: SELECT name INTO l_def_base_name
1211: FROM cn_hierarchy_nodes
1212: WHERE dim_hierarchy_id = l_dim_hierarchy_id and org_id=p_org_id
1213: AND external_id IS NULL ;
1214:
1215: WHEN too_many_rows THEN