Deleting cubes and dimensions safely
- Feb. 14, 2010
I am probably not telling any news to you if I say that you cannot delete dimensions that are used in a cube. What if you want to delete a cube and its dimensions? Should you go out and look at every cube whether a particular dimension is being used or not? Well, you can try to delete the dimension (if you have sufficient rights to do so), and TM1 will come up with a message if the dimension is used elsewhere in a cube.
To automate this task, below is a small TI process to do the dirty work for you.
Create a parameter called pCube. It should be a String parameter, and will be used to offer the user a way to enter a cube name. That cube will be delete, as well as its dimensions. The code will not hang on deleting dimensions that are not allowed to be deleted. The process will continue in a smooth way.
# Wim Gielis # http://www.wimgielis.comIF(CUBEEXISTS(pCube)=1); IF(SUBST(pCube,1,1)@<>'}'); # PART 1: track dimensions of the cube pCube to be deleted i=1; vDimensionsToDelete=''; WHILE(LONG(TABDIM(pCube,i))>0); vDimension=TABDIM(pCube,i); vDimensionCanBeDeleted=1; IF(SUBST(vDimension,1,1)@='}'); vDimensionCanBeDeleted=0; ELSE; c=1; WHILE(c<=DIMSIZ('}Cubes')); vCube=DIMNM('}Cubes',c); IF(pCube@<>vCube); IF(SUBST(vCube,1,1)@<>'}'); j=1; WHILE(LONG(TABDIM(vCube,j))>0); vDimension2=TABDIM(vCube,j); IF(vDimension2@=vDimension); vDimensionCanBeDeleted=0; ENDIF; j=j+1; END; ENDIF; ENDIF; c=c+1; END; ENDIF; IF(vDimensionCanBeDeleted=1); vDimensionsToDelete=vDimensionsToDelete | vDimension | '$'; ENDIF; i=i+1; END; # PART 2: delete the dimensions marked for deletion CUBEDESTROY(pCube); WHILE(LONG(vDimensionsToDelete)>0); vDimension=SUBST(vDimensionsToDelete,1,SCAN('$',vDimensionsToDelete)-1); DIMENSIONDESTROY(vDimension); vDimensionsToDelete=DELET(vDimensionsToDelete,1,SCAN('$',vDimensionsToDelete)); END; ENDIF; ENDIF;
- This code is powerful, yet be sure to know what you are doing and to understand the consequences!
- Control cubes are never deleted, nor control dimensions.
- You could adapt the process to only delete a cube when all of its dimensions are nowhere used.
- It does not matter whether a dimension has attributes or not.