1回答
我在理解如何升级一个密谋沙箱中的包时遇到了一些问题。我想将esqueleto-1.3.4.5升级到esqueleto-1.3.5，并将我的myapp.cabal改为依赖esqueleto >= 1.3.5 && < 1.4。
$ cabal --version cabal-install version 1.18.0.2 using version 1.18.1.2 of the Cabal library $ cabal install --upgrade-dependencies Resolving dependencies... cabal: Could no
浏览 3提问于2014-03-06得票数 9
1回答
可以写吗
select min(next) from participant;
作为一个esqueleto的查询？
更新
我发现了min_函数。但是，代码
nextMessageTime =
from $ \p -> min_ (p ^. ParticipantNext)
显然有一些不明确的类型：
Could not deduce (Database.Esqueleto.Internal.Language.From
query expr backend (query (Entity (ParticipantGeneric backend0)))
浏览 2提问于2014-06-24得票数 4
我可能做了一些非常愚蠢的事情，但我想将一些Esqueleto和相同功能中的常规持久查询混合在一起。
我的职责是：
handleFactionConstruction :: (BaseBackend backend ~ SqlBackend,
PersistStoreWrite backend, PersistQueryRead backend,
PersistUniqueRead backend, MonadIO m) =>
Time -> Entity Faction -> ReaderT backend m ()
handleFactionCon
浏览 2提问于2018-10-05得票数 2
回答已采纳
esqueleto返回的previousLogItem数据类型包含
import Data.Text.Lazy (pack)
previousLogItem <- select $ from $ \l -> do
orderBy [desc (l ^. LogItemId)]
limit 1
return (l ^. LogItemTitle)
后来，我尝试使用以下命令来比较previousLogItem和exampleCharList：
[Value (pack c
浏览 1提问于2018-04-19得票数 0
1回答
灯箱显示在右侧位置(顶部/左侧居中)，但当用户缩放时；lightobx保持在相同位置(不考虑窗口/视图已调整大小/裁剪)，
你可以在标题的蓝色按钮上点击
我正在检查lightbox的代码，我可以看到
$(window).bind('resize', $.proxy(function() {
if (this.visible)
{
this.overlay.resize();
if (!this.maximized) {
this.movebox();
浏览 0提问于2011-09-30得票数 0
在我看到的所有示例中，的结果都投射到元组或列表中。
例如：
previousLogItems <- select $ from $ \li -> do
orderBy [desc (li ^. LogItemId)]
limit 10
return (li ^. LogItemId, li ^. LogItemTitle)
在esqueleto中是否有方法将列的子集投影到自定义记录(与实体不同)，而不是元组？这是在没有从元组到自定义记录的额外投影的情况下完成的。
例如，假设从数据库中获取所有数据是效率低下的，因此我们只想将数据库中的列
浏览 2提问于2018-05-02得票数 3
在使用Esqueleto EDSL的Yesod应用程序中，我希望使用Haskell中的一个表执行一个反连接。
在纯PostgreSQL中，查询如下所示：
CREATE TEMPORARY TABLE antijoin_demo (x INT);
INSERT INTO antijoin_demo (x)
VALUES (2),(4),(6),(8),(10),(12),(14),(16),(18)
;
SELECT *
FROM
antijoin_demo
FULL OUTER JOIN
(VALUES (3),(6),(9),(12),(15),(18)) AS t(y
浏览 11提问于2022-11-24得票数 1
回答已采纳
我试着根据内容来做一个更大的灯箱，我只需要选择div#id，如果长度>0，那么我知道我需要把盒子做得更大：
这是插件的方法，它实际将iframe HTML附加到lightbox窗口中( div#id在iframe内容中)
appendhtml: function(obj, width, height, mode) {
if (typeof mode !== 'undefined') {
this.changemode(mode);
}
this.resize(width + 30, height + 20);
this.
浏览 1提问于2012-03-28得票数 0
回答已采纳
今天早上，我开始在Yesod应用程序中设置Esqueleto。我真的在尝试做一个LeftOuterJoin，但我已经简化了查询相当多，以便让基本的工作。我甚至都搞不懂。为了确保不会与Database.Persist.Query发生冲突，我遵循了一些将查询提取到不导入Yesod的单独文件中。在配置Esqueleto时，我是否遗漏了什么？
FWIW，我使用的是Yesod 1.4.0，Persistent 2.1和Esqueleto 2.1。
这是我遇到的错误：
Queries.hs:9:15:
No instance for (Database.Esqueleto.Internal.Sql
浏览 0提问于2014-10-15得票数 2
我试图绘制两个不同的图(一个是由带有色阶的矩阵生成的简单图形)，另一个是表示骨架的一组点的x和y轴的图。矩阵颜色标度与骨架图相关联。它必须在一个循环中显示n次，每次画布关闭时，然后显示下一个情节。
但是我只能同时显示每个图形，比方说，我必须有43个画布，每个画布上有一个图形和一个色阶矩阵，相反，我得到了86幅图，一个是点图，另一个是比例尺矩阵，等等。
代码在下面，所以每个情节的图片。我用gridspec来生成图形，用一个简单的img图来生成色阶矩阵。
from pylab import *
from matplotlib import gridspec
import numpy as np
i
浏览 1提问于2018-07-10得票数 0
回答已采纳
2回答
我可以在Esqueleto中用entryId更改一行字段，如下所示：
update $ \entry -> do
set entry [ EntryFoo =. val bar ]
where_ (entry ^. EntryId ==. val entryId)
然而，写它的所有时间变得烦人。我希望能写出这样的东西：
updateById entryId $ \entry ->
set entry [ EntryFoo =. val bar ]
我试图自己编写这个助手，但是我发现我不知道如何以通用的方式编写^. EntryId (也就是一种适用于任
浏览 5提问于2017-10-03得票数 2
回答已采纳
1回答
用esqueleto数行
、、、
我正在尝试计算Esqueleto内部连接的行数(版本2.1.2.1)。不幸的是，我的代码没有编译，我也不明白为什么。我看了以下如何做这件事的例子，但不知道我做错了什么：，。
我的模式看起来如下(简化)：
User
Game
state
Player
user UserId Maybe
game GameId
用户可以在网站上注册玩游戏。你也可以在不注册的情况下玩。因此，有一个单独的表Player。游戏是有状态的。可以是Ongoing，也可以是某种形式的游戏结束。现在我想数一数用户正在玩的所有正在进行的游戏。
下面的SQL-查询可以做到这一点(对于固定的userId为1)：
SELE
浏览 2提问于2015-02-02得票数 4
回答已采纳
是否可以使用esqueleto执行以下查询？
DELETE Table1
FROM Table1
INNER JOIN Table2 ON Table1.ID = Table2.ItemID
我试过了：
delete $
from $ \(table1 `InnerJoin` table2) ->
on (table1 ^. Table1ID ==. table2 ^. Table2ItemID)
奇怪的是，它生成了我在Haskell中见过的仅有的运行时错误之一
ERROR: syntax error at or near "INNER"
LINE 2
浏览 0提问于2015-09-29得票数 9
我一直在使用isNothing，来自Esqueleto，但是现在我只想测试它是否是not null，我注意到没有isJust，我想知道它不存在的原因，以及我能做什么来达到类似的效果：isJust (a ^. MyEntityMyField)
浏览 1提问于2016-05-27得票数 1
回答已采纳
1回答
以下是我从三个表中进行选择的尝试。但是他们不编译，我也不明白这个错误(我不知道为什么它需要一个元组(Entity Issue, b0)，而不是我认为代码试图得到的三元组)。
尝试1：
{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE TypeFamilies #-}
浏览 3提问于2018-10-25得票数 1
回答已采纳
葡萄牙产对不起
好的，基本上我有这样的函数：
function perfil(monstro)
print(monstros.monstro.nomeM)
print(monstros.monstro.racaM)
print(monstros.monstro.generoM)
print(monstros.monstro.idadeM)
print(monstros.monstro.descM)
end
这张桌子：
monstros = {
Esqueleto = {nomeM = "Skeletran", racaM = "Esqueleto&
浏览 2提问于2020-02-11得票数 1
1回答
在可能的关系上运行连接
、、、、
我有一个模型
Assignment
blah Text
....
和一个模型
File
assignmentId AssignmentId Maybe
...
我想要在连接查询中获得与赋值相关联的所有文件。我已经用selectOneMany尝试过Esqueleto和runJoin，但没有任何运气，所以我正在考虑不使用join，或者使用rawSql。这看起来真的不是个好主意，但我想不通。是否有对该功能的支持？
浏览 0提问于2013-03-25得票数 1
回答已采纳
我有一个原始的sql，我想把它转换成Esqueleto。它应该带来用户ID为1的所有未通过group_membership表注册到的group。
SELECT *
FROM group
LEFT OUTER JOIN group_membership
ON (group.id = group_membership.group_id AND group_membership.user_id=1)
WHERE group_membership.group_id IS NULL
浏览 0提问于2016-08-14得票数 0
1回答
Esqueleto计数
、、、
我有下面的Entities
Group
name Text
GroupUser
user UserId
group GroupId
我想做一个这样的查询：
select g.* /* Everything from g */
, count(gu.id) groupUsersCount
from Group g
left outer join GroupUser gu on gu.groupId = g.id
group by g.id
这能用Esqueleto做吗
浏览 4提问于2016-07-15得票数 1
回答已采纳
1回答
数据类型定义为： data ComitteeView = CommitteeView { committeeId :: CommitteeId
, committeeMembers :: [Person]
}
data CommitteesView = CommitteesView { committeeView :: [CommitteeView] } 现在，我有一个持久的模型，定义为： Person
name Text
Committee
浏览 212提问于2018-01-15
我在做一个使用maybe foreign key的连接时遇到了一些麻烦。
我的模特：
OrderItem
productSnapshot ProductSnapshotId
ProductFlow
productInstance ProductInstanceId
orderItem OrderItemId Maybe
ProductSnapshot
productInstance ProductInstanceId
ProductInstance
code Text
我的加入：
type Entities = [(Entity OrderItem, Entity P
浏览 2提问于2016-04-04得票数 0
回答已采纳
我放了Import.hs
import qualified Database.Esqueleto as E
但是在我的Handler文件中
import Import
但它找不到E
module Handler.MyProfile where
import Import
getMyProfileR :: Handler Html
getMyProfileR = do
now <- liftIO getCurrentTime
wordList <- (runDB $ E.select $ E.from $ \v -> do
w
浏览 1提问于2017-04-19得票数 0
回答已采纳
1回答
我已经为加载一些Entities创建了一个函数，但是我很难理解我应该如何放置它的类型声明，因此，为了更好地理解它，我使用了这个关于Yesod monads的，然后讨论了这个片段：
-- type Distance = Int
worksByNhood :: AdrNhoodId -> Int64 -> Int64 -> YesodDB App [(Entity Work, Int, [Entity WImage])]
worksByNhood nId offset' limit' = do
works <- select $ from $ \(w
浏览 2提问于2016-04-18得票数 2
回答已采纳
我有一个包含教师、学校和学区的数据库模式。TEACHERS表有一个可以为空的SCHOOL_ID列(教师可以属于一个学校，也可以不属于一个学校)，SCHOOLS表有一个可以为空的DISTRICT_ID列(一个学校可以属于一个学区，也可以不属于一个学区)。
使用Esqueleto，我想要一个教师列表，每个教师都有一个学校(如果他们属于一个学校)和一个地区(如果他们属于一个地区的学校)。我花了一段时间才找出正确的表达式，只是教师->学校左连接，但我最终得到了正确的：
select $
from $ \(teacher `LeftOuterJoin` school) -> do
on
浏览 2提问于2015-01-24得票数 8
1回答
我有如下定义的数据类型：
data ComitteeView = CommitteeView { committeeId :: CommitteeId
, committeeMembers :: [Person]
}
data CommitteesView = CommitteesView { committeeView :: [CommitteeView] }
现在，我有一个持久化模型定义为：
Person
name Text
Committee
浏览 17提问于2014-05-20得票数 144
如何让Yesod1.2中的runDB与Esqueleto一起工作？
import Database.Esqueleto as E
getMainR :: Handler Html
getMainR = do
leases <- runDB $ E.select $
E.from $ \l -> do
E.where_ (l E.^. LeaseId E.==. E.val 1)
return l
浏览 3提问于2014-03-29得票数 1
回答已采纳
1回答
我有一个Esqueleto查询，它选择了所有的StatusUpdate和它们各自的User，我想把它限制为每个User只有一个StatusUpdate，而现在只限于StatusUpdate。
我有一个有效的SQL查询，我只是在努力将其转换为有效的Esqueleto。
SELECT "email", "subject"
FROM "status_update"
LEFT JOIN "user"
ON ("status_update"."user" = "user"."id
浏览 1提问于2015-12-06得票数 2
回答已采纳
我希望基于存储在数据库中的数据动态创建Database.Esqueleto查询(参见下面代码片段中的DynamicQuery Database.Persist实体)。下面的代码编译，但由于重复的定义(op用于文本字段类型，op2用于日期字段类型，op3用于Bool字段类型)，所以并不是很优雅。
是否有可能编写一个与op类似的更通用的函数，可以在expr定义的所有情况下使用？
尝试将op重用到使用op2的Day字段类型会导致以下错误消息：
test.hs:68:46:
Couldn't match expected type `Text' with actual type `Da
浏览 6提问于2014-02-13得票数 0
回答已采纳
我正在做一个分页的资源，这将需要一个内部选择，我已经设计了sql术语。它的结构如下：
select *
from (
select w.*, d.distance
from `Work` w
inner join AdrDistance d on d.nhood2 = w.nhood
where d.nhood1 = 1 -- this will be a variable
order by d.distance
limit 0, 10 -- this will be pagination
) w
inner join WI
浏览 0提问于2016-04-16得票数 0
我正在开发一个非常简单的玩具API来提高我的Haskell技能。相关的数据库表称为ingredients，并有一些字段(id, name, category)。
我现在试图让一个显示可能重复的选择查询正常工作。它以一种天真的方式来做这件事。如果两种原料的名称相同，它可能是重复的。然而，它被允许有相同名称的成分，只是它们可能是重复的。如果这种限制没有意义的话，这并不重要，因为这只是一个玩具项目。
基本上，我想在esqueleto中获得以下查询：
SELECT name FROM ingredients
GROUP BY name
HAVING count(*) > 1;
我成功地创建了以下
浏览 6提问于2022-11-03得票数 2
回答已采纳
数据类型定义为： data ComitteeView = CommitteeView { committeeId :: CommitteeId
, committeeMembers :: [Person]
}
data CommitteesView = CommitteesView { committeeView :: [CommitteeView] } 有一个持久的模型： Person
name Text
Committee
name T
浏览 178提问于2018-01-15
我试图使用来自Esqueleto的一个示例查询，但我无法编译它。唯一的变化是我使用它时没有加入。
我有张桌子看起来像这样：
sqlite> select * from my_table;
id|category|amount
1|A|1.0
2|A|2.0
3|B|2.0
4|B|8.0
我想这样做：
select category,sum(amount) from my_table group by category;
category|sum(amount)
A|3.0
B|10.0
这是我的疑问：
import qualified Database.Esqueleto as E
浏览 6提问于2014-05-11得票数 2
回答已采纳
1回答
我在Haskell中使用带有persistent的SQLite。
我有一个密钥列表，即[PostId]。现在我想得到所有的条目
[Desc PostCrtDate, OffsetBy from, LimitTo (to - from + 1)]。
是否有一种替代selectList的方法，但使用的是键列表，而不是或除了SQL查询的“正常”条件之外？
使用mapM get keyList然后进行排序/抵消/限制(特别是使用大型数据库)似乎效率低下。
如果有必要，我愿意使用esqueleto，但我不想引入另一个依赖项。
谢谢!
浏览 4提问于2015-09-12得票数 2
回答已采纳
我需要使用jQuery将选择字段添加到MsgBox。有人知道是怎么回事吗？
if (input.type == 'checkbox')
{
iLabel = input.label ? '<label class="' + this.options.name + '-label">' : '';
fLabel = input.label ? input.label + '</label>' : '';
input.value = inp
浏览 1提问于2011-05-19得票数 0
2回答
快速前言:我使用SQL实现 (Haskell)和。
无论如何，我希望有一个包含类型为[String]的列的SQL表，即一个字符串列表。现在我想做一个查询，它给出了所有的记录，其中给定的列表是记录中那个列表的子列表。
例如，表中包含
ID Category
0 ["math", "algebra"]
1 ["personal", "life"]
2 ["algebra", "university", "personal"]
查询["personal", &
浏览 10提问于2015-09-08得票数 3
如何让esqueleto从from语句生成SQL字符串？
toRawSql的文档说“你只需要打开持久化的查询日志”。我尝试了我能理解的所有可能的MonadLogger格式，但它从来没有打印过任何SQL。同样的文档还说“手动使用这个函数……是可能的，但很繁琐”。我注意到QueryType是一个newtype并使用了unsafeCoerce，从而设法解决了这个问题！
我还被迫提供了一个Connection (我是通过SQLite获得的)，即使不需要连接到数据库来生成SQL。
这就是我得到的。一定有更好的办法。
withSqliteConn ":memory:" $
\con
浏览 0提问于2013-12-07得票数 86
我正在尝试将以下SQL转换为Esqueleto：
SELECT id, task_id, author_id
FROM scenario
INNER JOIN ( SELECT task_id as tId, author_id as aId, MAX(last_update) as lastUp
FROM scenario
GROUP BY task_id, author_id
) t
ON task_id = tId AND author_id = aId AND last_update = lastUp
浏览 26提问于2017-07-12得票数 5
我正在学习一门关于Node.js和Angular的课程。我在Nodejs上只注册了两个路由。我访问的所有路径都记录在控制台屏幕上。
问题是，我得到了两行日志，而这两行日志不在我的代码中，这看起来非常奇怪：
GET /user_avatar/localhost/esqueleto/40/1246_1.png 200 5.748 ms - 462
GET /user_avatar/localhost/cristianonasciment/40/3720_1.png 200 7.032 ms - 462
由于我的开发笔记本电脑中没有这些路径(或目录)，谁会知道这到底是怎么回事呢？
非常感谢。
浏览 15提问于2017-06-10得票数 0
对于这样简单的查询
runDb . select . from $ \cell -> do
where_ $ cell ^. CellCode ==. val "x"
return cell
我想在将字段值与"x“进行比较之前应用一个函数。原因是单元格代码在数据库中有尾随空格，没有什么比修剪它们更容易的了，例如使用来自的Data.Text。然而，我最初使用fmap的方法(两次)导致了
No Instance for (Functor SqlExpr)
我知道Esqueleto提供的一些函数，比如just，专门完成了类似的任务(不过，我找不到just的实现)
浏览 1提问于2015-08-27得票数 2
回答已采纳
我正在尝试找出如何使用Esqueleto编写以下查询
SELECT COUNT("person"."id")
FROM "person"
WHERE (("person"."admin" = 't' OR "person"."vip" = 't') // 't' as in True
OR "person"."karma" >= 5000 AND "person".
浏览 1提问于2014-06-04得票数 9
我如何在Esqueleto中做select ... from (select ...) join (select ...)？
我知道我可以从Persistent中使用rawSql，但我希望避免这种情况。
对于记录，下面是完整的查询：
select q.uuid, q.upvotes, q.downvotes, count(a.parent_uuid), max(a.isAccepted) as hasAccepted
from
(select post.uuid, post.title, sum(case when (vote.type = 2) then 1 else 0 end) as
浏览 3提问于2017-11-07得票数 5
实际上，我对SQL的工作方式有点陌生--我一直让ORM为我处理所有事情。但是在这种情况下，Persistent并不公开这种功能，所以我对该做什么感到困惑。
我有很多种关系：
+------------+
| Entries |
+----+-------+
| id | date |
+----+-------+
| 1 | Jan 1 |
+----+-------+
| 2 | Jan 2 |
+----+-------+
| 3 | Jan 3 |
+----+-------+
+------------+
| Tags |
+------------+
|
浏览 2提问于2013-08-07得票数 1
回答已采纳
1回答
我对外部如何与esqueleto一起工作感到有点困惑。
我创建了以下查询(简化)：
select $ from $ \(rep `LeftOuterJoin` event) -> do
on (rep ^. RepAtomId ==. event ^. EventAtomId )
where_ (rep ^. RepAtomId ==. val aid)
return $ (rep, event ^. EventSeconds)
据我所知，在SQL方面，这个查询将搜索可能有关联事件的代表。如果它们没有关联事件，则事件字段
浏览 0提问于2014-05-31得票数 3
回答已采纳
从脚手架上的人造config/models：
Inventory
name Text
description Text
Container
name Text
ContainerSlot
container ContainerId
item InventoryId Maybe
现在，使用Esqueleto，我希望使用LeftOuterJoin来获取容器中的槽，如果未分配实际库存，则实际库存为空。
selectContainerSlots containerKey = do
stuff <- select $ from
浏览 6提问于2017-04-02得票数 3
回答已采纳
我一直在查看持久库，以便与sql数据库进行接口。假设我有一个包含菜谱的数据库，其中包含食谱、配料和RecIng表。
我对持久性的理解(诚然是有限的)使我相信我应该定义这样的表格：
share [mkPersist sqlSettings, mkMigrate "migrateAll"] [persistLowerCase|
Recipe
title String
Ingredient
name String
RecIng
recId RecipeId
ingId IngredientId
quantity Int
|]
这样，就可以使
浏览 2提问于2014-02-10得票数 7
回答已采纳
我构建了一个查询，该查询连接几个表，并进一步限制结果，除非有一个名为IncludeAll等于True的字段。
我想写成这样
fetch i = runDb . select . from $ \(a, b, c) -> do
where_ $
a ^. AId ==. valkey i
&&. b ^. BField1 ==. a ^. AField2
&&. c ^. CField1 ==. a ^. AField3
unless (unValue $ b ^. BIncludeAll) $
where_
浏览 1提问于2015-07-30得票数 0
回答已采纳
1回答
基本上，它可以归结为有一个在esqueleto中返回超过16列的查询吗？
我有一个必须与之交互的遗留数据库，它需要用30-40列连接表，然后挑选出我需要的80到100列中的20列，这样我就不会拉大列，除非需要。似乎我被限制在16列？在没有孤儿的情况下，有什么办法可以克服这一点吗？
提前感谢！
如果一个人为的例子是必要的，我会提供一个。
更新
我在文档中发现，您可以做元组的元组，这基本上允许我获得更多的16列，然后对结果进行嵌套的元组和模式匹配，将其转换为我需要的数据类型，或者根据需要使用单个值。
仅供参考
如果您查看的文档，如果您查看实例，然后一直往右看，您将看到一个“提示”，这正是帮助我知道
浏览 5提问于2016-10-10得票数 1
回答已采纳
如何使用persistLowerCase拟商器使用两个或多个字段构建唯一的密钥？
当使用使用来自的指导为简单网站创建模型时，会出现以下错误：
Build FAILED
$PREFIX/App/Models.hs: line 42, column 18:
Not in scope: data constructor `GroupSlug'
$PREFIX/App/Models.hs: line 43, column 19:
Not in scope: data constructor `GroupName'
App/Models.hs
{-# LANGUAGE Empty
浏览 0提问于2014-02-20得票数 2
回答已采纳
我有一个描述Notification和Notified实体的片段：
Notification
type NotiType
release ReleaseId
date UTCTime
Notified
aboutWhat NotificationId
unread Bool
user UserId
现在我想写这个：
-- | Mark specified notification as already seen by specific user. Note that
-- we us
浏览 5提问于2015-11-16得票数 2
回答已采纳
我想使用Persistent/Esqueleto来实现计数估计。
中推荐的一种方法是定义如下函数
CREATE FUNCTION count_estimate(query text) RETURNS integer AS $$
DECLARE
rec record;
rows integer;
BEGIN
FOR rec IN EXECUTE 'EXPLAIN ' || query LOOP
rows := substring(rec."QUERY PLAN" FROM ' rows=([[:digit:]]+)');
浏览 8提问于2021-12-22得票数 1
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
对象存储
即时通信 IM活动推荐
腾讯云开发者
