workflowtest shadowed added

Actuarial-Sciences-for-Africa-ASA · Mar 13, 2022 · dbb74de · dbb74de
1 parent dd07d4f
commit dbb74de
Showing 1 changed file with 20 additions and 0 deletions.
diff --git a/workflowtest.jl b/workflowtest.jl
@@ -164,4 +164,24 @@ println(tr3b)
     @test isempty(find(TestDummyComponent, SQLWhereExpression("id=?", t1.id)))
     @test isempty(find(Version, SQLWhereExpression("id=?", currentVersion.id)))
     @test isempty(find(ValidityInterval, SQLWhereExpression("id=?", currentInterval.id)))
+
+
+root = find(
+    ValidityInterval,
+    SQLWhereExpression("ref_history=? AND tsrdb @> now()", w1.ref_history),
+)[1]
+
+shadowed = find(
+    ValidityInterval,
+    SQLWhereExpression(
+        "ref_history=? AND tsdb_invalidfrom=? AND tstzrange(?,?) * tsrworld = tsrworld",
+        root.ref_history,
+        root.tsdb_validfrom,
+        root.tsworld_validfrom,
+        root.tsworld_invalidfrom,
+    )
+)
+
+@test ! isempty(shadowed)
+
 end