FORMAT==100
['No Cells in Cube'] =N:
    DIMSIZ(TABDIM(!}Cubes, 1)) * DIMSIZ(TABDIM(!}Cubes, 2)) *
    IF(TABDIM(!}Cubes, 3)@<>'', DIMSIZ(TABDIM(!}Cubes, 3)), 1) *
    IF(TABDIM(!}Cubes, 4)@<>'', DIMSIZ(TABDIM(!}Cubes, 4)), 1) *
    IF(TABDIM(!}Cubes, 5)@<>'', DIMSIZ(TABDIM(!}Cubes, 5)), 1) *
    IF(TABDIM(!}Cubes, 6)@<>'', DIMSIZ(TABDIM(!}Cubes, 6)), 1) *
    IF(TABDIM(!}Cubes, 7)@<>'', DIMSIZ(TABDIM(!}Cubes, 7)), 1) *
    IF(TABDIM(!}Cubes, 8)@<>'', DIMSIZ(TABDIM(!}Cubes, 8)), 1) *
    IF(TABDIM(!}Cubes, 9)@<>'', DIMSIZ(TABDIM(!}Cubes, 9)), 1) *
    IF(TABDIM(!}Cubes, 10)@<>'', DIMSIZ(TABDIM(!}Cubes, 10)), 1) *
    IF(TABDIM(!}Cubes, 11)@<>'', DIMSIZ(TABDIM(!}Cubes, 11)), 1) *
    IF(TABDIM(!}Cubes, 12)@<>'', DIMSIZ(TABDIM(!}Cubes, 12)), 1) *
    IF(TABDIM(!}Cubes, 13)@<>'', DIMSIZ(TABDIM(!}Cubes, 13)), 1) *
    IF(TABDIM(!}Cubes, 14)@<>'', DIMSIZ(TABDIM(!}Cubes, 14)), 1) *
    IF(TABDIM(!}Cubes, 15)@<>'', DIMSIZ(TABDIM(!}Cubes, 15)), 1) *
    IF(TABDIM(!}Cubes, 16)@<>'', DIMSIZ(TABDIM(!}Cubes, 16)), 1);

['No Dimensions in Cube'] =N:
    IF(TABDIM(!}Cubes, 3)@='', 2,CONTINUE);
['No Dimensions in Cube'] =N:
    IF(TABDIM(!}Cubes, 4)@='', 3,CONTINUE);
['No Dimensions in Cube'] =N:
    IF(TABDIM(!}Cubes, 5)@='', 4,CONTINUE);
['No Dimensions in Cube'] =N:
    IF(TABDIM(!}Cubes, 6)@='', 5,CONTINUE);
['No Dimensions in Cube'] =N:
    IF(TABDIM(!}Cubes, 7)@='', 6,CONTINUE);
['No Dimensions in Cube'] =N:
    IF(TABDIM(!}Cubes, 8)@='', 7,CONTINUE);
['No Dimensions in Cube'] =N:
    IF(TABDIM(!}Cubes, 9)@='', 8,CONTINUE);
['No Dimensions in Cube'] =N:
    IF(TABDIM(!}Cubes, 10)@='', 9,CONTINUE);
['No Dimensions in Cube'] =N:
    IF(TABDIM(!}Cubes, 11)@='', 10,CONTINUE);
