Refactors to simplify code.
parent
1bf931d697
commit
9fe9816623
|
@ -94,11 +94,12 @@ factTableIndexStatements fact table = do
|
||||||
DimTime -> Just [dimTimeColName cName]
|
DimTime -> Just [dimTimeColName cName]
|
||||||
NoDimId -> Just [cName]
|
NoDimId -> Just [cName]
|
||||||
TenantId -> Just [cName]
|
TenantId -> Just [cName]
|
||||||
_ -> Nothing
|
_ -> Nothing
|
||||||
|
|
||||||
dimCols = [ [ factDimFKIdColumnName settingDimPrefix settingDimTableIdColumnName dimFact dimTable tables ]
|
dimCols = [ [ factDimFKIdColumnName settingDimPrefix settingDimTableIdColumnName dimFact dimTable tables ]
|
||||||
| (dimFact, dimTable) <- allDims ]
|
| (dimFact, dimTable) <- allDims ]
|
||||||
|
|
||||||
|
tenantCols = [ [cName, dimTimeColName dimTimeCol] | cName <- maybeToList tenantIdCol ]
|
||||||
|
|
||||||
return [ CreateIndexTSQL ea (nmc "") (name tabName) (map nmc cols)
|
return [ CreateIndexTSQL ea (nmc "") (name tabName) (map nmc cols)
|
||||||
| cols <- factCols ++ dimCols ++ [ [cName, dimTimeColName dimTimeCol]
|
| cols <- factCols ++ dimCols ++ tenantCols ]
|
||||||
| cName <- maybeToList tenantIdCol ] ]
|
|
||||||
|
|
Loading…
Reference in New Issue