Makes NoDimId columns in extracted fact tables not nullable.
parent
8f27bdf33c
commit
aeed16570e
|
@ -31,7 +31,9 @@ extractFactTable fact = do
|
||||||
columns = concatFor (factColumns fact) $ \col -> case col of
|
columns = concatFor (factColumns fact) $ \col -> case col of
|
||||||
DimTime cName ->
|
DimTime cName ->
|
||||||
[ Column (timeUnitColumnName dimIdColName cName settingTimeUnit) "bigint" NotNull ]
|
[ Column (timeUnitColumnName dimIdColName cName settingTimeUnit) "bigint" NotNull ]
|
||||||
NoDimId cName -> [ fromJust . findColumn cName . tableColumns $ table] -- TODO should be not null
|
NoDimId cName -> let
|
||||||
|
col' = fromJust . findColumn cName . tableColumns $ table
|
||||||
|
in [ col' { columnNullable = NotNull } ]
|
||||||
FactCount _ cName -> [ Column cName countColType NotNull ]
|
FactCount _ cName -> [ Column cName countColType NotNull ]
|
||||||
FactSum scName cName -> [ Column cName (sourceColumnType scName) NotNull ]
|
FactSum scName cName -> [ Column cName (sourceColumnType scName) NotNull ]
|
||||||
FactAverage scName cName ->
|
FactAverage scName cName ->
|
||||||
|
|
Loading…
Reference in New Issue