По сути, сейчас я запускаю fbId <- runDB $ insert myNewFooBar и получаю Key FooBar.Есть ли способ вернуть значение целого FooBar непосредственно из вставки, не выполняя отдельный запрос runDB $ get404 fbId после?
fbId <- runDB $ insert myNewFooBar
Key FooBar
FooBar
runDB $ get404 fbId
Другой, более короткий вариант - использовать insertEntity, который возвращает объект вместо записи.Изнутри эта функция вызывает insert и создает сущность из предоставленной записи и возвращенного ключа (без дополнительных запросов к БД).
insertEntity
insert
insertedFooBar <- runDB $ insertEntity myNewFooBar
Я просто строю Entity сторону Хаскеля: Entity fbId myNewFooBar.
Entity
Entity fbId myNewFooBar