project-m36-1.0.0: src/lib/ProjectM36/SQL/Update.hs

{-# LANGUAGE DeriveGeneric, DerivingVia, DeriveAnyClass #-}
module ProjectM36.SQL.Update where
import ProjectM36.SQL.Select
import ProjectM36.Serialise.Base ()
import Control.DeepSeq
import Codec.Winery
import GHC.Generics

data Update = Update
  { target :: TableName,
--    targetAlias :: Maybe TableAlias,
    --SET
    setColumns :: [(UnqualifiedColumnName, ScalarExpr)], --we don't support multi-column SET yet
    mRestriction :: Maybe RestrictionExpr
  }
            --RETURNING not yet supported- how would we support this anyway- we must force the update to be materialized
  deriving (Show, Eq, Generic, NFData)
  deriving Serialise via WineryRecord Update