module Stratosphere.AppTest.TestCase.DataSetProperty (
        DataSetProperty(..), mkDataSetProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data DataSetProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apptest-testcase-dataset.html>
    DataSetProperty {DataSetProperty -> ()
haddock_workaround_ :: (),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apptest-testcase-dataset.html#cfn-apptest-testcase-dataset-ccsid>
                     DataSetProperty -> Value Text
ccsid :: (Value Prelude.Text),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apptest-testcase-dataset.html#cfn-apptest-testcase-dataset-format>
                     DataSetProperty -> Value Text
format :: (Value Prelude.Text),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apptest-testcase-dataset.html#cfn-apptest-testcase-dataset-length>
                     DataSetProperty -> Value Double
length :: (Value Prelude.Double),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apptest-testcase-dataset.html#cfn-apptest-testcase-dataset-name>
                     DataSetProperty -> Value Text
name :: (Value Prelude.Text),
                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-apptest-testcase-dataset.html#cfn-apptest-testcase-dataset-type>
                     DataSetProperty -> Value Text
type' :: (Value Prelude.Text)}
  deriving stock (DataSetProperty -> DataSetProperty -> Bool
(DataSetProperty -> DataSetProperty -> Bool)
-> (DataSetProperty -> DataSetProperty -> Bool)
-> Eq DataSetProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DataSetProperty -> DataSetProperty -> Bool
== :: DataSetProperty -> DataSetProperty -> Bool
$c/= :: DataSetProperty -> DataSetProperty -> Bool
/= :: DataSetProperty -> DataSetProperty -> Bool
Prelude.Eq, Int -> DataSetProperty -> ShowS
[DataSetProperty] -> ShowS
DataSetProperty -> String
(Int -> DataSetProperty -> ShowS)
-> (DataSetProperty -> String)
-> ([DataSetProperty] -> ShowS)
-> Show DataSetProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DataSetProperty -> ShowS
showsPrec :: Int -> DataSetProperty -> ShowS
$cshow :: DataSetProperty -> String
show :: DataSetProperty -> String
$cshowList :: [DataSetProperty] -> ShowS
showList :: [DataSetProperty] -> ShowS
Prelude.Show)
mkDataSetProperty ::
  Value Prelude.Text
  -> Value Prelude.Text
     -> Value Prelude.Double
        -> Value Prelude.Text -> Value Prelude.Text -> DataSetProperty
mkDataSetProperty :: Value Text
-> Value Text
-> Value Double
-> Value Text
-> Value Text
-> DataSetProperty
mkDataSetProperty Value Text
ccsid Value Text
format Value Double
length Value Text
name Value Text
type'
  = DataSetProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), ccsid :: Value Text
ccsid = Value Text
ccsid, format :: Value Text
format = Value Text
format,
       length :: Value Double
length = Value Double
length, name :: Value Text
name = Value Text
name, type' :: Value Text
type' = Value Text
type'}
instance ToResourceProperties DataSetProperty where
  toResourceProperties :: DataSetProperty -> ResourceProperties
toResourceProperties DataSetProperty {()
Value Double
Value Text
haddock_workaround_ :: DataSetProperty -> ()
ccsid :: DataSetProperty -> Value Text
format :: DataSetProperty -> Value Text
length :: DataSetProperty -> Value Double
name :: DataSetProperty -> Value Text
type' :: DataSetProperty -> Value Text
haddock_workaround_ :: ()
ccsid :: Value Text
format :: Value Text
length :: Value Double
name :: Value Text
type' :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::AppTest::TestCase.DataSet",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"Ccsid" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
ccsid, Key
"Format" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
format,
                       Key
"Length" Key -> Value Double -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Double
length, Key
"Name" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
name,
                       Key
"Type" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
type']}
instance JSON.ToJSON DataSetProperty where
  toJSON :: DataSetProperty -> Value
toJSON DataSetProperty {()
Value Double
Value Text
haddock_workaround_ :: DataSetProperty -> ()
ccsid :: DataSetProperty -> Value Text
format :: DataSetProperty -> Value Text
length :: DataSetProperty -> Value Double
name :: DataSetProperty -> Value Text
type' :: DataSetProperty -> Value Text
haddock_workaround_ :: ()
ccsid :: Value Text
format :: Value Text
length :: Value Double
name :: Value Text
type' :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object
        [Key
"Ccsid" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
ccsid, Key
"Format" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
format,
         Key
"Length" Key -> Value Double -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Double
length, Key
"Name" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
name, Key
"Type" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
type']
instance Property "Ccsid" DataSetProperty where
  type PropertyType "Ccsid" DataSetProperty = Value Prelude.Text
  set :: PropertyType "Ccsid" DataSetProperty
-> DataSetProperty -> DataSetProperty
set PropertyType "Ccsid" DataSetProperty
newValue DataSetProperty {()
Value Double
Value Text
haddock_workaround_ :: DataSetProperty -> ()
ccsid :: DataSetProperty -> Value Text
format :: DataSetProperty -> Value Text
length :: DataSetProperty -> Value Double
name :: DataSetProperty -> Value Text
type' :: DataSetProperty -> Value Text
haddock_workaround_ :: ()
ccsid :: Value Text
format :: Value Text
length :: Value Double
name :: Value Text
type' :: Value Text
..}
    = DataSetProperty {ccsid :: Value Text
ccsid = PropertyType "Ccsid" DataSetProperty
Value Text
newValue, ()
Value Double
Value Text
haddock_workaround_ :: ()
format :: Value Text
length :: Value Double
name :: Value Text
type' :: Value Text
haddock_workaround_ :: ()
format :: Value Text
length :: Value Double
name :: Value Text
type' :: Value Text
..}
instance Property "Format" DataSetProperty where
  type PropertyType "Format" DataSetProperty = Value Prelude.Text
  set :: PropertyType "Format" DataSetProperty
-> DataSetProperty -> DataSetProperty
set PropertyType "Format" DataSetProperty
newValue DataSetProperty {()
Value Double
Value Text
haddock_workaround_ :: DataSetProperty -> ()
ccsid :: DataSetProperty -> Value Text
format :: DataSetProperty -> Value Text
length :: DataSetProperty -> Value Double
name :: DataSetProperty -> Value Text
type' :: DataSetProperty -> Value Text
haddock_workaround_ :: ()
ccsid :: Value Text
format :: Value Text
length :: Value Double
name :: Value Text
type' :: Value Text
..}
    = DataSetProperty {format :: Value Text
format = PropertyType "Format" DataSetProperty
Value Text
newValue, ()
Value Double
Value Text
haddock_workaround_ :: ()
ccsid :: Value Text
length :: Value Double
name :: Value Text
type' :: Value Text
haddock_workaround_ :: ()
ccsid :: Value Text
length :: Value Double
name :: Value Text
type' :: Value Text
..}
instance Property "Length" DataSetProperty where
  type PropertyType "Length" DataSetProperty = Value Prelude.Double
  set :: PropertyType "Length" DataSetProperty
-> DataSetProperty -> DataSetProperty
set PropertyType "Length" DataSetProperty
newValue DataSetProperty {()
Value Double
Value Text
haddock_workaround_ :: DataSetProperty -> ()
ccsid :: DataSetProperty -> Value Text
format :: DataSetProperty -> Value Text
length :: DataSetProperty -> Value Double
name :: DataSetProperty -> Value Text
type' :: DataSetProperty -> Value Text
haddock_workaround_ :: ()
ccsid :: Value Text
format :: Value Text
length :: Value Double
name :: Value Text
type' :: Value Text
..}
    = DataSetProperty {length :: Value Double
length = PropertyType "Length" DataSetProperty
Value Double
newValue, ()
Value Text
haddock_workaround_ :: ()
ccsid :: Value Text
format :: Value Text
name :: Value Text
type' :: Value Text
haddock_workaround_ :: ()
ccsid :: Value Text
format :: Value Text
name :: Value Text
type' :: Value Text
..}
instance Property "Name" DataSetProperty where
  type PropertyType "Name" DataSetProperty = Value Prelude.Text
  set :: PropertyType "Name" DataSetProperty
-> DataSetProperty -> DataSetProperty
set PropertyType "Name" DataSetProperty
newValue DataSetProperty {()
Value Double
Value Text
haddock_workaround_ :: DataSetProperty -> ()
ccsid :: DataSetProperty -> Value Text
format :: DataSetProperty -> Value Text
length :: DataSetProperty -> Value Double
name :: DataSetProperty -> Value Text
type' :: DataSetProperty -> Value Text
haddock_workaround_ :: ()
ccsid :: Value Text
format :: Value Text
length :: Value Double
name :: Value Text
type' :: Value Text
..}
    = DataSetProperty {name :: Value Text
name = PropertyType "Name" DataSetProperty
Value Text
newValue, ()
Value Double
Value Text
haddock_workaround_ :: ()
ccsid :: Value Text
format :: Value Text
length :: Value Double
type' :: Value Text
haddock_workaround_ :: ()
ccsid :: Value Text
format :: Value Text
length :: Value Double
type' :: Value Text
..}
instance Property "Type" DataSetProperty where
  type PropertyType "Type" DataSetProperty = Value Prelude.Text
  set :: PropertyType "Type" DataSetProperty
-> DataSetProperty -> DataSetProperty
set PropertyType "Type" DataSetProperty
newValue DataSetProperty {()
Value Double
Value Text
haddock_workaround_ :: DataSetProperty -> ()
ccsid :: DataSetProperty -> Value Text
format :: DataSetProperty -> Value Text
length :: DataSetProperty -> Value Double
name :: DataSetProperty -> Value Text
type' :: DataSetProperty -> Value Text
haddock_workaround_ :: ()
ccsid :: Value Text
format :: Value Text
length :: Value Double
name :: Value Text
type' :: Value Text
..}
    = DataSetProperty {type' :: Value Text
type' = PropertyType "Type" DataSetProperty
Value Text
newValue, ()
Value Double
Value Text
haddock_workaround_ :: ()
ccsid :: Value Text
format :: Value Text
length :: Value Double
name :: Value Text
haddock_workaround_ :: ()
ccsid :: Value Text
format :: Value Text
length :: Value Double
name :: Value Text
..}