{-# 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.Glue.Types.TaskRun -- 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.Glue.Types.TaskRun where import qualified Amazonka.Core as Core import qualified Amazonka.Core.Lens.Internal as Lens import qualified Amazonka.Data as Data import Amazonka.Glue.Types.TaskRunProperties import Amazonka.Glue.Types.TaskStatusType import qualified Amazonka.Prelude as Prelude -- | The sampling parameters that are associated with the machine learning -- transform. -- -- /See:/ 'newTaskRun' smart constructor. data TaskRun = TaskRun' { -- | The last point in time that the requested task run was completed. completedOn :: Prelude.Maybe Data.POSIX, -- | The list of error strings associated with this task run. errorString :: Prelude.Maybe Prelude.Text, -- | The amount of time (in seconds) that the task run consumed resources. executionTime :: Prelude.Maybe Prelude.Int, -- | The last point in time that the requested task run was updated. lastModifiedOn :: Prelude.Maybe Data.POSIX, -- | The names of the log group for secure logging, associated with this task -- run. logGroupName :: Prelude.Maybe Prelude.Text, -- | Specifies configuration properties associated with this task run. properties :: Prelude.Maybe TaskRunProperties, -- | The date and time that this task run started. startedOn :: Prelude.Maybe Data.POSIX, -- | The current status of the requested task run. status :: Prelude.Maybe TaskStatusType, -- | The unique identifier for this task run. taskRunId :: Prelude.Maybe Prelude.Text, -- | The unique identifier for the transform. transformId :: Prelude.Maybe Prelude.Text } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'TaskRun' 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: -- -- 'completedOn', 'taskRun_completedOn' - The last point in time that the requested task run was completed. -- -- 'errorString', 'taskRun_errorString' - The list of error strings associated with this task run. -- -- 'executionTime', 'taskRun_executionTime' - The amount of time (in seconds) that the task run consumed resources. -- -- 'lastModifiedOn', 'taskRun_lastModifiedOn' - The last point in time that the requested task run was updated. -- -- 'logGroupName', 'taskRun_logGroupName' - The names of the log group for secure logging, associated with this task -- run. -- -- 'properties', 'taskRun_properties' - Specifies configuration properties associated with this task run. -- -- 'startedOn', 'taskRun_startedOn' - The date and time that this task run started. -- -- 'status', 'taskRun_status' - The current status of the requested task run. -- -- 'taskRunId', 'taskRun_taskRunId' - The unique identifier for this task run. -- -- 'transformId', 'taskRun_transformId' - The unique identifier for the transform. newTaskRun :: TaskRun newTaskRun = TaskRun' { completedOn = Prelude.Nothing, errorString = Prelude.Nothing, executionTime = Prelude.Nothing, lastModifiedOn = Prelude.Nothing, logGroupName = Prelude.Nothing, properties = Prelude.Nothing, startedOn = Prelude.Nothing, status = Prelude.Nothing, taskRunId = Prelude.Nothing, transformId = Prelude.Nothing } -- | The last point in time that the requested task run was completed. taskRun_completedOn :: Lens.Lens' TaskRun (Prelude.Maybe Prelude.UTCTime) taskRun_completedOn = Lens.lens (\TaskRun' {completedOn} -> completedOn) (\s@TaskRun' {} a -> s {completedOn = a} :: TaskRun) Prelude.. Lens.mapping Data._Time -- | The list of error strings associated with this task run. taskRun_errorString :: Lens.Lens' TaskRun (Prelude.Maybe Prelude.Text) taskRun_errorString = Lens.lens (\TaskRun' {errorString} -> errorString) (\s@TaskRun' {} a -> s {errorString = a} :: TaskRun) -- | The amount of time (in seconds) that the task run consumed resources. taskRun_executionTime :: Lens.Lens' TaskRun (Prelude.Maybe Prelude.Int) taskRun_executionTime = Lens.lens (\TaskRun' {executionTime} -> executionTime) (\s@TaskRun' {} a -> s {executionTime = a} :: TaskRun) -- | The last point in time that the requested task run was updated. taskRun_lastModifiedOn :: Lens.Lens' TaskRun (Prelude.Maybe Prelude.UTCTime) taskRun_lastModifiedOn = Lens.lens (\TaskRun' {lastModifiedOn} -> lastModifiedOn) (\s@TaskRun' {} a -> s {lastModifiedOn = a} :: TaskRun) Prelude.. Lens.mapping Data._Time -- | The names of the log group for secure logging, associated with this task -- run. taskRun_logGroupName :: Lens.Lens' TaskRun (Prelude.Maybe Prelude.Text) taskRun_logGroupName = Lens.lens (\TaskRun' {logGroupName} -> logGroupName) (\s@TaskRun' {} a -> s {logGroupName = a} :: TaskRun) -- | Specifies configuration properties associated with this task run. taskRun_properties :: Lens.Lens' TaskRun (Prelude.Maybe TaskRunProperties) taskRun_properties = Lens.lens (\TaskRun' {properties} -> properties) (\s@TaskRun' {} a -> s {properties = a} :: TaskRun) -- | The date and time that this task run started. taskRun_startedOn :: Lens.Lens' TaskRun (Prelude.Maybe Prelude.UTCTime) taskRun_startedOn = Lens.lens (\TaskRun' {startedOn} -> startedOn) (\s@TaskRun' {} a -> s {startedOn = a} :: TaskRun) Prelude.. Lens.mapping Data._Time -- | The current status of the requested task run. taskRun_status :: Lens.Lens' TaskRun (Prelude.Maybe TaskStatusType) taskRun_status = Lens.lens (\TaskRun' {status} -> status) (\s@TaskRun' {} a -> s {status = a} :: TaskRun) -- | The unique identifier for this task run. taskRun_taskRunId :: Lens.Lens' TaskRun (Prelude.Maybe Prelude.Text) taskRun_taskRunId = Lens.lens (\TaskRun' {taskRunId} -> taskRunId) (\s@TaskRun' {} a -> s {taskRunId = a} :: TaskRun) -- | The unique identifier for the transform. taskRun_transformId :: Lens.Lens' TaskRun (Prelude.Maybe Prelude.Text) taskRun_transformId = Lens.lens (\TaskRun' {transformId} -> transformId) (\s@TaskRun' {} a -> s {transformId = a} :: TaskRun) instance Data.FromJSON TaskRun where parseJSON = Data.withObject "TaskRun" ( \x -> TaskRun' Prelude.<$> (x Data..:? "CompletedOn") Prelude.<*> (x Data..:? "ErrorString") Prelude.<*> (x Data..:? "ExecutionTime") Prelude.<*> (x Data..:? "LastModifiedOn") Prelude.<*> (x Data..:? "LogGroupName") Prelude.<*> (x Data..:? "Properties") Prelude.<*> (x Data..:? "StartedOn") Prelude.<*> (x Data..:? "Status") Prelude.<*> (x Data..:? "TaskRunId") Prelude.<*> (x Data..:? "TransformId") ) instance Prelude.Hashable TaskRun where hashWithSalt _salt TaskRun' {..} = _salt `Prelude.hashWithSalt` completedOn `Prelude.hashWithSalt` errorString `Prelude.hashWithSalt` executionTime `Prelude.hashWithSalt` lastModifiedOn `Prelude.hashWithSalt` logGroupName `Prelude.hashWithSalt` properties `Prelude.hashWithSalt` startedOn `Prelude.hashWithSalt` status `Prelude.hashWithSalt` taskRunId `Prelude.hashWithSalt` transformId instance Prelude.NFData TaskRun where rnf TaskRun' {..} = Prelude.rnf completedOn `Prelude.seq` Prelude.rnf errorString `Prelude.seq` Prelude.rnf executionTime `Prelude.seq` Prelude.rnf lastModifiedOn `Prelude.seq` Prelude.rnf logGroupName `Prelude.seq` Prelude.rnf properties `Prelude.seq` Prelude.rnf startedOn `Prelude.seq` Prelude.rnf status `Prelude.seq` Prelude.rnf taskRunId `Prelude.seq` Prelude.rnf transformId