{-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE NamedFieldPuns #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -fno-warn-unused-binds #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-matches #-} -- Derived from AWS service descriptions, licensed under Apache 2.0. -- | -- Module : Amazonka.KinesisAnalytics.DeleteApplicationCloudWatchLoggingOption -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- This documentation is for version 1 of the Amazon Kinesis Data Analytics -- API, which only supports SQL applications. Version 2 of the API supports -- SQL and Java applications. For more information about version 2, see -- . -- -- Deletes a CloudWatch log stream from an application. For more -- information about using CloudWatch log streams with Amazon Kinesis -- Analytics applications, see -- . module Amazonka.KinesisAnalytics.DeleteApplicationCloudWatchLoggingOption ( -- * Creating a Request DeleteApplicationCloudWatchLoggingOption (..), newDeleteApplicationCloudWatchLoggingOption, -- * Request Lenses deleteApplicationCloudWatchLoggingOption_applicationName, deleteApplicationCloudWatchLoggingOption_currentApplicationVersionId, deleteApplicationCloudWatchLoggingOption_cloudWatchLoggingOptionId, -- * Destructuring the Response DeleteApplicationCloudWatchLoggingOptionResponse (..), newDeleteApplicationCloudWatchLoggingOptionResponse, -- * Response Lenses deleteApplicationCloudWatchLoggingOptionResponse_httpStatus, ) where import qualified Amazonka.Core as Core import qualified Amazonka.Core.Lens.Internal as Lens import qualified Amazonka.Data as Data import Amazonka.KinesisAnalytics.Types import qualified Amazonka.Prelude as Prelude import qualified Amazonka.Request as Request import qualified Amazonka.Response as Response -- | /See:/ 'newDeleteApplicationCloudWatchLoggingOption' smart constructor. data DeleteApplicationCloudWatchLoggingOption = DeleteApplicationCloudWatchLoggingOption' { -- | The Kinesis Analytics application name. applicationName :: Prelude.Text, -- | The version ID of the Kinesis Analytics application. currentApplicationVersionId :: Prelude.Natural, -- | The @CloudWatchLoggingOptionId@ of the CloudWatch logging option to -- delete. You can get the @CloudWatchLoggingOptionId@ by using the -- -- operation. cloudWatchLoggingOptionId :: Prelude.Text } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'DeleteApplicationCloudWatchLoggingOption' with all optional fields omitted. -- -- Use or to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'applicationName', 'deleteApplicationCloudWatchLoggingOption_applicationName' - The Kinesis Analytics application name. -- -- 'currentApplicationVersionId', 'deleteApplicationCloudWatchLoggingOption_currentApplicationVersionId' - The version ID of the Kinesis Analytics application. -- -- 'cloudWatchLoggingOptionId', 'deleteApplicationCloudWatchLoggingOption_cloudWatchLoggingOptionId' - The @CloudWatchLoggingOptionId@ of the CloudWatch logging option to -- delete. You can get the @CloudWatchLoggingOptionId@ by using the -- -- operation. newDeleteApplicationCloudWatchLoggingOption :: -- | 'applicationName' Prelude.Text -> -- | 'currentApplicationVersionId' Prelude.Natural -> -- | 'cloudWatchLoggingOptionId' Prelude.Text -> DeleteApplicationCloudWatchLoggingOption newDeleteApplicationCloudWatchLoggingOption pApplicationName_ pCurrentApplicationVersionId_ pCloudWatchLoggingOptionId_ = DeleteApplicationCloudWatchLoggingOption' { applicationName = pApplicationName_, currentApplicationVersionId = pCurrentApplicationVersionId_, cloudWatchLoggingOptionId = pCloudWatchLoggingOptionId_ } -- | The Kinesis Analytics application name. deleteApplicationCloudWatchLoggingOption_applicationName :: Lens.Lens' DeleteApplicationCloudWatchLoggingOption Prelude.Text deleteApplicationCloudWatchLoggingOption_applicationName = Lens.lens (\DeleteApplicationCloudWatchLoggingOption' {applicationName} -> applicationName) (\s@DeleteApplicationCloudWatchLoggingOption' {} a -> s {applicationName = a} :: DeleteApplicationCloudWatchLoggingOption) -- | The version ID of the Kinesis Analytics application. deleteApplicationCloudWatchLoggingOption_currentApplicationVersionId :: Lens.Lens' DeleteApplicationCloudWatchLoggingOption Prelude.Natural deleteApplicationCloudWatchLoggingOption_currentApplicationVersionId = Lens.lens (\DeleteApplicationCloudWatchLoggingOption' {currentApplicationVersionId} -> currentApplicationVersionId) (\s@DeleteApplicationCloudWatchLoggingOption' {} a -> s {currentApplicationVersionId = a} :: DeleteApplicationCloudWatchLoggingOption) -- | The @CloudWatchLoggingOptionId@ of the CloudWatch logging option to -- delete. You can get the @CloudWatchLoggingOptionId@ by using the -- -- operation. deleteApplicationCloudWatchLoggingOption_cloudWatchLoggingOptionId :: Lens.Lens' DeleteApplicationCloudWatchLoggingOption Prelude.Text deleteApplicationCloudWatchLoggingOption_cloudWatchLoggingOptionId = Lens.lens (\DeleteApplicationCloudWatchLoggingOption' {cloudWatchLoggingOptionId} -> cloudWatchLoggingOptionId) (\s@DeleteApplicationCloudWatchLoggingOption' {} a -> s {cloudWatchLoggingOptionId = a} :: DeleteApplicationCloudWatchLoggingOption) instance Core.AWSRequest DeleteApplicationCloudWatchLoggingOption where type AWSResponse DeleteApplicationCloudWatchLoggingOption = DeleteApplicationCloudWatchLoggingOptionResponse request overrides = Request.postJSON (overrides defaultService) response = Response.receiveEmpty ( \s h x -> DeleteApplicationCloudWatchLoggingOptionResponse' Prelude.<$> (Prelude.pure (Prelude.fromEnum s)) ) instance Prelude.Hashable DeleteApplicationCloudWatchLoggingOption where hashWithSalt _salt DeleteApplicationCloudWatchLoggingOption' {..} = _salt `Prelude.hashWithSalt` applicationName `Prelude.hashWithSalt` currentApplicationVersionId `Prelude.hashWithSalt` cloudWatchLoggingOptionId instance Prelude.NFData DeleteApplicationCloudWatchLoggingOption where rnf DeleteApplicationCloudWatchLoggingOption' {..} = Prelude.rnf applicationName `Prelude.seq` Prelude.rnf currentApplicationVersionId `Prelude.seq` Prelude.rnf cloudWatchLoggingOptionId instance Data.ToHeaders DeleteApplicationCloudWatchLoggingOption where toHeaders = Prelude.const ( Prelude.mconcat [ "X-Amz-Target" Data.=# ( "KinesisAnalytics_20150814.DeleteApplicationCloudWatchLoggingOption" :: Prelude.ByteString ), "Content-Type" Data.=# ( "application/x-amz-json-1.1" :: Prelude.ByteString ) ] ) instance Data.ToJSON DeleteApplicationCloudWatchLoggingOption where toJSON DeleteApplicationCloudWatchLoggingOption' {..} = Data.object ( Prelude.catMaybes [ Prelude.Just ("ApplicationName" Data..= applicationName), Prelude.Just ( "CurrentApplicationVersionId" Data..= currentApplicationVersionId ), Prelude.Just ( "CloudWatchLoggingOptionId" Data..= cloudWatchLoggingOptionId ) ] ) instance Data.ToPath DeleteApplicationCloudWatchLoggingOption where toPath = Prelude.const "/" instance Data.ToQuery DeleteApplicationCloudWatchLoggingOption where toQuery = Prelude.const Prelude.mempty -- | /See:/ 'newDeleteApplicationCloudWatchLoggingOptionResponse' smart constructor. data DeleteApplicationCloudWatchLoggingOptionResponse = DeleteApplicationCloudWatchLoggingOptionResponse' { -- | The response's http status code. httpStatus :: Prelude.Int } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'DeleteApplicationCloudWatchLoggingOptionResponse' with all optional fields omitted. -- -- Use or to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'httpStatus', 'deleteApplicationCloudWatchLoggingOptionResponse_httpStatus' - The response's http status code. newDeleteApplicationCloudWatchLoggingOptionResponse :: -- | 'httpStatus' Prelude.Int -> DeleteApplicationCloudWatchLoggingOptionResponse newDeleteApplicationCloudWatchLoggingOptionResponse pHttpStatus_ = DeleteApplicationCloudWatchLoggingOptionResponse' { httpStatus = pHttpStatus_ } -- | The response's http status code. deleteApplicationCloudWatchLoggingOptionResponse_httpStatus :: Lens.Lens' DeleteApplicationCloudWatchLoggingOptionResponse Prelude.Int deleteApplicationCloudWatchLoggingOptionResponse_httpStatus = Lens.lens (\DeleteApplicationCloudWatchLoggingOptionResponse' {httpStatus} -> httpStatus) (\s@DeleteApplicationCloudWatchLoggingOptionResponse' {} a -> s {httpStatus = a} :: DeleteApplicationCloudWatchLoggingOptionResponse) instance Prelude.NFData DeleteApplicationCloudWatchLoggingOptionResponse where rnf DeleteApplicationCloudWatchLoggingOptionResponse' {..} = Prelude.rnf httpStatus