module Stratosphere.QuickSight.Analysis.SheetVisualScopingConfigurationProperty (
        SheetVisualScopingConfigurationProperty(..),
        mkSheetVisualScopingConfigurationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data SheetVisualScopingConfigurationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-analysis-sheetvisualscopingconfiguration.html>
    SheetVisualScopingConfigurationProperty {SheetVisualScopingConfigurationProperty -> ()
haddock_workaround_ :: (),
                                             -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-analysis-sheetvisualscopingconfiguration.html#cfn-quicksight-analysis-sheetvisualscopingconfiguration-scope>
                                             SheetVisualScopingConfigurationProperty -> Value Text
scope :: (Value Prelude.Text),
                                             -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-analysis-sheetvisualscopingconfiguration.html#cfn-quicksight-analysis-sheetvisualscopingconfiguration-sheetid>
                                             SheetVisualScopingConfigurationProperty -> Value Text
sheetId :: (Value Prelude.Text),
                                             -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-analysis-sheetvisualscopingconfiguration.html#cfn-quicksight-analysis-sheetvisualscopingconfiguration-visualids>
                                             SheetVisualScopingConfigurationProperty -> Maybe (ValueList Text)
visualIds :: (Prelude.Maybe (ValueList Prelude.Text))}
  deriving stock (SheetVisualScopingConfigurationProperty
-> SheetVisualScopingConfigurationProperty -> Bool
(SheetVisualScopingConfigurationProperty
 -> SheetVisualScopingConfigurationProperty -> Bool)
-> (SheetVisualScopingConfigurationProperty
    -> SheetVisualScopingConfigurationProperty -> Bool)
-> Eq SheetVisualScopingConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SheetVisualScopingConfigurationProperty
-> SheetVisualScopingConfigurationProperty -> Bool
== :: SheetVisualScopingConfigurationProperty
-> SheetVisualScopingConfigurationProperty -> Bool
$c/= :: SheetVisualScopingConfigurationProperty
-> SheetVisualScopingConfigurationProperty -> Bool
/= :: SheetVisualScopingConfigurationProperty
-> SheetVisualScopingConfigurationProperty -> Bool
Prelude.Eq, Int -> SheetVisualScopingConfigurationProperty -> ShowS
[SheetVisualScopingConfigurationProperty] -> ShowS
SheetVisualScopingConfigurationProperty -> String
(Int -> SheetVisualScopingConfigurationProperty -> ShowS)
-> (SheetVisualScopingConfigurationProperty -> String)
-> ([SheetVisualScopingConfigurationProperty] -> ShowS)
-> Show SheetVisualScopingConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SheetVisualScopingConfigurationProperty -> ShowS
showsPrec :: Int -> SheetVisualScopingConfigurationProperty -> ShowS
$cshow :: SheetVisualScopingConfigurationProperty -> String
show :: SheetVisualScopingConfigurationProperty -> String
$cshowList :: [SheetVisualScopingConfigurationProperty] -> ShowS
showList :: [SheetVisualScopingConfigurationProperty] -> ShowS
Prelude.Show)
mkSheetVisualScopingConfigurationProperty ::
  Value Prelude.Text
  -> Value Prelude.Text -> SheetVisualScopingConfigurationProperty
mkSheetVisualScopingConfigurationProperty :: Value Text -> Value Text -> SheetVisualScopingConfigurationProperty
mkSheetVisualScopingConfigurationProperty Value Text
scope Value Text
sheetId
  = SheetVisualScopingConfigurationProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), scope :: Value Text
scope = Value Text
scope, sheetId :: Value Text
sheetId = Value Text
sheetId,
       visualIds :: Maybe (ValueList Text)
visualIds = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties SheetVisualScopingConfigurationProperty where
  toResourceProperties :: SheetVisualScopingConfigurationProperty -> ResourceProperties
toResourceProperties SheetVisualScopingConfigurationProperty {Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: SheetVisualScopingConfigurationProperty -> ()
scope :: SheetVisualScopingConfigurationProperty -> Value Text
sheetId :: SheetVisualScopingConfigurationProperty -> Value Text
visualIds :: SheetVisualScopingConfigurationProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
scope :: Value Text
sheetId :: Value Text
visualIds :: Maybe (ValueList Text)
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::QuickSight::Analysis.SheetVisualScopingConfiguration",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
                           [Key
"Scope" 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
scope, Key
"SheetId" 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
sheetId]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes [Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"VisualIds" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
visualIds]))}
instance JSON.ToJSON SheetVisualScopingConfigurationProperty where
  toJSON :: SheetVisualScopingConfigurationProperty -> Value
