[Home] [Help]
709: end insertCubeHierRecord;
710:
711: -------------------------------------------------------------------------------
712: -- insertMeasureRecord - Private function that inserts a
713: -- zpb_md_records.measures_entry into zpb_measures and
714: -- returns the primary key of the newly created entry
715: -------------------------------------------------------------------------------
716: function insertMeasureRecord(p_measure_rec zpb_md_records.measures_entry)
717: return number is
725: -- dbms_output.put_line('inserting measure: ' || l_measure_rec.CWMName || ' into cube ' || l_measure_rec.CubeId );
726:
727: begin
728: select measure_id into l_measure_rec.MeasureId
729: from zpb_measures
730: where cube_id = l_measure_rec.CubeId and
731: cwm_name = l_measure_rec.CWMName;
732:
733: -- dbms_output.put_line('UPDATING');
731: cwm_name = l_measure_rec.CWMName;
732:
733: -- dbms_output.put_line('UPDATING');
734:
735: update zpb_measures
736: set
737: AW_NAME = l_measure_rec.AwName,
738: COLUMN_ID = l_measure_rec.ColumnId,
739: CURRENCY_TYPE = l_measure_rec.CurrencyType,
755: where measure_id = l_measure_rec.MeasureId;
756:
757: exception
758: when NO_DATA_FOUND then
759: SELECT zpb_measures_seq.NEXTVAL INTO l_measure_rec.MeasureId FROM DUAL;
760:
761: -- dbms_output.put_line('INSERTING');
762:
763: insert into zpb_measures
759: SELECT zpb_measures_seq.NEXTVAL INTO l_measure_rec.MeasureId FROM DUAL;
760:
761: -- dbms_output.put_line('INSERTING');
762:
763: insert into zpb_measures
764: (
765: AW_NAME,
766: COLUMN_ID,
767: CUBE_ID,
1137: -- 'Deleteing Cube '||p_cube_id);
1138:
1139: -- delete cube measures and measure scoping entries
1140:
1141: delete zpb_measures
1142: where cube_id = p_cube_id;
1143:
1144: -- delete table and column entries for cube
1145: delete zpb_columns
5166:
5167: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5168: l_instType||' DATA '||l_objName||'''');
5169:
5170: delete from zpb_measures
5171: where measure_id in
5172: (select measure_id from zpb_measures, zpb_cubes
5173: where zpb_measures.cube_id = zpb_cubes.cube_id and
5174: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5168: l_instType||' DATA '||l_objName||'''');
5169:
5170: delete from zpb_measures
5171: where measure_id in
5172: (select measure_id from zpb_measures, zpb_cubes
5173: where zpb_measures.cube_id = zpb_cubes.cube_id and
5174: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5175: zpb_measures.epb_id= l_meas);
5176:
5169:
5170: delete from zpb_measures
5171: where measure_id in
5172: (select measure_id from zpb_measures, zpb_cubes
5173: where zpb_measures.cube_id = zpb_cubes.cube_id and
5174: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5175: zpb_measures.epb_id= l_meas);
5176:
5177: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5171: where measure_id in
5172: (select measure_id from zpb_measures, zpb_cubes
5173: where zpb_measures.cube_id = zpb_cubes.cube_id and
5174: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5175: zpb_measures.epb_id= l_meas);
5176:
5177: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5178: l_instType||' ANNOTATION '||l_objName||'''');
5179:
5176:
5177: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5178: l_instType||' ANNOTATION '||l_objName||'''');
5179:
5180: delete from zpb_measures
5181: where measure_id in
5182: (select measure_id from zpb_measures, zpb_cubes
5183: where zpb_measures.cube_id = zpb_cubes.cube_id and
5184: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5178: l_instType||' ANNOTATION '||l_objName||'''');
5179:
5180: delete from zpb_measures
5181: where measure_id in
5182: (select measure_id from zpb_measures, zpb_cubes
5183: where zpb_measures.cube_id = zpb_cubes.cube_id and
5184: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5185: zpb_measures.epb_id= l_meas);
5186:
5179:
5180: delete from zpb_measures
5181: where measure_id in
5182: (select measure_id from zpb_measures, zpb_cubes
5183: where zpb_measures.cube_id = zpb_cubes.cube_id and
5184: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5185: zpb_measures.epb_id= l_meas);
5186:
5187: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5181: where measure_id in
5182: (select measure_id from zpb_measures, zpb_cubes
5183: where zpb_measures.cube_id = zpb_cubes.cube_id and
5184: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5185: zpb_measures.epb_id= l_meas);
5186:
5187: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5188: l_instType||' FORMAT '||l_objName||'''');
5189: delete from zpb_measures
5185: zpb_measures.epb_id= l_meas);
5186:
5187: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5188: l_instType||' FORMAT '||l_objName||'''');
5189: delete from zpb_measures
5190: where measure_id in
5191: (select measure_id from zpb_measures, zpb_cubes
5192: where zpb_measures.cube_id = zpb_cubes.cube_id and
5193: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5187: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5188: l_instType||' FORMAT '||l_objName||'''');
5189: delete from zpb_measures
5190: where measure_id in
5191: (select measure_id from zpb_measures, zpb_cubes
5192: where zpb_measures.cube_id = zpb_cubes.cube_id and
5193: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5194: zpb_measures.epb_id= l_meas);
5195:
5188: l_instType||' FORMAT '||l_objName||'''');
5189: delete from zpb_measures
5190: where measure_id in
5191: (select measure_id from zpb_measures, zpb_cubes
5192: where zpb_measures.cube_id = zpb_cubes.cube_id and
5193: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5194: zpb_measures.epb_id= l_meas);
5195:
5196: if (p_type = 'PERSONAL') then
5190: where measure_id in
5191: (select measure_id from zpb_measures, zpb_cubes
5192: where zpb_measures.cube_id = zpb_cubes.cube_id and
5193: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5194: zpb_measures.epb_id= l_meas);
5195:
5196: if (p_type = 'PERSONAL') then
5197: l_instance := to_number(zpb_aw.interp('shw CM.GETPHYSICALINSTANCE('''||
5198: p_instance||''')'));
5197: l_instance := to_number(zpb_aw.interp('shw CM.GETPHYSICALINSTANCE('''||
5198: p_instance||''')'));
5199: select count(*)
5200: into l_count
5201: from ZPB_MEASURES
5202: where INSTANCE_ID = l_instance
5203: and TYPE = 'PERSONAL_DATA'
5204: and CUBE_ID in (select CUBE_ID from ZPB_CUBES
5205: where NAME like '%'||p_aw||'/_%' escape '/');
5214:
5215: if (l_dltWriteSec) then
5216: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5217: l_instType||' WRITE SECURITY '||l_objName||'''');
5218: delete from zpb_measures
5219: where measure_id in
5220: (select measure_id from zpb_measures, zpb_cubes
5221: where zpb_measures.cube_id = zpb_cubes.cube_id and
5222: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5216: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5217: l_instType||' WRITE SECURITY '||l_objName||'''');
5218: delete from zpb_measures
5219: where measure_id in
5220: (select measure_id from zpb_measures, zpb_cubes
5221: where zpb_measures.cube_id = zpb_cubes.cube_id and
5222: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5223: zpb_measures.epb_id= l_meas);
5224: end if;
5217: l_instType||' WRITE SECURITY '||l_objName||'''');
5218: delete from zpb_measures
5219: where measure_id in
5220: (select measure_id from zpb_measures, zpb_cubes
5221: where zpb_measures.cube_id = zpb_cubes.cube_id and
5222: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5223: zpb_measures.epb_id= l_meas);
5224: end if;
5225:
5219: where measure_id in
5220: (select measure_id from zpb_measures, zpb_cubes
5221: where zpb_measures.cube_id = zpb_cubes.cube_id and
5222: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5223: zpb_measures.epb_id= l_meas);
5224: end if;
5225:
5226: if (p_type = 'PERSONAL' or p_type = 'SHARED') then
5227: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5225:
5226: if (p_type = 'PERSONAL' or p_type = 'SHARED') then
5227: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5228: l_instType||' TARGET '||l_objName||'''');
5229: delete from zpb_measures
5230: where measure_id in
5231: (select measure_id from zpb_measures, zpb_cubes
5232: where zpb_measures.cube_id = zpb_cubes.cube_id and
5233: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5227: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5228: l_instType||' TARGET '||l_objName||'''');
5229: delete from zpb_measures
5230: where measure_id in
5231: (select measure_id from zpb_measures, zpb_cubes
5232: where zpb_measures.cube_id = zpb_cubes.cube_id and
5233: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5234: zpb_measures.epb_id= l_meas);
5235:
5228: l_instType||' TARGET '||l_objName||'''');
5229: delete from zpb_measures
5230: where measure_id in
5231: (select measure_id from zpb_measures, zpb_cubes
5232: where zpb_measures.cube_id = zpb_cubes.cube_id and
5233: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5234: zpb_measures.epb_id= l_meas);
5235:
5236: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5230: where measure_id in
5231: (select measure_id from zpb_measures, zpb_cubes
5232: where zpb_measures.cube_id = zpb_cubes.cube_id and
5233: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5234: zpb_measures.epb_id= l_meas);
5235:
5236: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5237: l_instType||' TARGET TYPE '||l_objName||'''');
5238: delete from zpb_measures
5234: zpb_measures.epb_id= l_meas);
5235:
5236: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5237: l_instType||' TARGET TYPE '||l_objName||'''');
5238: delete from zpb_measures
5239: where measure_id in
5240: (select measure_id from zpb_measures, zpb_cubes
5241: where zpb_measures.cube_id = zpb_cubes.cube_id and
5242: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5236: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5237: l_instType||' TARGET TYPE '||l_objName||'''');
5238: delete from zpb_measures
5239: where measure_id in
5240: (select measure_id from zpb_measures, zpb_cubes
5241: where zpb_measures.cube_id = zpb_cubes.cube_id and
5242: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5243: zpb_measures.epb_id= l_meas);
5244:
5237: l_instType||' TARGET TYPE '||l_objName||'''');
5238: delete from zpb_measures
5239: where measure_id in
5240: (select measure_id from zpb_measures, zpb_cubes
5241: where zpb_measures.cube_id = zpb_cubes.cube_id and
5242: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5243: zpb_measures.epb_id= l_meas);
5244:
5245: if (l_dltWriteSec) then
5239: where measure_id in
5240: (select measure_id from zpb_measures, zpb_cubes
5241: where zpb_measures.cube_id = zpb_cubes.cube_id and
5242: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5243: zpb_measures.epb_id= l_meas);
5244:
5245: if (l_dltWriteSec) then
5246: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5247: l_instType||' INPUT LEVEL OBJECT ID''');
5244:
5245: if (l_dltWriteSec) then
5246: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5247: l_instType||' INPUT LEVEL OBJECT ID''');
5248: delete from zpb_measures
5249: where measure_id in
5250: (select measure_id from zpb_measures, zpb_cubes
5251: where zpb_measures.cube_id = zpb_cubes.cube_id and
5252: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5246: l_meas := zpb_aw.interp ('shw CM.GETINSTOBJECT('''||p_instance||''' '''||
5247: l_instType||' INPUT LEVEL OBJECT ID''');
5248: delete from zpb_measures
5249: where measure_id in
5250: (select measure_id from zpb_measures, zpb_cubes
5251: where zpb_measures.cube_id = zpb_cubes.cube_id and
5252: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5253: zpb_measures.epb_id= l_meas);
5254: end if;
5247: l_instType||' INPUT LEVEL OBJECT ID''');
5248: delete from zpb_measures
5249: where measure_id in
5250: (select measure_id from zpb_measures, zpb_cubes
5251: where zpb_measures.cube_id = zpb_cubes.cube_id and
5252: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5253: zpb_measures.epb_id= l_meas);
5254: end if;
5255: end if;
5249: where measure_id in
5250: (select measure_id from zpb_measures, zpb_cubes
5251: where zpb_measures.cube_id = zpb_cubes.cube_id and
5252: zpb_cubes.name like '%'||p_aw||'/_%' escape '/' and
5253: zpb_measures.epb_id= l_meas);
5254: end if;
5255: end if;
5256: end if;
5257: