为 Hasql 查询编码参数列表

Question

我试图让Hasql 为“选择...在哪里”查询编码一个列表。它会检查我是否使用来自contravariant-extras 的contramany，但在运行时出现语法错误。

import qualified Database.Encoders as E
import Contravariant.Extras

getTeamMembership :: Query [TeamId] [(TeamId, EmployeeId)]
getTeamMembership = statement q enc def True
  where
    enc = contramany (E.value E.teamId)
    q = "select workteam, employee \
        \from workteam_employee where workteam in $1"

不能对参数列表进行编码吗？

Answer 1

“IN”运算符不支持这一点。您只能使用它指定单个值（例如，IN ($1, $2, $3)）。然而，你想要的很容易通过数组编码器和any 和all Postgres 函数来实现，就像the docs 一样。

有some Hasql tests showing it in action。

问题跟踪器上还有a discussion on that subject。