[Home] [Help]
297: -------------------------------------------------------------------------
298: PROCEDURE VALIDATE_DATASET_DIMS(p_version_id IN NUMBER)
299: is
300: l_spec_dim_list VARCHAR2(512);
301: l_dataset_id ZPB_BUSAREA_DATASETS.DATASET_ID%type;
302: l_currency ZPB_BUSAREA_VERSIONS.CURRENCY_ENABLED%type;
303: l_dimension_id ZPB_BUSAREA_DIMENSIONS.DIMENSION_ID%type;
304: l_cursor epb_cur_type;
305: l_datatable_dim_list VARCHAR2(1000);
317: where dataset_code = l_dataset_id;
318:
319: cursor c_datasets is
320: select A.DATASET_ID
321: from ZPB_BUSAREA_DATASETS A
322: where A.VERSION_ID = p_version_id
323: and A.DATASET_ID in
324: (select DATASET_CODE
325: from FEM_DATASETS_B
583: where ENABLED_FLAG = 'Y');
584:
585: cursor c_datasets is
586: select A.DATASET_ID
587: from ZPB_BUSAREA_DATASETS A
588: where A.VERSION_ID = p_version_id
589: and A.DATASET_ID not in
590: (select DATASET_CODE
591: from FEM_DATASETS_B
681: --
682: for each in c_datasets loop
683: REGISTER_ERROR('S', 'W', 'ZPB_BUSAREA_VAL_REMOVED',
684: 'OBJ_TYPE', 'ZPB_DATASET', 'Y');
685: delete from ZPB_BUSAREA_DATASETS
686: where VERSION_ID = p_version_id
687: and DATASET_ID = each.DATASET_ID;
688: end loop;
689:
3016: where C.VERSION_ID = p_version_id);
3017:
3018: cursor l_datasets is
3019: select A.DATASET_ID, A.NAME
3020: from ZPB_BUSAREA_DATASETS_VL A
3021: where A.VERSION_ID = l_refr_vers
3022: and A.DATASET_ID not in
3023: (select B.DATASET_ID
3024: from ZPB_BUSAREA_DATASETS B
3020: from ZPB_BUSAREA_DATASETS_VL A
3021: where A.VERSION_ID = l_refr_vers
3022: and A.DATASET_ID not in
3023: (select B.DATASET_ID
3024: from ZPB_BUSAREA_DATASETS B
3025: where B.VERSION_ID = p_version_id);
3026:
3027: cursor l_attrs is
3028: select A.ATTRIBUTE_ID, C.ATTRIBUTE_NAME,