module Stratosphere.QuickSight.Analysis.PivotTotalOptionsProperty (
        module Exports, PivotTotalOptionsProperty(..),
        mkPivotTotalOptionsProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.QuickSight.Analysis.TableCellStyleProperty as Exports
import {-# SOURCE #-} Stratosphere.QuickSight.Analysis.TotalAggregationOptionProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data PivotTotalOptionsProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-analysis-pivottotaloptions.html>
    PivotTotalOptionsProperty {PivotTotalOptionsProperty -> ()
haddock_workaround_ :: (),
                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-analysis-pivottotaloptions.html#cfn-quicksight-analysis-pivottotaloptions-customlabel>
                               PivotTotalOptionsProperty -> Maybe (Value Text)
customLabel :: (Prelude.Maybe (Value Prelude.Text)),
                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-analysis-pivottotaloptions.html#cfn-quicksight-analysis-pivottotaloptions-metricheadercellstyle>
                               PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
metricHeaderCellStyle :: (Prelude.Maybe TableCellStyleProperty),
                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-analysis-pivottotaloptions.html#cfn-quicksight-analysis-pivottotaloptions-placement>
                               PivotTotalOptionsProperty -> Maybe (Value Text)
placement :: (Prelude.Maybe (Value Prelude.Text)),
                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-analysis-pivottotaloptions.html#cfn-quicksight-analysis-pivottotaloptions-scrollstatus>
                               PivotTotalOptionsProperty -> Maybe (Value Text)
scrollStatus :: (Prelude.Maybe (Value Prelude.Text)),
                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-analysis-pivottotaloptions.html#cfn-quicksight-analysis-pivottotaloptions-totalaggregationoptions>
                               PivotTotalOptionsProperty -> Maybe [TotalAggregationOptionProperty]
totalAggregationOptions :: (Prelude.Maybe [TotalAggregationOptionProperty]),
                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-analysis-pivottotaloptions.html#cfn-quicksight-analysis-pivottotaloptions-totalcellstyle>
                               PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
totalCellStyle :: (Prelude.Maybe TableCellStyleProperty),
                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-analysis-pivottotaloptions.html#cfn-quicksight-analysis-pivottotaloptions-totalsvisibility>
                               PivotTotalOptionsProperty -> Maybe (Value Text)
totalsVisibility :: (Prelude.Maybe (Value Prelude.Text)),
                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-analysis-pivottotaloptions.html#cfn-quicksight-analysis-pivottotaloptions-valuecellstyle>
                               PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
valueCellStyle :: (Prelude.Maybe TableCellStyleProperty)}
  deriving stock (PivotTotalOptionsProperty -> PivotTotalOptionsProperty -> Bool
(PivotTotalOptionsProperty -> PivotTotalOptionsProperty -> Bool)
-> (PivotTotalOptionsProperty -> PivotTotalOptionsProperty -> Bool)
-> Eq PivotTotalOptionsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PivotTotalOptionsProperty -> PivotTotalOptionsProperty -> Bool
== :: PivotTotalOptionsProperty -> PivotTotalOptionsProperty -> Bool
$c/= :: PivotTotalOptionsProperty -> PivotTotalOptionsProperty -> Bool
/= :: PivotTotalOptionsProperty -> PivotTotalOptionsProperty -> Bool
Prelude.Eq, Int -> PivotTotalOptionsProperty -> ShowS
[PivotTotalOptionsProperty] -> ShowS
PivotTotalOptionsProperty -> String
(Int -> PivotTotalOptionsProperty -> ShowS)
-> (PivotTotalOptionsProperty -> String)
-> ([PivotTotalOptionsProperty] -> ShowS)
-> Show PivotTotalOptionsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> PivotTotalOptionsProperty -> ShowS
showsPrec :: Int -> PivotTotalOptionsProperty -> ShowS
$cshow :: PivotTotalOptionsProperty -> String
show :: PivotTotalOptionsProperty -> String
$cshowList :: [PivotTotalOptionsProperty] -> ShowS
showList :: [PivotTotalOptionsProperty] -> ShowS
Prelude.Show)
mkPivotTotalOptionsProperty :: PivotTotalOptionsProperty
mkPivotTotalOptionsProperty :: PivotTotalOptionsProperty
mkPivotTotalOptionsProperty
  = PivotTotalOptionsProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), customLabel :: Maybe (Value Text)
customLabel = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       metricHeaderCellStyle :: Maybe TableCellStyleProperty
metricHeaderCellStyle = Maybe TableCellStyleProperty
forall a. Maybe a
Prelude.Nothing,
       placement :: Maybe (Value Text)
placement = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, scrollStatus :: Maybe (Value Text)
scrollStatus = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalAggregationOptions = Maybe [TotalAggregationOptionProperty]
forall a. Maybe a
Prelude.Nothing,
       totalCellStyle :: Maybe TableCellStyleProperty
totalCellStyle = Maybe TableCellStyleProperty
forall a. Maybe a
Prelude.Nothing,
       totalsVisibility :: Maybe (Value Text)
totalsVisibility = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       valueCellStyle :: Maybe TableCellStyleProperty
valueCellStyle = Maybe TableCellStyleProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties PivotTotalOptionsProperty where
  toResourceProperties :: PivotTotalOptionsProperty -> ResourceProperties
toResourceProperties PivotTotalOptionsProperty {Maybe [TotalAggregationOptionProperty]
Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: PivotTotalOptionsProperty -> ()
customLabel :: PivotTotalOptionsProperty -> Maybe (Value Text)
metricHeaderCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
placement :: PivotTotalOptionsProperty -> Maybe (Value Text)
scrollStatus :: PivotTotalOptionsProperty -> Maybe (Value Text)
totalAggregationOptions :: PivotTotalOptionsProperty -> Maybe [TotalAggregationOptionProperty]
totalCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
totalsVisibility :: PivotTotalOptionsProperty -> Maybe (Value Text)
valueCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::QuickSight::Analysis.PivotTotalOptions",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                           [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..=) Key
"CustomLabel" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
customLabel,
                            Key -> TableCellStyleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MetricHeaderCellStyle"
                              (TableCellStyleProperty -> (Key, Value))
-> Maybe TableCellStyleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TableCellStyleProperty
metricHeaderCellStyle,
                            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..=) Key
"Placement" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
placement,
                            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..=) Key
