Merge branch 'master' into hssqlppp

7 years ago · d33dcbe33c
parent 6d86392946 3b7603b311
commit d33dcbe33c
1 changed files with 2 additions and 2 deletions
--- a/src/Ringo/Generator/Populate/Fact.hs
+++ b/src/Ringo/Generator/Populate/Fact.hs
@ -130,8 +130,8 @@ factTablePopulateSQL popMode fact = do
      timeUnitColumnInsertSQL cName =
        let colName = timeUnitColumnName dimIdColName cName settingTimeUnit
        in ( colName
-           , "extract(epoch from " <> fullColumnName fTableName cName <> ")::bigint/"
-                <> Text.pack (show $ timeUnitToSeconds settingTimeUnit)
+           , "floor(extract(epoch from " <> fullColumnName fTableName cName <> ")/"
+                <> Text.pack (show $ timeUnitToSeconds settingTimeUnit) <> ")::bigint"
           , True
           )
      dimIdColumnInsertSQL cName =