建立多维数据集的问题---新手请教（急等，送分）

[Richard854613]

我建立了一个多维数据集，当在多维数据集编辑器里保存的时候，系统提示事实数据表的大小不能为空，我换了几个事实数据表后还不行，请问如何使事实数据表的大小不为空。

[sagac]

设计一个与或操作；
将空的事实数据表定义为unknown；
与的操作 unknown & 1 =null
或的操作 unknown ||1 =1
看你怎么定义了。

[Richard854613]

如何定义事实数据表为unknown及与或操作。

[chensdss]

真的难为你啦

[gmlee]

var myMap: TCubeDims;
nCount: integer; // used in step 3
//DecisionCube1 and IBQuery1 are components on your form. DecisionCube1 is a TDecisionCube,
and IBQuery1 is a TIBQuery, or other TDataset descendant.

myMap := TCubeDims.Create(DecisionCube1, TCubeDim);
try
bParsed := false;
bDataSetMatch := false;
myMap.Assign(TCubeDims(DecisionCube1.DimensionMap));
anError := BuildDataSetMap(IBQuery1, myMap, bParsed, bDataSetMatch);
case anError of
tqeNotInitialized: raise ECubeDesignError.CreateRes(@sQryNotInitialized);
tqeNoDimensions: raise ECubeDesignError.CreateRes(@sNoDims);
tqeNoAggs: raise ECubeDesignError.CreateRes(@sNoAggs);
tqeNotGrouped: raise ECubeDesignError.CreateRes(@sGroupsMissing);
end;

with myMap do
begin
// Part A: Configure dimensions
for nCount := 0 to [Number of Dimensions - 1] do
begin
Items[nCount].DimensionType := dimDimension;
Items[nCount].BaseName := 'TABLE.FIELDNAME';
//If the dimension is a date and should be grouped, use this code
Items[nCount].FieldType:=ftDateTime;
Items[nCount].BinType:=binYear
{or}
Items[nCount].BinType:=binQuarter
{or}
Items[nCount].BinType:=binMonth
Items[nCount].BinFormat:='mm/dd/yyyy';
Items[nCount].StartValue:=BaseDate;
//If the dimension is not a date, or is a date but should not be grouped,use this code
Items[nCount].BinType:=binNone;
end;
// Part B: Configure summaries
for nCount:=[Number of Dimensions] to [Number of Fields-1] do
Items[nCount].DimensionType := dimCount;
end;

// And finally, apply the new dimension map
DecisionCube1.Refresh(myMap, true); finally
myMap.Free
end;