"ScrollStatus" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
scrollStatus,
                            Key -> [TotalAggregationOptionProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TotalAggregationOptions"
                              ([TotalAggregationOptionProperty] -> (Key, Value))
-> Maybe [TotalAggregationOptionProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [TotalAggregationOptionProperty]
totalAggregationOptions,
                            Key -> TableCellStyleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TotalCellStyle" (TableCellStyleProperty -> (Key, Value))
-> Maybe TableCellStyleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TableCellStyleProperty
totalCellStyle,
                            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..=) Key
"TotalsVisibility" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
totalsVisibility,
                            Key -> TableCellStyleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ValueCellStyle" (TableCellStyleProperty -> (Key, Value))
-> Maybe TableCellStyleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TableCellStyleProperty
valueCellStyle])}
instance JSON.ToJSON PivotTotalOptionsProperty where
  toJSON :: PivotTotalOptionsProperty -> Value
toJSON PivotTotalOptionsProperty {Maybe [TotalAggregationOptionProperty]
Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: PivotTotalOptionsProperty -> ()
customLabel :: PivotTotalOptionsProperty -> Maybe (Value Text)
metricHeaderCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
placement :: PivotTotalOptionsProperty -> Maybe (Value Text)
scrollStatus :: PivotTotalOptionsProperty -> Maybe (Value Text)
totalAggregationOptions :: PivotTotalOptionsProperty -> Maybe [TotalAggregationOptionProperty]
totalCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
totalsVisibility :: PivotTotalOptionsProperty -> Maybe (Value Text)
valueCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
              [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..=) Key
"CustomLabel" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
customLabel,
               Key -> TableCellStyleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MetricHeaderCellStyle"
                 (TableCellStyleProperty -> (Key, Value))
-> Maybe TableCellStyleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TableCellStyleProperty
metricHeaderCellStyle,
               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..=) Key
"Placement" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
placement,
               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..=) Key
