InsertOpcuaEndpointCredentials.hs

{- This file was auto-generated from queries.sql by sqlc-hs. -}
{-# LANGUAGE BangPatterns #-}
{-# LANGUAGE DataKinds #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE TypeFamilies #-}
module Pulse.Database.InsertOpcuaEndpointCredentials where

import Pulse.Database.Internal (Query(..), Enum, Params, Result)
import qualified Database.PostgreSQL.Simple
import qualified Database.PostgreSQL.Simple.FromRow
import qualified Database.PostgreSQL.Simple.ToField
import qualified Database.PostgreSQL.Simple.ToRow

import qualified Data.Int
import qualified Data.Text
import qualified Data.Time
import qualified Data.Foldable

query_insertOpcuaEndpointCredentials :: Query "insertOpcuaEndpointCredentials" ":one"
query_insertOpcuaEndpointCredentials = Query "INSERT INTO opcua_endpoint_credentials\n  (organization_id, name, username, password)\nVALUES\n  (?, ?, ?, ?)\nON CONFLICT\n  (organization_id, name)\nDO UPDATE SET\n  updated_at = NOW ()\nRETURNING id, organization_id, name, username, password, created_at, updated_at"

data instance Params "insertOpcuaEndpointCredentials" = Params_insertOpcuaEndpointCredentials
  {
    opcua_endpoint_credentials_organization_id :: Data.Int.Int32,
    opcua_endpoint_credentials_name :: Data.Text.Text,
    opcua_endpoint_credentials_username :: Data.Text.Text,
    opcua_endpoint_credentials_password :: Data.Text.Text
  }

data instance Result "insertOpcuaEndpointCredentials" = Result_insertOpcuaEndpointCredentials
  {
    opcua_endpoint_credentials_id :: !(Data.Int.Int32),
    opcua_endpoint_credentials_organization_id :: !(Data.Int.Int32),
    opcua_endpoint_credentials_name :: !(Data.Text.Text),
    opcua_endpoint_credentials_username :: !(Data.Text.Text),
    opcua_endpoint_credentials_password :: !(Data.Text.Text),
    opcua_endpoint_credentials_created_at :: !((Maybe Data.Time.UTCTime)),
    opcua_endpoint_credentials_updated_at :: !((Maybe Data.Time.UTCTime))
  }

instance Database.PostgreSQL.Simple.ToRow.ToRow (Params "insertOpcuaEndpointCredentials") where
  toRow Params_insertOpcuaEndpointCredentials{..} =
    [ 
      Database.PostgreSQL.Simple.ToField.toField opcua_endpoint_credentials_organization_id, 

      Database.PostgreSQL.Simple.ToField.toField opcua_endpoint_credentials_name, 

      Database.PostgreSQL.Simple.ToField.toField opcua_endpoint_credentials_username, 

      Database.PostgreSQL.Simple.ToField.toField opcua_endpoint_credentials_password
    ]

instance Database.PostgreSQL.Simple.FromRow.FromRow (Result "insertOpcuaEndpointCredentials") where
  fromRow =
    pure Result_insertOpcuaEndpointCredentials
      <*> Database.PostgreSQL.Simple.FromRow.field
      <*> Database.PostgreSQL.Simple.FromRow.field
      <*> Database.PostgreSQL.Simple.FromRow.field
      <*> Database.PostgreSQL.Simple.FromRow.field
      <*> Database.PostgreSQL.Simple.FromRow.field
      <*> Database.PostgreSQL.Simple.FromRow.field
      <*> Database.PostgreSQL.Simple.FromRow.field