@@ -959,6 +959,56 @@ instance ToJSON AutoResizeDimensionsRequest where
960 (catMaybes [("dimensions" .=) <$> _ardrDimensions])
960 (catMaybes [("dimensions" .=) <$> _ardrDimensions])
962+-- | Deletes a range of cells, shifting other cells into the deleted area.
964+-- /See:/ 'deleteRangeRequest' smart constructor.
965+data DeleteRangeRequest = DeleteRangeRequest'
966+ { _drrShiftDimension :: !(Maybe DeleteRangeRequestShiftDimension)
967+ , _drrRange :: !(Maybe GridRange)
968+ } deriving (Eq,Show,Data,Typeable,Generic)
970+-- | Creates a value of 'DeleteRangeRequest' with the minimum fields required to make a request.
972+-- Use one of the following lenses to modify other fields as desired:
974+-- * 'drrShiftDimension'
978+ :: DeleteRangeRequest
981+ { _drrShiftDimension = Nothing
982+ , _drrRange = Nothing
985+-- | The dimension from which deleted cells will be replaced with. If ROWS,
986+-- existing cells will be shifted upward to replace the deleted cells. If
987+-- COLUMNS, existing cells will be shifted left to replace the deleted
989+drrShiftDimension :: Lens' DeleteRangeRequest (Maybe DeleteRangeRequestShiftDimension)
991+ = lens _drrShiftDimension
992+ (\ s a -> s{_drrShiftDimension = a})
994+-- | The range of cells to delete.
995+drrRange :: Lens' DeleteRangeRequest (Maybe GridRange)
996+drrRange = lens _drrRange (\ s a -> s{_drrRange = a})
998+instance FromJSON DeleteRangeRequest where
1000+ = withObject "DeleteRangeRequest"
1002+ DeleteRangeRequest' <$>
1003+ (o .:? "shiftDimension") <*> (o .:? "range"))
1005+instance ToJSON DeleteRangeRequest where
1006+ toJSON DeleteRangeRequest'{..}
1009+ [("shiftDimension" .=) <$> _drrShiftDimension,
1010+ ("range" .=) <$> _drrRange])
962-- | A sheet in a spreadsheet.
1012-- | A sheet in a spreadsheet.
964-- /See:/ 'sheet' smart constructor.
1014-- /See:/ 'sheet' smart constructor.
@@ -966,6 +1016,7 @@ data Sheet = Sheet'
966 { _sData :: !(Maybe [GridData])
1016 { _sData :: !(Maybe [GridData])
967 , _sMerges :: !(Maybe [GridRange])
1017 , _sMerges :: !(Maybe [GridRange])
968 , _sProtectedRanges :: !(Maybe [ProtectedRange])
1018 , _sProtectedRanges :: !(Maybe [ProtectedRange])
1019+ , _sBandedRanges :: !(Maybe [BandedRange])
969 , _sCharts :: !(Maybe [EmbeddedChart])
1020 , _sCharts :: !(Maybe [EmbeddedChart])
970 , _sBasicFilter :: !(Maybe BasicFilter)
1021 , _sBasicFilter :: !(Maybe BasicFilter)
971 , _sConditionalFormats :: !(Maybe [ConditionalFormatRule])
1022 , _sConditionalFormats :: !(Maybe [ConditionalFormatRule])
@@ -983,6 +1034,8 @@ data Sheet = Sheet'
984-- * 'sProtectedRanges'
1035-- * 'sProtectedRanges'
1037+-- * 'sBandedRanges'
986-- * 'sCharts'
1039-- * 'sCharts'
988-- * 'sBasicFilter'
1041-- * 'sBasicFilter'
@@ -999,6 +1052,7 @@ sheet =
999 { _sData = Nothing
1052 { _sData = Nothing
1000 , _sMerges = Nothing
1053 , _sMerges = Nothing
1001 , _sProtectedRanges = Nothing
1054 , _sProtectedRanges = Nothing
1055+ , _sBandedRanges = Nothing
1002 , _sCharts = Nothing
1056 , _sCharts = Nothing
1003 , _sBasicFilter = Nothing
1057 , _sBasicFilter = Nothing
1004 , _sConditionalFormats = Nothing
1058 , _sConditionalFormats = Nothing
@@ -1033,6 +1087,14 @@ sProtectedRanges
1033 . _Default
1087 . _Default
1034 . _Coerce
1088 . _Coerce
1090+-- | The banded (i.e. alternating colors) ranges on this sheet.
1091+sBandedRanges :: Lens' Sheet [BandedRange]
1093+ = lens _sBandedRanges
1094+ (\ s a -> s{_sBandedRanges = a})
1036-- | The specifications of every chart on this sheet.
1098-- | The specifications of every chart on this sheet.
1037sCharts :: Lens' Sheet [EmbeddedChart]
1099sCharts :: Lens' Sheet [EmbeddedChart]
@@ -1072,6 +1134,7 @@ instance FromJSON Sheet where
1072 (o .:? "data" .!= mempty) <*>
1134 (o .:? "data" .!= mempty) <*>
1073 (o .:? "merges" .!= mempty)
1135 (o .:? "merges" .!= mempty)
1074 <*> (o .:? "protectedRanges" .!= mempty)
1136 <*> (o .:? "protectedRanges" .!= mempty)
1137+ <*> (o .:? "bandedRanges" .!= mempty)
1075 <*> (o .:? "charts" .!= mempty)
1138 <*> (o .:? "charts" .!= mempty)
1076 <*> (o .:? "basicFilter")
1139 <*> (o .:? "basicFilter")
1077 <*> (o .:? "conditionalFormats" .!= mempty)
1140 <*> (o .:? "conditionalFormats" .!= mempty)
@@ -1084,6 +1147,7 @@ instance ToJSON Sheet where
1084 (catMaybes
1147 (catMaybes
1085 [("data" .=) <$> _sData, ("merges" .=) <$> _sMerges,
1148 [("data" .=) <$> _sData, ("merges" .=) <$> _sMerges,
1086 ("protectedRanges" .=) <$> _sProtectedRanges,
1149 ("protectedRanges" .=) <$> _sProtectedRanges,
1150+ ("bandedRanges" .=) <$> _sBandedRanges,
1087 ("charts" .=) <$> _sCharts,
1151 ("charts" .=) <$> _sCharts,
1088 ("basicFilter" .=) <$> _sBasicFilter,
1152 ("basicFilter" .=) <$> _sBasicFilter,
1089 ("conditionalFormats" .=) <$> _sConditionalFormats,
1153 ("conditionalFormats" .=) <$> _sConditionalFormats,
@@ -2825,6 +2889,7 @@ data Response = Response'
2825 , _rUpdateConditionalFormatRule :: !(Maybe UpdateConditionalFormatRuleResponse)
2889 , _rUpdateConditionalFormatRule :: !(Maybe UpdateConditionalFormatRuleResponse)
2826 , _rAddNamedRange :: !(Maybe AddNamedRangeResponse)
2890 , _rAddNamedRange :: !(Maybe AddNamedRangeResponse)
2827 , _rAddChart :: !(Maybe AddChartResponse)
2891 , _rAddChart :: !(Maybe AddChartResponse)
2892+ , _rAddBanding :: !(Maybe AddBandingResponse)
2828 , _rDuplicateSheet :: !(Maybe DuplicateSheetResponse)
2893 , _rDuplicateSheet :: !(Maybe DuplicateSheetResponse)
2829 } deriving (Eq,Show,Data,Typeable,Generic)
2894 } deriving (Eq,Show,Data,Typeable,Generic)
@@ -2852,6 +2917,8 @@ data Response = Response'
2853-- * 'rAddChart'
2918-- * 'rAddChart'
2855-- * 'rDuplicateSheet'
2922-- * 'rDuplicateSheet'
2857 :: Response
2924 :: Response
@@ -2867,6 +2934,7 @@ response =
2867 , _rUpdateConditionalFormatRule = Nothing
2934 , _rUpdateConditionalFormatRule = Nothing
2868 , _rAddNamedRange = Nothing
2935 , _rAddNamedRange = Nothing
2869 , _rAddChart = Nothing
2936 , _rAddChart = Nothing
2937+ , _rAddBanding = Nothing
2870 , _rDuplicateSheet = Nothing
2938 , _rDuplicateSheet = Nothing
@@ -2927,6 +2995,11 @@ rAddChart :: Lens' Response (Maybe AddChartResponse)
2927rAddChart
2995rAddChart
2928 = lens _rAddChart (\ s a -> s{_rAddChart = a})
2996 = lens _rAddChart (\ s a -> s{_rAddChart = a})
2998+-- | A reply from adding a banded range.
2999+rAddBanding :: Lens' Response (Maybe AddBandingResponse)
3001+ = lens _rAddBanding (\ s a -> s{_rAddBanding = a})
2930-- | A reply from duplicating a sheet.
3003-- | A reply from duplicating a sheet.
2931rDuplicateSheet :: Lens' Response (Maybe DuplicateSheetResponse)
3004rDuplicateSheet :: Lens' Response (Maybe DuplicateSheetResponse)
2932rDuplicateSheet
3005rDuplicateSheet
@@ -2948,6 +3021,7 @@ instance FromJSON Response where
2948 <*> (o .:? "updateConditionalFormatRule")
3021 <*> (o .:? "updateConditionalFormatRule")
2949 <*> (o .:? "addNamedRange")
3022 <*> (o .:? "addNamedRange")
2950 <*> (o .:? "addChart")
3023 <*> (o .:? "addChart")
3024+ <*> (o .:? "addBanding")
2951 <*> (o .:? "duplicateSheet"))
3025 <*> (o .:? "duplicateSheet"))
2953instance ToJSON Response where
3027instance ToJSON Response where
@@ -2967,6 +3041,7 @@ instance ToJSON Response where
2967 _rUpdateConditionalFormatRule,
3041 _rUpdateConditionalFormatRule,
2968 ("addNamedRange" .=) <$> _rAddNamedRange,
3042 ("addNamedRange" .=) <$> _rAddNamedRange,
2969 ("addChart" .=) <$> _rAddChart,
3043 ("addChart" .=) <$> _rAddChart,
3044+ ("addBanding" .=) <$> _rAddBanding,
2970 ("duplicateSheet" .=) <$> _rDuplicateSheet])
3045 ("duplicateSheet" .=) <$> _rDuplicateSheet])
2972-- | Criteria for showing\/hiding rows in a filter or filter view.
3047-- | Criteria for showing\/hiding rows in a filter or filter view.
@@ -3412,7 +3487,13 @@ sRightToLeft
3413-- | The index of the sheet within the spreadsheet. When adding or updating
3488-- | The index of the sheet within the spreadsheet. When adding or updating
3414-- sheet properties, if this field is excluded then the sheet will be added
3489-- sheet properties, if this field is excluded then the sheet will be added
3415−-- or moved to the end of the sheet list.
3490+-- or moved to the end of the sheet list. When updating sheet indices or
3491+-- inserting sheets, movement is considered in \"before the move\" indexes.
3492+-- For example, if there were 3 sheets (S1, S2, S3) in order to move S1
3493+-- ahead of S2 the index would have to be set to 2. A sheet index update
3494+-- request will be ignored if the requested index is identical to the
3495+-- sheets current index or if the requested new index is equal to the
3496+-- current sheet index + 1.
3416sIndex :: Lens' SheetProperties (Maybe Int32)
3497sIndex :: Lens' SheetProperties (Maybe Int32)
3418 = lens _sIndex (\ s a -> s{_sIndex = a}) .
3499 = lens _sIndex (\ s a -> s{_sIndex = a}) .
@@ -3641,10 +3722,11 @@ instance ToJSON UpdateSheetPropertiesRequest where
3642-- /See:/ 'spreadsheet' smart constructor.
3723-- /See:/ 'spreadsheet' smart constructor.
3643data Spreadsheet = Spreadsheet'
3724data Spreadsheet = Spreadsheet'
3644− { _sprSheets :: !(Maybe [Sheet])
3725+ { _sprSheets :: !(Maybe [Sheet])
3645− , _sprNamedRanges :: !(Maybe [NamedRange])
3726+ , _sprNamedRanges :: !(Maybe [NamedRange])
3646− , _sprSpreadsheetId :: !(Maybe Text)
3727+ , _sprSpreadsheetId :: !(Maybe Text)
3728+ , _sprSpreadsheetURL :: !(Maybe Text)
3647− , _sprProperties :: !(Maybe SpreadsheetProperties)
3729+ , _sprProperties :: !(Maybe SpreadsheetProperties)
3648 } deriving (Eq,Show,Data,Typeable,Generic)
3730 } deriving (Eq,Show,Data,Typeable,Generic)
3650-- | Creates a value of 'Spreadsheet' with the minimum fields required to make a request.
3732-- | Creates a value of 'Spreadsheet' with the minimum fields required to make a request.
@@ -3657,6 +3739,8 @@ data Spreadsheet = Spreadsheet'
3658-- * 'sprSpreadsheetId'
3740-- * 'sprSpreadsheetId'
3742+-- * 'sprSpreadsheetURL'
3660-- * 'sprProperties'
3744-- * 'sprProperties'
3661spreadsheet
3745spreadsheet
3662 :: Spreadsheet
3746 :: Spreadsheet
@@ -3665,6 +3749,7 @@ spreadsheet =
3665 { _sprSheets = Nothing
3749 { _sprSheets = Nothing
3666 , _sprNamedRanges = Nothing
3750 , _sprNamedRanges = Nothing
3667 , _sprSpreadsheetId = Nothing
3751 , _sprSpreadsheetId = Nothing
3752+ , _sprSpreadsheetURL = Nothing
3668 , _sprProperties = Nothing
3753 , _sprProperties = Nothing
@@ -3689,6 +3774,12 @@ sprSpreadsheetId
3689 = lens _sprSpreadsheetId
3774 = lens _sprSpreadsheetId
3690 (\ s a -> s{_sprSpreadsheetId = a})
3775 (\ s a -> s{_sprSpreadsheetId = a})
3777+-- | The url of the spreadsheet. This field is read-only.
3778+sprSpreadsheetURL :: Lens' Spreadsheet (Maybe Text)
3780+ = lens _sprSpreadsheetURL
3781+ (\ s a -> s{_sprSpreadsheetURL = a})
3692-- | Overall properties of a spreadsheet.
3783-- | Overall properties of a spreadsheet.
3693sprProperties :: Lens' Spreadsheet (Maybe SpreadsheetProperties)
3784sprProperties :: Lens' Spreadsheet (Maybe SpreadsheetProperties)
3694sprProperties
3785sprProperties
@@ -3703,6 +3794,7 @@ instance FromJSON Spreadsheet where
3703 (o .:? "sheets" .!= mempty) <*>
3794 (o .:? "sheets" .!= mempty) <*>
3704 (o .:? "namedRanges" .!= mempty)
3795 (o .:? "namedRanges" .!= mempty)
3705 <*> (o .:? "spreadsheetId")
3796 <*> (o .:? "spreadsheetId")
3797+ <*> (o .:? "spreadsheetUrl")
3706 <*> (o .:? "properties"))
3798 <*> (o .:? "properties"))
3708instance ToJSON Spreadsheet where
3800instance ToJSON Spreadsheet where
@@ -3712,6 +3804,7 @@ instance ToJSON Spreadsheet where
3712 [("sheets" .=) <$> _sprSheets,
3804 [("sheets" .=) <$> _sprSheets,
3713 ("namedRanges" .=) <$> _sprNamedRanges,
3805 ("namedRanges" .=) <$> _sprNamedRanges,
3714 ("spreadsheetId" .=) <$> _sprSpreadsheetId,
3806 ("spreadsheetId" .=) <$> _sprSpreadsheetId,
3807+ ("spreadsheetUrl" .=) <$> _sprSpreadsheetURL,
3715 ("properties" .=) <$> _sprProperties])
3808 ("properties" .=) <$> _sprProperties])
3717-- | Inserts rows or columns in a sheet at a particular index.
3810-- | Inserts rows or columns in a sheet at a particular index.
@@ -4310,6 +4403,43 @@ instance FromJSON BasicFilterCriteria where
4310instance ToJSON BasicFilterCriteria where
4403instance ToJSON BasicFilterCriteria where
4311 toJSON = toJSON . _bfcAddtional
4404 toJSON = toJSON . _bfcAddtional
4406+-- | Adds a new banded range to the spreadsheet.
4408+-- /See:/ 'addBandingRequest' smart constructor.
4409+newtype AddBandingRequest = AddBandingRequest'
4410+ { _abrBandedRange :: Maybe BandedRange
4411+ } deriving (Eq,Show,Data,Typeable,Generic)
4413+-- | Creates a value of 'AddBandingRequest' with the minimum fields required to make a request.
4415+-- Use one of the following lenses to modify other fields as desired:
4417+-- * 'abrBandedRange'
4419+ :: AddBandingRequest
4422+ { _abrBandedRange = Nothing
4425+-- | The banded range to add. The bandedRangeId field is optional; if one is
4426+-- not set, an id will be randomly generated. (It is an error to specify
4427+-- the ID of a range that already exists.)
4428+abrBandedRange :: Lens' AddBandingRequest (Maybe BandedRange)
4430+ = lens _abrBandedRange
4431+ (\ s a -> s{_abrBandedRange = a})
4433+instance FromJSON AddBandingRequest where
4435+ = withObject "AddBandingRequest"
4436+ (\ o -> AddBandingRequest' <$> (o .:? "bandedRange"))
4438+instance ToJSON AddBandingRequest where
4439+ toJSON AddBandingRequest'{..}
4441+ (catMaybes [("bandedRange" .=) <$> _abrBandedRange])
4313-- | Updates properties of dimensions within the specified range.
4443-- | Updates properties of dimensions within the specified range.
4315-- /See:/ 'updateDimensionPropertiesRequest' smart constructor.
4445-- /See:/ 'updateDimensionPropertiesRequest' smart constructor.
@@ -4593,8 +4723,11 @@ instance ToJSON DuplicateFilterViewResponse where
4594-- /See:/ 'batchUpdateValuesRequest' smart constructor.
4724-- /See:/ 'batchUpdateValuesRequest' smart constructor.
4595data BatchUpdateValuesRequest = BatchUpdateValuesRequest'
4725data BatchUpdateValuesRequest = BatchUpdateValuesRequest'
4596− { _buvrData :: !(Maybe [ValueRange])
4726+ { _buvrData :: !(Maybe [ValueRange])
4597− , _buvrValueInputOption :: !(Maybe BatchUpdateValuesRequestValueInputOption)
4727+ , _buvrValueInputOption :: !(Maybe BatchUpdateValuesRequestValueInputOption)
4728+ , _buvrIncludeValuesInResponse :: !(Maybe Bool)
4729+ , _buvrResponseDateTimeRenderOption :: !(Maybe BatchUpdateValuesRequestResponseDateTimeRenderOption)
4730+ , _buvrResponseValueRenderOption :: !(Maybe BatchUpdateValuesRequestResponseValueRenderOption)
4598 } deriving (Eq,Show,Data,Typeable,Generic)
4731 } deriving (Eq,Show,Data,Typeable,Generic)
4600-- | Creates a value of 'BatchUpdateValuesRequest' with the minimum fields required to make a request.
4733-- | Creates a value of 'BatchUpdateValuesRequest' with the minimum fields required to make a request.
@@ -4604,12 +4737,21 @@ data BatchUpdateValuesRequest = BatchUpdateValuesRequest'
4604-- * 'buvrData'
4737-- * 'buvrData'
4606-- * 'buvrValueInputOption'
4739-- * 'buvrValueInputOption'
4741+-- * 'buvrIncludeValuesInResponse'
4743+-- * 'buvrResponseDateTimeRenderOption'
4745+-- * 'buvrResponseValueRenderOption'
4607batchUpdateValuesRequest
4746batchUpdateValuesRequest
4608 :: BatchUpdateValuesRequest
4747 :: BatchUpdateValuesRequest
4609batchUpdateValuesRequest =
4748batchUpdateValuesRequest =
4610 BatchUpdateValuesRequest'
4749 BatchUpdateValuesRequest'
4611 { _buvrData = Nothing
4750 { _buvrData = Nothing
4612 , _buvrValueInputOption = Nothing
4751 , _buvrValueInputOption = Nothing
4752+ , _buvrIncludeValuesInResponse = Nothing
4753+ , _buvrResponseDateTimeRenderOption = Nothing
4754+ , _buvrResponseValueRenderOption = Nothing
4615-- | The new values to apply to the spreadsheet.
4757-- | The new values to apply to the spreadsheet.
@@ -4625,20 +4767,57 @@ buvrValueInputOption
4625 = lens _buvrValueInputOption
4767 = lens _buvrValueInputOption
4626 (\ s a -> s{_buvrValueInputOption = a})
4768 (\ s a -> s{_buvrValueInputOption = a})
4770+-- | Determines if the update response should include the values of the cells
4771+-- that were updated. By default, responses do not include the updated
4772+-- values. The \`updatedData\` field within each of the
4773+-- BatchUpdateValuesResponse.responses will contain the updated values. If
4774+-- the range to write was larger than than the range actually written, the
4775+-- response will include all values in the requested range (excluding
4776+-- trailing empty rows and columns).
4777+buvrIncludeValuesInResponse :: Lens' BatchUpdateValuesRequest (Maybe Bool)
4778+buvrIncludeValuesInResponse
4779+ = lens _buvrIncludeValuesInResponse
4780+ (\ s a -> s{_buvrIncludeValuesInResponse = a})
4782+-- | Determines how dates, times, and durations in the response should be
4783+-- rendered. This is ignored if response_value_render_option is
4784+-- FORMATTED_VALUE. The default dateTime render option is
4785+-- [DateTimeRenderOption.SERIAL_NUMBER].
4786+buvrResponseDateTimeRenderOption :: Lens' BatchUpdateValuesRequest (Maybe BatchUpdateValuesRequestResponseDateTimeRenderOption)
4787+buvrResponseDateTimeRenderOption
4788+ = lens _buvrResponseDateTimeRenderOption
4789+ (\ s a -> s{_buvrResponseDateTimeRenderOption = a})
4791+-- | Determines how values in the response should be rendered. The default
4792+-- render option is ValueRenderOption.FORMATTED_VALUE.
4793+buvrResponseValueRenderOption :: Lens' BatchUpdateValuesRequest (Maybe BatchUpdateValuesRequestResponseValueRenderOption)
4794+buvrResponseValueRenderOption
4795+ = lens _buvrResponseValueRenderOption
4796+ (\ s a -> s{_buvrResponseValueRenderOption = a})
4628instance FromJSON BatchUpdateValuesRequest where
4798instance FromJSON BatchUpdateValuesRequest where
4629 parseJSON
4799 parseJSON
4630 = withObject "BatchUpdateValuesRequest"
4800 = withObject "BatchUpdateValuesRequest"
4632 BatchUpdateValuesRequest' <$>
4802 BatchUpdateValuesRequest' <$>
4633 (o .:? "data" .!= mempty) <*>
4803 (o .:? "data" .!= mempty) <*>
4634− (o .:? "valueInputOption"))
4804+ (o .:? "valueInputOption")
4805+ <*> (o .:? "includeValuesInResponse")
4806+ <*> (o .:? "responseDateTimeRenderOption")
4807+ <*> (o .:? "responseValueRenderOption"))
4636instance ToJSON BatchUpdateValuesRequest where
4809instance ToJSON BatchUpdateValuesRequest where
4637 toJSON BatchUpdateValuesRequest'{..}
4810 toJSON BatchUpdateValuesRequest'{..}
4638 = object
4811 = object
4639 (catMaybes
4812 (catMaybes
4640 [("data" .=) <$> _buvrData,
4813 [("data" .=) <$> _buvrData,
4641− ("valueInputOption" .=) <$> _buvrValueInputOption])
4814+ ("valueInputOption" .=) <$> _buvrValueInputOption,
4815+ ("includeValuesInResponse" .=) <$>
4816+ _buvrIncludeValuesInResponse,
4817+ ("responseDateTimeRenderOption" .=) <$>
4818+ _buvrResponseDateTimeRenderOption,
4819+ ("responseValueRenderOption" .=) <$>
4820+ _buvrResponseValueRenderOption])
4643-- | Adds a chart to a sheet in the spreadsheet.
4822-- | Adds a chart to a sheet in the spreadsheet.
@@ -5367,6 +5546,82 @@ instance ToJSON DeleteSheetRequest where
5367 toJSON DeleteSheetRequest'{..}
5546 toJSON DeleteSheetRequest'{..}
5368 = object (catMaybes [("sheetId" .=) <$> _dsrSheetId])
5547 = object (catMaybes [("sheetId" .=) <$> _dsrSheetId])
5549+-- | A banded (alternating colors) range in a sheet.
5551+-- /See:/ 'bandedRange' smart constructor.
5552+data BandedRange = BandedRange'
5553+ { _brBandedRangeId :: !(Maybe (Textual Int32))
5554+ , _brRowProperties :: !(Maybe BandingProperties)
5555+ , _brRange :: !(Maybe GridRange)
5556+ , _brColumnProperties :: !(Maybe BandingProperties)
5557+ } deriving (Eq,Show,Data,Typeable,Generic)
5559+-- | Creates a value of 'BandedRange' with the minimum fields required to make a request.
5561+-- Use one of the following lenses to modify other fields as desired:
5563+-- * 'brBandedRangeId'
5565+-- * 'brRowProperties'
5569+-- * 'brColumnProperties'
5574+ { _brBandedRangeId = Nothing
5575+ , _brRowProperties = Nothing
5576+ , _brRange = Nothing
5577+ , _brColumnProperties = Nothing
5580+-- | The id of the banded range.
5581+brBandedRangeId :: Lens' BandedRange (Maybe Int32)
5583+ = lens _brBandedRangeId
5584+ (\ s a -> s{_brBandedRangeId = a})
5587+-- | Properties for row bands. These properties will be applied on a
5588+-- row-by-row basis throughout all the rows in the range. At least one of
5589+-- row_properties or column_properties must be specified.
5590+brRowProperties :: Lens' BandedRange (Maybe BandingProperties)
5592+ = lens _brRowProperties
5593+ (\ s a -> s{_brRowProperties = a})
5595+-- | The range over which these properties are applied.
5596+brRange :: Lens' BandedRange (Maybe GridRange)
5597+brRange = lens _brRange (\ s a -> s{_brRange = a})
5599+-- | Properties for column bands. These properties will be applied on a
5600+-- column- by-column basis throughout all the columns in the range. At
5601+-- least one of row_properties or column_properties must be specified.
5602+brColumnProperties :: Lens' BandedRange (Maybe BandingProperties)
5604+ = lens _brColumnProperties
5605+ (\ s a -> s{_brColumnProperties = a})
5607+instance FromJSON BandedRange where
5609+ = withObject "BandedRange"
5612+ (o .:? "bandedRangeId") <*> (o .:? "rowProperties")
5613+ <*> (o .:? "range")
5614+ <*> (o .:? "columnProperties"))
5616+instance ToJSON BandedRange where
5617+ toJSON BandedRange'{..}
5620+ [("bandedRangeId" .=) <$> _brBandedRangeId,
5621+ ("rowProperties" .=) <$> _brRowProperties,
5622+ ("range" .=) <$> _brRange,
5623+ ("columnProperties" .=) <$> _brColumnProperties])
5370-- | Updates the borders of a range. If a field is not set in the request,
5625-- | Updates the borders of a range. If a field is not set in the request,
5371-- that means the border remains as-is. For example, with two subsequent
5626-- that means the border remains as-is. For example, with two subsequent
5372-- UpdateBordersRequest: 1. range: A1:A5 \`{ top: RED, bottom: WHITE }\` 2.
5627-- UpdateBordersRequest: 1. range: A1:A5 \`{ top: RED, bottom: WHITE }\` 2.
@@ -5919,22 +6174,51 @@ instance ToJSON TextToColumnsRequest where
5919-- | The request for updating any aspect of a spreadsheet.
6174-- | The request for updating any aspect of a spreadsheet.
5921-- /See:/ 'batchUpdateSpreadsheetRequest' smart constructor.
6176-- /See:/ 'batchUpdateSpreadsheetRequest' smart constructor.
5922−newtype BatchUpdateSpreadsheetRequest = BatchUpdateSpreadsheetRequest'
6177+data BatchUpdateSpreadsheetRequest = BatchUpdateSpreadsheetRequest'
6178+ { _busrResponseIncludeGridData :: !(Maybe Bool)
6179+ , _busrResponseRanges :: !(Maybe [Text])
5923− { _busrRequests :: Maybe [Request']
6180+ , _busrRequests :: !(Maybe [Request'])
6181+ , _busrIncludeSpreadsheetInResponse :: !(Maybe Bool)
5924 } deriving (Eq,Show,Data,Typeable,Generic)
6182 } deriving (Eq,Show,Data,Typeable,Generic)
5926-- | Creates a value of 'BatchUpdateSpreadsheetRequest' with the minimum fields required to make a request.
6184-- | Creates a value of 'BatchUpdateSpreadsheetRequest' with the minimum fields required to make a request.
5928-- Use one of the following lenses to modify other fields as desired:
6186-- Use one of the following lenses to modify other fields as desired:
6188+-- * 'busrResponseIncludeGridData'
6190+-- * 'busrResponseRanges'
5930-- * 'busrRequests'
6192-- * 'busrRequests'
6194+-- * 'busrIncludeSpreadsheetInResponse'
5931batchUpdateSpreadsheetRequest
6195batchUpdateSpreadsheetRequest
5932 :: BatchUpdateSpreadsheetRequest
6196 :: BatchUpdateSpreadsheetRequest
5933batchUpdateSpreadsheetRequest =
6197batchUpdateSpreadsheetRequest =
5934 BatchUpdateSpreadsheetRequest'
6198 BatchUpdateSpreadsheetRequest'
6199+ { _busrResponseIncludeGridData = Nothing
6200+ , _busrResponseRanges = Nothing
5935− { _busrRequests = Nothing
6201+ , _busrRequests = Nothing
6202+ , _busrIncludeSpreadsheetInResponse = Nothing
6205+-- | True if grid data should be returned. Meaningful only if if
6206+-- include_spreadsheet_response is \'true\'. This parameter is ignored if a
6207+-- field mask was set in the request.
6208+busrResponseIncludeGridData :: Lens' BatchUpdateSpreadsheetRequest (Maybe Bool)
6209+busrResponseIncludeGridData
6210+ = lens _busrResponseIncludeGridData
6211+ (\ s a -> s{_busrResponseIncludeGridData = a})
6213+-- | Limits the ranges included in the response spreadsheet. Meaningful only
6214+-- if include_spreadsheet_response is \'true\'.
6215+busrResponseRanges :: Lens' BatchUpdateSpreadsheetRequest [Text]
6217+ = lens _busrResponseRanges
6218+ (\ s a -> s{_busrResponseRanges = a})
5938-- | A list of updates to apply to the spreadsheet.
6222-- | A list of updates to apply to the spreadsheet.
5939busrRequests :: Lens' BatchUpdateSpreadsheetRequest [Request']
6223busrRequests :: Lens' BatchUpdateSpreadsheetRequest [Request']
5940busrRequests
6224busrRequests
@@ -5942,17 +6226,33 @@ busrRequests
5942 . _Default
6226 . _Default
5943 . _Coerce
6227 . _Coerce
6229+-- | Determines if the update response should include the spreadsheet
6231+busrIncludeSpreadsheetInResponse :: Lens' BatchUpdateSpreadsheetRequest (Maybe Bool)
6232+busrIncludeSpreadsheetInResponse
6233+ = lens _busrIncludeSpreadsheetInResponse
6234+ (\ s a -> s{_busrIncludeSpreadsheetInResponse = a})
5945instance FromJSON BatchUpdateSpreadsheetRequest where
6236instance FromJSON BatchUpdateSpreadsheetRequest where
5946 parseJSON
6237 parseJSON
5947 = withObject "BatchUpdateSpreadsheetRequest"
6238 = withObject "BatchUpdateSpreadsheetRequest"
5949 BatchUpdateSpreadsheetRequest' <$>
6240 BatchUpdateSpreadsheetRequest' <$>
6241+ (o .:? "responseIncludeGridData") <*>
6242+ (o .:? "responseRanges" .!= mempty)
5950− (o .:? "requests" .!= mempty))
6243+ <*> (o .:? "requests" .!= mempty)
6244+ <*> (o .:? "includeSpreadsheetInResponse"))
5952instance ToJSON BatchUpdateSpreadsheetRequest where
6246instance ToJSON BatchUpdateSpreadsheetRequest where
5953 toJSON BatchUpdateSpreadsheetRequest'{..}
6247 toJSON BatchUpdateSpreadsheetRequest'{..}
5954 = object
6248 = object
6250+ [("responseIncludeGridData" .=) <$>
6251+ _busrResponseIncludeGridData,
6252+ ("responseRanges" .=) <$> _busrResponseRanges,
5955− (catMaybes [("requests" .=) <$> _busrRequests])
6253+ ("requests" .=) <$> _busrRequests,
6254+ ("includeSpreadsheetInResponse" .=) <$>
6255+ _busrIncludeSpreadsheetInResponse])
5957-- | The response when updating a range of values in a spreadsheet.
6257-- | The response when updating a range of values in a spreadsheet.
@@ -5962,6 +6262,7 @@ data UpdateValuesResponse = UpdateValuesResponse'
5962 , _uvrSpreadsheetId :: !(Maybe Text)
6262 , _uvrSpreadsheetId :: !(Maybe Text)
5963 , _uvrUpdatedRows :: !(Maybe (Textual Int32))
6263 , _uvrUpdatedRows :: !(Maybe (Textual Int32))
5964 , _uvrUpdatedRange :: !(Maybe Text)
6264 , _uvrUpdatedRange :: !(Maybe Text)
6265+ , _uvrUpdatedData :: !(Maybe ValueRange)
5965 , _uvrUpdatedColumns :: !(Maybe (Textual Int32))
6266 , _uvrUpdatedColumns :: !(Maybe (Textual Int32))
5966 } deriving (Eq,Show,Data,Typeable,Generic)
6267 } deriving (Eq,Show,Data,Typeable,Generic)
@@ -5977,6 +6278,8 @@ data UpdateValuesResponse = UpdateValuesResponse'
5978-- * 'uvrUpdatedRange'
6279-- * 'uvrUpdatedRange'
6281+-- * 'uvrUpdatedData'
5980-- * 'uvrUpdatedColumns'
6283-- * 'uvrUpdatedColumns'
5981updateValuesResponse
6284updateValuesResponse
5982 :: UpdateValuesResponse
6285 :: UpdateValuesResponse
@@ -5986,6 +6289,7 @@ updateValuesResponse =
5986 , _uvrSpreadsheetId = Nothing
6289 , _uvrSpreadsheetId = Nothing
5987 , _uvrUpdatedRows = Nothing
6290 , _uvrUpdatedRows = Nothing
5988 , _uvrUpdatedRange = Nothing
6291 , _uvrUpdatedRange = Nothing
6292+ , _uvrUpdatedData = Nothing
5989 , _uvrUpdatedColumns = Nothing
6293 , _uvrUpdatedColumns = Nothing
@@ -6015,6 +6319,14 @@ uvrUpdatedRange
6015 = lens _uvrUpdatedRange
6319 = lens _uvrUpdatedRange
6016 (\ s a -> s{_uvrUpdatedRange = a})
6320 (\ s a -> s{_uvrUpdatedRange = a})
6322+-- | The values of the cells after updates were applied. This is only
6323+-- included if the request\'s \`includeValuesInResponse\` field was
6325+uvrUpdatedData :: Lens' UpdateValuesResponse (Maybe ValueRange)
6327+ = lens _uvrUpdatedData
6328+ (\ s a -> s{_uvrUpdatedData = a})
6018-- | The number of columns where at least one cell in the column was updated.
6330-- | The number of columns where at least one cell in the column was updated.
6019uvrUpdatedColumns :: Lens' UpdateValuesResponse (Maybe Int32)
6331uvrUpdatedColumns :: Lens' UpdateValuesResponse (Maybe Int32)
6020uvrUpdatedColumns
6332uvrUpdatedColumns
@@ -6030,6 +6342,7 @@ instance FromJSON UpdateValuesResponse where
6030 (o .:? "updatedCells") <*> (o .:? "spreadsheetId")
6342 (o .:? "updatedCells") <*> (o .:? "spreadsheetId")
6031 <*> (o .:? "updatedRows")
6343 <*> (o .:? "updatedRows")
6032 <*> (o .:? "updatedRange")
6344 <*> (o .:? "updatedRange")
6345+ <*> (o .:? "updatedData")
6033 <*> (o .:? "updatedColumns"))
6346 <*> (o .:? "updatedColumns"))
6035instance ToJSON UpdateValuesResponse where
6348instance ToJSON UpdateValuesResponse where
@@ -6040,6 +6353,7 @@ instance ToJSON UpdateValuesResponse where
6040 ("spreadsheetId" .=) <$> _uvrSpreadsheetId,
6353 ("spreadsheetId" .=) <$> _uvrSpreadsheetId,
6041 ("updatedRows" .=) <$> _uvrUpdatedRows,
6354 ("updatedRows" .=) <$> _uvrUpdatedRows,
6042 ("updatedRange" .=) <$> _uvrUpdatedRange,
6355 ("updatedRange" .=) <$> _uvrUpdatedRange,
6356+ ("updatedData" .=) <$> _uvrUpdatedData,
6043 ("updatedColumns" .=) <$> _uvrUpdatedColumns])
6357 ("updatedColumns" .=) <$> _uvrUpdatedColumns])
6045-- | The request to copy a sheet across spreadsheets.
6359-- | The request to copy a sheet across spreadsheets.
@@ -6850,8 +7164,9 @@ instance ToJSON NumberFormat where
6851-- /See:/ 'batchUpdateSpreadsheetResponse' smart constructor.
7165-- /See:/ 'batchUpdateSpreadsheetResponse' smart constructor.
6852data BatchUpdateSpreadsheetResponse = BatchUpdateSpreadsheetResponse'
7166data BatchUpdateSpreadsheetResponse = BatchUpdateSpreadsheetResponse'
6853− { _busrSpreadsheetId :: !(Maybe Text)
7167+ { _busrSpreadsheetId :: !(Maybe Text)
6854− , _busrReplies :: !(Maybe [Response])
7168+ , _busrReplies :: !(Maybe [Response])
7169+ , _busrUpdatedSpreadsheet :: !(Maybe Spreadsheet)
6855 } deriving (Eq,Show,Data,Typeable,Generic)
7170 } deriving (Eq,Show,Data,Typeable,Generic)
6857-- | Creates a value of 'BatchUpdateSpreadsheetResponse' with the minimum fields required to make a request.
7172-- | Creates a value of 'BatchUpdateSpreadsheetResponse' with the minimum fields required to make a request.
@@ -6861,12 +7176,15 @@ data BatchUpdateSpreadsheetResponse = BatchUpdateSpreadsheetResponse'
6861-- * 'busrSpreadsheetId'
7176-- * 'busrSpreadsheetId'
6863-- * 'busrReplies'
7178-- * 'busrReplies'
7180+-- * 'busrUpdatedSpreadsheet'
6864batchUpdateSpreadsheetResponse
7181batchUpdateSpreadsheetResponse
6865 :: BatchUpdateSpreadsheetResponse
7182 :: BatchUpdateSpreadsheetResponse
6866batchUpdateSpreadsheetResponse =
7183batchUpdateSpreadsheetResponse =
6867 BatchUpdateSpreadsheetResponse'
7184 BatchUpdateSpreadsheetResponse'
6868 { _busrSpreadsheetId = Nothing
7185 { _busrSpreadsheetId = Nothing
6869 , _busrReplies = Nothing
7186 , _busrReplies = Nothing
7187+ , _busrUpdatedSpreadsheet = Nothing
6872-- | The spreadsheet the updates were applied to.
7190-- | The spreadsheet the updates were applied to.
@@ -6883,6 +7201,14 @@ busrReplies
6883 _Default
7201 _Default
6884 . _Coerce
7202 . _Coerce
7204+-- | The spreadsheet after updates were applied. This is only set if
7205+-- [BatchUpdateSpreadsheetRequest.include_spreadsheet_in_response] is
7207+busrUpdatedSpreadsheet :: Lens' BatchUpdateSpreadsheetResponse (Maybe Spreadsheet)
7208+busrUpdatedSpreadsheet
7209+ = lens _busrUpdatedSpreadsheet
7210+ (\ s a -> s{_busrUpdatedSpreadsheet = a})
6886instance FromJSON BatchUpdateSpreadsheetResponse
7212instance FromJSON BatchUpdateSpreadsheetResponse
6888 parseJSON
7214 parseJSON
@@ -6890,14 +7216,17 @@ instance FromJSON BatchUpdateSpreadsheetResponse
6891 BatchUpdateSpreadsheetResponse' <$>
7217 BatchUpdateSpreadsheetResponse' <$>
6892 (o .:? "spreadsheetId") <*>
7218 (o .:? "spreadsheetId") <*>
6893− (o .:? "replies" .!= mempty))
7219+ (o .:? "replies" .!= mempty)
7220+ <*> (o .:? "updatedSpreadsheet"))
6895instance ToJSON BatchUpdateSpreadsheetResponse where
7222instance ToJSON BatchUpdateSpreadsheetResponse where
6896 toJSON BatchUpdateSpreadsheetResponse'{..}
7223 toJSON BatchUpdateSpreadsheetResponse'{..}
6897 = object
7224 = object
6898 (catMaybes
7225 (catMaybes
6899 [("spreadsheetId" .=) <$> _busrSpreadsheetId,
7226 [("spreadsheetId" .=) <$> _busrSpreadsheetId,
6900− ("replies" .=) <$> _busrReplies])
7227+ ("replies" .=) <$> _busrReplies,
7228+ ("updatedSpreadsheet" .=) <$>
7229+ _busrUpdatedSpreadsheet])
6902-- | Sets a data validation rule to every cell in the range. To clear
7231-- | Sets a data validation rule to every cell in the range. To clear
6903-- validation in a range, call this with no rule specified.
7232-- validation in a range, call this with no rule specified.
@@ -6947,6 +7276,96 @@ instance ToJSON SetDataValidationRequest where
6947 [("rule" .=) <$> _sdvrRule,
7276 [("rule" .=) <$> _sdvrRule,
6948 ("range" .=) <$> _sdvrRange])
7277 ("range" .=) <$> _sdvrRange])
7279+-- | Properties referring a single dimension (either row or column). If both
7280+-- BandedRange.row_properties and BandedRange.column_properties are set,
7281+-- the fill colors are applied to cells according to the following rules: *
7282+-- header_color and footer_color take priority over band colors. *
7283+-- first_band_color takes priority over second_band_color. * row_properties
7284+-- takes priority over column_properties. For example, the first row color
7285+-- takes priority over the first column color, but the first column color
7286+-- takes priority over the second row color. Similarly, the row header
7287+-- takes priority over the column header in the top left cell, but the
7288+-- column header takes priority over the first row color if the row header
7291+-- /See:/ 'bandingProperties' smart constructor.
7292+data BandingProperties = BandingProperties'
7293+ { _bpSecondBandColor :: !(Maybe Color)
7294+ , _bpHeaderColor :: !(Maybe Color)
7295+ , _bpFooterColor :: !(Maybe Color)
7296+ , _bpFirstBandColor :: !(Maybe Color)
7297+ } deriving (Eq,Show,Data,Typeable,Generic)
7299+-- | Creates a value of 'BandingProperties' with the minimum fields required to make a request.
7301+-- Use one of the following lenses to modify other fields as desired:
7303+-- * 'bpSecondBandColor'
7305+-- * 'bpHeaderColor'
7307+-- * 'bpFooterColor'
7309+-- * 'bpFirstBandColor'
7311+ :: BandingProperties
7314+ { _bpSecondBandColor = Nothing
7315+ , _bpHeaderColor = Nothing
7316+ , _bpFooterColor = Nothing
7317+ , _bpFirstBandColor = Nothing
7320+-- | The second color that is alternating. (Required)
7321+bpSecondBandColor :: Lens' BandingProperties (Maybe Color)
7323+ = lens _bpSecondBandColor
7324+ (\ s a -> s{_bpSecondBandColor = a})
7326+-- | The color of the first row or column. If this field is set, the first
7327+-- row or column will be filled with this color and the colors will
7328+-- alternate between first_band_color and second_band_color starting from
7329+-- the second row or column. Otherwise, the first row or column will be
7330+-- filled with first_band_color and the colors will proceed to alternate as
7331+-- they normally would.
7332+bpHeaderColor :: Lens' BandingProperties (Maybe Color)
7334+ = lens _bpHeaderColor
7335+ (\ s a -> s{_bpHeaderColor = a})
7337+-- | The color of the last row or column. If this field is not set, the last
7338+-- row or column will be filled with either first_band_color or
7339+-- second_band_color, depending on the color of the previous row or column.
7340+bpFooterColor :: Lens' BandingProperties (Maybe Color)
7342+ = lens _bpFooterColor
7343+ (\ s a -> s{_bpFooterColor = a})
7345+-- | The first color that is alternating. (Required)
7346+bpFirstBandColor :: Lens' BandingProperties (Maybe Color)
7348+ = lens _bpFirstBandColor
7349+ (\ s a -> s{_bpFirstBandColor = a})
7351+instance FromJSON BandingProperties where
7353+ = withObject "BandingProperties"
7355+ BandingProperties' <$>
7356+ (o .:? "secondBandColor") <*> (o .:? "headerColor")
7357+ <*> (o .:? "footerColor")
7358+ <*> (o .:? "firstBandColor"))
7360+instance ToJSON BandingProperties where
7361+ toJSON BandingProperties'{..}
7364+ [("secondBandColor" .=) <$> _bpSecondBandColor,
7365+ ("headerColor" .=) <$> _bpHeaderColor,
7366+ ("footerColor" .=) <$> _bpFooterColor,
7367+ ("firstBandColor" .=) <$> _bpFirstBandColor])
6950-- | Duplicates a particular filter view.
7369-- | Duplicates a particular filter view.
6952-- /See:/ 'duplicateFilterViewRequest' smart constructor.
7371-- /See:/ 'duplicateFilterViewRequest' smart constructor.
@@ -7073,6 +7492,41 @@ instance ToJSON PivotGroup where
7073 ("showTotals" .=) <$> _pgShowTotals,
7492 ("showTotals" .=) <$> _pgShowTotals,
7074 ("valueBucket" .=) <$> _pgValueBucket])
7493 ("valueBucket" .=) <$> _pgValueBucket])
7495+-- | The result of adding a banded range.
7497+-- /See:/ 'addBandingResponse' smart constructor.
7498+newtype AddBandingResponse = AddBandingResponse'
7499+ { _aBandedRange :: Maybe BandedRange
7500+ } deriving (Eq,Show,Data,Typeable,Generic)
7502+-- | Creates a value of 'AddBandingResponse' with the minimum fields required to make a request.
7504+-- Use one of the following lenses to modify other fields as desired:
7508+ :: AddBandingResponse
7509+addBandingResponse =
7510+ AddBandingResponse'
7511+ { _aBandedRange = Nothing
7514+-- | The banded range that was added.
7515+aBandedRange :: Lens' AddBandingResponse (Maybe BandedRange)
7517+ = lens _aBandedRange (\ s a -> s{_aBandedRange = a})
7519+instance FromJSON AddBandingResponse where
7521+ = withObject "AddBandingResponse"
7523+ AddBandingResponse' <$> (o .:? "bandedRange"))
7525+instance ToJSON AddBandingResponse where
7526+ toJSON AddBandingResponse'{..}
7528+ (catMaybes [("bandedRange" .=) <$> _aBandedRange])
7076-- | A rule describing a conditional format.
7530-- | A rule describing a conditional format.
7078-- /See:/ 'conditionalFormatRule' smart constructor.
7532-- /See:/ 'conditionalFormatRule' smart constructor.
@@ -7517,6 +7971,55 @@ instance ToJSON BasicChartDomain where
7517 toJSON BasicChartDomain'{..}
7971 toJSON BasicChartDomain'{..}
7518 = object (catMaybes [("domain" .=) <$> _bcdDomain])
7972 = object (catMaybes [("domain" .=) <$> _bcdDomain])
7974+-- | Inserts cells into a range, shifting the existing cells over or down.
7976+-- /See:/ 'insertRangeRequest' smart constructor.
7977+data InsertRangeRequest = InsertRangeRequest'
7978+ { _irrShiftDimension :: !(Maybe InsertRangeRequestShiftDimension)
7979+ , _irrRange :: !(Maybe GridRange)
7980+ } deriving (Eq,Show,Data,Typeable,Generic)
7982+-- | Creates a value of 'InsertRangeRequest' with the minimum fields required to make a request.
7984+-- Use one of the following lenses to modify other fields as desired:
7986+-- * 'irrShiftDimension'
7990+ :: InsertRangeRequest
7991+insertRangeRequest =
7992+ InsertRangeRequest'
7993+ { _irrShiftDimension = Nothing
7994+ , _irrRange = Nothing
7997+-- | The dimension which will be shifted when inserting cells. If ROWS,
7998+-- existing cells will be shifted down. If COLUMNS, existing cells will be
8000+irrShiftDimension :: Lens' InsertRangeRequest (Maybe InsertRangeRequestShiftDimension)
8002+ = lens _irrShiftDimension
8003+ (\ s a -> s{_irrShiftDimension = a})
8005+-- | The range to insert new cells into.
8006+irrRange :: Lens' InsertRangeRequest (Maybe GridRange)
8007+irrRange = lens _irrRange (\ s a -> s{_irrRange = a})
8009+instance FromJSON InsertRangeRequest where
8011+ = withObject "InsertRangeRequest"
8013+ InsertRangeRequest' <$>
8014+ (o .:? "shiftDimension") <*> (o .:? "range"))
8016+instance ToJSON InsertRangeRequest where
8017+ toJSON InsertRangeRequest'{..}
8020+ [("shiftDimension" .=) <$> _irrShiftDimension,
8021+ ("range" .=) <$> _irrRange])
7520-- | The amount of padding around the cell, in pixels. When updating padding,
8023-- | The amount of padding around the cell, in pixels. When updating padding,
7521-- every field must be specified.
8024-- every field must be specified.
@@ -7721,6 +8224,56 @@ instance ToJSON DimensionProperties where
7721 ("pixelSize" .=) <$> _dpPixelSize,
8224 ("pixelSize" .=) <$> _dpPixelSize,
7722 ("hiddenByUser" .=) <$> _dpHiddenByUser])
8225 ("hiddenByUser" .=) <$> _dpHiddenByUser])
8227+-- | Updates properties of the supplied banded range.
8229+-- /See:/ 'updateBandingRequest' smart constructor.
8230+data UpdateBandingRequest = UpdateBandingRequest'
8231+ { _ubrBandedRange :: !(Maybe BandedRange)
8232+ , _ubrFields :: !(Maybe FieldMask)
8233+ } deriving (Eq,Show,Data,Typeable,Generic)
8235+-- | Creates a value of 'UpdateBandingRequest' with the minimum fields required to make a request.
8237+-- Use one of the following lenses to modify other fields as desired:
8239+-- * 'ubrBandedRange'
8242+updateBandingRequest
8243+ :: UpdateBandingRequest
8244+updateBandingRequest =
8245+ UpdateBandingRequest'
8246+ { _ubrBandedRange = Nothing
8247+ , _ubrFields = Nothing
8250+-- | The banded range to update with the new properties.
8251+ubrBandedRange :: Lens' UpdateBandingRequest (Maybe BandedRange)
8253+ = lens _ubrBandedRange
8254+ (\ s a -> s{_ubrBandedRange = a})
8256+-- | The fields that should be updated. At least one field must be specified.
8257+-- The root \`bandedRange\` is implied and should not be specified. A
8258+-- single \`\"*\"\` can be used as short-hand for listing every field.
8259+ubrFields :: Lens' UpdateBandingRequest (Maybe FieldMask)
8261+ = lens _ubrFields (\ s a -> s{_ubrFields = a})
8263+instance FromJSON UpdateBandingRequest where
8265+ = withObject "UpdateBandingRequest"
8267+ UpdateBandingRequest' <$>
8268+ (o .:? "bandedRange") <*> (o .:? "fields"))
8270+instance ToJSON UpdateBandingRequest where
8271+ toJSON UpdateBandingRequest'{..}
8274+ [("bandedRange" .=) <$> _ubrBandedRange,
8275+ ("fields" .=) <$> _ubrFields])
7724-- | The response when retrieving more than one range of values in a
8277-- | The response when retrieving more than one range of values in a
7725-- spreadsheet.
8278-- spreadsheet.
@@ -7775,6 +8328,44 @@ instance ToJSON BatchGetValuesResponse where
7775 [("spreadsheetId" .=) <$> _bgvrSpreadsheetId,
8328 [("spreadsheetId" .=) <$> _bgvrSpreadsheetId,
7776 ("valueRanges" .=) <$> _bgvrValueRanges])
8329 ("valueRanges" .=) <$> _bgvrValueRanges])
8331+-- | Removes the banded range with the given ID from the spreadsheet.
8333+-- /See:/ 'deleteBandingRequest' smart constructor.
8334+newtype DeleteBandingRequest = DeleteBandingRequest'
8335+ { _dbrBandedRangeId :: Maybe (Textual Int32)
8336+ } deriving (Eq,Show,Data,Typeable,Generic)
8338+-- | Creates a value of 'DeleteBandingRequest' with the minimum fields required to make a request.
8340+-- Use one of the following lenses to modify other fields as desired:
8342+-- * 'dbrBandedRangeId'
8343+deleteBandingRequest
8344+ :: DeleteBandingRequest
8345+deleteBandingRequest =
8346+ DeleteBandingRequest'
8347+ { _dbrBandedRangeId = Nothing
8350+-- | The ID of the banded range to delete.
8351+dbrBandedRangeId :: Lens' DeleteBandingRequest (Maybe Int32)
8353+ = lens _dbrBandedRangeId
8354+ (\ s a -> s{_dbrBandedRangeId = a})
8357+instance FromJSON DeleteBandingRequest where
8359+ = withObject "DeleteBandingRequest"
8361+ DeleteBandingRequest' <$> (o .:? "bandedRangeId"))
8363+instance ToJSON DeleteBandingRequest where
8364+ toJSON DeleteBandingRequest'{..}
8367+ [("bandedRangeId" .=) <$> _dbrBandedRangeId])
7778-- | A single kind of update to apply to a spreadsheet.
8369-- | A single kind of update to apply to a spreadsheet.
7780-- /See:/ 'request'' smart constructor.
8371-- /See:/ 'request'' smart constructor.
@@ -7788,10 +8379,14 @@ data Request' = Request''
7788 , _reqSortRange :: !(Maybe SortRangeRequest)
8379 , _reqSortRange :: !(Maybe SortRangeRequest)
7789 , _reqUpdateNamedRange :: !(Maybe UpdateNamedRangeRequest)
8380 , _reqUpdateNamedRange :: !(Maybe UpdateNamedRangeRequest)
7790 , _reqDeleteNamedRange :: !(Maybe DeleteNamedRangeRequest)
8381 , _reqDeleteNamedRange :: !(Maybe DeleteNamedRangeRequest)
8382+ , _reqInsertRange :: !(Maybe InsertRangeRequest)
8383+ , _reqDeleteBanding :: !(Maybe DeleteBandingRequest)
8384+ , _reqUpdateBanding :: !(Maybe UpdateBandingRequest)
7791 , _reqClearBasicFilter :: !(Maybe ClearBasicFilterRequest)
8385 , _reqClearBasicFilter :: !(Maybe ClearBasicFilterRequest)
7792 , _reqAppendCells :: !(Maybe AppendCellsRequest)
8386 , _reqAppendCells :: !(Maybe AppendCellsRequest)
7793 , _reqPasteData :: !(Maybe PasteDataRequest)
8387 , _reqPasteData :: !(Maybe PasteDataRequest)
7794 , _reqUpdateEmbeddedObjectPosition :: !(Maybe UpdateEmbeddedObjectPositionRequest)
8388 , _reqUpdateEmbeddedObjectPosition :: !(Maybe UpdateEmbeddedObjectPositionRequest)
8389+ , _reqDeleteRange :: !(Maybe DeleteRangeRequest)
7795 , _reqCopyPaste :: !(Maybe CopyPasteRequest)
8390 , _reqCopyPaste :: !(Maybe CopyPasteRequest)
7796 , _reqAutoResizeDimensions :: !(Maybe AutoResizeDimensionsRequest)
8391 , _reqAutoResizeDimensions :: !(Maybe AutoResizeDimensionsRequest)
7797 , _reqAddSheet :: !(Maybe AddSheetRequest)
8392 , _reqAddSheet :: !(Maybe AddSheetRequest)
@@ -7811,6 +8406,7 @@ data Request' = Request''
7811 , _reqMergeCells :: !(Maybe MergeCellsRequest)
8406 , _reqMergeCells :: !(Maybe MergeCellsRequest)
7812 , _reqAddNamedRange :: !(Maybe AddNamedRangeRequest)
8407 , _reqAddNamedRange :: !(Maybe AddNamedRangeRequest)
7813 , _reqAddChart :: !(Maybe AddChartRequest)
8408 , _reqAddChart :: !(Maybe AddChartRequest)
8409+ , _reqAddBanding :: !(Maybe AddBandingRequest)
7814 , _reqDuplicateSheet :: !(Maybe DuplicateSheetRequest)
8410 , _reqDuplicateSheet :: !(Maybe DuplicateSheetRequest)
7815 , _reqAutoFill :: !(Maybe AutoFillRequest)
8411 , _reqAutoFill :: !(Maybe AutoFillRequest)
7816 , _reqUpdateDimensionProperties :: !(Maybe UpdateDimensionPropertiesRequest)
8412 , _reqUpdateDimensionProperties :: !(Maybe UpdateDimensionPropertiesRequest)
@@ -7847,6 +8443,12 @@ data Request' = Request''
7848-- * 'reqDeleteNamedRange'
8444-- * 'reqDeleteNamedRange'
8446+-- * 'reqInsertRange'
8448+-- * 'reqDeleteBanding'
8450+-- * 'reqUpdateBanding'
7850-- * 'reqClearBasicFilter'
8452-- * 'reqClearBasicFilter'
7852-- * 'reqAppendCells'
8454-- * 'reqAppendCells'
@@ -7855,6 +8457,8 @@ data Request' = Request''
7856-- * 'reqUpdateEmbeddedObjectPosition'
8458-- * 'reqUpdateEmbeddedObjectPosition'
8460+-- * 'reqDeleteRange'
7858-- * 'reqCopyPaste'
8462-- * 'reqCopyPaste'
7860-- * 'reqAutoResizeDimensions'
8464-- * 'reqAutoResizeDimensions'
@@ -7893,6 +8497,8 @@ data Request' = Request''
7894-- * 'reqAddChart'
8498-- * 'reqAddChart'
8500+-- * 'reqAddBanding'
7896-- * 'reqDuplicateSheet'
8502-- * 'reqDuplicateSheet'
7898-- * 'reqAutoFill'
8504-- * 'reqAutoFill'
@@ -7929,10 +8535,14 @@ request' =
7929 , _reqSortRange = Nothing
8535 , _reqSortRange = Nothing
7930 , _reqUpdateNamedRange = Nothing
8536 , _reqUpdateNamedRange = Nothing
7931 , _reqDeleteNamedRange = Nothing
8537 , _reqDeleteNamedRange = Nothing
8538+ , _reqInsertRange = Nothing
8539+ , _reqDeleteBanding = Nothing
8540+ , _reqUpdateBanding = Nothing
7932 , _reqClearBasicFilter = Nothing
8541 , _reqClearBasicFilter = Nothing
7933 , _reqAppendCells = Nothing
8542 , _reqAppendCells = Nothing
7934 , _reqPasteData = Nothing
8543 , _reqPasteData = Nothing
7935 , _reqUpdateEmbeddedObjectPosition = Nothing
8544 , _reqUpdateEmbeddedObjectPosition = Nothing
8545+ , _reqDeleteRange = Nothing
7936 , _reqCopyPaste = Nothing
8546 , _reqCopyPaste = Nothing
7937 , _reqAutoResizeDimensions = Nothing
8547 , _reqAutoResizeDimensions = Nothing
7938 , _reqAddSheet = Nothing
8548 , _reqAddSheet = Nothing
@@ -7952,6 +8562,7 @@ request' =
7952 , _reqMergeCells = Nothing
8562 , _reqMergeCells = Nothing
7953 , _reqAddNamedRange = Nothing
8563 , _reqAddNamedRange = Nothing
7954 , _reqAddChart = Nothing
8564 , _reqAddChart = Nothing
8565+ , _reqAddBanding = Nothing
7955 , _reqDuplicateSheet = Nothing
8566 , _reqDuplicateSheet = Nothing
7956 , _reqAutoFill = Nothing
8567 , _reqAutoFill = Nothing
7957 , _reqUpdateDimensionProperties = Nothing
8568 , _reqUpdateDimensionProperties = Nothing
@@ -8019,6 +8630,24 @@ reqDeleteNamedRange
8019 = lens _reqDeleteNamedRange
8630 = lens _reqDeleteNamedRange
8020 (\ s a -> s{_reqDeleteNamedRange = a})
8631 (\ s a -> s{_reqDeleteNamedRange = a})
8633+-- | Inserts new cells in a sheet, shifting the existing cells.
8634+reqInsertRange :: Lens' Request' (Maybe InsertRangeRequest)
8636+ = lens _reqInsertRange
8637+ (\ s a -> s{_reqInsertRange = a})
8639+-- | Removes a banded range
8640+reqDeleteBanding :: Lens' Request' (Maybe DeleteBandingRequest)
8642+ = lens _reqDeleteBanding
8643+ (\ s a -> s{_reqDeleteBanding = a})
8645+-- | Updates a banded range
8646+reqUpdateBanding :: Lens' Request' (Maybe UpdateBandingRequest)
8648+ = lens _reqUpdateBanding
8649+ (\ s a -> s{_reqUpdateBanding = a})
8022-- | Clears the basic filter on a sheet.
8651-- | Clears the basic filter on a sheet.
8023reqClearBasicFilter :: Lens' Request' (Maybe ClearBasicFilterRequest)
8652reqClearBasicFilter :: Lens' Request' (Maybe ClearBasicFilterRequest)
8024reqClearBasicFilter
8653reqClearBasicFilter
@@ -8042,6 +8671,12 @@ reqUpdateEmbeddedObjectPosition
8042 = lens _reqUpdateEmbeddedObjectPosition
8671 = lens _reqUpdateEmbeddedObjectPosition
8043 (\ s a -> s{_reqUpdateEmbeddedObjectPosition = a})
8672 (\ s a -> s{_reqUpdateEmbeddedObjectPosition = a})
8674+-- | Deletes a range of cells from a sheet, shifting the remaining cells.
8675+reqDeleteRange :: Lens' Request' (Maybe DeleteRangeRequest)
8677+ = lens _reqDeleteRange
8678+ (\ s a -> s{_reqDeleteRange = a})
8045-- | Copies data from one area and pastes it to another.
8680-- | Copies data from one area and pastes it to another.
8046reqCopyPaste :: Lens' Request' (Maybe CopyPasteRequest)
8681reqCopyPaste :: Lens' Request' (Maybe CopyPasteRequest)
8047reqCopyPaste
8682reqCopyPaste
@@ -8153,6 +8788,12 @@ reqAddChart :: Lens' Request' (Maybe AddChartRequest)
8153reqAddChart
8788reqAddChart
8154 = lens _reqAddChart (\ s a -> s{_reqAddChart = a})
8789 = lens _reqAddChart (\ s a -> s{_reqAddChart = a})
8791+-- | Adds a new banded range
8792+reqAddBanding :: Lens' Request' (Maybe AddBandingRequest)
8794+ = lens _reqAddBanding
8795+ (\ s a -> s{_reqAddBanding = a})
8156-- | Duplicates a sheet.
8797-- | Duplicates a sheet.
8157reqDuplicateSheet :: Lens' Request' (Maybe DuplicateSheetRequest)
8798reqDuplicateSheet :: Lens' Request' (Maybe DuplicateSheetRequest)
8158reqDuplicateSheet
8799reqDuplicateSheet
@@ -8238,10 +8879,14 @@ instance FromJSON Request' where
8238 <*> (o .:? "sortRange")
8879 <*> (o .:? "sortRange")
8239 <*> (o .:? "updateNamedRange")
8880 <*> (o .:? "updateNamedRange")
8240 <*> (o .:? "deleteNamedRange")
8881 <*> (o .:? "deleteNamedRange")
8882+ <*> (o .:? "insertRange")
8883+ <*> (o .:? "deleteBanding")
8884+ <*> (o .:? "updateBanding")
8241 <*> (o .:? "clearBasicFilter")
8885 <*> (o .:? "clearBasicFilter")
8242 <*> (o .:? "appendCells")
8886 <*> (o .:? "appendCells")
8243 <*> (o .:? "pasteData")
8887 <*> (o .:? "pasteData")
8244 <*> (o .:? "updateEmbeddedObjectPosition")
8888 <*> (o .:? "updateEmbeddedObjectPosition")
8889+ <*> (o .:? "deleteRange")
8245 <*> (o .:? "copyPaste")
8890 <*> (o .:? "copyPaste")
8246 <*> (o .:? "autoResizeDimensions")
8891 <*> (o .:? "autoResizeDimensions")
8247 <*> (o .:? "addSheet")
8892 <*> (o .:? "addSheet")
@@ -8261,6 +8906,7 @@ instance FromJSON Request' where
8261 <*> (o .:? "mergeCells")
8906 <*> (o .:? "mergeCells")
8262 <*> (o .:? "addNamedRange")
8907 <*> (o .:? "addNamedRange")
8263 <*> (o .:? "addChart")
8908 <*> (o .:? "addChart")
8909+ <*> (o .:? "addBanding")
8264 <*> (o .:? "duplicateSheet")
8910 <*> (o .:? "duplicateSheet")
8265 <*> (o .:? "autoFill")
8911 <*> (o .:? "autoFill")
8266 <*> (o .:? "updateDimensionProperties")
8912 <*> (o .:? "updateDimensionProperties")
@@ -8291,11 +8937,15 @@ instance ToJSON Request' where
8291 ("sortRange" .=) <$> _reqSortRange,
8937 ("sortRange" .=) <$> _reqSortRange,
8292 ("updateNamedRange" .=) <$> _reqUpdateNamedRange,
8938 ("updateNamedRange" .=) <$> _reqUpdateNamedRange,
8293 ("deleteNamedRange" .=) <$> _reqDeleteNamedRange,
8939 ("deleteNamedRange" .=) <$> _reqDeleteNamedRange,
8940+ ("insertRange" .=) <$> _reqInsertRange,
8941+ ("deleteBanding" .=) <$> _reqDeleteBanding,
8942+ ("updateBanding" .=) <$> _reqUpdateBanding,
8294 ("clearBasicFilter" .=) <$> _reqClearBasicFilter,
8943 ("clearBasicFilter" .=) <$> _reqClearBasicFilter,
8295 ("appendCells" .=) <$> _reqAppendCells,
8944 ("appendCells" .=) <$> _reqAppendCells,
8296 ("pasteData" .=) <$> _reqPasteData,
8945 ("pasteData" .=) <$> _reqPasteData,
8297 ("updateEmbeddedObjectPosition" .=) <$>
8946 ("updateEmbeddedObjectPosition" .=) <$>
8298 _reqUpdateEmbeddedObjectPosition,
8947 _reqUpdateEmbeddedObjectPosition,
8948+ ("deleteRange" .=) <$> _reqDeleteRange,
8299 ("copyPaste" .=) <$> _reqCopyPaste,
8949 ("copyPaste" .=) <$> _reqCopyPaste,
8300 ("autoResizeDimensions" .=) <$>
8950 ("autoResizeDimensions" .=) <$>
8301 _reqAutoResizeDimensions,
8951 _reqAutoResizeDimensions,
@@ -8320,6 +8970,7 @@ instance ToJSON Request' where
8320 ("mergeCells" .=) <$> _reqMergeCells,
8970 ("mergeCells" .=) <$> _reqMergeCells,
8321 ("addNamedRange" .=) <$> _reqAddNamedRange,
8971 ("addNamedRange" .=) <$> _reqAddNamedRange,
8322 ("addChart" .=) <$> _reqAddChart,
8972 ("addChart" .=) <$> _reqAddChart,
8973+ ("addBanding" .=) <$> _reqAddBanding,
8323 ("duplicateSheet" .=) <$> _reqDuplicateSheet,
8974 ("duplicateSheet" .=) <$> _reqDuplicateSheet,
8324 ("autoFill" .=) <$> _reqAutoFill,
8975 ("autoFill" .=) <$> _reqAutoFill,
8325 ("updateDimensionProperties" .=) <$>
8976 ("updateDimensionProperties" .=) <$>