"ScrollStatus" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
scrollStatus,
               Key -> [TotalAggregationOptionProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TotalAggregationOptions"
                 ([TotalAggregationOptionProperty] -> (Key, Value))
-> Maybe [TotalAggregationOptionProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [TotalAggregationOptionProperty]
totalAggregationOptions,
               Key -> TableCellStyleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TotalCellStyle" (TableCellStyleProperty -> (Key, Value))
-> Maybe TableCellStyleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TableCellStyleProperty
totalCellStyle,
               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..=) Key
"TotalsVisibility" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
totalsVisibility,
               Key -> TableCellStyleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ValueCellStyle" (TableCellStyleProperty -> (Key, Value))
-> Maybe TableCellStyleProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TableCellStyleProperty
valueCellStyle]))
instance Property "CustomLabel" PivotTotalOptionsProperty where
  type PropertyType "CustomLabel" PivotTotalOptionsProperty = Value Prelude.Text
  set :: PropertyType "CustomLabel" PivotTotalOptionsProperty
-> PivotTotalOptionsProperty -> PivotTotalOptionsProperty
set PropertyType "CustomLabel" PivotTotalOptionsProperty
newValue PivotTotalOptionsProperty {Maybe [TotalAggregationOptionProperty]
Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: PivotTotalOptionsProperty -> ()
customLabel :: PivotTotalOptionsProperty -> Maybe (Value Text)
metricHeaderCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
placement :: PivotTotalOptionsProperty -> Maybe (Value Text)
scrollStatus :: PivotTotalOptionsProperty -> Maybe (Value Text)
totalAggregationOptions :: PivotTotalOptionsProperty -> Maybe [TotalAggregationOptionProperty]
totalCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
totalsVisibility :: PivotTotalOptionsProperty -> Maybe (Value Text)
valueCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
..}
    = PivotTotalOptionsProperty
        {customLabel :: Maybe (Value Text)
customLabel = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "CustomLabel" PivotTotalOptionsProperty
Value Text
newValue, Maybe [TotalAggregationOptionProperty]
Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: ()
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
haddock_workaround_ :: ()
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
..}
instance Property "MetricHeaderCellStyle" PivotTotalOptionsProperty where
  type PropertyType "MetricHeaderCellStyle" PivotTotalOptionsProperty = TableCellStyleProperty
  set :: PropertyType "MetricHeaderCellStyle" PivotTotalOptionsProperty
-> PivotTotalOptionsProperty -> PivotTotalOptionsProperty
set PropertyType "MetricHeaderCellStyle" PivotTotalOptionsProperty
newValue PivotTotalOptionsProperty {Maybe [TotalAggregationOptionProperty]
Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: PivotTotalOptionsProperty -> ()
customLabel :: PivotTotalOptionsProperty -> Maybe (Value Text)
metricHeaderCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
placement :: PivotTotalOptionsProperty -> Maybe (Value Text)
scrollStatus :: PivotTotalOptionsProperty -> Maybe (Value Text)
totalAggregationOptions :: PivotTotalOptionsProperty -> Maybe [TotalAggregationOptionProperty]
totalCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
totalsVisibility :: PivotTotalOptionsProperty -> Maybe (Value Text)
valueCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
..}
    = PivotTotalOptionsProperty
        {metricHeaderCellStyle :: Maybe TableCellStyleProperty
metricHeaderCellStyle = TableCellStyleProperty -> Maybe TableCellStyleProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "MetricHeaderCellStyle" PivotTotalOptionsProperty
TableCellStyleProperty
newValue, Maybe [TotalAggregationOptionProperty]
Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
..}
instance Property "Placement" PivotTotalOptionsProperty where
  type PropertyType "Placement" PivotTotalOptionsProperty = Value Prelude.Text
  set :: PropertyType "Placement" PivotTotalOptionsProperty
