diff --git a/src/engine/gw-engine-spec.scm b/src/engine/gw-engine-spec.scm
index cb47705ac3..b64f8d9d23 100644
--- a/src/engine/gw-engine-spec.scm
+++ b/src/engine/gw-engine-spec.scm
@@ -1717,6 +1717,14 @@ of having a parent transaction with which one is working...")
  '((<gnc:Query*> q) (<gnc:query-txn-match-t> rt))
  "Find transactions with splits matching the Query.")
 
+(gw:wrap-function
+ ws
+ 'gnc:query-get-lots
+ '(gw:glist-of <gnc:Lot*> caller-owned)
+ "xaccQueryGetLots"
+ '((<gnc:Query*> q) (<gnc:query-txn-match-t> rt))
+ "Find lots with splits matching the Query.")
+
 (gw:wrap-function
  ws
  'gnc:query-add-account-match