sqlc-hs-0.2.0.0: test/golden/out/Pulse/Database/GetHeartbeatMonitors.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.GetHeartbeatMonitors 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 GHC.Base
import qualified Pulse.Database.Types
import qualified GHC.Types
import qualified Data.Time
import qualified Data.Time.LocalTime
import qualified Data.Foldable
query_getHeartbeatMonitors :: Query "getHeartbeatMonitors" ":many"
query_getHeartbeatMonitors = Query "SELECT monitors.id, organization_id, name, type, healthiness, monitor_group, threshold_failures, is_active, is_deleted, last_checked, monitors.created_at, updated_at, escalation_policy_id, heartbeat_monitors.id, heartbeat_slug, last_heartbeat, expected_interval, heartbeat_monitors.created_at\nFROM monitors\nINNER JOIN heartbeat_monitors ON monitors.id = heartbeat_monitors.id\nWHERE\n monitors.organization_id = ?\n AND monitors.type = 'heartbeat'\n AND NOT monitors.is_deleted\n AND (\n ?::TEXT IS null\n OR monitor_group = ?::TEXT\n )"
data instance Params "getHeartbeatMonitors" = Params_getHeartbeatMonitors
{
monitors_organization_id :: Data.Int.Int32,
monitor_group :: GHC.Base.Maybe Data.Text.Text
}
data instance Result "getHeartbeatMonitors" = Result_getHeartbeatMonitors
{
monitors_id :: !(Data.Int.Int32),
monitors_organization_id :: !(Data.Int.Int32),
monitors_name :: !(Data.Text.Text),
monitors_type :: !((Pulse.Database.Types.Enum "monitor_type")),
monitors_healthiness :: !((Pulse.Database.Types.Enum "monitor_healthiness")),
monitors_monitor_group :: !(Data.Text.Text),
monitors_threshold_failures :: !(Data.Int.Int32),
monitors_is_active :: !(GHC.Types.Bool),
monitors_is_deleted :: !(GHC.Types.Bool),
monitors_last_checked :: !((Maybe Data.Time.UTCTime)),
monitors_created_at :: !((Maybe Data.Time.UTCTime)),
monitors_updated_at :: !((Maybe Data.Time.UTCTime)),
monitors_escalation_policy_id :: !(Data.Int.Int32),
heartbeat_monitors_id :: !(Data.Int.Int32),
heartbeat_monitors_heartbeat_slug :: !(Data.Text.Text),
heartbeat_monitors_last_heartbeat :: !((Maybe Data.Time.UTCTime)),
heartbeat_monitors_expected_interval :: !(Data.Time.LocalTime.CalendarDiffTime),
heartbeat_monitors_created_at :: !((Maybe Data.Time.UTCTime))
}
instance Database.PostgreSQL.Simple.ToRow.ToRow (Params "getHeartbeatMonitors") where
toRow Params_getHeartbeatMonitors{..} =
[
Database.PostgreSQL.Simple.ToField.toField monitors_organization_id,
Database.PostgreSQL.Simple.ToField.toField monitor_group,
Database.PostgreSQL.Simple.ToField.toField monitor_group
]
instance Database.PostgreSQL.Simple.FromRow.FromRow (Result "getHeartbeatMonitors") where
fromRow =
pure Result_getHeartbeatMonitors
<*> 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
<*> 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
<*> Database.PostgreSQL.Simple.FromRow.field
<*> Database.PostgreSQL.Simple.FromRow.field
<*> Database.PostgreSQL.Simple.FromRow.field
<*> Database.PostgreSQL.Simple.FromRow.field