-> PivotTotalOptionsProperty -> PivotTotalOptionsProperty
set PropertyType "Placement" PivotTotalOptionsProperty
newValue PivotTotalOptionsProperty {Maybe [TotalAggregationOptionProperty]
Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: PivotTotalOptionsProperty -> ()
customLabel :: PivotTotalOptionsProperty -> Maybe (Value Text)
metricHeaderCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
placement :: PivotTotalOptionsProperty -> Maybe (Value Text)
scrollStatus :: PivotTotalOptionsProperty -> Maybe (Value Text)
totalAggregationOptions :: PivotTotalOptionsProperty -> Maybe [TotalAggregationOptionProperty]
totalCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
totalsVisibility :: PivotTotalOptionsProperty -> Maybe (Value Text)
valueCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
..}
    = PivotTotalOptionsProperty {placement :: Maybe (Value Text)
placement = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Placement" PivotTotalOptionsProperty
Value Text
newValue, Maybe [TotalAggregationOptionProperty]
Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
..}
instance Property "ScrollStatus" PivotTotalOptionsProperty where
  type PropertyType "ScrollStatus" PivotTotalOptionsProperty = Value Prelude.Text
  set :: PropertyType "ScrollStatus" PivotTotalOptionsProperty
-> PivotTotalOptionsProperty -> PivotTotalOptionsProperty
set PropertyType "ScrollStatus" PivotTotalOptionsProperty
newValue PivotTotalOptionsProperty {Maybe [TotalAggregationOptionProperty]
Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: PivotTotalOptionsProperty -> ()
customLabel :: PivotTotalOptionsProperty -> Maybe (Value Text)
metricHeaderCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
placement :: PivotTotalOptionsProperty -> Maybe (Value Text)
scrollStatus :: PivotTotalOptionsProperty -> Maybe (Value Text)
totalAggregationOptions :: PivotTotalOptionsProperty -> Maybe [TotalAggregationOptionProperty]
totalCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
totalsVisibility :: PivotTotalOptionsProperty -> Maybe (Value Text)
valueCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
..}
    = PivotTotalOptionsProperty
        {scrollStatus :: Maybe (Value Text)
scrollStatus = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ScrollStatus" PivotTotalOptionsProperty
Value Text
newValue, Maybe [TotalAggregationOptionProperty]
Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
..}
instance Property "TotalAggregationOptions" PivotTotalOptionsProperty where
  type PropertyType "TotalAggregationOptions" PivotTotalOptionsProperty = [TotalAggregationOptionProperty]
  set :: PropertyType "TotalAggregationOptions" PivotTotalOptionsProperty
