module Stratosphere.QuickSight.Analysis.AssetOptionsProperty ( AssetOptionsProperty(..), mkAssetOptionsProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import Stratosphere.ResourceProperties import Stratosphere.Value data AssetOptionsProperty = -- | See: AssetOptionsProperty {haddock_workaround_ :: (), -- | See: timezone :: (Prelude.Maybe (Value Prelude.Text)), -- | See: weekStart :: (Prelude.Maybe (Value Prelude.Text))} deriving stock (Prelude.Eq, Prelude.Show) mkAssetOptionsProperty :: AssetOptionsProperty mkAssetOptionsProperty = AssetOptionsProperty {haddock_workaround_ = (), timezone = Prelude.Nothing, weekStart = Prelude.Nothing} instance ToResourceProperties AssetOptionsProperty where toResourceProperties AssetOptionsProperty {..} = ResourceProperties {awsType = "AWS::QuickSight::Analysis.AssetOptions", supportsTags = Prelude.False, properties = Prelude.fromList (Prelude.catMaybes [(JSON..=) "Timezone" Prelude.<$> timezone, (JSON..=) "WeekStart" Prelude.<$> weekStart])} instance JSON.ToJSON AssetOptionsProperty where toJSON AssetOptionsProperty {..} = JSON.object (Prelude.fromList (Prelude.catMaybes [(JSON..=) "Timezone" Prelude.<$> timezone, (JSON..=) "WeekStart" Prelude.<$> weekStart])) instance Property "Timezone" AssetOptionsProperty where type PropertyType "Timezone" AssetOptionsProperty = Value Prelude.Text set newValue AssetOptionsProperty {..} = AssetOptionsProperty {timezone = Prelude.pure newValue, ..} instance Property "WeekStart" AssetOptionsProperty where type PropertyType "WeekStart" AssetOptionsProperty = Value Prelude.Text set newValue AssetOptionsProperty {..} = AssetOptionsProperty {weekStart = Prelude.pure newValue, ..}