module Network.Google.Sheets.Types.Sum where
import Network.Google.Prelude
data CopyPasteRequestPasteType
= PasteNormal
| PasteValues
| PasteFormat
| PasteNoBOrders
| PasteFormula
| PasteDataValidation
| PasteConditionalFormatting
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable CopyPasteRequestPasteType
instance FromHttpApiData CopyPasteRequestPasteType where
parseQueryParam = \case
"PASTE_NORMAL" -> Right PasteNormal
"PASTE_VALUES" -> Right PasteValues
"PASTE_FORMAT" -> Right PasteFormat
"PASTE_NO_BORDERS" -> Right PasteNoBOrders
"PASTE_FORMULA" -> Right PasteFormula
"PASTE_DATA_VALIDATION" -> Right PasteDataValidation
"PASTE_CONDITIONAL_FORMATTING" -> Right PasteConditionalFormatting
x -> Left ("Unable to parse CopyPasteRequestPasteType from: " <> x)
instance ToHttpApiData CopyPasteRequestPasteType where
toQueryParam = \case
PasteNormal -> "PASTE_NORMAL"
PasteValues -> "PASTE_VALUES"
PasteFormat -> "PASTE_FORMAT"
PasteNoBOrders -> "PASTE_NO_BORDERS"
PasteFormula -> "PASTE_FORMULA"
PasteDataValidation -> "PASTE_DATA_VALIDATION"
PasteConditionalFormatting -> "PASTE_CONDITIONAL_FORMATTING"
instance FromJSON CopyPasteRequestPasteType where
parseJSON = parseJSONText "CopyPasteRequestPasteType"
instance ToJSON CopyPasteRequestPasteType where
toJSON = toJSONText
data BasicChartAxisPosition
= BasicChartAxisPositionUnspecified
| BottomAxis
| LeftAxis
| RightAxis
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable BasicChartAxisPosition
instance FromHttpApiData BasicChartAxisPosition where
parseQueryParam = \case
"BASIC_CHART_AXIS_POSITION_UNSPECIFIED" -> Right BasicChartAxisPositionUnspecified
"BOTTOM_AXIS" -> Right BottomAxis
"LEFT_AXIS" -> Right LeftAxis
"RIGHT_AXIS" -> Right RightAxis
x -> Left ("Unable to parse BasicChartAxisPosition from: " <> x)
instance ToHttpApiData BasicChartAxisPosition where
toQueryParam = \case
BasicChartAxisPositionUnspecified -> "BASIC_CHART_AXIS_POSITION_UNSPECIFIED"
BottomAxis -> "BOTTOM_AXIS"
LeftAxis -> "LEFT_AXIS"
RightAxis -> "RIGHT_AXIS"
instance FromJSON BasicChartAxisPosition where
parseJSON = parseJSONText "BasicChartAxisPosition"
instance ToJSON BasicChartAxisPosition where
toJSON = toJSONText
data DeleteRangeRequestShiftDimension
= DimensionUnspecified
| Rows
| Columns
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable DeleteRangeRequestShiftDimension
instance FromHttpApiData DeleteRangeRequestShiftDimension where
parseQueryParam = \case
"DIMENSION_UNSPECIFIED" -> Right DimensionUnspecified
"ROWS" -> Right Rows
"COLUMNS" -> Right Columns
x -> Left ("Unable to parse DeleteRangeRequestShiftDimension from: " <> x)
instance ToHttpApiData DeleteRangeRequestShiftDimension where
toQueryParam = \case
DimensionUnspecified -> "DIMENSION_UNSPECIFIED"
Rows -> "ROWS"
Columns -> "COLUMNS"
instance FromJSON DeleteRangeRequestShiftDimension where
parseJSON = parseJSONText "DeleteRangeRequestShiftDimension"
instance ToJSON DeleteRangeRequestShiftDimension where
toJSON = toJSONText
data BasicChartSeriesTargetAxis
= BCSTABasicChartAxisPositionUnspecified
| BCSTABottomAxis
| BCSTALeftAxis
| BCSTARightAxis
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable BasicChartSeriesTargetAxis
instance FromHttpApiData BasicChartSeriesTargetAxis where
parseQueryParam = \case
"BASIC_CHART_AXIS_POSITION_UNSPECIFIED" -> Right BCSTABasicChartAxisPositionUnspecified
"BOTTOM_AXIS" -> Right BCSTABottomAxis
"LEFT_AXIS" -> Right BCSTALeftAxis
"RIGHT_AXIS" -> Right BCSTARightAxis
x -> Left ("Unable to parse BasicChartSeriesTargetAxis from: " <> x)
instance ToHttpApiData BasicChartSeriesTargetAxis where
toQueryParam = \case
BCSTABasicChartAxisPositionUnspecified -> "BASIC_CHART_AXIS_POSITION_UNSPECIFIED"
BCSTABottomAxis -> "BOTTOM_AXIS"
BCSTALeftAxis -> "LEFT_AXIS"
BCSTARightAxis -> "RIGHT_AXIS"
instance FromJSON BasicChartSeriesTargetAxis where
parseJSON = parseJSONText "BasicChartSeriesTargetAxis"
instance ToJSON BasicChartSeriesTargetAxis where
toJSON = toJSONText
data BatchUpdateValuesRequestResponseDateTimeRenderOption
= SerialNumber
| FormattedString
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable BatchUpdateValuesRequestResponseDateTimeRenderOption
instance FromHttpApiData BatchUpdateValuesRequestResponseDateTimeRenderOption where
parseQueryParam = \case
"SERIAL_NUMBER" -> Right SerialNumber
"FORMATTED_STRING" -> Right FormattedString
x -> Left ("Unable to parse BatchUpdateValuesRequestResponseDateTimeRenderOption from: " <> x)
instance ToHttpApiData BatchUpdateValuesRequestResponseDateTimeRenderOption where
toQueryParam = \case
SerialNumber -> "SERIAL_NUMBER"
FormattedString -> "FORMATTED_STRING"
instance FromJSON BatchUpdateValuesRequestResponseDateTimeRenderOption where
parseJSON = parseJSONText "BatchUpdateValuesRequestResponseDateTimeRenderOption"
instance ToJSON BatchUpdateValuesRequestResponseDateTimeRenderOption where
toJSON = toJSONText
data AppendDimensionRequestDimension
= ADRDDimensionUnspecified
| ADRDRows
| ADRDColumns
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable AppendDimensionRequestDimension
instance FromHttpApiData AppendDimensionRequestDimension where
parseQueryParam = \case
"DIMENSION_UNSPECIFIED" -> Right ADRDDimensionUnspecified
"ROWS" -> Right ADRDRows
"COLUMNS" -> Right ADRDColumns
x -> Left ("Unable to parse AppendDimensionRequestDimension from: " <> x)
instance ToHttpApiData AppendDimensionRequestDimension where
toQueryParam = \case
ADRDDimensionUnspecified -> "DIMENSION_UNSPECIFIED"
ADRDRows -> "ROWS"
ADRDColumns -> "COLUMNS"
instance FromJSON AppendDimensionRequestDimension where
parseJSON = parseJSONText "AppendDimensionRequestDimension"
instance ToJSON AppendDimensionRequestDimension where
toJSON = toJSONText
data DimensionRangeDimension
= DRDDimensionUnspecified
| DRDRows
| DRDColumns
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable DimensionRangeDimension
instance FromHttpApiData DimensionRangeDimension where
parseQueryParam = \case
"DIMENSION_UNSPECIFIED" -> Right DRDDimensionUnspecified
"ROWS" -> Right DRDRows
"COLUMNS" -> Right DRDColumns
x -> Left ("Unable to parse DimensionRangeDimension from: " <> x)
instance ToHttpApiData DimensionRangeDimension where
toQueryParam = \case
DRDDimensionUnspecified -> "DIMENSION_UNSPECIFIED"
DRDRows -> "ROWS"
DRDColumns -> "COLUMNS"
instance FromJSON DimensionRangeDimension where
parseJSON = parseJSONText "DimensionRangeDimension"
instance ToJSON DimensionRangeDimension where
toJSON = toJSONText
data SourceAndDestinationDimension
= SADDDimensionUnspecified
| SADDRows
| SADDColumns
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable SourceAndDestinationDimension
instance FromHttpApiData SourceAndDestinationDimension where
parseQueryParam = \case
"DIMENSION_UNSPECIFIED" -> Right SADDDimensionUnspecified
"ROWS" -> Right SADDRows
"COLUMNS" -> Right SADDColumns
x -> Left ("Unable to parse SourceAndDestinationDimension from: " <> x)
instance ToHttpApiData SourceAndDestinationDimension where
toQueryParam = \case
SADDDimensionUnspecified -> "DIMENSION_UNSPECIFIED"
SADDRows -> "ROWS"
SADDColumns -> "COLUMNS"
instance FromJSON SourceAndDestinationDimension where
parseJSON = parseJSONText "SourceAndDestinationDimension"
instance ToJSON SourceAndDestinationDimension where
toJSON = toJSONText
data CellFormatWrapStrategy
= WrapStrategyUnspecified
| OverflowCell
| LegacyWrap
| Clip
| Wrap
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable CellFormatWrapStrategy
instance FromHttpApiData CellFormatWrapStrategy where
parseQueryParam = \case
"WRAP_STRATEGY_UNSPECIFIED" -> Right WrapStrategyUnspecified
"OVERFLOW_CELL" -> Right OverflowCell
"LEGACY_WRAP" -> Right LegacyWrap
"CLIP" -> Right Clip
"WRAP" -> Right Wrap
x -> Left ("Unable to parse CellFormatWrapStrategy from: " <> x)
instance ToHttpApiData CellFormatWrapStrategy where
toQueryParam = \case
WrapStrategyUnspecified -> "WRAP_STRATEGY_UNSPECIFIED"
OverflowCell -> "OVERFLOW_CELL"
LegacyWrap -> "LEGACY_WRAP"
Clip -> "CLIP"
Wrap -> "WRAP"
instance FromJSON CellFormatWrapStrategy where
parseJSON = parseJSONText "CellFormatWrapStrategy"
instance ToJSON CellFormatWrapStrategy where
toJSON = toJSONText
data BatchUpdateValuesRequestValueInputOption
= InputValueOptionUnspecified
| Raw
| UserEntered
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable BatchUpdateValuesRequestValueInputOption
instance FromHttpApiData BatchUpdateValuesRequestValueInputOption where
parseQueryParam = \case
"INPUT_VALUE_OPTION_UNSPECIFIED" -> Right InputValueOptionUnspecified
"RAW" -> Right Raw
"USER_ENTERED" -> Right UserEntered
x -> Left ("Unable to parse BatchUpdateValuesRequestValueInputOption from: " <> x)
instance ToHttpApiData BatchUpdateValuesRequestValueInputOption where
toQueryParam = \case
InputValueOptionUnspecified -> "INPUT_VALUE_OPTION_UNSPECIFIED"
Raw -> "RAW"
UserEntered -> "USER_ENTERED"
instance FromJSON BatchUpdateValuesRequestValueInputOption where
parseJSON = parseJSONText "BatchUpdateValuesRequestValueInputOption"
instance ToJSON BatchUpdateValuesRequestValueInputOption where
toJSON = toJSONText
data BatchUpdateValuesRequestResponseValueRenderOption
= FormattedValue
| UnformattedValue
| Formula
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable BatchUpdateValuesRequestResponseValueRenderOption
instance FromHttpApiData BatchUpdateValuesRequestResponseValueRenderOption where
parseQueryParam = \case
"FORMATTED_VALUE" -> Right FormattedValue
"UNFORMATTED_VALUE" -> Right UnformattedValue
"FORMULA" -> Right Formula
x -> Left ("Unable to parse BatchUpdateValuesRequestResponseValueRenderOption from: " <> x)
instance ToHttpApiData BatchUpdateValuesRequestResponseValueRenderOption where
toQueryParam = \case
FormattedValue -> "FORMATTED_VALUE"
UnformattedValue -> "UNFORMATTED_VALUE"
Formula -> "FORMULA"
instance FromJSON BatchUpdateValuesRequestResponseValueRenderOption where
parseJSON = parseJSONText "BatchUpdateValuesRequestResponseValueRenderOption"
instance ToJSON BatchUpdateValuesRequestResponseValueRenderOption where
toJSON = toJSONText
data PieChartSpecLegendPosition
= PieChartLegendPositionUnspecified
| BottomLegend
| LeftLegend
| RightLegend
| TopLegend
| NoLegend
| LabeledLegend
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable PieChartSpecLegendPosition
instance FromHttpApiData PieChartSpecLegendPosition where
parseQueryParam = \case
"PIE_CHART_LEGEND_POSITION_UNSPECIFIED" -> Right PieChartLegendPositionUnspecified
"BOTTOM_LEGEND" -> Right BottomLegend
"LEFT_LEGEND" -> Right LeftLegend
"RIGHT_LEGEND" -> Right RightLegend
"TOP_LEGEND" -> Right TopLegend
"NO_LEGEND" -> Right NoLegend
"LABELED_LEGEND" -> Right LabeledLegend
x -> Left ("Unable to parse PieChartSpecLegendPosition from: " <> x)
instance ToHttpApiData PieChartSpecLegendPosition where
toQueryParam = \case
PieChartLegendPositionUnspecified -> "PIE_CHART_LEGEND_POSITION_UNSPECIFIED"
BottomLegend -> "BOTTOM_LEGEND"
LeftLegend -> "LEFT_LEGEND"
RightLegend -> "RIGHT_LEGEND"
TopLegend -> "TOP_LEGEND"
NoLegend -> "NO_LEGEND"
LabeledLegend -> "LABELED_LEGEND"
instance FromJSON PieChartSpecLegendPosition where
parseJSON = parseJSONText "PieChartSpecLegendPosition"
instance ToJSON PieChartSpecLegendPosition where
toJSON = toJSONText
data CellFormatVerticalAlignment
= VerticalAlignUnspecified
| Top
| Middle
| Bottom
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable CellFormatVerticalAlignment
instance FromHttpApiData CellFormatVerticalAlignment where
parseQueryParam = \case
"VERTICAL_ALIGN_UNSPECIFIED" -> Right VerticalAlignUnspecified
"TOP" -> Right Top
"MIDDLE" -> Right Middle
"BOTTOM" -> Right Bottom
x -> Left ("Unable to parse CellFormatVerticalAlignment from: " <> x)
instance ToHttpApiData CellFormatVerticalAlignment where
toQueryParam = \case
VerticalAlignUnspecified -> "VERTICAL_ALIGN_UNSPECIFIED"
Top -> "TOP"
Middle -> "MIDDLE"
Bottom -> "BOTTOM"
instance FromJSON CellFormatVerticalAlignment where
parseJSON = parseJSONText "CellFormatVerticalAlignment"
instance ToJSON CellFormatVerticalAlignment where
toJSON = toJSONText
data NumberFormatType
= NumberFormatTypeUnspecified
| Text
| Number
| Percent
| Currency
| Date
| Time
| DateTime
| Scientific
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable NumberFormatType
instance FromHttpApiData NumberFormatType where
parseQueryParam = \case
"NUMBER_FORMAT_TYPE_UNSPECIFIED" -> Right NumberFormatTypeUnspecified
"TEXT" -> Right Text
"NUMBER" -> Right Number
"PERCENT" -> Right Percent
"CURRENCY" -> Right Currency
"DATE" -> Right Date
"TIME" -> Right Time
"DATE_TIME" -> Right DateTime
"SCIENTIFIC" -> Right Scientific
x -> Left ("Unable to parse NumberFormatType from: " <> x)
instance ToHttpApiData NumberFormatType where
toQueryParam = \case
NumberFormatTypeUnspecified -> "NUMBER_FORMAT_TYPE_UNSPECIFIED"
Text -> "TEXT"
Number -> "NUMBER"
Percent -> "PERCENT"
Currency -> "CURRENCY"
Date -> "DATE"
Time -> "TIME"
DateTime -> "DATE_TIME"
Scientific -> "SCIENTIFIC"
instance FromJSON NumberFormatType where
parseJSON = parseJSONText "NumberFormatType"
instance ToJSON NumberFormatType where
toJSON = toJSONText
data ConditionValueRelativeDate
= RelativeDateUnspecified
| PastYear
| PastMonth
| PastWeek
| Yesterday
| Today
| Tomorrow
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable ConditionValueRelativeDate
instance FromHttpApiData ConditionValueRelativeDate where
parseQueryParam = \case
"RELATIVE_DATE_UNSPECIFIED" -> Right RelativeDateUnspecified
"PAST_YEAR" -> Right PastYear
"PAST_MONTH" -> Right PastMonth
"PAST_WEEK" -> Right PastWeek
"YESTERDAY" -> Right Yesterday
"TODAY" -> Right Today
"TOMORROW" -> Right Tomorrow
x -> Left ("Unable to parse ConditionValueRelativeDate from: " <> x)
instance ToHttpApiData ConditionValueRelativeDate where
toQueryParam = \case
RelativeDateUnspecified -> "RELATIVE_DATE_UNSPECIFIED"
PastYear -> "PAST_YEAR"
PastMonth -> "PAST_MONTH"
PastWeek -> "PAST_WEEK"
Yesterday -> "YESTERDAY"
Today -> "TODAY"
Tomorrow -> "TOMORROW"
instance FromJSON ConditionValueRelativeDate where
parseJSON = parseJSONText "ConditionValueRelativeDate"
instance ToJSON ConditionValueRelativeDate where
toJSON = toJSONText
data SortSpecSortOrder
= SortOrderUnspecified
| Ascending
| Descending
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable SortSpecSortOrder
instance FromHttpApiData SortSpecSortOrder where
parseQueryParam = \case
"SORT_ORDER_UNSPECIFIED" -> Right SortOrderUnspecified
"ASCENDING" -> Right Ascending
"DESCENDING" -> Right Descending
x -> Left ("Unable to parse SortSpecSortOrder from: " <> x)
instance ToHttpApiData SortSpecSortOrder where
toQueryParam = \case
SortOrderUnspecified -> "SORT_ORDER_UNSPECIFIED"
Ascending -> "ASCENDING"
Descending -> "DESCENDING"
instance FromJSON SortSpecSortOrder where
parseJSON = parseJSONText "SortSpecSortOrder"
instance ToJSON SortSpecSortOrder where
toJSON = toJSONText
data PivotValueSummarizeFunction
= PivotStandardValueFunctionUnspecified
| Sum
| Counta
| Count
| Countunique
| Average
| Max
| Min
| Median
| Product
| Stdev
| Stdevp
| Var
| Varp
| Custom
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable PivotValueSummarizeFunction
instance FromHttpApiData PivotValueSummarizeFunction where
parseQueryParam = \case
"PIVOT_STANDARD_VALUE_FUNCTION_UNSPECIFIED" -> Right PivotStandardValueFunctionUnspecified
"SUM" -> Right Sum
"COUNTA" -> Right Counta
"COUNT" -> Right Count
"COUNTUNIQUE" -> Right Countunique
"AVERAGE" -> Right Average
"MAX" -> Right Max
"MIN" -> Right Min
"MEDIAN" -> Right Median
"PRODUCT" -> Right Product
"STDEV" -> Right Stdev
"STDEVP" -> Right Stdevp
"VAR" -> Right Var
"VARP" -> Right Varp
"CUSTOM" -> Right Custom
x -> Left ("Unable to parse PivotValueSummarizeFunction from: " <> x)
instance ToHttpApiData PivotValueSummarizeFunction where
toQueryParam = \case
PivotStandardValueFunctionUnspecified -> "PIVOT_STANDARD_VALUE_FUNCTION_UNSPECIFIED"
Sum -> "SUM"
Counta -> "COUNTA"
Count -> "COUNT"
Countunique -> "COUNTUNIQUE"
Average -> "AVERAGE"
Max -> "MAX"
Min -> "MIN"
Median -> "MEDIAN"
Product -> "PRODUCT"
Stdev -> "STDEV"
Stdevp -> "STDEVP"
Var -> "VAR"
Varp -> "VARP"
Custom -> "CUSTOM"
instance FromJSON PivotValueSummarizeFunction where
parseJSON = parseJSONText "PivotValueSummarizeFunction"
instance ToJSON PivotValueSummarizeFunction where
toJSON = toJSONText
data CellFormatHyperlinkDisplayType
= HyperlinkDisplayTypeUnspecified
| Linked
| PlainText
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable CellFormatHyperlinkDisplayType
instance FromHttpApiData CellFormatHyperlinkDisplayType where
parseQueryParam = \case
"HYPERLINK_DISPLAY_TYPE_UNSPECIFIED" -> Right HyperlinkDisplayTypeUnspecified
"LINKED" -> Right Linked
"PLAIN_TEXT" -> Right PlainText
x -> Left ("Unable to parse CellFormatHyperlinkDisplayType from: " <> x)
instance ToHttpApiData CellFormatHyperlinkDisplayType where
toQueryParam = \case
HyperlinkDisplayTypeUnspecified -> "HYPERLINK_DISPLAY_TYPE_UNSPECIFIED"
Linked -> "LINKED"
PlainText -> "PLAIN_TEXT"
instance FromJSON CellFormatHyperlinkDisplayType where
parseJSON = parseJSONText "CellFormatHyperlinkDisplayType"
instance ToJSON CellFormatHyperlinkDisplayType where
toJSON = toJSONText
data SheetPropertiesSheetType
= SheetTypeUnspecified
| Grid
| Object
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable SheetPropertiesSheetType
instance FromHttpApiData SheetPropertiesSheetType where
parseQueryParam = \case
"SHEET_TYPE_UNSPECIFIED" -> Right SheetTypeUnspecified
"GRID" -> Right Grid
"OBJECT" -> Right Object
x -> Left ("Unable to parse SheetPropertiesSheetType from: " <> x)
instance ToHttpApiData SheetPropertiesSheetType where
toQueryParam = \case
SheetTypeUnspecified -> "SHEET_TYPE_UNSPECIFIED"
Grid -> "GRID"
Object -> "OBJECT"
instance FromJSON SheetPropertiesSheetType where
parseJSON = parseJSONText "SheetPropertiesSheetType"
instance ToJSON SheetPropertiesSheetType where
toJSON = toJSONText
data MergeCellsRequestMergeType
= MergeAll
| MergeColumns
| MergeRows
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable MergeCellsRequestMergeType
instance FromHttpApiData MergeCellsRequestMergeType where
parseQueryParam = \case
"MERGE_ALL" -> Right MergeAll
"MERGE_COLUMNS" -> Right MergeColumns
"MERGE_ROWS" -> Right MergeRows
x -> Left ("Unable to parse MergeCellsRequestMergeType from: " <> x)
instance ToHttpApiData MergeCellsRequestMergeType where
toQueryParam = \case
MergeAll -> "MERGE_ALL"
MergeColumns -> "MERGE_COLUMNS"
MergeRows -> "MERGE_ROWS"
instance FromJSON MergeCellsRequestMergeType where
parseJSON = parseJSONText "MergeCellsRequestMergeType"
instance ToJSON MergeCellsRequestMergeType where
toJSON = toJSONText
data CellFormatHorizontalAlignment
= HorizontalAlignUnspecified
| Left'
| Center
| Right'
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable CellFormatHorizontalAlignment
instance FromHttpApiData CellFormatHorizontalAlignment where
parseQueryParam = \case
"HORIZONTAL_ALIGN_UNSPECIFIED" -> Right HorizontalAlignUnspecified
"LEFT" -> Right Left'
"CENTER" -> Right Center
"RIGHT" -> Right Right'
x -> Left ("Unable to parse CellFormatHorizontalAlignment from: " <> x)
instance ToHttpApiData CellFormatHorizontalAlignment where
toQueryParam = \case
HorizontalAlignUnspecified -> "HORIZONTAL_ALIGN_UNSPECIFIED"
Left' -> "LEFT"
Center -> "CENTER"
Right' -> "RIGHT"
instance FromJSON CellFormatHorizontalAlignment where
parseJSON = parseJSONText "CellFormatHorizontalAlignment"
instance ToJSON CellFormatHorizontalAlignment where
toJSON = toJSONText
data BooleanConditionType
= ConditionTypeUnspecified
| NumberGreater
| NumberGreaterThanEQ
| NumberLess
| NumberLessThanEQ
| NumberEQ
| NumberNotEQ
| NumberBetween
| NumberNotBetween
| TextContains
| TextNotContains
| TextStartsWith
| TextEndsWith
| TextEQ
| TextIsEmail
| TextIsURL
| DateEQ
| DateBefore
| DateAfter
| DateOnOrBefore
| DateOnOrAfter
| DateBetween
| DateNotBetween
| DateIsValid
| OneOfRange
| OneOfList
| Blank
| NotBlank
| CustomFormula
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable BooleanConditionType
instance FromHttpApiData BooleanConditionType where
parseQueryParam = \case
"CONDITION_TYPE_UNSPECIFIED" -> Right ConditionTypeUnspecified
"NUMBER_GREATER" -> Right NumberGreater
"NUMBER_GREATER_THAN_EQ" -> Right NumberGreaterThanEQ
"NUMBER_LESS" -> Right NumberLess
"NUMBER_LESS_THAN_EQ" -> Right NumberLessThanEQ
"NUMBER_EQ" -> Right NumberEQ
"NUMBER_NOT_EQ" -> Right NumberNotEQ
"NUMBER_BETWEEN" -> Right NumberBetween
"NUMBER_NOT_BETWEEN" -> Right NumberNotBetween
"TEXT_CONTAINS" -> Right TextContains
"TEXT_NOT_CONTAINS" -> Right TextNotContains
"TEXT_STARTS_WITH" -> Right TextStartsWith
"TEXT_ENDS_WITH" -> Right TextEndsWith
"TEXT_EQ" -> Right TextEQ
"TEXT_IS_EMAIL" -> Right TextIsEmail
"TEXT_IS_URL" -> Right TextIsURL
"DATE_EQ" -> Right DateEQ
"DATE_BEFORE" -> Right DateBefore
"DATE_AFTER" -> Right DateAfter
"DATE_ON_OR_BEFORE" -> Right DateOnOrBefore
"DATE_ON_OR_AFTER" -> Right DateOnOrAfter
"DATE_BETWEEN" -> Right DateBetween
"DATE_NOT_BETWEEN" -> Right DateNotBetween
"DATE_IS_VALID" -> Right DateIsValid
"ONE_OF_RANGE" -> Right OneOfRange
"ONE_OF_LIST" -> Right OneOfList
"BLANK" -> Right Blank
"NOT_BLANK" -> Right NotBlank
"CUSTOM_FORMULA" -> Right CustomFormula
x -> Left ("Unable to parse BooleanConditionType from: " <> x)
instance ToHttpApiData BooleanConditionType where
toQueryParam = \case
ConditionTypeUnspecified -> "CONDITION_TYPE_UNSPECIFIED"
NumberGreater -> "NUMBER_GREATER"
NumberGreaterThanEQ -> "NUMBER_GREATER_THAN_EQ"
NumberLess -> "NUMBER_LESS"
NumberLessThanEQ -> "NUMBER_LESS_THAN_EQ"
NumberEQ -> "NUMBER_EQ"
NumberNotEQ -> "NUMBER_NOT_EQ"
NumberBetween -> "NUMBER_BETWEEN"
NumberNotBetween -> "NUMBER_NOT_BETWEEN"
TextContains -> "TEXT_CONTAINS"
TextNotContains -> "TEXT_NOT_CONTAINS"
TextStartsWith -> "TEXT_STARTS_WITH"
TextEndsWith -> "TEXT_ENDS_WITH"
TextEQ -> "TEXT_EQ"
TextIsEmail -> "TEXT_IS_EMAIL"
TextIsURL -> "TEXT_IS_URL"
DateEQ -> "DATE_EQ"
DateBefore -> "DATE_BEFORE"
DateAfter -> "DATE_AFTER"
DateOnOrBefore -> "DATE_ON_OR_BEFORE"
DateOnOrAfter -> "DATE_ON_OR_AFTER"
DateBetween -> "DATE_BETWEEN"
DateNotBetween -> "DATE_NOT_BETWEEN"
DateIsValid -> "DATE_IS_VALID"
OneOfRange -> "ONE_OF_RANGE"
OneOfList -> "ONE_OF_LIST"
Blank -> "BLANK"
NotBlank -> "NOT_BLANK"
CustomFormula -> "CUSTOM_FORMULA"
instance FromJSON BooleanConditionType where
parseJSON = parseJSONText "BooleanConditionType"
instance ToJSON BooleanConditionType where
toJSON = toJSONText
data ValueRangeMajorDimension
= VRMDDimensionUnspecified
| VRMDRows
| VRMDColumns
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable ValueRangeMajorDimension
instance FromHttpApiData ValueRangeMajorDimension where
parseQueryParam = \case
"DIMENSION_UNSPECIFIED" -> Right VRMDDimensionUnspecified
"ROWS" -> Right VRMDRows
"COLUMNS" -> Right VRMDColumns
x -> Left ("Unable to parse ValueRangeMajorDimension from: " <> x)
instance ToHttpApiData ValueRangeMajorDimension where
toQueryParam = \case
VRMDDimensionUnspecified -> "DIMENSION_UNSPECIFIED"
VRMDRows -> "ROWS"
VRMDColumns -> "COLUMNS"
instance FromJSON ValueRangeMajorDimension where
parseJSON = parseJSONText "ValueRangeMajorDimension"
instance ToJSON ValueRangeMajorDimension where
toJSON = toJSONText
data PivotGroupSortOrder
= PGSOSortOrderUnspecified
| PGSOAscending
| PGSODescending
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable PivotGroupSortOrder
instance FromHttpApiData PivotGroupSortOrder where
parseQueryParam = \case
"SORT_ORDER_UNSPECIFIED" -> Right PGSOSortOrderUnspecified
"ASCENDING" -> Right PGSOAscending
"DESCENDING" -> Right PGSODescending
x -> Left ("Unable to parse PivotGroupSortOrder from: " <> x)
instance ToHttpApiData PivotGroupSortOrder where
toQueryParam = \case
PGSOSortOrderUnspecified -> "SORT_ORDER_UNSPECIFIED"
PGSOAscending -> "ASCENDING"
PGSODescending -> "DESCENDING"
instance FromJSON PivotGroupSortOrder where
parseJSON = parseJSONText "PivotGroupSortOrder"
instance ToJSON PivotGroupSortOrder where
toJSON = toJSONText
data BasicChartSpecChartType
= BasicChartTypeUnspecified
| Bar
| Line
| Area
| Column
| Scatter
| Combo
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable BasicChartSpecChartType
instance FromHttpApiData BasicChartSpecChartType where
parseQueryParam = \case
"BASIC_CHART_TYPE_UNSPECIFIED" -> Right BasicChartTypeUnspecified
"BAR" -> Right Bar
"LINE" -> Right Line
"AREA" -> Right Area
"COLUMN" -> Right Column
"SCATTER" -> Right Scatter
"COMBO" -> Right Combo
x -> Left ("Unable to parse BasicChartSpecChartType from: " <> x)
instance ToHttpApiData BasicChartSpecChartType where
toQueryParam = \case
BasicChartTypeUnspecified -> "BASIC_CHART_TYPE_UNSPECIFIED"
Bar -> "BAR"
Line -> "LINE"
Area -> "AREA"
Column -> "COLUMN"
Scatter -> "SCATTER"
Combo -> "COMBO"
instance FromJSON BasicChartSpecChartType where
parseJSON = parseJSONText "BasicChartSpecChartType"
instance ToJSON BasicChartSpecChartType where
toJSON = toJSONText
data Xgafv
= X1
| X2
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable Xgafv
instance FromHttpApiData Xgafv where
parseQueryParam = \case
"1" -> Right X1
"2" -> Right X2
x -> Left ("Unable to parse Xgafv from: " <> x)
instance ToHttpApiData Xgafv where
toQueryParam = \case
X1 -> "1"
X2 -> "2"
instance FromJSON Xgafv where
parseJSON = parseJSONText "Xgafv"
instance ToJSON Xgafv where
toJSON = toJSONText
data SpreadsheetPropertiesAutoRecalc
= RecalculationIntervalUnspecified
| OnChange
| Minute
| Hour
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable SpreadsheetPropertiesAutoRecalc
instance FromHttpApiData SpreadsheetPropertiesAutoRecalc where
parseQueryParam = \case
"RECALCULATION_INTERVAL_UNSPECIFIED" -> Right RecalculationIntervalUnspecified
"ON_CHANGE" -> Right OnChange
"MINUTE" -> Right Minute
"HOUR" -> Right Hour
x -> Left ("Unable to parse SpreadsheetPropertiesAutoRecalc from: " <> x)
instance ToHttpApiData SpreadsheetPropertiesAutoRecalc where
toQueryParam = \case
RecalculationIntervalUnspecified -> "RECALCULATION_INTERVAL_UNSPECIFIED"
OnChange -> "ON_CHANGE"
Minute -> "MINUTE"
Hour -> "HOUR"
instance FromJSON SpreadsheetPropertiesAutoRecalc where
parseJSON = parseJSONText "SpreadsheetPropertiesAutoRecalc"
instance ToJSON SpreadsheetPropertiesAutoRecalc where
toJSON = toJSONText
data CopyPasteRequestPasteOrientation
= Normal
| Transpose
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable CopyPasteRequestPasteOrientation
instance FromHttpApiData CopyPasteRequestPasteOrientation where
parseQueryParam = \case
"NORMAL" -> Right Normal
"TRANSPOSE" -> Right Transpose
x -> Left ("Unable to parse CopyPasteRequestPasteOrientation from: " <> x)
instance ToHttpApiData CopyPasteRequestPasteOrientation where
toQueryParam = \case
Normal -> "NORMAL"
Transpose -> "TRANSPOSE"
instance FromJSON CopyPasteRequestPasteOrientation where
parseJSON = parseJSONText "CopyPasteRequestPasteOrientation"
instance ToJSON CopyPasteRequestPasteOrientation where
toJSON = toJSONText
data PasteDataRequestType
= PDRTPasteNormal
| PDRTPasteValues
| PDRTPasteFormat
| PDRTPasteNoBOrders
| PDRTPasteFormula
| PDRTPasteDataValidation
| PDRTPasteConditionalFormatting
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable PasteDataRequestType
instance FromHttpApiData PasteDataRequestType where
parseQueryParam = \case
"PASTE_NORMAL" -> Right PDRTPasteNormal
"PASTE_VALUES" -> Right PDRTPasteValues
"PASTE_FORMAT" -> Right PDRTPasteFormat
"PASTE_NO_BORDERS" -> Right PDRTPasteNoBOrders
"PASTE_FORMULA" -> Right PDRTPasteFormula
"PASTE_DATA_VALIDATION" -> Right PDRTPasteDataValidation
"PASTE_CONDITIONAL_FORMATTING" -> Right PDRTPasteConditionalFormatting
x -> Left ("Unable to parse PasteDataRequestType from: " <> x)
instance ToHttpApiData PasteDataRequestType where
toQueryParam = \case
PDRTPasteNormal -> "PASTE_NORMAL"
PDRTPasteValues -> "PASTE_VALUES"
PDRTPasteFormat -> "PASTE_FORMAT"
PDRTPasteNoBOrders -> "PASTE_NO_BORDERS"
PDRTPasteFormula -> "PASTE_FORMULA"
PDRTPasteDataValidation -> "PASTE_DATA_VALIDATION"
PDRTPasteConditionalFormatting -> "PASTE_CONDITIONAL_FORMATTING"
instance FromJSON PasteDataRequestType where
parseJSON = parseJSONText "PasteDataRequestType"
instance ToJSON PasteDataRequestType where
toJSON = toJSONText
data CellFormatTextDirection
= TextDirectionUnspecified
| LeftToRight
| RightToLeft
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable CellFormatTextDirection
instance FromHttpApiData CellFormatTextDirection where
parseQueryParam = \case
"TEXT_DIRECTION_UNSPECIFIED" -> Right TextDirectionUnspecified
"LEFT_TO_RIGHT" -> Right LeftToRight
"RIGHT_TO_LEFT" -> Right RightToLeft
x -> Left ("Unable to parse CellFormatTextDirection from: " <> x)
instance ToHttpApiData CellFormatTextDirection where
toQueryParam = \case
TextDirectionUnspecified -> "TEXT_DIRECTION_UNSPECIFIED"
LeftToRight -> "LEFT_TO_RIGHT"
RightToLeft -> "RIGHT_TO_LEFT"
instance FromJSON CellFormatTextDirection where
parseJSON = parseJSONText "CellFormatTextDirection"
instance ToJSON CellFormatTextDirection where
toJSON = toJSONText
data BasicChartSeriesType
= BCSTBasicChartTypeUnspecified
| BCSTBar
| BCSTLine
| BCSTArea
| BCSTColumn
| BCSTScatter
| BCSTCombo
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable BasicChartSeriesType
instance FromHttpApiData BasicChartSeriesType where
parseQueryParam = \case
"BASIC_CHART_TYPE_UNSPECIFIED" -> Right BCSTBasicChartTypeUnspecified
"BAR" -> Right BCSTBar
"LINE" -> Right BCSTLine
"AREA" -> Right BCSTArea
"COLUMN" -> Right BCSTColumn
"SCATTER" -> Right BCSTScatter
"COMBO" -> Right BCSTCombo
x -> Left ("Unable to parse BasicChartSeriesType from: " <> x)
instance ToHttpApiData BasicChartSeriesType where
toQueryParam = \case
BCSTBasicChartTypeUnspecified -> "BASIC_CHART_TYPE_UNSPECIFIED"
BCSTBar -> "BAR"
BCSTLine -> "LINE"
BCSTArea -> "AREA"
BCSTColumn -> "COLUMN"
BCSTScatter -> "SCATTER"
BCSTCombo -> "COMBO"
instance FromJSON BasicChartSeriesType where
parseJSON = parseJSONText "BasicChartSeriesType"
instance ToJSON BasicChartSeriesType where
toJSON = toJSONText
data ChartSpecHiddenDimensionStrategy
= ChartHiddenDimensionStrategyUnspecified
| SkipHiddenRowsAndColumns
| SkipHiddenRows
| SkipHiddenColumns
| ShowAll
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable ChartSpecHiddenDimensionStrategy
instance FromHttpApiData ChartSpecHiddenDimensionStrategy where
parseQueryParam = \case
"CHART_HIDDEN_DIMENSION_STRATEGY_UNSPECIFIED" -> Right ChartHiddenDimensionStrategyUnspecified
"SKIP_HIDDEN_ROWS_AND_COLUMNS" -> Right SkipHiddenRowsAndColumns
"SKIP_HIDDEN_ROWS" -> Right SkipHiddenRows
"SKIP_HIDDEN_COLUMNS" -> Right SkipHiddenColumns
"SHOW_ALL" -> Right ShowAll
x -> Left ("Unable to parse ChartSpecHiddenDimensionStrategy from: " <> x)
instance ToHttpApiData ChartSpecHiddenDimensionStrategy where
toQueryParam = \case
ChartHiddenDimensionStrategyUnspecified -> "CHART_HIDDEN_DIMENSION_STRATEGY_UNSPECIFIED"
SkipHiddenRowsAndColumns -> "SKIP_HIDDEN_ROWS_AND_COLUMNS"
SkipHiddenRows -> "SKIP_HIDDEN_ROWS"
SkipHiddenColumns -> "SKIP_HIDDEN_COLUMNS"
ShowAll -> "SHOW_ALL"
instance FromJSON ChartSpecHiddenDimensionStrategy where
parseJSON = parseJSONText "ChartSpecHiddenDimensionStrategy"
instance ToJSON ChartSpecHiddenDimensionStrategy where
toJSON = toJSONText
data BOrderStyle
= StyleUnspecified
| Dotted
| Dashed
| Solid
| SolidMedium
| SolidThick
| None
| Double
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable BOrderStyle
instance FromHttpApiData BOrderStyle where
parseQueryParam = \case
"STYLE_UNSPECIFIED" -> Right StyleUnspecified
"DOTTED" -> Right Dotted
"DASHED" -> Right Dashed
"SOLID" -> Right Solid
"SOLID_MEDIUM" -> Right SolidMedium
"SOLID_THICK" -> Right SolidThick
"NONE" -> Right None
"DOUBLE" -> Right Double
x -> Left ("Unable to parse BOrderStyle from: " <> x)
instance ToHttpApiData BOrderStyle where
toQueryParam = \case
StyleUnspecified -> "STYLE_UNSPECIFIED"
Dotted -> "DOTTED"
Dashed -> "DASHED"
Solid -> "SOLID"
SolidMedium -> "SOLID_MEDIUM"
SolidThick -> "SOLID_THICK"
None -> "NONE"
Double -> "DOUBLE"
instance FromJSON BOrderStyle where
parseJSON = parseJSONText "BOrderStyle"
instance ToJSON BOrderStyle where
toJSON = toJSONText
data CutPasteRequestPasteType
= CPRPTPasteNormal
| CPRPTPasteValues
| CPRPTPasteFormat
| CPRPTPasteNoBOrders
| CPRPTPasteFormula
| CPRPTPasteDataValidation
| CPRPTPasteConditionalFormatting
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable CutPasteRequestPasteType
instance FromHttpApiData CutPasteRequestPasteType where
parseQueryParam = \case
"PASTE_NORMAL" -> Right CPRPTPasteNormal
"PASTE_VALUES" -> Right CPRPTPasteValues
"PASTE_FORMAT" -> Right CPRPTPasteFormat
"PASTE_NO_BORDERS" -> Right CPRPTPasteNoBOrders
"PASTE_FORMULA" -> Right CPRPTPasteFormula
"PASTE_DATA_VALIDATION" -> Right CPRPTPasteDataValidation
"PASTE_CONDITIONAL_FORMATTING" -> Right CPRPTPasteConditionalFormatting
x -> Left ("Unable to parse CutPasteRequestPasteType from: " <> x)
instance ToHttpApiData CutPasteRequestPasteType where
toQueryParam = \case
CPRPTPasteNormal -> "PASTE_NORMAL"
CPRPTPasteValues -> "PASTE_VALUES"
CPRPTPasteFormat -> "PASTE_FORMAT"
CPRPTPasteNoBOrders -> "PASTE_NO_BORDERS"
CPRPTPasteFormula -> "PASTE_FORMULA"
CPRPTPasteDataValidation -> "PASTE_DATA_VALIDATION"
CPRPTPasteConditionalFormatting -> "PASTE_CONDITIONAL_FORMATTING"
instance FromJSON CutPasteRequestPasteType where
parseJSON = parseJSONText "CutPasteRequestPasteType"
instance ToJSON CutPasteRequestPasteType where
toJSON = toJSONText
data BasicChartSpecLegendPosition
= BCSLPBasicChartLegendPositionUnspecified
| BCSLPBottomLegend
| BCSLPLeftLegend
| BCSLPRightLegend
| BCSLPTopLegend
| BCSLPNoLegend
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable BasicChartSpecLegendPosition
instance FromHttpApiData BasicChartSpecLegendPosition where
parseQueryParam = \case
"BASIC_CHART_LEGEND_POSITION_UNSPECIFIED" -> Right BCSLPBasicChartLegendPositionUnspecified
"BOTTOM_LEGEND" -> Right BCSLPBottomLegend
"LEFT_LEGEND" -> Right BCSLPLeftLegend
"RIGHT_LEGEND" -> Right BCSLPRightLegend
"TOP_LEGEND" -> Right BCSLPTopLegend
"NO_LEGEND" -> Right BCSLPNoLegend
x -> Left ("Unable to parse BasicChartSpecLegendPosition from: " <> x)
instance ToHttpApiData BasicChartSpecLegendPosition where
toQueryParam = \case
BCSLPBasicChartLegendPositionUnspecified -> "BASIC_CHART_LEGEND_POSITION_UNSPECIFIED"
BCSLPBottomLegend -> "BOTTOM_LEGEND"
BCSLPLeftLegend -> "LEFT_LEGEND"
BCSLPRightLegend -> "RIGHT_LEGEND"
BCSLPTopLegend -> "TOP_LEGEND"
BCSLPNoLegend -> "NO_LEGEND"
instance FromJSON BasicChartSpecLegendPosition where
parseJSON = parseJSONText "BasicChartSpecLegendPosition"
instance ToJSON BasicChartSpecLegendPosition where
toJSON = toJSONText
data ErrorValueType
= ErrorTypeUnspecified
| Error'
| NullValue
| DivideByZero
| Value
| Ref
| Name
| Num
| NA
| Loading
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable ErrorValueType
instance FromHttpApiData ErrorValueType where
parseQueryParam = \case
"ERROR_TYPE_UNSPECIFIED" -> Right ErrorTypeUnspecified
"ERROR" -> Right Error'
"NULL_VALUE" -> Right NullValue
"DIVIDE_BY_ZERO" -> Right DivideByZero
"VALUE" -> Right Value
"REF" -> Right Ref
"NAME" -> Right Name
"NUM" -> Right Num
"N_A" -> Right NA
"LOADING" -> Right Loading
x -> Left ("Unable to parse ErrorValueType from: " <> x)
instance ToHttpApiData ErrorValueType where
toQueryParam = \case
ErrorTypeUnspecified -> "ERROR_TYPE_UNSPECIFIED"
Error' -> "ERROR"
NullValue -> "NULL_VALUE"
DivideByZero -> "DIVIDE_BY_ZERO"
Value -> "VALUE"
Ref -> "REF"
Name -> "NAME"
Num -> "NUM"
NA -> "N_A"
Loading -> "LOADING"
instance FromJSON ErrorValueType where
parseJSON = parseJSONText "ErrorValueType"
instance ToJSON ErrorValueType where
toJSON = toJSONText
data PivotTableValueLayout
= Horizontal
| Vertical
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable PivotTableValueLayout
instance FromHttpApiData PivotTableValueLayout where
parseQueryParam = \case
"HORIZONTAL" -> Right Horizontal
"VERTICAL" -> Right Vertical
x -> Left ("Unable to parse PivotTableValueLayout from: " <> x)
instance ToHttpApiData PivotTableValueLayout where
toQueryParam = \case
Horizontal -> "HORIZONTAL"
Vertical -> "VERTICAL"
instance FromJSON PivotTableValueLayout where
parseJSON = parseJSONText "PivotTableValueLayout"
instance ToJSON PivotTableValueLayout where
toJSON = toJSONText
data InterpolationPointType
= IPTInterpolationPointTypeUnspecified
| IPTMin
| IPTMax
| IPTNumber
| IPTPercent
| IPTPercentile
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable InterpolationPointType
instance FromHttpApiData InterpolationPointType where
parseQueryParam = \case
"INTERPOLATION_POINT_TYPE_UNSPECIFIED" -> Right IPTInterpolationPointTypeUnspecified
"MIN" -> Right IPTMin
"MAX" -> Right IPTMax
"NUMBER" -> Right IPTNumber
"PERCENT" -> Right IPTPercent
"PERCENTILE" -> Right IPTPercentile
x -> Left ("Unable to parse InterpolationPointType from: " <> x)
instance ToHttpApiData InterpolationPointType where
toQueryParam = \case
IPTInterpolationPointTypeUnspecified -> "INTERPOLATION_POINT_TYPE_UNSPECIFIED"
IPTMin -> "MIN"
IPTMax -> "MAX"
IPTNumber -> "NUMBER"
IPTPercent -> "PERCENT"
IPTPercentile -> "PERCENTILE"
instance FromJSON InterpolationPointType where
parseJSON = parseJSONText "InterpolationPointType"
instance ToJSON InterpolationPointType where
toJSON = toJSONText
data TextToColumnsRequestDelimiterType
= TTCRDTDelimiterTypeUnspecified
| TTCRDTComma
| TTCRDTSemicolon
| TTCRDTPeriod
| TTCRDTSpace
| TTCRDTCustom
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable TextToColumnsRequestDelimiterType
instance FromHttpApiData TextToColumnsRequestDelimiterType where
parseQueryParam = \case
"DELIMITER_TYPE_UNSPECIFIED" -> Right TTCRDTDelimiterTypeUnspecified
"COMMA" -> Right TTCRDTComma
"SEMICOLON" -> Right TTCRDTSemicolon
"PERIOD" -> Right TTCRDTPeriod
"SPACE" -> Right TTCRDTSpace
"CUSTOM" -> Right TTCRDTCustom
x -> Left ("Unable to parse TextToColumnsRequestDelimiterType from: " <> x)
instance ToHttpApiData TextToColumnsRequestDelimiterType where
toQueryParam = \case
TTCRDTDelimiterTypeUnspecified -> "DELIMITER_TYPE_UNSPECIFIED"
TTCRDTComma -> "COMMA"
TTCRDTSemicolon -> "SEMICOLON"
TTCRDTPeriod -> "PERIOD"
TTCRDTSpace -> "SPACE"
TTCRDTCustom -> "CUSTOM"
instance FromJSON TextToColumnsRequestDelimiterType where
parseJSON = parseJSONText "TextToColumnsRequestDelimiterType"
instance ToJSON TextToColumnsRequestDelimiterType where
toJSON = toJSONText
data InsertRangeRequestShiftDimension
= IRRSDDimensionUnspecified
| IRRSDRows
| IRRSDColumns
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable InsertRangeRequestShiftDimension
instance FromHttpApiData InsertRangeRequestShiftDimension where
parseQueryParam = \case
"DIMENSION_UNSPECIFIED" -> Right IRRSDDimensionUnspecified
"ROWS" -> Right IRRSDRows
"COLUMNS" -> Right IRRSDColumns
x -> Left ("Unable to parse InsertRangeRequestShiftDimension from: " <> x)
instance ToHttpApiData InsertRangeRequestShiftDimension where
toQueryParam = \case
IRRSDDimensionUnspecified -> "DIMENSION_UNSPECIFIED"
IRRSDRows -> "ROWS"
IRRSDColumns -> "COLUMNS"
instance FromJSON InsertRangeRequestShiftDimension where
parseJSON = parseJSONText "InsertRangeRequestShiftDimension"
instance ToJSON InsertRangeRequestShiftDimension where
toJSON = toJSONText