-> PivotTotalOptionsProperty -> PivotTotalOptionsProperty
set PropertyType "TotalAggregationOptions" PivotTotalOptionsProperty
newValue PivotTotalOptionsProperty {Maybe [TotalAggregationOptionProperty]
Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: PivotTotalOptionsProperty -> ()
customLabel :: PivotTotalOptionsProperty -> Maybe (Value Text)
metricHeaderCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
placement :: PivotTotalOptionsProperty -> Maybe (Value Text)
scrollStatus :: PivotTotalOptionsProperty -> Maybe (Value Text)
totalAggregationOptions :: PivotTotalOptionsProperty -> Maybe [TotalAggregationOptionProperty]
totalCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
totalsVisibility :: PivotTotalOptionsProperty -> Maybe (Value Text)
valueCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
..}
    = PivotTotalOptionsProperty
        {totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalAggregationOptions = [TotalAggregationOptionProperty]
-> Maybe [TotalAggregationOptionProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [TotalAggregationOptionProperty]
PropertyType "TotalAggregationOptions" PivotTotalOptionsProperty
newValue, Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
..}
instance Property "TotalCellStyle" PivotTotalOptionsProperty where
  type PropertyType "TotalCellStyle" PivotTotalOptionsProperty = TableCellStyleProperty
  set :: PropertyType "TotalCellStyle" PivotTotalOptionsProperty
-> PivotTotalOptionsProperty -> PivotTotalOptionsProperty
set PropertyType "TotalCellStyle" PivotTotalOptionsProperty
newValue PivotTotalOptionsProperty {Maybe [TotalAggregationOptionProperty]
Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: PivotTotalOptionsProperty -> ()
customLabel :: PivotTotalOptionsProperty -> Maybe (Value Text)
metricHeaderCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
placement :: PivotTotalOptionsProperty -> Maybe (Value Text)
scrollStatus :: PivotTotalOptionsProperty -> Maybe (Value Text)
totalAggregationOptions :: PivotTotalOptionsProperty -> Maybe [TotalAggregationOptionProperty]
totalCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
totalsVisibility :: PivotTotalOptionsProperty -> Maybe (Value Text)
valueCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
..}
    = PivotTotalOptionsProperty
        {totalCellStyle :: Maybe TableCellStyleProperty
totalCellStyle = TableCellStyleProperty -> Maybe TableCellStyleProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TotalCellStyle" PivotTotalOptionsProperty
TableCellStyleProperty
newValue, Maybe [TotalAggregationOptionProperty]
Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
..}
instance Property "TotalsVisibility" PivotTotalOptionsProperty where
  type PropertyType "TotalsVisibility" PivotTotalOptionsProperty = Value Prelude.Text
  set :: PropertyType "TotalsVisibility" PivotTotalOptionsProperty
-> PivotTotalOptionsProperty -> PivotTotalOptionsProperty
set PropertyType "TotalsVisibility" PivotTotalOptionsProperty
newValue PivotTotalOptionsProperty {Maybe [TotalAggregationOptionProperty]
Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: PivotTotalOptionsProperty -> ()
customLabel :: PivotTotalOptionsProperty -> Maybe (Value Text)
metricHeaderCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
placement :: PivotTotalOptionsProperty -> Maybe (Value Text)
scrollStatus :: PivotTotalOptionsProperty -> Maybe (Value Text)
totalAggregationOptions :: PivotTotalOptionsProperty -> Maybe [TotalAggregationOptionProperty]
totalCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
totalsVisibility :: PivotTotalOptionsProperty -> Maybe (Value Text)
valueCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
..}
    = PivotTotalOptionsProperty
        {totalsVisibility :: Maybe (Value Text)
totalsVisibility = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TotalsVisibility" PivotTotalOptionsProperty
Value Text
newValue, Maybe [TotalAggregationOptionProperty]
Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
valueCellStyle :: Maybe TableCellStyleProperty
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
valueCellStyle :: Maybe TableCellStyleProperty
..}
instance Property "ValueCellStyle" PivotTotalOptionsProperty where
  type PropertyType "ValueCellStyle" PivotTotalOptionsProperty = TableCellStyleProperty
  set :: PropertyType "ValueCellStyle" PivotTotalOptionsProperty
-> PivotTotalOptionsProperty -> PivotTotalOptionsProperty
set PropertyType "ValueCellStyle" PivotTotalOptionsProperty
newValue PivotTotalOptionsProperty {Maybe [TotalAggregationOptionProperty]
Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: PivotTotalOptionsProperty -> ()
customLabel :: PivotTotalOptionsProperty -> Maybe (Value Text)
metricHeaderCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
placement :: PivotTotalOptionsProperty -> Maybe (Value Text)
scrollStatus :: PivotTotalOptionsProperty -> Maybe (Value Text)
totalAggregationOptions :: PivotTotalOptionsProperty -> Maybe [TotalAggregationOptionProperty]
totalCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
totalsVisibility :: PivotTotalOptionsProperty -> Maybe (Value Text)
valueCellStyle :: PivotTotalOptionsProperty -> Maybe TableCellStyleProperty
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
valueCellStyle :: Maybe TableCellStyleProperty
..}
    = PivotTotalOptionsProperty
        {valueCellStyle :: Maybe TableCellStyleProperty
valueCellStyle = TableCellStyleProperty -> Maybe TableCellStyleProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ValueCellStyle" PivotTotalOptionsProperty
TableCellStyleProperty
newValue, Maybe [TotalAggregationOptionProperty]
Maybe (Value Text)
Maybe TableCellStyleProperty
()
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
haddock_workaround_ :: ()
customLabel :: Maybe (Value Text)
metricHeaderCellStyle :: Maybe TableCellStyleProperty
placement :: Maybe (Value Text)
scrollStatus :: Maybe (Value Text)
totalAggregationOptions :: Maybe [TotalAggregationOptionProperty]
totalCellStyle :: Maybe TableCellStyleProperty
totalsVisibility :: Maybe (Value Text)
..}