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;
711:
712: -- Create hierarchy edge while not exist
713: BEGIN
714: SELECT value_id INTO l_value_id
715: FROM cn_hierarchy_nodes
716: WHERE dim_hierarchy_id = p_dim_hierarchy_id
717: AND org_id = p_org_id
718: AND name = l_hierarchy_node_csr.node_name
719: AND external_id = l_external_id;
829: -- API name : Hierarchy_Import
830: -- Type : Private.
831: -- Function : programtransfer data from staging table into
832: -- cn_dimension_vl,cn_head_hierarchies,cn_dim_hierarchies
833: -- cn_hierarchy_nodes, cn_hierarchy_edges
834: -- Pre-reqs : None.
835: -- Parameters :
836: -- IN : p_imp_header_id IN NUMBER,
837: -- OUT : errbuf OUT VARCHAR2 Required
870: l_hier_record imp_hier_rec_type;
871: l_base_tbl_id cn_obj_tables_v.table_id%TYPE;
872: l_primary_key_id cn_obj_columns_v.column_id%TYPE;
873: l_hier_value_id cn_obj_columns_v.column_id%TYPE;
874: l_def_base_name cn_hierarchy_nodes.name%TYPE;
875:
876: -- cursor to get all record missed required field
877: CURSOR c_miss_required_csr IS
878: SELECT imp_line_id,record_num FROM cn_hierarchy_imp_v
1213: EXCEPTION
1214: WHEN no_data_found THEN
1215: -- get default name from DB
1216: SELECT name INTO l_def_base_name
1217: FROM cn_hierarchy_nodes
1218: WHERE dim_hierarchy_id = l_dim_hierarchy_id and org_id=p_org_id
1219: AND external_id IS NULL ;
1220:
1221: WHEN too_many_rows THEN