toJSON SheetVisualScopingConfigurationProperty {Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: SheetVisualScopingConfigurationProperty -> ()
scope :: SheetVisualScopingConfigurationProperty -> Value Text
sheetId :: SheetVisualScopingConfigurationProperty -> Value Text
visualIds :: SheetVisualScopingConfigurationProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
scope :: Value Text
sheetId :: Value Text
visualIds :: Maybe (ValueList Text)
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
              [Key
"Scope" 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
scope, Key
"SheetId" 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
sheetId]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes [Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"VisualIds" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
visualIds])))
instance Property "Scope" SheetVisualScopingConfigurationProperty where
  type PropertyType "Scope" SheetVisualScopingConfigurationProperty = Value Prelude.Text
  set :: PropertyType "Scope" SheetVisualScopingConfigurationProperty
-> SheetVisualScopingConfigurationProperty
-> SheetVisualScopingConfigurationProperty
set PropertyType "Scope" SheetVisualScopingConfigurationProperty
newValue SheetVisualScopingConfigurationProperty {Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: SheetVisualScopingConfigurationProperty -> ()
scope :: SheetVisualScopingConfigurationProperty -> Value Text
sheetId :: SheetVisualScopingConfigurationProperty -> Value Text
visualIds :: SheetVisualScopingConfigurationProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
scope :: Value Text
sheetId :: Value Text
visualIds :: Maybe (ValueList Text)
..}
    = SheetVisualScopingConfigurationProperty {scope :: Value Text
scope = PropertyType "Scope" SheetVisualScopingConfigurationProperty
Value Text
newValue, Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: ()
sheetId :: Value Text
visualIds :: Maybe (ValueList Text)
haddock_workaround_ :: ()
sheetId :: Value Text
visualIds :: Maybe (ValueList Text)
..}
instance Property "SheetId" SheetVisualScopingConfigurationProperty where
  type PropertyType "SheetId" SheetVisualScopingConfigurationProperty = Value Prelude.Text
  set :: PropertyType "SheetId" SheetVisualScopingConfigurationProperty
-> SheetVisualScopingConfigurationProperty
-> SheetVisualScopingConfigurationProperty
set PropertyType "SheetId" SheetVisualScopingConfigurationProperty
newValue SheetVisualScopingConfigurationProperty {Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: SheetVisualScopingConfigurationProperty -> ()
scope :: SheetVisualScopingConfigurationProperty -> Value Text
sheetId :: SheetVisualScopingConfigurationProperty -> Value Text
visualIds :: SheetVisualScopingConfigurationProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
scope :: Value Text
sheetId :: Value Text
visualIds :: Maybe (ValueList Text)
..}
    = SheetVisualScopingConfigurationProperty {sheetId :: Value Text
sheetId = PropertyType "SheetId" SheetVisualScopingConfigurationProperty
Value Text
newValue, Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: ()
scope :: Value Text
visualIds :: Maybe (ValueList Text)
haddock_workaround_ :: ()
scope :: Value Text
visualIds :: Maybe (ValueList Text)
..}
instance Property "VisualIds" SheetVisualScopingConfigurationProperty where
  type PropertyType "VisualIds" SheetVisualScopingConfigurationProperty = ValueList Prelude.Text
  set :: PropertyType "VisualIds" SheetVisualScopingConfigurationProperty
-> SheetVisualScopingConfigurationProperty
-> SheetVisualScopingConfigurationProperty
set PropertyType "VisualIds" SheetVisualScopingConfigurationProperty
newValue SheetVisualScopingConfigurationProperty {Maybe (ValueList Text)
()
Value Text
haddock_workaround_ :: SheetVisualScopingConfigurationProperty -> ()
scope :: SheetVisualScopingConfigurationProperty -> Value Text
sheetId :: SheetVisualScopingConfigurationProperty -> Value Text
visualIds :: SheetVisualScopingConfigurationProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
scope :: Value Text
sheetId :: Value Text
visualIds :: Maybe (ValueList Text)
..}
    = SheetVisualScopingConfigurationProperty
        {visualIds :: Maybe (ValueList Text)
visualIds = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "VisualIds" SheetVisualScopingConfigurationProperty
ValueList Text
newValue, ()
Value Text
haddock_workaround_ :: ()
scope :: Value Text
sheetId :: Value Text
haddock_workaround_ :: ()
scope :: Value Text
sheetId :: Value Text
..}