{-# LANGUAGE DataKinds #-} {-# LANGUAGE DerivingStrategies #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE ImportQualifiedPost #-} {-# LANGUAGE LambdaCase #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE PatternSynonyms #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -fno-warn-duplicate-exports #-} {-# OPTIONS_GHC -fno-warn-name-shadowing #-} {-# OPTIONS_GHC -fno-warn-unused-binds #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-matches #-} -- | -- Module : Gogol.ReplicaPoolUpdater.RollingUpdates.Insert -- Copyright : (c) 2015-2025 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Toni Cebrián -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Inserts and starts a new update. -- -- /See:/ for @replicapoolupdater.rollingUpdates.insert@. module Gogol.ReplicaPoolUpdater.RollingUpdates.Insert ( -- * Resource ReplicaPoolUpdaterRollingUpdatesInsertResource, -- ** Constructing a Request ReplicaPoolUpdaterRollingUpdatesInsert (..), newReplicaPoolUpdaterRollingUpdatesInsert, ) where import Gogol.Prelude qualified as Core import Gogol.ReplicaPoolUpdater.Types -- | A resource alias for @replicapoolupdater.rollingUpdates.insert@ method which the -- 'ReplicaPoolUpdaterRollingUpdatesInsert' request conforms to. type ReplicaPoolUpdaterRollingUpdatesInsertResource = "replicapoolupdater" Core.:> "v1beta1" Core.:> "projects" Core.:> Core.Capture "project" Core.Text Core.:> "zones" Core.:> Core.Capture "zone" Core.Text Core.:> "rollingUpdates" Core.:> Core.QueryParam "alt" Core.AltJSON Core.:> Core.ReqBody '[Core.JSON] RollingUpdate Core.:> Core.Post '[Core.JSON] Operation -- | Inserts and starts a new update. -- -- /See:/ 'newReplicaPoolUpdaterRollingUpdatesInsert' smart constructor. data ReplicaPoolUpdaterRollingUpdatesInsert = ReplicaPoolUpdaterRollingUpdatesInsert { -- | Multipart request metadata. payload :: RollingUpdate, -- | The Google Developers Console project name. project :: Core.Text, -- | The name of the zone in which the update\'s target resides. zone :: Core.Text } deriving (Core.Eq, Core.Show, Core.Generic) -- | Creates a value of 'ReplicaPoolUpdaterRollingUpdatesInsert' with the minimum fields required to make a request. newReplicaPoolUpdaterRollingUpdatesInsert :: -- | Multipart request metadata. See 'payload'. RollingUpdate -> -- | The Google Developers Console project name. See 'project'. Core.Text -> -- | The name of the zone in which the update\'s target resides. See 'zone'. Core.Text -> ReplicaPoolUpdaterRollingUpdatesInsert newReplicaPoolUpdaterRollingUpdatesInsert payload project zone = ReplicaPoolUpdaterRollingUpdatesInsert { payload = payload, project = project, zone = zone } instance Core.GoogleRequest ReplicaPoolUpdaterRollingUpdatesInsert where type Rs ReplicaPoolUpdaterRollingUpdatesInsert = Operation type Scopes ReplicaPoolUpdaterRollingUpdatesInsert = '[CloudPlatform'FullControl, Replicapool'FullControl] requestClient ReplicaPoolUpdaterRollingUpdatesInsert {..} = go project zone (Core.Just Core.AltJSON) payload replicaPoolUpdaterService where go = Core.buildClient ( Core.Proxy :: Core.Proxy ReplicaPoolUpdaterRollingUpdatesInsertResource ) Core.mempty