@@ -102,12 +102,12 @@ instance ToJSON Empty where
102102-- /See:/ 'report' smart constructor.
103103data Report = Report'
104104 { _rJobId :: !(Maybe Text)
105− , _rStartTime :: !(Maybe Text)
105+ , _rStartTime :: !(Maybe DateTime')
106106 , _rDownloadURL :: !(Maybe Text)
107− , _rEndTime :: !(Maybe Text)
107+ , _rEndTime :: !(Maybe DateTime')
108108 , _rId :: !(Maybe Text)
109− , _rCreateTime :: !(Maybe Text)
110− , _rJobExpireTime :: !(Maybe Text)
109+ , _rCreateTime :: !(Maybe DateTime')
110+ , _rJobExpireTime :: !(Maybe DateTime')
111111 } deriving (Eq,Show,Data,Typeable,Generic)
112112
113113-- | Creates a value of 'Report' with the minimum fields required to make a request.
@@ -146,9 +146,10 @@ rJobId = lens _rJobId (\ s a -> s{_rJobId = a})
146146
147147-- | The start of the time period that the report instance covers. The value
148148-- is inclusive.
149−rStartTime :: Lens' Report (Maybe Text)
149+rStartTime :: Lens' Report (Maybe UTCTime)
150150rStartTime
151− = lens _rStartTime (\ s a -> s{_rStartTime = a})
151+ = lens _rStartTime (\ s a -> s{_rStartTime = a}) .
152+ mapping _DateTime
152153
153154-- | The URL from which the report can be downloaded (max. 1000 characters).
154155rDownloadURL :: Lens' Report (Maybe Text)
@@ -157,23 +158,27 @@ rDownloadURL
157158
158159-- | The end of the time period that the report instance covers. The value is
159160-- exclusive.
160−rEndTime :: Lens' Report (Maybe Text)
161−rEndTime = lens _rEndTime (\ s a -> s{_rEndTime = a})
161+rEndTime :: Lens' Report (Maybe UTCTime)
162+rEndTime
163+ = lens _rEndTime (\ s a -> s{_rEndTime = a}) .
164+ mapping _DateTime
162165
163166-- | The server-generated ID of the report.
164167rId :: Lens' Report (Maybe Text)
165168rId = lens _rId (\ s a -> s{_rId = a})
166169
167170-- | The date\/time when this report was created.
168−rCreateTime :: Lens' Report (Maybe Text)
171+rCreateTime :: Lens' Report (Maybe UTCTime)
169172rCreateTime
170− = lens _rCreateTime (\ s a -> s{_rCreateTime = a})
173+ = lens _rCreateTime (\ s a -> s{_rCreateTime = a}) .
174+ mapping _DateTime
171175
172176-- | The date\/time when the job this report belongs to will expire\/expired.
173−rJobExpireTime :: Lens' Report (Maybe Text)
177+rJobExpireTime :: Lens' Report (Maybe UTCTime)
174178rJobExpireTime
175179 = lens _rJobExpireTime
176180 (\ s a -> s{_rJobExpireTime = a})
181+ . mapping _DateTime
177182
178183instance FromJSON Report where
179184 parseJSON
@@ -295,8 +300,8 @@ data Job = Job'
295300 , _jId :: !(Maybe Text)
296301 , _jSystemManaged :: !(Maybe Bool)
297302 , _jReportTypeId :: !(Maybe Text)
298− , _jExpireTime :: !(Maybe Text)
299− , _jCreateTime :: !(Maybe Text)
303+ , _jExpireTime :: !(Maybe DateTime')
304+ , _jCreateTime :: !(Maybe DateTime')
300305 } deriving (Eq,Show,Data,Typeable,Generic)
301306
302307-- | Creates a value of 'Job' with the minimum fields required to make a request.
@@ -350,14 +355,16 @@ jReportTypeId
350355
351356-- | The date\/time when this job will expire\/expired. After a job expired,
352357-- no new reports are generated.
353−jExpireTime :: Lens' Job (Maybe Text)
358+jExpireTime :: Lens' Job (Maybe UTCTime)
354359jExpireTime
355− = lens _jExpireTime (\ s a -> s{_jExpireTime = a})
360+ = lens _jExpireTime (\ s a -> s{_jExpireTime = a}) .
361+ mapping _DateTime
356362
357363-- | The creation date\/time of the job.
358−jCreateTime :: Lens' Job (Maybe Text)
364+jCreateTime :: Lens' Job (Maybe UTCTime)
359365jCreateTime
360− = lens _jCreateTime (\ s a -> s{_jCreateTime = a})
366+ = lens _jCreateTime (\ s a -> s{_jCreateTime = a}) .
367+ mapping _DateTime
361368
362369instance FromJSON Job where
363370 parseJSON
@@ -438,7 +445,7 @@ instance ToJSON ListJobsResponse where
438445data ReportType = ReportType'
439446 { _rtName :: !(Maybe Text)
440447 , _rtId :: !(Maybe Text)
441− , _rtDeprecateTime :: !(Maybe Text)
448+ , _rtDeprecateTime :: !(Maybe DateTime')
442449 , _rtSystemManaged :: !(Maybe Bool)
443450 } deriving (Eq,Show,Data,Typeable,Generic)
444451
@@ -472,10 +479,11 @@ rtId :: Lens' ReportType (Maybe Text)
472479rtId = lens _rtId (\ s a -> s{_rtId = a})
473480
474481-- | The date\/time when this report type was\/will be deprecated.
475−rtDeprecateTime :: Lens' ReportType (Maybe Text)
482+rtDeprecateTime :: Lens' ReportType (Maybe UTCTime)
476483rtDeprecateTime
477484 = lens _rtDeprecateTime
478485 (\ s a -> s{_rtDeprecateTime = a})
486+ . mapping _DateTime
479487
480488-- | True if this a system-managed report type; otherwise false. Reporting
481489-- jobs for system-managed report types are created automatically and can