{-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE NamedFieldPuns #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-matches #-} -- Derived from AWS service descriptions, licensed under Apache 2.0. -- | -- Module : Amazonka.CloudWatchLogs.Types.ExportTaskExecutionInfo -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) module Amazonka.CloudWatchLogs.Types.ExportTaskExecutionInfo where import qualified Amazonka.Core as Core import qualified Amazonka.Core.Lens.Internal as Lens import qualified Amazonka.Data as Data import qualified Amazonka.Prelude as Prelude -- | Represents the status of an export task. -- -- /See:/ 'newExportTaskExecutionInfo' smart constructor. data ExportTaskExecutionInfo = ExportTaskExecutionInfo' { -- | The completion time of the export task, expressed as the number of -- milliseconds after @Jan 1, 1970 00:00:00 UTC@. completionTime :: Prelude.Maybe Prelude.Natural, -- | The creation time of the export task, expressed as the number of -- milliseconds after @Jan 1, 1970 00:00:00 UTC@. creationTime :: Prelude.Maybe Prelude.Natural } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'ExportTaskExecutionInfo' 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: -- -- 'completionTime', 'exportTaskExecutionInfo_completionTime' - The completion time of the export task, expressed as the number of -- milliseconds after @Jan 1, 1970 00:00:00 UTC@. -- -- 'creationTime', 'exportTaskExecutionInfo_creationTime' - The creation time of the export task, expressed as the number of -- milliseconds after @Jan 1, 1970 00:00:00 UTC@. newExportTaskExecutionInfo :: ExportTaskExecutionInfo newExportTaskExecutionInfo = ExportTaskExecutionInfo' { completionTime = Prelude.Nothing, creationTime = Prelude.Nothing } -- | The completion time of the export task, expressed as the number of -- milliseconds after @Jan 1, 1970 00:00:00 UTC@. exportTaskExecutionInfo_completionTime :: Lens.Lens' ExportTaskExecutionInfo (Prelude.Maybe Prelude.Natural) exportTaskExecutionInfo_completionTime = Lens.lens (\ExportTaskExecutionInfo' {completionTime} -> completionTime) (\s@ExportTaskExecutionInfo' {} a -> s {completionTime = a} :: ExportTaskExecutionInfo) -- | The creation time of the export task, expressed as the number of -- milliseconds after @Jan 1, 1970 00:00:00 UTC@. exportTaskExecutionInfo_creationTime :: Lens.Lens' ExportTaskExecutionInfo (Prelude.Maybe Prelude.Natural) exportTaskExecutionInfo_creationTime = Lens.lens (\ExportTaskExecutionInfo' {creationTime} -> creationTime) (\s@ExportTaskExecutionInfo' {} a -> s {creationTime = a} :: ExportTaskExecutionInfo) instance Data.FromJSON ExportTaskExecutionInfo where parseJSON = Data.withObject "ExportTaskExecutionInfo" ( \x -> ExportTaskExecutionInfo' Prelude.<$> (x Data..:? "completionTime") Prelude.<*> (x Data..:? "creationTime") ) instance Prelude.Hashable ExportTaskExecutionInfo where hashWithSalt _salt ExportTaskExecutionInfo' {..} = _salt `Prelude.hashWithSalt` completionTime `Prelude.hashWithSalt` creationTime instance Prelude.NFData ExportTaskExecutionInfo where rnf ExportTaskExecutionInfo' {..} = Prelude.rnf completionTime `Prelude.seq` Prelude.rnf creationTime