[Home] [Help]
275: end insertColumnRecord;
276:
277: -------------------------------------------------------------------------------
278: -- insertLevelRecord - Private function that inserts a
279: -- zpb_md_records.levels_entry into zpb_levels and
280: -- returns the primary key of the newly created entry
281: -------------------------------------------------------------------------------
282: function insertLevelRecord(p_level_rec zpb_md_records.levels_entry)
283: return number is
290:
291: begin
292:
293: select level_id into l_level_rec.LevelId
294: from zpb_levels
295: where dimension_id = l_level_rec.DimensionId and
296: pers_cwm_name = l_level_rec.PersCWMName;
297:
298: update zpb_levels
294: from zpb_levels
295: where dimension_id = l_level_rec.DimensionId and
296: pers_cwm_name = l_level_rec.PersCWMName;
297:
298: update zpb_levels
299: set
300:
301: PERS_CWM_NAME = l_level_rec.PersCWMName,
302: DIMENSION_ID = l_level_rec.DimensionId,
311: where level_id = l_level_rec.LevelId;
312:
313: exception
314: when NO_DATA_FOUND then
315: SELECT zpb_levels_seq.NEXTVAL INTO l_level_rec.LevelId FROM DUAL;
316:
317: insert into zpb_levels
318: (
319: PERS_CWM_NAME,
313: exception
314: when NO_DATA_FOUND then
315: SELECT zpb_levels_seq.NEXTVAL INTO l_level_rec.LevelId FROM DUAL;
316:
317: insert into zpb_levels
318: (
319: PERS_CWM_NAME,
320: DIMENSION_ID,
321: EPB_ID,
1057: end insertHierarchyTLRecord;
1058:
1059: -------------------------------------------------------------------------------
1060: -- insertLevelTLRecord - Private procedure that inserts a
1061: -- zpb_md_records.levels_tl_entry into zpb_levels_tl and
1062: -------------------------------------------------------------------------------
1063: procedure insertLevelTLRecord(p_levels_tl_rec in zpb_md_records.levels_tl_entry)
1064: is
1065: l_levels_tl_rec zpb_md_records.levels_tl_entry;
1069:
1070: l_levels_tl_rec := p_levels_tl_rec;
1071:
1072: select count(*) into l_record_count
1073: from zpb_levels_tl
1074: where level_id = l_levels_tl_rec.LevelId and
1075: language = l_levels_tl_rec.Language;
1076:
1077: if l_record_count = 1 then
1075: language = l_levels_tl_rec.Language;
1076:
1077: if l_record_count = 1 then
1078:
1079: update zpb_levels_tl
1080: set
1081: LONG_NAME = l_levels_tl_rec.LongName,
1082: NAME = l_levels_tl_rec.Name,
1083: PLURAL_LONG_NAME = l_levels_tl_rec.PluralLongName,
1091: language = l_levels_tl_rec.Language;
1092:
1093: else
1094:
1095: insert into zpb_levels_tl
1096: (
1097: LEVEL_ID,
1098: LANGUAGE,
1099: LONG_NAME,
1552: delete zpb_hierarchies
1553: where dimension_id = p_dimension_id;
1554:
1555: -- delete levels_tl
1556: delete zpb_levels_tl
1557: where level_id in (select level_id
1558: from zpb_levels
1559: where dimension_id = p_dimension_id);
1560:
1554:
1555: -- delete levels_tl
1556: delete zpb_levels_tl
1557: where level_id in (select level_id
1558: from zpb_levels
1559: where dimension_id = p_dimension_id);
1560:
1561: -- Finally delete levels
1562: delete zpb_levels
1558: from zpb_levels
1559: where dimension_id = p_dimension_id);
1560:
1561: -- Finally delete levels
1562: delete zpb_levels
1563: where dimension_id = p_dimension_id;
1564:
1565:
1566: -- Delete zpb_tables entries for dimension
1610:
1611: begin
1612:
1613: -- delete levels_tl
1614: delete zpb_levels_tl
1615: where level_id = p_level_id;
1616:
1617: -- Finally delete levels
1618: delete zpb_levels
1614: delete zpb_levels_tl
1615: where level_id = p_level_id;
1616:
1617: -- Finally delete levels
1618: delete zpb_levels
1619: where level_id = p_level_id;
1620:
1621: end deleteLevelRecord;
1622:
1694: v_hierarchy c_hierarchies%ROWTYPE;
1695:
1696: CURSOR c_levels is
1697: select level_id
1698: from zpb_levels
1699: where last_update_date < p_start_time and
1700: dimension_id in (select dimension_id
1701: from zpb_dimensions
1702: where bus_area_id = bus_area_id_num);
5648: -- add a scoping entry
5649: l_hl_scope_en.HierId := l_hier_scope_en.HierarchyId;
5650:
5651: select level_id into l_hl_scope_en.LevelId
5652: from zpb_levels
5653: where pers_cwm_name = l_level_perscwm and
5654: dimension_id = l_dimension_id;
5655:
5656: l_hl_scope_en.UserId := l_user_id;
5931: delete zpb_hierarchies
5932: where dimension_id = v_dim.dimension_id;
5933:
5934: -- delete levels_tl
5935: delete zpb_levels_tl
5936: where level_id in (select level_id
5937: from zpb_levels
5938: where dimension_id = v_dim.dimension_id);
5939:
5933:
5934: -- delete levels_tl
5935: delete zpb_levels_tl
5936: where level_id in (select level_id
5937: from zpb_levels
5938: where dimension_id = v_dim.dimension_id);
5939:
5940: -- Finally delete levels
5941: delete zpb_levels
5937: from zpb_levels
5938: where dimension_id = v_dim.dimension_id);
5939:
5940: -- Finally delete levels
5941: delete zpb_levels
5942: where dimension_id = v_dim.dimension_id;
5943:
5944: -- Finally delete dimension
5945: delete zpb_dimensions