b790df8 · gogol · git.iko.soy

gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types.hs+3−7

compare with develop

unifiedsplit

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AdExchangeBuyer.Types

8-- Module : Network.Google.AdExchangeBuyer.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.AdExchangeBuyer.Types

15module Network.Google.AdExchangeBuyer.Types

14 (

16 (

15− -- * API Definition

16− adexchangebuyer

17−

18

17

19 -- * Account

18 -- * Account

20− , Account

19+ Account

21 , account

20 , account

22 , aMaximumTotalQps

21 , aMaximumTotalQps

23 , aKind

22 , aKind

@@ -837,6 +836,3 @@ module Network.Google.AdExchangeBuyer.Types

837import Network.Google.AdExchangeBuyer.Types.Product

836import Network.Google.AdExchangeBuyer.Types.Product

838import Network.Google.AdExchangeBuyer.Types.Sum

837import Network.Google.AdExchangeBuyer.Types.Sum

839import Network.Google.Prelude

838import Network.Google.Prelude

840−

841−adexchangebuyer :: a

842−adexchangebuyer = error "adexchangebuyer"

gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AdExchangeBuyer.Types.Product

8-- Module : Network.Google.AdExchangeBuyer.Types.Product

gogol-adexchange-buyer/gen/Network/Google/AdExchangeBuyer/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.AdExchangeBuyer.Types.Sum

9-- Module : Network.Google.AdExchangeBuyer.Types.Sum

gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AdExchangeSeller.Types

8-- Module : Network.Google.AdExchangeSeller.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.AdExchangeSeller.Types

15module Network.Google.AdExchangeSeller.Types

14 (

16 (

15− -- * API Definition

16− adexchangeseller

17−

18

17

19 -- * Account

18 -- * Account

20− , Account

19+ Account

21 , account

20 , account

22 , accKind

21 , accKind

23 , accName

22 , accName

@@ -175,6 +174,3 @@ module Network.Google.AdExchangeSeller.Types

175import Network.Google.AdExchangeSeller.Types.Product

174import Network.Google.AdExchangeSeller.Types.Product

176import Network.Google.AdExchangeSeller.Types.Sum

175import Network.Google.AdExchangeSeller.Types.Sum

177import Network.Google.Prelude

176import Network.Google.Prelude

178−

179−adexchangeseller :: a

180−adexchangeseller = error "adexchangeseller"

gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AdExchangeSeller.Types.Product

8-- Module : Network.Google.AdExchangeSeller.Types.Product

gogol-adexchange-seller/gen/Network/Google/AdExchangeSeller/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.AdExchangeSeller.Types.Sum

9-- Module : Network.Google.AdExchangeSeller.Types.Sum

gogol-admin/gen/Network/Google/DataTransfer/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.DataTransfer.Types

8-- Module : Network.Google.DataTransfer.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.DataTransfer.Types

15module Network.Google.DataTransfer.Types

14 (

16 (

15− -- * API Definition

16− admin

17−

18

17

19 -- * Application

18 -- * Application

20− , Application

19+ Application

21 , application

20 , application

22 , aTransferParams

21 , aTransferParams

23 , aEtag

22 , aEtag

@@ -70,6 +69,3 @@ module Network.Google.DataTransfer.Types

70import Network.Google.DataTransfer.Types.Product

69import Network.Google.DataTransfer.Types.Product

71import Network.Google.DataTransfer.Types.Sum

70import Network.Google.DataTransfer.Types.Sum

72import Network.Google.Prelude

71import Network.Google.Prelude

73−

74−admin :: a

75−admin = error "admin"

gogol-admin/gen/Network/Google/DataTransfer/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.DataTransfer.Types.Product

8-- Module : Network.Google.DataTransfer.Types.Product

gogol-admin/gen/Network/Google/DataTransfer/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.DataTransfer.Types.Sum

9-- Module : Network.Google.DataTransfer.Types.Sum

gogol-admin/gen/Network/Google/Directory/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Directory.Types

8-- Module : Network.Google.Directory.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Directory.Types

15module Network.Google.Directory.Types

14 (

16 (

15− -- * API Definition

16− admin

17−

18

17

19 -- * Alias

18 -- * Alias

20− , Alias

19+ Alias

21 , alias

20 , alias

22 , aEtag

21 , aEtag

23 , aKind

22 , aKind

@@ -499,6 +498,3 @@ module Network.Google.Directory.Types

499import Network.Google.Directory.Types.Product

498import Network.Google.Directory.Types.Product

500import Network.Google.Directory.Types.Sum

499import Network.Google.Directory.Types.Sum

501import Network.Google.Prelude

500import Network.Google.Prelude

502−

503−admin :: a

504−admin = error "admin"

gogol-admin/gen/Network/Google/Directory/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Directory.Types.Product

8-- Module : Network.Google.Directory.Types.Product

gogol-admin/gen/Network/Google/Directory/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Directory.Types.Sum

9-- Module : Network.Google.Directory.Types.Sum

gogol-admin/gen/Network/Google/EmailMigration/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.EmailMigration.Types

8-- Module : Network.Google.EmailMigration.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.EmailMigration.Types

15module Network.Google.EmailMigration.Types

14 (

16 (

15− -- * API Definition

16− admin

17−

18

17

19 -- * MailItem

18 -- * MailItem

20− , MailItem

19+ MailItem

21 , mailItem

20 , mailItem

22 , miIsDeleted

21 , miIsDeleted

23 , miIsDraft

22 , miIsDraft

@@ -33,6 +32,3 @@ module Network.Google.EmailMigration.Types

33import Network.Google.EmailMigration.Types.Product

32import Network.Google.EmailMigration.Types.Product

34import Network.Google.EmailMigration.Types.Sum

33import Network.Google.EmailMigration.Types.Sum

35import Network.Google.Prelude

34import Network.Google.Prelude

36−

37−admin :: a

38−admin = error "admin"

gogol-admin/gen/Network/Google/EmailMigration/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.EmailMigration.Types.Product

8-- Module : Network.Google.EmailMigration.Types.Product

gogol-admin/gen/Network/Google/EmailMigration/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.EmailMigration.Types.Sum

9-- Module : Network.Google.EmailMigration.Types.Sum

gogol-admin/gen/Network/Google/Reports/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Reports.Types

8-- Module : Network.Google.Reports.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Reports.Types

15module Network.Google.Reports.Types

14 (

16 (

15− -- * API Definition

16− admin

17−

18

17

19 -- * Activities

18 -- * Activities

20− , Activities

19+ Activities

21 , activities

20 , activities

22 , actEtag

21 , actEtag

23 , actNextPageToken

22 , actNextPageToken

@@ -143,6 +142,3 @@ module Network.Google.Reports.Types

143import Network.Google.Prelude

142import Network.Google.Prelude

144import Network.Google.Reports.Types.Product

143import Network.Google.Reports.Types.Product

145import Network.Google.Reports.Types.Sum

144import Network.Google.Reports.Types.Sum

146−

147−admin :: a

148−admin = error "admin"

gogol-admin/gen/Network/Google/Reports/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Reports.Types.Product

8-- Module : Network.Google.Reports.Types.Product

gogol-admin/gen/Network/Google/Reports/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Reports.Types.Sum

9-- Module : Network.Google.Reports.Types.Sum

gogol-adsense-host/gen/Network/Google/AdSenseHost/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AdSenseHost.Types

8-- Module : Network.Google.AdSenseHost.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.AdSenseHost.Types

15module Network.Google.AdSenseHost.Types

14 (

16 (

15− -- * API Definition

16− adsensehost

17−

18

17

19 -- * Account

18 -- * Account

20− , Account

19+ Account

21 , account

20 , account

22 , accStatus

21 , accStatus

23 , accKind

22 , accKind

@@ -185,6 +184,3 @@ module Network.Google.AdSenseHost.Types

185import Network.Google.AdSenseHost.Types.Product

184import Network.Google.AdSenseHost.Types.Product

186import Network.Google.AdSenseHost.Types.Sum

185import Network.Google.AdSenseHost.Types.Sum

187import Network.Google.Prelude

186import Network.Google.Prelude

188−

189−adsensehost :: a

190−adsensehost = error "adsensehost"

gogol-adsense-host/gen/Network/Google/AdSenseHost/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AdSenseHost.Types.Product

8-- Module : Network.Google.AdSenseHost.Types.Product

gogol-adsense-host/gen/Network/Google/AdSenseHost/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.AdSenseHost.Types.Sum

9-- Module : Network.Google.AdSenseHost.Types.Sum

gogol-adsense/gen/Network/Google/AdSense/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AdSense.Types

8-- Module : Network.Google.AdSense.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.AdSense.Types

15module Network.Google.AdSense.Types

14 (

16 (

15− -- * API Definition

16− adsense

17−

18

17

19 -- * Account

18 -- * Account

20− , Account

19+ Account

21 , account

20 , account

22 , accKind

21 , accKind

23 , accPremium

22 , accPremium

@@ -276,6 +275,3 @@ module Network.Google.AdSense.Types

276import Network.Google.AdSense.Types.Product

275import Network.Google.AdSense.Types.Product

277import Network.Google.AdSense.Types.Sum

276import Network.Google.AdSense.Types.Sum

278import Network.Google.Prelude

277import Network.Google.Prelude

279−

280−adsense :: a

281−adsense = error "adsense"

gogol-adsense/gen/Network/Google/AdSense/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AdSense.Types.Product

8-- Module : Network.Google.AdSense.Types.Product

gogol-adsense/gen/Network/Google/AdSense/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.AdSense.Types.Sum

9-- Module : Network.Google.AdSense.Types.Sum

gogol-affiliatenetwork/gen/Network/Google/AffiliateNetwork/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AffiliateNetwork.Types

8-- Module : Network.Google.AffiliateNetwork.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.AffiliateNetwork.Types

15module Network.Google.AffiliateNetwork.Types

14 (

16 (

15− -- * API Definition

16− gan

17−

18

17

19 -- * Advertiser

18 -- * Advertiser

20− , Advertiser

19+ Advertiser

21 , advertiser

20 , advertiser

22 , aAllowPublisherCreatedLinks

21 , aAllowPublisherCreatedLinks

23 , aContactPhone

22 , aContactPhone

@@ -275,6 +274,3 @@ module Network.Google.AffiliateNetwork.Types

275import Network.Google.AffiliateNetwork.Types.Product

274import Network.Google.AffiliateNetwork.Types.Product

276import Network.Google.AffiliateNetwork.Types.Sum

275import Network.Google.AffiliateNetwork.Types.Sum

277import Network.Google.Prelude

276import Network.Google.Prelude

278−

279−gan :: a

280−gan = error "gan"

gogol-affiliatenetwork/gen/Network/Google/AffiliateNetwork/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AffiliateNetwork.Types.Product

8-- Module : Network.Google.AffiliateNetwork.Types.Product

gogol-affiliatenetwork/gen/Network/Google/AffiliateNetwork/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.AffiliateNetwork.Types.Sum

9-- Module : Network.Google.AffiliateNetwork.Types.Sum

gogol-analytics/gen/Network/Google/Analytics/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Analytics.Types

8-- Module : Network.Google.Analytics.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Analytics.Types

15module Network.Google.Analytics.Types

14 (

16 (

15− -- * API Definition

16− analytics

17−

18

17

19 -- * Account

18 -- * Account

20− , Account

19+ Account

21 , account

20 , account

22 , accChildLink

21 , accChildLink

23 , accKind

22 , accKind

@@ -993,6 +992,3 @@ module Network.Google.Analytics.Types

993import Network.Google.Analytics.Types.Product

992import Network.Google.Analytics.Types.Product

994import Network.Google.Analytics.Types.Sum

993import Network.Google.Analytics.Types.Sum

995import Network.Google.Prelude

994import Network.Google.Prelude

996−

997−analytics :: a

998−analytics = error "analytics"

gogol-analytics/gen/Network/Google/Analytics/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Analytics.Types.Product

8-- Module : Network.Google.Analytics.Types.Product

gogol-analytics/gen/Network/Google/Analytics/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Analytics.Types.Sum

9-- Module : Network.Google.Analytics.Types.Sum

gogol-android-enterprise/gen/Network/Google/AndroidEnterprise/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AndroidEnterprise.Types

8-- Module : Network.Google.AndroidEnterprise.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.AndroidEnterprise.Types

15module Network.Google.AndroidEnterprise.Types

14 (

16 (

15− -- * API Definition

16− androidenterprise

17−

18

17

19 -- * AppRestrictionsSchema

18 -- * AppRestrictionsSchema

20− , AppRestrictionsSchema

19+ AppRestrictionsSchema

21 , appRestrictionsSchema

20 , appRestrictionsSchema

22 , arsKind

21 , arsKind

23 , arsRestrictions

22 , arsRestrictions

@@ -244,6 +243,3 @@ module Network.Google.AndroidEnterprise.Types

244import Network.Google.AndroidEnterprise.Types.Product

243import Network.Google.AndroidEnterprise.Types.Product

245import Network.Google.AndroidEnterprise.Types.Sum

244import Network.Google.AndroidEnterprise.Types.Sum

246import Network.Google.Prelude

245import Network.Google.Prelude

247−

248−androidenterprise :: a

249−androidenterprise = error "androidenterprise"

gogol-android-enterprise/gen/Network/Google/AndroidEnterprise/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AndroidEnterprise.Types.Product

8-- Module : Network.Google.AndroidEnterprise.Types.Product

gogol-android-enterprise/gen/Network/Google/AndroidEnterprise/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.AndroidEnterprise.Types.Sum

9-- Module : Network.Google.AndroidEnterprise.Types.Sum

gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AndroidPublisher.Types

8-- Module : Network.Google.AndroidPublisher.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.AndroidPublisher.Types

15module Network.Google.AndroidPublisher.Types

14 (

16 (

15− -- * API Definition

16− androidpublisher

17−

18

17

19 -- * Apk

18 -- * Apk

20− , Apk

19+ Apk

21 , apk

20 , apk

22 , apkVersionCode

21 , apkVersionCode

23 , apkBinary

22 , apkBinary

@@ -327,6 +326,3 @@ module Network.Google.AndroidPublisher.Types

327import Network.Google.AndroidPublisher.Types.Product

326import Network.Google.AndroidPublisher.Types.Product

328import Network.Google.AndroidPublisher.Types.Sum

327import Network.Google.AndroidPublisher.Types.Sum

329import Network.Google.Prelude

328import Network.Google.Prelude

330−

331−androidpublisher :: a

332−androidpublisher = error "androidpublisher"

gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AndroidPublisher.Types.Product

8-- Module : Network.Google.AndroidPublisher.Types.Product

gogol-android-publisher/gen/Network/Google/AndroidPublisher/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.AndroidPublisher.Types.Sum

9-- Module : Network.Google.AndroidPublisher.Types.Sum

gogol-appengine/gen/Network/Google/AppEngineAdmin/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AppEngineAdmin.Types

8-- Module : Network.Google.AppEngineAdmin.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.AppEngineAdmin.Types

15module Network.Google.AppEngineAdmin.Types

14 (

16 (

15− -- * API Definition

16− appengine

17−

18

17

19 -- * ApiConfigHandler

18 -- * ApiConfigHandler

20− , ApiConfigHandler

19+ ApiConfigHandler

21 , apiConfigHandler

20 , apiConfigHandler

22 , achScript

21 , achScript

23 , achSecurityLevel

22 , achSecurityLevel

@@ -295,6 +294,3 @@ module Network.Google.AppEngineAdmin.Types

295import Network.Google.AppEngineAdmin.Types.Product

294import Network.Google.AppEngineAdmin.Types.Product

296import Network.Google.AppEngineAdmin.Types.Sum

295import Network.Google.AppEngineAdmin.Types.Sum

297import Network.Google.Prelude

296import Network.Google.Prelude

298−

299−appengine :: a

300−appengine = error "appengine"

gogol-appengine/gen/Network/Google/AppEngineAdmin/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AppEngineAdmin.Types.Product

8-- Module : Network.Google.AppEngineAdmin.Types.Product

gogol-appengine/gen/Network/Google/AppEngineAdmin/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.AppEngineAdmin.Types.Sum

9-- Module : Network.Google.AppEngineAdmin.Types.Sum

gogol-appsactivity/gen/Network/Google/AppsActivity/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AppsActivity.Types

8-- Module : Network.Google.AppsActivity.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.AppsActivity.Types

15module Network.Google.AppsActivity.Types

14 (

16 (

15− -- * API Definition

16− appsactivity

17−

18

17

19 -- * Activity

18 -- * Activity

20− , Activity

19+ Activity

21 , activity

20 , activity

22 , aSingleEvents

21 , aSingleEvents

23 , aCombinedEvent

22 , aCombinedEvent

@@ -110,6 +109,3 @@ module Network.Google.AppsActivity.Types

110import Network.Google.AppsActivity.Types.Product

109import Network.Google.AppsActivity.Types.Product

111import Network.Google.AppsActivity.Types.Sum

110import Network.Google.AppsActivity.Types.Sum

112import Network.Google.Prelude

111import Network.Google.Prelude

113−

114−appsactivity :: a

115−appsactivity = error "appsactivity"

gogol-appsactivity/gen/Network/Google/AppsActivity/Types/Product.hs+4−2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AppsActivity.Types.Product

8-- Module : Network.Google.AppsActivity.Types.Product

@@ -67,7 +69,7 @@ data Event = Event

67 , _ePermissionChanges :: !(Maybe [Maybe PermissionChange])

69 , _ePermissionChanges :: !(Maybe [Maybe PermissionChange])

68 , _eTarget :: !(Maybe (Maybe Target))

70 , _eTarget :: !(Maybe (Maybe Target))

69 , _eMove :: !(Maybe (Maybe Move))

71 , _eMove :: !(Maybe (Maybe Move))

70− }

72+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

71

73

72-- | Creates a value of 'Event' with the minimum fields required to make a request.

74-- | Creates a value of 'Event' with the minimum fields required to make a request.

73--

75--

@@ -291,7 +293,7 @@ data Permission = Permission

291 , _pName :: !(Maybe Text)

293 , _pName :: !(Maybe Text)

292 , _pType :: !(Maybe PermissionType)

294 , _pType :: !(Maybe PermissionType)

293 , _pPermissionId :: !(Maybe Text)

295 , _pPermissionId :: !(Maybe Text)

294− }

296+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

295

297

296-- | Creates a value of 'Permission' with the minimum fields required to make a request.

298-- | Creates a value of 'Permission' with the minimum fields required to make a request.

297--

299--

gogol-appsactivity/gen/Network/Google/AppsActivity/Types/Sum.hs+91

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.AppsActivity.Types.Sum

9-- Module : Network.Google.AppsActivity.Types.Sum

@@ -41,6 +44,35 @@ data EventItemAdditionalEventTypes

41

44

42instance Hashable EventItemAdditionalEventTypes

45instance Hashable EventItemAdditionalEventTypes

43

46

47+instance FromText EventItemAdditionalEventTypes where

48+ fromText = \case

49+ "comment" -> Just EIAETComment

50+ "create" -> Just EIAETCreate

51+ "edit" -> Just EIAETEdit

52+ "emptyTrash" -> Just EIAETEmptyTrash

53+ "move" -> Just EIAETMove

54+ "permissionChange" -> Just EIAETPermissionChange

55+ "rename" -> Just EIAETRename

56+ "trash" -> Just EIAETTrash

57+ "unknown" -> Just EIAETUnknown

58+ "untrash" -> Just EIAETUntrash

59+ "upload" -> Just EIAETUpload

60+ _ -> Nothing

61+

62+instance ToText EventItemAdditionalEventTypes where

63+ toText = \case

64+ EIAETComment -> "comment"

65+ EIAETCreate -> "create"

66+ EIAETEdit -> "edit"

67+ EIAETEmptyTrash -> "emptyTrash"

68+ EIAETMove -> "move"

69+ EIAETPermissionChange -> "permissionChange"

70+ EIAETRename -> "rename"

71+ EIAETTrash -> "trash"

72+ EIAETUnknown -> "unknown"

73+ EIAETUntrash -> "untrash"

74+ EIAETUpload -> "upload"

75+

44-- | The main type of event that occurred.

76-- | The main type of event that occurred.

45data EventPrimaryEventType

77data EventPrimaryEventType

46 = EPETComment

78 = EPETComment

@@ -69,6 +101,35 @@ data EventPrimaryEventType

69

101

70instance Hashable EventPrimaryEventType

102instance Hashable EventPrimaryEventType

71

103

104+instance FromText EventPrimaryEventType where

105+ fromText = \case

106+ "comment" -> Just EPETComment

107+ "create" -> Just EPETCreate

108+ "edit" -> Just EPETEdit

109+ "emptyTrash" -> Just EPETEmptyTrash

110+ "move" -> Just EPETMove

111+ "permissionChange" -> Just EPETPermissionChange

112+ "rename" -> Just EPETRename

113+ "trash" -> Just EPETTrash

114+ "unknown" -> Just EPETUnknown

115+ "untrash" -> Just EPETUntrash

116+ "upload" -> Just EPETUpload

117+ _ -> Nothing

118+

119+instance ToText EventPrimaryEventType where

120+ toText = \case

121+ EPETComment -> "comment"

122+ EPETCreate -> "create"

123+ EPETEdit -> "edit"

124+ EPETEmptyTrash -> "emptyTrash"

125+ EPETMove -> "move"

126+ EPETPermissionChange -> "permissionChange"

127+ EPETRename -> "rename"

128+ EPETTrash -> "trash"

129+ EPETUnknown -> "unknown"

130+ EPETUntrash -> "untrash"

131+ EPETUpload -> "upload"

132+

72-- | Indicates the Google Drive permissions role. The role determines a

133-- | Indicates the Google Drive permissions role. The role determines a

73-- user\'s ability to read, write, or comment on the file.

134-- user\'s ability to read, write, or comment on the file.

74data PermissionRole

135data PermissionRole

@@ -84,6 +145,21 @@ data PermissionRole

84

145

85instance Hashable PermissionRole

146instance Hashable PermissionRole

86

147

148+instance FromText PermissionRole where

149+ fromText = \case

150+ "commenter" -> Just PRCommenter

151+ "owner" -> Just PROwner

152+ "reader" -> Just PRReader

153+ "writer" -> Just PRWriter

154+ _ -> Nothing

155+

156+instance ToText PermissionRole where

157+ toText = \case

158+ PRCommenter -> "commenter"

159+ PROwner -> "owner"

160+ PRReader -> "reader"

161+ PRWriter -> "writer"

162+

87-- | Indicates how widely permissions are granted.

163-- | Indicates how widely permissions are granted.

88data PermissionType

164data PermissionType

89 = PTAnyone

165 = PTAnyone

@@ -97,3 +173,18 @@ data PermissionType

97 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

173 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

98

174

99instance Hashable PermissionType

175instance Hashable PermissionType

176+

177+instance FromText PermissionType where

178+ fromText = \case

179+ "anyone" -> Just PTAnyone

180+ "domain" -> Just PTDomain

181+ "group" -> Just PTGroup

182+ "user" -> Just PTUser

183+ _ -> Nothing

184+

185+instance ToText PermissionType where

186+ toText = \case

187+ PTAnyone -> "anyone"

188+ PTDomain -> "domain"

189+ PTGroup -> "group"

190+ PTUser -> "user"

gogol-appstate/gen/Network/Google/AppState/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AppState.Types

8-- Module : Network.Google.AppState.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.AppState.Types

15module Network.Google.AppState.Types

14 (

16 (

15− -- * API Definition

16− appstate

17−

18

17

19 -- * GetResponse

18 -- * GetResponse

20− , GetResponse

19+ GetResponse

21 , getResponse

20 , getResponse

22 , grCurrentStateVersion

21 , grCurrentStateVersion

23 , grKind

22 , grKind

@@ -48,6 +47,3 @@ module Network.Google.AppState.Types

48import Network.Google.AppState.Types.Product

47import Network.Google.AppState.Types.Product

49import Network.Google.AppState.Types.Sum

48import Network.Google.AppState.Types.Sum

50import Network.Google.Prelude

49import Network.Google.Prelude

51−

52−appstate :: a

53−appstate = error "appstate"

gogol-appstate/gen/Network/Google/AppState/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.AppState.Types.Product

8-- Module : Network.Google.AppState.Types.Product

gogol-appstate/gen/Network/Google/AppState/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.AppState.Types.Sum

9-- Module : Network.Google.AppState.Types.Sum

gogol-autoscaler/gen/Network/Google/ComputeEngineAutoscaler/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.ComputeEngineAutoscaler.Types

8-- Module : Network.Google.ComputeEngineAutoscaler.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.ComputeEngineAutoscaler.Types

15module Network.Google.ComputeEngineAutoscaler.Types

14 (

16 (

15− -- * API Definition

16− autoscaler

17−

18

17

19 -- * Autoscaler

18 -- * Autoscaler

20− , Autoscaler

19+ Autoscaler

21 , autoscaler

20 , autoscaler

22 , aKind

21 , aKind

23 , aSelfLink

22 , aSelfLink

@@ -166,6 +165,3 @@ module Network.Google.ComputeEngineAutoscaler.Types

166import Network.Google.ComputeEngineAutoscaler.Types.Product

165import Network.Google.ComputeEngineAutoscaler.Types.Product

167import Network.Google.ComputeEngineAutoscaler.Types.Sum

166import Network.Google.ComputeEngineAutoscaler.Types.Sum

168import Network.Google.Prelude

167import Network.Google.Prelude

169−

170−autoscaler :: a

171−autoscaler = error "autoscaler"

gogol-autoscaler/gen/Network/Google/ComputeEngineAutoscaler/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.ComputeEngineAutoscaler.Types.Product

8-- Module : Network.Google.ComputeEngineAutoscaler.Types.Product

gogol-autoscaler/gen/Network/Google/ComputeEngineAutoscaler/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.ComputeEngineAutoscaler.Types.Sum

9-- Module : Network.Google.ComputeEngineAutoscaler.Types.Sum

gogol-bigquery/gen/Network/Google/BigQuery/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.BigQuery.Types

8-- Module : Network.Google.BigQuery.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.BigQuery.Types

15module Network.Google.BigQuery.Types

14 (

16 (

15− -- * API Definition

16− bigquery

17−

18

17

19 -- * CsvOptions

18 -- * CsvOptions

20− , CsvOptions

19+ CsvOptions

21 , csvOptions

20 , csvOptions

22 , coSkipLeadingRows

21 , coSkipLeadingRows

23 , coAllowJaggedRows

22 , coAllowJaggedRows

@@ -453,6 +452,3 @@ module Network.Google.BigQuery.Types

453import Network.Google.BigQuery.Types.Product

452import Network.Google.BigQuery.Types.Product

454import Network.Google.BigQuery.Types.Sum

453import Network.Google.BigQuery.Types.Sum

455import Network.Google.Prelude

454import Network.Google.Prelude

456−

457−bigquery :: a

458−bigquery = error "bigquery"

gogol-bigquery/gen/Network/Google/BigQuery/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.BigQuery.Types.Product

8-- Module : Network.Google.BigQuery.Types.Product

gogol-bigquery/gen/Network/Google/BigQuery/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.BigQuery.Types.Sum

9-- Module : Network.Google.BigQuery.Types.Sum

gogol-blogger/gen/Network/Google/Blogger/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Blogger.Types

8-- Module : Network.Google.Blogger.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Blogger.Types

15module Network.Google.Blogger.Types

14 (

16 (

15− -- * API Definition

16− blogger

17−

18

17

19 -- * Blog

18 -- * Blog

20− , Blog

19+ Blog

21 , blog

20 , blog

22 , bStatus

21 , bStatus

23 , bKind

22 , bKind

@@ -305,6 +304,3 @@ module Network.Google.Blogger.Types

305import Network.Google.Blogger.Types.Product

304import Network.Google.Blogger.Types.Product

306import Network.Google.Blogger.Types.Sum

305import Network.Google.Blogger.Types.Sum

307import Network.Google.Prelude

306import Network.Google.Prelude

308−

309−blogger :: a

310−blogger = error "blogger"

gogol-blogger/gen/Network/Google/Blogger/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Blogger.Types.Product

8-- Module : Network.Google.Blogger.Types.Product

gogol-blogger/gen/Network/Google/Blogger/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Blogger.Types.Sum

9-- Module : Network.Google.Blogger.Types.Sum

gogol-books/gen/Network/Google/Books/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Books.Types

8-- Module : Network.Google.Books.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Books.Types

15module Network.Google.Books.Types

14 (

16 (

15− -- * API Definition

16− books

17−

18

17

19 -- * Annotation

18 -- * Annotation

20− , Annotation

19+ Annotation

21 , annotation

20 , annotation

22 , aaSelectedText

21 , aaSelectedText

23 , aaLayerSummary

22 , aaLayerSummary

@@ -741,6 +740,3 @@ module Network.Google.Books.Types

741import Network.Google.Books.Types.Product

740import Network.Google.Books.Types.Product

742import Network.Google.Books.Types.Sum

741import Network.Google.Books.Types.Sum

743import Network.Google.Prelude

742import Network.Google.Prelude

744−

745−books :: a

746−books = error "books"

gogol-books/gen/Network/Google/Books/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Books.Types.Product

8-- Module : Network.Google.Books.Types.Product

gogol-books/gen/Network/Google/Books/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Books.Types.Sum

9-- Module : Network.Google.Books.Types.Sum

gogol-calendar/gen/Network/Google/Calendar/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Calendar.Types

8-- Module : Network.Google.Calendar.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Calendar.Types

15module Network.Google.Calendar.Types

14 (

16 (

15− -- * API Definition

16− calendar

17−

18

17

19 -- * Acl

18 -- * Acl

20− , Acl

19+ Acl

21 , acl

20 , acl

22 , aclEtag

21 , aclEtag

23 , aclNextPageToken

22 , aclNextPageToken

@@ -360,6 +359,3 @@ module Network.Google.Calendar.Types

360import Network.Google.Calendar.Types.Product

359import Network.Google.Calendar.Types.Product

361import Network.Google.Calendar.Types.Sum

360import Network.Google.Calendar.Types.Sum

362import Network.Google.Prelude

361import Network.Google.Prelude

363−

364−calendar :: a

365−calendar = error "calendar"

gogol-calendar/gen/Network/Google/Calendar/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Calendar.Types.Product

8-- Module : Network.Google.Calendar.Types.Product

gogol-calendar/gen/Network/Google/Calendar/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Calendar.Types.Sum

9-- Module : Network.Google.Calendar.Types.Sum

gogol-civicinfo/gen/Network/Google/CivicInfo/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CivicInfo.Types

8-- Module : Network.Google.CivicInfo.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.CivicInfo.Types

15module Network.Google.CivicInfo.Types

14 (

16 (

15− -- * API Definition

16− civicinfo

17−

18

17

19 -- * AdministrationRegion

18 -- * AdministrationRegion

20− , AdministrationRegion

19+ AdministrationRegion

21 , administrationRegion

20 , administrationRegion

22 , arLocalJurisdiction

21 , arLocalJurisdiction

23 , arSources

22 , arSources

@@ -233,6 +232,3 @@ module Network.Google.CivicInfo.Types

233import Network.Google.CivicInfo.Types.Product

232import Network.Google.CivicInfo.Types.Product

234import Network.Google.CivicInfo.Types.Sum

233import Network.Google.CivicInfo.Types.Sum

235import Network.Google.Prelude

234import Network.Google.Prelude

236−

237−civicinfo :: a

238−civicinfo = error "civicinfo"

gogol-civicinfo/gen/Network/Google/CivicInfo/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CivicInfo.Types.Product

8-- Module : Network.Google.CivicInfo.Types.Product

gogol-civicinfo/gen/Network/Google/CivicInfo/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.CivicInfo.Types.Sum

9-- Module : Network.Google.CivicInfo.Types.Sum

gogol-classroom/gen/Network/Google/Classroom/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Classroom.Types

8-- Module : Network.Google.Classroom.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Classroom.Types

15module Network.Google.Classroom.Types

14 (

16 (

15− -- * API Definition

16− classroom

17−

18

17

19 -- * Course

18 -- * Course

20− , Course

19+ Course

21 , course

20 , course

22 , cCreationTime

21 , cCreationTime

23 , cRoom

22 , cRoom

@@ -118,6 +117,3 @@ module Network.Google.Classroom.Types

118import Network.Google.Classroom.Types.Product

117import Network.Google.Classroom.Types.Product

119import Network.Google.Classroom.Types.Sum

118import Network.Google.Classroom.Types.Sum

120import Network.Google.Prelude

119import Network.Google.Prelude

121−

122−classroom :: a

123−classroom = error "classroom"

gogol-classroom/gen/Network/Google/Classroom/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Classroom.Types.Product

8-- Module : Network.Google.Classroom.Types.Product

gogol-classroom/gen/Network/Google/Classroom/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Classroom.Types.Sum

9-- Module : Network.Google.Classroom.Types.Sum

gogol-cloud-billing/gen/Network/Google/CloudBilling/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudBilling.Types

8-- Module : Network.Google.CloudBilling.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.CloudBilling.Types

15module Network.Google.CloudBilling.Types

14 (

16 (

15− -- * API Definition

16− cloudbilling

17−

18

17

19 -- * BillingAccount

18 -- * BillingAccount

20− , BillingAccount

19+ BillingAccount

21 , billingAccount

20 , billingAccount

22 , baOpen

21 , baOpen

23 , baName

22 , baName

@@ -47,6 +46,3 @@ module Network.Google.CloudBilling.Types

47import Network.Google.CloudBilling.Types.Product

46import Network.Google.CloudBilling.Types.Product

48import Network.Google.CloudBilling.Types.Sum

47import Network.Google.CloudBilling.Types.Sum

49import Network.Google.Prelude

48import Network.Google.Prelude

50−

51−cloudbilling :: a

52−cloudbilling = error "cloudbilling"

gogol-cloud-billing/gen/Network/Google/CloudBilling/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudBilling.Types.Product

8-- Module : Network.Google.CloudBilling.Types.Product

gogol-cloud-billing/gen/Network/Google/CloudBilling/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.CloudBilling.Types.Sum

9-- Module : Network.Google.CloudBilling.Types.Sum

gogol-cloud-datastore/gen/Network/Google/CloudDatastore/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudDatastore.Types

8-- Module : Network.Google.CloudDatastore.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.CloudDatastore.Types

15module Network.Google.CloudDatastore.Types

14 (

16 (

15− -- * API Definition

16− datastore

17−

18

17

19 -- * AllocateIdsRequest

18 -- * AllocateIdsRequest

20− , AllocateIdsRequest

19+ AllocateIdsRequest

21 , allocateIdsRequest

20 , allocateIdsRequest

22 , airKeys

21 , airKeys

23

22

@@ -292,6 +291,3 @@ module Network.Google.CloudDatastore.Types

292import Network.Google.CloudDatastore.Types.Product

291import Network.Google.CloudDatastore.Types.Product

293import Network.Google.CloudDatastore.Types.Sum

292import Network.Google.CloudDatastore.Types.Sum

294import Network.Google.Prelude

293import Network.Google.Prelude

295−

296−datastore :: a

297−datastore = error "datastore"

gogol-cloud-datastore/gen/Network/Google/CloudDatastore/Types/Product.hs+10−8

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudDatastore.Types.Product

8-- Module : Network.Google.CloudDatastore.Types.Product

@@ -76,7 +78,7 @@ aHeader = lens _aHeader (\ s a -> s{_aHeader = a})

76-- /See:/ 'beginTransactionRequest' smart constructor.

78-- /See:/ 'beginTransactionRequest' smart constructor.

77newtype BeginTransactionRequest = BeginTransactionRequest

79newtype BeginTransactionRequest = BeginTransactionRequest

78 { _btrIsolationLevel :: Maybe BeginTransactionRequestIsolationLevel

80 { _btrIsolationLevel :: Maybe BeginTransactionRequestIsolationLevel

79− }

81+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

80

82

81-- | Creates a value of 'BeginTransactionRequest' with the minimum fields required to make a request.

83-- | Creates a value of 'BeginTransactionRequest' with the minimum fields required to make a request.

82--

84--

@@ -140,7 +142,7 @@ data CommitRequest = CommitRequest

140 , _crMutation :: !(Maybe (Maybe Mutation))

142 , _crMutation :: !(Maybe (Maybe Mutation))

141 , _crTransaction :: !(Maybe Word8)

143 , _crTransaction :: !(Maybe Word8)

142 , _crIgnoreReadOnly :: !(Maybe Bool)

144 , _crIgnoreReadOnly :: !(Maybe Bool)

143− }

145+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

144

146

145-- | Creates a value of 'CommitRequest' with the minimum fields required to make a request.

147-- | Creates a value of 'CommitRequest' with the minimum fields required to make a request.

146--

148--

@@ -223,7 +225,7 @@ crHeader = lens _crHeader (\ s a -> s{_crHeader = a})

223data CompositeFilter = CompositeFilter

225data CompositeFilter = CompositeFilter

224 { _cfOperator :: !(Maybe CompositeFilterOperator)

226 { _cfOperator :: !(Maybe CompositeFilterOperator)

225 , _cfFilters :: !(Maybe [Maybe Filter])

227 , _cfFilters :: !(Maybe [Maybe Filter])

226− }

228+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

227

229

228-- | Creates a value of 'CompositeFilter' with the minimum fields required to make a request.

230-- | Creates a value of 'CompositeFilter' with the minimum fields required to make a request.

229--

231--

@@ -961,7 +963,7 @@ pBlobValue

961data PropertyExpression = PropertyExpression

963data PropertyExpression = PropertyExpression

962 { _peProperty :: !(Maybe (Maybe PropertyReference))

964 { _peProperty :: !(Maybe (Maybe PropertyReference))

963 , _peAggregationFunction :: !(Maybe PropertyExpressionAggregationFunction)

965 , _peAggregationFunction :: !(Maybe PropertyExpressionAggregationFunction)

964− }

966+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

965

967

966-- | Creates a value of 'PropertyExpression' with the minimum fields required to make a request.

968-- | Creates a value of 'PropertyExpression' with the minimum fields required to make a request.

967--

969--

@@ -1000,7 +1002,7 @@ data PropertyFilter = PropertyFilter

1000 { _pfProperty :: !(Maybe (Maybe PropertyReference))

1002 { _pfProperty :: !(Maybe (Maybe PropertyReference))

1001 , _pfOperator :: !(Maybe PropertyFilterOperator)

1003 , _pfOperator :: !(Maybe PropertyFilterOperator)

1002 , _pfValue :: !(Maybe (Maybe Value))

1004 , _pfValue :: !(Maybe (Maybe Value))

1003− }

1005+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1004

1006

1005-- | Creates a value of 'PropertyFilter' with the minimum fields required to make a request.

1007-- | Creates a value of 'PropertyFilter' with the minimum fields required to make a request.

1006--

1008--

@@ -1041,7 +1043,7 @@ pfValue = lens _pfValue (\ s a -> s{_pfValue = a})

1041data PropertyOrder = PropertyOrder

1043data PropertyOrder = PropertyOrder

1042 { _poProperty :: !(Maybe (Maybe PropertyReference))

1044 { _poProperty :: !(Maybe (Maybe PropertyReference))

1043 , _poDirection :: !(Maybe PropertyOrderDirection)

1045 , _poDirection :: !(Maybe PropertyOrderDirection)

1044− }

1046+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1045

1047

1046-- | Creates a value of 'PropertyOrder' with the minimum fields required to make a request.

1048-- | Creates a value of 'PropertyOrder' with the minimum fields required to make a request.

1047--

1049--

@@ -1206,7 +1208,7 @@ data QueryResultBatch = QueryResultBatch

1206 , _qrbEntityResults :: !(Maybe [Maybe EntityResult])

1208 , _qrbEntityResults :: !(Maybe [Maybe EntityResult])

1207 , _qrbMoreResults :: !(Maybe QueryResultBatchMoreResults)

1209 , _qrbMoreResults :: !(Maybe QueryResultBatchMoreResults)

1208 , _qrbEndCursor :: !(Maybe Word8)

1210 , _qrbEndCursor :: !(Maybe Word8)

1209− }

1211+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1210

1212

1211-- | Creates a value of 'QueryResultBatch' with the minimum fields required to make a request.

1213-- | Creates a value of 'QueryResultBatch' with the minimum fields required to make a request.

1212--

1214--

@@ -1273,7 +1275,7 @@ qrbEndCursor

1273data ReadOptions = ReadOptions

1275data ReadOptions = ReadOptions

1274 { _roReadConsistency :: !(Maybe ReadOptionsReadConsistency)

1276 { _roReadConsistency :: !(Maybe ReadOptionsReadConsistency)

1275 , _roTransaction :: !(Maybe Word8)

1277 , _roTransaction :: !(Maybe Word8)

1276− }

1278+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1277

1279

1278-- | Creates a value of 'ReadOptions' with the minimum fields required to make a request.

1280-- | Creates a value of 'ReadOptions' with the minimum fields required to make a request.

1279--

1281--

gogol-cloud-datastore/gen/Network/Google/CloudDatastore/Types/Sum.hs+112

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.CloudDatastore.Types.Sum

9-- Module : Network.Google.CloudDatastore.Types.Sum

@@ -29,6 +32,17 @@ data BeginTransactionRequestIsolationLevel

29

32

30instance Hashable BeginTransactionRequestIsolationLevel

33instance Hashable BeginTransactionRequestIsolationLevel

31

34

35+instance FromText BeginTransactionRequestIsolationLevel where

36+ fromText = \case

37+ "SERIALIZABLE" -> Just BTRILSerializable

38+ "SNAPSHOT" -> Just BTRILSnapshot

39+ _ -> Nothing

40+

41+instance ToText BeginTransactionRequestIsolationLevel where

42+ toText = \case

43+ BTRILSerializable -> "SERIALIZABLE"

44+ BTRILSnapshot -> "SNAPSHOT"

45+

32-- | The type of commit to perform. Either TRANSACTIONAL or

46-- | The type of commit to perform. Either TRANSACTIONAL or

33-- NON_TRANSACTIONAL.

47-- NON_TRANSACTIONAL.

34data CommitRequestMode

48data CommitRequestMode

@@ -40,6 +54,17 @@ data CommitRequestMode

40

54

41instance Hashable CommitRequestMode

55instance Hashable CommitRequestMode

42

56

57+instance FromText CommitRequestMode where

58+ fromText = \case

59+ "NON_TRANSACTIONAL" -> Just CRMNonTransactional

60+ "TRANSACTIONAL" -> Just CRMTransactional

61+ _ -> Nothing

62+

63+instance ToText CommitRequestMode where

64+ toText = \case

65+ CRMNonTransactional -> "NON_TRANSACTIONAL"

66+ CRMTransactional -> "TRANSACTIONAL"

67+

43-- | The operator for combining multiple filters. Only \"and\" is currently

68-- | The operator for combining multiple filters. Only \"and\" is currently

44-- supported.

69-- supported.

45data CompositeFilterOperator

70data CompositeFilterOperator

@@ -49,6 +74,15 @@ data CompositeFilterOperator

49

74

50instance Hashable CompositeFilterOperator

75instance Hashable CompositeFilterOperator

51

76

77+instance FromText CompositeFilterOperator where

78+ fromText = \case

79+ "AND" -> Just CFOAnd

80+ _ -> Nothing

81+

82+instance ToText CompositeFilterOperator where

83+ toText = \case

84+ CFOAnd -> "AND"

85+

52-- | The aggregation function to apply to the property. Optional. Can only be

86-- | The aggregation function to apply to the property. Optional. Can only be

53-- used when grouping by at least one property. Must then be set on all

87-- used when grouping by at least one property. Must then be set on all

54-- properties in the projection that are not being grouped by. Aggregation

88-- properties in the projection that are not being grouped by. Aggregation

@@ -61,6 +95,15 @@ data PropertyExpressionAggregationFunction

61

95

62instance Hashable PropertyExpressionAggregationFunction

96instance Hashable PropertyExpressionAggregationFunction

63

97

98+instance FromText PropertyExpressionAggregationFunction where

99+ fromText = \case

100+ "FIRST" -> Just PEAFFirst

101+ _ -> Nothing

102+

103+instance ToText PropertyExpressionAggregationFunction where

104+ toText = \case

105+ PEAFFirst -> "FIRST"

106+

64-- | The operator to filter by. One of lessThan, lessThanOrEqual,

107-- | The operator to filter by. One of lessThan, lessThanOrEqual,

65-- greaterThan, greaterThanOrEqual, equal, or hasAncestor.

108-- greaterThan, greaterThanOrEqual, equal, or hasAncestor.

66data PropertyFilterOperator

109data PropertyFilterOperator

@@ -80,6 +123,25 @@ data PropertyFilterOperator

80

123

81instance Hashable PropertyFilterOperator

124instance Hashable PropertyFilterOperator

82

125

126+instance FromText PropertyFilterOperator where

127+ fromText = \case

128+ "EQUAL" -> Just PFOEqual

129+ "GREATER_THAN" -> Just PFOGreaterThan

130+ "GREATER_THAN_OR_EQUAL" -> Just PFOGreaterThanOrEqual

131+ "HAS_ANCESTOR" -> Just PFOHasAncestor

132+ "LESS_THAN" -> Just PFOLessThan

133+ "LESS_THAN_OR_EQUAL" -> Just PFOLessThanOrEqual

134+ _ -> Nothing

135+

136+instance ToText PropertyFilterOperator where

137+ toText = \case

138+ PFOEqual -> "EQUAL"

139+ PFOGreaterThan -> "GREATER_THAN"

140+ PFOGreaterThanOrEqual -> "GREATER_THAN_OR_EQUAL"

141+ PFOHasAncestor -> "HAS_ANCESTOR"

142+ PFOLessThan -> "LESS_THAN"

143+ PFOLessThanOrEqual -> "LESS_THAN_OR_EQUAL"

144+

83-- | The direction to order by. One of ascending or descending. Optional,

145-- | The direction to order by. One of ascending or descending. Optional,

84-- defaults to ascending.

146-- defaults to ascending.

85data PropertyOrderDirection

147data PropertyOrderDirection

@@ -91,6 +153,17 @@ data PropertyOrderDirection

91

153

92instance Hashable PropertyOrderDirection

154instance Hashable PropertyOrderDirection

93

155

156+instance FromText PropertyOrderDirection where

157+ fromText = \case

158+ "ASCENDING" -> Just PODAscending

159+ "DESCENDING" -> Just PODDescending

160+ _ -> Nothing

161+

162+instance ToText PropertyOrderDirection where

163+ toText = \case

164+ PODAscending -> "ASCENDING"

165+ PODDescending -> "DESCENDING"

166+

94-- | The result type for every entity in entityResults. full for full

167-- | The result type for every entity in entityResults. full for full

95-- entities, projection for entities with only projected properties,

168-- entities, projection for entities with only projected properties,

96-- keyOnly for entities with only a key.

169-- keyOnly for entities with only a key.

@@ -105,6 +178,19 @@ data QueryResultBatchEntityResultType

105

178

106instance Hashable QueryResultBatchEntityResultType

179instance Hashable QueryResultBatchEntityResultType

107

180

181+instance FromText QueryResultBatchEntityResultType where

182+ fromText = \case

183+ "FULL" -> Just QRBERTFull

184+ "KEY_ONLY" -> Just QRBERTKeyOnly

185+ "PROJECTION" -> Just QRBERTProjection

186+ _ -> Nothing

187+

188+instance ToText QueryResultBatchEntityResultType where

189+ toText = \case

190+ QRBERTFull -> "FULL"

191+ QRBERTKeyOnly -> "KEY_ONLY"

192+ QRBERTProjection -> "PROJECTION"

193+

108-- | The state of the query after the current batch. One of notFinished,

194-- | The state of the query after the current batch. One of notFinished,

109-- moreResultsAfterLimit, noMoreResults.

195-- moreResultsAfterLimit, noMoreResults.

110data QueryResultBatchMoreResults

196data QueryResultBatchMoreResults

@@ -118,6 +204,19 @@ data QueryResultBatchMoreResults

118

204

119instance Hashable QueryResultBatchMoreResults

205instance Hashable QueryResultBatchMoreResults

120

206

207+instance FromText QueryResultBatchMoreResults where

208+ fromText = \case

209+ "MORE_RESULTS_AFTER_LIMIT" -> Just QRBMRMoreResultsAfterLimit

210+ "NOT_FINISHED" -> Just QRBMRNotFinished

211+ "NO_MORE_RESULTS" -> Just QRBMRNoMoreResults

212+ _ -> Nothing

213+

214+instance ToText QueryResultBatchMoreResults where

215+ toText = \case

216+ QRBMRMoreResultsAfterLimit -> "MORE_RESULTS_AFTER_LIMIT"

217+ QRBMRNotFinished -> "NOT_FINISHED"

218+ QRBMRNoMoreResults -> "NO_MORE_RESULTS"

219+

121-- | The read consistency to use. One of default, strong, or eventual. Cannot

220-- | The read consistency to use. One of default, strong, or eventual. Cannot

122-- be set when transaction is set. Lookup and ancestor queries default to

221-- be set when transaction is set. Lookup and ancestor queries default to

123-- strong, global queries default to eventual and cannot be set to strong.

222-- strong, global queries default to eventual and cannot be set to strong.

@@ -132,3 +231,16 @@ data ReadOptionsReadConsistency

132 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

231 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

133

232

134instance Hashable ReadOptionsReadConsistency

233instance Hashable ReadOptionsReadConsistency

234+

235+instance FromText ReadOptionsReadConsistency where

236+ fromText = \case

237+ "DEFAULT" -> Just RORCDefault

238+ "EVENTUAL" -> Just RORCEventual

239+ "STRONG" -> Just RORCStrong

240+ _ -> Nothing

241+

242+instance ToText ReadOptionsReadConsistency where

243+ toText = \case

244+ RORCDefault -> "DEFAULT"

245+ RORCEventual -> "EVENTUAL"

246+ RORCStrong -> "STRONG"

gogol-cloud-debugger/gen/Network/Google/CloudDebugger/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudDebugger.Types

8-- Module : Network.Google.CloudDebugger.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.CloudDebugger.Types

15module Network.Google.CloudDebugger.Types

14 (

16 (

15− -- * API Definition

16− clouddebugger

17−

18

17

19 -- * Breakpoint

18 -- * Breakpoint

20− , Breakpoint

19+ Breakpoint

21 , breakpoint

20 , breakpoint

22 , bStatus

21 , bStatus

23 , bLogLevel

22 , bLogLevel

@@ -196,6 +195,3 @@ module Network.Google.CloudDebugger.Types

196import Network.Google.CloudDebugger.Types.Product

195import Network.Google.CloudDebugger.Types.Product

197import Network.Google.CloudDebugger.Types.Sum

196import Network.Google.CloudDebugger.Types.Sum

198import Network.Google.Prelude

197import Network.Google.Prelude

199−

200−clouddebugger :: a

201−clouddebugger = error "clouddebugger"

gogol-cloud-debugger/gen/Network/Google/CloudDebugger/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudDebugger.Types.Product

8-- Module : Network.Google.CloudDebugger.Types.Product

gogol-cloud-debugger/gen/Network/Google/CloudDebugger/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.CloudDebugger.Types.Sum

9-- Module : Network.Google.CloudDebugger.Types.Sum

gogol-cloud-deployments/gen/Network/Google/DeploymentManager/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.DeploymentManager.Types

8-- Module : Network.Google.DeploymentManager.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.DeploymentManager.Types

15module Network.Google.DeploymentManager.Types

14 (

16 (

15− -- * API Definition

16− deploymentmanager

17−

18

17

19 -- * Deployment

18 -- * Deployment

20− , Deployment

19+ Deployment

21 , deployment

20 , deployment

22 , dState

21 , dState

23 , dInsertTime

22 , dInsertTime

@@ -178,6 +177,3 @@ module Network.Google.DeploymentManager.Types

178import Network.Google.DeploymentManager.Types.Product

177import Network.Google.DeploymentManager.Types.Product

179import Network.Google.DeploymentManager.Types.Sum

178import Network.Google.DeploymentManager.Types.Sum

180import Network.Google.Prelude

179import Network.Google.Prelude

181−

182−deploymentmanager :: a

183−deploymentmanager = error "deploymentmanager"

gogol-cloud-deployments/gen/Network/Google/DeploymentManager/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.DeploymentManager.Types.Product

8-- Module : Network.Google.DeploymentManager.Types.Product

gogol-cloud-deployments/gen/Network/Google/DeploymentManager/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.DeploymentManager.Types.Sum

9-- Module : Network.Google.DeploymentManager.Types.Sum

gogol-cloud-dns/gen/Network/Google/CloudDNS/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudDNS.Types

8-- Module : Network.Google.CloudDNS.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.CloudDNS.Types

15module Network.Google.CloudDNS.Types

14 (

16 (

15− -- * API Definition

16− dns

17−

18

17

19 -- * Change

18 -- * Change

20− , Change

19+ Change

21 , change

20 , change

22 , cStatus

21 , cStatus

23 , cAdditions

22 , cAdditions

@@ -91,6 +90,3 @@ module Network.Google.CloudDNS.Types

91import Network.Google.CloudDNS.Types.Product

90import Network.Google.CloudDNS.Types.Product

92import Network.Google.CloudDNS.Types.Sum

91import Network.Google.CloudDNS.Types.Sum

93import Network.Google.Prelude

92import Network.Google.Prelude

94−

95−dns :: a

96−dns = error "dns"

gogol-cloud-dns/gen/Network/Google/CloudDNS/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudDNS.Types.Product

8-- Module : Network.Google.CloudDNS.Types.Product

gogol-cloud-dns/gen/Network/Google/CloudDNS/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.CloudDNS.Types.Sum

9-- Module : Network.Google.CloudDNS.Types.Sum

gogol-cloud-latencytest/gen/Network/Google/CloudNetworkPerformanceMonitoring/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudNetworkPerformanceMonitoring.Types

8-- Module : Network.Google.CloudNetworkPerformanceMonitoring.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.CloudNetworkPerformanceMonitoring.Types

15module Network.Google.CloudNetworkPerformanceMonitoring.Types

14 (

16 (

15− -- * API Definition

16− cloudlatencytest

17−

18

17

19 -- * AggregatedStats

18 -- * AggregatedStats

20− , AggregatedStats

19+ AggregatedStats

21 , aggregatedStats

20 , aggregatedStats

22 , asStats

21 , asStats

23

22

@@ -61,6 +60,3 @@ module Network.Google.CloudNetworkPerformanceMonitoring.Types

61import Network.Google.CloudNetworkPerformanceMonitoring.Types.Product

60import Network.Google.CloudNetworkPerformanceMonitoring.Types.Product

62import Network.Google.CloudNetworkPerformanceMonitoring.Types.Sum

61import Network.Google.CloudNetworkPerformanceMonitoring.Types.Sum

63import Network.Google.Prelude

62import Network.Google.Prelude

64−

65−cloudlatencytest :: a

66−cloudlatencytest = error "cloudlatencytest"

gogol-cloud-latencytest/gen/Network/Google/CloudNetworkPerformanceMonitoring/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudNetworkPerformanceMonitoring.Types.Product

8-- Module : Network.Google.CloudNetworkPerformanceMonitoring.Types.Product

gogol-cloud-latencytest/gen/Network/Google/CloudNetworkPerformanceMonitoring/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.CloudNetworkPerformanceMonitoring.Types.Sum

9-- Module : Network.Google.CloudNetworkPerformanceMonitoring.Types.Sum

gogol-cloud-logging/gen/Network/Google/CloudLogging/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudLogging.Types

8-- Module : Network.Google.CloudLogging.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.CloudLogging.Types

15module Network.Google.CloudLogging.Types

14 (

16 (

15− -- * API Definition

16− logging

17−

18

17

19 -- * Empty

18 -- * Empty

20− , Empty

19+ Empty

21 , empty

20 , empty

22

21

23 -- * HttpRequest

22 -- * HttpRequest

@@ -213,6 +212,3 @@ module Network.Google.CloudLogging.Types

213import Network.Google.CloudLogging.Types.Product

212import Network.Google.CloudLogging.Types.Product

214import Network.Google.CloudLogging.Types.Sum

213import Network.Google.CloudLogging.Types.Sum

215import Network.Google.Prelude

214import Network.Google.Prelude

216−

217−logging :: a

218−logging = error "logging"

gogol-cloud-logging/gen/Network/Google/CloudLogging/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudLogging.Types.Product

8-- Module : Network.Google.CloudLogging.Types.Product

gogol-cloud-logging/gen/Network/Google/CloudLogging/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.CloudLogging.Types.Sum

9-- Module : Network.Google.CloudLogging.Types.Sum

gogol-cloud-monitoring/gen/Network/Google/CloudMonitoring/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudMonitoring.Types

8-- Module : Network.Google.CloudMonitoring.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.CloudMonitoring.Types

15module Network.Google.CloudMonitoring.Types

14 (

16 (

15− -- * API Definition

16− cloudmonitoring

17−

18

17

19 -- * DeleteMetricDescriptorResponse

18 -- * DeleteMetricDescriptorResponse

20− , DeleteMetricDescriptorResponse

19+ DeleteMetricDescriptorResponse

21 , deleteMetricDescriptorResponse

20 , deleteMetricDescriptorResponse

22 , dmdrKind

21 , dmdrKind

23

22

@@ -167,6 +166,3 @@ module Network.Google.CloudMonitoring.Types

167import Network.Google.CloudMonitoring.Types.Product

166import Network.Google.CloudMonitoring.Types.Product

168import Network.Google.CloudMonitoring.Types.Sum

167import Network.Google.CloudMonitoring.Types.Sum

169import Network.Google.Prelude

168import Network.Google.Prelude

170−

171−cloudmonitoring :: a

172−cloudmonitoring = error "cloudmonitoring"

gogol-cloud-monitoring/gen/Network/Google/CloudMonitoring/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudMonitoring.Types.Product

8-- Module : Network.Google.CloudMonitoring.Types.Product

gogol-cloud-monitoring/gen/Network/Google/CloudMonitoring/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.CloudMonitoring.Types.Sum

9-- Module : Network.Google.CloudMonitoring.Types.Sum

gogol-cloud-pubsub/gen/Network/Google/CloudPubSub/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudPubSub.Types

8-- Module : Network.Google.CloudPubSub.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.CloudPubSub.Types

15module Network.Google.CloudPubSub.Types

14 (

16 (

15− -- * API Definition

16− pubsub

17−

18

17

19 -- * AcknowledgeRequest

18 -- * AcknowledgeRequest

20− , AcknowledgeRequest

19+ AcknowledgeRequest

21 , acknowledgeRequest

20 , acknowledgeRequest

22 , arAckIds

21 , arAckIds

23

22

@@ -148,6 +147,3 @@ module Network.Google.CloudPubSub.Types

148import Network.Google.CloudPubSub.Types.Product

147import Network.Google.CloudPubSub.Types.Product

149import Network.Google.CloudPubSub.Types.Sum

148import Network.Google.CloudPubSub.Types.Sum

150import Network.Google.Prelude

149import Network.Google.Prelude

151−

152−pubsub :: a

153−pubsub = error "pubsub"

gogol-cloud-pubsub/gen/Network/Google/CloudPubSub/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudPubSub.Types.Product

8-- Module : Network.Google.CloudPubSub.Types.Product

gogol-cloud-pubsub/gen/Network/Google/CloudPubSub/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.CloudPubSub.Types.Sum

9-- Module : Network.Google.CloudPubSub.Types.Sum

gogol-cloud-resources/gen/Network/Google/CloudResourceManager/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudResourceManager.Types

8-- Module : Network.Google.CloudResourceManager.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.CloudResourceManager.Types

15module Network.Google.CloudResourceManager.Types

14 (

16 (

15− -- * API Definition

16− cloudresourcemanager

17−

18

17

19 -- * Binding

18 -- * Binding

20− , Binding

19+ Binding

21 , binding

20 , binding

22 , bMembers

21 , bMembers

23 , bRole

22 , bRole

@@ -101,6 +100,3 @@ module Network.Google.CloudResourceManager.Types

101import Network.Google.CloudResourceManager.Types.Product

100import Network.Google.CloudResourceManager.Types.Product

102import Network.Google.CloudResourceManager.Types.Sum

101import Network.Google.CloudResourceManager.Types.Sum

103import Network.Google.Prelude

102import Network.Google.Prelude

104−

105−cloudresourcemanager :: a

106−cloudresourcemanager = error "cloudresourcemanager"

gogol-cloud-resources/gen/Network/Google/CloudResourceManager/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudResourceManager.Types.Product

8-- Module : Network.Google.CloudResourceManager.Types.Product

gogol-cloud-resources/gen/Network/Google/CloudResourceManager/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.CloudResourceManager.Types.Sum

9-- Module : Network.Google.CloudResourceManager.Types.Sum

gogol-cloud-sqladmin/gen/Network/Google/SQLAdmin/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.SQLAdmin.Types

8-- Module : Network.Google.SQLAdmin.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.SQLAdmin.Types

15module Network.Google.SQLAdmin.Types

14 (

16 (

15− -- * API Definition

16− sqladmin

17−

18

17

19 -- * AclEntry

18 -- * AclEntry

20− , AclEntry

19+ AclEntry

21 , aclEntry

20 , aclEntry

22 , aeKind

21 , aeKind

23 , aeValue

22 , aeValue

@@ -384,6 +383,3 @@ module Network.Google.SQLAdmin.Types

384import Network.Google.Prelude

383import Network.Google.Prelude

385import Network.Google.SQLAdmin.Types.Product

384import Network.Google.SQLAdmin.Types.Product

386import Network.Google.SQLAdmin.Types.Sum

385import Network.Google.SQLAdmin.Types.Sum

387−

388−sqladmin :: a

389−sqladmin = error "sqladmin"

gogol-cloud-sqladmin/gen/Network/Google/SQLAdmin/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.SQLAdmin.Types.Product

8-- Module : Network.Google.SQLAdmin.Types.Product

gogol-cloud-sqladmin/gen/Network/Google/SQLAdmin/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.SQLAdmin.Types.Sum

9-- Module : Network.Google.SQLAdmin.Types.Sum

gogol-cloud-users/gen/Network/Google/CloudUserAccounts/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudUserAccounts.Types

8-- Module : Network.Google.CloudUserAccounts.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.CloudUserAccounts.Types

15module Network.Google.CloudUserAccounts.Types

14 (

16 (

15− -- * API Definition

16− clouduseraccounts

17−

18

17

19 -- * AuthorizedKeysView

18 -- * AuthorizedKeysView

20− , AuthorizedKeysView

19+ AuthorizedKeysView

21 , authorizedKeysView

20 , authorizedKeysView

22 , akvSudoer

21 , akvSudoer

23 , akvKeys

22 , akvKeys

@@ -187,6 +186,3 @@ module Network.Google.CloudUserAccounts.Types

187import Network.Google.CloudUserAccounts.Types.Product

186import Network.Google.CloudUserAccounts.Types.Product

188import Network.Google.CloudUserAccounts.Types.Sum

187import Network.Google.CloudUserAccounts.Types.Sum

189import Network.Google.Prelude

188import Network.Google.Prelude

190−

191−clouduseraccounts :: a

192−clouduseraccounts = error "clouduseraccounts"

gogol-cloud-users/gen/Network/Google/CloudUserAccounts/Types/Product.hs+4−2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudUserAccounts.Types.Product

8-- Module : Network.Google.CloudUserAccounts.Types.Product

@@ -475,7 +477,7 @@ data Operation = Operation

475 , _oRegion :: !(Maybe Text)

477 , _oRegion :: !(Maybe Text)

476 , _oTargetLink :: !(Maybe Text)

478 , _oTargetLink :: !(Maybe Text)

477 , _oClientOperationId :: !(Maybe Text)

479 , _oClientOperationId :: !(Maybe Text)

478− }

480+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

479

481

480-- | Creates a value of 'Operation' with the minimum fields required to make a request.

482-- | Creates a value of 'Operation' with the minimum fields required to make a request.

481--

483--

@@ -787,7 +789,7 @@ data OperationItemWarnings = OperationItemWarnings

787 { _oiwData :: !(Maybe [OperationItemDataItemWarnings])

789 { _oiwData :: !(Maybe [OperationItemDataItemWarnings])

788 , _oiwCode :: !(Maybe OperationCodeItemWarnings)

790 , _oiwCode :: !(Maybe OperationCodeItemWarnings)

789 , _oiwMessage :: !(Maybe Text)

791 , _oiwMessage :: !(Maybe Text)

790− }

792+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

791

793

792-- | Creates a value of 'OperationItemWarnings' with the minimum fields required to make a request.

794-- | Creates a value of 'OperationItemWarnings' with the minimum fields required to make a request.

793--

795--

gogol-cloud-users/gen/Network/Google/CloudUserAccounts/Types/Sum.hs+51

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.CloudUserAccounts.Types.Sum

9-- Module : Network.Google.CloudUserAccounts.Types.Sum

@@ -48,6 +51,41 @@ data OperationCodeItemWarnings

48

51

49instance Hashable OperationCodeItemWarnings

52instance Hashable OperationCodeItemWarnings

50

53

54+instance FromText OperationCodeItemWarnings where

55+ fromText = \case

56+ "DEPRECATED_RESOURCE_USED" -> Just OCIWDeprecatedResourceUsed

57+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just OCIWDiskSizeLargerThanImageSize

58+ "INJECTED_KERNELS_DEPRECATED" -> Just OCIWInjectedKernelsDeprecated

59+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just OCIWNextHopAddressNotAssigned

60+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just OCIWNextHopCannotIPForward

61+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just OCIWNextHopInstanceNotFound

62+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just OCIWNextHopInstanceNotOnNetwork

63+ "NEXT_HOP_NOT_RUNNING" -> Just OCIWNextHopNotRunning

64+ "NOT_CRITICAL_ERROR" -> Just OCIWNotCriticalError

65+ "NO_RESULTS_ON_PAGE" -> Just OCIWNoResultsOnPage

66+ "REQUIRED_TOS_AGREEMENT" -> Just OCIWRequiredTosAgreement

67+ "RESOURCE_NOT_DELETED" -> Just OCIWResourceNotDeleted

68+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just OCIWSingleInstancePropertyTemplate

69+ "UNREACHABLE" -> Just OCIWUnreachable

70+ _ -> Nothing

71+

72+instance ToText OperationCodeItemWarnings where

73+ toText = \case

74+ OCIWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

75+ OCIWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

76+ OCIWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

77+ OCIWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

78+ OCIWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

79+ OCIWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

80+ OCIWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

81+ OCIWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

82+ OCIWNotCriticalError -> "NOT_CRITICAL_ERROR"

83+ OCIWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"

84+ OCIWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

85+ OCIWResourceNotDeleted -> "RESOURCE_NOT_DELETED"

86+ OCIWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

87+ OCIWUnreachable -> "UNREACHABLE"

88+

51-- | [Output Only] Status of the operation. Can be one of the following:

89-- | [Output Only] Status of the operation. Can be one of the following:

52-- PENDING, RUNNING, or DONE.

90-- PENDING, RUNNING, or DONE.

53data OperationStatus

91data OperationStatus

@@ -60,3 +98,16 @@ data OperationStatus

60 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

98 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

61

99

62instance Hashable OperationStatus

100instance Hashable OperationStatus

101+

102+instance FromText OperationStatus where

103+ fromText = \case

104+ "DONE" -> Just OSDone

105+ "PENDING" -> Just OSPending

106+ "RUNNING" -> Just OSRunning

107+ _ -> Nothing

108+

109+instance ToText OperationStatus where

110+ toText = \case

111+ OSDone -> "DONE"

112+ OSPending -> "PENDING"

113+ OSRunning -> "RUNNING"

gogol-compute/gen/Network/Google/Compute/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Compute.Types

8-- Module : Network.Google.Compute.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Compute.Types

15module Network.Google.Compute.Types

14 (

16 (

15− -- * API Definition

16− compute

17−

18

17

19 -- * AccessConfig

18 -- * AccessConfig

20− , AccessConfig

19+ AccessConfig

21 , accessConfig

20 , accessConfig

22 , acKind

21 , acKind

23 , acName

22 , acName

@@ -1745,6 +1744,3 @@ module Network.Google.Compute.Types

1745import Network.Google.Compute.Types.Product

1744import Network.Google.Compute.Types.Product

1746import Network.Google.Compute.Types.Sum

1745import Network.Google.Compute.Types.Sum

1747import Network.Google.Prelude

1746import Network.Google.Prelude

1748−

1749−compute :: a

1750−compute = error "compute"

gogol-compute/gen/Network/Google/Compute/Types/Product.hs+59−57

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Compute.Types.Product

8-- Module : Network.Google.Compute.Types.Product

@@ -23,7 +25,7 @@ data AccessConfig = AccessConfig

23 , _acName :: !(Maybe Text)

25 , _acName :: !(Maybe Text)

24 , _acNatIP :: !(Maybe Text)

26 , _acNatIP :: !(Maybe Text)

25 , _acType :: !AccessConfigType

27 , _acType :: !AccessConfigType

26− }

28+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

27

29

28-- | Creates a value of 'AccessConfig' with the minimum fields required to make a request.

30-- | Creates a value of 'AccessConfig' with the minimum fields required to make a request.

29--

31--

@@ -82,7 +84,7 @@ data Address = Address

82 , _addId :: !(Maybe Word64)

84 , _addId :: !(Maybe Word64)

83 , _addRegion :: !(Maybe Text)

85 , _addRegion :: !(Maybe Text)

84 , _addDescription :: !(Maybe Text)

86 , _addDescription :: !(Maybe Text)

85− }

87+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

86

88

87-- | Creates a value of 'Address' with the minimum fields required to make a request.

89-- | Creates a value of 'Address' with the minimum fields required to make a request.

88--

90--

@@ -323,7 +325,7 @@ alId = lens _alId (\ s a -> s{_alId = a})

323data AddressesScopedList = AddressesScopedList

325data AddressesScopedList = AddressesScopedList

324 { _aslAddresses :: !(Maybe [Maybe Address])

326 { _aslAddresses :: !(Maybe [Maybe Address])

325 , _aslWarning :: !(Maybe AddressesScopedListWarning)

327 , _aslWarning :: !(Maybe AddressesScopedListWarning)

326− }

328+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

327

329

328-- | Creates a value of 'AddressesScopedList' with the minimum fields required to make a request.

330-- | Creates a value of 'AddressesScopedList' with the minimum fields required to make a request.

329--

331--

@@ -393,7 +395,7 @@ data AddressesScopedListWarning = AddressesScopedListWarning

393 { _aslwData :: !(Maybe [AddressesScopedListItemDataWarning])

395 { _aslwData :: !(Maybe [AddressesScopedListItemDataWarning])

394 , _aslwCode :: !(Maybe AddressesScopedListCodeWarning)

396 , _aslwCode :: !(Maybe AddressesScopedListCodeWarning)

395 , _aslwMessage :: !(Maybe Text)

397 , _aslwMessage :: !(Maybe Text)

396− }

398+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

397

399

398-- | Creates a value of 'AddressesScopedListWarning' with the minimum fields required to make a request.

400-- | Creates a value of 'AddressesScopedListWarning' with the minimum fields required to make a request.

399--

401--

@@ -444,7 +446,7 @@ data AttachedDisk = AttachedDisk

444 , _adLicenses :: !(Maybe [Text])

446 , _adLicenses :: !(Maybe [Text])

445 , _adType :: !(Maybe AttachedDiskType)

447 , _adType :: !(Maybe AttachedDiskType)

446 , _adIndex :: !(Maybe Int32)

448 , _adIndex :: !(Maybe Int32)

447− }

449+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

448

450

449-- | Creates a value of 'AttachedDisk' with the minimum fields required to make a request.

451-- | Creates a value of 'AttachedDisk' with the minimum fields required to make a request.

450--

452--

@@ -871,7 +873,7 @@ aId = lens _aId (\ s a -> s{_aId = a})

871data AutoscalersScopedList = AutoscalersScopedList

873data AutoscalersScopedList = AutoscalersScopedList

872 { _aAutoscalers :: !(Maybe [Maybe Autoscaler])

874 { _aAutoscalers :: !(Maybe [Maybe Autoscaler])

873 , _aWarning :: !(Maybe AutoscalersScopedListWarning)

875 , _aWarning :: !(Maybe AutoscalersScopedListWarning)

874− }

876+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

875

877

876-- | Creates a value of 'AutoscalersScopedList' with the minimum fields required to make a request.

878-- | Creates a value of 'AutoscalersScopedList' with the minimum fields required to make a request.

877--

879--

@@ -938,7 +940,7 @@ data AutoscalersScopedListWarning = AutoscalersScopedListWarning

938 { _aData :: !(Maybe [AutoscalersScopedListItemDataWarning])

940 { _aData :: !(Maybe [AutoscalersScopedListItemDataWarning])

939 , _aCode :: !(Maybe AutoscalersScopedListCodeWarning)

941 , _aCode :: !(Maybe AutoscalersScopedListCodeWarning)

940 , _aMessage :: !(Maybe Text)

942 , _aMessage :: !(Maybe Text)

941− }

943+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

942

944

943-- | Creates a value of 'AutoscalersScopedListWarning' with the minimum fields required to make a request.

945-- | Creates a value of 'AutoscalersScopedListWarning' with the minimum fields required to make a request.

944--

946--

@@ -1095,7 +1097,7 @@ data AutoscalingPolicyCustomMetricUtilization = AutoscalingPolicyCustomMetricUti

1095 { _apcmuUtilizationTarget :: !(Maybe Double)

1097 { _apcmuUtilizationTarget :: !(Maybe Double)

1096 , _apcmuMetric :: !(Maybe Text)

1098 , _apcmuMetric :: !(Maybe Text)

1097 , _apcmuUtilizationTargetType :: !(Maybe AutoscalingPolicyCustomMetricUtilizationUtilizationTargetType)

1099 , _apcmuUtilizationTargetType :: !(Maybe AutoscalingPolicyCustomMetricUtilizationUtilizationTargetType)

1098− }

1100+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1099

1101

1100-- | Creates a value of 'AutoscalingPolicyCustomMetricUtilization' with the minimum fields required to make a request.

1102-- | Creates a value of 'AutoscalingPolicyCustomMetricUtilization' with the minimum fields required to make a request.

1101--

1103--

@@ -1178,7 +1180,7 @@ data Backend = Backend

1178 , _bMaxRatePerInstance :: !(Maybe Float)

1180 , _bMaxRatePerInstance :: !(Maybe Float)

1179 , _bDescription :: !(Maybe Text)

1181 , _bDescription :: !(Maybe Text)

1180 , _bCapacityScaler :: !(Maybe Float)

1182 , _bCapacityScaler :: !(Maybe Float)

1181− }

1183+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1182

1184

1183-- | Creates a value of 'Backend' with the minimum fields required to make a request.

1185-- | Creates a value of 'Backend' with the minimum fields required to make a request.

1184--

1186--

@@ -1283,7 +1285,7 @@ data BackendService = BackendService

1283 , _bsPortName :: !(Maybe Text)

1285 , _bsPortName :: !(Maybe Text)

1284 , _bsHealthChecks :: !(Maybe [Text])

1286 , _bsHealthChecks :: !(Maybe [Text])

1285 , _bsPort :: !(Maybe Int32)

1287 , _bsPort :: !(Maybe Int32)

1286− }

1288+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1287

1289

1288-- | Creates a value of 'BackendService' with the minimum fields required to make a request.

1290-- | Creates a value of 'BackendService' with the minimum fields required to make a request.

1289--

1291--

@@ -1522,7 +1524,7 @@ data DeprecationStatus = DeprecationStatus

1522 , _dsReplacement :: !(Maybe Text)

1524 , _dsReplacement :: !(Maybe Text)

1523 , _dsObsolete :: !(Maybe Text)

1525 , _dsObsolete :: !(Maybe Text)

1524 , _dsDeprecated :: !(Maybe Text)

1526 , _dsDeprecated :: !(Maybe Text)

1525− }

1527+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1526

1528

1527-- | Creates a value of 'DeprecationStatus' with the minimum fields required to make a request.

1529-- | Creates a value of 'DeprecationStatus' with the minimum fields required to make a request.

1528--

1530--

@@ -1606,7 +1608,7 @@ data Disk = Disk

1606 , _dType :: !(Maybe Text)

1608 , _dType :: !(Maybe Text)

1607 , _dDescription :: !(Maybe Text)

1609 , _dDescription :: !(Maybe Text)

1608 , _dSourceSnapshot :: !(Maybe Text)

1610 , _dSourceSnapshot :: !(Maybe Text)

1609− }

1611+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1610

1612

1611-- | Creates a value of 'Disk' with the minimum fields required to make a request.

1613-- | Creates a value of 'Disk' with the minimum fields required to make a request.

1612--

1614--

@@ -2227,7 +2229,7 @@ dtlId = lens _dtlId (\ s a -> s{_dtlId = a})

2227data DiskTypesScopedList = DiskTypesScopedList

2229data DiskTypesScopedList = DiskTypesScopedList

2228 { _dtslDiskTypes :: !(Maybe [Maybe DiskType])

2230 { _dtslDiskTypes :: !(Maybe [Maybe DiskType])

2229 , _dtslWarning :: !(Maybe DiskTypesScopedListWarning)

2231 , _dtslWarning :: !(Maybe DiskTypesScopedListWarning)

2230− }

2232+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

2231

2233

2232-- | Creates a value of 'DiskTypesScopedList' with the minimum fields required to make a request.

2234-- | Creates a value of 'DiskTypesScopedList' with the minimum fields required to make a request.

2233--

2235--

@@ -2298,7 +2300,7 @@ data DiskTypesScopedListWarning = DiskTypesScopedListWarning

2298 { _dtslwData :: !(Maybe [DiskTypesScopedListItemDataWarning])

2300 { _dtslwData :: !(Maybe [DiskTypesScopedListItemDataWarning])

2299 , _dtslwCode :: !(Maybe DiskTypesScopedListCodeWarning)

2301 , _dtslwCode :: !(Maybe DiskTypesScopedListCodeWarning)

2300 , _dtslwMessage :: !(Maybe Text)

2302 , _dtslwMessage :: !(Maybe Text)

2301− }

2303+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

2302

2304

2303-- | Creates a value of 'DiskTypesScopedListWarning' with the minimum fields required to make a request.

2305-- | Creates a value of 'DiskTypesScopedListWarning' with the minimum fields required to make a request.

2304--

2306--

@@ -2340,7 +2342,7 @@ dtslwMessage

2340data DisksScopedList = DisksScopedList

2342data DisksScopedList = DisksScopedList

2341 { _dslWarning :: !(Maybe DisksScopedListWarning)

2343 { _dslWarning :: !(Maybe DisksScopedListWarning)

2342 , _dslDisks :: !(Maybe [Maybe Disk])

2344 , _dslDisks :: !(Maybe [Maybe Disk])

2343− }

2345+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

2344

2346

2345-- | Creates a value of 'DisksScopedList' with the minimum fields required to make a request.

2347-- | Creates a value of 'DisksScopedList' with the minimum fields required to make a request.

2346--

2348--

@@ -2410,7 +2412,7 @@ data DisksScopedListWarning = DisksScopedListWarning

2410 { _dslwData :: !(Maybe [DisksScopedListItemDataWarning])

2412 { _dslwData :: !(Maybe [DisksScopedListItemDataWarning])

2411 , _dslwCode :: !(Maybe DisksScopedListCodeWarning)

2413 , _dslwCode :: !(Maybe DisksScopedListCodeWarning)

2412 , _dslwMessage :: !(Maybe Text)

2414 , _dslwMessage :: !(Maybe Text)

2413− }

2415+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

2414

2416

2415-- | Creates a value of 'DisksScopedListWarning' with the minimum fields required to make a request.

2417-- | Creates a value of 'DisksScopedListWarning' with the minimum fields required to make a request.

2416--

2418--

@@ -2714,7 +2716,7 @@ data ForwardingRule = ForwardingRule

2714 , _frRegion :: !(Maybe Text)

2716 , _frRegion :: !(Maybe Text)

2715 , _frDescription :: !(Maybe Text)

2717 , _frDescription :: !(Maybe Text)

2716 , _frTarget :: !(Maybe Text)

2718 , _frTarget :: !(Maybe Text)

2717− }

2719+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

2718

2720

2719-- | Creates a value of 'ForwardingRule' with the minimum fields required to make a request.

2721-- | Creates a value of 'ForwardingRule' with the minimum fields required to make a request.

2720--

2722--

@@ -2967,7 +2969,7 @@ frlId = lens _frlId (\ s a -> s{_frlId = a})

2967data ForwardingRulesScopedList = ForwardingRulesScopedList

2969data ForwardingRulesScopedList = ForwardingRulesScopedList

2968 { _frslWarning :: !(Maybe ForwardingRulesScopedListWarning)

2970 { _frslWarning :: !(Maybe ForwardingRulesScopedListWarning)

2969 , _frslForwardingRules :: !(Maybe [Maybe ForwardingRule])

2971 , _frslForwardingRules :: !(Maybe [Maybe ForwardingRule])

2970− }

2972+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

2971

2973

2972-- | Creates a value of 'ForwardingRulesScopedList' with the minimum fields required to make a request.

2974-- | Creates a value of 'ForwardingRulesScopedList' with the minimum fields required to make a request.

2973--

2975--

@@ -3038,7 +3040,7 @@ data ForwardingRulesScopedListWarning = ForwardingRulesScopedListWarning

3038 { _frslwData :: !(Maybe [ForwardingRulesScopedListItemDataWarning])

3040 { _frslwData :: !(Maybe [ForwardingRulesScopedListItemDataWarning])

3039 , _frslwCode :: !(Maybe ForwardingRulesScopedListCodeWarning)

3041 , _frslwCode :: !(Maybe ForwardingRulesScopedListCodeWarning)

3040 , _frslwMessage :: !(Maybe Text)

3042 , _frslwMessage :: !(Maybe Text)

3041− }

3043+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

3042

3044

3043-- | Creates a value of 'ForwardingRulesScopedListWarning' with the minimum fields required to make a request.

3045-- | Creates a value of 'ForwardingRulesScopedListWarning' with the minimum fields required to make a request.

3044--

3046--

@@ -3105,7 +3107,7 @@ data HealthStatus = HealthStatus

3105 , _hsHealthState :: !(Maybe HealthStatusHealthState)

3107 , _hsHealthState :: !(Maybe HealthStatusHealthState)

3106 , _hsPort :: !(Maybe Int32)

3108 , _hsPort :: !(Maybe Int32)

3107 , _hsInstance :: !(Maybe Text)

3109 , _hsInstance :: !(Maybe Text)

3108− }

3110+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

3109

3111

3110-- | Creates a value of 'HealthStatus' with the minimum fields required to make a request.

3112-- | Creates a value of 'HealthStatus' with the minimum fields required to make a request.

3111--

3113--

@@ -3428,7 +3430,7 @@ data Image = Image

3428 , _imaSourceDisk :: !(Maybe Text)

3430 , _imaSourceDisk :: !(Maybe Text)

3429 , _imaDescription :: !(Maybe Text)

3431 , _imaDescription :: !(Maybe Text)

3430 , _imaDeprecated :: !(Maybe (Maybe DeprecationStatus))

3432 , _imaDeprecated :: !(Maybe (Maybe DeprecationStatus))

3431− }

3433+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

3432

3434

3433-- | Creates a value of 'Image' with the minimum fields required to make a request.

3435-- | Creates a value of 'Image' with the minimum fields required to make a request.

3434--

3436--

@@ -3653,7 +3655,7 @@ data ImageRawDisk = ImageRawDisk

3653 { _irdContainerType :: !(Maybe ImageContainerTypeRawDisk)

3655 { _irdContainerType :: !(Maybe ImageContainerTypeRawDisk)

3654 , _irdSource :: !(Maybe Text)

3656 , _irdSource :: !(Maybe Text)

3655 , _irdSha1Checksum :: !(Maybe Text)

3657 , _irdSha1Checksum :: !(Maybe Text)

3656− }

3658+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

3657

3659

3658-- | Creates a value of 'ImageRawDisk' with the minimum fields required to make a request.

3660-- | Creates a value of 'ImageRawDisk' with the minimum fields required to make a request.

3659--

3661--

@@ -3717,7 +3719,7 @@ data Instance = Instance

3717 , _iCanIpForward :: !(Maybe Bool)

3719 , _iCanIpForward :: !(Maybe Bool)

3718 , _iDescription :: !(Maybe Text)

3720 , _iDescription :: !(Maybe Text)

3719 , _iTags :: !(Maybe (Maybe Tags))

3721 , _iTags :: !(Maybe (Maybe Tags))

3720− }

3722+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

3721

3723

3722-- | Creates a value of 'Instance' with the minimum fields required to make a request.

3724-- | Creates a value of 'Instance' with the minimum fields required to make a request.

3723--

3725--

@@ -4749,7 +4751,7 @@ igmrirInstances

4749data InstanceGroupManagersScopedList = InstanceGroupManagersScopedList

4751data InstanceGroupManagersScopedList = InstanceGroupManagersScopedList

4750 { _igmslWarning :: !(Maybe InstanceGroupManagersScopedListWarning)

4752 { _igmslWarning :: !(Maybe InstanceGroupManagersScopedListWarning)

4751 , _igmslInstanceGroupManagers :: !(Maybe [Maybe InstanceGroupManager])

4753 , _igmslInstanceGroupManagers :: !(Maybe [Maybe InstanceGroupManager])

4752− }

4754+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

4753

4755

4754-- | Creates a value of 'InstanceGroupManagersScopedList' with the minimum fields required to make a request.

4756-- | Creates a value of 'InstanceGroupManagersScopedList' with the minimum fields required to make a request.

4755--

4757--

@@ -4822,7 +4824,7 @@ data InstanceGroupManagersScopedListWarning = InstanceGroupManagersScopedListWar

4822 { _igmslwData :: !(Maybe [InstanceGroupManagersScopedListItemDataWarning])

4824 { _igmslwData :: !(Maybe [InstanceGroupManagersScopedListItemDataWarning])

4823 , _igmslwCode :: !(Maybe InstanceGroupManagersScopedListCodeWarning)

4825 , _igmslwCode :: !(Maybe InstanceGroupManagersScopedListCodeWarning)

4824 , _igmslwMessage :: !(Maybe Text)

4826 , _igmslwMessage :: !(Maybe Text)

4825− }

4827+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

4826

4828

4827-- | Creates a value of 'InstanceGroupManagersScopedListWarning' with the minimum fields required to make a request.

4829-- | Creates a value of 'InstanceGroupManagersScopedListWarning' with the minimum fields required to make a request.

4828--

4830--

@@ -5023,7 +5025,7 @@ igliId = lens _igliId (\ s a -> s{_igliId = a})

5023-- /See:/ 'instanceGroupsListInstancesRequest' smart constructor.

5025-- /See:/ 'instanceGroupsListInstancesRequest' smart constructor.

5024newtype InstanceGroupsListInstancesRequest = InstanceGroupsListInstancesRequest

5026newtype InstanceGroupsListInstancesRequest = InstanceGroupsListInstancesRequest

5025 { _iglirInstanceState :: Maybe InstanceGroupsListInstancesRequestInstanceState

5027 { _iglirInstanceState :: Maybe InstanceGroupsListInstancesRequestInstanceState

5026− }

5028+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5027

5029

5028-- | Creates a value of 'InstanceGroupsListInstancesRequest' with the minimum fields required to make a request.

5030-- | Creates a value of 'InstanceGroupsListInstancesRequest' with the minimum fields required to make a request.

5029--

5031--

@@ -5076,7 +5078,7 @@ igrirInstances

5076data InstanceGroupsScopedList = InstanceGroupsScopedList

5078data InstanceGroupsScopedList = InstanceGroupsScopedList

5077 { _igslWarning :: !(Maybe InstanceGroupsScopedListWarning)

5079 { _igslWarning :: !(Maybe InstanceGroupsScopedListWarning)

5078 , _igslInstanceGroups :: !(Maybe [Maybe InstanceGroup])

5080 , _igslInstanceGroups :: !(Maybe [Maybe InstanceGroup])

5079− }

5081+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5080

5082

5081-- | Creates a value of 'InstanceGroupsScopedList' with the minimum fields required to make a request.

5083-- | Creates a value of 'InstanceGroupsScopedList' with the minimum fields required to make a request.

5082--

5084--

@@ -5148,7 +5150,7 @@ data InstanceGroupsScopedListWarning = InstanceGroupsScopedListWarning

5148 { _igslwData :: !(Maybe [InstanceGroupsScopedListItemDataWarning])

5150 { _igslwData :: !(Maybe [InstanceGroupsScopedListItemDataWarning])

5149 , _igslwCode :: !(Maybe InstanceGroupsScopedListCodeWarning)

5151 , _igslwCode :: !(Maybe InstanceGroupsScopedListCodeWarning)

5150 , _igslwMessage :: !(Maybe Text)

5152 , _igslwMessage :: !(Maybe Text)

5151− }

5153+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5152

5154

5153-- | Creates a value of 'InstanceGroupsScopedListWarning' with the minimum fields required to make a request.

5155-- | Creates a value of 'InstanceGroupsScopedListWarning' with the minimum fields required to make a request.

5154--

5156--

@@ -5626,7 +5628,7 @@ data InstanceWithNamedPorts = InstanceWithNamedPorts

5626 { _iwnpStatus :: !(Maybe InstanceWithNamedPortsStatus)

5628 { _iwnpStatus :: !(Maybe InstanceWithNamedPortsStatus)

5627 , _iwnpNamedPorts :: !(Maybe [Maybe NamedPort])

5629 , _iwnpNamedPorts :: !(Maybe [Maybe NamedPort])

5628 , _iwnpInstance :: !(Maybe Text)

5630 , _iwnpInstance :: !(Maybe Text)

5629− }

5631+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5630

5632

5631-- | Creates a value of 'InstanceWithNamedPorts' with the minimum fields required to make a request.

5633-- | Creates a value of 'InstanceWithNamedPorts' with the minimum fields required to make a request.

5632--

5634--

@@ -5669,7 +5671,7 @@ iwnpInstance

5669data InstancesScopedList = InstancesScopedList

5671data InstancesScopedList = InstancesScopedList

5670 { _islWarning :: !(Maybe InstancesScopedListWarning)

5672 { _islWarning :: !(Maybe InstancesScopedListWarning)

5671 , _islInstances :: !(Maybe [Maybe Instance])

5673 , _islInstances :: !(Maybe [Maybe Instance])

5672− }

5674+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5673

5675

5674-- | Creates a value of 'InstancesScopedList' with the minimum fields required to make a request.

5676-- | Creates a value of 'InstancesScopedList' with the minimum fields required to make a request.

5675--

5677--

@@ -5739,7 +5741,7 @@ data InstancesScopedListWarning = InstancesScopedListWarning

5739 { _islwData :: !(Maybe [InstancesScopedListItemDataWarning])

5741 { _islwData :: !(Maybe [InstancesScopedListItemDataWarning])

5740 , _islwCode :: !(Maybe InstancesScopedListCodeWarning)

5742 , _islwCode :: !(Maybe InstancesScopedListCodeWarning)

5741 , _islwMessage :: !(Maybe Text)

5743 , _islwMessage :: !(Maybe Text)

5742− }

5744+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5743

5745

5744-- | Creates a value of 'InstancesScopedListWarning' with the minimum fields required to make a request.

5746-- | Creates a value of 'InstancesScopedListWarning' with the minimum fields required to make a request.

5745--

5747--

@@ -6137,7 +6139,7 @@ mtlId = lens _mtlId (\ s a -> s{_mtlId = a})

6137data MachineTypesScopedList = MachineTypesScopedList

6139data MachineTypesScopedList = MachineTypesScopedList

6138 { _mtslMachineTypes :: !(Maybe [Maybe MachineType])

6140 { _mtslMachineTypes :: !(Maybe [Maybe MachineType])

6139 , _mtslWarning :: !(Maybe MachineTypesScopedListWarning)

6141 , _mtslWarning :: !(Maybe MachineTypesScopedListWarning)

6140− }

6142+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

6141

6143

6142-- | Creates a value of 'MachineTypesScopedList' with the minimum fields required to make a request.

6144-- | Creates a value of 'MachineTypesScopedList' with the minimum fields required to make a request.

6143--

6145--

@@ -6208,7 +6210,7 @@ data MachineTypesScopedListWarning = MachineTypesScopedListWarning

6208 { _mtslwData :: !(Maybe [MachineTypesScopedListItemDataWarning])

6210 { _mtslwData :: !(Maybe [MachineTypesScopedListItemDataWarning])

6209 , _mtslwCode :: !(Maybe MachineTypesScopedListCodeWarning)

6211 , _mtslwCode :: !(Maybe MachineTypesScopedListCodeWarning)

6210 , _mtslwMessage :: !(Maybe Text)

6212 , _mtslwMessage :: !(Maybe Text)

6211− }

6213+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

6212

6214

6213-- | Creates a value of 'MachineTypesScopedListWarning' with the minimum fields required to make a request.

6215-- | Creates a value of 'MachineTypesScopedListWarning' with the minimum fields required to make a request.

6214--

6216--

@@ -6253,7 +6255,7 @@ data ManagedInstance = ManagedInstance

6253 , _miId :: !(Maybe Word64)

6255 , _miId :: !(Maybe Word64)

6254 , _miInstanceStatus :: !(Maybe ManagedInstanceInstanceStatus)

6256 , _miInstanceStatus :: !(Maybe ManagedInstanceInstanceStatus)

6255 , _miInstance :: !(Maybe Text)

6257 , _miInstance :: !(Maybe Text)

6256− }

6258+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

6257

6259

6258-- | Creates a value of 'ManagedInstance' with the minimum fields required to make a request.

6260-- | Creates a value of 'ManagedInstance' with the minimum fields required to make a request.

6259--

6261--

@@ -6768,7 +6770,7 @@ data Operation = Operation

6768 , _oRegion :: !(Maybe Text)

6770 , _oRegion :: !(Maybe Text)

6769 , _oTargetLink :: !(Maybe Text)

6771 , _oTargetLink :: !(Maybe Text)

6770 , _oClientOperationId :: !(Maybe Text)

6772 , _oClientOperationId :: !(Maybe Text)

6771− }

6773+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

6772

6774

6773-- | Creates a value of 'Operation' with the minimum fields required to make a request.

6775-- | Creates a value of 'Operation' with the minimum fields required to make a request.

6774--

6776--

@@ -7150,7 +7152,7 @@ data OperationItemWarnings = OperationItemWarnings

7150 { _oiwData :: !(Maybe [OperationItemDataItemWarnings])

7152 { _oiwData :: !(Maybe [OperationItemDataItemWarnings])

7151 , _oiwCode :: !(Maybe OperationCodeItemWarnings)

7153 , _oiwCode :: !(Maybe OperationCodeItemWarnings)

7152 , _oiwMessage :: !(Maybe Text)

7154 , _oiwMessage :: !(Maybe Text)

7153− }

7155+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

7154

7156

7155-- | Creates a value of 'OperationItemWarnings' with the minimum fields required to make a request.

7157-- | Creates a value of 'OperationItemWarnings' with the minimum fields required to make a request.

7156--

7158--

@@ -7251,7 +7253,7 @@ olId = lens _olId (\ s a -> s{_olId = a})

7251data OperationsScopedList = OperationsScopedList

7253data OperationsScopedList = OperationsScopedList

7252 { _oslWarning :: !(Maybe OperationsScopedListWarning)

7254 { _oslWarning :: !(Maybe OperationsScopedListWarning)

7253 , _oslOperations :: !(Maybe [Maybe Operation])

7255 , _oslOperations :: !(Maybe [Maybe Operation])

7254− }

7256+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

7255

7257

7256-- | Creates a value of 'OperationsScopedList' with the minimum fields required to make a request.

7258-- | Creates a value of 'OperationsScopedList' with the minimum fields required to make a request.

7257--

7259--

@@ -7322,7 +7324,7 @@ data OperationsScopedListWarning = OperationsScopedListWarning

7322 { _oslwData :: !(Maybe [OperationsScopedListItemDataWarning])

7324 { _oslwData :: !(Maybe [OperationsScopedListItemDataWarning])

7323 , _oslwCode :: !(Maybe OperationsScopedListCodeWarning)

7325 , _oslwCode :: !(Maybe OperationsScopedListCodeWarning)

7324 , _oslwMessage :: !(Maybe Text)

7326 , _oslwMessage :: !(Maybe Text)

7325− }

7327+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

7326

7328

7327-- | Creates a value of 'OperationsScopedListWarning' with the minimum fields required to make a request.

7329-- | Creates a value of 'OperationsScopedListWarning' with the minimum fields required to make a request.

7328--

7330--

@@ -7574,7 +7576,7 @@ data Quota = Quota

7574 { _qMetric :: !(Maybe QuotaMetric)

7576 { _qMetric :: !(Maybe QuotaMetric)

7575 , _qLimit :: !(Maybe Double)

7577 , _qLimit :: !(Maybe Double)

7576 , _qUsage :: !(Maybe Double)

7578 , _qUsage :: !(Maybe Double)

7577− }

7579+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

7578

7580

7579-- | Creates a value of 'Quota' with the minimum fields required to make a request.

7581-- | Creates a value of 'Quota' with the minimum fields required to make a request.

7580--

7582--

@@ -7620,7 +7622,7 @@ data Region = Region

7620 , _rId :: !(Maybe Word64)

7622 , _rId :: !(Maybe Word64)

7621 , _rDescription :: !(Maybe Text)

7623 , _rDescription :: !(Maybe Text)

7622 , _rDeprecated :: !(Maybe (Maybe DeprecationStatus))

7624 , _rDeprecated :: !(Maybe (Maybe DeprecationStatus))

7623− }

7625+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

7624

7626

7625-- | Creates a value of 'Region' with the minimum fields required to make a request.

7627-- | Creates a value of 'Region' with the minimum fields required to make a request.

7626--

7628--

@@ -7829,7 +7831,7 @@ data Route = Route

7829 , _rrDescription :: !(Maybe Text)

7831 , _rrDescription :: !(Maybe Text)

7830 , _rrTags :: !(Maybe [Text])

7832 , _rrTags :: !(Maybe [Text])

7831 , _rrNextHopInstance :: !(Maybe Text)

7833 , _rrNextHopInstance :: !(Maybe Text)

7832− }

7834+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

7833

7835

7834-- | Creates a value of 'Route' with the minimum fields required to make a request.

7836-- | Creates a value of 'Route' with the minimum fields required to make a request.

7835--

7837--

@@ -8027,7 +8029,7 @@ data RouteItemWarnings = RouteItemWarnings

8027 { _riwData :: !(Maybe [RouteItemDataItemWarnings])

8029 { _riwData :: !(Maybe [RouteItemDataItemWarnings])

8028 , _riwCode :: !(Maybe RouteCodeItemWarnings)

8030 , _riwCode :: !(Maybe RouteCodeItemWarnings)

8029 , _riwMessage :: !(Maybe Text)

8031 , _riwMessage :: !(Maybe Text)

8030− }

8032+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

8031

8033

8032-- | Creates a value of 'RouteItemWarnings' with the minimum fields required to make a request.

8034-- | Creates a value of 'RouteItemWarnings' with the minimum fields required to make a request.

8033--

8035--

@@ -8130,7 +8132,7 @@ data Scheduling = Scheduling

8130 { _sAutomaticRestart :: !(Maybe Bool)

8132 { _sAutomaticRestart :: !(Maybe Bool)

8131 , _sOnHostMaintenance :: !(Maybe SchedulingOnHostMaintenance)

8133 , _sOnHostMaintenance :: !(Maybe SchedulingOnHostMaintenance)

8132 , _sPreemptible :: !(Maybe Bool)

8134 , _sPreemptible :: !(Maybe Bool)

8133− }

8135+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

8134

8136

8135-- | Creates a value of 'Scheduling' with the minimum fields required to make a request.

8137-- | Creates a value of 'Scheduling' with the minimum fields required to make a request.

8136--

8138--

@@ -8266,7 +8268,7 @@ data Snapshot = Snapshot

8266 , _sLicenses :: !(Maybe [Text])

8268 , _sLicenses :: !(Maybe [Text])

8267 , _sSourceDisk :: !(Maybe Text)

8269 , _sSourceDisk :: !(Maybe Text)

8268 , _sDescription :: !(Maybe Text)

8270 , _sDescription :: !(Maybe Text)

8269− }

8271+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

8270

8272

8271-- | Creates a value of 'Snapshot' with the minimum fields required to make a request.

8273-- | Creates a value of 'Snapshot' with the minimum fields required to make a request.

8272--

8274--

@@ -8658,7 +8660,7 @@ data TargetInstance = TargetInstance

8658 , _tiId :: !(Maybe Word64)

8660 , _tiId :: !(Maybe Word64)

8659 , _tiDescription :: !(Maybe Text)

8661 , _tiDescription :: !(Maybe Text)

8660 , _tiInstance :: !(Maybe Text)

8662 , _tiInstance :: !(Maybe Text)

8661− }

8663+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

8662

8664

8663-- | Creates a value of 'TargetInstance' with the minimum fields required to make a request.

8665-- | Creates a value of 'TargetInstance' with the minimum fields required to make a request.

8664--

8666--

@@ -8884,7 +8886,7 @@ tilId = lens _tilId (\ s a -> s{_tilId = a})

8884data TargetInstancesScopedList = TargetInstancesScopedList

8886data TargetInstancesScopedList = TargetInstancesScopedList

8885 { _tislWarning :: !(Maybe TargetInstancesScopedListWarning)

8887 { _tislWarning :: !(Maybe TargetInstancesScopedListWarning)

8886 , _tislTargetInstances :: !(Maybe [Maybe TargetInstance])

8888 , _tislTargetInstances :: !(Maybe [Maybe TargetInstance])

8887− }

8889+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

8888

8890

8889-- | Creates a value of 'TargetInstancesScopedList' with the minimum fields required to make a request.

8891-- | Creates a value of 'TargetInstancesScopedList' with the minimum fields required to make a request.

8890--

8892--

@@ -8955,7 +8957,7 @@ data TargetInstancesScopedListWarning = TargetInstancesScopedListWarning

8955 { _tislwData :: !(Maybe [TargetInstancesScopedListItemDataWarning])

8957 { _tislwData :: !(Maybe [TargetInstancesScopedListItemDataWarning])

8956 , _tislwCode :: !(Maybe TargetInstancesScopedListCodeWarning)

8958 , _tislwCode :: !(Maybe TargetInstancesScopedListCodeWarning)

8957 , _tislwMessage :: !(Maybe Text)

8959 , _tislwMessage :: !(Maybe Text)

8958− }

8960+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

8959

8961

8960-- | Creates a value of 'TargetInstancesScopedListWarning' with the minimum fields required to make a request.

8962-- | Creates a value of 'TargetInstancesScopedListWarning' with the minimum fields required to make a request.

8961--

8963--

@@ -9009,7 +9011,7 @@ data TargetPool = TargetPool

9009 , _tpRegion :: !(Maybe Text)

9011 , _tpRegion :: !(Maybe Text)

9010 , _tpDescription :: !(Maybe Text)

9012 , _tpDescription :: !(Maybe Text)

9011 , _tpHealthChecks :: !(Maybe [Text])

9013 , _tpHealthChecks :: !(Maybe [Text])

9012− }

9014+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

9013

9015

9014-- | Creates a value of 'TargetPool' with the minimum fields required to make a request.

9016-- | Creates a value of 'TargetPool' with the minimum fields required to make a request.

9015--

9017--

@@ -9433,7 +9435,7 @@ tprirInstances

9433data TargetPoolsScopedList = TargetPoolsScopedList

9435data TargetPoolsScopedList = TargetPoolsScopedList

9434 { _tpslWarning :: !(Maybe TargetPoolsScopedListWarning)

9436 { _tpslWarning :: !(Maybe TargetPoolsScopedListWarning)

9435 , _tpslTargetPools :: !(Maybe [Maybe TargetPool])

9437 , _tpslTargetPools :: !(Maybe [Maybe TargetPool])

9436− }

9438+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

9437

9439

9438-- | Creates a value of 'TargetPoolsScopedList' with the minimum fields required to make a request.

9440-- | Creates a value of 'TargetPoolsScopedList' with the minimum fields required to make a request.

9439--

9441--

@@ -9504,7 +9506,7 @@ data TargetPoolsScopedListWarning = TargetPoolsScopedListWarning

9504 { _tpslwData :: !(Maybe [TargetPoolsScopedListItemDataWarning])

9506 { _tpslwData :: !(Maybe [TargetPoolsScopedListItemDataWarning])

9505 , _tpslwCode :: !(Maybe TargetPoolsScopedListCodeWarning)

9507 , _tpslwCode :: !(Maybe TargetPoolsScopedListCodeWarning)

9506 , _tpslwMessage :: !(Maybe Text)

9508 , _tpslwMessage :: !(Maybe Text)

9507− }

9509+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

9508

9510

9509-- | Creates a value of 'TargetPoolsScopedListWarning' with the minimum fields required to make a request.

9511-- | Creates a value of 'TargetPoolsScopedListWarning' with the minimum fields required to make a request.

9510--

9512--

@@ -9576,7 +9578,7 @@ data TargetVpnGateway = TargetVpnGateway

9576 , _tvgTunnels :: !(Maybe [Text])

9578 , _tvgTunnels :: !(Maybe [Text])

9577 , _tvgDescription :: !(Maybe Text)

9579 , _tvgDescription :: !(Maybe Text)

9578 , _tvgForwardingRules :: !(Maybe [Text])

9580 , _tvgForwardingRules :: !(Maybe [Text])

9579− }

9581+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

9580

9582

9581-- | Creates a value of 'TargetVpnGateway' with the minimum fields required to make a request.

9583-- | Creates a value of 'TargetVpnGateway' with the minimum fields required to make a request.

9582--

9584--

@@ -9832,7 +9834,7 @@ tvglId = lens _tvglId (\ s a -> s{_tvglId = a})

9832data TargetVpnGatewaysScopedList = TargetVpnGatewaysScopedList

9834data TargetVpnGatewaysScopedList = TargetVpnGatewaysScopedList

9833 { _tvgslTargetVpnGateways :: !(Maybe [Maybe TargetVpnGateway])

9835 { _tvgslTargetVpnGateways :: !(Maybe [Maybe TargetVpnGateway])

9834 , _tvgslWarning :: !(Maybe TargetVpnGatewaysScopedListWarning)

9836 , _tvgslWarning :: !(Maybe TargetVpnGatewaysScopedListWarning)

9835− }

9837+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

9836

9838

9837-- | Creates a value of 'TargetVpnGatewaysScopedList' with the minimum fields required to make a request.

9839-- | Creates a value of 'TargetVpnGatewaysScopedList' with the minimum fields required to make a request.

9838--

9840--

@@ -9904,7 +9906,7 @@ data TargetVpnGatewaysScopedListWarning = TargetVpnGatewaysScopedListWarning

9904 { _tvgslwData :: !(Maybe [TargetVpnGatewaysScopedListItemDataWarning])

9906 { _tvgslwData :: !(Maybe [TargetVpnGatewaysScopedListItemDataWarning])

9905 , _tvgslwCode :: !(Maybe TargetVpnGatewaysScopedListCodeWarning)

9907 , _tvgslwCode :: !(Maybe TargetVpnGatewaysScopedListCodeWarning)

9906 , _tvgslwMessage :: !(Maybe Text)

9908 , _tvgslwMessage :: !(Maybe Text)

9907− }

9909+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

9908

9910

9909-- | Creates a value of 'TargetVpnGatewaysScopedListWarning' with the minimum fields required to make a request.

9911-- | Creates a value of 'TargetVpnGatewaysScopedListWarning' with the minimum fields required to make a request.

9910--

9912--

@@ -10419,7 +10421,7 @@ data VpnTunnel = VpnTunnel

10419 , _vtIkeVersion :: !(Maybe Int32)

10421 , _vtIkeVersion :: !(Maybe Int32)

10420 , _vtRegion :: !(Maybe Text)

10422 , _vtRegion :: !(Maybe Text)

10421 , _vtDescription :: !(Maybe Text)

10423 , _vtDescription :: !(Maybe Text)

10422− }

10424+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

10423

10425

10424-- | Creates a value of 'VpnTunnel' with the minimum fields required to make a request.

10426-- | Creates a value of 'VpnTunnel' with the minimum fields required to make a request.

10425--

10427--

@@ -10692,7 +10694,7 @@ vtlId = lens _vtlId (\ s a -> s{_vtlId = a})

10692data VpnTunnelsScopedList = VpnTunnelsScopedList

10694data VpnTunnelsScopedList = VpnTunnelsScopedList

10693 { _vtslVpnTunnels :: !(Maybe [Maybe VpnTunnel])

10695 { _vtslVpnTunnels :: !(Maybe [Maybe VpnTunnel])

10694 , _vtslWarning :: !(Maybe VpnTunnelsScopedListWarning)

10696 , _vtslWarning :: !(Maybe VpnTunnelsScopedListWarning)

10695− }

10697+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

10696

10698

10697-- | Creates a value of 'VpnTunnelsScopedList' with the minimum fields required to make a request.

10699-- | Creates a value of 'VpnTunnelsScopedList' with the minimum fields required to make a request.

10698--

10700--

@@ -10763,7 +10765,7 @@ data VpnTunnelsScopedListWarning = VpnTunnelsScopedListWarning

10763 { _vtslwData :: !(Maybe [VpnTunnelsScopedListItemDataWarning])

10765 { _vtslwData :: !(Maybe [VpnTunnelsScopedListItemDataWarning])

10764 , _vtslwCode :: !(Maybe VpnTunnelsScopedListCodeWarning)

10766 , _vtslwCode :: !(Maybe VpnTunnelsScopedListCodeWarning)

10765 , _vtslwMessage :: !(Maybe Text)

10767 , _vtslwMessage :: !(Maybe Text)

10766− }

10768+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

10767

10769

10768-- | Creates a value of 'VpnTunnelsScopedListWarning' with the minimum fields required to make a request.

10770-- | Creates a value of 'VpnTunnelsScopedListWarning' with the minimum fields required to make a request.

10769--

10771--

@@ -10814,7 +10816,7 @@ data Zone = Zone

10814 , _zRegion :: !(Maybe Text)

10816 , _zRegion :: !(Maybe Text)

10815 , _zDescription :: !(Maybe Text)

10817 , _zDescription :: !(Maybe Text)

10816 , _zDeprecated :: !(Maybe (Maybe DeprecationStatus))

10818 , _zDeprecated :: !(Maybe (Maybe DeprecationStatus))

10817− }

10819+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

10818

10820

10819-- | Creates a value of 'Zone' with the minimum fields required to make a request.

10821-- | Creates a value of 'Zone' with the minimum fields required to make a request.

10820--

10822--

gogol-compute/gen/Network/Google/Compute/Types/Sum.hs+1032

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Compute.Types.Sum

9-- Module : Network.Google.Compute.Types.Sum

@@ -23,6 +26,15 @@ data AccessConfigType

23

26

24instance Hashable AccessConfigType

27instance Hashable AccessConfigType

25

28

29+instance FromText AccessConfigType where

30+ fromText = \case

31+ "ONE_TO_ONE_NAT" -> Just ACTOneToOneNAT

32+ _ -> Nothing

33+

34+instance ToText AccessConfigType where

35+ toText = \case

36+ ACTOneToOneNAT -> "ONE_TO_ONE_NAT"

37+

26-- | [Output Only] The status of the address, which can be either IN_USE or

38-- | [Output Only] The status of the address, which can be either IN_USE or

27-- RESERVED. An address that is RESERVED is currently reserved and

39-- RESERVED. An address that is RESERVED is currently reserved and

28-- available to use. An IN_USE address is currently being used by another

40-- available to use. An IN_USE address is currently being used by another

@@ -36,6 +48,17 @@ data AddressStatus

36

48

37instance Hashable AddressStatus

49instance Hashable AddressStatus

38

50

51+instance FromText AddressStatus where

52+ fromText = \case

53+ "IN_USE" -> Just ASInUse

54+ "RESERVED" -> Just ASReserved

55+ _ -> Nothing

56+

57+instance ToText AddressStatus where

58+ toText = \case

59+ ASInUse -> "IN_USE"

60+ ASReserved -> "RESERVED"

61+

39-- | [Output Only] The warning type identifier for this warning.

62-- | [Output Only] The warning type identifier for this warning.

40data AddressesScopedListCodeWarning

63data AddressesScopedListCodeWarning

41 = ASLCWDeprecatedResourceUsed

64 = ASLCWDeprecatedResourceUsed

@@ -70,6 +93,41 @@ data AddressesScopedListCodeWarning

70

93

71instance Hashable AddressesScopedListCodeWarning

94instance Hashable AddressesScopedListCodeWarning

72

95

96+instance FromText AddressesScopedListCodeWarning where

97+ fromText = \case

98+ "DEPRECATED_RESOURCE_USED" -> Just ASLCWDeprecatedResourceUsed

99+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just ASLCWDiskSizeLargerThanImageSize

100+ "INJECTED_KERNELS_DEPRECATED" -> Just ASLCWInjectedKernelsDeprecated

101+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just ASLCWNextHopAddressNotAssigned

102+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just ASLCWNextHopCannotIPForward

103+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just ASLCWNextHopInstanceNotFound

104+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just ASLCWNextHopInstanceNotOnNetwork

105+ "NEXT_HOP_NOT_RUNNING" -> Just ASLCWNextHopNotRunning

106+ "NOT_CRITICAL_ERROR" -> Just ASLCWNotCriticalError

107+ "NO_RESULTS_ON_PAGE" -> Just ASLCWNoResultsOnPage

108+ "REQUIRED_TOS_AGREEMENT" -> Just ASLCWRequiredTosAgreement

109+ "RESOURCE_NOT_DELETED" -> Just ASLCWResourceNotDeleted

110+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just ASLCWSingleInstancePropertyTemplate

111+ "UNREACHABLE" -> Just ASLCWUnreachable

112+ _ -> Nothing

113+

114+instance ToText AddressesScopedListCodeWarning where

115+ toText = \case

116+ ASLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

117+ ASLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

118+ ASLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

119+ ASLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

120+ ASLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

121+ ASLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

122+ ASLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

123+ ASLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

124+ ASLCWNotCriticalError -> "NOT_CRITICAL_ERROR"

125+ ASLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"

126+ ASLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

127+ ASLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"

128+ ASLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

129+ ASLCWUnreachable -> "UNREACHABLE"

130+

73data AttachedDiskInterface

131data AttachedDiskInterface

74 = ADINvme

132 = ADINvme

75 -- ^ @NVME@

133 -- ^ @NVME@

@@ -79,6 +137,17 @@ data AttachedDiskInterface

79

137

80instance Hashable AttachedDiskInterface

138instance Hashable AttachedDiskInterface

81

139

140+instance FromText AttachedDiskInterface where

141+ fromText = \case

142+ "NVME" -> Just ADINvme

143+ "SCSI" -> Just ADIScsi

144+ _ -> Nothing

145+

146+instance ToText AttachedDiskInterface where

147+ toText = \case

148+ ADINvme -> "NVME"

149+ ADIScsi -> "SCSI"

150+

82-- | The mode in which to attach this disk, either READ_WRITE or READ_ONLY.

151-- | The mode in which to attach this disk, either READ_WRITE or READ_ONLY.

83-- If not specified, the default is to attach the disk in READ_WRITE mode.

152-- If not specified, the default is to attach the disk in READ_WRITE mode.

84data AttachedDiskMode

153data AttachedDiskMode

@@ -90,6 +159,17 @@ data AttachedDiskMode

90

159

91instance Hashable AttachedDiskMode

160instance Hashable AttachedDiskMode

92

161

162+instance FromText AttachedDiskMode where

163+ fromText = \case

164+ "READ_ONLY" -> Just ADMReadOnly

165+ "READ_WRITE" -> Just ADMReadWrite

166+ _ -> Nothing

167+

168+instance ToText AttachedDiskMode where

169+ toText = \case

170+ ADMReadOnly -> "READ_ONLY"

171+ ADMReadWrite -> "READ_WRITE"

172+

93-- | Specifies the type of the disk, either SCRATCH or PERSISTENT. If not

173-- | Specifies the type of the disk, either SCRATCH or PERSISTENT. If not

94-- specified, the default is PERSISTENT.

174-- specified, the default is PERSISTENT.

95data AttachedDiskType

175data AttachedDiskType

@@ -101,6 +181,17 @@ data AttachedDiskType

101

181

102instance Hashable AttachedDiskType

182instance Hashable AttachedDiskType

103

183

184+instance FromText AttachedDiskType where

185+ fromText = \case

186+ "PERSISTENT" -> Just ADTPersistent

187+ "SCRATCH" -> Just ADTScratch

188+ _ -> Nothing

189+

190+instance ToText AttachedDiskType where

191+ toText = \case

192+ ADTPersistent -> "PERSISTENT"

193+ ADTScratch -> "SCRATCH"

194+

104-- | [Output Only] The warning type identifier for this warning.

195-- | [Output Only] The warning type identifier for this warning.

105data AutoscalersScopedListCodeWarning

196data AutoscalersScopedListCodeWarning

106 = ADeprecatedResourceUsed

197 = ADeprecatedResourceUsed

@@ -135,6 +226,41 @@ data AutoscalersScopedListCodeWarning

135

226

136instance Hashable AutoscalersScopedListCodeWarning

227instance Hashable AutoscalersScopedListCodeWarning

137

228

229+instance FromText AutoscalersScopedListCodeWarning where

230+ fromText = \case

231+ "DEPRECATED_RESOURCE_USED" -> Just ADeprecatedResourceUsed

232+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just ADiskSizeLargerThanImageSize

233+ "INJECTED_KERNELS_DEPRECATED" -> Just AInjectedKernelsDeprecated

234+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just ANextHopAddressNotAssigned

235+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just ANextHopCannotIPForward

236+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just ANextHopInstanceNotFound

237+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just ANextHopInstanceNotOnNetwork

238+ "NEXT_HOP_NOT_RUNNING" -> Just ANextHopNotRunning

239+ "NOT_CRITICAL_ERROR" -> Just ANotCriticalError

240+ "NO_RESULTS_ON_PAGE" -> Just ANoResultsOnPage

241+ "REQUIRED_TOS_AGREEMENT" -> Just ARequiredTosAgreement

242+ "RESOURCE_NOT_DELETED" -> Just AResourceNotDeleted

243+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just ASingleInstancePropertyTemplate

244+ "UNREACHABLE" -> Just AUnreachable

245+ _ -> Nothing

246+

247+instance ToText AutoscalersScopedListCodeWarning where

248+ toText = \case

249+ ADeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

250+ ADiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

251+ AInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

252+ ANextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

253+ ANextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

254+ ANextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

255+ ANextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

256+ ANextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

257+ ANotCriticalError -> "NOT_CRITICAL_ERROR"

258+ ANoResultsOnPage -> "NO_RESULTS_ON_PAGE"

259+ ARequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

260+ AResourceNotDeleted -> "RESOURCE_NOT_DELETED"

261+ ASingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

262+ AUnreachable -> "UNREACHABLE"

263+

138-- | Defines type in which utilization_target is expressed.

264-- | Defines type in which utilization_target is expressed.

139data AutoscalingPolicyCustomMetricUtilizationUtilizationTargetType

265data AutoscalingPolicyCustomMetricUtilizationUtilizationTargetType

140 = APCMUUTTDeltaPerMinute

266 = APCMUUTTDeltaPerMinute

@@ -147,6 +273,19 @@ data AutoscalingPolicyCustomMetricUtilizationUtilizationTargetType

147

273

148instance Hashable AutoscalingPolicyCustomMetricUtilizationUtilizationTargetType

274instance Hashable AutoscalingPolicyCustomMetricUtilizationUtilizationTargetType

149

275

276+instance FromText AutoscalingPolicyCustomMetricUtilizationUtilizationTargetType where

277+ fromText = \case

278+ "DELTA_PER_MINUTE" -> Just APCMUUTTDeltaPerMinute

279+ "DELTA_PER_SECOND" -> Just APCMUUTTDeltaPerSecond

280+ "GAUGE" -> Just APCMUUTTGauge

281+ _ -> Nothing

282+

283+instance ToText AutoscalingPolicyCustomMetricUtilizationUtilizationTargetType where

284+ toText = \case

285+ APCMUUTTDeltaPerMinute -> "DELTA_PER_MINUTE"

286+ APCMUUTTDeltaPerSecond -> "DELTA_PER_SECOND"

287+ APCMUUTTGauge -> "GAUGE"

288+

150-- | Specifies the balancing mode for this backend. The default is

289-- | Specifies the balancing mode for this backend. The default is

151-- UTILIZATION but available values are UTILIZATION and RATE.

290-- UTILIZATION but available values are UTILIZATION and RATE.

152data BackendBalancingMode

291data BackendBalancingMode

@@ -158,6 +297,17 @@ data BackendBalancingMode

158

297

159instance Hashable BackendBalancingMode

298instance Hashable BackendBalancingMode

160

299

300+instance FromText BackendBalancingMode where

301+ fromText = \case

302+ "RATE" -> Just BBMRate

303+ "UTILIZATION" -> Just BBMUtilization

304+ _ -> Nothing

305+

306+instance ToText BackendBalancingMode where

307+ toText = \case

308+ BBMRate -> "RATE"

309+ BBMUtilization -> "UTILIZATION"

310+

161data BackendServiceProtocol

311data BackendServiceProtocol

162 = BSPHTTP

312 = BSPHTTP

163 -- ^ @HTTP@

313 -- ^ @HTTP@

@@ -165,6 +315,15 @@ data BackendServiceProtocol

165

315

166instance Hashable BackendServiceProtocol

316instance Hashable BackendServiceProtocol

167

317

318+instance FromText BackendServiceProtocol where

319+ fromText = \case

320+ "HTTP" -> Just BSPHTTP

321+ _ -> Nothing

322+

323+instance ToText BackendServiceProtocol where

324+ toText = \case

325+ BSPHTTP -> "HTTP"

326+

168-- | The deprecation state of this resource. This can be DEPRECATED,

327-- | The deprecation state of this resource. This can be DEPRECATED,

169-- OBSOLETE, or DELETED. Operations which create a new resource using a

328-- OBSOLETE, or DELETED. Operations which create a new resource using a

170-- DEPRECATED resource will return successfully, but with a warning

329-- DEPRECATED resource will return successfully, but with a warning

@@ -182,6 +341,19 @@ data DeprecationStatusState

182

341

183instance Hashable DeprecationStatusState

342instance Hashable DeprecationStatusState

184

343

344+instance FromText DeprecationStatusState where

345+ fromText = \case

346+ "DELETED" -> Just DSSDeleted

347+ "DEPRECATED" -> Just DSSDeprecated

348+ "OBSOLETE" -> Just DSSObsolete

349+ _ -> Nothing

350+

351+instance ToText DeprecationStatusState where

352+ toText = \case

353+ DSSDeleted -> "DELETED"

354+ DSSDeprecated -> "DEPRECATED"

355+ DSSObsolete -> "OBSOLETE"

356+

185-- | [Output Only] The status of disk creation. Applicable statuses includes:

357-- | [Output Only] The status of disk creation. Applicable statuses includes:

186-- CREATING, FAILED, READY, RESTORING.

358-- CREATING, FAILED, READY, RESTORING.

187data DiskStatus

359data DiskStatus

@@ -197,6 +369,21 @@ data DiskStatus

197

369

198instance Hashable DiskStatus

370instance Hashable DiskStatus

199

371

372+instance FromText DiskStatus where

373+ fromText = \case

374+ "CREATING" -> Just DSCreating

375+ "FAILED" -> Just DSFailed

376+ "READY" -> Just DSReady

377+ "RESTORING" -> Just DSRestoring

378+ _ -> Nothing

379+

380+instance ToText DiskStatus where

381+ toText = \case

382+ DSCreating -> "CREATING"

383+ DSFailed -> "FAILED"

384+ DSReady -> "READY"

385+ DSRestoring -> "RESTORING"

386+

200-- | [Output Only] The warning type identifier for this warning.

387-- | [Output Only] The warning type identifier for this warning.

201data DiskTypesScopedListCodeWarning

388data DiskTypesScopedListCodeWarning

202 = DTSLCWDeprecatedResourceUsed

389 = DTSLCWDeprecatedResourceUsed

@@ -231,6 +418,41 @@ data DiskTypesScopedListCodeWarning

231

418

232instance Hashable DiskTypesScopedListCodeWarning

419instance Hashable DiskTypesScopedListCodeWarning

233

420

421+instance FromText DiskTypesScopedListCodeWarning where

422+ fromText = \case

423+ "DEPRECATED_RESOURCE_USED" -> Just DTSLCWDeprecatedResourceUsed

424+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just DTSLCWDiskSizeLargerThanImageSize

425+ "INJECTED_KERNELS_DEPRECATED" -> Just DTSLCWInjectedKernelsDeprecated

426+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just DTSLCWNextHopAddressNotAssigned

427+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just DTSLCWNextHopCannotIPForward

428+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just DTSLCWNextHopInstanceNotFound

429+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just DTSLCWNextHopInstanceNotOnNetwork

430+ "NEXT_HOP_NOT_RUNNING" -> Just DTSLCWNextHopNotRunning

431+ "NOT_CRITICAL_ERROR" -> Just DTSLCWNotCriticalError

432+ "NO_RESULTS_ON_PAGE" -> Just DTSLCWNoResultsOnPage

433+ "REQUIRED_TOS_AGREEMENT" -> Just DTSLCWRequiredTosAgreement

434+ "RESOURCE_NOT_DELETED" -> Just DTSLCWResourceNotDeleted

435+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just DTSLCWSingleInstancePropertyTemplate

436+ "UNREACHABLE" -> Just DTSLCWUnreachable

437+ _ -> Nothing

438+

439+instance ToText DiskTypesScopedListCodeWarning where

440+ toText = \case

441+ DTSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

442+ DTSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

443+ DTSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

444+ DTSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

445+ DTSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

446+ DTSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

447+ DTSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

448+ DTSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

449+ DTSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"

450+ DTSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"

451+ DTSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

452+ DTSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"

453+ DTSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

454+ DTSLCWUnreachable -> "UNREACHABLE"

455+

234-- | [Output Only] The warning type identifier for this warning.

456-- | [Output Only] The warning type identifier for this warning.

235data DisksScopedListCodeWarning

457data DisksScopedListCodeWarning

236 = DSLCWDeprecatedResourceUsed

458 = DSLCWDeprecatedResourceUsed

@@ -265,6 +487,41 @@ data DisksScopedListCodeWarning

265

487

266instance Hashable DisksScopedListCodeWarning

488instance Hashable DisksScopedListCodeWarning

267

489

490+instance FromText DisksScopedListCodeWarning where

491+ fromText = \case

492+ "DEPRECATED_RESOURCE_USED" -> Just DSLCWDeprecatedResourceUsed

493+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just DSLCWDiskSizeLargerThanImageSize

494+ "INJECTED_KERNELS_DEPRECATED" -> Just DSLCWInjectedKernelsDeprecated

495+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just DSLCWNextHopAddressNotAssigned

496+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just DSLCWNextHopCannotIPForward

497+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just DSLCWNextHopInstanceNotFound

498+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just DSLCWNextHopInstanceNotOnNetwork

499+ "NEXT_HOP_NOT_RUNNING" -> Just DSLCWNextHopNotRunning

500+ "NOT_CRITICAL_ERROR" -> Just DSLCWNotCriticalError

501+ "NO_RESULTS_ON_PAGE" -> Just DSLCWNoResultsOnPage

502+ "REQUIRED_TOS_AGREEMENT" -> Just DSLCWRequiredTosAgreement

503+ "RESOURCE_NOT_DELETED" -> Just DSLCWResourceNotDeleted

504+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just DSLCWSingleInstancePropertyTemplate

505+ "UNREACHABLE" -> Just DSLCWUnreachable

506+ _ -> Nothing

507+

508+instance ToText DisksScopedListCodeWarning where

509+ toText = \case

510+ DSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

511+ DSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

512+ DSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

513+ DSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

514+ DSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

515+ DSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

516+ DSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

517+ DSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

518+ DSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"

519+ DSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"

520+ DSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

521+ DSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"

522+ DSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

523+ DSLCWUnreachable -> "UNREACHABLE"

524+

268-- | The IP protocol to which this rule applies. Valid options are TCP, UDP,

525-- | The IP protocol to which this rule applies. Valid options are TCP, UDP,

269-- ESP, AH or SCTP.

526-- ESP, AH or SCTP.

270data ForwardingRuleIPProtocol

527data ForwardingRuleIPProtocol

@@ -282,6 +539,23 @@ data ForwardingRuleIPProtocol

282

539

283instance Hashable ForwardingRuleIPProtocol

540instance Hashable ForwardingRuleIPProtocol

284

541

542+instance FromText ForwardingRuleIPProtocol where

543+ fromText = \case

544+ "AH" -> Just FRIPAH

545+ "ESP" -> Just FRIPEsp

546+ "SCTP" -> Just FRIPSctp

547+ "TCP" -> Just FRIPTCP

548+ "UDP" -> Just FRIPUdp

549+ _ -> Nothing

550+

551+instance ToText ForwardingRuleIPProtocol where

552+ toText = \case

553+ FRIPAH -> "AH"

554+ FRIPEsp -> "ESP"

555+ FRIPSctp -> "SCTP"

556+ FRIPTCP -> "TCP"

557+ FRIPUdp -> "UDP"

558+

285-- | [Output Only] The warning type identifier for this warning.

559-- | [Output Only] The warning type identifier for this warning.

286data ForwardingRulesScopedListCodeWarning

560data ForwardingRulesScopedListCodeWarning

287 = FRSLCWDeprecatedResourceUsed

561 = FRSLCWDeprecatedResourceUsed

@@ -316,6 +590,41 @@ data ForwardingRulesScopedListCodeWarning

316

590

317instance Hashable ForwardingRulesScopedListCodeWarning

591instance Hashable ForwardingRulesScopedListCodeWarning

318

592

593+instance FromText ForwardingRulesScopedListCodeWarning where

594+ fromText = \case

595+ "DEPRECATED_RESOURCE_USED" -> Just FRSLCWDeprecatedResourceUsed

596+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just FRSLCWDiskSizeLargerThanImageSize

597+ "INJECTED_KERNELS_DEPRECATED" -> Just FRSLCWInjectedKernelsDeprecated

598+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just FRSLCWNextHopAddressNotAssigned

599+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just FRSLCWNextHopCannotIPForward

600+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just FRSLCWNextHopInstanceNotFound

601+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just FRSLCWNextHopInstanceNotOnNetwork

602+ "NEXT_HOP_NOT_RUNNING" -> Just FRSLCWNextHopNotRunning

603+ "NOT_CRITICAL_ERROR" -> Just FRSLCWNotCriticalError

604+ "NO_RESULTS_ON_PAGE" -> Just FRSLCWNoResultsOnPage

605+ "REQUIRED_TOS_AGREEMENT" -> Just FRSLCWRequiredTosAgreement

606+ "RESOURCE_NOT_DELETED" -> Just FRSLCWResourceNotDeleted

607+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just FRSLCWSingleInstancePropertyTemplate

608+ "UNREACHABLE" -> Just FRSLCWUnreachable

609+ _ -> Nothing

610+

611+instance ToText ForwardingRulesScopedListCodeWarning where

612+ toText = \case

613+ FRSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

614+ FRSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

615+ FRSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

616+ FRSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

617+ FRSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

618+ FRSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

619+ FRSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

620+ FRSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

621+ FRSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"

622+ FRSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"

623+ FRSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

624+ FRSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"

625+ FRSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

626+ FRSLCWUnreachable -> "UNREACHABLE"

627+

319-- | Health state of the instance.

628-- | Health state of the instance.

320data HealthStatusHealthState

629data HealthStatusHealthState

321 = HSHSHealthy

630 = HSHSHealthy

@@ -326,6 +635,17 @@ data HealthStatusHealthState

326

635

327instance Hashable HealthStatusHealthState

636instance Hashable HealthStatusHealthState

328

637

638+instance FromText HealthStatusHealthState where

639+ fromText = \case

640+ "HEALTHY" -> Just HSHSHealthy

641+ "UNHEALTHY" -> Just HSHSUnhealthy

642+ _ -> Nothing

643+

644+instance ToText HealthStatusHealthState where

645+ toText = \case

646+ HSHSHealthy -> "HEALTHY"

647+ HSHSUnhealthy -> "UNHEALTHY"

648+

329-- | The format used to encode and transmit the block device, which should be

649-- | The format used to encode and transmit the block device, which should be

330-- TAR. This is just a container and transmission format and not a runtime

650-- TAR. This is just a container and transmission format and not a runtime

331-- format. Provided by the client when the disk image is created.

651-- format. Provided by the client when the disk image is created.

@@ -336,6 +656,15 @@ data ImageContainerTypeRawDisk

336

656

337instance Hashable ImageContainerTypeRawDisk

657instance Hashable ImageContainerTypeRawDisk

338

658

659+instance FromText ImageContainerTypeRawDisk where

660+ fromText = \case

661+ "TAR" -> Just ICTRDTAR

662+ _ -> Nothing

663+

664+instance ToText ImageContainerTypeRawDisk where

665+ toText = \case

666+ ICTRDTAR -> "TAR"

667+

339-- | The type of the image used to create this disk. The default and only

668-- | The type of the image used to create this disk. The default and only

340-- value is RAW

669-- value is RAW

341data ImageSourceType

670data ImageSourceType

@@ -345,6 +674,15 @@ data ImageSourceType

345

674

346instance Hashable ImageSourceType

675instance Hashable ImageSourceType

347

676

677+instance FromText ImageSourceType where

678+ fromText = \case

679+ "RAW" -> Just ISTRaw

680+ _ -> Nothing

681+

682+instance ToText ImageSourceType where

683+ toText = \case

684+ ISTRaw -> "RAW"

685+

348-- | [Output Only] The status of the image. An image can be used to create

686-- | [Output Only] The status of the image. An image can be used to create

349-- other resources, such as instances, only after the image has been

687-- other resources, such as instances, only after the image has been

350-- successfully created and the status is set to READY. Possible values are

688-- successfully created and the status is set to READY. Possible values are

@@ -360,6 +698,19 @@ data ImageStatus

360

698

361instance Hashable ImageStatus

699instance Hashable ImageStatus

362

700

701+instance FromText ImageStatus where

702+ fromText = \case

703+ "FAILED" -> Just ISFailed

704+ "PENDING" -> Just ISPending

705+ "READY" -> Just ISReady

706+ _ -> Nothing

707+

708+instance ToText ImageStatus where

709+ toText = \case

710+ ISFailed -> "FAILED"

711+ ISPending -> "PENDING"

712+ ISReady -> "READY"

713+

363-- | [Output Only] The warning type identifier for this warning.

714-- | [Output Only] The warning type identifier for this warning.

364data InstanceGroupManagersScopedListCodeWarning

715data InstanceGroupManagersScopedListCodeWarning

365 = IGMSLCWDeprecatedResourceUsed

716 = IGMSLCWDeprecatedResourceUsed

@@ -394,6 +745,41 @@ data InstanceGroupManagersScopedListCodeWarning

394

745

395instance Hashable InstanceGroupManagersScopedListCodeWarning

746instance Hashable InstanceGroupManagersScopedListCodeWarning

396

747

748+instance FromText InstanceGroupManagersScopedListCodeWarning where

749+ fromText = \case

750+ "DEPRECATED_RESOURCE_USED" -> Just IGMSLCWDeprecatedResourceUsed

751+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just IGMSLCWDiskSizeLargerThanImageSize

752+ "INJECTED_KERNELS_DEPRECATED" -> Just IGMSLCWInjectedKernelsDeprecated

753+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just IGMSLCWNextHopAddressNotAssigned

754+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just IGMSLCWNextHopCannotIPForward

755+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just IGMSLCWNextHopInstanceNotFound

756+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just IGMSLCWNextHopInstanceNotOnNetwork

757+ "NEXT_HOP_NOT_RUNNING" -> Just IGMSLCWNextHopNotRunning

758+ "NOT_CRITICAL_ERROR" -> Just IGMSLCWNotCriticalError

759+ "NO_RESULTS_ON_PAGE" -> Just IGMSLCWNoResultsOnPage

760+ "REQUIRED_TOS_AGREEMENT" -> Just IGMSLCWRequiredTosAgreement

761+ "RESOURCE_NOT_DELETED" -> Just IGMSLCWResourceNotDeleted

762+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just IGMSLCWSingleInstancePropertyTemplate

763+ "UNREACHABLE" -> Just IGMSLCWUnreachable

764+ _ -> Nothing

765+

766+instance ToText InstanceGroupManagersScopedListCodeWarning where

767+ toText = \case

768+ IGMSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

769+ IGMSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

770+ IGMSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

771+ IGMSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

772+ IGMSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

773+ IGMSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

774+ IGMSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

775+ IGMSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

776+ IGMSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"

777+ IGMSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"

778+ IGMSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

779+ IGMSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"

780+ IGMSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

781+ IGMSLCWUnreachable -> "UNREACHABLE"

782+

397-- | A filter for the state of the instances in the instance group. Valid

783-- | A filter for the state of the instances in the instance group. Valid

398-- options are ALL or RUNNING. If you do not specify this parameter the

784-- options are ALL or RUNNING. If you do not specify this parameter the

399-- list includes all instances regardless of their state.

785-- list includes all instances regardless of their state.

@@ -406,6 +792,17 @@ data InstanceGroupsListInstancesRequestInstanceState

406

792

407instance Hashable InstanceGroupsListInstancesRequestInstanceState

793instance Hashable InstanceGroupsListInstancesRequestInstanceState

408

794

795+instance FromText InstanceGroupsListInstancesRequestInstanceState where

796+ fromText = \case

797+ "ALL" -> Just IGLIRISAll

798+ "RUNNING" -> Just IGLIRISRunning

799+ _ -> Nothing

800+

801+instance ToText InstanceGroupsListInstancesRequestInstanceState where

802+ toText = \case

803+ IGLIRISAll -> "ALL"

804+ IGLIRISRunning -> "RUNNING"

805+

409-- | [Output Only] The warning type identifier for this warning.

806-- | [Output Only] The warning type identifier for this warning.

410data InstanceGroupsScopedListCodeWarning

807data InstanceGroupsScopedListCodeWarning

411 = IGSLCWDeprecatedResourceUsed

808 = IGSLCWDeprecatedResourceUsed

@@ -440,6 +837,41 @@ data InstanceGroupsScopedListCodeWarning

440

837

441instance Hashable InstanceGroupsScopedListCodeWarning

838instance Hashable InstanceGroupsScopedListCodeWarning

442

839

840+instance FromText InstanceGroupsScopedListCodeWarning where

841+ fromText = \case

842+ "DEPRECATED_RESOURCE_USED" -> Just IGSLCWDeprecatedResourceUsed

843+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just IGSLCWDiskSizeLargerThanImageSize

844+ "INJECTED_KERNELS_DEPRECATED" -> Just IGSLCWInjectedKernelsDeprecated

845+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just IGSLCWNextHopAddressNotAssigned

846+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just IGSLCWNextHopCannotIPForward

847+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just IGSLCWNextHopInstanceNotFound

848+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just IGSLCWNextHopInstanceNotOnNetwork

849+ "NEXT_HOP_NOT_RUNNING" -> Just IGSLCWNextHopNotRunning

850+ "NOT_CRITICAL_ERROR" -> Just IGSLCWNotCriticalError

851+ "NO_RESULTS_ON_PAGE" -> Just IGSLCWNoResultsOnPage

852+ "REQUIRED_TOS_AGREEMENT" -> Just IGSLCWRequiredTosAgreement

853+ "RESOURCE_NOT_DELETED" -> Just IGSLCWResourceNotDeleted

854+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just IGSLCWSingleInstancePropertyTemplate

855+ "UNREACHABLE" -> Just IGSLCWUnreachable

856+ _ -> Nothing

857+

858+instance ToText InstanceGroupsScopedListCodeWarning where

859+ toText = \case

860+ IGSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

861+ IGSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

862+ IGSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

863+ IGSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

864+ IGSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

865+ IGSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

866+ IGSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

867+ IGSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

868+ IGSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"

869+ IGSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"

870+ IGSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

871+ IGSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"

872+ IGSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

873+ IGSLCWUnreachable -> "UNREACHABLE"

874+

443-- | [Output Only] The status of the instance. One of the following values:

875-- | [Output Only] The status of the instance. One of the following values:

444-- PROVISIONING, STAGING, RUNNING, STOPPING, and TERMINATED.

876-- PROVISIONING, STAGING, RUNNING, STOPPING, and TERMINATED.

445data InstanceStatus

877data InstanceStatus

@@ -463,6 +895,29 @@ data InstanceStatus

463

895

464instance Hashable InstanceStatus

896instance Hashable InstanceStatus

465

897

898+instance FromText InstanceStatus where

899+ fromText = \case

900+ "PROVISIONING" -> Just ISProvisioning

901+ "RUNNING" -> Just ISRunning

902+ "STAGING" -> Just ISStaging

903+ "STOPPED" -> Just ISStopped

904+ "STOPPING" -> Just ISStopping

905+ "SUSPENDED" -> Just ISSuspended

906+ "SUSPENDING" -> Just ISSuspending

907+ "TERMINATED" -> Just ISTerminated

908+ _ -> Nothing

909+

910+instance ToText InstanceStatus where

911+ toText = \case

912+ ISProvisioning -> "PROVISIONING"

913+ ISRunning -> "RUNNING"

914+ ISStaging -> "STAGING"

915+ ISStopped -> "STOPPED"

916+ ISStopping -> "STOPPING"

917+ ISSuspended -> "SUSPENDED"

918+ ISSuspending -> "SUSPENDING"

919+ ISTerminated -> "TERMINATED"

920+

466-- | The status of the instance.

921-- | The status of the instance.

467data InstanceWithNamedPortsStatus

922data InstanceWithNamedPortsStatus

468 = IWNPSProvisioning

923 = IWNPSProvisioning

@@ -485,6 +940,29 @@ data InstanceWithNamedPortsStatus

485

940

486instance Hashable InstanceWithNamedPortsStatus

941instance Hashable InstanceWithNamedPortsStatus

487

942

943+instance FromText InstanceWithNamedPortsStatus where

944+ fromText = \case

945+ "PROVISIONING" -> Just IWNPSProvisioning

946+ "RUNNING" -> Just IWNPSRunning

947+ "STAGING" -> Just IWNPSStaging

948+ "STOPPED" -> Just IWNPSStopped

949+ "STOPPING" -> Just IWNPSStopping

950+ "SUSPENDED" -> Just IWNPSSuspended

951+ "SUSPENDING" -> Just IWNPSSuspending

952+ "TERMINATED" -> Just IWNPSTerminated

953+ _ -> Nothing

954+

955+instance ToText InstanceWithNamedPortsStatus where

956+ toText = \case

957+ IWNPSProvisioning -> "PROVISIONING"

958+ IWNPSRunning -> "RUNNING"

959+ IWNPSStaging -> "STAGING"

960+ IWNPSStopped -> "STOPPED"

961+ IWNPSStopping -> "STOPPING"

962+ IWNPSSuspended -> "SUSPENDED"

963+ IWNPSSuspending -> "SUSPENDING"

964+ IWNPSTerminated -> "TERMINATED"

965+

488-- | [Output Only] The warning type identifier for this warning.

966-- | [Output Only] The warning type identifier for this warning.

489data InstancesScopedListCodeWarning

967data InstancesScopedListCodeWarning

490 = ISLCWDeprecatedResourceUsed

968 = ISLCWDeprecatedResourceUsed

@@ -519,6 +997,41 @@ data InstancesScopedListCodeWarning

519

997

520instance Hashable InstancesScopedListCodeWarning

998instance Hashable InstancesScopedListCodeWarning

521

999

1000+instance FromText InstancesScopedListCodeWarning where

1001+ fromText = \case

1002+ "DEPRECATED_RESOURCE_USED" -> Just ISLCWDeprecatedResourceUsed

1003+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just ISLCWDiskSizeLargerThanImageSize

1004+ "INJECTED_KERNELS_DEPRECATED" -> Just ISLCWInjectedKernelsDeprecated

1005+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just ISLCWNextHopAddressNotAssigned

1006+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just ISLCWNextHopCannotIPForward

1007+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just ISLCWNextHopInstanceNotFound

1008+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just ISLCWNextHopInstanceNotOnNetwork

1009+ "NEXT_HOP_NOT_RUNNING" -> Just ISLCWNextHopNotRunning

1010+ "NOT_CRITICAL_ERROR" -> Just ISLCWNotCriticalError

1011+ "NO_RESULTS_ON_PAGE" -> Just ISLCWNoResultsOnPage

1012+ "REQUIRED_TOS_AGREEMENT" -> Just ISLCWRequiredTosAgreement

1013+ "RESOURCE_NOT_DELETED" -> Just ISLCWResourceNotDeleted

1014+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just ISLCWSingleInstancePropertyTemplate

1015+ "UNREACHABLE" -> Just ISLCWUnreachable

1016+ _ -> Nothing

1017+

1018+instance ToText InstancesScopedListCodeWarning where

1019+ toText = \case

1020+ ISLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

1021+ ISLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

1022+ ISLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

1023+ ISLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

1024+ ISLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

1025+ ISLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

1026+ ISLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

1027+ ISLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

1028+ ISLCWNotCriticalError -> "NOT_CRITICAL_ERROR"

1029+ ISLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"

1030+ ISLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

1031+ ISLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"

1032+ ISLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

1033+ ISLCWUnreachable -> "UNREACHABLE"

1034+

522-- | [Output Only] The warning type identifier for this warning.

1035-- | [Output Only] The warning type identifier for this warning.

523data MachineTypesScopedListCodeWarning

1036data MachineTypesScopedListCodeWarning

524 = MTSLCWDeprecatedResourceUsed

1037 = MTSLCWDeprecatedResourceUsed

@@ -553,6 +1066,41 @@ data MachineTypesScopedListCodeWarning

553

1066

554instance Hashable MachineTypesScopedListCodeWarning

1067instance Hashable MachineTypesScopedListCodeWarning

555

1068

1069+instance FromText MachineTypesScopedListCodeWarning where

1070+ fromText = \case

1071+ "DEPRECATED_RESOURCE_USED" -> Just MTSLCWDeprecatedResourceUsed

1072+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just MTSLCWDiskSizeLargerThanImageSize

1073+ "INJECTED_KERNELS_DEPRECATED" -> Just MTSLCWInjectedKernelsDeprecated

1074+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just MTSLCWNextHopAddressNotAssigned

1075+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just MTSLCWNextHopCannotIPForward

1076+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just MTSLCWNextHopInstanceNotFound

1077+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just MTSLCWNextHopInstanceNotOnNetwork

1078+ "NEXT_HOP_NOT_RUNNING" -> Just MTSLCWNextHopNotRunning

1079+ "NOT_CRITICAL_ERROR" -> Just MTSLCWNotCriticalError

1080+ "NO_RESULTS_ON_PAGE" -> Just MTSLCWNoResultsOnPage

1081+ "REQUIRED_TOS_AGREEMENT" -> Just MTSLCWRequiredTosAgreement

1082+ "RESOURCE_NOT_DELETED" -> Just MTSLCWResourceNotDeleted

1083+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just MTSLCWSingleInstancePropertyTemplate

1084+ "UNREACHABLE" -> Just MTSLCWUnreachable

1085+ _ -> Nothing

1086+

1087+instance ToText MachineTypesScopedListCodeWarning where

1088+ toText = \case

1089+ MTSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

1090+ MTSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

1091+ MTSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

1092+ MTSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

1093+ MTSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

1094+ MTSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

1095+ MTSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

1096+ MTSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

1097+ MTSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"

1098+ MTSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"

1099+ MTSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

1100+ MTSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"

1101+ MTSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

1102+ MTSLCWUnreachable -> "UNREACHABLE"

1103+

556-- | The current action that the managed instance group has scheduled for the

1104-- | The current action that the managed instance group has scheduled for the

557-- instance.

1105-- instance.

558data ManagedInstanceCurrentAction

1106data ManagedInstanceCurrentAction

@@ -574,6 +1122,27 @@ data ManagedInstanceCurrentAction

574

1122

575instance Hashable ManagedInstanceCurrentAction

1123instance Hashable ManagedInstanceCurrentAction

576

1124

1125+instance FromText ManagedInstanceCurrentAction where

1126+ fromText = \case

1127+ "ABANDONING" -> Just MICAAbandoning

1128+ "CREATING" -> Just MICACreating

1129+ "DELETING" -> Just MICADeleting

1130+ "NONE" -> Just MICANone

1131+ "RECREATING" -> Just MICARecreating

1132+ "REFRESHING" -> Just MICARefreshing

1133+ "RESTARTING" -> Just MICARestarting

1134+ _ -> Nothing

1135+

1136+instance ToText ManagedInstanceCurrentAction where

1137+ toText = \case

1138+ MICAAbandoning -> "ABANDONING"

1139+ MICACreating -> "CREATING"

1140+ MICADeleting -> "DELETING"

1141+ MICANone -> "NONE"

1142+ MICARecreating -> "RECREATING"

1143+ MICARefreshing -> "REFRESHING"

1144+ MICARestarting -> "RESTARTING"

1145+

577-- | The status of the instance (empty when instance does not exist).

1146-- | The status of the instance (empty when instance does not exist).

578data ManagedInstanceInstanceStatus

1147data ManagedInstanceInstanceStatus

579 = MIISProvisioning

1148 = MIISProvisioning

@@ -596,6 +1165,29 @@ data ManagedInstanceInstanceStatus

596

1165

597instance Hashable ManagedInstanceInstanceStatus

1166instance Hashable ManagedInstanceInstanceStatus

598

1167

1168+instance FromText ManagedInstanceInstanceStatus where

1169+ fromText = \case

1170+ "PROVISIONING" -> Just MIISProvisioning

1171+ "RUNNING" -> Just MIISRunning

1172+ "STAGING" -> Just MIISStaging

1173+ "STOPPED" -> Just MIISStopped

1174+ "STOPPING" -> Just MIISStopping

1175+ "SUSPENDED" -> Just MIISSuspended

1176+ "SUSPENDING" -> Just MIISSuspending

1177+ "TERMINATED" -> Just MIISTerminated

1178+ _ -> Nothing

1179+

1180+instance ToText ManagedInstanceInstanceStatus where

1181+ toText = \case

1182+ MIISProvisioning -> "PROVISIONING"

1183+ MIISRunning -> "RUNNING"

1184+ MIISStaging -> "STAGING"

1185+ MIISStopped -> "STOPPED"

1186+ MIISStopping -> "STOPPING"

1187+ MIISSuspended -> "SUSPENDED"

1188+ MIISSuspending -> "SUSPENDING"

1189+ MIISTerminated -> "TERMINATED"

1190+

599-- | [Output Only] The warning type identifier for this warning.

1191-- | [Output Only] The warning type identifier for this warning.

600data OperationCodeItemWarnings

1192data OperationCodeItemWarnings

601 = OCIWDeprecatedResourceUsed

1193 = OCIWDeprecatedResourceUsed

@@ -630,6 +1222,41 @@ data OperationCodeItemWarnings

630

1222

631instance Hashable OperationCodeItemWarnings

1223instance Hashable OperationCodeItemWarnings

632

1224

1225+instance FromText OperationCodeItemWarnings where

1226+ fromText = \case

1227+ "DEPRECATED_RESOURCE_USED" -> Just OCIWDeprecatedResourceUsed

1228+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just OCIWDiskSizeLargerThanImageSize

1229+ "INJECTED_KERNELS_DEPRECATED" -> Just OCIWInjectedKernelsDeprecated

1230+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just OCIWNextHopAddressNotAssigned

1231+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just OCIWNextHopCannotIPForward

1232+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just OCIWNextHopInstanceNotFound

1233+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just OCIWNextHopInstanceNotOnNetwork

1234+ "NEXT_HOP_NOT_RUNNING" -> Just OCIWNextHopNotRunning

1235+ "NOT_CRITICAL_ERROR" -> Just OCIWNotCriticalError

1236+ "NO_RESULTS_ON_PAGE" -> Just OCIWNoResultsOnPage

1237+ "REQUIRED_TOS_AGREEMENT" -> Just OCIWRequiredTosAgreement

1238+ "RESOURCE_NOT_DELETED" -> Just OCIWResourceNotDeleted

1239+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just OCIWSingleInstancePropertyTemplate

1240+ "UNREACHABLE" -> Just OCIWUnreachable

1241+ _ -> Nothing

1242+

1243+instance ToText OperationCodeItemWarnings where

1244+ toText = \case

1245+ OCIWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

1246+ OCIWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

1247+ OCIWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

1248+ OCIWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

1249+ OCIWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

1250+ OCIWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

1251+ OCIWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

1252+ OCIWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

1253+ OCIWNotCriticalError -> "NOT_CRITICAL_ERROR"

1254+ OCIWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"

1255+ OCIWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

1256+ OCIWResourceNotDeleted -> "RESOURCE_NOT_DELETED"

1257+ OCIWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

1258+ OCIWUnreachable -> "UNREACHABLE"

1259+

633-- | [Output Only] Status of the operation. Can be one of the following:

1260-- | [Output Only] Status of the operation. Can be one of the following:

634-- PENDING, RUNNING, or DONE.

1261-- PENDING, RUNNING, or DONE.

635data OperationStatus

1262data OperationStatus

@@ -643,6 +1270,19 @@ data OperationStatus

643

1270

644instance Hashable OperationStatus

1271instance Hashable OperationStatus

645

1272

1273+instance FromText OperationStatus where

1274+ fromText = \case

1275+ "DONE" -> Just OSDone

1276+ "PENDING" -> Just OSPending

1277+ "RUNNING" -> Just OSRunning

1278+ _ -> Nothing

1279+

1280+instance ToText OperationStatus where

1281+ toText = \case

1282+ OSDone -> "DONE"

1283+ OSPending -> "PENDING"

1284+ OSRunning -> "RUNNING"

1285+

646-- | [Output Only] The warning type identifier for this warning.

1286-- | [Output Only] The warning type identifier for this warning.

647data OperationsScopedListCodeWarning

1287data OperationsScopedListCodeWarning

648 = OSLCWDeprecatedResourceUsed

1288 = OSLCWDeprecatedResourceUsed

@@ -677,6 +1317,41 @@ data OperationsScopedListCodeWarning

677

1317

678instance Hashable OperationsScopedListCodeWarning

1318instance Hashable OperationsScopedListCodeWarning

679

1319

1320+instance FromText OperationsScopedListCodeWarning where

1321+ fromText = \case

1322+ "DEPRECATED_RESOURCE_USED" -> Just OSLCWDeprecatedResourceUsed

1323+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just OSLCWDiskSizeLargerThanImageSize

1324+ "INJECTED_KERNELS_DEPRECATED" -> Just OSLCWInjectedKernelsDeprecated

1325+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just OSLCWNextHopAddressNotAssigned

1326+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just OSLCWNextHopCannotIPForward

1327+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just OSLCWNextHopInstanceNotFound

1328+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just OSLCWNextHopInstanceNotOnNetwork

1329+ "NEXT_HOP_NOT_RUNNING" -> Just OSLCWNextHopNotRunning

1330+ "NOT_CRITICAL_ERROR" -> Just OSLCWNotCriticalError

1331+ "NO_RESULTS_ON_PAGE" -> Just OSLCWNoResultsOnPage

1332+ "REQUIRED_TOS_AGREEMENT" -> Just OSLCWRequiredTosAgreement

1333+ "RESOURCE_NOT_DELETED" -> Just OSLCWResourceNotDeleted

1334+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just OSLCWSingleInstancePropertyTemplate

1335+ "UNREACHABLE" -> Just OSLCWUnreachable

1336+ _ -> Nothing

1337+

1338+instance ToText OperationsScopedListCodeWarning where

1339+ toText = \case

1340+ OSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

1341+ OSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

1342+ OSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

1343+ OSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

1344+ OSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

1345+ OSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

1346+ OSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

1347+ OSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

1348+ OSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"

1349+ OSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"

1350+ OSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

1351+ OSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"

1352+ OSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

1353+ OSLCWUnreachable -> "UNREACHABLE"

1354+

680-- | [Output Only] Name of the quota metric.

1355-- | [Output Only] Name of the quota metric.

681data QuotaMetric

1356data QuotaMetric

682 = QMBackendServices

1357 = QMBackendServices

@@ -731,6 +1406,61 @@ data QuotaMetric

731

1406

732instance Hashable QuotaMetric

1407instance Hashable QuotaMetric

733

1408

1409+instance FromText QuotaMetric where

1410+ fromText = \case

1411+ "BACKEND_SERVICES" -> Just QMBackendServices

1412+ "CPUS" -> Just QMCPUs

1413+ "DISKS_TOTAL_GB" -> Just QMDisksTotalGb

1414+ "FIREWALLS" -> Just QMFirewalls

1415+ "FORWARDING_RULES" -> Just QMForwardingRules

1416+ "HEALTH_CHECKS" -> Just QMHealthChecks

1417+ "IMAGES" -> Just QMImages

1418+ "INSTANCES" -> Just QMInstances

1419+ "INSTANCE_GROUPS" -> Just QMInstanceGroups

1420+ "INSTANCE_GROUP_MANAGERS" -> Just QMInstanceGroupManagers

1421+ "INSTANCE_TEMPLATES" -> Just QMInstanceTemplates

1422+ "IN_USE_ADDRESSES" -> Just QMInUseAddresses

1423+ "LOCAL_SSD_TOTAL_GB" -> Just QMLocalSsdTotalGb

1424+ "NETWORKS" -> Just QMNetworks

1425+ "ROUTES" -> Just QMRoutes

1426+ "SNAPSHOTS" -> Just QMSnapshots

1427+ "SSD_TOTAL_GB" -> Just QMSsdTotalGb

1428+ "STATIC_ADDRESSES" -> Just QMStaticAddresses

1429+ "TARGET_HTTP_PROXIES" -> Just QMTargetHTTPProxies

1430+ "TARGET_INSTANCES" -> Just QMTargetInstances

1431+ "TARGET_POOLS" -> Just QMTargetPools

1432+ "TARGET_VPN_GATEWAYS" -> Just QMTargetVPNGateways

1433+ "URL_MAPS" -> Just QMURLMaps

1434+ "VPN_TUNNELS" -> Just QMVPNTunnels

1435+ _ -> Nothing

1436+

1437+instance ToText QuotaMetric where

1438+ toText = \case

1439+ QMBackendServices -> "BACKEND_SERVICES"

1440+ QMCPUs -> "CPUS"

1441+ QMDisksTotalGb -> "DISKS_TOTAL_GB"

1442+ QMFirewalls -> "FIREWALLS"

1443+ QMForwardingRules -> "FORWARDING_RULES"

1444+ QMHealthChecks -> "HEALTH_CHECKS"

1445+ QMImages -> "IMAGES"

1446+ QMInstances -> "INSTANCES"

1447+ QMInstanceGroups -> "INSTANCE_GROUPS"

1448+ QMInstanceGroupManagers -> "INSTANCE_GROUP_MANAGERS"

1449+ QMInstanceTemplates -> "INSTANCE_TEMPLATES"

1450+ QMInUseAddresses -> "IN_USE_ADDRESSES"

1451+ QMLocalSsdTotalGb -> "LOCAL_SSD_TOTAL_GB"

1452+ QMNetworks -> "NETWORKS"

1453+ QMRoutes -> "ROUTES"

1454+ QMSnapshots -> "SNAPSHOTS"

1455+ QMSsdTotalGb -> "SSD_TOTAL_GB"

1456+ QMStaticAddresses -> "STATIC_ADDRESSES"

1457+ QMTargetHTTPProxies -> "TARGET_HTTP_PROXIES"

1458+ QMTargetInstances -> "TARGET_INSTANCES"

1459+ QMTargetPools -> "TARGET_POOLS"

1460+ QMTargetVPNGateways -> "TARGET_VPN_GATEWAYS"

1461+ QMURLMaps -> "URL_MAPS"

1462+ QMVPNTunnels -> "VPN_TUNNELS"

1463+

734-- | [Output Only] Status of the region, either UP or DOWN.

1464-- | [Output Only] Status of the region, either UP or DOWN.

735data RegionStatus

1465data RegionStatus

736 = RSDown

1466 = RSDown

@@ -741,6 +1471,17 @@ data RegionStatus

741

1471

742instance Hashable RegionStatus

1472instance Hashable RegionStatus

743

1473

1474+instance FromText RegionStatus where

1475+ fromText = \case

1476+ "DOWN" -> Just RSDown

1477+ "UP" -> Just RSUP

1478+ _ -> Nothing

1479+

1480+instance ToText RegionStatus where

1481+ toText = \case

1482+ RSDown -> "DOWN"

1483+ RSUP -> "UP"

1484+

744-- | [Output Only] The warning type identifier for this warning.

1485-- | [Output Only] The warning type identifier for this warning.

745data RouteCodeItemWarnings

1486data RouteCodeItemWarnings

746 = RCIWDeprecatedResourceUsed

1487 = RCIWDeprecatedResourceUsed

@@ -775,6 +1516,41 @@ data RouteCodeItemWarnings

775

1516

776instance Hashable RouteCodeItemWarnings

1517instance Hashable RouteCodeItemWarnings

777

1518

1519+instance FromText RouteCodeItemWarnings where

1520+ fromText = \case

1521+ "DEPRECATED_RESOURCE_USED" -> Just RCIWDeprecatedResourceUsed

1522+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just RCIWDiskSizeLargerThanImageSize

1523+ "INJECTED_KERNELS_DEPRECATED" -> Just RCIWInjectedKernelsDeprecated

1524+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just RCIWNextHopAddressNotAssigned

1525+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just RCIWNextHopCannotIPForward

1526+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just RCIWNextHopInstanceNotFound

1527+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just RCIWNextHopInstanceNotOnNetwork

1528+ "NEXT_HOP_NOT_RUNNING" -> Just RCIWNextHopNotRunning

1529+ "NOT_CRITICAL_ERROR" -> Just RCIWNotCriticalError

1530+ "NO_RESULTS_ON_PAGE" -> Just RCIWNoResultsOnPage

1531+ "REQUIRED_TOS_AGREEMENT" -> Just RCIWRequiredTosAgreement

1532+ "RESOURCE_NOT_DELETED" -> Just RCIWResourceNotDeleted

1533+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just RCIWSingleInstancePropertyTemplate

1534+ "UNREACHABLE" -> Just RCIWUnreachable

1535+ _ -> Nothing

1536+

1537+instance ToText RouteCodeItemWarnings where

1538+ toText = \case

1539+ RCIWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

1540+ RCIWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

1541+ RCIWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

1542+ RCIWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

1543+ RCIWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

1544+ RCIWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

1545+ RCIWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

1546+ RCIWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

1547+ RCIWNotCriticalError -> "NOT_CRITICAL_ERROR"

1548+ RCIWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"

1549+ RCIWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

1550+ RCIWResourceNotDeleted -> "RESOURCE_NOT_DELETED"

1551+ RCIWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

1552+ RCIWUnreachable -> "UNREACHABLE"

1553+

778-- | Defines the maintenance behavior for this instance. For standard

1554-- | Defines the maintenance behavior for this instance. For standard

779-- instances, the default behavior is MIGRATE. For preemptible instances,

1555-- instances, the default behavior is MIGRATE. For preemptible instances,

780-- the default and only possible behavior is TERMINATE. For more

1556-- the default and only possible behavior is TERMINATE. For more

@@ -788,6 +1564,17 @@ data SchedulingOnHostMaintenance

788

1564

789instance Hashable SchedulingOnHostMaintenance

1565instance Hashable SchedulingOnHostMaintenance

790

1566

1567+instance FromText SchedulingOnHostMaintenance where

1568+ fromText = \case

1569+ "MIGRATE" -> Just SOHMMigrate

1570+ "TERMINATE" -> Just SOHMTerminate

1571+ _ -> Nothing

1572+

1573+instance ToText SchedulingOnHostMaintenance where

1574+ toText = \case

1575+ SOHMMigrate -> "MIGRATE"

1576+ SOHMTerminate -> "TERMINATE"

1577+

791-- | [Output Only] The status of the snapshot.

1578-- | [Output Only] The status of the snapshot.

792data SnapshotStatus

1579data SnapshotStatus

793 = SSCreating

1580 = SSCreating

@@ -804,6 +1591,23 @@ data SnapshotStatus

804

1591

805instance Hashable SnapshotStatus

1592instance Hashable SnapshotStatus

806

1593

1594+instance FromText SnapshotStatus where

1595+ fromText = \case

1596+ "CREATING" -> Just SSCreating

1597+ "DELETING" -> Just SSDeleting

1598+ "FAILED" -> Just SSFailed

1599+ "READY" -> Just SSReady

1600+ "UPLOADING" -> Just SSUploading

1601+ _ -> Nothing

1602+

1603+instance ToText SnapshotStatus where

1604+ toText = \case

1605+ SSCreating -> "CREATING"

1606+ SSDeleting -> "DELETING"

1607+ SSFailed -> "FAILED"

1608+ SSReady -> "READY"

1609+ SSUploading -> "UPLOADING"

1610+

807-- | [Output Only] An indicator whether storageBytes is in a stable state or

1611-- | [Output Only] An indicator whether storageBytes is in a stable state or

808-- it is being adjusted as a result of shared storage reallocation.

1612-- it is being adjusted as a result of shared storage reallocation.

809data SnapshotStorageBytesStatus

1613data SnapshotStorageBytesStatus

@@ -815,6 +1619,17 @@ data SnapshotStorageBytesStatus

815

1619

816instance Hashable SnapshotStorageBytesStatus

1620instance Hashable SnapshotStorageBytesStatus

817

1621

1622+instance FromText SnapshotStorageBytesStatus where

1623+ fromText = \case

1624+ "UPDATING" -> Just SSBSUpdating

1625+ "UP_TO_DATE" -> Just SSBSUpToDate

1626+ _ -> Nothing

1627+

1628+instance ToText SnapshotStorageBytesStatus where

1629+ toText = \case

1630+ SSBSUpdating -> "UPDATING"

1631+ SSBSUpToDate -> "UP_TO_DATE"

1632+

818-- | NAT option controlling how IPs are NAT\'ed to the instance. Currently

1633-- | NAT option controlling how IPs are NAT\'ed to the instance. Currently

819-- only NO_NAT (default value) is supported.

1634-- only NO_NAT (default value) is supported.

820data TargetInstanceNatPolicy

1635data TargetInstanceNatPolicy

@@ -824,6 +1639,15 @@ data TargetInstanceNatPolicy

824

1639

825instance Hashable TargetInstanceNatPolicy

1640instance Hashable TargetInstanceNatPolicy

826

1641

1642+instance FromText TargetInstanceNatPolicy where

1643+ fromText = \case

1644+ "NO_NAT" -> Just TINPNoNAT

1645+ _ -> Nothing

1646+

1647+instance ToText TargetInstanceNatPolicy where

1648+ toText = \case

1649+ TINPNoNAT -> "NO_NAT"

1650+

827-- | [Output Only] The warning type identifier for this warning.

1651-- | [Output Only] The warning type identifier for this warning.

828data TargetInstancesScopedListCodeWarning

1652data TargetInstancesScopedListCodeWarning

829 = TISLCWDeprecatedResourceUsed

1653 = TISLCWDeprecatedResourceUsed

@@ -858,6 +1682,41 @@ data TargetInstancesScopedListCodeWarning

858

1682

859instance Hashable TargetInstancesScopedListCodeWarning

1683instance Hashable TargetInstancesScopedListCodeWarning

860

1684

1685+instance FromText TargetInstancesScopedListCodeWarning where

1686+ fromText = \case

1687+ "DEPRECATED_RESOURCE_USED" -> Just TISLCWDeprecatedResourceUsed

1688+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just TISLCWDiskSizeLargerThanImageSize

1689+ "INJECTED_KERNELS_DEPRECATED" -> Just TISLCWInjectedKernelsDeprecated

1690+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just TISLCWNextHopAddressNotAssigned

1691+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just TISLCWNextHopCannotIPForward

1692+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just TISLCWNextHopInstanceNotFound

1693+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just TISLCWNextHopInstanceNotOnNetwork

1694+ "NEXT_HOP_NOT_RUNNING" -> Just TISLCWNextHopNotRunning

1695+ "NOT_CRITICAL_ERROR" -> Just TISLCWNotCriticalError

1696+ "NO_RESULTS_ON_PAGE" -> Just TISLCWNoResultsOnPage

1697+ "REQUIRED_TOS_AGREEMENT" -> Just TISLCWRequiredTosAgreement

1698+ "RESOURCE_NOT_DELETED" -> Just TISLCWResourceNotDeleted

1699+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just TISLCWSingleInstancePropertyTemplate

1700+ "UNREACHABLE" -> Just TISLCWUnreachable

1701+ _ -> Nothing

1702+

1703+instance ToText TargetInstancesScopedListCodeWarning where

1704+ toText = \case

1705+ TISLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

1706+ TISLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

1707+ TISLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

1708+ TISLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

1709+ TISLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

1710+ TISLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

1711+ TISLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

1712+ TISLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

1713+ TISLCWNotCriticalError -> "NOT_CRITICAL_ERROR"

1714+ TISLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"

1715+ TISLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

1716+ TISLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"

1717+ TISLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

1718+ TISLCWUnreachable -> "UNREACHABLE"

1719+

861-- | Sesssion affinity option, must be one of the following values: NONE:

1720-- | Sesssion affinity option, must be one of the following values: NONE:

862-- Connections from the same client IP may go to any instance in the pool;

1721-- Connections from the same client IP may go to any instance in the pool;

863-- CLIENT_IP: Connections from the same client IP will go to the same

1722-- CLIENT_IP: Connections from the same client IP will go to the same

@@ -876,6 +1735,19 @@ data TargetPoolSessionAffinity

876

1735

877instance Hashable TargetPoolSessionAffinity

1736instance Hashable TargetPoolSessionAffinity

878

1737

1738+instance FromText TargetPoolSessionAffinity where

1739+ fromText = \case

1740+ "CLIENT_IP" -> Just TPSAClientIP

1741+ "CLIENT_IP_PROTO" -> Just TPSAClientIPProto

1742+ "NONE" -> Just TPSANone

1743+ _ -> Nothing

1744+

1745+instance ToText TargetPoolSessionAffinity where

1746+ toText = \case

1747+ TPSAClientIP -> "CLIENT_IP"

1748+ TPSAClientIPProto -> "CLIENT_IP_PROTO"

1749+ TPSANone -> "NONE"

1750+

879-- | [Output Only] The warning type identifier for this warning.

1751-- | [Output Only] The warning type identifier for this warning.

880data TargetPoolsScopedListCodeWarning

1752data TargetPoolsScopedListCodeWarning

881 = TPSLCWDeprecatedResourceUsed

1753 = TPSLCWDeprecatedResourceUsed

@@ -910,6 +1782,41 @@ data TargetPoolsScopedListCodeWarning

910

1782

911instance Hashable TargetPoolsScopedListCodeWarning

1783instance Hashable TargetPoolsScopedListCodeWarning

912

1784

1785+instance FromText TargetPoolsScopedListCodeWarning where

1786+ fromText = \case

1787+ "DEPRECATED_RESOURCE_USED" -> Just TPSLCWDeprecatedResourceUsed

1788+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just TPSLCWDiskSizeLargerThanImageSize

1789+ "INJECTED_KERNELS_DEPRECATED" -> Just TPSLCWInjectedKernelsDeprecated

1790+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just TPSLCWNextHopAddressNotAssigned

1791+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just TPSLCWNextHopCannotIPForward

1792+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just TPSLCWNextHopInstanceNotFound

1793+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just TPSLCWNextHopInstanceNotOnNetwork

1794+ "NEXT_HOP_NOT_RUNNING" -> Just TPSLCWNextHopNotRunning

1795+ "NOT_CRITICAL_ERROR" -> Just TPSLCWNotCriticalError

1796+ "NO_RESULTS_ON_PAGE" -> Just TPSLCWNoResultsOnPage

1797+ "REQUIRED_TOS_AGREEMENT" -> Just TPSLCWRequiredTosAgreement

1798+ "RESOURCE_NOT_DELETED" -> Just TPSLCWResourceNotDeleted

1799+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just TPSLCWSingleInstancePropertyTemplate

1800+ "UNREACHABLE" -> Just TPSLCWUnreachable

1801+ _ -> Nothing

1802+

1803+instance ToText TargetPoolsScopedListCodeWarning where

1804+ toText = \case

1805+ TPSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

1806+ TPSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

1807+ TPSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

1808+ TPSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

1809+ TPSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

1810+ TPSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

1811+ TPSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

1812+ TPSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

1813+ TPSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"

1814+ TPSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"

1815+ TPSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

1816+ TPSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"

1817+ TPSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

1818+ TPSLCWUnreachable -> "UNREACHABLE"

1819+

913-- | [Output Only] The status of the VPN gateway.

1820-- | [Output Only] The status of the VPN gateway.

914data TargetVpnGatewayStatus

1821data TargetVpnGatewayStatus

915 = TVGSCreating

1822 = TVGSCreating

@@ -924,6 +1831,21 @@ data TargetVpnGatewayStatus

924

1831

925instance Hashable TargetVpnGatewayStatus

1832instance Hashable TargetVpnGatewayStatus

926

1833

1834+instance FromText TargetVpnGatewayStatus where

1835+ fromText = \case

1836+ "CREATING" -> Just TVGSCreating

1837+ "DELETING" -> Just TVGSDeleting

1838+ "FAILED" -> Just TVGSFailed

1839+ "READY" -> Just TVGSReady

1840+ _ -> Nothing

1841+

1842+instance ToText TargetVpnGatewayStatus where

1843+ toText = \case

1844+ TVGSCreating -> "CREATING"

1845+ TVGSDeleting -> "DELETING"

1846+ TVGSFailed -> "FAILED"

1847+ TVGSReady -> "READY"

1848+

927-- | [Output Only] The warning type identifier for this warning.

1849-- | [Output Only] The warning type identifier for this warning.

928data TargetVpnGatewaysScopedListCodeWarning

1850data TargetVpnGatewaysScopedListCodeWarning

929 = TVGSLCWDeprecatedResourceUsed

1851 = TVGSLCWDeprecatedResourceUsed

@@ -958,6 +1880,41 @@ data TargetVpnGatewaysScopedListCodeWarning

958

1880

959instance Hashable TargetVpnGatewaysScopedListCodeWarning

1881instance Hashable TargetVpnGatewaysScopedListCodeWarning

960

1882

1883+instance FromText TargetVpnGatewaysScopedListCodeWarning where

1884+ fromText = \case

1885+ "DEPRECATED_RESOURCE_USED" -> Just TVGSLCWDeprecatedResourceUsed

1886+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just TVGSLCWDiskSizeLargerThanImageSize

1887+ "INJECTED_KERNELS_DEPRECATED" -> Just TVGSLCWInjectedKernelsDeprecated

1888+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just TVGSLCWNextHopAddressNotAssigned

1889+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just TVGSLCWNextHopCannotIPForward

1890+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just TVGSLCWNextHopInstanceNotFound

1891+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just TVGSLCWNextHopInstanceNotOnNetwork

1892+ "NEXT_HOP_NOT_RUNNING" -> Just TVGSLCWNextHopNotRunning

1893+ "NOT_CRITICAL_ERROR" -> Just TVGSLCWNotCriticalError

1894+ "NO_RESULTS_ON_PAGE" -> Just TVGSLCWNoResultsOnPage

1895+ "REQUIRED_TOS_AGREEMENT" -> Just TVGSLCWRequiredTosAgreement

1896+ "RESOURCE_NOT_DELETED" -> Just TVGSLCWResourceNotDeleted

1897+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just TVGSLCWSingleInstancePropertyTemplate

1898+ "UNREACHABLE" -> Just TVGSLCWUnreachable

1899+ _ -> Nothing

1900+

1901+instance ToText TargetVpnGatewaysScopedListCodeWarning where

1902+ toText = \case

1903+ TVGSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

1904+ TVGSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

1905+ TVGSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

1906+ TVGSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

1907+ TVGSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

1908+ TVGSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

1909+ TVGSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

1910+ TVGSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

1911+ TVGSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"

1912+ TVGSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"

1913+ TVGSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

1914+ TVGSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"

1915+ TVGSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

1916+ TVGSLCWUnreachable -> "UNREACHABLE"

1917+

961-- | [Output Only] The status of the VPN tunnel.

1918-- | [Output Only] The status of the VPN tunnel.

962data VpnTunnelStatus

1919data VpnTunnelStatus

963 = VTSAuthorizationError

1920 = VTSAuthorizationError

@@ -986,6 +1943,35 @@ data VpnTunnelStatus

986

1943

987instance Hashable VpnTunnelStatus

1944instance Hashable VpnTunnelStatus

988

1945

1946+instance FromText VpnTunnelStatus where

1947+ fromText = \case

1948+ "AUTHORIZATION_ERROR" -> Just VTSAuthorizationError

1949+ "DEPROVISIONING" -> Just VTSDeprovisioning

1950+ "ESTABLISHED" -> Just VTSEstablished

1951+ "FAILED" -> Just VTSFailed

1952+ "FIRST_HANDSHAKE" -> Just VTSFirstHandshake

1953+ "NEGOTIATION_FAILURE" -> Just VTSNegotiationFailure

1954+ "NETWORK_ERROR" -> Just VTSNetworkError

1955+ "NO_INCOMING_PACKETS" -> Just VTSNoIncomingPackets

1956+ "PROVISIONING" -> Just VTSProvisioning

1957+ "REJECTED" -> Just VTSRejected

1958+ "WAITING_FOR_FULL_CONFIG" -> Just VTSWaitingForFullConfig

1959+ _ -> Nothing

1960+

1961+instance ToText VpnTunnelStatus where

1962+ toText = \case

1963+ VTSAuthorizationError -> "AUTHORIZATION_ERROR"

1964+ VTSDeprovisioning -> "DEPROVISIONING"

1965+ VTSEstablished -> "ESTABLISHED"

1966+ VTSFailed -> "FAILED"

1967+ VTSFirstHandshake -> "FIRST_HANDSHAKE"

1968+ VTSNegotiationFailure -> "NEGOTIATION_FAILURE"

1969+ VTSNetworkError -> "NETWORK_ERROR"

1970+ VTSNoIncomingPackets -> "NO_INCOMING_PACKETS"

1971+ VTSProvisioning -> "PROVISIONING"

1972+ VTSRejected -> "REJECTED"

1973+ VTSWaitingForFullConfig -> "WAITING_FOR_FULL_CONFIG"

1974+

989-- | [Output Only] The warning type identifier for this warning.

1975-- | [Output Only] The warning type identifier for this warning.

990data VpnTunnelsScopedListCodeWarning

1976data VpnTunnelsScopedListCodeWarning

991 = VTSLCWDeprecatedResourceUsed

1977 = VTSLCWDeprecatedResourceUsed

@@ -1020,6 +2006,41 @@ data VpnTunnelsScopedListCodeWarning

1020

2006

1021instance Hashable VpnTunnelsScopedListCodeWarning

2007instance Hashable VpnTunnelsScopedListCodeWarning

1022

2008

2009+instance FromText VpnTunnelsScopedListCodeWarning where

2010+ fromText = \case

2011+ "DEPRECATED_RESOURCE_USED" -> Just VTSLCWDeprecatedResourceUsed

2012+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just VTSLCWDiskSizeLargerThanImageSize

2013+ "INJECTED_KERNELS_DEPRECATED" -> Just VTSLCWInjectedKernelsDeprecated

2014+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just VTSLCWNextHopAddressNotAssigned

2015+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just VTSLCWNextHopCannotIPForward

2016+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just VTSLCWNextHopInstanceNotFound

2017+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just VTSLCWNextHopInstanceNotOnNetwork

2018+ "NEXT_HOP_NOT_RUNNING" -> Just VTSLCWNextHopNotRunning

2019+ "NOT_CRITICAL_ERROR" -> Just VTSLCWNotCriticalError

2020+ "NO_RESULTS_ON_PAGE" -> Just VTSLCWNoResultsOnPage

2021+ "REQUIRED_TOS_AGREEMENT" -> Just VTSLCWRequiredTosAgreement

2022+ "RESOURCE_NOT_DELETED" -> Just VTSLCWResourceNotDeleted

2023+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just VTSLCWSingleInstancePropertyTemplate

2024+ "UNREACHABLE" -> Just VTSLCWUnreachable

2025+ _ -> Nothing

2026+

2027+instance ToText VpnTunnelsScopedListCodeWarning where

2028+ toText = \case

2029+ VTSLCWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

2030+ VTSLCWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

2031+ VTSLCWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

2032+ VTSLCWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

2033+ VTSLCWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

2034+ VTSLCWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

2035+ VTSLCWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

2036+ VTSLCWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

2037+ VTSLCWNotCriticalError -> "NOT_CRITICAL_ERROR"

2038+ VTSLCWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"

2039+ VTSLCWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

2040+ VTSLCWResourceNotDeleted -> "RESOURCE_NOT_DELETED"

2041+ VTSLCWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

2042+ VTSLCWUnreachable -> "UNREACHABLE"

2043+

1023-- | [Output Only] Status of the zone, either UP or DOWN.

2044-- | [Output Only] Status of the zone, either UP or DOWN.

1024data ZoneStatus

2045data ZoneStatus

1025 = ZSDown

2046 = ZSDown

@@ -1029,3 +2050,14 @@ data ZoneStatus

1029 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

2050 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

1030

2051

1031instance Hashable ZoneStatus

2052instance Hashable ZoneStatus

2053+

2054+instance FromText ZoneStatus where

2055+ fromText = \case

2056+ "DOWN" -> Just ZSDown

2057+ "UP" -> Just ZSUP

2058+ _ -> Nothing

2059+

2060+instance ToText ZoneStatus where

2061+ toText = \case

2062+ ZSDown -> "DOWN"

2063+ ZSUP -> "UP"

gogol-container/gen/Network/Google/ContainerEngine/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.ContainerEngine.Types

8-- Module : Network.Google.ContainerEngine.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.ContainerEngine.Types

15module Network.Google.ContainerEngine.Types

14 (

16 (

15− -- * API Definition

16− container

17−

18

17

19 -- * Cluster

18 -- * Cluster

20− , Cluster

19+ Cluster

21 , cluster

20 , cluster

22 , cStatus

21 , cStatus

23 , cNodeConfig

22 , cNodeConfig

@@ -112,6 +111,3 @@ module Network.Google.ContainerEngine.Types

112import Network.Google.ContainerEngine.Types.Product

111import Network.Google.ContainerEngine.Types.Product

113import Network.Google.ContainerEngine.Types.Sum

112import Network.Google.ContainerEngine.Types.Sum

114import Network.Google.Prelude

113import Network.Google.Prelude

115−

116−container :: a

117−container = error "container"

gogol-container/gen/Network/Google/ContainerEngine/Types/Product.hs+4−2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.ContainerEngine.Types.Product

8-- Module : Network.Google.ContainerEngine.Types.Product

@@ -37,7 +39,7 @@ data Cluster = Cluster

37 , _cDescription :: !(Maybe Text)

39 , _cDescription :: !(Maybe Text)

38 , _cInstanceGroupUrls :: !(Maybe [Text])

40 , _cInstanceGroupUrls :: !(Maybe [Text])

39 , _cNodeRoutingPrefixSize :: !(Maybe Int32)

41 , _cNodeRoutingPrefixSize :: !(Maybe Int32)

40− }

42+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

41

43

42-- | Creates a value of 'Cluster' with the minimum fields required to make a request.

44-- | Creates a value of 'Cluster' with the minimum fields required to make a request.

43--

45--

@@ -511,7 +513,7 @@ data Operation = Operation

511 , _oErrorMessage :: !(Maybe Text)

513 , _oErrorMessage :: !(Maybe Text)

512 , _oTargetLink :: !(Maybe Text)

514 , _oTargetLink :: !(Maybe Text)

513 , _oTarget :: !(Maybe Text)

515 , _oTarget :: !(Maybe Text)

514− }

516+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

515

517

516-- | Creates a value of 'Operation' with the minimum fields required to make a request.

518-- | Creates a value of 'Operation' with the minimum fields required to make a request.

517--

519--

gogol-container/gen/Network/Google/ContainerEngine/Types/Sum.hs+42

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.ContainerEngine.Types.Sum

9-- Module : Network.Google.ContainerEngine.Types.Sum

@@ -28,6 +31,21 @@ data ClusterStatus

28

31

29instance Hashable ClusterStatus

32instance Hashable ClusterStatus

30

33

34+instance FromText ClusterStatus where

35+ fromText = \case

36+ "error" -> Just CSError

37+ "provisioning" -> Just CSProvisioning

38+ "running" -> Just CSRunning

39+ "stopping" -> Just CSStopping

40+ _ -> Nothing

41+

42+instance ToText ClusterStatus where

43+ toText = \case

44+ CSError -> "error"

45+ CSProvisioning -> "provisioning"

46+ CSRunning -> "running"

47+ CSStopping -> "stopping"

48+

31-- | The operation type.

49-- | The operation type.

32data OperationOperationType

50data OperationOperationType

33 = OOTCreateCluster

51 = OOTCreateCluster

@@ -38,6 +56,17 @@ data OperationOperationType

38

56

39instance Hashable OperationOperationType

57instance Hashable OperationOperationType

40

58

59+instance FromText OperationOperationType where

60+ fromText = \case

61+ "createCluster" -> Just OOTCreateCluster

62+ "deleteCluster" -> Just OOTDeleteCluster

63+ _ -> Nothing

64+

65+instance ToText OperationOperationType where

66+ toText = \case

67+ OOTCreateCluster -> "createCluster"

68+ OOTDeleteCluster -> "deleteCluster"

69+

41-- | The current status of the operation.

70-- | The current status of the operation.

42data OperationStatus

71data OperationStatus

43 = OSDone

72 = OSDone

@@ -49,3 +78,16 @@ data OperationStatus

49 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

78 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

50

79

51instance Hashable OperationStatus

80instance Hashable OperationStatus

81+

82+instance FromText OperationStatus where

83+ fromText = \case

84+ "done" -> Just OSDone

85+ "pending" -> Just OSPending

86+ "running" -> Just OSRunning

87+ _ -> Nothing

88+

89+instance ToText OperationStatus where

90+ toText = \case

91+ OSDone -> "done"

92+ OSPending -> "pending"

93+ OSRunning -> "running"

gogol-content/gen/Network/Google/ShoppingContent/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.ShoppingContent.Types

8-- Module : Network.Google.ShoppingContent.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.ShoppingContent.Types

15module Network.Google.ShoppingContent.Types

14 (

16 (

15− -- * API Definition

16− content

17−

18

17

19 -- * Error

18 -- * Error

20− , Error

19+ Error

21 , error'

20 , error'

22 , errDomain

21 , errDomain

23 , errReason

22 , errReason

@@ -487,6 +486,3 @@ module Network.Google.ShoppingContent.Types

487import Network.Google.Prelude

486import Network.Google.Prelude

488import Network.Google.ShoppingContent.Types.Product

487import Network.Google.ShoppingContent.Types.Product

489import Network.Google.ShoppingContent.Types.Sum

488import Network.Google.ShoppingContent.Types.Sum

490−

491−content :: a

492−content = error "content"

gogol-content/gen/Network/Google/ShoppingContent/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.ShoppingContent.Types.Product

8-- Module : Network.Google.ShoppingContent.Types.Product

gogol-content/gen/Network/Google/ShoppingContent/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.ShoppingContent.Types.Sum

9-- Module : Network.Google.ShoppingContent.Types.Sum

gogol-customsearch/gen/Network/Google/CustomSearch/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CustomSearch.Types

8-- Module : Network.Google.CustomSearch.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.CustomSearch.Types

15module Network.Google.CustomSearch.Types

14 (

16 (

15− -- * API Definition

16− customsearch

17−

18

17

19 -- * Context

18 -- * Context

20− , Context

19+ Context

21 , context

20 , context

22 , cFacets

21 , cFacets

23 , cTitle

22 , cTitle

@@ -176,6 +175,3 @@ module Network.Google.CustomSearch.Types

176import Network.Google.CustomSearch.Types.Product

175import Network.Google.CustomSearch.Types.Product

177import Network.Google.CustomSearch.Types.Sum

176import Network.Google.CustomSearch.Types.Sum

178import Network.Google.Prelude

177import Network.Google.Prelude

179−

180−customsearch :: a

181−customsearch = error "customsearch"

gogol-customsearch/gen/Network/Google/CustomSearch/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CustomSearch.Types.Product

8-- Module : Network.Google.CustomSearch.Types.Product

gogol-customsearch/gen/Network/Google/CustomSearch/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.CustomSearch.Types.Sum

9-- Module : Network.Google.CustomSearch.Types.Sum

gogol-dataflow/gen/Network/Google/Dataflow/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Dataflow.Types

8-- Module : Network.Google.Dataflow.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Dataflow.Types

15module Network.Google.Dataflow.Types

14 (

16 (

15− -- * API Definition

16− dataflow

17−

18

17

19 -- * ApproximateProgress

18 -- * ApproximateProgress

20− , ApproximateProgress

19+ ApproximateProgress

21 , approximateProgress

20 , approximateProgress

22 , apRemainingTime

21 , apRemainingTime

23 , apPercentComplete

22 , apPercentComplete

@@ -675,6 +674,3 @@ module Network.Google.Dataflow.Types

675import Network.Google.Dataflow.Types.Product

674import Network.Google.Dataflow.Types.Product

676import Network.Google.Dataflow.Types.Sum

675import Network.Google.Dataflow.Types.Sum

677import Network.Google.Prelude

676import Network.Google.Prelude

678−

679−dataflow :: a

680−dataflow = error "dataflow"

gogol-dataflow/gen/Network/Google/Dataflow/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Dataflow.Types.Product

8-- Module : Network.Google.Dataflow.Types.Product

gogol-dataflow/gen/Network/Google/Dataflow/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Dataflow.Types.Sum

9-- Module : Network.Google.Dataflow.Types.Sum

gogol-dfareporting/gen/Network/Google/DFAReporting/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.DFAReporting.Types

8-- Module : Network.Google.DFAReporting.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.DFAReporting.Types

15module Network.Google.DFAReporting.Types

14 (

16 (

15− -- * API Definition

16− dfareporting

17−

18

17

19 -- * Account

18 -- * Account

20− , Account

19+ Account

21 , account

20 , account

22 , aaAccountPermissionIds

21 , aaAccountPermissionIds

23 , aaMaximumImageSize

22 , aaMaximumImageSize

@@ -2270,6 +2269,3 @@ module Network.Google.DFAReporting.Types

2270import Network.Google.DFAReporting.Types.Product

2269import Network.Google.DFAReporting.Types.Product

2271import Network.Google.DFAReporting.Types.Sum

2270import Network.Google.DFAReporting.Types.Sum

2272import Network.Google.Prelude

2271import Network.Google.Prelude

2273−

2274−dfareporting :: a

2275−dfareporting = error "dfareporting"

gogol-dfareporting/gen/Network/Google/DFAReporting/Types/Product.hs+55−53

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.DFAReporting.Types.Product

8-- Module : Network.Google.DFAReporting.Types.Product

@@ -38,7 +40,7 @@ data Account = Account

38 , _aaActiveAdsLimitTier :: !(Maybe AccountActiveAdsLimitTier)

40 , _aaActiveAdsLimitTier :: !(Maybe AccountActiveAdsLimitTier)

39 , _aaDefaultCreativeSizeId :: !(Maybe Int64)

41 , _aaDefaultCreativeSizeId :: !(Maybe Int64)

40 , _aaDescription :: !(Maybe Text)

42 , _aaDescription :: !(Maybe Text)

41− }

43+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

42

44

43-- | Creates a value of 'Account' with the minimum fields required to make a request.

45-- | Creates a value of 'Account' with the minimum fields required to make a request.

44--

46--

@@ -242,7 +244,7 @@ data AccountActiveAdSummary = AccountActiveAdSummary

242 , _aaasAccountId :: !(Maybe Int64)

244 , _aaasAccountId :: !(Maybe Int64)

243 , _aaasActiveAds :: !(Maybe Int64)

245 , _aaasActiveAds :: !(Maybe Int64)

244 , _aaasActiveAdsLimitTier :: !(Maybe AccountActiveAdSummaryActiveAdsLimitTier)

246 , _aaasActiveAdsLimitTier :: !(Maybe AccountActiveAdSummaryActiveAdsLimitTier)

245− }

247+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

246

248

247-- | Creates a value of 'AccountActiveAdSummary' with the minimum fields required to make a request.

249-- | Creates a value of 'AccountActiveAdSummary' with the minimum fields required to make a request.

248--

250--

@@ -309,7 +311,7 @@ data AccountPermission = AccountPermission

309 , _apId :: !(Maybe Int64)

311 , _apId :: !(Maybe Int64)

310 , _apLevel :: !(Maybe AccountPermissionLevel)

312 , _apLevel :: !(Maybe AccountPermissionLevel)

311 , _apPermissionGroupId :: !(Maybe Int64)

313 , _apPermissionGroupId :: !(Maybe Int64)

312− }

314+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

313

315

314-- | Creates a value of 'AccountPermission' with the minimum fields required to make a request.

316-- | Creates a value of 'AccountPermission' with the minimum fields required to make a request.

315--

317--

@@ -506,7 +508,7 @@ data AccountUserProfile = AccountUserProfile

506 , _aupComments :: !(Maybe Text)

508 , _aupComments :: !(Maybe Text)

507 , _aupSubaccountId :: !(Maybe Int64)

509 , _aupSubaccountId :: !(Maybe Int64)

508 , _aupCampaignFilter :: !(Maybe (Maybe ObjectFilter))

510 , _aupCampaignFilter :: !(Maybe (Maybe ObjectFilter))

509− }

511+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

510

512

511-- | Creates a value of 'AccountUserProfile' with the minimum fields required to make a request.

513-- | Creates a value of 'AccountUserProfile' with the minimum fields required to make a request.

512--

514--

@@ -844,7 +846,7 @@ data Ad = Ad

844 , _addArchived :: !(Maybe Bool)

846 , _addArchived :: !(Maybe Bool)

845 , _addDefaultClickThroughEventTagProperties :: !(Maybe (Maybe DefaultClickThroughEventTagProperties))

847 , _addDefaultClickThroughEventTagProperties :: !(Maybe (Maybe DefaultClickThroughEventTagProperties))

846 , _addPlacementAssignments :: !(Maybe [Maybe PlacementAssignment])

848 , _addPlacementAssignments :: !(Maybe [Maybe PlacementAssignment])

847− }

849+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

848

850

849-- | Creates a value of 'Ad' with the minimum fields required to make a request.

851-- | Creates a value of 'Ad' with the minimum fields required to make a request.

850--

852--

@@ -1228,7 +1230,7 @@ data AdSlot = AdSlot

1228 , _adName :: !(Maybe Text)

1230 , _adName :: !(Maybe Text)

1229 , _adComment :: !(Maybe Text)

1231 , _adComment :: !(Maybe Text)

1230 , _adCompatibility :: !(Maybe AdSlotCompatibility)

1232 , _adCompatibility :: !(Maybe AdSlotCompatibility)

1231− }

1233+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1232

1234

1233-- | Creates a value of 'AdSlot' with the minimum fields required to make a request.

1235-- | Creates a value of 'AdSlot' with the minimum fields required to make a request.

1234--

1236--

@@ -1371,7 +1373,7 @@ data Advertiser = Advertiser

1371 , _aSubaccountId :: !(Maybe Int64)

1373 , _aSubaccountId :: !(Maybe Int64)

1372 , _aFloodlightConfigurationIdDimensionValue :: !(Maybe (Maybe DimensionValue))

1374 , _aFloodlightConfigurationIdDimensionValue :: !(Maybe (Maybe DimensionValue))

1373 , _aClickThroughUrlSuffix :: !(Maybe Text)

1375 , _aClickThroughUrlSuffix :: !(Maybe Text)

1374− }

1376+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1375

1377

1376-- | Creates a value of 'Advertiser' with the minimum fields required to make a request.

1378-- | Creates a value of 'Advertiser' with the minimum fields required to make a request.

1377--

1379--

@@ -3251,7 +3253,7 @@ data Creative = Creative

3251 , _ccRedirectUrl :: !(Maybe Text)

3253 , _ccRedirectUrl :: !(Maybe Text)

3252 , _ccAutoAdvanceImages :: !(Maybe Bool)

3254 , _ccAutoAdvanceImages :: !(Maybe Bool)

3253 , _ccCreativeFieldAssignments :: !(Maybe [Maybe CreativeFieldAssignment])

3255 , _ccCreativeFieldAssignments :: !(Maybe [Maybe CreativeFieldAssignment])

3254− }

3256+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

3255

3257

3256-- | Creates a value of 'Creative' with the minimum fields required to make a request.

3258-- | Creates a value of 'Creative' with the minimum fields required to make a request.

3257--

3259--

@@ -3951,7 +3953,7 @@ data CreativeAsset = CreativeAsset

3951 , _cBackupImageExit :: !(Maybe (Maybe CreativeCustomEvent))

3953 , _cBackupImageExit :: !(Maybe (Maybe CreativeCustomEvent))

3952 , _cPosition :: !(Maybe (Maybe OffsetPosition))

3954 , _cPosition :: !(Maybe (Maybe OffsetPosition))

3953 , _cHorizontallyLocked :: !(Maybe Bool)

3955 , _cHorizontallyLocked :: !(Maybe Bool)

3954− }

3956+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

3955

3957

3956-- | Creates a value of 'CreativeAsset' with the minimum fields required to make a request.

3958-- | Creates a value of 'CreativeAsset' with the minimum fields required to make a request.

3957--

3959--

@@ -4413,7 +4415,7 @@ cHorizontallyLocked

4413data CreativeAssetId = CreativeAssetId

4415data CreativeAssetId = CreativeAssetId

4414 { _caiName :: !(Maybe Text)

4416 { _caiName :: !(Maybe Text)

4415 , _caiType :: !(Maybe CreativeAssetIdType)

4417 , _caiType :: !(Maybe CreativeAssetIdType)

4416− }

4418+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

4417

4419

4418-- | Creates a value of 'CreativeAssetId' with the minimum fields required to make a request.

4420-- | Creates a value of 'CreativeAssetId' with the minimum fields required to make a request.

4419--

4421--

@@ -4453,7 +4455,7 @@ data CreativeAssetMetadata = CreativeAssetMetadata

4453 , _camaClickTags :: !(Maybe [Maybe ClickTag])

4455 , _camaClickTags :: !(Maybe [Maybe ClickTag])

4454 , _camaWarnedValidationRules :: !(Maybe [CreativeAssetMetadataItemWarnedValidationRules])

4456 , _camaWarnedValidationRules :: !(Maybe [CreativeAssetMetadataItemWarnedValidationRules])

4455 , _camaDetectedFeatures :: !(Maybe [CreativeAssetMetadataItemDetectedFeatures])

4457 , _camaDetectedFeatures :: !(Maybe [CreativeAssetMetadataItemDetectedFeatures])

4456− }

4458+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

4457

4459

4458-- | Creates a value of 'CreativeAssetMetadata' with the minimum fields required to make a request.

4460-- | Creates a value of 'CreativeAssetMetadata' with the minimum fields required to make a request.

4459--

4461--

@@ -4702,7 +4704,7 @@ data CreativeCustomEvent = CreativeCustomEvent

4702 , _cceId :: !(Maybe Int64)

4704 , _cceId :: !(Maybe Int64)

4703 , _cceArtworkLabel :: !(Maybe Text)

4705 , _cceArtworkLabel :: !(Maybe Text)

4704 , _cceArtworkType :: !(Maybe CreativeCustomEventArtworkType)

4706 , _cceArtworkType :: !(Maybe CreativeCustomEventArtworkType)

4705− }

4707+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

4706

4708

4707-- | Creates a value of 'CreativeCustomEvent' with the minimum fields required to make a request.

4709-- | Creates a value of 'CreativeCustomEvent' with the minimum fields required to make a request.

4708--

4710--

@@ -5155,7 +5157,7 @@ cgSubaccountId

5155data CreativeGroupAssignment = CreativeGroupAssignment

5157data CreativeGroupAssignment = CreativeGroupAssignment

5156 { _cgaCreativeGroupNumber :: !(Maybe CreativeGroupAssignmentCreativeGroupNumber)

5158 { _cgaCreativeGroupNumber :: !(Maybe CreativeGroupAssignmentCreativeGroupNumber)

5157 , _cgaCreativeGroupId :: !(Maybe Int64)

5159 , _cgaCreativeGroupId :: !(Maybe Int64)

5158− }

5160+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5159

5161

5160-- | Creates a value of 'CreativeGroupAssignment' with the minimum fields required to make a request.

5162-- | Creates a value of 'CreativeGroupAssignment' with the minimum fields required to make a request.

5161--

5163--

@@ -5238,7 +5240,7 @@ data CreativeOptimizationConfiguration = CreativeOptimizationConfiguration

5238 , _cocName :: !(Maybe Text)

5240 , _cocName :: !(Maybe Text)

5239 , _cocOptimizationActivitys :: !(Maybe [Maybe OptimizationActivity])

5241 , _cocOptimizationActivitys :: !(Maybe [Maybe OptimizationActivity])

5240 , _cocId :: !(Maybe Int64)

5242 , _cocId :: !(Maybe Int64)

5241− }

5243+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5242

5244

5243-- | Creates a value of 'CreativeOptimizationConfiguration' with the minimum fields required to make a request.

5245-- | Creates a value of 'CreativeOptimizationConfiguration' with the minimum fields required to make a request.

5244--

5246--

@@ -5294,7 +5296,7 @@ data CreativeRotation = CreativeRotation

5294 , _crCreativeAssignments :: !(Maybe [Maybe CreativeAssignment])

5296 , _crCreativeAssignments :: !(Maybe [Maybe CreativeAssignment])

5295 , _crCreativeOptimizationConfigurationId :: !(Maybe Int64)

5297 , _crCreativeOptimizationConfigurationId :: !(Maybe Int64)

5296 , _crType :: !(Maybe CreativeRotationType)

5298 , _crType :: !(Maybe CreativeRotationType)

5297− }

5299+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5298

5300

5299-- | Creates a value of 'CreativeRotation' with the minimum fields required to make a request.

5301-- | Creates a value of 'CreativeRotation' with the minimum fields required to make a request.

5300--

5302--

@@ -5553,7 +5555,7 @@ data DateRange = DateRange

5553 , _drEndDate :: !(Maybe UTCTime)

5555 , _drEndDate :: !(Maybe UTCTime)

5554 , _drStartDate :: !(Maybe UTCTime)

5556 , _drStartDate :: !(Maybe UTCTime)

5555 , _drRelativeDateRange :: !(Maybe DateRangeRelativeDateRange)

5557 , _drRelativeDateRange :: !(Maybe DateRangeRelativeDateRange)

5556− }

5558+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5557

5559

5558-- | Creates a value of 'DateRange' with the minimum fields required to make a request.

5560-- | Creates a value of 'DateRange' with the minimum fields required to make a request.

5559--

5561--

@@ -5605,7 +5607,7 @@ data DayPartTargeting = DayPartTargeting

5605 { _dptDaysOfWeek :: !(Maybe [DayPartTargetingItemDaysOfWeek])

5607 { _dptDaysOfWeek :: !(Maybe [DayPartTargetingItemDaysOfWeek])

5606 , _dptHoursOfDay :: !(Maybe [Int32])

5608 , _dptHoursOfDay :: !(Maybe [Int32])

5607 , _dptUserLocalTime :: !(Maybe Bool)

5609 , _dptUserLocalTime :: !(Maybe Bool)

5608− }

5610+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5609

5611

5610-- | Creates a value of 'DayPartTargeting' with the minimum fields required to make a request.

5612-- | Creates a value of 'DayPartTargeting' with the minimum fields required to make a request.

5611--

5613--

@@ -5704,7 +5706,7 @@ data DeliverySchedule = DeliverySchedule

5704 , _dsPriority :: !(Maybe DeliverySchedulePriority)

5706 , _dsPriority :: !(Maybe DeliverySchedulePriority)

5705 , _dsImpressionRatio :: !(Maybe Int64)

5707 , _dsImpressionRatio :: !(Maybe Int64)

5706 , _dsFrequencyCap :: !(Maybe (Maybe FrequencyCap))

5708 , _dsFrequencyCap :: !(Maybe (Maybe FrequencyCap))

5707− }

5709+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5708

5710

5709-- | Creates a value of 'DeliverySchedule' with the minimum fields required to make a request.

5711-- | Creates a value of 'DeliverySchedule' with the minimum fields required to make a request.

5710--

5712--

@@ -5904,7 +5906,7 @@ data DimensionValue = DimensionValue

5904 , _dvMatchType :: !(Maybe DimensionValueMatchType)

5906 , _dvMatchType :: !(Maybe DimensionValueMatchType)

5905 , _dvDimensionName :: !(Maybe Text)

5907 , _dvDimensionName :: !(Maybe Text)

5906 , _dvId :: !(Maybe Text)

5908 , _dvId :: !(Maybe Text)

5907− }

5909+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5908

5910

5909-- | Creates a value of 'DimensionValue' with the minimum fields required to make a request.

5911-- | Creates a value of 'DimensionValue' with the minimum fields required to make a request.

5910--

5912--

@@ -6104,7 +6106,7 @@ data DirectorySite = DirectorySite

6104 , _dsContactAssignments :: !(Maybe [Maybe DirectorySiteContactAssignment])

6106 , _dsContactAssignments :: !(Maybe [Maybe DirectorySiteContactAssignment])

6105 , _dsDescription :: !(Maybe Text)

6107 , _dsDescription :: !(Maybe Text)

6106 , _dsParentId :: !(Maybe Int64)

6108 , _dsParentId :: !(Maybe Int64)

6107− }

6109+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

6108

6110

6109-- | Creates a value of 'DirectorySite' with the minimum fields required to make a request.

6111-- | Creates a value of 'DirectorySite' with the minimum fields required to make a request.

6110--

6112--

@@ -6262,7 +6264,7 @@ data DirectorySiteContact = DirectorySiteContact

6262 , _dscId :: !(Maybe Int64)

6264 , _dscId :: !(Maybe Int64)

6263 , _dscTitle :: !(Maybe Text)

6265 , _dscTitle :: !(Maybe Text)

6264 , _dscType :: !(Maybe DirectorySiteContactType)

6266 , _dscType :: !(Maybe DirectorySiteContactType)

6265− }

6267+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

6266

6268

6267-- | Creates a value of 'DirectorySiteContact' with the minimum fields required to make a request.

6269-- | Creates a value of 'DirectorySiteContact' with the minimum fields required to make a request.

6268--

6270--

@@ -6354,7 +6356,7 @@ dscType = lens _dscType (\ s a -> s{_dscType = a})

6354data DirectorySiteContactAssignment = DirectorySiteContactAssignment

6356data DirectorySiteContactAssignment = DirectorySiteContactAssignment

6355 { _dscaVisibility :: !(Maybe DirectorySiteContactAssignmentVisibility)

6357 { _dscaVisibility :: !(Maybe DirectorySiteContactAssignmentVisibility)

6356 , _dscaContactId :: !(Maybe Int64)

6358 , _dscaContactId :: !(Maybe Int64)

6357− }

6359+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

6358

6360

6359-- | Creates a value of 'DirectorySiteContactAssignment' with the minimum fields required to make a request.

6361-- | Creates a value of 'DirectorySiteContactAssignment' with the minimum fields required to make a request.

6360--

6362--

@@ -6588,7 +6590,7 @@ data EventTag = EventTag

6588 , _etSubaccountId :: !(Maybe Int64)

6590 , _etSubaccountId :: !(Maybe Int64)

6589 , _etType :: !(Maybe EventTagType)

6591 , _etType :: !(Maybe EventTagType)

6590 , _etSiteFilterType :: !(Maybe EventTagSiteFilterType)

6592 , _etSiteFilterType :: !(Maybe EventTagSiteFilterType)

6591− }

6593+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

6592

6594

6593-- | Creates a value of 'EventTag' with the minimum fields required to make a request.

6595-- | Creates a value of 'EventTag' with the minimum fields required to make a request.

6594--

6596--

@@ -6856,7 +6858,7 @@ data File = File

6856 , _fLastModifiedTime :: !(Maybe Int64)

6858 , _fLastModifiedTime :: !(Maybe Int64)

6857 , _fId :: !(Maybe Int64)

6859 , _fId :: !(Maybe Int64)

6858 , _fFileName :: !(Maybe Text)

6860 , _fFileName :: !(Maybe Text)

6859− }

6861+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

6860

6862

6861-- | Creates a value of 'File' with the minimum fields required to make a request.

6863-- | Creates a value of 'File' with the minimum fields required to make a request.

6862--

6864--

@@ -7193,7 +7195,7 @@ data FloodlightActivity = FloodlightActivity

7193 , _faSubaccountId :: !(Maybe Int64)

7195 , _faSubaccountId :: !(Maybe Int64)

7194 , _faNotes :: !(Maybe Text)

7196 , _faNotes :: !(Maybe Text)

7195 , _faFloodlightConfigurationIdDimensionValue :: !(Maybe (Maybe DimensionValue))

7197 , _faFloodlightConfigurationIdDimensionValue :: !(Maybe (Maybe DimensionValue))

7196− }

7198+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

7197

7199

7198-- | Creates a value of 'FloodlightActivity' with the minimum fields required to make a request.

7200-- | Creates a value of 'FloodlightActivity' with the minimum fields required to make a request.

7199--

7201--

@@ -7534,7 +7536,7 @@ data FloodlightActivityGroup = FloodlightActivityGroup

7534 , _fagSubaccountId :: !(Maybe Int64)

7536 , _fagSubaccountId :: !(Maybe Int64)

7535 , _fagType :: !(Maybe FloodlightActivityGroupType)

7537 , _fagType :: !(Maybe FloodlightActivityGroupType)

7536 , _fagFloodlightConfigurationIdDimensionValue :: !(Maybe (Maybe DimensionValue))

7538 , _fagFloodlightConfigurationIdDimensionValue :: !(Maybe (Maybe DimensionValue))

7537− }

7539+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

7538

7540

7539-- | Creates a value of 'FloodlightActivityGroup' with the minimum fields required to make a request.

7541-- | Creates a value of 'FloodlightActivityGroup' with the minimum fields required to make a request.

7540--

7542--

@@ -7810,7 +7812,7 @@ data FloodlightConfiguration = FloodlightConfiguration

7810 , _fcFirstDayOfWeek :: !(Maybe FloodlightConfigurationFirstDayOfWeek)

7812 , _fcFirstDayOfWeek :: !(Maybe FloodlightConfigurationFirstDayOfWeek)

7811 , _fcOmnitureSettings :: !(Maybe (Maybe OmnitureSettings))

7813 , _fcOmnitureSettings :: !(Maybe (Maybe OmnitureSettings))

7812 , _fcStandardVariableTypes :: !(Maybe [FloodlightConfigurationItemStandardVariableTypes])

7814 , _fcStandardVariableTypes :: !(Maybe [FloodlightConfigurationItemStandardVariableTypes])

7813− }

7815+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

7814

7816

7815-- | Creates a value of 'FloodlightConfiguration' with the minimum fields required to make a request.

7817-- | Creates a value of 'FloodlightConfiguration' with the minimum fields required to make a request.

7816--

7818--

@@ -8151,7 +8153,7 @@ data FsCommand = FsCommand

8151 , _fcWindowHeight :: !(Maybe Int32)

8153 , _fcWindowHeight :: !(Maybe Int32)

8152 , _fcWindowWidth :: !(Maybe Int32)

8154 , _fcWindowWidth :: !(Maybe Int32)

8153 , _fcTop :: !(Maybe Int32)

8155 , _fcTop :: !(Maybe Int32)

8154− }

8156+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

8155

8157

8156-- | Creates a value of 'FsCommand' with the minimum fields required to make a request.

8158-- | Creates a value of 'FsCommand' with the minimum fields required to make a request.

8157--

8159--

@@ -8782,7 +8784,7 @@ data ListPopulationTerm = ListPopulationTerm

8782 , _lptRemarketingListId :: !(Maybe Int64)

8784 , _lptRemarketingListId :: !(Maybe Int64)

8783 , _lptType :: !(Maybe ListPopulationTermType)

8785 , _lptType :: !(Maybe ListPopulationTermType)

8784 , _lptContains :: !(Maybe Bool)

8786 , _lptContains :: !(Maybe Bool)

8785− }

8787+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

8786

8788

8787-- | Creates a value of 'ListPopulationTerm' with the minimum fields required to make a request.

8789-- | Creates a value of 'ListPopulationTerm' with the minimum fields required to make a request.

8788--

8790--

@@ -9189,7 +9191,7 @@ data ObjectFilter = ObjectFilter

9189 { _ofStatus :: !(Maybe ObjectFilterStatus)

9191 { _ofStatus :: !(Maybe ObjectFilterStatus)

9190 , _ofKind :: !Text

9192 , _ofKind :: !Text

9191 , _ofObjectIds :: !(Maybe [Int64])

9193 , _ofObjectIds :: !(Maybe [Int64])

9192− }

9194+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

9193

9195

9194-- | Creates a value of 'ObjectFilter' with the minimum fields required to make a request.

9196-- | Creates a value of 'ObjectFilter' with the minimum fields required to make a request.

9195--

9197--

@@ -9765,7 +9767,7 @@ data OrderContact = OrderContact

9765 , _ocContactTitle :: !(Maybe Text)

9767 , _ocContactTitle :: !(Maybe Text)

9766 , _ocContactType :: !(Maybe OrderContactContactType)

9768 , _ocContactType :: !(Maybe OrderContactContactType)

9767 , _ocContactInfo :: !(Maybe Text)

9769 , _ocContactInfo :: !(Maybe Text)

9768− }

9770+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

9769

9771

9770-- | Creates a value of 'OrderContact' with the minimum fields required to make a request.

9772-- | Creates a value of 'OrderContact' with the minimum fields required to make a request.

9771--

9773--

@@ -9845,7 +9847,7 @@ data OrderDocument = OrderDocument

9845 , _odOrderId :: !(Maybe Int64)

9847 , _odOrderId :: !(Maybe Int64)

9846 , _odCancelled :: !(Maybe Bool)

9848 , _odCancelled :: !(Maybe Bool)

9847 , _odCreatedInfo :: !(Maybe (Maybe LastModifiedInfo))

9849 , _odCreatedInfo :: !(Maybe (Maybe LastModifiedInfo))

9848− }

9850+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

9849

9851

9850-- | Creates a value of 'OrderDocument' with the minimum fields required to make a request.

9852-- | Creates a value of 'OrderDocument' with the minimum fields required to make a request.

9851--

9853--

@@ -10211,7 +10213,7 @@ data Placement = Placement

10211 , _pArchived :: !(Maybe Bool)

10213 , _pArchived :: !(Maybe Bool)

10212 , _pPaymentApproved :: !(Maybe Bool)

10214 , _pPaymentApproved :: !(Maybe Bool)

10213 , _pPublisherUpdateInfo :: !(Maybe (Maybe LastModifiedInfo))

10215 , _pPublisherUpdateInfo :: !(Maybe (Maybe LastModifiedInfo))

10214− }

10216+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

10215

10217

10216-- | Creates a value of 'Placement' with the minimum fields required to make a request.

10218-- | Creates a value of 'Placement' with the minimum fields required to make a request.

10217--

10219--

@@ -10648,7 +10650,7 @@ data PlacementGroup = PlacementGroup

10648 , _pgPrimaryPlacementIdDimensionValue :: !(Maybe (Maybe DimensionValue))

10650 , _pgPrimaryPlacementIdDimensionValue :: !(Maybe (Maybe DimensionValue))

10649 , _pgSiteId :: !(Maybe Int64)

10651 , _pgSiteId :: !(Maybe Int64)

10650 , _pgArchived :: !(Maybe Bool)

10652 , _pgArchived :: !(Maybe Bool)

10651− }

10653+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

10652

10654

10653-- | Creates a value of 'PlacementGroup' with the minimum fields required to make a request.

10655-- | Creates a value of 'PlacementGroup' with the minimum fields required to make a request.

10654--

10656--

@@ -11262,7 +11264,7 @@ data PopupWindowProperties = PopupWindowProperties

11262 , _pwpShowScrollBar :: !(Maybe Bool)

11264 , _pwpShowScrollBar :: !(Maybe Bool)

11263 , _pwpShowToolBar :: !(Maybe Bool)

11265 , _pwpShowToolBar :: !(Maybe Bool)

11264 , _pwpTitle :: !(Maybe Text)

11266 , _pwpTitle :: !(Maybe Text)

11265− }

11267+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

11266

11268

11267-- | Creates a value of 'PopupWindowProperties' with the minimum fields required to make a request.

11269-- | Creates a value of 'PopupWindowProperties' with the minimum fields required to make a request.

11268--

11270--

@@ -11458,7 +11460,7 @@ data Pricing = Pricing

11458 , _pPricingType :: !(Maybe PricingPricingType)

11460 , _pPricingType :: !(Maybe PricingPricingType)

11459 , _pFlights :: !(Maybe [Maybe Flight])

11461 , _pFlights :: !(Maybe [Maybe Flight])

11460 , _pCapCostType :: !(Maybe PricingCapCostType)

11462 , _pCapCostType :: !(Maybe PricingCapCostType)

11461− }

11463+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

11462

11464

11463-- | Creates a value of 'Pricing' with the minimum fields required to make a request.

11465-- | Creates a value of 'Pricing' with the minimum fields required to make a request.

11464--

11466--

@@ -11540,7 +11542,7 @@ data PricingSchedule = PricingSchedule

11540 , _psPricingType :: !(Maybe PricingSchedulePricingType)

11542 , _psPricingType :: !(Maybe PricingSchedulePricingType)

11541 , _psPricingPeriods :: !(Maybe [Maybe PricingSchedulePricingPeriod])

11543 , _psPricingPeriods :: !(Maybe [Maybe PricingSchedulePricingPeriod])

11542 , _psFlighted :: !(Maybe Bool)

11544 , _psFlighted :: !(Maybe Bool)

11543− }

11545+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

11544

11546

11545-- | Creates a value of 'PricingSchedule' with the minimum fields required to make a request.

11547-- | Creates a value of 'PricingSchedule' with the minimum fields required to make a request.

11546--

11548--

@@ -11738,7 +11740,7 @@ data Project = Project

11738 , _ppAudienceGender :: !(Maybe ProjectAudienceGender)

11740 , _ppAudienceGender :: !(Maybe ProjectAudienceGender)

11739 , _ppClientName :: !(Maybe Text)

11741 , _ppClientName :: !(Maybe Text)

11740 , _ppTargetCpaNanos :: !(Maybe Int64)

11742 , _ppTargetCpaNanos :: !(Maybe Int64)

11741− }

11743+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

11742

11744

11743-- | Creates a value of 'Project' with the minimum fields required to make a request.

11745-- | Creates a value of 'Project' with the minimum fields required to make a request.

11744--

11746--

@@ -12070,7 +12072,7 @@ data Recipient = Recipient

12070 { _recEmail :: !(Maybe Text)

12072 { _recEmail :: !(Maybe Text)

12071 , _recKind :: !Text

12073 , _recKind :: !Text

12072 , _recDeliveryType :: !(Maybe RecipientDeliveryType)

12074 , _recDeliveryType :: !(Maybe RecipientDeliveryType)

12073− }

12075+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

12074

12076

12075-- | Creates a value of 'Recipient' with the minimum fields required to make a request.

12077-- | Creates a value of 'Recipient' with the minimum fields required to make a request.

12076--

12078--

@@ -12230,7 +12232,7 @@ data RemarketingList = RemarketingList

12230 , _remId :: !(Maybe Int64)

12232 , _remId :: !(Maybe Int64)

12231 , _remSubaccountId :: !(Maybe Int64)

12233 , _remSubaccountId :: !(Maybe Int64)

12232 , _remDescription :: !(Maybe Text)

12234 , _remDescription :: !(Maybe Text)

12233− }

12235+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

12234

12236

12235-- | Creates a value of 'RemarketingList' with the minimum fields required to make a request.

12237-- | Creates a value of 'RemarketingList' with the minimum fields required to make a request.

12236--

12238--

@@ -12484,7 +12486,7 @@ data Report = Report

12484 , _repFloodlightCriteria :: !(Maybe ReportFloodlightCriteria)

12486 , _repFloodlightCriteria :: !(Maybe ReportFloodlightCriteria)

12485 , _repCriteria :: !(Maybe ReportCriteria)

12487 , _repCriteria :: !(Maybe ReportCriteria)

12486 , _repFileName :: !(Maybe Text)

12488 , _repFileName :: !(Maybe Text)

12487− }

12489+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

12488

12490

12489-- | Creates a value of 'Report' with the minimum fields required to make a request.

12491-- | Creates a value of 'Report' with the minimum fields required to make a request.

12490--

12492--

@@ -12813,7 +12815,7 @@ data ReportCrossDimensionReachCriteria = ReportCrossDimensionReachCriteria

12813 , _rcdrcDimensionFilters :: !(Maybe [Maybe DimensionValue])

12815 , _rcdrcDimensionFilters :: !(Maybe [Maybe DimensionValue])

12814 , _rcdrcDateRange :: !(Maybe (Maybe DateRange))

12816 , _rcdrcDateRange :: !(Maybe (Maybe DateRange))

12815 , _rcdrcOverlapMetricNames :: !(Maybe [Text])

12817 , _rcdrcOverlapMetricNames :: !(Maybe [Text])

12816− }

12818+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

12817

12819

12818-- | Creates a value of 'ReportCrossDimensionReachCriteria' with the minimum fields required to make a request.

12820-- | Creates a value of 'ReportCrossDimensionReachCriteria' with the minimum fields required to make a request.

12819--

12821--

@@ -12902,7 +12904,7 @@ data ReportDelivery = ReportDelivery

12902 , _rdRecipients :: !(Maybe [Maybe Recipient])

12904 , _rdRecipients :: !(Maybe [Maybe Recipient])

12903 , _rdMessage :: !(Maybe Text)

12905 , _rdMessage :: !(Maybe Text)

12904 , _rdEmailOwnerDeliveryType :: !(Maybe ReportEmailOwnerDeliveryTypeDelivery)

12906 , _rdEmailOwnerDeliveryType :: !(Maybe ReportEmailOwnerDeliveryTypeDelivery)

12905− }

12907+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

12906

12908

12907-- | Creates a value of 'ReportDelivery' with the minimum fields required to make a request.

12909-- | Creates a value of 'ReportDelivery' with the minimum fields required to make a request.

12908--

12910--

@@ -13515,7 +13517,7 @@ data ReportSchedule = ReportSchedule

13515 , _rsExpirationDate :: !(Maybe UTCTime)

13517 , _rsExpirationDate :: !(Maybe UTCTime)

13516 , _rsRunsOnDayOfMonth :: !(Maybe ReportRunsOnDayOfMonthSchedule)

13518 , _rsRunsOnDayOfMonth :: !(Maybe ReportRunsOnDayOfMonthSchedule)

13517 , _rsRepeatsOnWeekDays :: !(Maybe [ReportItemRepeatsOnWeekDaysSchedule])

13519 , _rsRepeatsOnWeekDays :: !(Maybe [ReportItemRepeatsOnWeekDaysSchedule])

13518− }

13520+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

13519

13521

13520-- | Creates a value of 'ReportSchedule' with the minimum fields required to make a request.

13522-- | Creates a value of 'ReportSchedule' with the minimum fields required to make a request.

13521--

13523--

@@ -13845,7 +13847,7 @@ data SiteContact = SiteContact

13845 , _scId :: !(Maybe Int64)

13847 , _scId :: !(Maybe Int64)

13846 , _scTitle :: !(Maybe Text)

13848 , _scTitle :: !(Maybe Text)

13847 , _scContactType :: !(Maybe SiteContactContactType)

13849 , _scContactType :: !(Maybe SiteContactContactType)

13848− }

13850+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

13849

13851

13850-- | Creates a value of 'SiteContact' with the minimum fields required to make a request.

13852-- | Creates a value of 'SiteContact' with the minimum fields required to make a request.

13851--

13853--

@@ -14135,7 +14137,7 @@ data SortedDimension = SortedDimension

14135 { _sdKind :: !Text

14137 { _sdKind :: !Text

14136 , _sdSortOrder :: !(Maybe SortedDimensionSortOrder)

14138 , _sdSortOrder :: !(Maybe SortedDimensionSortOrder)

14137 , _sdName :: !(Maybe Text)

14139 , _sdName :: !(Maybe Text)

14138− }

14140+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

14139

14141

14140-- | Creates a value of 'SortedDimension' with the minimum fields required to make a request.

14142-- | Creates a value of 'SortedDimension' with the minimum fields required to make a request.

14141--

14143--

@@ -14287,7 +14289,7 @@ data TagData = TagData

14287 , _tdCreativeId :: !(Maybe Int64)

14289 , _tdCreativeId :: !(Maybe Int64)

14288 , _tdAdId :: !(Maybe Int64)

14290 , _tdAdId :: !(Maybe Int64)

14289 , _tdImpressionTag :: !(Maybe Text)

14291 , _tdImpressionTag :: !(Maybe Text)

14290− }

14292+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

14291

14293

14292-- | Creates a value of 'TagData' with the minimum fields required to make a request.

14294-- | Creates a value of 'TagData' with the minimum fields required to make a request.

14293--

14295--

@@ -14345,7 +14347,7 @@ data TagSetting = TagSetting

14345 , _tsIncludeClickThroughUrls :: !(Maybe Bool)

14347 , _tsIncludeClickThroughUrls :: !(Maybe Bool)

14346 , _tsIncludeClickTracking :: !(Maybe Bool)

14348 , _tsIncludeClickTracking :: !(Maybe Bool)

14347 , _tsAdditionalKeyValues :: !(Maybe Text)

14349 , _tsAdditionalKeyValues :: !(Maybe Text)

14348− }

14350+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

14349

14351

14350-- | Creates a value of 'TagSetting' with the minimum fields required to make a request.

14352-- | Creates a value of 'TagSetting' with the minimum fields required to make a request.

14351--

14353--

@@ -14440,7 +14442,7 @@ tsImageTagEnabled

14440data TargetWindow = TargetWindow

14442data TargetWindow = TargetWindow

14441 { _twCustomHtml :: !(Maybe Text)

14443 { _twCustomHtml :: !(Maybe Text)

14442 , _twTargetWindowOption :: !(Maybe TargetWindowTargetWindowOption)

14444 , _twTargetWindowOption :: !(Maybe TargetWindowTargetWindowOption)

14443− }

14445+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

14444

14446

14445-- | Creates a value of 'TargetWindow' with the minimum fields required to make a request.

14447-- | Creates a value of 'TargetWindow' with the minimum fields required to make a request.

14446--

14448--

@@ -14492,7 +14494,7 @@ data TargetableRemarketingList = TargetableRemarketingList

14492 , _trlId :: !(Maybe Int64)

14494 , _trlId :: !(Maybe Int64)

14493 , _trlSubaccountId :: !(Maybe Int64)

14495 , _trlSubaccountId :: !(Maybe Int64)

14494 , _trlDescription :: !(Maybe Text)

14496 , _trlDescription :: !(Maybe Text)

14495− }

14497+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

14496

14498

14497-- | Creates a value of 'TargetableRemarketingList' with the minimum fields required to make a request.

14499-- | Creates a value of 'TargetableRemarketingList' with the minimum fields required to make a request.

14498--

14500--

@@ -14798,7 +14800,7 @@ tpatName = lens _tpatName (\ s a -> s{_tpatName = a})

14798data ThirdPartyTrackingUrl = ThirdPartyTrackingUrl

14800data ThirdPartyTrackingUrl = ThirdPartyTrackingUrl

14799 { _tptuUrl :: !(Maybe Text)

14801 { _tptuUrl :: !(Maybe Text)

14800 , _tptuThirdPartyUrlType :: !(Maybe ThirdPartyTrackingUrlThirdPartyUrlType)

14802 , _tptuThirdPartyUrlType :: !(Maybe ThirdPartyTrackingUrlThirdPartyUrlType)

14801− }

14803+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

14802

14804

14803-- | Creates a value of 'ThirdPartyTrackingUrl' with the minimum fields required to make a request.

14805-- | Creates a value of 'ThirdPartyTrackingUrl' with the minimum fields required to make a request.

14804--

14806--

@@ -14832,7 +14834,7 @@ data UserDefinedVariableConfiguration = UserDefinedVariableConfiguration

14832 { _udvcReportName :: !(Maybe Text)

14834 { _udvcReportName :: !(Maybe Text)

14833 , _udvcDataType :: !(Maybe UserDefinedVariableConfigurationDataType)

14835 , _udvcDataType :: !(Maybe UserDefinedVariableConfigurationDataType)

14834 , _udvcVariableType :: !(Maybe UserDefinedVariableConfigurationVariableType)

14836 , _udvcVariableType :: !(Maybe UserDefinedVariableConfigurationVariableType)

14835− }

14837+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

14836

14838

14837-- | Creates a value of 'UserDefinedVariableConfiguration' with the minimum fields required to make a request.

14839-- | Creates a value of 'UserDefinedVariableConfiguration' with the minimum fields required to make a request.

14838--

14840--

@@ -15111,7 +15113,7 @@ data UserRolePermission = UserRolePermission

15111 , _urpName :: !(Maybe Text)

15113 , _urpName :: !(Maybe Text)

15112 , _urpId :: !(Maybe Int64)

15114 , _urpId :: !(Maybe Int64)

15113 , _urpPermissionGroupId :: !(Maybe Int64)

15115 , _urpPermissionGroupId :: !(Maybe Int64)

15114− }

15116+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

15115

15117

15116-- | Creates a value of 'UserRolePermission' with the minimum fields required to make a request.

15118-- | Creates a value of 'UserRolePermission' with the minimum fields required to make a request.

15117--

15119--

gogol-dfareporting/gen/Network/Google/DFAReporting/Types/Sum.hs+2027

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.DFAReporting.Types.Sum

9-- Module : Network.Google.DFAReporting.Types.Sum

@@ -25,6 +28,17 @@ data AccountAccountProfile

25

28

26instance Hashable AccountAccountProfile

29instance Hashable AccountAccountProfile

27

30

31+instance FromText AccountAccountProfile where

32+ fromText = \case

33+ "ACCOUNT_PROFILE_BASIC" -> Just AAPAccountProfileBasic

34+ "ACCOUNT_PROFILE_STANDARD" -> Just AAPAccountProfileStandard

35+ _ -> Nothing

36+

37+instance ToText AccountAccountProfile where

38+ toText = \case

39+ AAPAccountProfileBasic -> "ACCOUNT_PROFILE_BASIC"

40+ AAPAccountProfileStandard -> "ACCOUNT_PROFILE_STANDARD"

41+

28-- | Maximum number of active ads allowed for the account.

42-- | Maximum number of active ads allowed for the account.

29data AccountActiveAdSummaryActiveAdsLimitTier

43data AccountActiveAdSummaryActiveAdsLimitTier

30 = AAASAALTActiveAdsTier100K

44 = AAASAALTActiveAdsTier100K

@@ -41,6 +55,23 @@ data AccountActiveAdSummaryActiveAdsLimitTier

41

55

42instance Hashable AccountActiveAdSummaryActiveAdsLimitTier

56instance Hashable AccountActiveAdSummaryActiveAdsLimitTier

43

57

58+instance FromText AccountActiveAdSummaryActiveAdsLimitTier where

59+ fromText = \case

60+ "ACTIVE_ADS_TIER_100K" -> Just AAASAALTActiveAdsTier100K

61+ "ACTIVE_ADS_TIER_200K" -> Just AAASAALTActiveAdsTier200K

62+ "ACTIVE_ADS_TIER_300K" -> Just AAASAALTActiveAdsTier300K

63+ "ACTIVE_ADS_TIER_40K" -> Just AAASAALTActiveAdsTier40K

64+ "ACTIVE_ADS_TIER_75K" -> Just AAASAALTActiveAdsTier75K

65+ _ -> Nothing

66+

67+instance ToText AccountActiveAdSummaryActiveAdsLimitTier where

68+ toText = \case

69+ AAASAALTActiveAdsTier100K -> "ACTIVE_ADS_TIER_100K"

70+ AAASAALTActiveAdsTier200K -> "ACTIVE_ADS_TIER_200K"

71+ AAASAALTActiveAdsTier300K -> "ACTIVE_ADS_TIER_300K"

72+ AAASAALTActiveAdsTier40K -> "ACTIVE_ADS_TIER_40K"

73+ AAASAALTActiveAdsTier75K -> "ACTIVE_ADS_TIER_75K"

74+

44-- | Maximum number of active ads allowed for this account.

75-- | Maximum number of active ads allowed for this account.

45data AccountActiveAdsLimitTier

76data AccountActiveAdsLimitTier

46 = AAALTActiveAdsTier100K

77 = AAALTActiveAdsTier100K

@@ -57,6 +88,23 @@ data AccountActiveAdsLimitTier

57

88

58instance Hashable AccountActiveAdsLimitTier

89instance Hashable AccountActiveAdsLimitTier

59

90

91+instance FromText AccountActiveAdsLimitTier where

92+ fromText = \case

93+ "ACTIVE_ADS_TIER_100K" -> Just AAALTActiveAdsTier100K

94+ "ACTIVE_ADS_TIER_200K" -> Just AAALTActiveAdsTier200K

95+ "ACTIVE_ADS_TIER_300K" -> Just AAALTActiveAdsTier300K

96+ "ACTIVE_ADS_TIER_40K" -> Just AAALTActiveAdsTier40K

97+ "ACTIVE_ADS_TIER_75K" -> Just AAALTActiveAdsTier75K

98+ _ -> Nothing

99+

100+instance ToText AccountActiveAdsLimitTier where

101+ toText = \case

102+ AAALTActiveAdsTier100K -> "ACTIVE_ADS_TIER_100K"

103+ AAALTActiveAdsTier200K -> "ACTIVE_ADS_TIER_200K"

104+ AAALTActiveAdsTier300K -> "ACTIVE_ADS_TIER_300K"

105+ AAALTActiveAdsTier40K -> "ACTIVE_ADS_TIER_40K"

106+ AAALTActiveAdsTier75K -> "ACTIVE_ADS_TIER_75K"

107+

60data AccountPermissionItemAccountProfiles

108data AccountPermissionItemAccountProfiles

61 = APIAPAccountProfileBasic

109 = APIAPAccountProfileBasic

62 -- ^ @ACCOUNT_PROFILE_BASIC@

110 -- ^ @ACCOUNT_PROFILE_BASIC@

@@ -66,6 +114,17 @@ data AccountPermissionItemAccountProfiles

66

114

67instance Hashable AccountPermissionItemAccountProfiles

115instance Hashable AccountPermissionItemAccountProfiles

68

116

117+instance FromText AccountPermissionItemAccountProfiles where

118+ fromText = \case

119+ "ACCOUNT_PROFILE_BASIC" -> Just APIAPAccountProfileBasic

120+ "ACCOUNT_PROFILE_STANDARD" -> Just APIAPAccountProfileStandard

121+ _ -> Nothing

122+

123+instance ToText AccountPermissionItemAccountProfiles where

124+ toText = \case

125+ APIAPAccountProfileBasic -> "ACCOUNT_PROFILE_BASIC"

126+ APIAPAccountProfileStandard -> "ACCOUNT_PROFILE_STANDARD"

127+

69-- | Administrative level required to enable this account permission.

128-- | Administrative level required to enable this account permission.

70data AccountPermissionLevel

129data AccountPermissionLevel

71 = APLAdministrator

130 = APLAdministrator

@@ -76,6 +135,17 @@ data AccountPermissionLevel

76

135

77instance Hashable AccountPermissionLevel

136instance Hashable AccountPermissionLevel

78

137

138+instance FromText AccountPermissionLevel where

139+ fromText = \case

140+ "ADMINISTRATOR" -> Just APLAdministrator

141+ "USER" -> Just APLUser

142+ _ -> Nothing

143+

144+instance ToText AccountPermissionLevel where

145+ toText = \case

146+ APLAdministrator -> "ADMINISTRATOR"

147+ APLUser -> "USER"

148+

79-- | Trafficker type of this user profile.

149-- | Trafficker type of this user profile.

80data AccountUserProfileTraffickerType

150data AccountUserProfileTraffickerType

81 = AUPTTExternalTrafficker

151 = AUPTTExternalTrafficker

@@ -88,6 +158,19 @@ data AccountUserProfileTraffickerType

88

158

89instance Hashable AccountUserProfileTraffickerType

159instance Hashable AccountUserProfileTraffickerType

90

160

161+instance FromText AccountUserProfileTraffickerType where

162+ fromText = \case

163+ "EXTERNAL_TRAFFICKER" -> Just AUPTTExternalTrafficker

164+ "INTERNAL_NON_TRAFFICKER" -> Just AUPTTInternalNonTrafficker

165+ "INTERNAL_TRAFFICKER" -> Just AUPTTInternalTrafficker

166+ _ -> Nothing

167+

168+instance ToText AccountUserProfileTraffickerType where

169+ toText = \case

170+ AUPTTExternalTrafficker -> "EXTERNAL_TRAFFICKER"

171+ AUPTTInternalNonTrafficker -> "INTERNAL_NON_TRAFFICKER"

172+ AUPTTInternalTrafficker -> "INTERNAL_TRAFFICKER"

173+

91-- | User type of the user profile. This is a read-only field that can be

174-- | User type of the user profile. This is a read-only field that can be

92-- left blank.

175-- left blank.

93data AccountUserProfileUserAccessType

176data AccountUserProfileUserAccessType

@@ -101,6 +184,19 @@ data AccountUserProfileUserAccessType

101

184

102instance Hashable AccountUserProfileUserAccessType

185instance Hashable AccountUserProfileUserAccessType

103

186

187+instance FromText AccountUserProfileUserAccessType where

188+ fromText = \case

189+ "INTERNAL_ADMINISTRATOR" -> Just AUPUATInternalAdministrator

190+ "NORMAL_USER" -> Just AUPUATNormalUser

191+ "SUPER_USER" -> Just AUPUATSuperUser

192+ _ -> Nothing

193+

194+instance ToText AccountUserProfileUserAccessType where

195+ toText = \case

196+ AUPUATInternalAdministrator -> "INTERNAL_ADMINISTRATOR"

197+ AUPUATNormalUser -> "NORMAL_USER"

198+ AUPUATSuperUser -> "SUPER_USER"

199+

104-- | Compatibility of this ad. Applicable when type is AD_SERVING_DEFAULT_AD.

200-- | Compatibility of this ad. Applicable when type is AD_SERVING_DEFAULT_AD.

105-- WEB and WEB_INTERSTITIAL refer to rendering either on desktop or on

201-- WEB and WEB_INTERSTITIAL refer to rendering either on desktop or on

106-- mobile devices for regular or interstitial ads, respectively. APP and

202-- mobile devices for regular or interstitial ads, respectively. APP and

@@ -122,6 +218,23 @@ data AdCompatibility

122

218

123instance Hashable AdCompatibility

219instance Hashable AdCompatibility

124

220

221+instance FromText AdCompatibility where

222+ fromText = \case

223+ "APP" -> Just ACApp

224+ "APP_INTERSTITIAL" -> Just ACAppInterstitial

225+ "IN_STREAM_VIDEO" -> Just ACInStreamVideo

226+ "WEB" -> Just ACWeb

227+ "WEB_INTERSTITIAL" -> Just ACWebInterstitial

228+ _ -> Nothing

229+

230+instance ToText AdCompatibility where

231+ toText = \case

232+ ACApp -> "APP"

233+ ACAppInterstitial -> "APP_INTERSTITIAL"

234+ ACInStreamVideo -> "IN_STREAM_VIDEO"

235+ ACWeb -> "WEB"

236+ ACWebInterstitial -> "WEB_INTERSTITIAL"

237+

125-- | Ad slot compatibility. WEB and WEB_INTERSTITIAL refer to rendering

238-- | Ad slot compatibility. WEB and WEB_INTERSTITIAL refer to rendering

126-- either on desktop or on mobile devices for regular or interstitial ads

239-- either on desktop or on mobile devices for regular or interstitial ads

127-- respectively. APP and APP_INTERSTITIAL are for rendering in mobile apps.

240-- respectively. APP and APP_INTERSTITIAL are for rendering in mobile apps.

@@ -142,6 +255,23 @@ data AdSlotCompatibility

142

255

143instance Hashable AdSlotCompatibility

256instance Hashable AdSlotCompatibility

144

257

258+instance FromText AdSlotCompatibility where

259+ fromText = \case

260+ "PLANNING_RENDERING_ENVIRONMENT_TYPE_APP" -> Just ASCPlanningRenderingEnvironmentTypeApp

261+ "PLANNING_RENDERING_ENVIRONMENT_TYPE_APP_INTERSTITIAL" -> Just ASCPlanningRenderingEnvironmentTypeAppInterstitial

262+ "PLANNING_RENDERING_ENVIRONMENT_TYPE_IN_STREAM_VIDEO" -> Just ASCPlanningRenderingEnvironmentTypeInStreamVideo

263+ "PLANNING_RENDERING_ENVIRONMENT_TYPE_WEB" -> Just ASCPlanningRenderingEnvironmentTypeWeb

264+ "PLANNING_RENDERING_ENVIRONMENT_TYPE_WEB_INTERSTITIAL" -> Just ASCPlanningRenderingEnvironmentTypeWebInterstitial

265+ _ -> Nothing

266+

267+instance ToText AdSlotCompatibility where

268+ toText = \case

269+ ASCPlanningRenderingEnvironmentTypeApp -> "PLANNING_RENDERING_ENVIRONMENT_TYPE_APP"

270+ ASCPlanningRenderingEnvironmentTypeAppInterstitial -> "PLANNING_RENDERING_ENVIRONMENT_TYPE_APP_INTERSTITIAL"

271+ ASCPlanningRenderingEnvironmentTypeInStreamVideo -> "PLANNING_RENDERING_ENVIRONMENT_TYPE_IN_STREAM_VIDEO"

272+ ASCPlanningRenderingEnvironmentTypeWeb -> "PLANNING_RENDERING_ENVIRONMENT_TYPE_WEB"

273+ ASCPlanningRenderingEnvironmentTypeWebInterstitial -> "PLANNING_RENDERING_ENVIRONMENT_TYPE_WEB_INTERSTITIAL"

274+

145-- | Payment source type of this ad slot.

275-- | Payment source type of this ad slot.

146data AdSlotPaymentSourceType

276data AdSlotPaymentSourceType

147 = ASPSTPlanningPaymentSourceTypeAgencyPaid

277 = ASPSTPlanningPaymentSourceTypeAgencyPaid

@@ -152,6 +282,17 @@ data AdSlotPaymentSourceType

152

282

153instance Hashable AdSlotPaymentSourceType

283instance Hashable AdSlotPaymentSourceType

154

284

285+instance FromText AdSlotPaymentSourceType where

286+ fromText = \case

287+ "PLANNING_PAYMENT_SOURCE_TYPE_AGENCY_PAID" -> Just ASPSTPlanningPaymentSourceTypeAgencyPaid

288+ "PLANNING_PAYMENT_SOURCE_TYPE_PUBLISHER_PAID" -> Just ASPSTPlanningPaymentSourceTypePublisherPaid

289+ _ -> Nothing

290+

291+instance ToText AdSlotPaymentSourceType where

292+ toText = \case

293+ ASPSTPlanningPaymentSourceTypeAgencyPaid -> "PLANNING_PAYMENT_SOURCE_TYPE_AGENCY_PAID"

294+ ASPSTPlanningPaymentSourceTypePublisherPaid -> "PLANNING_PAYMENT_SOURCE_TYPE_PUBLISHER_PAID"

295+

155-- | Type of ad. This is a required field on insertion. Note that default ads

296-- | Type of ad. This is a required field on insertion. Note that default ads

156-- (AD_SERVING_DEFAULT_AD) cannot be created directly (see Creative

297-- (AD_SERVING_DEFAULT_AD) cannot be created directly (see Creative

157-- resource).

298-- resource).

@@ -168,6 +309,21 @@ data AdType

168

309

169instance Hashable AdType

310instance Hashable AdType

170

311

312+instance FromText AdType where

313+ fromText = \case

314+ "AD_SERVING_CLICK_TRACKER" -> Just ATAdServingClickTracker

315+ "AD_SERVING_DEFAULT_AD" -> Just ATAdServingDefaultAd

316+ "AD_SERVING_STANDARD_AD" -> Just ATAdServingStandardAd

317+ "AD_SERVING_TRACKING" -> Just ATAdServingTracking

318+ _ -> Nothing

319+

320+instance ToText AdType where

321+ toText = \case

322+ ATAdServingClickTracker -> "AD_SERVING_CLICK_TRACKER"

323+ ATAdServingDefaultAd -> "AD_SERVING_DEFAULT_AD"

324+ ATAdServingStandardAd -> "AD_SERVING_STANDARD_AD"

325+ ATAdServingTracking -> "AD_SERVING_TRACKING"

326+

171-- | Status of this advertiser.

327-- | Status of this advertiser.

172data AdvertiserStatus

328data AdvertiserStatus

173 = ASApproved

329 = ASApproved

@@ -178,6 +334,17 @@ data AdvertiserStatus

178

334

179instance Hashable AdvertiserStatus

335instance Hashable AdvertiserStatus

180

336

337+instance FromText AdvertiserStatus where

338+ fromText = \case

339+ "APPROVED" -> Just ASApproved

340+ "ON_HOLD" -> Just ASOnHold

341+ _ -> Nothing

342+

343+instance ToText AdvertiserStatus where

344+ toText = \case

345+ ASApproved -> "APPROVED"

346+ ASOnHold -> "ON_HOLD"

347+

181-- | Type of artwork used for the creative. This is a read-only field.

348-- | Type of artwork used for the creative. This is a read-only field.

182-- Applicable to the following creative types: all RICH_MEDIA, and all

349-- Applicable to the following creative types: all RICH_MEDIA, and all

183-- VPAID.

350-- VPAID.

@@ -192,6 +359,19 @@ data CreativeArtworkType

192

359

193instance Hashable CreativeArtworkType

360instance Hashable CreativeArtworkType

194

361

362+instance FromText CreativeArtworkType where

363+ fromText = \case

364+ "ARTWORK_TYPE_FLASH" -> Just CATArtworkTypeFlash

365+ "ARTWORK_TYPE_HTML5" -> Just CATArtworkTypeHTML5

366+ "ARTWORK_TYPE_MIXED" -> Just CATArtworkTypeMixed

367+ _ -> Nothing

368+

369+instance ToText CreativeArtworkType where

370+ toText = \case

371+ CATArtworkTypeFlash -> "ARTWORK_TYPE_FLASH"

372+ CATArtworkTypeHTML5 -> "ARTWORK_TYPE_HTML5"

373+ CATArtworkTypeMixed -> "ARTWORK_TYPE_MIXED"

374+

195-- | Possible alignments for an asset. This is a read-only field. Applicable

375-- | Possible alignments for an asset. This is a read-only field. Applicable

196-- to the following creative types: RICH_MEDIA_MULTI_FLOATING.

376-- to the following creative types: RICH_MEDIA_MULTI_FLOATING.

197data CreativeAssetAlignment

377data CreativeAssetAlignment

@@ -207,6 +387,21 @@ data CreativeAssetAlignment

207

387

208instance Hashable CreativeAssetAlignment

388instance Hashable CreativeAssetAlignment

209

389

390+instance FromText CreativeAssetAlignment where

391+ fromText = \case

392+ "ALIGNMENT_BOTTOM" -> Just CAAAlignmentBottom

393+ "ALIGNMENT_LEFT" -> Just CAAAlignmentLeft

394+ "ALIGNMENT_RIGHT" -> Just CAAAlignmentRight

395+ "ALIGNMENT_TOP" -> Just CAAAlignmentTop

396+ _ -> Nothing

397+

398+instance ToText CreativeAssetAlignment where

399+ toText = \case

400+ CAAAlignmentBottom -> "ALIGNMENT_BOTTOM"

401+ CAAAlignmentLeft -> "ALIGNMENT_LEFT"

402+ CAAAlignmentRight -> "ALIGNMENT_RIGHT"

403+ CAAAlignmentTop -> "ALIGNMENT_TOP"

404+

210-- | Artwork type of rich media creative. This is a read-only field.

405-- | Artwork type of rich media creative. This is a read-only field.

211-- Applicable to the following creative types: all RICH_MEDIA.

406-- Applicable to the following creative types: all RICH_MEDIA.

212data CreativeAssetArtworkType

407data CreativeAssetArtworkType

@@ -220,6 +415,19 @@ data CreativeAssetArtworkType

220

415

221instance Hashable CreativeAssetArtworkType

416instance Hashable CreativeAssetArtworkType

222

417

418+instance FromText CreativeAssetArtworkType where

419+ fromText = \case

420+ "ARTWORK_TYPE_FLASH" -> Just CAATArtworkTypeFlash

421+ "ARTWORK_TYPE_HTML5" -> Just CAATArtworkTypeHTML5

422+ "ARTWORK_TYPE_MIXED" -> Just CAATArtworkTypeMixed

423+ _ -> Nothing

424+

425+instance ToText CreativeAssetArtworkType where

426+ toText = \case

427+ CAATArtworkTypeFlash -> "ARTWORK_TYPE_FLASH"

428+ CAATArtworkTypeHTML5 -> "ARTWORK_TYPE_HTML5"

429+ CAATArtworkTypeMixed -> "ARTWORK_TYPE_MIXED"

430+

223-- | Rich media child asset type. This is a read-only field. Applicable to

431-- | Rich media child asset type. This is a read-only field. Applicable to

224-- the following creative types: all VPAID.

432-- the following creative types: all VPAID.

225data CreativeAssetChildAssetType

433data CreativeAssetChildAssetType

@@ -235,6 +443,21 @@ data CreativeAssetChildAssetType

235

443

236instance Hashable CreativeAssetChildAssetType

444instance Hashable CreativeAssetChildAssetType

237

445

446+instance FromText CreativeAssetChildAssetType where

447+ fromText = \case

448+ "CHILD_ASSET_TYPE_DATA" -> Just CACATChildAssetTypeData

449+ "CHILD_ASSET_TYPE_FLASH" -> Just CACATChildAssetTypeFlash

450+ "CHILD_ASSET_TYPE_IMAGE" -> Just CACATChildAssetTypeImage

451+ "CHILD_ASSET_TYPE_VIDEO" -> Just CACATChildAssetTypeVideo

452+ _ -> Nothing

453+

454+instance ToText CreativeAssetChildAssetType where

455+ toText = \case

456+ CACATChildAssetTypeData -> "CHILD_ASSET_TYPE_DATA"

457+ CACATChildAssetTypeFlash -> "CHILD_ASSET_TYPE_FLASH"

458+ CACATChildAssetTypeImage -> "CHILD_ASSET_TYPE_IMAGE"

459+ CACATChildAssetTypeVideo -> "CHILD_ASSET_TYPE_VIDEO"

460+

238-- | Type of rich media asset. This is a read-only field. Applicable to the

461-- | Type of rich media asset. This is a read-only field. Applicable to the

239-- following creative types: all RICH_MEDIA.

462-- following creative types: all RICH_MEDIA.

240data CreativeAssetDisplayType

463data CreativeAssetDisplayType

@@ -260,6 +483,31 @@ data CreativeAssetDisplayType

260

483

261instance Hashable CreativeAssetDisplayType

484instance Hashable CreativeAssetDisplayType

262

485

486+instance FromText CreativeAssetDisplayType where

487+ fromText = \case

488+ "ASSET_DISPLAY_TYPE_EXPANDING" -> Just CADTAssetDisplayTypeExpanding

489+ "ASSET_DISPLAY_TYPE_FLASH_IN_FLASH" -> Just CADTAssetDisplayTypeFlashInFlash

490+ "ASSET_DISPLAY_TYPE_FLASH_IN_FLASH_EXPANDING" -> Just CADTAssetDisplayTypeFlashInFlashExpanding

491+ "ASSET_DISPLAY_TYPE_FLOATING" -> Just CADTAssetDisplayTypeFloating

492+ "ASSET_DISPLAY_TYPE_INPAGE" -> Just CADTAssetDisplayTypeInpage

493+ "ASSET_DISPLAY_TYPE_OVERLAY" -> Just CADTAssetDisplayTypeOverlay

494+ "ASSET_DISPLAY_TYPE_PEEL_DOWN" -> Just CADTAssetDisplayTypePeelDown

495+ "ASSET_DISPLAY_TYPE_VPAID_LINEAR" -> Just CADTAssetDisplayTypeVpaidLinear

496+ "ASSET_DISPLAY_TYPE_VPAID_NON_LINEAR" -> Just CADTAssetDisplayTypeVpaidNonLinear

497+ _ -> Nothing

498+

499+instance ToText CreativeAssetDisplayType where

500+ toText = \case

501+ CADTAssetDisplayTypeExpanding -> "ASSET_DISPLAY_TYPE_EXPANDING"

502+ CADTAssetDisplayTypeFlashInFlash -> "ASSET_DISPLAY_TYPE_FLASH_IN_FLASH"

503+ CADTAssetDisplayTypeFlashInFlashExpanding -> "ASSET_DISPLAY_TYPE_FLASH_IN_FLASH_EXPANDING"

504+ CADTAssetDisplayTypeFloating -> "ASSET_DISPLAY_TYPE_FLOATING"

505+ CADTAssetDisplayTypeInpage -> "ASSET_DISPLAY_TYPE_INPAGE"

506+ CADTAssetDisplayTypeOverlay -> "ASSET_DISPLAY_TYPE_OVERLAY"

507+ CADTAssetDisplayTypePeelDown -> "ASSET_DISPLAY_TYPE_PEEL_DOWN"

508+ CADTAssetDisplayTypeVpaidLinear -> "ASSET_DISPLAY_TYPE_VPAID_LINEAR"

509+ CADTAssetDisplayTypeVpaidNonLinear -> "ASSET_DISPLAY_TYPE_VPAID_NON_LINEAR"

510+

263-- | Duration type for which an asset will be displayed. Applicable to the

511-- | Duration type for which an asset will be displayed. Applicable to the

264-- following creative types: all RICH_MEDIA.

512-- following creative types: all RICH_MEDIA.

265data CreativeAssetDurationType

513data CreativeAssetDurationType

@@ -273,6 +521,19 @@ data CreativeAssetDurationType

273

521

274instance Hashable CreativeAssetDurationType

522instance Hashable CreativeAssetDurationType

275

523

524+instance FromText CreativeAssetDurationType where

525+ fromText = \case

526+ "ASSET_DURATION_TYPE_AUTO" -> Just CADTAssetDurationTypeAuto

527+ "ASSET_DURATION_TYPE_CUSTOM" -> Just CADTAssetDurationTypeCustom

528+ "ASSET_DURATION_TYPE_NONE" -> Just CADTAssetDurationTypeNone

529+ _ -> Nothing

530+

531+instance ToText CreativeAssetDurationType where

532+ toText = \case

533+ CADTAssetDurationTypeAuto -> "ASSET_DURATION_TYPE_AUTO"

534+ CADTAssetDurationTypeCustom -> "ASSET_DURATION_TYPE_CUSTOM"

535+ CADTAssetDurationTypeNone -> "ASSET_DURATION_TYPE_NONE"

536+

276-- | Type of asset to upload. This is a required field. IMAGE is solely used

537-- | Type of asset to upload. This is a required field. IMAGE is solely used

277-- for IMAGE creatives. Other image assets should use HTML_IMAGE.

538-- for IMAGE creatives. Other image assets should use HTML_IMAGE.

278data CreativeAssetIdType

539data CreativeAssetIdType

@@ -290,6 +551,23 @@ data CreativeAssetIdType

290

551

291instance Hashable CreativeAssetIdType

552instance Hashable CreativeAssetIdType

292

553

554+instance FromText CreativeAssetIdType where

555+ fromText = \case

556+ "FLASH" -> Just CAITFlash

557+ "HTML" -> Just CAITHTML

558+ "HTML_IMAGE" -> Just CAITHTMLImage

559+ "IMAGE" -> Just CAITImage

560+ "VIDEO" -> Just CAITVideo

561+ _ -> Nothing

562+

563+instance ToText CreativeAssetIdType where

564+ toText = \case

565+ CAITFlash -> "FLASH"

566+ CAITHTML -> "HTML"

567+ CAITHTMLImage -> "HTML_IMAGE"

568+ CAITImage -> "IMAGE"

569+ CAITVideo -> "VIDEO"

570+

293data CreativeAssetItemDetectedFeatures

571data CreativeAssetItemDetectedFeatures

294 = CAIDFApplicationCache

572 = CAIDFApplicationCache

295 -- ^ @APPLICATION_CACHE@

573 -- ^ @APPLICATION_CACHE@

@@ -427,6 +705,145 @@ data CreativeAssetItemDetectedFeatures

427

705

428instance Hashable CreativeAssetItemDetectedFeatures

706instance Hashable CreativeAssetItemDetectedFeatures

429

707

708+instance FromText CreativeAssetItemDetectedFeatures where

709+ fromText = \case

710+ "APPLICATION_CACHE" -> Just CAIDFApplicationCache

711+ "AUDIO" -> Just CAIDFAudio

712+ "CANVAS" -> Just CAIDFCanvas

713+ "CANVAS_TEXT" -> Just CAIDFCanvasText

714+ "CSS_ANIMATIONS" -> Just CAIDFCssAnimations

715+ "CSS_BACKGROUND_SIZE" -> Just CAIDFCssBackgroundSize

716+ "CSS_BORDER_IMAGE" -> Just CAIDFCssBorderImage

717+ "CSS_BORDER_RADIUS" -> Just CAIDFCssBorderRadius

718+ "CSS_BOX_SHADOW" -> Just CAIDFCssBoxShadow

719+ "CSS_COLUMNS" -> Just CAIDFCssColumns

720+ "CSS_FLEX_BOX" -> Just CAIDFCssFlexBox

721+ "CSS_FONT_FACE" -> Just CAIDFCssFontFace

722+ "CSS_GENERATED_CONTENT" -> Just CAIDFCssGeneratedContent

723+ "CSS_GRADIENTS" -> Just CAIDFCssGradients

724+ "CSS_HSLA" -> Just CAIDFCssHsla

725+ "CSS_MULTIPLE_BGS" -> Just CAIDFCssMultipleBgs

726+ "CSS_OPACITY" -> Just CAIDFCssOpacity

727+ "CSS_REFLECTIONS" -> Just CAIDFCssReflections

728+ "CSS_RGBA" -> Just CAIDFCssRgba

729+ "CSS_TEXT_SHADOW" -> Just CAIDFCssTextShadow

730+ "CSS_TRANSFORMS" -> Just CAIDFCssTransforms

731+ "CSS_TRANSFORMS3D" -> Just CAIDFCssTRANSFORMS3D

732+ "CSS_TRANSITIONS" -> Just CAIDFCssTransitions

733+ "DRAG_AND_DROP" -> Just CAIDFDragAndDrop

734+ "GEO_LOCATION" -> Just CAIDFGeoLocation

735+ "HASH_CHANGE" -> Just CAIDFHashChange

736+ "HISTORY" -> Just CAIDFHistory

737+ "INDEXED_DB" -> Just CAIDFIndexedDB

738+ "INLINE_SVG" -> Just CAIDFInlineSvg

739+ "INPUT_ATTR_AUTOCOMPLETE" -> Just CAIDFInputAttrAutocomplete

740+ "INPUT_ATTR_AUTOFOCUS" -> Just CAIDFInputAttrAutofocus

741+ "INPUT_ATTR_LIST" -> Just CAIDFInputAttrList

742+ "INPUT_ATTR_MAX" -> Just CAIDFInputAttrMax

743+ "INPUT_ATTR_MIN" -> Just CAIDFInputAttrMin

744+ "INPUT_ATTR_MULTIPLE" -> Just CAIDFInputAttrMultiple

745+ "INPUT_ATTR_PATTERN" -> Just CAIDFInputAttrPattern

746+ "INPUT_ATTR_PLACEHOLDER" -> Just CAIDFInputAttrPlaceholder

747+ "INPUT_ATTR_REQUIRED" -> Just CAIDFInputAttrRequired

748+ "INPUT_ATTR_STEP" -> Just CAIDFInputAttrStep

749+ "INPUT_TYPE_COLOR" -> Just CAIDFInputTypeColor

750+ "INPUT_TYPE_DATE" -> Just CAIDFInputTypeDate

751+ "INPUT_TYPE_DATETIME" -> Just CAIDFInputTypeDatetime

752+ "INPUT_TYPE_DATETIME_LOCAL" -> Just CAIDFInputTypeDatetimeLocal

753+ "INPUT_TYPE_EMAIL" -> Just CAIDFInputTypeEmail

754+ "INPUT_TYPE_MONTH" -> Just CAIDFInputTypeMonth

755+ "INPUT_TYPE_NUMBER" -> Just CAIDFInputTypeNumber

756+ "INPUT_TYPE_RANGE" -> Just CAIDFInputTypeRange

757+ "INPUT_TYPE_SEARCH" -> Just CAIDFInputTypeSearch

758+ "INPUT_TYPE_TEL" -> Just CAIDFInputTypeTel

759+ "INPUT_TYPE_TIME" -> Just CAIDFInputTypeTime

760+ "INPUT_TYPE_URL" -> Just CAIDFInputTypeURL

761+ "INPUT_TYPE_WEEK" -> Just CAIDFInputTypeWeek

762+ "LOCAL_STORAGE" -> Just CAIDFLocalStorage

763+ "POST_MESSAGE" -> Just CAIDFPostMessage

764+ "SESSION_STORAGE" -> Just CAIDFSessionStorage

765+ "SMIL" -> Just CAIDFSmil

766+ "SVG_CLIP_PATHS" -> Just CAIDFSvgClipPaths

767+ "SVG_FE_IMAGE" -> Just CAIDFSvgFeImage

768+ "SVG_FILTERS" -> Just CAIDFSvgFilters

769+ "SVG_HREF" -> Just CAIDFSvgHref

770+ "TOUCH" -> Just CAIDFTouch

771+ "VIDEO" -> Just CAIDFVideo

772+ "WEBGL" -> Just CAIDFWebgl

773+ "WEB_SOCKETS" -> Just CAIDFWebSockets

774+ "WEB_SQL_DATABASE" -> Just CAIDFWebSqlDatabase

775+ "WEB_WORKERS" -> Just CAIDFWebWorkers

776+ _ -> Nothing

777+

778+instance ToText CreativeAssetItemDetectedFeatures where

779+ toText = \case

780+ CAIDFApplicationCache -> "APPLICATION_CACHE"

781+ CAIDFAudio -> "AUDIO"

782+ CAIDFCanvas -> "CANVAS"

783+ CAIDFCanvasText -> "CANVAS_TEXT"

784+ CAIDFCssAnimations -> "CSS_ANIMATIONS"

785+ CAIDFCssBackgroundSize -> "CSS_BACKGROUND_SIZE"

786+ CAIDFCssBorderImage -> "CSS_BORDER_IMAGE"

787+ CAIDFCssBorderRadius -> "CSS_BORDER_RADIUS"

788+ CAIDFCssBoxShadow -> "CSS_BOX_SHADOW"

789+ CAIDFCssColumns -> "CSS_COLUMNS"

790+ CAIDFCssFlexBox -> "CSS_FLEX_BOX"

791+ CAIDFCssFontFace -> "CSS_FONT_FACE"

792+ CAIDFCssGeneratedContent -> "CSS_GENERATED_CONTENT"

793+ CAIDFCssGradients -> "CSS_GRADIENTS"

794+ CAIDFCssHsla -> "CSS_HSLA"

795+ CAIDFCssMultipleBgs -> "CSS_MULTIPLE_BGS"

796+ CAIDFCssOpacity -> "CSS_OPACITY"

797+ CAIDFCssReflections -> "CSS_REFLECTIONS"

798+ CAIDFCssRgba -> "CSS_RGBA"

799+ CAIDFCssTextShadow -> "CSS_TEXT_SHADOW"

800+ CAIDFCssTransforms -> "CSS_TRANSFORMS"

801+ CAIDFCssTRANSFORMS3D -> "CSS_TRANSFORMS3D"

802+ CAIDFCssTransitions -> "CSS_TRANSITIONS"

803+ CAIDFDragAndDrop -> "DRAG_AND_DROP"

804+ CAIDFGeoLocation -> "GEO_LOCATION"

805+ CAIDFHashChange -> "HASH_CHANGE"

806+ CAIDFHistory -> "HISTORY"

807+ CAIDFIndexedDB -> "INDEXED_DB"

808+ CAIDFInlineSvg -> "INLINE_SVG"

809+ CAIDFInputAttrAutocomplete -> "INPUT_ATTR_AUTOCOMPLETE"

810+ CAIDFInputAttrAutofocus -> "INPUT_ATTR_AUTOFOCUS"

811+ CAIDFInputAttrList -> "INPUT_ATTR_LIST"

812+ CAIDFInputAttrMax -> "INPUT_ATTR_MAX"

813+ CAIDFInputAttrMin -> "INPUT_ATTR_MIN"

814+ CAIDFInputAttrMultiple -> "INPUT_ATTR_MULTIPLE"

815+ CAIDFInputAttrPattern -> "INPUT_ATTR_PATTERN"

816+ CAIDFInputAttrPlaceholder -> "INPUT_ATTR_PLACEHOLDER"

817+ CAIDFInputAttrRequired -> "INPUT_ATTR_REQUIRED"

818+ CAIDFInputAttrStep -> "INPUT_ATTR_STEP"

819+ CAIDFInputTypeColor -> "INPUT_TYPE_COLOR"

820+ CAIDFInputTypeDate -> "INPUT_TYPE_DATE"

821+ CAIDFInputTypeDatetime -> "INPUT_TYPE_DATETIME"

822+ CAIDFInputTypeDatetimeLocal -> "INPUT_TYPE_DATETIME_LOCAL"

823+ CAIDFInputTypeEmail -> "INPUT_TYPE_EMAIL"

824+ CAIDFInputTypeMonth -> "INPUT_TYPE_MONTH"

825+ CAIDFInputTypeNumber -> "INPUT_TYPE_NUMBER"

826+ CAIDFInputTypeRange -> "INPUT_TYPE_RANGE"

827+ CAIDFInputTypeSearch -> "INPUT_TYPE_SEARCH"

828+ CAIDFInputTypeTel -> "INPUT_TYPE_TEL"

829+ CAIDFInputTypeTime -> "INPUT_TYPE_TIME"

830+ CAIDFInputTypeURL -> "INPUT_TYPE_URL"

831+ CAIDFInputTypeWeek -> "INPUT_TYPE_WEEK"

832+ CAIDFLocalStorage -> "LOCAL_STORAGE"

833+ CAIDFPostMessage -> "POST_MESSAGE"

834+ CAIDFSessionStorage -> "SESSION_STORAGE"

835+ CAIDFSmil -> "SMIL"

836+ CAIDFSvgClipPaths -> "SVG_CLIP_PATHS"

837+ CAIDFSvgFeImage -> "SVG_FE_IMAGE"

838+ CAIDFSvgFilters -> "SVG_FILTERS"

839+ CAIDFSvgHref -> "SVG_HREF"

840+ CAIDFTouch -> "TOUCH"

841+ CAIDFVideo -> "VIDEO"

842+ CAIDFWebgl -> "WEBGL"

843+ CAIDFWebSockets -> "WEB_SOCKETS"

844+ CAIDFWebSqlDatabase -> "WEB_SQL_DATABASE"

845+ CAIDFWebWorkers -> "WEB_WORKERS"

846+

430data CreativeAssetMetadataItemDetectedFeatures

847data CreativeAssetMetadataItemDetectedFeatures

431 = CAMIDFApplicationCache

848 = CAMIDFApplicationCache

432 -- ^ @APPLICATION_CACHE@

849 -- ^ @APPLICATION_CACHE@

@@ -564,6 +981,145 @@ data CreativeAssetMetadataItemDetectedFeatures

564

981

565instance Hashable CreativeAssetMetadataItemDetectedFeatures

982instance Hashable CreativeAssetMetadataItemDetectedFeatures

566

983

984+instance FromText CreativeAssetMetadataItemDetectedFeatures where

985+ fromText = \case

986+ "APPLICATION_CACHE" -> Just CAMIDFApplicationCache

987+ "AUDIO" -> Just CAMIDFAudio

988+ "CANVAS" -> Just CAMIDFCanvas

989+ "CANVAS_TEXT" -> Just CAMIDFCanvasText

990+ "CSS_ANIMATIONS" -> Just CAMIDFCssAnimations

991+ "CSS_BACKGROUND_SIZE" -> Just CAMIDFCssBackgroundSize

992+ "CSS_BORDER_IMAGE" -> Just CAMIDFCssBorderImage

993+ "CSS_BORDER_RADIUS" -> Just CAMIDFCssBorderRadius

994+ "CSS_BOX_SHADOW" -> Just CAMIDFCssBoxShadow

995+ "CSS_COLUMNS" -> Just CAMIDFCssColumns

996+ "CSS_FLEX_BOX" -> Just CAMIDFCssFlexBox

997+ "CSS_FONT_FACE" -> Just CAMIDFCssFontFace

998+ "CSS_GENERATED_CONTENT" -> Just CAMIDFCssGeneratedContent

999+ "CSS_GRADIENTS" -> Just CAMIDFCssGradients

1000+ "CSS_HSLA" -> Just CAMIDFCssHsla

1001+ "CSS_MULTIPLE_BGS" -> Just CAMIDFCssMultipleBgs

1002+ "CSS_OPACITY" -> Just CAMIDFCssOpacity

1003+ "CSS_REFLECTIONS" -> Just CAMIDFCssReflections

1004+ "CSS_RGBA" -> Just CAMIDFCssRgba

1005+ "CSS_TEXT_SHADOW" -> Just CAMIDFCssTextShadow

1006+ "CSS_TRANSFORMS" -> Just CAMIDFCssTransforms

1007+ "CSS_TRANSFORMS3D" -> Just CAMIDFCssTRANSFORMS3D

1008+ "CSS_TRANSITIONS" -> Just CAMIDFCssTransitions

1009+ "DRAG_AND_DROP" -> Just CAMIDFDragAndDrop

1010+ "GEO_LOCATION" -> Just CAMIDFGeoLocation

1011+ "HASH_CHANGE" -> Just CAMIDFHashChange

1012+ "HISTORY" -> Just CAMIDFHistory

1013+ "INDEXED_DB" -> Just CAMIDFIndexedDB

1014+ "INLINE_SVG" -> Just CAMIDFInlineSvg

1015+ "INPUT_ATTR_AUTOCOMPLETE" -> Just CAMIDFInputAttrAutocomplete

1016+ "INPUT_ATTR_AUTOFOCUS" -> Just CAMIDFInputAttrAutofocus

1017+ "INPUT_ATTR_LIST" -> Just CAMIDFInputAttrList

1018+ "INPUT_ATTR_MAX" -> Just CAMIDFInputAttrMax

1019+ "INPUT_ATTR_MIN" -> Just CAMIDFInputAttrMin

1020+ "INPUT_ATTR_MULTIPLE" -> Just CAMIDFInputAttrMultiple

1021+ "INPUT_ATTR_PATTERN" -> Just CAMIDFInputAttrPattern

1022+ "INPUT_ATTR_PLACEHOLDER" -> Just CAMIDFInputAttrPlaceholder

1023+ "INPUT_ATTR_REQUIRED" -> Just CAMIDFInputAttrRequired

1024+ "INPUT_ATTR_STEP" -> Just CAMIDFInputAttrStep

1025+ "INPUT_TYPE_COLOR" -> Just CAMIDFInputTypeColor

1026+ "INPUT_TYPE_DATE" -> Just CAMIDFInputTypeDate

1027+ "INPUT_TYPE_DATETIME" -> Just CAMIDFInputTypeDatetime

1028+ "INPUT_TYPE_DATETIME_LOCAL" -> Just CAMIDFInputTypeDatetimeLocal

1029+ "INPUT_TYPE_EMAIL" -> Just CAMIDFInputTypeEmail

1030+ "INPUT_TYPE_MONTH" -> Just CAMIDFInputTypeMonth

1031+ "INPUT_TYPE_NUMBER" -> Just CAMIDFInputTypeNumber

1032+ "INPUT_TYPE_RANGE" -> Just CAMIDFInputTypeRange

1033+ "INPUT_TYPE_SEARCH" -> Just CAMIDFInputTypeSearch

1034+ "INPUT_TYPE_TEL" -> Just CAMIDFInputTypeTel

1035+ "INPUT_TYPE_TIME" -> Just CAMIDFInputTypeTime

1036+ "INPUT_TYPE_URL" -> Just CAMIDFInputTypeURL

1037+ "INPUT_TYPE_WEEK" -> Just CAMIDFInputTypeWeek

1038+ "LOCAL_STORAGE" -> Just CAMIDFLocalStorage

1039+ "POST_MESSAGE" -> Just CAMIDFPostMessage

1040+ "SESSION_STORAGE" -> Just CAMIDFSessionStorage

1041+ "SMIL" -> Just CAMIDFSmil

1042+ "SVG_CLIP_PATHS" -> Just CAMIDFSvgClipPaths

1043+ "SVG_FE_IMAGE" -> Just CAMIDFSvgFeImage

1044+ "SVG_FILTERS" -> Just CAMIDFSvgFilters

1045+ "SVG_HREF" -> Just CAMIDFSvgHref

1046+ "TOUCH" -> Just CAMIDFTouch

1047+ "VIDEO" -> Just CAMIDFVideo

1048+ "WEBGL" -> Just CAMIDFWebgl

1049+ "WEB_SOCKETS" -> Just CAMIDFWebSockets

1050+ "WEB_SQL_DATABASE" -> Just CAMIDFWebSqlDatabase

1051+ "WEB_WORKERS" -> Just CAMIDFWebWorkers

1052+ _ -> Nothing

1053+

1054+instance ToText CreativeAssetMetadataItemDetectedFeatures where

1055+ toText = \case

1056+ CAMIDFApplicationCache -> "APPLICATION_CACHE"

1057+ CAMIDFAudio -> "AUDIO"

1058+ CAMIDFCanvas -> "CANVAS"

1059+ CAMIDFCanvasText -> "CANVAS_TEXT"

1060+ CAMIDFCssAnimations -> "CSS_ANIMATIONS"

1061+ CAMIDFCssBackgroundSize -> "CSS_BACKGROUND_SIZE"

1062+ CAMIDFCssBorderImage -> "CSS_BORDER_IMAGE"

1063+ CAMIDFCssBorderRadius -> "CSS_BORDER_RADIUS"

1064+ CAMIDFCssBoxShadow -> "CSS_BOX_SHADOW"

1065+ CAMIDFCssColumns -> "CSS_COLUMNS"

1066+ CAMIDFCssFlexBox -> "CSS_FLEX_BOX"

1067+ CAMIDFCssFontFace -> "CSS_FONT_FACE"

1068+ CAMIDFCssGeneratedContent -> "CSS_GENERATED_CONTENT"

1069+ CAMIDFCssGradients -> "CSS_GRADIENTS"

1070+ CAMIDFCssHsla -> "CSS_HSLA"

1071+ CAMIDFCssMultipleBgs -> "CSS_MULTIPLE_BGS"

1072+ CAMIDFCssOpacity -> "CSS_OPACITY"

1073+ CAMIDFCssReflections -> "CSS_REFLECTIONS"

1074+ CAMIDFCssRgba -> "CSS_RGBA"

1075+ CAMIDFCssTextShadow -> "CSS_TEXT_SHADOW"

1076+ CAMIDFCssTransforms -> "CSS_TRANSFORMS"

1077+ CAMIDFCssTRANSFORMS3D -> "CSS_TRANSFORMS3D"

1078+ CAMIDFCssTransitions -> "CSS_TRANSITIONS"

1079+ CAMIDFDragAndDrop -> "DRAG_AND_DROP"

1080+ CAMIDFGeoLocation -> "GEO_LOCATION"

1081+ CAMIDFHashChange -> "HASH_CHANGE"

1082+ CAMIDFHistory -> "HISTORY"

1083+ CAMIDFIndexedDB -> "INDEXED_DB"

1084+ CAMIDFInlineSvg -> "INLINE_SVG"

1085+ CAMIDFInputAttrAutocomplete -> "INPUT_ATTR_AUTOCOMPLETE"

1086+ CAMIDFInputAttrAutofocus -> "INPUT_ATTR_AUTOFOCUS"

1087+ CAMIDFInputAttrList -> "INPUT_ATTR_LIST"

1088+ CAMIDFInputAttrMax -> "INPUT_ATTR_MAX"

1089+ CAMIDFInputAttrMin -> "INPUT_ATTR_MIN"

1090+ CAMIDFInputAttrMultiple -> "INPUT_ATTR_MULTIPLE"

1091+ CAMIDFInputAttrPattern -> "INPUT_ATTR_PATTERN"

1092+ CAMIDFInputAttrPlaceholder -> "INPUT_ATTR_PLACEHOLDER"

1093+ CAMIDFInputAttrRequired -> "INPUT_ATTR_REQUIRED"

1094+ CAMIDFInputAttrStep -> "INPUT_ATTR_STEP"

1095+ CAMIDFInputTypeColor -> "INPUT_TYPE_COLOR"

1096+ CAMIDFInputTypeDate -> "INPUT_TYPE_DATE"

1097+ CAMIDFInputTypeDatetime -> "INPUT_TYPE_DATETIME"

1098+ CAMIDFInputTypeDatetimeLocal -> "INPUT_TYPE_DATETIME_LOCAL"

1099+ CAMIDFInputTypeEmail -> "INPUT_TYPE_EMAIL"

1100+ CAMIDFInputTypeMonth -> "INPUT_TYPE_MONTH"

1101+ CAMIDFInputTypeNumber -> "INPUT_TYPE_NUMBER"

1102+ CAMIDFInputTypeRange -> "INPUT_TYPE_RANGE"

1103+ CAMIDFInputTypeSearch -> "INPUT_TYPE_SEARCH"

1104+ CAMIDFInputTypeTel -> "INPUT_TYPE_TEL"

1105+ CAMIDFInputTypeTime -> "INPUT_TYPE_TIME"

1106+ CAMIDFInputTypeURL -> "INPUT_TYPE_URL"

1107+ CAMIDFInputTypeWeek -> "INPUT_TYPE_WEEK"

1108+ CAMIDFLocalStorage -> "LOCAL_STORAGE"

1109+ CAMIDFPostMessage -> "POST_MESSAGE"

1110+ CAMIDFSessionStorage -> "SESSION_STORAGE"

1111+ CAMIDFSmil -> "SMIL"

1112+ CAMIDFSvgClipPaths -> "SVG_CLIP_PATHS"

1113+ CAMIDFSvgFeImage -> "SVG_FE_IMAGE"

1114+ CAMIDFSvgFilters -> "SVG_FILTERS"

1115+ CAMIDFSvgHref -> "SVG_HREF"

1116+ CAMIDFTouch -> "TOUCH"

1117+ CAMIDFVideo -> "VIDEO"

1118+ CAMIDFWebgl -> "WEBGL"

1119+ CAMIDFWebSockets -> "WEB_SOCKETS"

1120+ CAMIDFWebSqlDatabase -> "WEB_SQL_DATABASE"

1121+ CAMIDFWebWorkers -> "WEB_WORKERS"

1122+

567data CreativeAssetMetadataItemWarnedValidationRules

1123data CreativeAssetMetadataItemWarnedValidationRules

568 = CAMIWVRADMobReferenced

1124 = CAMIWVRADMobReferenced

569 -- ^ @ADMOB_REFERENCED@

1125 -- ^ @ADMOB_REFERENCED@

@@ -611,6 +1167,55 @@ data CreativeAssetMetadataItemWarnedValidationRules

611

1167

612instance Hashable CreativeAssetMetadataItemWarnedValidationRules

1168instance Hashable CreativeAssetMetadataItemWarnedValidationRules

613

1169

1170+instance FromText CreativeAssetMetadataItemWarnedValidationRules where

1171+ fromText = \case

1172+ "ADMOB_REFERENCED" -> Just CAMIWVRADMobReferenced

1173+ "ASSET_FORMAT_UNSUPPORTED_DCM" -> Just CAMIWVRAssetFormatUnsupportedDcm

1174+ "ASSET_INVALID" -> Just CAMIWVRAssetInvalid

1175+ "CLICK_TAG_INVALID" -> Just CAMIWVRClickTagInvalid

1176+ "CLICK_TAG_MISSING" -> Just CAMIWVRClickTagMissing

1177+ "CLICK_TAG_MORE_THAN_ONE" -> Just CAMIWVRClickTagMoreThanOne

1178+ "CLICK_TAG_NON_TOP_LEVEL" -> Just CAMIWVRClickTagNonTopLevel

1179+ "COMPONENT_UNSUPPORTED_DCM" -> Just CAMIWVRComponentUnsupportedDcm

1180+ "ENABLER_UNSUPPORTED_METHOD_DCM" -> Just CAMIWVREnablerUnsupportedMethodDcm

1181+ "EXTERNAL_FILE_REFERENCED" -> Just CAMIWVRExternalFileReferenced

1182+ "FILE_DETAIL_EMPTY" -> Just CAMIWVRFileDetailEmpty

1183+ "FILE_TYPE_INVALID" -> Just CAMIWVRFileTypeInvalid

1184+ "GWD_PROPERTIES_INVALID" -> Just CAMIWVRGwdPropertiesInvalid

1185+ "HTML5_FEATURE_UNSUPPORTED" -> Just CAMIWVRHTML5FeatureUnsupported

1186+ "LINKED_FILE_NOT_FOUND" -> Just CAMIWVRLinkedFileNotFound

1187+ "MAX_FLASH_VERSION_11" -> Just CAMIWVRMaxFlashVersion11

1188+ "MRAID_REFERENCED" -> Just CAMIWVRMraidReferenced

1189+ "NOT_SSL_COMPLIANT" -> Just CAMIWVRNotSSLCompliant

1190+ "ORPHANED_ASSET" -> Just CAMIWVROrphanedAsset

1191+ "PRIMARY_HTML_MISSING" -> Just CAMIWVRPrimaryHTMLMissing

1192+ "ZIP_INVALID" -> Just CAMIWVRZipInvalid

1193+ _ -> Nothing

1194+

1195+instance ToText CreativeAssetMetadataItemWarnedValidationRules where

1196+ toText = \case

1197+ CAMIWVRADMobReferenced -> "ADMOB_REFERENCED"

1198+ CAMIWVRAssetFormatUnsupportedDcm -> "ASSET_FORMAT_UNSUPPORTED_DCM"

1199+ CAMIWVRAssetInvalid -> "ASSET_INVALID"

1200+ CAMIWVRClickTagInvalid -> "CLICK_TAG_INVALID"

1201+ CAMIWVRClickTagMissing -> "CLICK_TAG_MISSING"

1202+ CAMIWVRClickTagMoreThanOne -> "CLICK_TAG_MORE_THAN_ONE"

1203+ CAMIWVRClickTagNonTopLevel -> "CLICK_TAG_NON_TOP_LEVEL"

1204+ CAMIWVRComponentUnsupportedDcm -> "COMPONENT_UNSUPPORTED_DCM"

1205+ CAMIWVREnablerUnsupportedMethodDcm -> "ENABLER_UNSUPPORTED_METHOD_DCM"

1206+ CAMIWVRExternalFileReferenced -> "EXTERNAL_FILE_REFERENCED"

1207+ CAMIWVRFileDetailEmpty -> "FILE_DETAIL_EMPTY"

1208+ CAMIWVRFileTypeInvalid -> "FILE_TYPE_INVALID"

1209+ CAMIWVRGwdPropertiesInvalid -> "GWD_PROPERTIES_INVALID"

1210+ CAMIWVRHTML5FeatureUnsupported -> "HTML5_FEATURE_UNSUPPORTED"

1211+ CAMIWVRLinkedFileNotFound -> "LINKED_FILE_NOT_FOUND"

1212+ CAMIWVRMaxFlashVersion11 -> "MAX_FLASH_VERSION_11"

1213+ CAMIWVRMraidReferenced -> "MRAID_REFERENCED"

1214+ CAMIWVRNotSSLCompliant -> "NOT_SSL_COMPLIANT"

1215+ CAMIWVROrphanedAsset -> "ORPHANED_ASSET"

1216+ CAMIWVRPrimaryHTMLMissing -> "PRIMARY_HTML_MISSING"

1217+ CAMIWVRZipInvalid -> "ZIP_INVALID"

1218+

614-- | Offset left unit for an asset. This is a read-only field. Applicable to

1219-- | Offset left unit for an asset. This is a read-only field. Applicable to

615-- the following creative types: all RICH_MEDIA.

1220-- the following creative types: all RICH_MEDIA.

616data CreativeAssetPositionLeftUnit

1221data CreativeAssetPositionLeftUnit

@@ -624,6 +1229,19 @@ data CreativeAssetPositionLeftUnit

624

1229

625instance Hashable CreativeAssetPositionLeftUnit

1230instance Hashable CreativeAssetPositionLeftUnit

626

1231

1232+instance FromText CreativeAssetPositionLeftUnit where

1233+ fromText = \case

1234+ "OFFSET_UNIT_PERCENT" -> Just CAPLUOffsetUnitPercent

1235+ "OFFSET_UNIT_PIXEL" -> Just CAPLUOffsetUnitPixel

1236+ "OFFSET_UNIT_PIXEL_FROM_CENTER" -> Just CAPLUOffsetUnitPixelFromCenter

1237+ _ -> Nothing

1238+

1239+instance ToText CreativeAssetPositionLeftUnit where

1240+ toText = \case

1241+ CAPLUOffsetUnitPercent -> "OFFSET_UNIT_PERCENT"

1242+ CAPLUOffsetUnitPixel -> "OFFSET_UNIT_PIXEL"

1243+ CAPLUOffsetUnitPixelFromCenter -> "OFFSET_UNIT_PIXEL_FROM_CENTER"

1244+

627-- | Offset top unit for an asset. This is a read-only field if the asset

1245-- | Offset top unit for an asset. This is a read-only field if the asset

628-- displayType is ASSET_DISPLAY_TYPE_OVERLAY. Applicable to the following

1246-- displayType is ASSET_DISPLAY_TYPE_OVERLAY. Applicable to the following

629-- creative types: all RICH_MEDIA.

1247-- creative types: all RICH_MEDIA.

@@ -638,6 +1256,19 @@ data CreativeAssetPositionTopUnit

638

1256

639instance Hashable CreativeAssetPositionTopUnit

1257instance Hashable CreativeAssetPositionTopUnit

640

1258

1259+instance FromText CreativeAssetPositionTopUnit where

1260+ fromText = \case

1261+ "OFFSET_UNIT_PERCENT" -> Just CAPTUOffsetUnitPercent

1262+ "OFFSET_UNIT_PIXEL" -> Just CAPTUOffsetUnitPixel

1263+ "OFFSET_UNIT_PIXEL_FROM_CENTER" -> Just CAPTUOffsetUnitPixelFromCenter

1264+ _ -> Nothing

1265+

1266+instance ToText CreativeAssetPositionTopUnit where

1267+ toText = \case

1268+ CAPTUOffsetUnitPercent -> "OFFSET_UNIT_PERCENT"

1269+ CAPTUOffsetUnitPixel -> "OFFSET_UNIT_PIXEL"

1270+ CAPTUOffsetUnitPixelFromCenter -> "OFFSET_UNIT_PIXEL_FROM_CENTER"

1271+

641-- | Role of the asset in relation to creative. Applicable to all but the

1272-- | Role of the asset in relation to creative. Applicable to all but the

642-- following creative types: all REDIRECT and TRACKING_TEXT. This is a

1273-- following creative types: all REDIRECT and TRACKING_TEXT. This is a

643-- required field. PRIMARY applies to ENHANCED_BANNER, FLASH_INPAGE,

1274-- required field. PRIMARY applies to ENHANCED_BANNER, FLASH_INPAGE,

@@ -679,6 +1310,29 @@ data CreativeAssetRole

679

1310

680instance Hashable CreativeAssetRole

1311instance Hashable CreativeAssetRole

681

1312

1313+instance FromText CreativeAssetRole where

1314+ fromText = \case

1315+ "ADDITIONAL_FLASH" -> Just CARAdditionalFlash

1316+ "ADDITIONAL_IMAGE" -> Just CARAdditionalImage

1317+ "ALTERNATE_VIDEO" -> Just CARAlternateVideo

1318+ "BACKUP_IMAGE" -> Just CARBackupImage

1319+ "OTHER" -> Just CAROther

1320+ "PARENT_VIDEO" -> Just CARParentVideo

1321+ "PRIMARY" -> Just CARPrimary

1322+ "TRANSCODED_VIDEO" -> Just CARTranscodedVideo

1323+ _ -> Nothing

1324+

1325+instance ToText CreativeAssetRole where

1326+ toText = \case

1327+ CARAdditionalFlash -> "ADDITIONAL_FLASH"

1328+ CARAdditionalImage -> "ADDITIONAL_IMAGE"

1329+ CARAlternateVideo -> "ALTERNATE_VIDEO"

1330+ CARBackupImage -> "BACKUP_IMAGE"

1331+ CAROther -> "OTHER"

1332+ CARParentVideo -> "PARENT_VIDEO"

1333+ CARPrimary -> "PRIMARY"

1334+ CARTranscodedVideo -> "TRANSCODED_VIDEO"

1335+

682-- | Initial wait time type before making the asset visible. Applicable to

1336-- | Initial wait time type before making the asset visible. Applicable to

683-- the following creative types: all RICH_MEDIA.

1337-- the following creative types: all RICH_MEDIA.

684data CreativeAssetStartTimeType

1338data CreativeAssetStartTimeType

@@ -690,6 +1344,17 @@ data CreativeAssetStartTimeType

690

1344

691instance Hashable CreativeAssetStartTimeType

1345instance Hashable CreativeAssetStartTimeType

692

1346

1347+instance FromText CreativeAssetStartTimeType where

1348+ fromText = \case

1349+ "ASSET_START_TIME_TYPE_CUSTOM" -> Just CASTTAssetStartTimeTypeCustom

1350+ "ASSET_START_TIME_TYPE_NONE" -> Just CASTTAssetStartTimeTypeNone

1351+ _ -> Nothing

1352+

1353+instance ToText CreativeAssetStartTimeType where

1354+ toText = \case

1355+ CASTTAssetStartTimeTypeCustom -> "ASSET_START_TIME_TYPE_CUSTOM"

1356+ CASTTAssetStartTimeTypeNone -> "ASSET_START_TIME_TYPE_NONE"

1357+

693-- | Window mode options for flash assets. Applicable to the following

1358-- | Window mode options for flash assets. Applicable to the following

694-- creative types: FLASH_INPAGE, RICH_MEDIA_EXPANDING,

1359-- creative types: FLASH_INPAGE, RICH_MEDIA_EXPANDING,

695-- RICH_MEDIA_IM_EXPAND, RICH_MEDIA_INPAGE, and RICH_MEDIA_INPAGE_FLOATING.

1360-- RICH_MEDIA_IM_EXPAND, RICH_MEDIA_INPAGE, and RICH_MEDIA_INPAGE_FLOATING.

@@ -704,6 +1369,19 @@ data CreativeAssetWindowMode

704

1369

705instance Hashable CreativeAssetWindowMode

1370instance Hashable CreativeAssetWindowMode

706

1371

1372+instance FromText CreativeAssetWindowMode where

1373+ fromText = \case

1374+ "OPAQUE" -> Just CAWMOpaque

1375+ "TRANSPARENT" -> Just CAWMTransparent

1376+ "WINDOW" -> Just CAWMWindow

1377+ _ -> Nothing

1378+

1379+instance ToText CreativeAssetWindowMode where

1380+ toText = \case

1381+ CAWMOpaque -> "OPAQUE"

1382+ CAWMTransparent -> "TRANSPARENT"

1383+ CAWMWindow -> "WINDOW"

1384+

707-- | Authoring tool for HTML5 banner creatives. This is a read-only field.

1385-- | Authoring tool for HTML5 banner creatives. This is a read-only field.

708-- Applicable to the following creative types: HTML5_BANNER.

1386-- Applicable to the following creative types: HTML5_BANNER.

709data CreativeAuthoringTool

1387data CreativeAuthoringTool

@@ -715,6 +1393,17 @@ data CreativeAuthoringTool

715

1393

716instance Hashable CreativeAuthoringTool

1394instance Hashable CreativeAuthoringTool

717

1395

1396+instance FromText CreativeAuthoringTool where

1397+ fromText = \case

1398+ "NINJA" -> Just CATNinja

1399+ "SWIFFY" -> Just CATSwiffy

1400+ _ -> Nothing

1401+

1402+instance ToText CreativeAuthoringTool where

1403+ toText = \case

1404+ CATNinja -> "NINJA"

1405+ CATSwiffy -> "SWIFFY"

1406+

718-- | Type of the event. This is a read-only field.

1407-- | Type of the event. This is a read-only field.

719data CreativeCustomEventAdvertiserCustomEventType

1408data CreativeCustomEventAdvertiserCustomEventType

720 = CCEACETAdvertiserEventCounter

1409 = CCEACETAdvertiserEventCounter

@@ -727,6 +1416,19 @@ data CreativeCustomEventAdvertiserCustomEventType

727

1416

728instance Hashable CreativeCustomEventAdvertiserCustomEventType

1417instance Hashable CreativeCustomEventAdvertiserCustomEventType

729

1418

1419+instance FromText CreativeCustomEventAdvertiserCustomEventType where

1420+ fromText = \case

1421+ "ADVERTISER_EVENT_COUNTER" -> Just CCEACETAdvertiserEventCounter

1422+ "ADVERTISER_EVENT_EXIT" -> Just CCEACETAdvertiserEventExit

1423+ "ADVERTISER_EVENT_TIMER" -> Just CCEACETAdvertiserEventTimer

1424+ _ -> Nothing

1425+

1426+instance ToText CreativeCustomEventAdvertiserCustomEventType where

1427+ toText = \case

1428+ CCEACETAdvertiserEventCounter -> "ADVERTISER_EVENT_COUNTER"

1429+ CCEACETAdvertiserEventExit -> "ADVERTISER_EVENT_EXIT"

1430+ CCEACETAdvertiserEventTimer -> "ADVERTISER_EVENT_TIMER"

1431+

730-- | Artwork type used by the creative.This is a read-only field.

1432-- | Artwork type used by the creative.This is a read-only field.

731data CreativeCustomEventArtworkType

1433data CreativeCustomEventArtworkType

732 = CCEATArtworkTypeFlash

1434 = CCEATArtworkTypeFlash

@@ -739,6 +1441,19 @@ data CreativeCustomEventArtworkType

739

1441

740instance Hashable CreativeCustomEventArtworkType

1442instance Hashable CreativeCustomEventArtworkType

741

1443

1444+instance FromText CreativeCustomEventArtworkType where

1445+ fromText = \case

1446+ "ARTWORK_TYPE_FLASH" -> Just CCEATArtworkTypeFlash

1447+ "ARTWORK_TYPE_HTML5" -> Just CCEATArtworkTypeHTML5

1448+ "ARTWORK_TYPE_MIXED" -> Just CCEATArtworkTypeMixed

1449+ _ -> Nothing

1450+

1451+instance ToText CreativeCustomEventArtworkType where

1452+ toText = \case

1453+ CCEATArtworkTypeFlash -> "ARTWORK_TYPE_FLASH"

1454+ CCEATArtworkTypeHTML5 -> "ARTWORK_TYPE_HTML5"

1455+ CCEATArtworkTypeMixed -> "ARTWORK_TYPE_MIXED"

1456+

742-- | Target type used by the event.

1457-- | Target type used by the event.

743data CreativeCustomEventTargetType

1458data CreativeCustomEventTargetType

744 = CCETTTargetBlank

1459 = CCETTTargetBlank

@@ -755,6 +1470,23 @@ data CreativeCustomEventTargetType

755

1470

756instance Hashable CreativeCustomEventTargetType

1471instance Hashable CreativeCustomEventTargetType

757

1472

1473+instance FromText CreativeCustomEventTargetType where

1474+ fromText = \case

1475+ "TARGET_BLANK" -> Just CCETTTargetBlank

1476+ "TARGET_PARENT" -> Just CCETTTargetParent

1477+ "TARGET_POPUP" -> Just CCETTTargetPopup

1478+ "TARGET_SELF" -> Just CCETTTargetSelf

1479+ "TARGET_TOP" -> Just CCETTTargetTop

1480+ _ -> Nothing

1481+

1482+instance ToText CreativeCustomEventTargetType where

1483+ toText = \case

1484+ CCETTTargetBlank -> "TARGET_BLANK"

1485+ CCETTTargetParent -> "TARGET_PARENT"

1486+ CCETTTargetPopup -> "TARGET_POPUP"

1487+ CCETTTargetSelf -> "TARGET_SELF"

1488+ CCETTTargetTop -> "TARGET_TOP"

1489+

758-- | Creative group number of the creative group assignment.

1490-- | Creative group number of the creative group assignment.

759data CreativeGroupAssignmentCreativeGroupNumber

1491data CreativeGroupAssignmentCreativeGroupNumber

760 = CGACGNCreativeGroupOne

1492 = CGACGNCreativeGroupOne

@@ -765,6 +1497,17 @@ data CreativeGroupAssignmentCreativeGroupNumber

765

1497

766instance Hashable CreativeGroupAssignmentCreativeGroupNumber

1498instance Hashable CreativeGroupAssignmentCreativeGroupNumber

767

1499

1500+instance FromText CreativeGroupAssignmentCreativeGroupNumber where

1501+ fromText = \case

1502+ "CREATIVE_GROUP_ONE" -> Just CGACGNCreativeGroupOne

1503+ "CREATIVE_GROUP_TWO" -> Just CGACGNCreativeGroupTwo

1504+ _ -> Nothing

1505+

1506+instance ToText CreativeGroupAssignmentCreativeGroupNumber where

1507+ toText = \case

1508+ CGACGNCreativeGroupOne -> "CREATIVE_GROUP_ONE"

1509+ CGACGNCreativeGroupTwo -> "CREATIVE_GROUP_TWO"

1510+

768data CreativeItemBackupImageFeatures

1511data CreativeItemBackupImageFeatures

769 = CIBIFApplicationCache

1512 = CIBIFApplicationCache

770 -- ^ @APPLICATION_CACHE@

1513 -- ^ @APPLICATION_CACHE@

@@ -902,6 +1645,145 @@ data CreativeItemBackupImageFeatures

902

1645

903instance Hashable CreativeItemBackupImageFeatures

1646instance Hashable CreativeItemBackupImageFeatures

904

1647

1648+instance FromText CreativeItemBackupImageFeatures where

1649+ fromText = \case

1650+ "APPLICATION_CACHE" -> Just CIBIFApplicationCache

1651+ "AUDIO" -> Just CIBIFAudio

1652+ "CANVAS" -> Just CIBIFCanvas

1653+ "CANVAS_TEXT" -> Just CIBIFCanvasText

1654+ "CSS_ANIMATIONS" -> Just CIBIFCssAnimations

1655+ "CSS_BACKGROUND_SIZE" -> Just CIBIFCssBackgroundSize

1656+ "CSS_BORDER_IMAGE" -> Just CIBIFCssBorderImage

1657+ "CSS_BORDER_RADIUS" -> Just CIBIFCssBorderRadius

1658+ "CSS_BOX_SHADOW" -> Just CIBIFCssBoxShadow

1659+ "CSS_COLUMNS" -> Just CIBIFCssColumns

1660+ "CSS_FLEX_BOX" -> Just CIBIFCssFlexBox

1661+ "CSS_FONT_FACE" -> Just CIBIFCssFontFace

1662+ "CSS_GENERATED_CONTENT" -> Just CIBIFCssGeneratedContent

1663+ "CSS_GRADIENTS" -> Just CIBIFCssGradients

1664+ "CSS_HSLA" -> Just CIBIFCssHsla

1665+ "CSS_MULTIPLE_BGS" -> Just CIBIFCssMultipleBgs

1666+ "CSS_OPACITY" -> Just CIBIFCssOpacity

1667+ "CSS_REFLECTIONS" -> Just CIBIFCssReflections

1668+ "CSS_RGBA" -> Just CIBIFCssRgba

1669+ "CSS_TEXT_SHADOW" -> Just CIBIFCssTextShadow

1670+ "CSS_TRANSFORMS" -> Just CIBIFCssTransforms

1671+ "CSS_TRANSFORMS3D" -> Just CIBIFCssTRANSFORMS3D

1672+ "CSS_TRANSITIONS" -> Just CIBIFCssTransitions

1673+ "DRAG_AND_DROP" -> Just CIBIFDragAndDrop

1674+ "GEO_LOCATION" -> Just CIBIFGeoLocation

1675+ "HASH_CHANGE" -> Just CIBIFHashChange

1676+ "HISTORY" -> Just CIBIFHistory

1677+ "INDEXED_DB" -> Just CIBIFIndexedDB

1678+ "INLINE_SVG" -> Just CIBIFInlineSvg

1679+ "INPUT_ATTR_AUTOCOMPLETE" -> Just CIBIFInputAttrAutocomplete

1680+ "INPUT_ATTR_AUTOFOCUS" -> Just CIBIFInputAttrAutofocus

1681+ "INPUT_ATTR_LIST" -> Just CIBIFInputAttrList

1682+ "INPUT_ATTR_MAX" -> Just CIBIFInputAttrMax

1683+ "INPUT_ATTR_MIN" -> Just CIBIFInputAttrMin

1684+ "INPUT_ATTR_MULTIPLE" -> Just CIBIFInputAttrMultiple

1685+ "INPUT_ATTR_PATTERN" -> Just CIBIFInputAttrPattern

1686+ "INPUT_ATTR_PLACEHOLDER" -> Just CIBIFInputAttrPlaceholder

1687+ "INPUT_ATTR_REQUIRED" -> Just CIBIFInputAttrRequired

1688+ "INPUT_ATTR_STEP" -> Just CIBIFInputAttrStep

1689+ "INPUT_TYPE_COLOR" -> Just CIBIFInputTypeColor

1690+ "INPUT_TYPE_DATE" -> Just CIBIFInputTypeDate

1691+ "INPUT_TYPE_DATETIME" -> Just CIBIFInputTypeDatetime

1692+ "INPUT_TYPE_DATETIME_LOCAL" -> Just CIBIFInputTypeDatetimeLocal

1693+ "INPUT_TYPE_EMAIL" -> Just CIBIFInputTypeEmail

1694+ "INPUT_TYPE_MONTH" -> Just CIBIFInputTypeMonth

1695+ "INPUT_TYPE_NUMBER" -> Just CIBIFInputTypeNumber

1696+ "INPUT_TYPE_RANGE" -> Just CIBIFInputTypeRange

1697+ "INPUT_TYPE_SEARCH" -> Just CIBIFInputTypeSearch

1698+ "INPUT_TYPE_TEL" -> Just CIBIFInputTypeTel

1699+ "INPUT_TYPE_TIME" -> Just CIBIFInputTypeTime

1700+ "INPUT_TYPE_URL" -> Just CIBIFInputTypeURL

1701+ "INPUT_TYPE_WEEK" -> Just CIBIFInputTypeWeek

1702+ "LOCAL_STORAGE" -> Just CIBIFLocalStorage

1703+ "POST_MESSAGE" -> Just CIBIFPostMessage

1704+ "SESSION_STORAGE" -> Just CIBIFSessionStorage

1705+ "SMIL" -> Just CIBIFSmil

1706+ "SVG_CLIP_PATHS" -> Just CIBIFSvgClipPaths

1707+ "SVG_FE_IMAGE" -> Just CIBIFSvgFeImage

1708+ "SVG_FILTERS" -> Just CIBIFSvgFilters

1709+ "SVG_HREF" -> Just CIBIFSvgHref

1710+ "TOUCH" -> Just CIBIFTouch

1711+ "VIDEO" -> Just CIBIFVideo

1712+ "WEBGL" -> Just CIBIFWebgl

1713+ "WEB_SOCKETS" -> Just CIBIFWebSockets

1714+ "WEB_SQL_DATABASE" -> Just CIBIFWebSqlDatabase

1715+ "WEB_WORKERS" -> Just CIBIFWebWorkers

1716+ _ -> Nothing

1717+

1718+instance ToText CreativeItemBackupImageFeatures where

1719+ toText = \case

1720+ CIBIFApplicationCache -> "APPLICATION_CACHE"

1721+ CIBIFAudio -> "AUDIO"

1722+ CIBIFCanvas -> "CANVAS"

1723+ CIBIFCanvasText -> "CANVAS_TEXT"

1724+ CIBIFCssAnimations -> "CSS_ANIMATIONS"

1725+ CIBIFCssBackgroundSize -> "CSS_BACKGROUND_SIZE"

1726+ CIBIFCssBorderImage -> "CSS_BORDER_IMAGE"

1727+ CIBIFCssBorderRadius -> "CSS_BORDER_RADIUS"

1728+ CIBIFCssBoxShadow -> "CSS_BOX_SHADOW"

1729+ CIBIFCssColumns -> "CSS_COLUMNS"

1730+ CIBIFCssFlexBox -> "CSS_FLEX_BOX"

1731+ CIBIFCssFontFace -> "CSS_FONT_FACE"

1732+ CIBIFCssGeneratedContent -> "CSS_GENERATED_CONTENT"

1733+ CIBIFCssGradients -> "CSS_GRADIENTS"

1734+ CIBIFCssHsla -> "CSS_HSLA"

1735+ CIBIFCssMultipleBgs -> "CSS_MULTIPLE_BGS"

1736+ CIBIFCssOpacity -> "CSS_OPACITY"

1737+ CIBIFCssReflections -> "CSS_REFLECTIONS"

1738+ CIBIFCssRgba -> "CSS_RGBA"

1739+ CIBIFCssTextShadow -> "CSS_TEXT_SHADOW"

1740+ CIBIFCssTransforms -> "CSS_TRANSFORMS"

1741+ CIBIFCssTRANSFORMS3D -> "CSS_TRANSFORMS3D"

1742+ CIBIFCssTransitions -> "CSS_TRANSITIONS"

1743+ CIBIFDragAndDrop -> "DRAG_AND_DROP"

1744+ CIBIFGeoLocation -> "GEO_LOCATION"

1745+ CIBIFHashChange -> "HASH_CHANGE"

1746+ CIBIFHistory -> "HISTORY"

1747+ CIBIFIndexedDB -> "INDEXED_DB"

1748+ CIBIFInlineSvg -> "INLINE_SVG"

1749+ CIBIFInputAttrAutocomplete -> "INPUT_ATTR_AUTOCOMPLETE"

1750+ CIBIFInputAttrAutofocus -> "INPUT_ATTR_AUTOFOCUS"

1751+ CIBIFInputAttrList -> "INPUT_ATTR_LIST"

1752+ CIBIFInputAttrMax -> "INPUT_ATTR_MAX"

1753+ CIBIFInputAttrMin -> "INPUT_ATTR_MIN"

1754+ CIBIFInputAttrMultiple -> "INPUT_ATTR_MULTIPLE"

1755+ CIBIFInputAttrPattern -> "INPUT_ATTR_PATTERN"

1756+ CIBIFInputAttrPlaceholder -> "INPUT_ATTR_PLACEHOLDER"

1757+ CIBIFInputAttrRequired -> "INPUT_ATTR_REQUIRED"

1758+ CIBIFInputAttrStep -> "INPUT_ATTR_STEP"

1759+ CIBIFInputTypeColor -> "INPUT_TYPE_COLOR"

1760+ CIBIFInputTypeDate -> "INPUT_TYPE_DATE"

1761+ CIBIFInputTypeDatetime -> "INPUT_TYPE_DATETIME"

1762+ CIBIFInputTypeDatetimeLocal -> "INPUT_TYPE_DATETIME_LOCAL"

1763+ CIBIFInputTypeEmail -> "INPUT_TYPE_EMAIL"

1764+ CIBIFInputTypeMonth -> "INPUT_TYPE_MONTH"

1765+ CIBIFInputTypeNumber -> "INPUT_TYPE_NUMBER"

1766+ CIBIFInputTypeRange -> "INPUT_TYPE_RANGE"

1767+ CIBIFInputTypeSearch -> "INPUT_TYPE_SEARCH"

1768+ CIBIFInputTypeTel -> "INPUT_TYPE_TEL"

1769+ CIBIFInputTypeTime -> "INPUT_TYPE_TIME"

1770+ CIBIFInputTypeURL -> "INPUT_TYPE_URL"

1771+ CIBIFInputTypeWeek -> "INPUT_TYPE_WEEK"

1772+ CIBIFLocalStorage -> "LOCAL_STORAGE"

1773+ CIBIFPostMessage -> "POST_MESSAGE"

1774+ CIBIFSessionStorage -> "SESSION_STORAGE"

1775+ CIBIFSmil -> "SMIL"

1776+ CIBIFSvgClipPaths -> "SVG_CLIP_PATHS"

1777+ CIBIFSvgFeImage -> "SVG_FE_IMAGE"

1778+ CIBIFSvgFilters -> "SVG_FILTERS"

1779+ CIBIFSvgHref -> "SVG_HREF"

1780+ CIBIFTouch -> "TOUCH"

1781+ CIBIFVideo -> "VIDEO"

1782+ CIBIFWebgl -> "WEBGL"

1783+ CIBIFWebSockets -> "WEB_SOCKETS"

1784+ CIBIFWebSqlDatabase -> "WEB_SQL_DATABASE"

1785+ CIBIFWebWorkers -> "WEB_WORKERS"

1786+

905data CreativeItemCompatibility

1787data CreativeItemCompatibility

906 = CICApp

1788 = CICApp

907 -- ^ @APP@

1789 -- ^ @APP@

@@ -917,6 +1799,23 @@ data CreativeItemCompatibility

917

1799

918instance Hashable CreativeItemCompatibility

1800instance Hashable CreativeItemCompatibility

919

1801

1802+instance FromText CreativeItemCompatibility where

1803+ fromText = \case

1804+ "APP" -> Just CICApp

1805+ "APP_INTERSTITIAL" -> Just CICAppInterstitial

1806+ "IN_STREAM_VIDEO" -> Just CICInStreamVideo

1807+ "WEB" -> Just CICWeb

1808+ "WEB_INTERSTITIAL" -> Just CICWebInterstitial

1809+ _ -> Nothing

1810+

1811+instance ToText CreativeItemCompatibility where

1812+ toText = \case

1813+ CICApp -> "APP"

1814+ CICAppInterstitial -> "APP_INTERSTITIAL"

1815+ CICInStreamVideo -> "IN_STREAM_VIDEO"

1816+ CICWeb -> "WEB"

1817+ CICWebInterstitial -> "WEB_INTERSTITIAL"

1818+

920-- | Optimization model for this configuration.

1819-- | Optimization model for this configuration.

921data CreativeOptimizationConfigurationOptimizationModel

1820data CreativeOptimizationConfigurationOptimizationModel

922 = COCOMClick

1821 = COCOMClick

@@ -931,6 +1830,21 @@ data CreativeOptimizationConfigurationOptimizationModel

931

1830

932instance Hashable CreativeOptimizationConfigurationOptimizationModel

1831instance Hashable CreativeOptimizationConfigurationOptimizationModel

933

1832

1833+instance FromText CreativeOptimizationConfigurationOptimizationModel where

1834+ fromText = \case

1835+ "CLICK" -> Just COCOMClick

1836+ "POST_CLICK" -> Just COCOMPostClick

1837+ "POST_CLICK_AND_IMPRESSION" -> Just COCOMPostClickAndImpression

1838+ "POST_IMPRESSION" -> Just COCOMPostImpression

1839+ _ -> Nothing

1840+

1841+instance ToText CreativeOptimizationConfigurationOptimizationModel where

1842+ toText = \case

1843+ COCOMClick -> "CLICK"

1844+ COCOMPostClick -> "POST_CLICK"

1845+ COCOMPostClickAndImpression -> "POST_CLICK_AND_IMPRESSION"

1846+ COCOMPostImpression -> "POST_IMPRESSION"

1847+

934-- | Type of creative rotation. Can be used to specify whether to use

1848-- | Type of creative rotation. Can be used to specify whether to use

935-- sequential or random rotation.

1849-- sequential or random rotation.

936data CreativeRotationType

1850data CreativeRotationType

@@ -942,6 +1856,17 @@ data CreativeRotationType

942

1856

943instance Hashable CreativeRotationType

1857instance Hashable CreativeRotationType

944

1858

1859+instance FromText CreativeRotationType where

1860+ fromText = \case

1861+ "CREATIVE_ROTATION_TYPE_RANDOM" -> Just CRTCreativeRotationTypeRandom

1862+ "CREATIVE_ROTATION_TYPE_SEQUENTIAL" -> Just CRTCreativeRotationTypeSequential

1863+ _ -> Nothing

1864+

1865+instance ToText CreativeRotationType where

1866+ toText = \case

1867+ CRTCreativeRotationTypeRandom -> "CREATIVE_ROTATION_TYPE_RANDOM"

1868+ CRTCreativeRotationTypeSequential -> "CREATIVE_ROTATION_TYPE_SEQUENTIAL"

1869+

945-- | Strategy for calculating weights. Used with

1870-- | Strategy for calculating weights. Used with

946-- CREATIVE_ROTATION_TYPE_RANDOM.

1871-- CREATIVE_ROTATION_TYPE_RANDOM.

947data CreativeRotationWeightCalculationStrategy

1872data CreativeRotationWeightCalculationStrategy

@@ -957,6 +1882,21 @@ data CreativeRotationWeightCalculationStrategy

957

1882

958instance Hashable CreativeRotationWeightCalculationStrategy

1883instance Hashable CreativeRotationWeightCalculationStrategy

959

1884

1885+instance FromText CreativeRotationWeightCalculationStrategy where

1886+ fromText = \case

1887+ "WEIGHT_STRATEGY_CUSTOM" -> Just CRWCSWeightStrategyCustom

1888+ "WEIGHT_STRATEGY_EQUAL" -> Just CRWCSWeightStrategyEqual

1889+ "WEIGHT_STRATEGY_HIGHEST_CTR" -> Just CRWCSWeightStrategyHighestCtr

1890+ "WEIGHT_STRATEGY_OPTIMIZED" -> Just CRWCSWeightStrategyOptimized

1891+ _ -> Nothing

1892+

1893+instance ToText CreativeRotationWeightCalculationStrategy where

1894+ toText = \case

1895+ CRWCSWeightStrategyCustom -> "WEIGHT_STRATEGY_CUSTOM"

1896+ CRWCSWeightStrategyEqual -> "WEIGHT_STRATEGY_EQUAL"

1897+ CRWCSWeightStrategyHighestCtr -> "WEIGHT_STRATEGY_HIGHEST_CTR"

1898+ CRWCSWeightStrategyOptimized -> "WEIGHT_STRATEGY_OPTIMIZED"

1899+

960-- | Type of this creative.This is a required field. Applicable to all

1900-- | Type of this creative.This is a required field. Applicable to all

961-- creative types.

1901-- creative types.

962data CreativeType

1902data CreativeType

@@ -1012,6 +1952,61 @@ data CreativeType

1012

1952

1013instance Hashable CreativeType

1953instance Hashable CreativeType

1014

1954

1955+instance FromText CreativeType where

1956+ fromText = \case

1957+ "BRAND_SAFE_DEFAULT_INSTREAM_VIDEO" -> Just CTBrandSafeDefaultInstreamVideo

1958+ "CUSTOM_INPAGE" -> Just CTCustomInpage

1959+ "CUSTOM_INTERSTITIAL" -> Just CTCustomInterstitial

1960+ "ENHANCED_BANNER" -> Just CTEnhancedBanner

1961+ "ENHANCED_IMAGE" -> Just CTEnhancedImage

1962+ "FLASH_INPAGE" -> Just CTFlashInpage

1963+ "HTML5_BANNER" -> Just CTHTML5Banner

1964+ "IMAGE" -> Just CTImage

1965+ "INSTREAM_VIDEO" -> Just CTInstreamVideo

1966+ "INTERNAL_REDIRECT" -> Just CTInternalRedirect

1967+ "INTERSTITIAL_INTERNAL_REDIRECT" -> Just CTInterstitialInternalRedirect

1968+ "REDIRECT" -> Just CTRedirect

1969+ "RICH_MEDIA_EXPANDING" -> Just CTRichMediaExpanding

1970+ "RICH_MEDIA_IM_EXPAND" -> Just CTRichMediaImExpand

1971+ "RICH_MEDIA_INPAGE" -> Just CTRichMediaInpage

1972+ "RICH_MEDIA_INPAGE_FLOATING" -> Just CTRichMediaInpageFloating

1973+ "RICH_MEDIA_INTERSTITIAL_FLOAT" -> Just CTRichMediaInterstitialFloat

1974+ "RICH_MEDIA_MOBILE_IN_APP" -> Just CTRichMediaMobileInApp

1975+ "RICH_MEDIA_MULTI_FLOATING" -> Just CTRichMediaMultiFloating

1976+ "RICH_MEDIA_PEEL_DOWN" -> Just CTRichMediaPeelDown

1977+ "TRACKING_TEXT" -> Just CTTrackingText

1978+ "VAST_REDIRECT" -> Just CTVastRedirect

1979+ "VPAID_LINEAR" -> Just CTVpaidLinear

1980+ "VPAID_NON_LINEAR" -> Just CTVpaidNonLinear

1981+ _ -> Nothing

1982+

1983+instance ToText CreativeType where

1984+ toText = \case

1985+ CTBrandSafeDefaultInstreamVideo -> "BRAND_SAFE_DEFAULT_INSTREAM_VIDEO"

1986+ CTCustomInpage -> "CUSTOM_INPAGE"

1987+ CTCustomInterstitial -> "CUSTOM_INTERSTITIAL"

1988+ CTEnhancedBanner -> "ENHANCED_BANNER"

1989+ CTEnhancedImage -> "ENHANCED_IMAGE"

1990+ CTFlashInpage -> "FLASH_INPAGE"

1991+ CTHTML5Banner -> "HTML5_BANNER"

1992+ CTImage -> "IMAGE"

1993+ CTInstreamVideo -> "INSTREAM_VIDEO"

1994+ CTInternalRedirect -> "INTERNAL_REDIRECT"

1995+ CTInterstitialInternalRedirect -> "INTERSTITIAL_INTERNAL_REDIRECT"

1996+ CTRedirect -> "REDIRECT"

1997+ CTRichMediaExpanding -> "RICH_MEDIA_EXPANDING"

1998+ CTRichMediaImExpand -> "RICH_MEDIA_IM_EXPAND"

1999+ CTRichMediaInpage -> "RICH_MEDIA_INPAGE"

2000+ CTRichMediaInpageFloating -> "RICH_MEDIA_INPAGE_FLOATING"

2001+ CTRichMediaInterstitialFloat -> "RICH_MEDIA_INTERSTITIAL_FLOAT"

2002+ CTRichMediaMobileInApp -> "RICH_MEDIA_MOBILE_IN_APP"

2003+ CTRichMediaMultiFloating -> "RICH_MEDIA_MULTI_FLOATING"

2004+ CTRichMediaPeelDown -> "RICH_MEDIA_PEEL_DOWN"

2005+ CTTrackingText -> "TRACKING_TEXT"

2006+ CTVastRedirect -> "VAST_REDIRECT"

2007+ CTVpaidLinear -> "VPAID_LINEAR"

2008+ CTVpaidNonLinear -> "VPAID_NON_LINEAR"

2009+

1015-- | The date range relative to the date of when the report is run.

2010-- | The date range relative to the date of when the report is run.

1016data DateRangeRelativeDateRange

2011data DateRangeRelativeDateRange

1017 = DRRDRLast24Months

2012 = DRRDRLast24Months

@@ -1048,6 +2043,43 @@ data DateRangeRelativeDateRange

1048

2043

1049instance Hashable DateRangeRelativeDateRange

2044instance Hashable DateRangeRelativeDateRange

1050

2045

2046+instance FromText DateRangeRelativeDateRange where

2047+ fromText = \case

2048+ "LAST_24_MONTHS" -> Just DRRDRLast24Months

2049+ "LAST_30_DAYS" -> Just DRRDRLast30Days

2050+ "LAST_365_DAYS" -> Just DRRDRLast365Days

2051+ "LAST_7_DAYS" -> Just DRRDRLast7Days

2052+ "LAST_90_DAYS" -> Just DRRDRLast90Days

2053+ "MONTH_TO_DATE" -> Just DRRDRMonthToDate

2054+ "PREVIOUS_MONTH" -> Just DRRDRPreviousMonth

2055+ "PREVIOUS_QUARTER" -> Just DRRDRPreviousQuarter

2056+ "PREVIOUS_WEEK" -> Just DRRDRPreviousWeek

2057+ "PREVIOUS_YEAR" -> Just DRRDRPreviousYear

2058+ "QUARTER_TO_DATE" -> Just DRRDRQuarterToDate

2059+ "TODAY" -> Just DRRDRToday

2060+ "WEEK_TO_DATE" -> Just DRRDRWeekToDate

2061+ "YEAR_TO_DATE" -> Just DRRDRYearToDate

2062+ "YESTERDAY" -> Just DRRDRYesterday

2063+ _ -> Nothing

2064+

2065+instance ToText DateRangeRelativeDateRange where

2066+ toText = \case

2067+ DRRDRLast24Months -> "LAST_24_MONTHS"

2068+ DRRDRLast30Days -> "LAST_30_DAYS"

2069+ DRRDRLast365Days -> "LAST_365_DAYS"

2070+ DRRDRLast7Days -> "LAST_7_DAYS"

2071+ DRRDRLast90Days -> "LAST_90_DAYS"

2072+ DRRDRMonthToDate -> "MONTH_TO_DATE"

2073+ DRRDRPreviousMonth -> "PREVIOUS_MONTH"

2074+ DRRDRPreviousQuarter -> "PREVIOUS_QUARTER"

2075+ DRRDRPreviousWeek -> "PREVIOUS_WEEK"

2076+ DRRDRPreviousYear -> "PREVIOUS_YEAR"

2077+ DRRDRQuarterToDate -> "QUARTER_TO_DATE"

2078+ DRRDRToday -> "TODAY"

2079+ DRRDRWeekToDate -> "WEEK_TO_DATE"

2080+ DRRDRYearToDate -> "YEAR_TO_DATE"

2081+ DRRDRYesterday -> "YESTERDAY"

2082+

1051data DayPartTargetingItemDaysOfWeek

2083data DayPartTargetingItemDaysOfWeek

1052 = DPTIDOWFriday

2084 = DPTIDOWFriday

1053 -- ^ @FRIDAY@

2085 -- ^ @FRIDAY@

@@ -1067,6 +2099,27 @@ data DayPartTargetingItemDaysOfWeek

1067

2099

1068instance Hashable DayPartTargetingItemDaysOfWeek

2100instance Hashable DayPartTargetingItemDaysOfWeek

1069

2101

2102+instance FromText DayPartTargetingItemDaysOfWeek where

2103+ fromText = \case

2104+ "FRIDAY" -> Just DPTIDOWFriday

2105+ "MONDAY" -> Just DPTIDOWMonday

2106+ "SATURDAY" -> Just DPTIDOWSaturday

2107+ "SUNDAY" -> Just DPTIDOWSunday

2108+ "THURSDAY" -> Just DPTIDOWThursday

2109+ "TUESDAY" -> Just DPTIDOWTuesday

2110+ "WEDNESDAY" -> Just DPTIDOWWednesday

2111+ _ -> Nothing

2112+

2113+instance ToText DayPartTargetingItemDaysOfWeek where

2114+ toText = \case

2115+ DPTIDOWFriday -> "FRIDAY"

2116+ DPTIDOWMonday -> "MONDAY"

2117+ DPTIDOWSaturday -> "SATURDAY"

2118+ DPTIDOWSunday -> "SUNDAY"

2119+ DPTIDOWThursday -> "THURSDAY"

2120+ DPTIDOWTuesday -> "TUESDAY"

2121+ DPTIDOWWednesday -> "WEDNESDAY"

2122+

1070-- | Serving priority of an ad, with respect to other ads. The lower the

2123-- | Serving priority of an ad, with respect to other ads. The lower the

1071-- priority number, the greater the priority with which it is served.

2124-- priority number, the greater the priority with which it is served.

1072data DeliverySchedulePriority

2125data DeliverySchedulePriority

@@ -1106,6 +2159,45 @@ data DeliverySchedulePriority

1106

2159

1107instance Hashable DeliverySchedulePriority

2160instance Hashable DeliverySchedulePriority

1108

2161

2162+instance FromText DeliverySchedulePriority where

2163+ fromText = \case

2164+ "AD_PRIORITY_01" -> Just DSPAdPriority01

2165+ "AD_PRIORITY_02" -> Just DSPAdPriority02

2166+ "AD_PRIORITY_03" -> Just DSPAdPriority03

2167+ "AD_PRIORITY_04" -> Just DSPAdPriority04

2168+ "AD_PRIORITY_05" -> Just DSPAdPriority05

2169+ "AD_PRIORITY_06" -> Just DSPAdPriority06

2170+ "AD_PRIORITY_07" -> Just DSPAdPriority07

2171+ "AD_PRIORITY_08" -> Just DSPAdPriority08

2172+ "AD_PRIORITY_09" -> Just DSPAdPriority09

2173+ "AD_PRIORITY_10" -> Just DSPAdPriority10

2174+ "AD_PRIORITY_11" -> Just DSPAdPriority11

2175+ "AD_PRIORITY_12" -> Just DSPAdPriority12

2176+ "AD_PRIORITY_13" -> Just DSPAdPriority13

2177+ "AD_PRIORITY_14" -> Just DSPAdPriority14

2178+ "AD_PRIORITY_15" -> Just DSPAdPriority15

2179+ "AD_PRIORITY_16" -> Just DSPAdPriority16

2180+ _ -> Nothing

2181+

2182+instance ToText DeliverySchedulePriority where

2183+ toText = \case

2184+ DSPAdPriority01 -> "AD_PRIORITY_01"

2185+ DSPAdPriority02 -> "AD_PRIORITY_02"

2186+ DSPAdPriority03 -> "AD_PRIORITY_03"

2187+ DSPAdPriority04 -> "AD_PRIORITY_04"

2188+ DSPAdPriority05 -> "AD_PRIORITY_05"

2189+ DSPAdPriority06 -> "AD_PRIORITY_06"

2190+ DSPAdPriority07 -> "AD_PRIORITY_07"

2191+ DSPAdPriority08 -> "AD_PRIORITY_08"

2192+ DSPAdPriority09 -> "AD_PRIORITY_09"

2193+ DSPAdPriority10 -> "AD_PRIORITY_10"

2194+ DSPAdPriority11 -> "AD_PRIORITY_11"

2195+ DSPAdPriority12 -> "AD_PRIORITY_12"

2196+ DSPAdPriority13 -> "AD_PRIORITY_13"

2197+ DSPAdPriority14 -> "AD_PRIORITY_14"

2198+ DSPAdPriority15 -> "AD_PRIORITY_15"

2199+ DSPAdPriority16 -> "AD_PRIORITY_16"

2200+

1109-- | Determines how the \'value\' field is matched when filtering. If not

2201-- | Determines how the \'value\' field is matched when filtering. If not

1110-- specified, defaults to EXACT. If set to WILDCARD_EXPRESSION, \'*\' is

2202-- specified, defaults to EXACT. If set to WILDCARD_EXPRESSION, \'*\' is

1111-- allowed as a placeholder for variable length character sequences, and it

2203-- allowed as a placeholder for variable length character sequences, and it

@@ -1124,6 +2216,21 @@ data DimensionValueMatchType

1124

2216

1125instance Hashable DimensionValueMatchType

2217instance Hashable DimensionValueMatchType

1126

2218

2219+instance FromText DimensionValueMatchType where

2220+ fromText = \case

2221+ "BEGINS_WITH" -> Just DVMTBeginsWith

2222+ "CONTAINS" -> Just DVMTContains

2223+ "EXACT" -> Just DVMTExact

2224+ "WILDCARD_EXPRESSION" -> Just DVMTWildcardExpression

2225+ _ -> Nothing

2226+

2227+instance ToText DimensionValueMatchType where

2228+ toText = \case

2229+ DVMTBeginsWith -> "BEGINS_WITH"

2230+ DVMTContains -> "CONTAINS"

2231+ DVMTExact -> "EXACT"

2232+ DVMTWildcardExpression -> "WILDCARD_EXPRESSION"

2233+

1127-- | Visibility of this directory site contact assignment. When set to PUBLIC

2234-- | Visibility of this directory site contact assignment. When set to PUBLIC

1128-- this contact assignment is visible to all account and agency users; when

2235-- this contact assignment is visible to all account and agency users; when

1129-- set to PRIVATE it is visible only to the site.

2236-- set to PRIVATE it is visible only to the site.

@@ -1136,6 +2243,17 @@ data DirectorySiteContactAssignmentVisibility

1136

2243

1137instance Hashable DirectorySiteContactAssignmentVisibility

2244instance Hashable DirectorySiteContactAssignmentVisibility

1138

2245

2246+instance FromText DirectorySiteContactAssignmentVisibility where

2247+ fromText = \case

2248+ "PRIVATE" -> Just DSCAVPrivate

2249+ "PUBLIC" -> Just DSCAVPublic

2250+ _ -> Nothing

2251+

2252+instance ToText DirectorySiteContactAssignmentVisibility where

2253+ toText = \case

2254+ DSCAVPrivate -> "PRIVATE"

2255+ DSCAVPublic -> "PUBLIC"

2256+

1139-- | Directory site contact role.

2257-- | Directory site contact role.

1140data DirectorySiteContactRole

2258data DirectorySiteContactRole

1141 = DSCRAdmin

2259 = DSCRAdmin

@@ -1148,6 +2266,19 @@ data DirectorySiteContactRole

1148

2266

1149instance Hashable DirectorySiteContactRole

2267instance Hashable DirectorySiteContactRole

1150

2268

2269+instance FromText DirectorySiteContactRole where

2270+ fromText = \case

2271+ "ADMIN" -> Just DSCRAdmin

2272+ "EDIT" -> Just DSCREdit

2273+ "VIEW" -> Just DSCRView

2274+ _ -> Nothing

2275+

2276+instance ToText DirectorySiteContactRole where

2277+ toText = \case

2278+ DSCRAdmin -> "ADMIN"

2279+ DSCREdit -> "EDIT"

2280+ DSCRView -> "VIEW"

2281+

1151-- | Directory site contact type.

2282-- | Directory site contact type.

1152data DirectorySiteContactType

2283data DirectorySiteContactType

1153 = DSCTBilling

2284 = DSCTBilling

@@ -1162,6 +2293,21 @@ data DirectorySiteContactType

1162

2293

1163instance Hashable DirectorySiteContactType

2294instance Hashable DirectorySiteContactType

1164

2295

2296+instance FromText DirectorySiteContactType where

2297+ fromText = \case

2298+ "BILLING" -> Just DSCTBilling

2299+ "OTHER" -> Just DSCTOther

2300+ "SALES" -> Just DSCTSales

2301+ "TECHNICAL" -> Just DSCTTechnical

2302+ _ -> Nothing

2303+

2304+instance ToText DirectorySiteContactType where

2305+ toText = \case

2306+ DSCTBilling -> "BILLING"

2307+ DSCTOther -> "OTHER"

2308+ DSCTSales -> "SALES"

2309+ DSCTTechnical -> "TECHNICAL"

2310+

1165data DirectorySiteItemInpageTagFormats

2311data DirectorySiteItemInpageTagFormats

1166 = DSIITFIframeJavascriptInpage

2312 = DSIITFIframeJavascriptInpage

1167 -- ^ @IFRAME_JAVASCRIPT_INPAGE@

2313 -- ^ @IFRAME_JAVASCRIPT_INPAGE@

@@ -1175,6 +2321,21 @@ data DirectorySiteItemInpageTagFormats

1175

2321

1176instance Hashable DirectorySiteItemInpageTagFormats

2322instance Hashable DirectorySiteItemInpageTagFormats

1177

2323

2324+instance FromText DirectorySiteItemInpageTagFormats where

2325+ fromText = \case

2326+ "IFRAME_JAVASCRIPT_INPAGE" -> Just DSIITFIframeJavascriptInpage

2327+ "INTERNAL_REDIRECT_INPAGE" -> Just DSIITFInternalRedirectInpage

2328+ "JAVASCRIPT_INPAGE" -> Just DSIITFJavascriptInpage

2329+ "STANDARD" -> Just DSIITFStandard

2330+ _ -> Nothing

2331+

2332+instance ToText DirectorySiteItemInpageTagFormats where

2333+ toText = \case

2334+ DSIITFIframeJavascriptInpage -> "IFRAME_JAVASCRIPT_INPAGE"

2335+ DSIITFInternalRedirectInpage -> "INTERNAL_REDIRECT_INPAGE"

2336+ DSIITFJavascriptInpage -> "JAVASCRIPT_INPAGE"

2337+ DSIITFStandard -> "STANDARD"

2338+

1178data DirectorySiteItemInterstitialTagFormats

2339data DirectorySiteItemInterstitialTagFormats

1179 = DSIITFIframeJavascriptInterstitial

2340 = DSIITFIframeJavascriptInterstitial

1180 -- ^ @IFRAME_JAVASCRIPT_INTERSTITIAL@

2341 -- ^ @IFRAME_JAVASCRIPT_INTERSTITIAL@

@@ -1186,6 +2347,19 @@ data DirectorySiteItemInterstitialTagFormats

1186

2347

1187instance Hashable DirectorySiteItemInterstitialTagFormats

2348instance Hashable DirectorySiteItemInterstitialTagFormats

1188

2349

2350+instance FromText DirectorySiteItemInterstitialTagFormats where

2351+ fromText = \case

2352+ "IFRAME_JAVASCRIPT_INTERSTITIAL" -> Just DSIITFIframeJavascriptInterstitial

2353+ "INTERNAL_REDIRECT_INTERSTITIAL" -> Just DSIITFInternalRedirectInterstitial

2354+ "JAVASCRIPT_INTERSTITIAL" -> Just DSIITFJavascriptInterstitial

2355+ _ -> Nothing

2356+

2357+instance ToText DirectorySiteItemInterstitialTagFormats where

2358+ toText = \case

2359+ DSIITFIframeJavascriptInterstitial -> "IFRAME_JAVASCRIPT_INTERSTITIAL"

2360+ DSIITFInternalRedirectInterstitial -> "INTERNAL_REDIRECT_INTERSTITIAL"

2361+ DSIITFJavascriptInterstitial -> "JAVASCRIPT_INTERSTITIAL"

2362+

1189-- | Site filter type for this event tag. If no type is specified then the

2363-- | Site filter type for this event tag. If no type is specified then the

1190-- event tag will be applied to all sites.

2364-- event tag will be applied to all sites.

1191data EventTagSiteFilterType

2365data EventTagSiteFilterType

@@ -1197,6 +2371,17 @@ data EventTagSiteFilterType

1197

2371

1198instance Hashable EventTagSiteFilterType

2372instance Hashable EventTagSiteFilterType

1199

2373

2374+instance FromText EventTagSiteFilterType where

2375+ fromText = \case

2376+ "BLACKLIST" -> Just ETSFTBlacklist

2377+ "WHITELIST" -> Just ETSFTWhitelist

2378+ _ -> Nothing

2379+

2380+instance ToText EventTagSiteFilterType where

2381+ toText = \case

2382+ ETSFTBlacklist -> "BLACKLIST"

2383+ ETSFTWhitelist -> "WHITELIST"

2384+

1200-- | Status of this event tag. Must be ENABLED for this event tag to fire.

2385-- | Status of this event tag. Must be ENABLED for this event tag to fire.

1201-- This is a required field.

2386-- This is a required field.

1202data EventTagStatus

2387data EventTagStatus

@@ -1208,6 +2393,17 @@ data EventTagStatus

1208

2393

1209instance Hashable EventTagStatus

2394instance Hashable EventTagStatus

1210

2395

2396+instance FromText EventTagStatus where

2397+ fromText = \case

2398+ "DISABLED" -> Just ETSDisabled

2399+ "ENABLED" -> Just ETSEnabled

2400+ _ -> Nothing

2401+

2402+instance ToText EventTagStatus where

2403+ toText = \case

2404+ ETSDisabled -> "DISABLED"

2405+ ETSEnabled -> "ENABLED"

2406+

1211-- | Event tag type. Can be used to specify whether to use a third-party

2407-- | Event tag type. Can be used to specify whether to use a third-party

1212-- pixel, a third-party JavaScript URL, or a third-party click-through URL

2408-- pixel, a third-party JavaScript URL, or a third-party click-through URL

1213-- for either impression or click tracking. This is a required field.

2409-- for either impression or click tracking. This is a required field.

@@ -1222,6 +2418,19 @@ data EventTagType

1222

2418

1223instance Hashable EventTagType

2419instance Hashable EventTagType

1224

2420

2421+instance FromText EventTagType where

2422+ fromText = \case

2423+ "CLICK_THROUGH_EVENT_TAG" -> Just ETTClickThroughEventTag

2424+ "IMPRESSION_IMAGE_EVENT_TAG" -> Just ETTImpressionImageEventTag

2425+ "IMPRESSION_JAVASCRIPT_EVENT_TAG" -> Just ETTImpressionJavascriptEventTag

2426+ _ -> Nothing

2427+

2428+instance ToText EventTagType where

2429+ toText = \case

2430+ ETTClickThroughEventTag -> "CLICK_THROUGH_EVENT_TAG"

2431+ ETTImpressionImageEventTag -> "IMPRESSION_IMAGE_EVENT_TAG"

2432+ ETTImpressionJavascriptEventTag -> "IMPRESSION_JAVASCRIPT_EVENT_TAG"

2433+

1225-- | The output format of the report. Only available once the file is

2434-- | The output format of the report. Only available once the file is

1226-- available.

2435-- available.

1227data FileFormat

2436data FileFormat

@@ -1233,6 +2442,17 @@ data FileFormat

1233

2442

1234instance Hashable FileFormat

2443instance Hashable FileFormat

1235

2444

2445+instance FromText FileFormat where

2446+ fromText = \case

2447+ "CSV" -> Just FFCSV

2448+ "EXCEL" -> Just FFExcel

2449+ _ -> Nothing

2450+

2451+instance ToText FileFormat where

2452+ toText = \case

2453+ FFCSV -> "CSV"

2454+ FFExcel -> "EXCEL"

2455+

1236-- | The status of the report file.

2456-- | The status of the report file.

1237data FileStatus

2457data FileStatus

1238 = FSCancelled

2458 = FSCancelled

@@ -1247,6 +2467,21 @@ data FileStatus

1247

2467

1248instance Hashable FileStatus

2468instance Hashable FileStatus

1249

2469

2470+instance FromText FileStatus where

2471+ fromText = \case

2472+ "CANCELLED" -> Just FSCancelled

2473+ "FAILED" -> Just FSFailed

2474+ "PROCESSING" -> Just FSProcessing

2475+ "REPORT_AVAILABLE" -> Just FSReportAvailable

2476+ _ -> Nothing

2477+

2478+instance ToText FileStatus where

2479+ toText = \case

2480+ FSCancelled -> "CANCELLED"

2481+ FSFailed -> "FAILED"

2482+ FSProcessing -> "PROCESSING"

2483+ FSReportAvailable -> "REPORT_AVAILABLE"

2484+

1250-- | Code type used for cache busting in the generated tag.

2485-- | Code type used for cache busting in the generated tag.

1251data FloodlightActivityCacheBustingType

2486data FloodlightActivityCacheBustingType

1252 = FACBTActiveServerPage

2487 = FACBTActiveServerPage

@@ -1263,6 +2498,23 @@ data FloodlightActivityCacheBustingType

1263

2498

1264instance Hashable FloodlightActivityCacheBustingType

2499instance Hashable FloodlightActivityCacheBustingType

1265

2500

2501+instance FromText FloodlightActivityCacheBustingType where

2502+ fromText = \case

2503+ "ACTIVE_SERVER_PAGE" -> Just FACBTActiveServerPage

2504+ "COLD_FUSION" -> Just FACBTColdFusion

2505+ "JAVASCRIPT" -> Just FACBTJavascript

2506+ "JSP" -> Just FACBTJsp

2507+ "PHP" -> Just FACBTPhp

2508+ _ -> Nothing

2509+

2510+instance ToText FloodlightActivityCacheBustingType where

2511+ toText = \case

2512+ FACBTActiveServerPage -> "ACTIVE_SERVER_PAGE"

2513+ FACBTColdFusion -> "COLD_FUSION"

2514+ FACBTJavascript -> "JAVASCRIPT"

2515+ FACBTJsp -> "JSP"

2516+ FACBTPhp -> "PHP"

2517+

1266-- | Counting method for conversions for this floodlight activity. This is a

2518-- | Counting method for conversions for this floodlight activity. This is a

1267-- required field.

2519-- required field.

1268data FloodlightActivityCountingMethod

2520data FloodlightActivityCountingMethod

@@ -1280,6 +2532,23 @@ data FloodlightActivityCountingMethod

1280

2532

1281instance Hashable FloodlightActivityCountingMethod

2533instance Hashable FloodlightActivityCountingMethod

1282

2534

2535+instance FromText FloodlightActivityCountingMethod where

2536+ fromText = \case

2537+ "ITEMS_SOLD_COUNTING" -> Just FACMItemsSoldCounting

2538+ "SESSION_COUNTING" -> Just FACMSessionCounting

2539+ "STANDARD_COUNTING" -> Just FACMStandardCounting

2540+ "TRANSACTIONS_COUNTING" -> Just FACMTransactionsCounting

2541+ "UNIQUE_COUNTING" -> Just FACMUniqueCounting

2542+ _ -> Nothing

2543+

2544+instance ToText FloodlightActivityCountingMethod where

2545+ toText = \case

2546+ FACMItemsSoldCounting -> "ITEMS_SOLD_COUNTING"

2547+ FACMSessionCounting -> "SESSION_COUNTING"

2548+ FACMStandardCounting -> "STANDARD_COUNTING"

2549+ FACMTransactionsCounting -> "TRANSACTIONS_COUNTING"

2550+ FACMUniqueCounting -> "UNIQUE_COUNTING"

2551+

1283-- | Type of the associated floodlight activity group. This is a read-only

2552-- | Type of the associated floodlight activity group. This is a read-only

1284-- field.

2553-- field.

1285data FloodlightActivityFloodlightActivityGroupType

2554data FloodlightActivityFloodlightActivityGroupType

@@ -1291,6 +2560,17 @@ data FloodlightActivityFloodlightActivityGroupType

1291

2560

1292instance Hashable FloodlightActivityFloodlightActivityGroupType

2561instance Hashable FloodlightActivityFloodlightActivityGroupType

1293

2562

2563+instance FromText FloodlightActivityFloodlightActivityGroupType where

2564+ fromText = \case

2565+ "COUNTER" -> Just FAFAGTCounter

2566+ "SALE" -> Just FAFAGTSale

2567+ _ -> Nothing

2568+

2569+instance ToText FloodlightActivityFloodlightActivityGroupType where

2570+ toText = \case

2571+ FAFAGTCounter -> "COUNTER"

2572+ FAFAGTSale -> "SALE"

2573+

1294-- | Type of the floodlight activity group. This is a required field that is

2574-- | Type of the floodlight activity group. This is a required field that is

1295-- read-only after insertion.

2575-- read-only after insertion.

1296data FloodlightActivityGroupType

2576data FloodlightActivityGroupType

@@ -1302,6 +2582,17 @@ data FloodlightActivityGroupType

1302

2582

1303instance Hashable FloodlightActivityGroupType

2583instance Hashable FloodlightActivityGroupType

1304

2584

2585+instance FromText FloodlightActivityGroupType where

2586+ fromText = \case

2587+ "COUNTER" -> Just FAGTCounter

2588+ "SALE" -> Just FAGTSale

2589+ _ -> Nothing

2590+

2591+instance ToText FloodlightActivityGroupType where

2592+ toText = \case

2593+ FAGTCounter -> "COUNTER"

2594+ FAGTSale -> "SALE"

2595+

1305data FloodlightActivityItemUserDefinedVariableTypes

2596data FloodlightActivityItemUserDefinedVariableTypes

1306 = FAIUDVTU1

2597 = FAIUDVTU1

1307 -- ^ @U1@

2598 -- ^ @U1@

@@ -1347,6 +2638,53 @@ data FloodlightActivityItemUserDefinedVariableTypes

1347

2638

1348instance Hashable FloodlightActivityItemUserDefinedVariableTypes

2639instance Hashable FloodlightActivityItemUserDefinedVariableTypes

1349

2640

2641+instance FromText FloodlightActivityItemUserDefinedVariableTypes where

2642+ fromText = \case

2643+ "U1" -> Just FAIUDVTU1

2644+ "U10" -> Just FAIUDVTU10

2645+ "U11" -> Just FAIUDVTU11

2646+ "U12" -> Just FAIUDVTU12

2647+ "U13" -> Just FAIUDVTU13

2648+ "U14" -> Just FAIUDVTU14

2649+ "U15" -> Just FAIUDVTU15

2650+ "U16" -> Just FAIUDVTU16

2651+ "U17" -> Just FAIUDVTU17

2652+ "U18" -> Just FAIUDVTU18

2653+ "U19" -> Just FAIUDVTU19

2654+ "U2" -> Just FAIUDVTU2

2655+ "U20" -> Just FAIUDVTU20

2656+ "U3" -> Just FAIUDVTU3

2657+ "U4" -> Just FAIUDVTU4

2658+ "U5" -> Just FAIUDVTU5

2659+ "U6" -> Just FAIUDVTU6

2660+ "U7" -> Just FAIUDVTU7

2661+ "U8" -> Just FAIUDVTU8

2662+ "U9" -> Just FAIUDVTU9

2663+ _ -> Nothing

2664+

2665+instance ToText FloodlightActivityItemUserDefinedVariableTypes where

2666+ toText = \case

2667+ FAIUDVTU1 -> "U1"

2668+ FAIUDVTU10 -> "U10"

2669+ FAIUDVTU11 -> "U11"

2670+ FAIUDVTU12 -> "U12"

2671+ FAIUDVTU13 -> "U13"

2672+ FAIUDVTU14 -> "U14"

2673+ FAIUDVTU15 -> "U15"

2674+ FAIUDVTU16 -> "U16"

2675+ FAIUDVTU17 -> "U17"

2676+ FAIUDVTU18 -> "U18"

2677+ FAIUDVTU19 -> "U19"

2678+ FAIUDVTU2 -> "U2"

2679+ FAIUDVTU20 -> "U20"

2680+ FAIUDVTU3 -> "U3"

2681+ FAIUDVTU4 -> "U4"

2682+ FAIUDVTU5 -> "U5"

2683+ FAIUDVTU6 -> "U6"

2684+ FAIUDVTU7 -> "U7"

2685+ FAIUDVTU8 -> "U8"

2686+ FAIUDVTU9 -> "U9"

2687+

1350-- | Tag format type for the floodlight activity. If left blank, the tag

2688-- | Tag format type for the floodlight activity. If left blank, the tag

1351-- format will default to HTML.

2689-- format will default to HTML.

1352data FloodlightActivityTagFormat

2690data FloodlightActivityTagFormat

@@ -1358,6 +2696,17 @@ data FloodlightActivityTagFormat

1358

2696

1359instance Hashable FloodlightActivityTagFormat

2697instance Hashable FloodlightActivityTagFormat

1360

2698

2699+instance FromText FloodlightActivityTagFormat where

2700+ fromText = \case

2701+ "HTML" -> Just FATFHTML

2702+ "XHTML" -> Just FATFXhtml

2703+ _ -> Nothing

2704+

2705+instance ToText FloodlightActivityTagFormat where

2706+ toText = \case

2707+ FATFHTML -> "HTML"

2708+ FATFXhtml -> "XHTML"

2709+

1361-- | Day that will be counted as the first day of the week in reports. This

2710-- | Day that will be counted as the first day of the week in reports. This

1362-- is a required field.

2711-- is a required field.

1363data FloodlightConfigurationFirstDayOfWeek

2712data FloodlightConfigurationFirstDayOfWeek

@@ -1369,6 +2718,17 @@ data FloodlightConfigurationFirstDayOfWeek

1369

2718

1370instance Hashable FloodlightConfigurationFirstDayOfWeek

2719instance Hashable FloodlightConfigurationFirstDayOfWeek

1371

2720

2721+instance FromText FloodlightConfigurationFirstDayOfWeek where

2722+ fromText = \case

2723+ "MONDAY" -> Just FCFDOWMonday

2724+ "SUNDAY" -> Just FCFDOWSunday

2725+ _ -> Nothing

2726+

2727+instance ToText FloodlightConfigurationFirstDayOfWeek where

2728+ toText = \case

2729+ FCFDOWMonday -> "MONDAY"

2730+ FCFDOWSunday -> "SUNDAY"

2731+

1372data FloodlightConfigurationItemStandardVariableTypes

2732data FloodlightConfigurationItemStandardVariableTypes

1373 = FCISVTNum

2733 = FCISVTNum

1374 -- ^ @NUM@

2734 -- ^ @NUM@

@@ -1382,6 +2742,21 @@ data FloodlightConfigurationItemStandardVariableTypes

1382

2742

1383instance Hashable FloodlightConfigurationItemStandardVariableTypes

2743instance Hashable FloodlightConfigurationItemStandardVariableTypes

1384

2744

2745+instance FromText FloodlightConfigurationItemStandardVariableTypes where

2746+ fromText = \case

2747+ "NUM" -> Just FCISVTNum

2748+ "ORD" -> Just FCISVTOrd

2749+ "TRAN" -> Just FCISVTTran

2750+ "U" -> Just FCISVTU

2751+ _ -> Nothing

2752+

2753+instance ToText FloodlightConfigurationItemStandardVariableTypes where

2754+ toText = \case

2755+ FCISVTNum -> "NUM"

2756+ FCISVTOrd -> "ORD"

2757+ FCISVTTran -> "TRAN"

2758+ FCISVTU -> "U"

2759+

1385-- | Types of attribution options for natural search conversions.

2760-- | Types of attribution options for natural search conversions.

1386data FloodlightConfigurationNaturalSearchConversionAttributionOption

2761data FloodlightConfigurationNaturalSearchConversionAttributionOption

1387 = FCNSCAOExcludeNATuralSearchConversionAttribution

2762 = FCNSCAOExcludeNATuralSearchConversionAttribution

@@ -1394,6 +2769,19 @@ data FloodlightConfigurationNaturalSearchConversionAttributionOption

1394

2769

1395instance Hashable FloodlightConfigurationNaturalSearchConversionAttributionOption

2770instance Hashable FloodlightConfigurationNaturalSearchConversionAttributionOption

1396

2771

2772+instance FromText FloodlightConfigurationNaturalSearchConversionAttributionOption where

2773+ fromText = \case

2774+ "EXCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION" -> Just FCNSCAOExcludeNATuralSearchConversionAttribution

2775+ "INCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION" -> Just FCNSCAOIncludeNATuralSearchConversionAttribution

2776+ "INCLUDE_NATURAL_SEARCH_TIERED_CONVERSION_ATTRIBUTION" -> Just FCNSCAOIncludeNATuralSearchTieredConversionAttribution

2777+ _ -> Nothing

2778+

2779+instance ToText FloodlightConfigurationNaturalSearchConversionAttributionOption where

2780+ toText = \case

2781+ FCNSCAOExcludeNATuralSearchConversionAttribution -> "EXCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION"

2782+ FCNSCAOIncludeNATuralSearchConversionAttribution -> "INCLUDE_NATURAL_SEARCH_CONVERSION_ATTRIBUTION"

2783+ FCNSCAOIncludeNATuralSearchTieredConversionAttribution -> "INCLUDE_NATURAL_SEARCH_TIERED_CONVERSION_ATTRIBUTION"

2784+

1397-- | Position in the browser where the window will open.

2785-- | Position in the browser where the window will open.

1398data FsCommandPositionOption

2786data FsCommandPositionOption

1399 = FCPOCentered

2787 = FCPOCentered

@@ -1404,6 +2792,17 @@ data FsCommandPositionOption

1404

2792

1405instance Hashable FsCommandPositionOption

2793instance Hashable FsCommandPositionOption

1406

2794

2795+instance FromText FsCommandPositionOption where

2796+ fromText = \case

2797+ "CENTERED" -> Just FCPOCentered

2798+ "DISTANCE_FROM_TOP_LEFT_CORNER" -> Just FCPODistanceFromTopLeftCorner

2799+ _ -> Nothing

2800+

2801+instance ToText FsCommandPositionOption where

2802+ toText = \case

2803+ FCPOCentered -> "CENTERED"

2804+ FCPODistanceFromTopLeftCorner -> "DISTANCE_FROM_TOP_LEFT_CORNER"

2805+

1407-- | Comparison operator of this term. This field is only relevant when type

2806-- | Comparison operator of this term. This field is only relevant when type

1408-- is left unset or set to CUSTOM_VARIABLE_TERM or REFERRER_TERM.

2807-- is left unset or set to CUSTOM_VARIABLE_TERM or REFERRER_TERM.

1409data ListPopulationTermOperator

2808data ListPopulationTermOperator

@@ -1425,6 +2824,27 @@ data ListPopulationTermOperator

1425

2824

1426instance Hashable ListPopulationTermOperator

2825instance Hashable ListPopulationTermOperator

1427

2826

2827+instance FromText ListPopulationTermOperator where

2828+ fromText = \case

2829+ "NUM_EQUALS" -> Just LPTONumEquals

2830+ "NUM_GREATER_THAN" -> Just LPTONumGreaterThan

2831+ "NUM_GREATER_THAN_EQUAL" -> Just LPTONumGreaterThanEqual

2832+ "NUM_LESS_THAN" -> Just LPTONumLessThan

2833+ "NUM_LESS_THAN_EQUAL" -> Just LPTONumLessThanEqual

2834+ "STRING_CONTAINS" -> Just LPTOStringContains

2835+ "STRING_EQUALS" -> Just LPTOStringEquals

2836+ _ -> Nothing

2837+

2838+instance ToText ListPopulationTermOperator where

2839+ toText = \case

2840+ LPTONumEquals -> "NUM_EQUALS"

2841+ LPTONumGreaterThan -> "NUM_GREATER_THAN"

2842+ LPTONumGreaterThanEqual -> "NUM_GREATER_THAN_EQUAL"

2843+ LPTONumLessThan -> "NUM_LESS_THAN"

2844+ LPTONumLessThanEqual -> "NUM_LESS_THAN_EQUAL"

2845+ LPTOStringContains -> "STRING_CONTAINS"

2846+ LPTOStringEquals -> "STRING_EQUALS"

2847+

1428-- | List population term type determines the applicable fields in this

2848-- | List population term type determines the applicable fields in this

1429-- object. If left unset or set to CUSTOM_VARIABLE_TERM, then variableName,

2849-- object. If left unset or set to CUSTOM_VARIABLE_TERM, then variableName,

1430-- variableFriendlyName, operator, value, and negation are applicable. If

2850-- variableFriendlyName, operator, value, and negation are applicable. If

@@ -1442,6 +2862,19 @@ data ListPopulationTermType

1442

2862

1443instance Hashable ListPopulationTermType

2863instance Hashable ListPopulationTermType

1444

2864

2865+instance FromText ListPopulationTermType where

2866+ fromText = \case

2867+ "CUSTOM_VARIABLE_TERM" -> Just LPTTCustomVariableTerm

2868+ "LIST_MEMBERSHIP_TERM" -> Just LPTTListMembershipTerm

2869+ "REFERRER_TERM" -> Just LPTTReferrerTerm

2870+ _ -> Nothing

2871+

2872+instance ToText ListPopulationTermType where

2873+ toText = \case

2874+ LPTTCustomVariableTerm -> "CUSTOM_VARIABLE_TERM"

2875+ LPTTListMembershipTerm -> "LIST_MEMBERSHIP_TERM"

2876+ LPTTReferrerTerm -> "REFERRER_TERM"

2877+

1445-- | Status of the filter. NONE means the user has access to none of the

2878-- | Status of the filter. NONE means the user has access to none of the

1446-- objects. ALL means the user has access to all objects. ASSIGNED means

2879-- objects. ALL means the user has access to all objects. ASSIGNED means

1447-- the user has access to the objects with IDs in the objectIds list.

2880-- the user has access to the objects with IDs in the objectIds list.

@@ -1456,6 +2889,19 @@ data ObjectFilterStatus

1456

2889

1457instance Hashable ObjectFilterStatus

2890instance Hashable ObjectFilterStatus

1458

2891

2892+instance FromText ObjectFilterStatus where

2893+ fromText = \case

2894+ "ALL" -> Just OFSAll

2895+ "ASSIGNED" -> Just OFSAssigned

2896+ "NONE" -> Just OFSNone

2897+ _ -> Nothing

2898+

2899+instance ToText ObjectFilterStatus where

2900+ toText = \case

2901+ OFSAll -> "ALL"

2902+ OFSAssigned -> "ASSIGNED"

2903+ OFSNone -> "NONE"

2904+

1459-- | Type of this contact.

2905-- | Type of this contact.

1460data OrderContactContactType

2906data OrderContactContactType

1461 = OCCTPlanningOrderContactBuyerBillingContact

2907 = OCCTPlanningOrderContactBuyerBillingContact

@@ -1468,6 +2914,19 @@ data OrderContactContactType

1468

2914

1469instance Hashable OrderContactContactType

2915instance Hashable OrderContactContactType

1470

2916

2917+instance FromText OrderContactContactType where

2918+ fromText = \case

2919+ "PLANNING_ORDER_CONTACT_BUYER_BILLING_CONTACT" -> Just OCCTPlanningOrderContactBuyerBillingContact

2920+ "PLANNING_ORDER_CONTACT_BUYER_CONTACT" -> Just OCCTPlanningOrderContactBuyerContact

2921+ "PLANNING_ORDER_CONTACT_SELLER_CONTACT" -> Just OCCTPlanningOrderContactSellerContact

2922+ _ -> Nothing

2923+

2924+instance ToText OrderContactContactType where

2925+ toText = \case

2926+ OCCTPlanningOrderContactBuyerBillingContact -> "PLANNING_ORDER_CONTACT_BUYER_BILLING_CONTACT"

2927+ OCCTPlanningOrderContactBuyerContact -> "PLANNING_ORDER_CONTACT_BUYER_CONTACT"

2928+ OCCTPlanningOrderContactSellerContact -> "PLANNING_ORDER_CONTACT_SELLER_CONTACT"

2929+

1471-- | Type of this order document

2930-- | Type of this order document

1472data OrderDocumentType

2931data OrderDocumentType

1473 = ODTPlanningOrderTypeChangeOrder

2932 = ODTPlanningOrderTypeChangeOrder

@@ -1478,6 +2937,17 @@ data OrderDocumentType

1478

2937

1479instance Hashable OrderDocumentType

2938instance Hashable OrderDocumentType

1480

2939

2940+instance FromText OrderDocumentType where

2941+ fromText = \case

2942+ "PLANNING_ORDER_TYPE_CHANGE_ORDER" -> Just ODTPlanningOrderTypeChangeOrder

2943+ "PLANNING_ORDER_TYPE_INSERTION_ORDER" -> Just ODTPlanningOrderTypeInsertionOrder

2944+ _ -> Nothing

2945+

2946+instance ToText OrderDocumentType where

2947+ toText = \case

2948+ ODTPlanningOrderTypeChangeOrder -> "PLANNING_ORDER_TYPE_CHANGE_ORDER"

2949+ ODTPlanningOrderTypeInsertionOrder -> "PLANNING_ORDER_TYPE_INSERTION_ORDER"

2950+

1481-- | Placement compatibility. WEB and WEB_INTERSTITIAL refer to rendering

2951-- | Placement compatibility. WEB and WEB_INTERSTITIAL refer to rendering

1482-- either on desktop or on mobile devices for regular or interstitial ads,

2952-- either on desktop or on mobile devices for regular or interstitial ads,

1483-- respectively. APP and APP_INTERSTITIAL are for rendering in mobile

2953-- respectively. APP and APP_INTERSTITIAL are for rendering in mobile

@@ -1498,6 +2968,23 @@ data PlacementCompatibility

1498

2968

1499instance Hashable PlacementCompatibility

2969instance Hashable PlacementCompatibility

1500

2970

2971+instance FromText PlacementCompatibility where

2972+ fromText = \case

2973+ "APP" -> Just PCApp

2974+ "APP_INTERSTITIAL" -> Just PCAppInterstitial

2975+ "IN_STREAM_VIDEO" -> Just PCInStreamVideo

2976+ "WEB" -> Just PCWeb

2977+ "WEB_INTERSTITIAL" -> Just PCWebInterstitial

2978+ _ -> Nothing

2979+

2980+instance ToText PlacementCompatibility where

2981+ toText = \case

2982+ PCApp -> "APP"

2983+ PCAppInterstitial -> "APP_INTERSTITIAL"

2984+ PCInStreamVideo -> "IN_STREAM_VIDEO"

2985+ PCWeb -> "WEB"

2986+ PCWebInterstitial -> "WEB_INTERSTITIAL"

2987+

1501-- | Type of this placement group. A package is a simple group of placements

2988-- | Type of this placement group. A package is a simple group of placements

1502-- that acts as a single pricing point for a group of tags. A roadblock is

2989-- that acts as a single pricing point for a group of tags. A roadblock is

1503-- a group of placements that not only acts as a single pricing point, but

2990-- a group of placements that not only acts as a single pricing point, but

@@ -1513,6 +3000,17 @@ data PlacementGroupPlacementGroupType

1513

3000

1514instance Hashable PlacementGroupPlacementGroupType

3001instance Hashable PlacementGroupPlacementGroupType

1515

3002

3003+instance FromText PlacementGroupPlacementGroupType where

3004+ fromText = \case

3005+ "PLACEMENT_PACKAGE" -> Just PGPGTPlacementPackage

3006+ "PLACEMENT_ROADBLOCK" -> Just PGPGTPlacementRoadblock

3007+ _ -> Nothing

3008+

3009+instance ToText PlacementGroupPlacementGroupType where

3010+ toText = \case

3011+ PGPGTPlacementPackage -> "PLACEMENT_PACKAGE"

3012+ PGPGTPlacementRoadblock -> "PLACEMENT_ROADBLOCK"

3013+

1516data PlacementItemTagFormats

3014data PlacementItemTagFormats

1517 = PITFPlacementTagClickCommands

3015 = PITFPlacementTagClickCommands

1518 -- ^ @PLACEMENT_TAG_CLICK_COMMANDS@

3016 -- ^ @PLACEMENT_TAG_CLICK_COMMANDS@

@@ -1554,6 +3052,49 @@ data PlacementItemTagFormats

1554

3052

1555instance Hashable PlacementItemTagFormats

3053instance Hashable PlacementItemTagFormats

1556

3054

3055+instance FromText PlacementItemTagFormats where

3056+ fromText = \case

3057+ "PLACEMENT_TAG_CLICK_COMMANDS" -> Just PITFPlacementTagClickCommands

3058+ "PLACEMENT_TAG_IFRAME_ILAYER" -> Just PITFPlacementTagIframeIlayer

3059+ "PLACEMENT_TAG_IFRAME_JAVASCRIPT" -> Just PITFPlacementTagIframeJavascript

3060+ "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY" -> Just PITFPlacementTagIframeJavascriptLegacy

3061+ "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH" -> Just PITFPlacementTagInstreamVideoPrefetch

3062+ "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3" -> Just PITFPlacementTagInstreamVideoPrefetchVast3

3063+ "PLACEMENT_TAG_INTERNAL_REDIRECT" -> Just PITFPlacementTagInternalRedirect

3064+ "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT" -> Just PITFPlacementTagInterstitialIframeJavascript

3065+ "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY" -> Just PITFPlacementTagInterstitialIframeJavascriptLegacy

3066+ "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT" -> Just PITFPlacementTagInterstitialInternalRedirect

3067+ "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT" -> Just PITFPlacementTagInterstitialJavascript

3068+ "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY" -> Just PITFPlacementTagInterstitialJavascriptLegacy

3069+ "PLACEMENT_TAG_JAVASCRIPT" -> Just PITFPlacementTagJavascript

3070+ "PLACEMENT_TAG_JAVASCRIPT_LEGACY" -> Just PITFPlacementTagJavascriptLegacy

3071+ "PLACEMENT_TAG_STANDARD" -> Just PITFPlacementTagStandard

3072+ "PLACEMENT_TAG_TRACKING" -> Just PITFPlacementTagTracking

3073+ "PLACEMENT_TAG_TRACKING_IFRAME" -> Just PITFPlacementTagTrackingIframe

3074+ "PLACEMENT_TAG_TRACKING_JAVASCRIPT" -> Just PITFPlacementTagTrackingJavascript

3075+ _ -> Nothing

3076+

3077+instance ToText PlacementItemTagFormats where

3078+ toText = \case

3079+ PITFPlacementTagClickCommands -> "PLACEMENT_TAG_CLICK_COMMANDS"

3080+ PITFPlacementTagIframeIlayer -> "PLACEMENT_TAG_IFRAME_ILAYER"

3081+ PITFPlacementTagIframeJavascript -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT"

3082+ PITFPlacementTagIframeJavascriptLegacy -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY"

3083+ PITFPlacementTagInstreamVideoPrefetch -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH"

3084+ PITFPlacementTagInstreamVideoPrefetchVast3 -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3"

3085+ PITFPlacementTagInternalRedirect -> "PLACEMENT_TAG_INTERNAL_REDIRECT"

3086+ PITFPlacementTagInterstitialIframeJavascript -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT"

3087+ PITFPlacementTagInterstitialIframeJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY"

3088+ PITFPlacementTagInterstitialInternalRedirect -> "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT"

3089+ PITFPlacementTagInterstitialJavascript -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT"

3090+ PITFPlacementTagInterstitialJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY"

3091+ PITFPlacementTagJavascript -> "PLACEMENT_TAG_JAVASCRIPT"

3092+ PITFPlacementTagJavascriptLegacy -> "PLACEMENT_TAG_JAVASCRIPT_LEGACY"

3093+ PITFPlacementTagStandard -> "PLACEMENT_TAG_STANDARD"

3094+ PITFPlacementTagTracking -> "PLACEMENT_TAG_TRACKING"

3095+ PITFPlacementTagTrackingIframe -> "PLACEMENT_TAG_TRACKING_IFRAME"

3096+ PITFPlacementTagTrackingJavascript -> "PLACEMENT_TAG_TRACKING_JAVASCRIPT"

3097+

1557-- | Payment source for this placement. This is a required field that is

3098-- | Payment source for this placement. This is a required field that is

1558-- read-only after insertion.

3099-- read-only after insertion.

1559data PlacementPaymentSource

3100data PlacementPaymentSource

@@ -1565,6 +3106,17 @@ data PlacementPaymentSource

1565

3106

1566instance Hashable PlacementPaymentSource

3107instance Hashable PlacementPaymentSource

1567

3108

3109+instance FromText PlacementPaymentSource where

3110+ fromText = \case

3111+ "PLACEMENT_AGENCY_PAID" -> Just PPSPlacementAgencyPaid

3112+ "PLACEMENT_PUBLISHER_PAID" -> Just PPSPlacementPublisherPaid

3113+ _ -> Nothing

3114+

3115+instance ToText PlacementPaymentSource where

3116+ toText = \case

3117+ PPSPlacementAgencyPaid -> "PLACEMENT_AGENCY_PAID"

3118+ PPSPlacementPublisherPaid -> "PLACEMENT_PUBLISHER_PAID"

3119+

1568-- | Third-party placement status.

3120-- | Third-party placement status.

1569data PlacementStatus

3121data PlacementStatus

1570 = PSAcknowledgeAcceptance

3122 = PSAcknowledgeAcceptance

@@ -1583,6 +3135,25 @@ data PlacementStatus

1583

3135

1584instance Hashable PlacementStatus

3136instance Hashable PlacementStatus

1585

3137

3138+instance FromText PlacementStatus where

3139+ fromText = \case

3140+ "ACKNOWLEDGE_ACCEPTANCE" -> Just PSAcknowledgeAcceptance

3141+ "ACKNOWLEDGE_REJECTION" -> Just PSAcknowledgeRejection

3142+ "DRAFT" -> Just PSDraft

3143+ "PAYMENT_ACCEPTED" -> Just PSPaymentAccepted

3144+ "PAYMENT_REJECTED" -> Just PSPaymentRejected

3145+ "PENDING_REVIEW" -> Just PSPendingReview

3146+ _ -> Nothing

3147+

3148+instance ToText PlacementStatus where

3149+ toText = \case

3150+ PSAcknowledgeAcceptance -> "ACKNOWLEDGE_ACCEPTANCE"

3151+ PSAcknowledgeRejection -> "ACKNOWLEDGE_REJECTION"

3152+ PSDraft -> "DRAFT"

3153+ PSPaymentAccepted -> "PAYMENT_ACCEPTED"

3154+ PSPaymentRejected -> "PAYMENT_REJECTED"

3155+ PSPendingReview -> "PENDING_REVIEW"

3156+

1586-- | Popup window position either centered or at specific coordinate.

3157-- | Popup window position either centered or at specific coordinate.

1587data PopupWindowPropertiesPositionType

3158data PopupWindowPropertiesPositionType

1588 = PWPPTCenter

3159 = PWPPTCenter

@@ -1593,6 +3164,17 @@ data PopupWindowPropertiesPositionType

1593

3164

1594instance Hashable PopupWindowPropertiesPositionType

3165instance Hashable PopupWindowPropertiesPositionType

1595

3166

3167+instance FromText PopupWindowPropertiesPositionType where

3168+ fromText = \case

3169+ "CENTER" -> Just PWPPTCenter

3170+ "COORDINATES" -> Just PWPPTCoordinates

3171+ _ -> Nothing

3172+

3173+instance ToText PopupWindowPropertiesPositionType where

3174+ toText = \case

3175+ PWPPTCenter -> "CENTER"

3176+ PWPPTCoordinates -> "COORDINATES"

3177+

1596-- | Cap cost type of this inventory item.

3178-- | Cap cost type of this inventory item.

1597data PricingCapCostType

3179data PricingCapCostType

1598 = PCCTPlanningPlacementCapCostTypeCumulative

3180 = PCCTPlanningPlacementCapCostTypeCumulative

@@ -1605,6 +3187,19 @@ data PricingCapCostType

1605

3187

1606instance Hashable PricingCapCostType

3188instance Hashable PricingCapCostType

1607

3189

3190+instance FromText PricingCapCostType where

3191+ fromText = \case

3192+ "PLANNING_PLACEMENT_CAP_COST_TYPE_CUMULATIVE" -> Just PCCTPlanningPlacementCapCostTypeCumulative

3193+ "PLANNING_PLACEMENT_CAP_COST_TYPE_MONTHLY" -> Just PCCTPlanningPlacementCapCostTypeMonthly

3194+ "PLANNING_PLACEMENT_CAP_COST_TYPE_NONE" -> Just PCCTPlanningPlacementCapCostTypeNone

3195+ _ -> Nothing

3196+

3197+instance ToText PricingCapCostType where

3198+ toText = \case

3199+ PCCTPlanningPlacementCapCostTypeCumulative -> "PLANNING_PLACEMENT_CAP_COST_TYPE_CUMULATIVE"

3200+ PCCTPlanningPlacementCapCostTypeMonthly -> "PLANNING_PLACEMENT_CAP_COST_TYPE_MONTHLY"

3201+ PCCTPlanningPlacementCapCostTypeNone -> "PLANNING_PLACEMENT_CAP_COST_TYPE_NONE"

3202+

1608-- | Group type of this inventory item if it represents a placement group. Is

3203-- | Group type of this inventory item if it represents a placement group. Is

1609-- null otherwise. There are two type of placement groups:

3204-- null otherwise. There are two type of placement groups:

1610-- PLANNING_PLACEMENT_GROUP_TYPE_PACKAGE is a simple group of inventory

3205-- PLANNING_PLACEMENT_GROUP_TYPE_PACKAGE is a simple group of inventory

@@ -1622,6 +3217,17 @@ data PricingGroupType

1622

3217

1623instance Hashable PricingGroupType

3218instance Hashable PricingGroupType

1624

3219

3220+instance FromText PricingGroupType where

3221+ fromText = \case

3222+ "PLANNING_PLACEMENT_GROUP_TYPE_PACKAGE" -> Just PGTPlanningPlacementGroupTypePackage

3223+ "PLANNING_PLACEMENT_GROUP_TYPE_ROADBLOCK" -> Just PGTPlanningPlacementGroupTypeRoadblock

3224+ _ -> Nothing

3225+

3226+instance ToText PricingGroupType where

3227+ toText = \case

3228+ PGTPlanningPlacementGroupTypePackage -> "PLANNING_PLACEMENT_GROUP_TYPE_PACKAGE"

3229+ PGTPlanningPlacementGroupTypeRoadblock -> "PLANNING_PLACEMENT_GROUP_TYPE_ROADBLOCK"

3230+

1625-- | Pricing type of this inventory item.

3231-- | Pricing type of this inventory item.

1626data PricingPricingType

3232data PricingPricingType

1627 = PPTPlanningPlacementPricingTypeClicks

3233 = PPTPlanningPlacementPricingTypeClicks

@@ -1642,6 +3248,27 @@ data PricingPricingType

1642

3248

1643instance Hashable PricingPricingType

3249instance Hashable PricingPricingType

1644

3250

3251+instance FromText PricingPricingType where

3252+ fromText = \case

3253+ "PLANNING_PLACEMENT_PRICING_TYPE_CLICKS" -> Just PPTPlanningPlacementPricingTypeClicks

3254+ "PLANNING_PLACEMENT_PRICING_TYPE_CPA" -> Just PPTPlanningPlacementPricingTypeCpa

3255+ "PLANNING_PLACEMENT_PRICING_TYPE_CPC" -> Just PPTPlanningPlacementPricingTypeCpc

3256+ "PLANNING_PLACEMENT_PRICING_TYPE_CPM" -> Just PPTPlanningPlacementPricingTypeCpm

3257+ "PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_CLICKS" -> Just PPTPlanningPlacementPricingTypeFlatRateClicks

3258+ "PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_IMPRESSIONS" -> Just PPTPlanningPlacementPricingTypeFlatRateImpressions

3259+ "PLANNING_PLACEMENT_PRICING_TYPE_IMPRESSIONS" -> Just PPTPlanningPlacementPricingTypeImpressions

3260+ _ -> Nothing

3261+

3262+instance ToText PricingPricingType where

3263+ toText = \case

3264+ PPTPlanningPlacementPricingTypeClicks -> "PLANNING_PLACEMENT_PRICING_TYPE_CLICKS"

3265+ PPTPlanningPlacementPricingTypeCpa -> "PLANNING_PLACEMENT_PRICING_TYPE_CPA"

3266+ PPTPlanningPlacementPricingTypeCpc -> "PLANNING_PLACEMENT_PRICING_TYPE_CPC"

3267+ PPTPlanningPlacementPricingTypeCpm -> "PLANNING_PLACEMENT_PRICING_TYPE_CPM"

3268+ PPTPlanningPlacementPricingTypeFlatRateClicks -> "PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_CLICKS"

3269+ PPTPlanningPlacementPricingTypeFlatRateImpressions -> "PLANNING_PLACEMENT_PRICING_TYPE_FLAT_RATE_IMPRESSIONS"

3270+ PPTPlanningPlacementPricingTypeImpressions -> "PLANNING_PLACEMENT_PRICING_TYPE_IMPRESSIONS"

3271+

1645-- | Placement cap cost option.

3272-- | Placement cap cost option.

1646data PricingScheduleCapCostOption

3273data PricingScheduleCapCostOption

1647 = PSCCOCapCostCumulative

3274 = PSCCOCapCostCumulative

@@ -1654,6 +3281,19 @@ data PricingScheduleCapCostOption

1654

3281

1655instance Hashable PricingScheduleCapCostOption

3282instance Hashable PricingScheduleCapCostOption

1656

3283

3284+instance FromText PricingScheduleCapCostOption where

3285+ fromText = \case

3286+ "CAP_COST_CUMULATIVE" -> Just PSCCOCapCostCumulative

3287+ "CAP_COST_MONTHLY" -> Just PSCCOCapCostMonthly

3288+ "CAP_COST_NONE" -> Just PSCCOCapCostNone

3289+ _ -> Nothing

3290+

3291+instance ToText PricingScheduleCapCostOption where

3292+ toText = \case

3293+ PSCCOCapCostCumulative -> "CAP_COST_CUMULATIVE"

3294+ PSCCOCapCostMonthly -> "CAP_COST_MONTHLY"

3295+ PSCCOCapCostNone -> "CAP_COST_NONE"

3296+

1657-- | Placement pricing type. This field is required on insertion.

3297-- | Placement pricing type. This field is required on insertion.

1658data PricingSchedulePricingType

3298data PricingSchedulePricingType

1659 = PSPTPricingTypeCpa

3299 = PSPTPricingTypeCpa

@@ -1670,6 +3310,23 @@ data PricingSchedulePricingType

1670

3310

1671instance Hashable PricingSchedulePricingType

3311instance Hashable PricingSchedulePricingType

1672

3312

3313+instance FromText PricingSchedulePricingType where

3314+ fromText = \case

3315+ "PRICING_TYPE_CPA" -> Just PSPTPricingTypeCpa

3316+ "PRICING_TYPE_CPC" -> Just PSPTPricingTypeCpc

3317+ "PRICING_TYPE_CPM" -> Just PSPTPricingTypeCpm

3318+ "PRICING_TYPE_FLAT_RATE_CLICKS" -> Just PSPTPricingTypeFlatRateClicks

3319+ "PRICING_TYPE_FLAT_RATE_IMPRESSIONS" -> Just PSPTPricingTypeFlatRateImpressions

3320+ _ -> Nothing

3321+

3322+instance ToText PricingSchedulePricingType where

3323+ toText = \case

3324+ PSPTPricingTypeCpa -> "PRICING_TYPE_CPA"

3325+ PSPTPricingTypeCpc -> "PRICING_TYPE_CPC"

3326+ PSPTPricingTypeCpm -> "PRICING_TYPE_CPM"

3327+ PSPTPricingTypeFlatRateClicks -> "PRICING_TYPE_FLAT_RATE_CLICKS"

3328+ PSPTPricingTypeFlatRateImpressions -> "PRICING_TYPE_FLAT_RATE_IMPRESSIONS"

3329+

1673-- | Audience age group of this project.

3330-- | Audience age group of this project.

1674data ProjectAudienceAgeGroup

3331data ProjectAudienceAgeGroup

1675 = PAAGPlanningAudienceAge1824

3332 = PAAGPlanningAudienceAge1824

@@ -1690,6 +3347,27 @@ data ProjectAudienceAgeGroup

1690

3347

1691instance Hashable ProjectAudienceAgeGroup

3348instance Hashable ProjectAudienceAgeGroup

1692

3349

3350+instance FromText ProjectAudienceAgeGroup where

3351+ fromText = \case

3352+ "PLANNING_AUDIENCE_AGE_18_24" -> Just PAAGPlanningAudienceAge1824

3353+ "PLANNING_AUDIENCE_AGE_25_34" -> Just PAAGPlanningAudienceAge2534

3354+ "PLANNING_AUDIENCE_AGE_35_44" -> Just PAAGPlanningAudienceAge3544

3355+ "PLANNING_AUDIENCE_AGE_45_54" -> Just PAAGPlanningAudienceAge4554

3356+ "PLANNING_AUDIENCE_AGE_55_64" -> Just PAAGPlanningAudienceAge5564

3357+ "PLANNING_AUDIENCE_AGE_65_OR_MORE" -> Just PAAGPlanningAudienceAge65OrMore

3358+ "PLANNING_AUDIENCE_AGE_UNKNOWN" -> Just PAAGPlanningAudienceAgeUnknown

3359+ _ -> Nothing

3360+

3361+instance ToText ProjectAudienceAgeGroup where

3362+ toText = \case

3363+ PAAGPlanningAudienceAge1824 -> "PLANNING_AUDIENCE_AGE_18_24"

3364+ PAAGPlanningAudienceAge2534 -> "PLANNING_AUDIENCE_AGE_25_34"

3365+ PAAGPlanningAudienceAge3544 -> "PLANNING_AUDIENCE_AGE_35_44"

3366+ PAAGPlanningAudienceAge4554 -> "PLANNING_AUDIENCE_AGE_45_54"

3367+ PAAGPlanningAudienceAge5564 -> "PLANNING_AUDIENCE_AGE_55_64"

3368+ PAAGPlanningAudienceAge65OrMore -> "PLANNING_AUDIENCE_AGE_65_OR_MORE"

3369+ PAAGPlanningAudienceAgeUnknown -> "PLANNING_AUDIENCE_AGE_UNKNOWN"

3370+

1693-- | Audience gender of this project.

3371-- | Audience gender of this project.

1694data ProjectAudienceGender

3372data ProjectAudienceGender

1695 = PAGPlanningAudienceGenderFemale

3373 = PAGPlanningAudienceGenderFemale

@@ -1700,6 +3378,17 @@ data ProjectAudienceGender

1700

3378

1701instance Hashable ProjectAudienceGender

3379instance Hashable ProjectAudienceGender

1702

3380

3381+instance FromText ProjectAudienceGender where

3382+ fromText = \case

3383+ "PLANNING_AUDIENCE_GENDER_FEMALE" -> Just PAGPlanningAudienceGenderFemale

3384+ "PLANNING_AUDIENCE_GENDER_MALE" -> Just PAGPlanningAudienceGenderMale

3385+ _ -> Nothing

3386+

3387+instance ToText ProjectAudienceGender where

3388+ toText = \case

3389+ PAGPlanningAudienceGenderFemale -> "PLANNING_AUDIENCE_GENDER_FEMALE"

3390+ PAGPlanningAudienceGenderMale -> "PLANNING_AUDIENCE_GENDER_MALE"

3391+

1703-- | The delivery type for the recipient.

3392-- | The delivery type for the recipient.

1704data RecipientDeliveryType

3393data RecipientDeliveryType

1705 = RDTAttachment

3394 = RDTAttachment

@@ -1710,6 +3399,17 @@ data RecipientDeliveryType

1710

3399

1711instance Hashable RecipientDeliveryType

3400instance Hashable RecipientDeliveryType

1712

3401

3402+instance FromText RecipientDeliveryType where

3403+ fromText = \case

3404+ "ATTACHMENT" -> Just RDTAttachment

3405+ "LINK" -> Just RDTLink

3406+ _ -> Nothing

3407+

3408+instance ToText RecipientDeliveryType where

3409+ toText = \case

3410+ RDTAttachment -> "ATTACHMENT"

3411+ RDTLink -> "LINK"

3412+

1713-- | Product from which this remarketing list was originated.

3413-- | Product from which this remarketing list was originated.

1714data RemarketingListListSource

3414data RemarketingListListSource

1715 = RLLSRemarketingListSourceDBm

3415 = RLLSRemarketingListSourceDBm

@@ -1726,6 +3426,23 @@ data RemarketingListListSource

1726

3426

1727instance Hashable RemarketingListListSource

3427instance Hashable RemarketingListListSource

1728

3428

3429+instance FromText RemarketingListListSource where

3430+ fromText = \case

3431+ "REMARKETING_LIST_SOURCE_DBM" -> Just RLLSRemarketingListSourceDBm

3432+ "REMARKETING_LIST_SOURCE_DFA" -> Just RLLSRemarketingListSourceDfa

3433+ "REMARKETING_LIST_SOURCE_DMP" -> Just RLLSRemarketingListSourceDmp

3434+ "REMARKETING_LIST_SOURCE_GA" -> Just RLLSRemarketingListSourceGa

3435+ "REMARKETING_LIST_SOURCE_OTHER" -> Just RLLSRemarketingListSourceOther

3436+ _ -> Nothing

3437+

3438+instance ToText RemarketingListListSource where

3439+ toText = \case

3440+ RLLSRemarketingListSourceDBm -> "REMARKETING_LIST_SOURCE_DBM"

3441+ RLLSRemarketingListSourceDfa -> "REMARKETING_LIST_SOURCE_DFA"

3442+ RLLSRemarketingListSourceDmp -> "REMARKETING_LIST_SOURCE_DMP"

3443+ RLLSRemarketingListSourceGa -> "REMARKETING_LIST_SOURCE_GA"

3444+ RLLSRemarketingListSourceOther -> "REMARKETING_LIST_SOURCE_OTHER"

3445+

1729-- | The dimension option.

3446-- | The dimension option.

1730data ReportDimensionCrossDimensionReachCriteria

3447data ReportDimensionCrossDimensionReachCriteria

1731 = RDCDRCAdvertiser

3448 = RDCDRCAdvertiser

@@ -1740,6 +3457,21 @@ data ReportDimensionCrossDimensionReachCriteria

1740

3457

1741instance Hashable ReportDimensionCrossDimensionReachCriteria

3458instance Hashable ReportDimensionCrossDimensionReachCriteria

1742

3459

3460+instance FromText ReportDimensionCrossDimensionReachCriteria where

3461+ fromText = \case

3462+ "ADVERTISER" -> Just RDCDRCAdvertiser

3463+ "CAMPAIGN" -> Just RDCDRCCampaign

3464+ "SITE_BY_ADVERTISER" -> Just RDCDRCSiteByAdvertiser

3465+ "SITE_BY_CAMPAIGN" -> Just RDCDRCSiteByCampaign

3466+ _ -> Nothing

3467+

3468+instance ToText ReportDimensionCrossDimensionReachCriteria where

3469+ toText = \case

3470+ RDCDRCAdvertiser -> "ADVERTISER"

3471+ RDCDRCCampaign -> "CAMPAIGN"

3472+ RDCDRCSiteByAdvertiser -> "SITE_BY_ADVERTISER"

3473+ RDCDRCSiteByCampaign -> "SITE_BY_CAMPAIGN"

3474+

1743-- | The type of delivery for the owner to receive, if enabled.

3475-- | The type of delivery for the owner to receive, if enabled.

1744data ReportEmailOwnerDeliveryTypeDelivery

3476data ReportEmailOwnerDeliveryTypeDelivery

1745 = REODTDAttachment

3477 = REODTDAttachment

@@ -1750,6 +3482,17 @@ data ReportEmailOwnerDeliveryTypeDelivery

1750

3482

1751instance Hashable ReportEmailOwnerDeliveryTypeDelivery

3483instance Hashable ReportEmailOwnerDeliveryTypeDelivery

1752

3484

3485+instance FromText ReportEmailOwnerDeliveryTypeDelivery where

3486+ fromText = \case

3487+ "ATTACHMENT" -> Just REODTDAttachment

3488+ "LINK" -> Just REODTDLink

3489+ _ -> Nothing

3490+

3491+instance ToText ReportEmailOwnerDeliveryTypeDelivery where

3492+ toText = \case

3493+ REODTDAttachment -> "ATTACHMENT"

3494+ REODTDLink -> "LINK"

3495+

1753-- | The output format of the report. If not specified, default format is

3496-- | The output format of the report. If not specified, default format is

1754-- \"CSV\". Note that the actual format in the completed report file might

3497-- \"CSV\". Note that the actual format in the completed report file might

1755-- differ if for instance the report\'s size exceeds the format\'s

3498-- differ if for instance the report\'s size exceeds the format\'s

@@ -1763,6 +3506,17 @@ data ReportFormat

1763

3506

1764instance Hashable ReportFormat

3507instance Hashable ReportFormat

1765

3508

3509+instance FromText ReportFormat where

3510+ fromText = \case

3511+ "CSV" -> Just RFCSV

3512+ "EXCEL" -> Just RFExcel

3513+ _ -> Nothing

3514+

3515+instance ToText ReportFormat where

3516+ toText = \case

3517+ RFCSV -> "CSV"

3518+ RFExcel -> "EXCEL"

3519+

1766data ReportItemRepeatsOnWeekDaysSchedule

3520data ReportItemRepeatsOnWeekDaysSchedule

1767 = RIROWDSFriday

3521 = RIROWDSFriday

1768 -- ^ @FRIDAY@

3522 -- ^ @FRIDAY@

@@ -1782,6 +3536,27 @@ data ReportItemRepeatsOnWeekDaysSchedule

1782

3536

1783instance Hashable ReportItemRepeatsOnWeekDaysSchedule

3537instance Hashable ReportItemRepeatsOnWeekDaysSchedule

1784

3538

3539+instance FromText ReportItemRepeatsOnWeekDaysSchedule where

3540+ fromText = \case

3541+ "FRIDAY" -> Just RIROWDSFriday

3542+ "MONDAY" -> Just RIROWDSMonday

3543+ "SATURDAY" -> Just RIROWDSSaturday

3544+ "SUNDAY" -> Just RIROWDSSunday

3545+ "THURSDAY" -> Just RIROWDSThursday

3546+ "TUESDAY" -> Just RIROWDSTuesday

3547+ "WEDNESDAY" -> Just RIROWDSWednesday

3548+ _ -> Nothing

3549+

3550+instance ToText ReportItemRepeatsOnWeekDaysSchedule where

3551+ toText = \case

3552+ RIROWDSFriday -> "FRIDAY"

3553+ RIROWDSMonday -> "MONDAY"

3554+ RIROWDSSaturday -> "SATURDAY"

3555+ RIROWDSSunday -> "SUNDAY"

3556+ RIROWDSThursday -> "THURSDAY"

3557+ RIROWDSTuesday -> "TUESDAY"

3558+ RIROWDSWednesday -> "WEDNESDAY"

3559+

1785-- | Enum to define for \"MONTHLY\" scheduled reports whether reports should

3560-- | Enum to define for \"MONTHLY\" scheduled reports whether reports should

1786-- be repeated on the same day of the month as \"startDate\" or the same

3561-- be repeated on the same day of the month as \"startDate\" or the same

1787-- day of the week of the month. Example: If \'startDate\' is Monday, April

3562-- day of the week of the month. Example: If \'startDate\' is Monday, April

@@ -1797,6 +3572,17 @@ data ReportRunsOnDayOfMonthSchedule

1797

3572

1798instance Hashable ReportRunsOnDayOfMonthSchedule

3573instance Hashable ReportRunsOnDayOfMonthSchedule

1799

3574

3575+instance FromText ReportRunsOnDayOfMonthSchedule where

3576+ fromText = \case

3577+ "DAY_OF_MONTH" -> Just RRODOMSDayOfMonth

3578+ "WEEK_OF_MONTH" -> Just RRODOMSWeekOfMonth

3579+ _ -> Nothing

3580+

3581+instance ToText ReportRunsOnDayOfMonthSchedule where

3582+ toText = \case

3583+ RRODOMSDayOfMonth -> "DAY_OF_MONTH"

3584+ RRODOMSWeekOfMonth -> "WEEK_OF_MONTH"

3585+

1800-- | The type of the report.

3586-- | The type of the report.

1801data ReportType

3587data ReportType

1802 = RTCrossDimensionReach

3588 = RTCrossDimensionReach

@@ -1813,6 +3599,23 @@ data ReportType

1813

3599

1814instance Hashable ReportType

3600instance Hashable ReportType

1815

3601

3602+instance FromText ReportType where

3603+ fromText = \case

3604+ "CROSS_DIMENSION_REACH" -> Just RTCrossDimensionReach

3605+ "FLOODLIGHT" -> Just RTFloodlight

3606+ "PATH_TO_CONVERSION" -> Just RTPathToConversion

3607+ "REACH" -> Just RTReach

3608+ "STANDARD" -> Just RTStandard

3609+ _ -> Nothing

3610+

3611+instance ToText ReportType where

3612+ toText = \case

3613+ RTCrossDimensionReach -> "CROSS_DIMENSION_REACH"

3614+ RTFloodlight -> "FLOODLIGHT"

3615+ RTPathToConversion -> "PATH_TO_CONVERSION"

3616+ RTReach -> "REACH"

3617+ RTStandard -> "STANDARD"

3618+

1816-- | Site contact type.

3619-- | Site contact type.

1817data SiteContactContactType

3620data SiteContactContactType

1818 = SCCTSalesPerson

3621 = SCCTSalesPerson

@@ -1823,6 +3626,17 @@ data SiteContactContactType

1823

3626

1824instance Hashable SiteContactContactType

3627instance Hashable SiteContactContactType

1825

3628

3629+instance FromText SiteContactContactType where

3630+ fromText = \case

3631+ "SALES_PERSON" -> Just SCCTSalesPerson

3632+ "TRAFFICKER" -> Just SCCTTrafficker

3633+ _ -> Nothing

3634+

3635+instance ToText SiteContactContactType where

3636+ toText = \case

3637+ SCCTSalesPerson -> "SALES_PERSON"

3638+ SCCTTrafficker -> "TRAFFICKER"

3639+

1826-- | An optional sort order for the dimension column.

3640-- | An optional sort order for the dimension column.

1827data SortedDimensionSortOrder

3641data SortedDimensionSortOrder

1828 = SDSOAscending

3642 = SDSOAscending

@@ -1833,6 +3647,17 @@ data SortedDimensionSortOrder

1833

3647

1834instance Hashable SortedDimensionSortOrder

3648instance Hashable SortedDimensionSortOrder

1835

3649

3650+instance FromText SortedDimensionSortOrder where

3651+ fromText = \case

3652+ "ASCENDING" -> Just SDSOAscending

3653+ "DESCENDING" -> Just SDSODescending

3654+ _ -> Nothing

3655+

3656+instance ToText SortedDimensionSortOrder where

3657+ toText = \case

3658+ SDSOAscending -> "ASCENDING"

3659+ SDSODescending -> "DESCENDING"

3660+

1836-- | TagData tag format of this tag.

3661-- | TagData tag format of this tag.

1837data TagDataFormat

3662data TagDataFormat

1838 = TDFPlacementTagClickCommands

3663 = TDFPlacementTagClickCommands

@@ -1875,6 +3700,49 @@ data TagDataFormat

1875

3700

1876instance Hashable TagDataFormat

3701instance Hashable TagDataFormat

1877

3702

3703+instance FromText TagDataFormat where

3704+ fromText = \case

3705+ "PLACEMENT_TAG_CLICK_COMMANDS" -> Just TDFPlacementTagClickCommands

3706+ "PLACEMENT_TAG_IFRAME_ILAYER" -> Just TDFPlacementTagIframeIlayer

3707+ "PLACEMENT_TAG_IFRAME_JAVASCRIPT" -> Just TDFPlacementTagIframeJavascript

3708+ "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY" -> Just TDFPlacementTagIframeJavascriptLegacy

3709+ "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH" -> Just TDFPlacementTagInstreamVideoPrefetch

3710+ "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3" -> Just TDFPlacementTagInstreamVideoPrefetchVast3

3711+ "PLACEMENT_TAG_INTERNAL_REDIRECT" -> Just TDFPlacementTagInternalRedirect

3712+ "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT" -> Just TDFPlacementTagInterstitialIframeJavascript

3713+ "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY" -> Just TDFPlacementTagInterstitialIframeJavascriptLegacy

3714+ "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT" -> Just TDFPlacementTagInterstitialInternalRedirect

3715+ "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT" -> Just TDFPlacementTagInterstitialJavascript

3716+ "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY" -> Just TDFPlacementTagInterstitialJavascriptLegacy

3717+ "PLACEMENT_TAG_JAVASCRIPT" -> Just TDFPlacementTagJavascript

3718+ "PLACEMENT_TAG_JAVASCRIPT_LEGACY" -> Just TDFPlacementTagJavascriptLegacy

3719+ "PLACEMENT_TAG_STANDARD" -> Just TDFPlacementTagStandard

3720+ "PLACEMENT_TAG_TRACKING" -> Just TDFPlacementTagTracking

3721+ "PLACEMENT_TAG_TRACKING_IFRAME" -> Just TDFPlacementTagTrackingIframe

3722+ "PLACEMENT_TAG_TRACKING_JAVASCRIPT" -> Just TDFPlacementTagTrackingJavascript

3723+ _ -> Nothing

3724+

3725+instance ToText TagDataFormat where

3726+ toText = \case

3727+ TDFPlacementTagClickCommands -> "PLACEMENT_TAG_CLICK_COMMANDS"

3728+ TDFPlacementTagIframeIlayer -> "PLACEMENT_TAG_IFRAME_ILAYER"

3729+ TDFPlacementTagIframeJavascript -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT"

3730+ TDFPlacementTagIframeJavascriptLegacy -> "PLACEMENT_TAG_IFRAME_JAVASCRIPT_LEGACY"

3731+ TDFPlacementTagInstreamVideoPrefetch -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH"

3732+ TDFPlacementTagInstreamVideoPrefetchVast3 -> "PLACEMENT_TAG_INSTREAM_VIDEO_PREFETCH_VAST_3"

3733+ TDFPlacementTagInternalRedirect -> "PLACEMENT_TAG_INTERNAL_REDIRECT"

3734+ TDFPlacementTagInterstitialIframeJavascript -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT"

3735+ TDFPlacementTagInterstitialIframeJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_IFRAME_JAVASCRIPT_LEGACY"

3736+ TDFPlacementTagInterstitialInternalRedirect -> "PLACEMENT_TAG_INTERSTITIAL_INTERNAL_REDIRECT"

3737+ TDFPlacementTagInterstitialJavascript -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT"

3738+ TDFPlacementTagInterstitialJavascriptLegacy -> "PLACEMENT_TAG_INTERSTITIAL_JAVASCRIPT_LEGACY"

3739+ TDFPlacementTagJavascript -> "PLACEMENT_TAG_JAVASCRIPT"

3740+ TDFPlacementTagJavascriptLegacy -> "PLACEMENT_TAG_JAVASCRIPT_LEGACY"

3741+ TDFPlacementTagStandard -> "PLACEMENT_TAG_STANDARD"

3742+ TDFPlacementTagTracking -> "PLACEMENT_TAG_TRACKING"

3743+ TDFPlacementTagTrackingIframe -> "PLACEMENT_TAG_TRACKING_IFRAME"

3744+ TDFPlacementTagTrackingJavascript -> "PLACEMENT_TAG_TRACKING_JAVASCRIPT"

3745+

1878-- | Option specifying how keywords are embedded in ad tags. This setting can

3746-- | Option specifying how keywords are embedded in ad tags. This setting can

1879-- be used to specify whether keyword placeholders are inserted in

3747-- be used to specify whether keyword placeholders are inserted in

1880-- placement tags for this site. Publishers can then add keywords to those

3748-- placement tags for this site. Publishers can then add keywords to those

@@ -1890,6 +3758,19 @@ data TagSettingKeywordOption

1890

3758

1891instance Hashable TagSettingKeywordOption

3759instance Hashable TagSettingKeywordOption

1892

3760

3761+instance FromText TagSettingKeywordOption where

3762+ fromText = \case

3763+ "GENERATE_SEPARATE_TAG_FOR_EACH_KEYWORD" -> Just TSKOGenerateSeparateTagForEachKeyword

3764+ "IGNORE" -> Just TSKOIgnore

3765+ "PLACEHOLDER_WITH_LIST_OF_KEYWORDS" -> Just TSKOPlaceholderWithListOfKeywords

3766+ _ -> Nothing

3767+

3768+instance ToText TagSettingKeywordOption where

3769+ toText = \case

3770+ TSKOGenerateSeparateTagForEachKeyword -> "GENERATE_SEPARATE_TAG_FOR_EACH_KEYWORD"

3771+ TSKOIgnore -> "IGNORE"

3772+ TSKOPlaceholderWithListOfKeywords -> "PLACEHOLDER_WITH_LIST_OF_KEYWORDS"

3773+

1893-- | Type of browser window for which the backup image of the flash creative

3774-- | Type of browser window for which the backup image of the flash creative

1894-- can be displayed.

3775-- can be displayed.

1895data TargetWindowTargetWindowOption

3776data TargetWindowTargetWindowOption

@@ -1903,6 +3784,19 @@ data TargetWindowTargetWindowOption

1903

3784

1904instance Hashable TargetWindowTargetWindowOption

3785instance Hashable TargetWindowTargetWindowOption

1905

3786

3787+instance FromText TargetWindowTargetWindowOption where

3788+ fromText = \case

3789+ "CURRENT_WINDOW" -> Just TWTWOCurrentWindow

3790+ "CUSTOM" -> Just TWTWOCustom

3791+ "NEW_WINDOW" -> Just TWTWONewWindow

3792+ _ -> Nothing

3793+

3794+instance ToText TargetWindowTargetWindowOption where

3795+ toText = \case

3796+ TWTWOCurrentWindow -> "CURRENT_WINDOW"

3797+ TWTWOCustom -> "CUSTOM"

3798+ TWTWONewWindow -> "NEW_WINDOW"

3799+

1906-- | Product from which this targetable remarketing list was originated.

3800-- | Product from which this targetable remarketing list was originated.

1907data TargetableRemarketingListListSource

3801data TargetableRemarketingListListSource

1908 = TRLLSRemarketingListSourceDBm

3802 = TRLLSRemarketingListSourceDBm

@@ -1919,6 +3813,23 @@ data TargetableRemarketingListListSource

1919

3813

1920instance Hashable TargetableRemarketingListListSource

3814instance Hashable TargetableRemarketingListListSource

1921

3815

3816+instance FromText TargetableRemarketingListListSource where

3817+ fromText = \case

3818+ "REMARKETING_LIST_SOURCE_DBM" -> Just TRLLSRemarketingListSourceDBm

3819+ "REMARKETING_LIST_SOURCE_DFA" -> Just TRLLSRemarketingListSourceDfa

3820+ "REMARKETING_LIST_SOURCE_DMP" -> Just TRLLSRemarketingListSourceDmp

3821+ "REMARKETING_LIST_SOURCE_GA" -> Just TRLLSRemarketingListSourceGa

3822+ "REMARKETING_LIST_SOURCE_OTHER" -> Just TRLLSRemarketingListSourceOther

3823+ _ -> Nothing

3824+

3825+instance ToText TargetableRemarketingListListSource where

3826+ toText = \case

3827+ TRLLSRemarketingListSourceDBm -> "REMARKETING_LIST_SOURCE_DBM"

3828+ TRLLSRemarketingListSourceDfa -> "REMARKETING_LIST_SOURCE_DFA"

3829+ TRLLSRemarketingListSourceDmp -> "REMARKETING_LIST_SOURCE_DMP"

3830+ TRLLSRemarketingListSourceGa -> "REMARKETING_LIST_SOURCE_GA"

3831+ TRLLSRemarketingListSourceOther -> "REMARKETING_LIST_SOURCE_OTHER"

3832+

1922-- | Third-party URL type for in-stream video creatives.

3833-- | Third-party URL type for in-stream video creatives.

1923data ThirdPartyTrackingUrlThirdPartyUrlType

3834data ThirdPartyTrackingUrlThirdPartyUrlType

1924 = TPTUTPUTClickTracking

3835 = TPTUTPUTClickTracking

@@ -1959,6 +3870,47 @@ data ThirdPartyTrackingUrlThirdPartyUrlType

1959

3870

1960instance Hashable ThirdPartyTrackingUrlThirdPartyUrlType

3871instance Hashable ThirdPartyTrackingUrlThirdPartyUrlType

1961

3872

3873+instance FromText ThirdPartyTrackingUrlThirdPartyUrlType where

3874+ fromText = \case

3875+ "CLICK_TRACKING" -> Just TPTUTPUTClickTracking

3876+ "IMPRESSION" -> Just TPTUTPUTImpression

3877+ "RICH_MEDIA_BACKUP_IMPRESSION" -> Just TPTUTPUTRichMediaBackupImpression

3878+ "RICH_MEDIA_IMPRESSION" -> Just TPTUTPUTRichMediaImpression

3879+ "RICH_MEDIA_RM_IMPRESSION" -> Just TPTUTPUTRichMediaRmImpression

3880+ "SURVEY" -> Just TPTUTPUTSurvey

3881+ "VIDEO_COMPLETE" -> Just TPTUTPUTVideoComplete

3882+ "VIDEO_CUSTOM" -> Just TPTUTPUTVideoCustom

3883+ "VIDEO_FIRST_QUARTILE" -> Just TPTUTPUTVideoFirstQuartile

3884+ "VIDEO_FULLSCREEN" -> Just TPTUTPUTVideoFullscreen

3885+ "VIDEO_MIDPOINT" -> Just TPTUTPUTVideoMidpoint

3886+ "VIDEO_MUTE" -> Just TPTUTPUTVideoMute

3887+ "VIDEO_PAUSE" -> Just TPTUTPUTVideoPause

3888+ "VIDEO_REWIND" -> Just TPTUTPUTVideoRewind

3889+ "VIDEO_START" -> Just TPTUTPUTVideoStart

3890+ "VIDEO_STOP" -> Just TPTUTPUTVideoStop

3891+ "VIDEO_THIRD_QUARTILE" -> Just TPTUTPUTVideoThirdQuartile

3892+ _ -> Nothing

3893+

3894+instance ToText ThirdPartyTrackingUrlThirdPartyUrlType where

3895+ toText = \case

3896+ TPTUTPUTClickTracking -> "CLICK_TRACKING"

3897+ TPTUTPUTImpression -> "IMPRESSION"

3898+ TPTUTPUTRichMediaBackupImpression -> "RICH_MEDIA_BACKUP_IMPRESSION"

3899+ TPTUTPUTRichMediaImpression -> "RICH_MEDIA_IMPRESSION"

3900+ TPTUTPUTRichMediaRmImpression -> "RICH_MEDIA_RM_IMPRESSION"

3901+ TPTUTPUTSurvey -> "SURVEY"

3902+ TPTUTPUTVideoComplete -> "VIDEO_COMPLETE"

3903+ TPTUTPUTVideoCustom -> "VIDEO_CUSTOM"

3904+ TPTUTPUTVideoFirstQuartile -> "VIDEO_FIRST_QUARTILE"

3905+ TPTUTPUTVideoFullscreen -> "VIDEO_FULLSCREEN"

3906+ TPTUTPUTVideoMidpoint -> "VIDEO_MIDPOINT"

3907+ TPTUTPUTVideoMute -> "VIDEO_MUTE"

3908+ TPTUTPUTVideoPause -> "VIDEO_PAUSE"

3909+ TPTUTPUTVideoRewind -> "VIDEO_REWIND"

3910+ TPTUTPUTVideoStart -> "VIDEO_START"

3911+ TPTUTPUTVideoStop -> "VIDEO_STOP"

3912+ TPTUTPUTVideoThirdQuartile -> "VIDEO_THIRD_QUARTILE"

3913+

1962-- | Data type for the variable. This is a required field.

3914-- | Data type for the variable. This is a required field.

1963data UserDefinedVariableConfigurationDataType

3915data UserDefinedVariableConfigurationDataType

1964 = UDVCDTNumber

3916 = UDVCDTNumber

@@ -1969,6 +3921,17 @@ data UserDefinedVariableConfigurationDataType

1969

3921

1970instance Hashable UserDefinedVariableConfigurationDataType

3922instance Hashable UserDefinedVariableConfigurationDataType

1971

3923

3924+instance FromText UserDefinedVariableConfigurationDataType where

3925+ fromText = \case

3926+ "NUMBER" -> Just UDVCDTNumber

3927+ "STRING" -> Just UDVCDTString

3928+ _ -> Nothing

3929+

3930+instance ToText UserDefinedVariableConfigurationDataType where

3931+ toText = \case

3932+ UDVCDTNumber -> "NUMBER"

3933+ UDVCDTString -> "STRING"

3934+

1972-- | Variable name in the tag. This is a required field.

3935-- | Variable name in the tag. This is a required field.

1973data UserDefinedVariableConfigurationVariableType

3936data UserDefinedVariableConfigurationVariableType

1974 = UDVCVTU1

3937 = UDVCVTU1

@@ -2015,6 +3978,53 @@ data UserDefinedVariableConfigurationVariableType

2015

3978

2016instance Hashable UserDefinedVariableConfigurationVariableType

3979instance Hashable UserDefinedVariableConfigurationVariableType

2017

3980

3981+instance FromText UserDefinedVariableConfigurationVariableType where

3982+ fromText = \case

3983+ "U1" -> Just UDVCVTU1

3984+ "U10" -> Just UDVCVTU10

3985+ "U11" -> Just UDVCVTU11

3986+ "U12" -> Just UDVCVTU12

3987+ "U13" -> Just UDVCVTU13

3988+ "U14" -> Just UDVCVTU14

3989+ "U15" -> Just UDVCVTU15

3990+ "U16" -> Just UDVCVTU16

3991+ "U17" -> Just UDVCVTU17

3992+ "U18" -> Just UDVCVTU18

3993+ "U19" -> Just UDVCVTU19

3994+ "U2" -> Just UDVCVTU2

3995+ "U20" -> Just UDVCVTU20

3996+ "U3" -> Just UDVCVTU3

3997+ "U4" -> Just UDVCVTU4

3998+ "U5" -> Just UDVCVTU5

3999+ "U6" -> Just UDVCVTU6

4000+ "U7" -> Just UDVCVTU7

4001+ "U8" -> Just UDVCVTU8

4002+ "U9" -> Just UDVCVTU9

4003+ _ -> Nothing

4004+

4005+instance ToText UserDefinedVariableConfigurationVariableType where

4006+ toText = \case

4007+ UDVCVTU1 -> "U1"

4008+ UDVCVTU10 -> "U10"

4009+ UDVCVTU11 -> "U11"

4010+ UDVCVTU12 -> "U12"

4011+ UDVCVTU13 -> "U13"

4012+ UDVCVTU14 -> "U14"

4013+ UDVCVTU15 -> "U15"

4014+ UDVCVTU16 -> "U16"

4015+ UDVCVTU17 -> "U17"

4016+ UDVCVTU18 -> "U18"

4017+ UDVCVTU19 -> "U19"

4018+ UDVCVTU2 -> "U2"

4019+ UDVCVTU20 -> "U20"

4020+ UDVCVTU3 -> "U3"

4021+ UDVCVTU4 -> "U4"

4022+ UDVCVTU5 -> "U5"

4023+ UDVCVTU6 -> "U6"

4024+ UDVCVTU7 -> "U7"

4025+ UDVCVTU8 -> "U8"

4026+ UDVCVTU9 -> "U9"

4027+

2018-- | Levels of availability for a user role permission.

4028-- | Levels of availability for a user role permission.

2019data UserRolePermissionAvailability

4029data UserRolePermissionAvailability

2020 = URPAAccountAlways

4030 = URPAAccountAlways

@@ -2030,3 +4040,20 @@ data UserRolePermissionAvailability

2030 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

4040 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

2031

4041

2032instance Hashable UserRolePermissionAvailability

4042instance Hashable UserRolePermissionAvailability

4043+

4044+instance FromText UserRolePermissionAvailability where

4045+ fromText = \case

4046+ "ACCOUNT_ALWAYS" -> Just URPAAccountAlways

4047+ "ACCOUNT_BY_DEFAULT" -> Just URPAAccountByDefault

4048+ "NOT_AVAILABLE_BY_DEFAULT" -> Just URPANotAvailableByDefault

4049+ "SUBACCOUNT_AND_ACCOUNT_ALWAYS" -> Just URPASubaccountAndAccountAlways

4050+ "SUBACCOUNT_AND_ACCOUNT_BY_DEFAULT" -> Just URPASubaccountAndAccountByDefault

4051+ _ -> Nothing

4052+

4053+instance ToText UserRolePermissionAvailability where

4054+ toText = \case

4055+ URPAAccountAlways -> "ACCOUNT_ALWAYS"

4056+ URPAAccountByDefault -> "ACCOUNT_BY_DEFAULT"

4057+ URPANotAvailableByDefault -> "NOT_AVAILABLE_BY_DEFAULT"

4058+ URPASubaccountAndAccountAlways -> "SUBACCOUNT_AND_ACCOUNT_ALWAYS"

4059+ URPASubaccountAndAccountByDefault -> "SUBACCOUNT_AND_ACCOUNT_BY_DEFAULT"

gogol-discovery/gen/Network/Google/Discovery/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Discovery.Types

8-- Module : Network.Google.Discovery.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Discovery.Types

15module Network.Google.Discovery.Types

14 (

16 (

15− -- * API Definition

16− discovery

17−

18

17

19 -- * DirectoryList

18 -- * DirectoryList

20− , DirectoryList

19+ DirectoryList

21 , directoryList

20 , directoryList

22 , dlKind

21 , dlKind

23 , dlItems

22 , dlItems

@@ -236,6 +235,3 @@ module Network.Google.Discovery.Types

236import Network.Google.Discovery.Types.Product

235import Network.Google.Discovery.Types.Product

237import Network.Google.Discovery.Types.Sum

236import Network.Google.Discovery.Types.Sum

238import Network.Google.Prelude

237import Network.Google.Prelude

239−

240−discovery :: a

241−discovery = error "discovery"

gogol-discovery/gen/Network/Google/Discovery/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Discovery.Types.Product

8-- Module : Network.Google.Discovery.Types.Product

gogol-discovery/gen/Network/Google/Discovery/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Discovery.Types.Sum

9-- Module : Network.Google.Discovery.Types.Sum

gogol-doubleclick-bids/gen/Network/Google/DoubleClickBidManager/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.DoubleClickBidManager.Types

8-- Module : Network.Google.DoubleClickBidManager.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.DoubleClickBidManager.Types

15module Network.Google.DoubleClickBidManager.Types

14 (

16 (

15− -- * API Definition

16− doubleclickbidmanager

17−

18

17

19 -- * DownloadLineItemsRequest

18 -- * DownloadLineItemsRequest

20− , DownloadLineItemsRequest

19+ DownloadLineItemsRequest

21 , downloadLineItemsRequest

20 , downloadLineItemsRequest

22 , dlirFilterType

21 , dlirFilterType

23 , dlirFormat

22 , dlirFormat

@@ -206,6 +205,3 @@ module Network.Google.DoubleClickBidManager.Types

206import Network.Google.DoubleClickBidManager.Types.Product

205import Network.Google.DoubleClickBidManager.Types.Product

207import Network.Google.DoubleClickBidManager.Types.Sum

206import Network.Google.DoubleClickBidManager.Types.Sum

208import Network.Google.Prelude

207import Network.Google.Prelude

209−

210−doubleclickbidmanager :: a

211−doubleclickbidmanager = error "doubleclickbidmanager"

gogol-doubleclick-bids/gen/Network/Google/DoubleClickBidManager/Types/Product.hs+11−9

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.DoubleClickBidManager.Types.Product

8-- Module : Network.Google.DoubleClickBidManager.Types.Product

@@ -22,7 +24,7 @@ data DownloadLineItemsRequest = DownloadLineItemsRequest

22 { _dlirFilterType :: !(Maybe DownloadLineItemsRequestFilterType)

24 { _dlirFilterType :: !(Maybe DownloadLineItemsRequestFilterType)

23 , _dlirFormat :: !(Maybe DownloadLineItemsRequestFormat)

25 , _dlirFormat :: !(Maybe DownloadLineItemsRequestFormat)

24 , _dlirFilterIds :: !(Maybe [Int64])

26 , _dlirFilterIds :: !(Maybe [Int64])

25− }

27+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

26

28

27-- | Creates a value of 'DownloadLineItemsRequest' with the minimum fields required to make a request.

29-- | Creates a value of 'DownloadLineItemsRequest' with the minimum fields required to make a request.

28--

30--

@@ -94,7 +96,7 @@ dlirLineItems

94data FilterPair = FilterPair

96data FilterPair = FilterPair

95 { _fpValue :: !(Maybe Text)

97 { _fpValue :: !(Maybe Text)

96 , _fpType :: !(Maybe FilterPairType)

98 , _fpType :: !(Maybe FilterPairType)

97− }

99+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

98

100

99-- | Creates a value of 'FilterPair' with the minimum fields required to make a request.

101-- | Creates a value of 'FilterPair' with the minimum fields required to make a request.

100--

102--

@@ -198,7 +200,7 @@ data Parameters = Parameters

198 , _pFilters :: !(Maybe [Maybe FilterPair])

200 , _pFilters :: !(Maybe [Maybe FilterPair])

199 , _pGroupBys :: !(Maybe [ParametersItemGroupBys])

201 , _pGroupBys :: !(Maybe [ParametersItemGroupBys])

200 , _pType :: !(Maybe ParametersType)

202 , _pType :: !(Maybe ParametersType)

201− }

203+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

202

204

203-- | Creates a value of 'Parameters' with the minimum fields required to make a request.

205-- | Creates a value of 'Parameters' with the minimum fields required to make a request.

204--

206--

@@ -363,7 +365,7 @@ data QueryMetadata = QueryMetadata

363 , _qmReportCount :: !(Maybe Int32)

365 , _qmReportCount :: !(Maybe Int32)

364 , _qmTitle :: !(Maybe Text)

366 , _qmTitle :: !(Maybe Text)

365 , _qmSendNotification :: !(Maybe Bool)

367 , _qmSendNotification :: !(Maybe Bool)

366− }

368+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

367

369

368-- | Creates a value of 'QueryMetadata' with the minimum fields required to make a request.

370-- | Creates a value of 'QueryMetadata' with the minimum fields required to make a request.

369--

371--

@@ -483,7 +485,7 @@ data QuerySchedule = QuerySchedule

483 , _qsEndTimeMs :: !(Maybe Int64)

485 , _qsEndTimeMs :: !(Maybe Int64)

484 , _qsNextRunMinuteOfDay :: !(Maybe Int32)

486 , _qsNextRunMinuteOfDay :: !(Maybe Int32)

485 , _qsNextRunTimezoneCode :: !(Maybe Text)

487 , _qsNextRunTimezoneCode :: !(Maybe Text)

486− }

488+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

487

489

488-- | Creates a value of 'QuerySchedule' with the minimum fields required to make a request.

490-- | Creates a value of 'QuerySchedule' with the minimum fields required to make a request.

489--

491--

@@ -576,7 +578,7 @@ rMetadata

576-- /See:/ 'reportFailure' smart constructor.

578-- /See:/ 'reportFailure' smart constructor.

577newtype ReportFailure = ReportFailure

579newtype ReportFailure = ReportFailure

578 { _rfErrorCode :: Maybe ReportFailureErrorCode

580 { _rfErrorCode :: Maybe ReportFailureErrorCode

579− }

581+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

580

582

581-- | Creates a value of 'ReportFailure' with the minimum fields required to make a request.

583-- | Creates a value of 'ReportFailure' with the minimum fields required to make a request.

582--

584--

@@ -690,7 +692,7 @@ data ReportStatus = ReportStatus

690 , _rsFinishTimeMs :: !(Maybe Int64)

692 , _rsFinishTimeMs :: !(Maybe Int64)

691 , _rsFormat :: !(Maybe ReportStatusFormat)

693 , _rsFormat :: !(Maybe ReportStatusFormat)

692 , _rsFailure :: !(Maybe (Maybe ReportFailure))

694 , _rsFailure :: !(Maybe (Maybe ReportFailure))

693− }

695+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

694

696

695-- | Creates a value of 'ReportStatus' with the minimum fields required to make a request.

697-- | Creates a value of 'ReportStatus' with the minimum fields required to make a request.

696--

698--

@@ -811,7 +813,7 @@ data RunQueryRequest = RunQueryRequest

811 , _rqrDataRange :: !(Maybe RunQueryRequestDataRange)

813 , _rqrDataRange :: !(Maybe RunQueryRequestDataRange)

812 , _rqrReportDataStartTimeMs :: !(Maybe Int64)

814 , _rqrReportDataStartTimeMs :: !(Maybe Int64)

813 , _rqrTimezoneCode :: !(Maybe Text)

815 , _rqrTimezoneCode :: !(Maybe Text)

814− }

816+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

815

817

816-- | Creates a value of 'RunQueryRequest' with the minimum fields required to make a request.

818-- | Creates a value of 'RunQueryRequest' with the minimum fields required to make a request.

817--

819--

@@ -869,7 +871,7 @@ data UploadLineItemsRequest = UploadLineItemsRequest

869 { _ulirLineItems :: !(Maybe Text)

871 { _ulirLineItems :: !(Maybe Text)

870 , _ulirFormat :: !(Maybe UploadLineItemsRequestFormat)

872 , _ulirFormat :: !(Maybe UploadLineItemsRequestFormat)

871 , _ulirDryRun :: !(Maybe Bool)

873 , _ulirDryRun :: !(Maybe Bool)

872− }

874+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

873

875

874-- | Creates a value of 'UploadLineItemsRequest' with the minimum fields required to make a request.

876-- | Creates a value of 'UploadLineItemsRequest' with the minimum fields required to make a request.

875--

877--

gogol-doubleclick-bids/gen/Network/Google/DoubleClickBidManager/Types/Sum.hs+1093

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.DoubleClickBidManager.Types.Sum

9-- Module : Network.Google.DoubleClickBidManager.Types.Sum

@@ -26,6 +29,19 @@ data DownloadLineItemsRequestFilterType

26

29

27instance Hashable DownloadLineItemsRequestFilterType

30instance Hashable DownloadLineItemsRequestFilterType

28

31

32+instance FromText DownloadLineItemsRequestFilterType where

33+ fromText = \case

34+ "ADVERTISER_ID" -> Just DLIRFTAdvertiserId

35+ "INSERTION_ORDER_ID" -> Just DLIRFTInsertionOrderId

36+ "LINE_ITEM_ID" -> Just DLIRFTLineItemId

37+ _ -> Nothing

38+

39+instance ToText DownloadLineItemsRequestFilterType where

40+ toText = \case

41+ DLIRFTAdvertiserId -> "ADVERTISER_ID"

42+ DLIRFTInsertionOrderId -> "INSERTION_ORDER_ID"

43+ DLIRFTLineItemId -> "LINE_ITEM_ID"

44+

29-- | Format in which the line items will be returned. Default to CSV.

45-- | Format in which the line items will be returned. Default to CSV.

30data DownloadLineItemsRequestFormat

46data DownloadLineItemsRequestFormat

31 = DLIRFCSV

47 = DLIRFCSV

@@ -34,6 +50,15 @@ data DownloadLineItemsRequestFormat

34

50

35instance Hashable DownloadLineItemsRequestFormat

51instance Hashable DownloadLineItemsRequestFormat

36

52

53+instance FromText DownloadLineItemsRequestFormat where

54+ fromText = \case

55+ "CSV" -> Just DLIRFCSV

56+ _ -> Nothing

57+

58+instance ToText DownloadLineItemsRequestFormat where

59+ toText = \case

60+ DLIRFCSV -> "CSV"

61+

37-- | Filter type.

62-- | Filter type.

38data FilterPairType

63data FilterPairType

39 = FPTFilterActiveViewExpectedViewability

64 = FPTFilterActiveViewExpectedViewability

@@ -198,6 +223,171 @@ data FilterPairType

198

223

199instance Hashable FilterPairType

224instance Hashable FilterPairType

200

225

226+instance FromText FilterPairType where

227+ fromText = \case

228+ "FILTER_ACTIVE_VIEW_EXPECTED_VIEWABILITY" -> Just FPTFilterActiveViewExpectedViewability

229+ "FILTER_ACTIVITY_ID" -> Just FPTFilterActivityId

230+ "FILTER_ADVERTISER" -> Just FPTFilterAdvertiser

231+ "FILTER_ADVERTISER_CURRENCY" -> Just FPTFilterAdvertiserCurrency

232+ "FILTER_ADVERTISER_TIMEZONE" -> Just FPTFilterAdvertiserTimezone

233+ "FILTER_AD_POSITION" -> Just FPTFilterAdPosition

234+ "FILTER_AGE" -> Just FPTFilterAge

235+ "FILTER_BRANDSAFE_CHANNEL_ID" -> Just FPTFilterBrandsafeChannelId

236+ "FILTER_BROWSER" -> Just FPTFilterBrowser

237+ "FILTER_CAMPAIGN_DAILY_FREQUENCY" -> Just FPTFilterCampaignDailyFrequency

238+ "FILTER_CARRIER" -> Just FPTFilterCarrier

239+ "FILTER_CHANNEL_ID" -> Just FPTFilterChannelId

240+ "FILTER_CITY" -> Just FPTFilterCity

241+ "FILTER_CONVERSION_DELAY" -> Just FPTFilterConversionDelay

242+ "FILTER_COUNTRY" -> Just FPTFilterCountry

243+ "FILTER_CREATIVE_ID" -> Just FPTFilterCreativeId

244+ "FILTER_CREATIVE_SIZE" -> Just FPTFilterCreativeSize

245+ "FILTER_CREATIVE_TYPE" -> Just FPTFilterCreativeType

246+ "FILTER_DATA_PROVIDER" -> Just FPTFilterDataProvider

247+ "FILTER_DATE" -> Just FPTFilterDate

248+ "FILTER_DAY_OF_WEEK" -> Just FPTFilterDayOfWeek

249+ "FILTER_DMA" -> Just FPTFilterDma

250+ "FILTER_EXCHANGE_ID" -> Just FPTFilterExchangeId

251+ "FILTER_FLOODLIGHT_PIXEL_ID" -> Just FPTFilterFloodlightPixelId

252+ "FILTER_GENDER" -> Just FPTFilterGender

253+ "FILTER_INSERTION_ORDER" -> Just FPTFilterInsertionOrder

254+ "FILTER_INVENTORY_FORMAT" -> Just FPTFilterInventoryFormat

255+ "FILTER_INVENTORY_SOURCE" -> Just FPTFilterInventorySource

256+ "FILTER_INVENTORY_SOURCE_TYPE" -> Just FPTFilterInventorySourceType

257+ "FILTER_KEYWORD" -> Just FPTFilterKeyword

258+ "FILTER_LINE_ITEM" -> Just FPTFilterLineItem

259+ "FILTER_LINE_ITEM_DAILY_FREQUENCY" -> Just FPTFilterLineItemDailyFrequency

260+ "FILTER_LINE_ITEM_LIFETIME_FREQUENCY" -> Just FPTFilterLineItemLifetimeFrequency

261+ "FILTER_LINE_ITEM_TYPE" -> Just FPTFilterLineItemType

262+ "FILTER_MOBILE_DEVICE_MAKE" -> Just FPTFilterMobileDeviceMake

263+ "FILTER_MOBILE_DEVICE_MAKE_MODEL" -> Just FPTFilterMobileDeviceMakeModel

264+ "FILTER_MOBILE_DEVICE_TYPE" -> Just FPTFilterMobileDeviceType

265+ "FILTER_MOBILE_GEO" -> Just FPTFilterMobileGeo

266+ "FILTER_MONTH" -> Just FPTFilterMonth

267+ "FILTER_MRAID_SUPPORT" -> Just FPTFilterMraidSupport

268+ "FILTER_NIELSEN_AGE" -> Just FPTFilterNielsenAge

269+ "FILTER_NIELSEN_COUNTRY_CODE" -> Just FPTFilterNielsenCountryCode

270+ "FILTER_NIELSEN_DEVICE_ID" -> Just FPTFilterNielsenDeviceId

271+ "FILTER_NIELSEN_GENDER" -> Just FPTFilterNielsenGender

272+ "FILTER_ORDER_ID" -> Just FPTFilterOrderId

273+ "FILTER_OS" -> Just FPTFilterOs

274+ "FILTER_PAGE_CATEGORY" -> Just FPTFilterPageCategory

275+ "FILTER_PAGE_LAYOUT" -> Just FPTFilterPageLayout

276+ "FILTER_PARTNER" -> Just FPTFilterPartner

277+ "FILTER_PARTNER_CURRENCY" -> Just FPTFilterPartnerCurrency

278+ "FILTER_PUBLIC_INVENTORY" -> Just FPTFilterPublicInventory

279+ "FILTER_QUARTER" -> Just FPTFilterQuarter

280+ "FILTER_REGION" -> Just FPTFilterRegion

281+ "FILTER_REGULAR_CHANNEL_ID" -> Just FPTFilterRegularChannelId

282+ "FILTER_SITE_ID" -> Just FPTFilterSiteId

283+ "FILTER_SITE_LANGUAGE" -> Just FPTFilterSiteLanguage

284+ "FILTER_TARGETED_USER_LIST" -> Just FPTFilterTargetedUserList

285+ "FILTER_TIME_OF_DAY" -> Just FPTFilterTimeOfDay

286+ "FILTER_TRUEVIEW_CONVERSION_TYPE" -> Just FPTFilterTrueviewConversionType

287+ "FILTER_UNKNOWN" -> Just FPTFilterUnknown

288+ "FILTER_USER_LIST" -> Just FPTFilterUserList

289+ "FILTER_USER_LIST_FIRST_PARTY" -> Just FPTFilterUserListFirstParty

290+ "FILTER_USER_LIST_THIRD_PARTY" -> Just FPTFilterUserListThirdParty

291+ "FILTER_VIDEO_AD_POSITION_IN_STREAM" -> Just FPTFilterVideoAdPositionInStream

292+ "FILTER_VIDEO_COMPANION_SIZE" -> Just FPTFilterVideoCompanionSize

293+ "FILTER_VIDEO_COMPANION_TYPE" -> Just FPTFilterVideoCompanionType

294+ "FILTER_VIDEO_CREATIVE_DURATION" -> Just FPTFilterVideoCreativeDuration

295+ "FILTER_VIDEO_CREATIVE_DURATION_SKIPPABLE" -> Just FPTFilterVideoCreativeDurationSkippable

296+ "FILTER_VIDEO_DURATION_SECONDS" -> Just FPTFilterVideoDurationSeconds

297+ "FILTER_VIDEO_FORMAT_SUPPORT" -> Just FPTFilterVideoFormatSupport

298+ "FILTER_VIDEO_INVENTORY_TYPE" -> Just FPTFilterVideoInventoryType

299+ "FILTER_VIDEO_PLAYER_SIZE" -> Just FPTFilterVideoPlayerSize

300+ "FILTER_VIDEO_RATING_TIER" -> Just FPTFilterVideoRatingTier

301+ "FILTER_VIDEO_SKIPPABLE_SUPPORT" -> Just FPTFilterVideoSkippableSupport

302+ "FILTER_VIDEO_VPAID_SUPPORT" -> Just FPTFilterVideoVpaidSupport

303+ "FILTER_WEEK" -> Just FPTFilterWeek

304+ "FILTER_YEAR" -> Just FPTFilterYear

305+ "FILTER_YOUTUBE_VERTICAL" -> Just FPTFilterYoutubeVertical

306+ "FILTER_ZIP_CODE" -> Just FPTFilterZipCode

307+ _ -> Nothing

308+

309+instance ToText FilterPairType where

310+ toText = \case

311+ FPTFilterActiveViewExpectedViewability -> "FILTER_ACTIVE_VIEW_EXPECTED_VIEWABILITY"

312+ FPTFilterActivityId -> "FILTER_ACTIVITY_ID"

313+ FPTFilterAdvertiser -> "FILTER_ADVERTISER"

314+ FPTFilterAdvertiserCurrency -> "FILTER_ADVERTISER_CURRENCY"

315+ FPTFilterAdvertiserTimezone -> "FILTER_ADVERTISER_TIMEZONE"

316+ FPTFilterAdPosition -> "FILTER_AD_POSITION"

317+ FPTFilterAge -> "FILTER_AGE"

318+ FPTFilterBrandsafeChannelId -> "FILTER_BRANDSAFE_CHANNEL_ID"

319+ FPTFilterBrowser -> "FILTER_BROWSER"

320+ FPTFilterCampaignDailyFrequency -> "FILTER_CAMPAIGN_DAILY_FREQUENCY"

321+ FPTFilterCarrier -> "FILTER_CARRIER"

322+ FPTFilterChannelId -> "FILTER_CHANNEL_ID"

323+ FPTFilterCity -> "FILTER_CITY"

324+ FPTFilterConversionDelay -> "FILTER_CONVERSION_DELAY"

325+ FPTFilterCountry -> "FILTER_COUNTRY"

326+ FPTFilterCreativeId -> "FILTER_CREATIVE_ID"

327+ FPTFilterCreativeSize -> "FILTER_CREATIVE_SIZE"

328+ FPTFilterCreativeType -> "FILTER_CREATIVE_TYPE"

329+ FPTFilterDataProvider -> "FILTER_DATA_PROVIDER"

330+ FPTFilterDate -> "FILTER_DATE"

331+ FPTFilterDayOfWeek -> "FILTER_DAY_OF_WEEK"

332+ FPTFilterDma -> "FILTER_DMA"

333+ FPTFilterExchangeId -> "FILTER_EXCHANGE_ID"

334+ FPTFilterFloodlightPixelId -> "FILTER_FLOODLIGHT_PIXEL_ID"

335+ FPTFilterGender -> "FILTER_GENDER"

336+ FPTFilterInsertionOrder -> "FILTER_INSERTION_ORDER"

337+ FPTFilterInventoryFormat -> "FILTER_INVENTORY_FORMAT"

338+ FPTFilterInventorySource -> "FILTER_INVENTORY_SOURCE"

339+ FPTFilterInventorySourceType -> "FILTER_INVENTORY_SOURCE_TYPE"

340+ FPTFilterKeyword -> "FILTER_KEYWORD"

341+ FPTFilterLineItem -> "FILTER_LINE_ITEM"

342+ FPTFilterLineItemDailyFrequency -> "FILTER_LINE_ITEM_DAILY_FREQUENCY"

343+ FPTFilterLineItemLifetimeFrequency -> "FILTER_LINE_ITEM_LIFETIME_FREQUENCY"

344+ FPTFilterLineItemType -> "FILTER_LINE_ITEM_TYPE"

345+ FPTFilterMobileDeviceMake -> "FILTER_MOBILE_DEVICE_MAKE"

346+ FPTFilterMobileDeviceMakeModel -> "FILTER_MOBILE_DEVICE_MAKE_MODEL"

347+ FPTFilterMobileDeviceType -> "FILTER_MOBILE_DEVICE_TYPE"

348+ FPTFilterMobileGeo -> "FILTER_MOBILE_GEO"

349+ FPTFilterMonth -> "FILTER_MONTH"

350+ FPTFilterMraidSupport -> "FILTER_MRAID_SUPPORT"

351+ FPTFilterNielsenAge -> "FILTER_NIELSEN_AGE"

352+ FPTFilterNielsenCountryCode -> "FILTER_NIELSEN_COUNTRY_CODE"

353+ FPTFilterNielsenDeviceId -> "FILTER_NIELSEN_DEVICE_ID"

354+ FPTFilterNielsenGender -> "FILTER_NIELSEN_GENDER"

355+ FPTFilterOrderId -> "FILTER_ORDER_ID"

356+ FPTFilterOs -> "FILTER_OS"

357+ FPTFilterPageCategory -> "FILTER_PAGE_CATEGORY"

358+ FPTFilterPageLayout -> "FILTER_PAGE_LAYOUT"

359+ FPTFilterPartner -> "FILTER_PARTNER"

360+ FPTFilterPartnerCurrency -> "FILTER_PARTNER_CURRENCY"

361+ FPTFilterPublicInventory -> "FILTER_PUBLIC_INVENTORY"

362+ FPTFilterQuarter -> "FILTER_QUARTER"

363+ FPTFilterRegion -> "FILTER_REGION"

364+ FPTFilterRegularChannelId -> "FILTER_REGULAR_CHANNEL_ID"

365+ FPTFilterSiteId -> "FILTER_SITE_ID"

366+ FPTFilterSiteLanguage -> "FILTER_SITE_LANGUAGE"

367+ FPTFilterTargetedUserList -> "FILTER_TARGETED_USER_LIST"

368+ FPTFilterTimeOfDay -> "FILTER_TIME_OF_DAY"

369+ FPTFilterTrueviewConversionType -> "FILTER_TRUEVIEW_CONVERSION_TYPE"

370+ FPTFilterUnknown -> "FILTER_UNKNOWN"

371+ FPTFilterUserList -> "FILTER_USER_LIST"

372+ FPTFilterUserListFirstParty -> "FILTER_USER_LIST_FIRST_PARTY"

373+ FPTFilterUserListThirdParty -> "FILTER_USER_LIST_THIRD_PARTY"

374+ FPTFilterVideoAdPositionInStream -> "FILTER_VIDEO_AD_POSITION_IN_STREAM"

375+ FPTFilterVideoCompanionSize -> "FILTER_VIDEO_COMPANION_SIZE"

376+ FPTFilterVideoCompanionType -> "FILTER_VIDEO_COMPANION_TYPE"

377+ FPTFilterVideoCreativeDuration -> "FILTER_VIDEO_CREATIVE_DURATION"

378+ FPTFilterVideoCreativeDurationSkippable -> "FILTER_VIDEO_CREATIVE_DURATION_SKIPPABLE"

379+ FPTFilterVideoDurationSeconds -> "FILTER_VIDEO_DURATION_SECONDS"

380+ FPTFilterVideoFormatSupport -> "FILTER_VIDEO_FORMAT_SUPPORT"

381+ FPTFilterVideoInventoryType -> "FILTER_VIDEO_INVENTORY_TYPE"

382+ FPTFilterVideoPlayerSize -> "FILTER_VIDEO_PLAYER_SIZE"

383+ FPTFilterVideoRatingTier -> "FILTER_VIDEO_RATING_TIER"

384+ FPTFilterVideoSkippableSupport -> "FILTER_VIDEO_SKIPPABLE_SUPPORT"

385+ FPTFilterVideoVpaidSupport -> "FILTER_VIDEO_VPAID_SUPPORT"

386+ FPTFilterWeek -> "FILTER_WEEK"

387+ FPTFilterYear -> "FILTER_YEAR"

388+ FPTFilterYoutubeVertical -> "FILTER_YOUTUBE_VERTICAL"

389+ FPTFilterZipCode -> "FILTER_ZIP_CODE"

390+

201data ParametersItemGroupBys

391data ParametersItemGroupBys

202 = PIGBFilterActiveViewExpectedViewability

392 = PIGBFilterActiveViewExpectedViewability

203 -- ^ @FILTER_ACTIVE_VIEW_EXPECTED_VIEWABILITY@

393 -- ^ @FILTER_ACTIVE_VIEW_EXPECTED_VIEWABILITY@

@@ -361,6 +551,171 @@ data ParametersItemGroupBys

361

551

362instance Hashable ParametersItemGroupBys

552instance Hashable ParametersItemGroupBys

363

553

554+instance FromText ParametersItemGroupBys where

555+ fromText = \case

556+ "FILTER_ACTIVE_VIEW_EXPECTED_VIEWABILITY" -> Just PIGBFilterActiveViewExpectedViewability

557+ "FILTER_ACTIVITY_ID" -> Just PIGBFilterActivityId

558+ "FILTER_ADVERTISER" -> Just PIGBFilterAdvertiser

559+ "FILTER_ADVERTISER_CURRENCY" -> Just PIGBFilterAdvertiserCurrency

560+ "FILTER_ADVERTISER_TIMEZONE" -> Just PIGBFilterAdvertiserTimezone

561+ "FILTER_AD_POSITION" -> Just PIGBFilterAdPosition

562+ "FILTER_AGE" -> Just PIGBFilterAge

563+ "FILTER_BRANDSAFE_CHANNEL_ID" -> Just PIGBFilterBrandsafeChannelId

564+ "FILTER_BROWSER" -> Just PIGBFilterBrowser

565+ "FILTER_CAMPAIGN_DAILY_FREQUENCY" -> Just PIGBFilterCampaignDailyFrequency

566+ "FILTER_CARRIER" -> Just PIGBFilterCarrier

567+ "FILTER_CHANNEL_ID" -> Just PIGBFilterChannelId

568+ "FILTER_CITY" -> Just PIGBFilterCity

569+ "FILTER_CONVERSION_DELAY" -> Just PIGBFilterConversionDelay

570+ "FILTER_COUNTRY" -> Just PIGBFilterCountry

571+ "FILTER_CREATIVE_ID" -> Just PIGBFilterCreativeId

572+ "FILTER_CREATIVE_SIZE" -> Just PIGBFilterCreativeSize

573+ "FILTER_CREATIVE_TYPE" -> Just PIGBFilterCreativeType

574+ "FILTER_DATA_PROVIDER" -> Just PIGBFilterDataProvider

575+ "FILTER_DATE" -> Just PIGBFilterDate

576+ "FILTER_DAY_OF_WEEK" -> Just PIGBFilterDayOfWeek

577+ "FILTER_DMA" -> Just PIGBFilterDma

578+ "FILTER_EXCHANGE_ID" -> Just PIGBFilterExchangeId

579+ "FILTER_FLOODLIGHT_PIXEL_ID" -> Just PIGBFilterFloodlightPixelId

580+ "FILTER_GENDER" -> Just PIGBFilterGender

581+ "FILTER_INSERTION_ORDER" -> Just PIGBFilterInsertionOrder

582+ "FILTER_INVENTORY_FORMAT" -> Just PIGBFilterInventoryFormat

583+ "FILTER_INVENTORY_SOURCE" -> Just PIGBFilterInventorySource

584+ "FILTER_INVENTORY_SOURCE_TYPE" -> Just PIGBFilterInventorySourceType

585+ "FILTER_KEYWORD" -> Just PIGBFilterKeyword

586+ "FILTER_LINE_ITEM" -> Just PIGBFilterLineItem

587+ "FILTER_LINE_ITEM_DAILY_FREQUENCY" -> Just PIGBFilterLineItemDailyFrequency

588+ "FILTER_LINE_ITEM_LIFETIME_FREQUENCY" -> Just PIGBFilterLineItemLifetimeFrequency

589+ "FILTER_LINE_ITEM_TYPE" -> Just PIGBFilterLineItemType

590+ "FILTER_MOBILE_DEVICE_MAKE" -> Just PIGBFilterMobileDeviceMake

591+ "FILTER_MOBILE_DEVICE_MAKE_MODEL" -> Just PIGBFilterMobileDeviceMakeModel

592+ "FILTER_MOBILE_DEVICE_TYPE" -> Just PIGBFilterMobileDeviceType

593+ "FILTER_MOBILE_GEO" -> Just PIGBFilterMobileGeo

594+ "FILTER_MONTH" -> Just PIGBFilterMonth

595+ "FILTER_MRAID_SUPPORT" -> Just PIGBFilterMraidSupport

596+ "FILTER_NIELSEN_AGE" -> Just PIGBFilterNielsenAge

597+ "FILTER_NIELSEN_COUNTRY_CODE" -> Just PIGBFilterNielsenCountryCode

598+ "FILTER_NIELSEN_DEVICE_ID" -> Just PIGBFilterNielsenDeviceId

599+ "FILTER_NIELSEN_GENDER" -> Just PIGBFilterNielsenGender

600+ "FILTER_ORDER_ID" -> Just PIGBFilterOrderId

601+ "FILTER_OS" -> Just PIGBFilterOs

602+ "FILTER_PAGE_CATEGORY" -> Just PIGBFilterPageCategory

603+ "FILTER_PAGE_LAYOUT" -> Just PIGBFilterPageLayout

604+ "FILTER_PARTNER" -> Just PIGBFilterPartner

605+ "FILTER_PARTNER_CURRENCY" -> Just PIGBFilterPartnerCurrency

606+ "FILTER_PUBLIC_INVENTORY" -> Just PIGBFilterPublicInventory

607+ "FILTER_QUARTER" -> Just PIGBFilterQuarter

608+ "FILTER_REGION" -> Just PIGBFilterRegion

609+ "FILTER_REGULAR_CHANNEL_ID" -> Just PIGBFilterRegularChannelId

610+ "FILTER_SITE_ID" -> Just PIGBFilterSiteId

611+ "FILTER_SITE_LANGUAGE" -> Just PIGBFilterSiteLanguage

612+ "FILTER_TARGETED_USER_LIST" -> Just PIGBFilterTargetedUserList

613+ "FILTER_TIME_OF_DAY" -> Just PIGBFilterTimeOfDay

614+ "FILTER_TRUEVIEW_CONVERSION_TYPE" -> Just PIGBFilterTrueviewConversionType

615+ "FILTER_UNKNOWN" -> Just PIGBFilterUnknown

616+ "FILTER_USER_LIST" -> Just PIGBFilterUserList

617+ "FILTER_USER_LIST_FIRST_PARTY" -> Just PIGBFilterUserListFirstParty

618+ "FILTER_USER_LIST_THIRD_PARTY" -> Just PIGBFilterUserListThirdParty

619+ "FILTER_VIDEO_AD_POSITION_IN_STREAM" -> Just PIGBFilterVideoAdPositionInStream

620+ "FILTER_VIDEO_COMPANION_SIZE" -> Just PIGBFilterVideoCompanionSize

621+ "FILTER_VIDEO_COMPANION_TYPE" -> Just PIGBFilterVideoCompanionType

622+ "FILTER_VIDEO_CREATIVE_DURATION" -> Just PIGBFilterVideoCreativeDuration

623+ "FILTER_VIDEO_CREATIVE_DURATION_SKIPPABLE" -> Just PIGBFilterVideoCreativeDurationSkippable

624+ "FILTER_VIDEO_DURATION_SECONDS" -> Just PIGBFilterVideoDurationSeconds

625+ "FILTER_VIDEO_FORMAT_SUPPORT" -> Just PIGBFilterVideoFormatSupport

626+ "FILTER_VIDEO_INVENTORY_TYPE" -> Just PIGBFilterVideoInventoryType

627+ "FILTER_VIDEO_PLAYER_SIZE" -> Just PIGBFilterVideoPlayerSize

628+ "FILTER_VIDEO_RATING_TIER" -> Just PIGBFilterVideoRatingTier

629+ "FILTER_VIDEO_SKIPPABLE_SUPPORT" -> Just PIGBFilterVideoSkippableSupport

630+ "FILTER_VIDEO_VPAID_SUPPORT" -> Just PIGBFilterVideoVpaidSupport

631+ "FILTER_WEEK" -> Just PIGBFilterWeek

632+ "FILTER_YEAR" -> Just PIGBFilterYear

633+ "FILTER_YOUTUBE_VERTICAL" -> Just PIGBFilterYoutubeVertical

634+ "FILTER_ZIP_CODE" -> Just PIGBFilterZipCode

635+ _ -> Nothing

636+

637+instance ToText ParametersItemGroupBys where

638+ toText = \case

639+ PIGBFilterActiveViewExpectedViewability -> "FILTER_ACTIVE_VIEW_EXPECTED_VIEWABILITY"

640+ PIGBFilterActivityId -> "FILTER_ACTIVITY_ID"

641+ PIGBFilterAdvertiser -> "FILTER_ADVERTISER"

642+ PIGBFilterAdvertiserCurrency -> "FILTER_ADVERTISER_CURRENCY"

643+ PIGBFilterAdvertiserTimezone -> "FILTER_ADVERTISER_TIMEZONE"

644+ PIGBFilterAdPosition -> "FILTER_AD_POSITION"

645+ PIGBFilterAge -> "FILTER_AGE"

646+ PIGBFilterBrandsafeChannelId -> "FILTER_BRANDSAFE_CHANNEL_ID"

647+ PIGBFilterBrowser -> "FILTER_BROWSER"

648+ PIGBFilterCampaignDailyFrequency -> "FILTER_CAMPAIGN_DAILY_FREQUENCY"

649+ PIGBFilterCarrier -> "FILTER_CARRIER"

650+ PIGBFilterChannelId -> "FILTER_CHANNEL_ID"

651+ PIGBFilterCity -> "FILTER_CITY"

652+ PIGBFilterConversionDelay -> "FILTER_CONVERSION_DELAY"

653+ PIGBFilterCountry -> "FILTER_COUNTRY"

654+ PIGBFilterCreativeId -> "FILTER_CREATIVE_ID"

655+ PIGBFilterCreativeSize -> "FILTER_CREATIVE_SIZE"

656+ PIGBFilterCreativeType -> "FILTER_CREATIVE_TYPE"

657+ PIGBFilterDataProvider -> "FILTER_DATA_PROVIDER"

658+ PIGBFilterDate -> "FILTER_DATE"

659+ PIGBFilterDayOfWeek -> "FILTER_DAY_OF_WEEK"

660+ PIGBFilterDma -> "FILTER_DMA"

661+ PIGBFilterExchangeId -> "FILTER_EXCHANGE_ID"

662+ PIGBFilterFloodlightPixelId -> "FILTER_FLOODLIGHT_PIXEL_ID"

663+ PIGBFilterGender -> "FILTER_GENDER"

664+ PIGBFilterInsertionOrder -> "FILTER_INSERTION_ORDER"

665+ PIGBFilterInventoryFormat -> "FILTER_INVENTORY_FORMAT"

666+ PIGBFilterInventorySource -> "FILTER_INVENTORY_SOURCE"

667+ PIGBFilterInventorySourceType -> "FILTER_INVENTORY_SOURCE_TYPE"

668+ PIGBFilterKeyword -> "FILTER_KEYWORD"

669+ PIGBFilterLineItem -> "FILTER_LINE_ITEM"

670+ PIGBFilterLineItemDailyFrequency -> "FILTER_LINE_ITEM_DAILY_FREQUENCY"

671+ PIGBFilterLineItemLifetimeFrequency -> "FILTER_LINE_ITEM_LIFETIME_FREQUENCY"

672+ PIGBFilterLineItemType -> "FILTER_LINE_ITEM_TYPE"

673+ PIGBFilterMobileDeviceMake -> "FILTER_MOBILE_DEVICE_MAKE"

674+ PIGBFilterMobileDeviceMakeModel -> "FILTER_MOBILE_DEVICE_MAKE_MODEL"

675+ PIGBFilterMobileDeviceType -> "FILTER_MOBILE_DEVICE_TYPE"

676+ PIGBFilterMobileGeo -> "FILTER_MOBILE_GEO"

677+ PIGBFilterMonth -> "FILTER_MONTH"

678+ PIGBFilterMraidSupport -> "FILTER_MRAID_SUPPORT"

679+ PIGBFilterNielsenAge -> "FILTER_NIELSEN_AGE"

680+ PIGBFilterNielsenCountryCode -> "FILTER_NIELSEN_COUNTRY_CODE"

681+ PIGBFilterNielsenDeviceId -> "FILTER_NIELSEN_DEVICE_ID"

682+ PIGBFilterNielsenGender -> "FILTER_NIELSEN_GENDER"

683+ PIGBFilterOrderId -> "FILTER_ORDER_ID"

684+ PIGBFilterOs -> "FILTER_OS"

685+ PIGBFilterPageCategory -> "FILTER_PAGE_CATEGORY"

686+ PIGBFilterPageLayout -> "FILTER_PAGE_LAYOUT"

687+ PIGBFilterPartner -> "FILTER_PARTNER"

688+ PIGBFilterPartnerCurrency -> "FILTER_PARTNER_CURRENCY"

689+ PIGBFilterPublicInventory -> "FILTER_PUBLIC_INVENTORY"

690+ PIGBFilterQuarter -> "FILTER_QUARTER"

691+ PIGBFilterRegion -> "FILTER_REGION"

692+ PIGBFilterRegularChannelId -> "FILTER_REGULAR_CHANNEL_ID"

693+ PIGBFilterSiteId -> "FILTER_SITE_ID"

694+ PIGBFilterSiteLanguage -> "FILTER_SITE_LANGUAGE"

695+ PIGBFilterTargetedUserList -> "FILTER_TARGETED_USER_LIST"

696+ PIGBFilterTimeOfDay -> "FILTER_TIME_OF_DAY"

697+ PIGBFilterTrueviewConversionType -> "FILTER_TRUEVIEW_CONVERSION_TYPE"

698+ PIGBFilterUnknown -> "FILTER_UNKNOWN"

699+ PIGBFilterUserList -> "FILTER_USER_LIST"

700+ PIGBFilterUserListFirstParty -> "FILTER_USER_LIST_FIRST_PARTY"

701+ PIGBFilterUserListThirdParty -> "FILTER_USER_LIST_THIRD_PARTY"

702+ PIGBFilterVideoAdPositionInStream -> "FILTER_VIDEO_AD_POSITION_IN_STREAM"

703+ PIGBFilterVideoCompanionSize -> "FILTER_VIDEO_COMPANION_SIZE"

704+ PIGBFilterVideoCompanionType -> "FILTER_VIDEO_COMPANION_TYPE"

705+ PIGBFilterVideoCreativeDuration -> "FILTER_VIDEO_CREATIVE_DURATION"

706+ PIGBFilterVideoCreativeDurationSkippable -> "FILTER_VIDEO_CREATIVE_DURATION_SKIPPABLE"

707+ PIGBFilterVideoDurationSeconds -> "FILTER_VIDEO_DURATION_SECONDS"

708+ PIGBFilterVideoFormatSupport -> "FILTER_VIDEO_FORMAT_SUPPORT"

709+ PIGBFilterVideoInventoryType -> "FILTER_VIDEO_INVENTORY_TYPE"

710+ PIGBFilterVideoPlayerSize -> "FILTER_VIDEO_PLAYER_SIZE"

711+ PIGBFilterVideoRatingTier -> "FILTER_VIDEO_RATING_TIER"

712+ PIGBFilterVideoSkippableSupport -> "FILTER_VIDEO_SKIPPABLE_SUPPORT"

713+ PIGBFilterVideoVpaidSupport -> "FILTER_VIDEO_VPAID_SUPPORT"

714+ PIGBFilterWeek -> "FILTER_WEEK"

715+ PIGBFilterYear -> "FILTER_YEAR"

716+ PIGBFilterYoutubeVertical -> "FILTER_YOUTUBE_VERTICAL"

717+ PIGBFilterZipCode -> "FILTER_ZIP_CODE"

718+

364data ParametersItemMetrics

719data ParametersItemMetrics

365 = PIMMetricBidRequests

720 = PIMMetricBidRequests

366 -- ^ @METRIC_BID_REQUESTS@

721 -- ^ @METRIC_BID_REQUESTS@

@@ -844,6 +1199,491 @@ data ParametersItemMetrics

844

1199

845instance Hashable ParametersItemMetrics

1200instance Hashable ParametersItemMetrics

846

1201

1202+instance FromText ParametersItemMetrics where

1203+ fromText = \case

1204+ "METRIC_BID_REQUESTS" -> Just PIMMetricBidRequests

1205+ "METRIC_BILLABLE_COST_ADVERTISER" -> Just PIMMetricBillableCostAdvertiser

1206+ "METRIC_BILLABLE_COST_PARTNER" -> Just PIMMetricBillableCostPartner

1207+ "METRIC_BILLABLE_COST_USD" -> Just PIMMetricBillableCostUsd

1208+ "METRIC_CLICKS" -> Just PIMMetricClicks

1209+ "METRIC_CLICK_TO_POST_CLICK_CONVERSION_RATE" -> Just PIMMetricClickToPostClickConversionRate

1210+ "METRIC_COMSCORE_VCE_AUDIENCE_AVG_FREQUENCY" -> Just PIMMetricComscoreVceAudienceAvgFrequency

1211+ "METRIC_COMSCORE_VCE_AUDIENCE_IMPRESSIONS" -> Just PIMMetricComscoreVceAudienceImpressions

1212+ "METRIC_COMSCORE_VCE_AUDIENCE_IMPRESSIONS_SHARE" -> Just PIMMetricComscoreVceAudienceImpressionsShare

1213+ "METRIC_COMSCORE_VCE_AUDIENCE_REACH_PCT" -> Just PIMMetricComscoreVceAudienceReachPct

1214+ "METRIC_COMSCORE_VCE_AUDIENCE_SHARE_PCT" -> Just PIMMetricComscoreVceAudienceSharePct

1215+ "METRIC_COMSCORE_VCE_GROSS_RATING_POINTS" -> Just PIMMetricComscoreVceGrossRatingPoints

1216+ "METRIC_COMSCORE_VCE_POPULATION" -> Just PIMMetricComscoreVcePopulation

1217+ "METRIC_COMSCORE_VCE_UNIQUE_AUDIENCE" -> Just PIMMetricComscoreVceUniqueAudience

1218+ "METRIC_CONVERSIONS_PER_MILLE" -> Just PIMMetricConversionsPerMille

1219+ "METRIC_CPM_FEE1_ADVERTISER" -> Just PIMMetricCpmFEE1Advertiser

1220+ "METRIC_CPM_FEE1_PARTNER" -> Just PIMMetricCpmFEE1Partner

1221+ "METRIC_CPM_FEE1_USD" -> Just PIMMetricCpmFEE1Usd

1222+ "METRIC_CPM_FEE2_ADVERTISER" -> Just PIMMetricCpmFEE2Advertiser

1223+ "METRIC_CPM_FEE2_PARTNER" -> Just PIMMetricCpmFEE2Partner

1224+ "METRIC_CPM_FEE2_USD" -> Just PIMMetricCpmFEE2Usd

1225+ "METRIC_CPM_FEE3_ADVERTISER" -> Just PIMMetricCpmFEE3Advertiser

1226+ "METRIC_CPM_FEE3_PARTNER" -> Just PIMMetricCpmFEE3Partner

1227+ "METRIC_CPM_FEE3_USD" -> Just PIMMetricCpmFEE3Usd

1228+ "METRIC_CPM_FEE4_ADVERTISER" -> Just PIMMetricCpmFEE4Advertiser

1229+ "METRIC_CPM_FEE4_PARTNER" -> Just PIMMetricCpmFEE4Partner

1230+ "METRIC_CPM_FEE4_USD" -> Just PIMMetricCpmFEE4Usd

1231+ "METRIC_CPM_FEE5_ADVERTISER" -> Just PIMMetricCpmFEE5Advertiser

1232+ "METRIC_CPM_FEE5_PARTNER" -> Just PIMMetricCpmFEE5Partner

1233+ "METRIC_CPM_FEE5_USD" -> Just PIMMetricCpmFEE5Usd

1234+ "METRIC_CTR" -> Just PIMMetricCtr

1235+ "METRIC_DATA_COST_ADVERTISER" -> Just PIMMetricDataCostAdvertiser

1236+ "METRIC_DATA_COST_PARTNER" -> Just PIMMetricDataCostPartner

1237+ "METRIC_DATA_COST_USD" -> Just PIMMetricDataCostUsd

1238+ "METRIC_FEE10_ADVERTISER" -> Just PIMMetricFEE10Advertiser

1239+ "METRIC_FEE10_PARTNER" -> Just PIMMetricFEE10Partner

1240+ "METRIC_FEE10_USD" -> Just PIMMetricFEE10Usd

1241+ "METRIC_FEE11_ADVERTISER" -> Just PIMMetricFEE11Advertiser

1242+ "METRIC_FEE11_PARTNER" -> Just PIMMetricFEE11Partner

1243+ "METRIC_FEE11_USD" -> Just PIMMetricFEE11Usd

1244+ "METRIC_FEE12_ADVERTISER" -> Just PIMMetricFEE12Advertiser

1245+ "METRIC_FEE12_PARTNER" -> Just PIMMetricFEE12Partner

1246+ "METRIC_FEE12_USD" -> Just PIMMetricFEE12Usd

1247+ "METRIC_FEE13_ADVERTISER" -> Just PIMMetricFEE13Advertiser

1248+ "METRIC_FEE13_PARTNER" -> Just PIMMetricFEE13Partner

1249+ "METRIC_FEE13_USD" -> Just PIMMetricFEE13Usd

1250+ "METRIC_FEE14_ADVERTISER" -> Just PIMMetricFEE14Advertiser

1251+ "METRIC_FEE14_PARTNER" -> Just PIMMetricFEE14Partner

1252+ "METRIC_FEE14_USD" -> Just PIMMetricFEE14Usd

1253+ "METRIC_FEE15_ADVERTISER" -> Just PIMMetricFEE15Advertiser

1254+ "METRIC_FEE15_PARTNER" -> Just PIMMetricFEE15Partner

1255+ "METRIC_FEE15_USD" -> Just PIMMetricFEE15Usd

1256+ "METRIC_FEE16_ADVERTISER" -> Just PIMMetricFEE16Advertiser

1257+ "METRIC_FEE16_PARTNER" -> Just PIMMetricFEE16Partner

1258+ "METRIC_FEE16_USD" -> Just PIMMetricFEE16Usd

1259+ "METRIC_FEE17_ADVERTISER" -> Just PIMMetricFEE17Advertiser

1260+ "METRIC_FEE17_PARTNER" -> Just PIMMetricFEE17Partner

1261+ "METRIC_FEE17_USD" -> Just PIMMetricFEE17Usd

1262+ "METRIC_FEE18_ADVERTISER" -> Just PIMMetricFEE18Advertiser

1263+ "METRIC_FEE18_PARTNER" -> Just PIMMetricFEE18Partner

1264+ "METRIC_FEE18_USD" -> Just PIMMetricFEE18Usd

1265+ "METRIC_FEE19_ADVERTISER" -> Just PIMMetricFEE19Advertiser

1266+ "METRIC_FEE19_PARTNER" -> Just PIMMetricFEE19Partner

1267+ "METRIC_FEE19_USD" -> Just PIMMetricFEE19Usd

1268+ "METRIC_FEE20_ADVERTISER" -> Just PIMMetricFEE20Advertiser

1269+ "METRIC_FEE20_PARTNER" -> Just PIMMetricFEE20Partner

1270+ "METRIC_FEE20_USD" -> Just PIMMetricFEE20Usd

1271+ "METRIC_FEE2_ADVERTISER" -> Just PIMMetricFEE2Advertiser

1272+ "METRIC_FEE2_PARTNER" -> Just PIMMetricFEE2Partner

1273+ "METRIC_FEE2_USD" -> Just PIMMetricFEE2Usd

1274+ "METRIC_FEE3_ADVERTISER" -> Just PIMMetricFEE3Advertiser

1275+ "METRIC_FEE3_PARTNER" -> Just PIMMetricFEE3Partner

1276+ "METRIC_FEE3_USD" -> Just PIMMetricFEE3Usd

1277+ "METRIC_FEE4_ADVERTISER" -> Just PIMMetricFEE4Advertiser

1278+ "METRIC_FEE4_PARTNER" -> Just PIMMetricFEE4Partner

1279+ "METRIC_FEE4_USD" -> Just PIMMetricFEE4Usd

1280+ "METRIC_FEE5_ADVERTISER" -> Just PIMMetricFEE5Advertiser

1281+ "METRIC_FEE5_PARTNER" -> Just PIMMetricFEE5Partner

1282+ "METRIC_FEE5_USD" -> Just PIMMetricFEE5Usd

1283+ "METRIC_FEE6_ADVERTISER" -> Just PIMMetricFEE6Advertiser

1284+ "METRIC_FEE6_PARTNER" -> Just PIMMetricFEE6Partner

1285+ "METRIC_FEE6_USD" -> Just PIMMetricFEE6Usd

1286+ "METRIC_FEE7_ADVERTISER" -> Just PIMMetricFEE7Advertiser

1287+ "METRIC_FEE7_PARTNER" -> Just PIMMetricFEE7Partner

1288+ "METRIC_FEE7_USD" -> Just PIMMetricFEE7Usd

1289+ "METRIC_FEE8_ADVERTISER" -> Just PIMMetricFEE8Advertiser

1290+ "METRIC_FEE8_PARTNER" -> Just PIMMetricFEE8Partner

1291+ "METRIC_FEE8_USD" -> Just PIMMetricFEE8Usd

1292+ "METRIC_FEE9_ADVERTISER" -> Just PIMMetricFEE9Advertiser

1293+ "METRIC_FEE9_PARTNER" -> Just PIMMetricFEE9Partner

1294+ "METRIC_FEE9_USD" -> Just PIMMetricFEE9Usd

1295+ "METRIC_IMPRESSIONS" -> Just PIMMetricImpressions

1296+ "METRIC_IMPRESSIONS_TO_CONVERSION_RATE" -> Just PIMMetricImpressionsToConversionRate

1297+ "METRIC_LAST_CLICKS" -> Just PIMMetricLastClicks

1298+ "METRIC_LAST_IMPRESSIONS" -> Just PIMMetricLastImpressions

1299+ "METRIC_MEDIA_COST_ADVERTISER" -> Just PIMMetricMediaCostAdvertiser

1300+ "METRIC_MEDIA_COST_ECPAPC_ADVERTISER" -> Just PIMMetricMediaCostEcpapcAdvertiser

1301+ "METRIC_MEDIA_COST_ECPAPC_PARTNER" -> Just PIMMetricMediaCostEcpapcPartner

1302+ "METRIC_MEDIA_COST_ECPAPC_USD" -> Just PIMMetricMediaCostEcpapcUsd

1303+ "METRIC_MEDIA_COST_ECPAPV_ADVERTISER" -> Just PIMMetricMediaCostEcpapvAdvertiser

1304+ "METRIC_MEDIA_COST_ECPAPV_PARTNER" -> Just PIMMetricMediaCostEcpapvPartner

1305+ "METRIC_MEDIA_COST_ECPAPV_USD" -> Just PIMMetricMediaCostEcpapvUsd

1306+ "METRIC_MEDIA_COST_ECPA_ADVERTISER" -> Just PIMMetricMediaCostEcpaAdvertiser

1307+ "METRIC_MEDIA_COST_ECPA_PARTNER" -> Just PIMMetricMediaCostEcpaPartner

1308+ "METRIC_MEDIA_COST_ECPA_USD" -> Just PIMMetricMediaCostEcpaUsd

1309+ "METRIC_MEDIA_COST_ECPCV_ADVERTISER" -> Just PIMMetricMediaCostEcpcvAdvertiser

1310+ "METRIC_MEDIA_COST_ECPCV_PARTNER" -> Just PIMMetricMediaCostEcpcvPartner

1311+ "METRIC_MEDIA_COST_ECPCV_USD" -> Just PIMMetricMediaCostEcpcvUsd

1312+ "METRIC_MEDIA_COST_ECPC_ADVERTISER" -> Just PIMMetricMediaCostEcpcAdvertiser

1313+ "METRIC_MEDIA_COST_ECPC_PARTNER" -> Just PIMMetricMediaCostEcpcPartner

1314+ "METRIC_MEDIA_COST_ECPC_USD" -> Just PIMMetricMediaCostEcpcUsd

1315+ "METRIC_MEDIA_COST_ECPM_ADVERTISER" -> Just PIMMetricMediaCostEcpmAdvertiser

1316+ "METRIC_MEDIA_COST_ECPM_PARTNER" -> Just PIMMetricMediaCostEcpmPartner

1317+ "METRIC_MEDIA_COST_ECPM_USD" -> Just PIMMetricMediaCostEcpmUsd

1318+ "METRIC_MEDIA_COST_PARTNER" -> Just PIMMetricMediaCostPartner

1319+ "METRIC_MEDIA_COST_USD" -> Just PIMMetricMediaCostUsd

1320+ "METRIC_MEDIA_FEE1_ADVERTISER" -> Just PIMMetricMediaFEE1Advertiser

1321+ "METRIC_MEDIA_FEE1_PARTNER" -> Just PIMMetricMediaFEE1Partner

1322+ "METRIC_MEDIA_FEE1_USD" -> Just PIMMetricMediaFEE1Usd

1323+ "METRIC_MEDIA_FEE2_ADVERTISER" -> Just PIMMetricMediaFEE2Advertiser

1324+ "METRIC_MEDIA_FEE2_PARTNER" -> Just PIMMetricMediaFEE2Partner

1325+ "METRIC_MEDIA_FEE2_USD" -> Just PIMMetricMediaFEE2Usd

1326+ "METRIC_MEDIA_FEE3_ADVERTISER" -> Just PIMMetricMediaFEE3Advertiser

1327+ "METRIC_MEDIA_FEE3_PARTNER" -> Just PIMMetricMediaFEE3Partner

1328+ "METRIC_MEDIA_FEE3_USD" -> Just PIMMetricMediaFEE3Usd

1329+ "METRIC_MEDIA_FEE4_ADVERTISER" -> Just PIMMetricMediaFEE4Advertiser

1330+ "METRIC_MEDIA_FEE4_PARTNER" -> Just PIMMetricMediaFEE4Partner

1331+ "METRIC_MEDIA_FEE4_USD" -> Just PIMMetricMediaFEE4Usd

1332+ "METRIC_MEDIA_FEE5_ADVERTISER" -> Just PIMMetricMediaFEE5Advertiser

1333+ "METRIC_MEDIA_FEE5_PARTNER" -> Just PIMMetricMediaFEE5Partner

1334+ "METRIC_MEDIA_FEE5_USD" -> Just PIMMetricMediaFEE5Usd

1335+ "METRIC_PIXEL_LOADS" -> Just PIMMetricPixelLoads

1336+ "METRIC_PLATFORM_FEE_ADVERTISER" -> Just PIMMetricPlatformFeeAdvertiser

1337+ "METRIC_PLATFORM_FEE_PARTNER" -> Just PIMMetricPlatformFeePartner

1338+ "METRIC_PLATFORM_FEE_USD" -> Just PIMMetricPlatformFeeUsd

1339+ "METRIC_POST_CLICK_DFA_REVENUE" -> Just PIMMetricPostClickDfaRevenue

1340+ "METRIC_POST_VIEW_DFA_REVENUE" -> Just PIMMetricPostViewDfaRevenue

1341+ "METRIC_PROFIT_ADVERTISER" -> Just PIMMetricProfitAdvertiser

1342+ "METRIC_PROFIT_ECPAPC_ADVERTISER" -> Just PIMMetricProfitEcpapcAdvertiser

1343+ "METRIC_PROFIT_ECPAPC_PARTNER" -> Just PIMMetricProfitEcpapcPartner

1344+ "METRIC_PROFIT_ECPAPC_USD" -> Just PIMMetricProfitEcpapcUsd

1345+ "METRIC_PROFIT_ECPAPV_ADVERTISER" -> Just PIMMetricProfitEcpapvAdvertiser

1346+ "METRIC_PROFIT_ECPAPV_PARTNER" -> Just PIMMetricProfitEcpapvPartner

1347+ "METRIC_PROFIT_ECPAPV_USD" -> Just PIMMetricProfitEcpapvUsd

1348+ "METRIC_PROFIT_ECPA_ADVERTISER" -> Just PIMMetricProfitEcpaAdvertiser

1349+ "METRIC_PROFIT_ECPA_PARTNER" -> Just PIMMetricProfitEcpaPartner

1350+ "METRIC_PROFIT_ECPA_USD" -> Just PIMMetricProfitEcpaUsd

1351+ "METRIC_PROFIT_ECPC_ADVERTISER" -> Just PIMMetricProfitEcpcAdvertiser

1352+ "METRIC_PROFIT_ECPC_PARTNER" -> Just PIMMetricProfitEcpcPartner

1353+ "METRIC_PROFIT_ECPC_USD" -> Just PIMMetricProfitEcpcUsd

1354+ "METRIC_PROFIT_ECPM_ADVERTISER" -> Just PIMMetricProfitEcpmAdvertiser

1355+ "METRIC_PROFIT_ECPM_PARTNER" -> Just PIMMetricProfitEcpmPartner

1356+ "METRIC_PROFIT_ECPM_USD" -> Just PIMMetricProfitEcpmUsd

1357+ "METRIC_PROFIT_MARGIN" -> Just PIMMetricProfitMargin

1358+ "METRIC_PROFIT_PARTNER" -> Just PIMMetricProfitPartner

1359+ "METRIC_PROFIT_USD" -> Just PIMMetricProfitUsd

1360+ "METRIC_REVENUE_ADVERTISER" -> Just PIMMetricRevenueAdvertiser

1361+ "METRIC_REVENUE_ECPAPC_ADVERTISER" -> Just PIMMetricRevenueEcpapcAdvertiser

1362+ "METRIC_REVENUE_ECPAPC_PARTNER" -> Just PIMMetricRevenueEcpapcPartner

1363+ "METRIC_REVENUE_ECPAPC_USD" -> Just PIMMetricRevenueEcpapcUsd

1364+ "METRIC_REVENUE_ECPAPV_ADVERTISER" -> Just PIMMetricRevenueEcpapvAdvertiser

1365+ "METRIC_REVENUE_ECPAPV_PARTNER" -> Just PIMMetricRevenueEcpapvPartner

1366+ "METRIC_REVENUE_ECPAPV_USD" -> Just PIMMetricRevenueEcpapvUsd

1367+ "METRIC_REVENUE_ECPA_ADVERTISER" -> Just PIMMetricRevenueEcpaAdvertiser

1368+ "METRIC_REVENUE_ECPA_PARTNER" -> Just PIMMetricRevenueEcpaPartner

1369+ "METRIC_REVENUE_ECPA_USD" -> Just PIMMetricRevenueEcpaUsd

1370+ "METRIC_REVENUE_ECPCV_ADVERTISER" -> Just PIMMetricRevenueEcpcvAdvertiser

1371+ "METRIC_REVENUE_ECPCV_PARTNER" -> Just PIMMetricRevenueEcpcvPartner

1372+ "METRIC_REVENUE_ECPCV_USD" -> Just PIMMetricRevenueEcpcvUsd

1373+ "METRIC_REVENUE_ECPC_ADVERTISER" -> Just PIMMetricRevenueEcpcAdvertiser

1374+ "METRIC_REVENUE_ECPC_PARTNER" -> Just PIMMetricRevenueEcpcPartner

1375+ "METRIC_REVENUE_ECPC_USD" -> Just PIMMetricRevenueEcpcUsd

1376+ "METRIC_REVENUE_ECPM_ADVERTISER" -> Just PIMMetricRevenueEcpmAdvertiser

1377+ "METRIC_REVENUE_ECPM_PARTNER" -> Just PIMMetricRevenueEcpmPartner

1378+ "METRIC_REVENUE_ECPM_USD" -> Just PIMMetricRevenueEcpmUsd

1379+ "METRIC_REVENUE_PARTNER" -> Just PIMMetricRevenuePartner

1380+ "METRIC_REVENUE_USD" -> Just PIMMetricRevenueUsd

1381+ "METRIC_RICH_MEDIA_VIDEO_COMPLETIONS" -> Just PIMMetricRichMediaVideoCompletions

1382+ "METRIC_RICH_MEDIA_VIDEO_FIRST_QUARTILE_COMPLETES" -> Just PIMMetricRichMediaVideoFirstQuartileCompletes

1383+ "METRIC_RICH_MEDIA_VIDEO_FULL_SCREENS" -> Just PIMMetricRichMediaVideoFullScreens

1384+ "METRIC_RICH_MEDIA_VIDEO_MIDPOINTS" -> Just PIMMetricRichMediaVideoMidpoints

1385+ "METRIC_RICH_MEDIA_VIDEO_MUTES" -> Just PIMMetricRichMediaVideoMutes

1386+ "METRIC_RICH_MEDIA_VIDEO_PAUSES" -> Just PIMMetricRichMediaVideoPauses

1387+ "METRIC_RICH_MEDIA_VIDEO_PLAYS" -> Just PIMMetricRichMediaVideoPlays

1388+ "METRIC_RICH_MEDIA_VIDEO_SKIPS" -> Just PIMMetricRichMediaVideoSkips

1389+ "METRIC_RICH_MEDIA_VIDEO_THIRD_QUARTILE_COMPLETES" -> Just PIMMetricRichMediaVideoThirdQuartileCompletes

1390+ "METRIC_TEA_TRUEVIEW_IMPRESSIONS" -> Just PIMMetricTeaTrueviewImpressions

1391+ "METRIC_TEA_TRUEVIEW_UNIQUE_COOKIES" -> Just PIMMetricTeaTrueviewUniqueCookies

1392+ "METRIC_TEA_TRUEVIEW_UNIQUE_PEOPLE" -> Just PIMMetricTeaTrueviewUniquePeople

1393+ "METRIC_TOTAL_CONVERSIONS" -> Just PIMMetricTotalConversions

1394+ "METRIC_TOTAL_MEDIA_COST_ADVERTISER" -> Just PIMMetricTotalMediaCostAdvertiser

1395+ "METRIC_TOTAL_MEDIA_COST_ECPAPC_ADVERTISER" -> Just PIMMetricTotalMediaCostEcpapcAdvertiser

1396+ "METRIC_TOTAL_MEDIA_COST_ECPAPC_PARTNER" -> Just PIMMetricTotalMediaCostEcpapcPartner

1397+ "METRIC_TOTAL_MEDIA_COST_ECPAPC_USD" -> Just PIMMetricTotalMediaCostEcpapcUsd

1398+ "METRIC_TOTAL_MEDIA_COST_ECPAPV_ADVERTISER" -> Just PIMMetricTotalMediaCostEcpapvAdvertiser

1399+ "METRIC_TOTAL_MEDIA_COST_ECPAPV_PARTNER" -> Just PIMMetricTotalMediaCostEcpapvPartner

1400+ "METRIC_TOTAL_MEDIA_COST_ECPAPV_USD" -> Just PIMMetricTotalMediaCostEcpapvUsd

1401+ "METRIC_TOTAL_MEDIA_COST_ECPA_ADVERTISER" -> Just PIMMetricTotalMediaCostEcpaAdvertiser

1402+ "METRIC_TOTAL_MEDIA_COST_ECPA_PARTNER" -> Just PIMMetricTotalMediaCostEcpaPartner

1403+ "METRIC_TOTAL_MEDIA_COST_ECPA_USD" -> Just PIMMetricTotalMediaCostEcpaUsd

1404+ "METRIC_TOTAL_MEDIA_COST_ECPCV_ADVERTISER" -> Just PIMMetricTotalMediaCostEcpcvAdvertiser

1405+ "METRIC_TOTAL_MEDIA_COST_ECPCV_PARTNER" -> Just PIMMetricTotalMediaCostEcpcvPartner

1406+ "METRIC_TOTAL_MEDIA_COST_ECPCV_USD" -> Just PIMMetricTotalMediaCostEcpcvUsd

1407+ "METRIC_TOTAL_MEDIA_COST_ECPC_ADVERTISER" -> Just PIMMetricTotalMediaCostEcpcAdvertiser

1408+ "METRIC_TOTAL_MEDIA_COST_ECPC_PARTNER" -> Just PIMMetricTotalMediaCostEcpcPartner

1409+ "METRIC_TOTAL_MEDIA_COST_ECPC_USD" -> Just PIMMetricTotalMediaCostEcpcUsd

1410+ "METRIC_TOTAL_MEDIA_COST_ECPM_ADVERTISER" -> Just PIMMetricTotalMediaCostEcpmAdvertiser

1411+ "METRIC_TOTAL_MEDIA_COST_ECPM_PARTNER" -> Just PIMMetricTotalMediaCostEcpmPartner

1412+ "METRIC_TOTAL_MEDIA_COST_ECPM_USD" -> Just PIMMetricTotalMediaCostEcpmUsd

1413+ "METRIC_TOTAL_MEDIA_COST_PARTNER" -> Just PIMMetricTotalMediaCostPartner

1414+ "METRIC_TOTAL_MEDIA_COST_USD" -> Just PIMMetricTotalMediaCostUsd

1415+ "METRIC_TRUEVIEW_CONVERSION_MANY_PER_VIEW" -> Just PIMMetricTrueviewConversionManyPerView

1416+ "METRIC_TRUEVIEW_CONVERSION_ONE_PER_VIEW" -> Just PIMMetricTrueviewConversionOnePerView

1417+ "METRIC_TRUEVIEW_CONVERSION_RATE_ONE_PER_VIEW" -> Just PIMMetricTrueviewConversionRateOnePerView

1418+ "METRIC_TRUEVIEW_COST_CONVERSION_MANY_PER_VIEW_RATIO" -> Just PIMMetricTrueviewCostConversionManyPerViewRatio

1419+ "METRIC_TRUEVIEW_COST_CONVERSION_ONE_PER_VIEW_RATIO" -> Just PIMMetricTrueviewCostConversionOnePerViewRatio

1420+ "METRIC_TRUEVIEW_CPV_ADVERTISER" -> Just PIMMetricTrueviewCpvAdvertiser

1421+ "METRIC_TRUEVIEW_CPV_PARTNER" -> Just PIMMetricTrueviewCpvPartner

1422+ "METRIC_TRUEVIEW_CPV_USD" -> Just PIMMetricTrueviewCpvUsd

1423+ "METRIC_TRUEVIEW_EARNED_LIKES" -> Just PIMMetricTrueviewEarnedLikes

1424+ "METRIC_TRUEVIEW_EARNED_PLAYLIST_ADDITIONS" -> Just PIMMetricTrueviewEarnedPlaylistAdditions

1425+ "METRIC_TRUEVIEW_EARNED_SHARES" -> Just PIMMetricTrueviewEarnedShares

1426+ "METRIC_TRUEVIEW_EARNED_SUBSCRIBERS" -> Just PIMMetricTrueviewEarnedSubscribers

1427+ "METRIC_TRUEVIEW_EARNED_VIEWS" -> Just PIMMetricTrueviewEarnedViews

1428+ "METRIC_TRUEVIEW_IMPRESSION_SHARE" -> Just PIMMetricTrueviewImpressionShare

1429+ "METRIC_TRUEVIEW_LOST_IS_BUDGET" -> Just PIMMetricTrueviewLostIsBudget

1430+ "METRIC_TRUEVIEW_LOST_IS_RANK" -> Just PIMMetricTrueviewLostIsRank

1431+ "METRIC_TRUEVIEW_TOTAL_CONVERSION_VALUE" -> Just PIMMetricTrueviewTotalConversionValue

1432+ "METRIC_TRUEVIEW_UNIQUE_VIEWERS" -> Just PIMMetricTrueviewUniqueViewers

1433+ "METRIC_TRUEVIEW_VALUE_CONVERSION_MANY_PER_VIEW_RATIO" -> Just PIMMetricTrueviewValueConversionManyPerViewRatio

1434+ "METRIC_TRUEVIEW_VALUE_CONVERSION_ONE_PER_VIEW_RATIO" -> Just PIMMetricTrueviewValueConversionOnePerViewRatio

1435+ "METRIC_TRUEVIEW_VIEWS" -> Just PIMMetricTrueviewViews

1436+ "METRIC_TRUEVIEW_VIEW_RATE" -> Just PIMMetricTrueviewViewRate

1437+ "METRIC_TRUEVIEW_VIEW_THROUGH_CONVERSION" -> Just PIMMetricTrueviewViewThroughConversion

1438+ "METRIC_UNIQUE_VISITORS_COOKIES" -> Just PIMMetricUniqueVisitorsCookies

1439+ "METRIC_UNKNOWN" -> Just PIMMetricUnknown

1440+ "METRIC_VIDEO_COMPANION_CLICKS" -> Just PIMMetricVideoCompanionClicks

1441+ "METRIC_VIDEO_COMPANION_IMPRESSIONS" -> Just PIMMetricVideoCompanionImpressions

1442+ "METRIC_VIDEO_COMPLETION_RATE" -> Just PIMMetricVideoCompletionRate

1443+ _ -> Nothing

1444+

1445+instance ToText ParametersItemMetrics where

1446+ toText = \case

1447+ PIMMetricBidRequests -> "METRIC_BID_REQUESTS"

1448+ PIMMetricBillableCostAdvertiser -> "METRIC_BILLABLE_COST_ADVERTISER"

1449+ PIMMetricBillableCostPartner -> "METRIC_BILLABLE_COST_PARTNER"

1450+ PIMMetricBillableCostUsd -> "METRIC_BILLABLE_COST_USD"

1451+ PIMMetricClicks -> "METRIC_CLICKS"

1452+ PIMMetricClickToPostClickConversionRate -> "METRIC_CLICK_TO_POST_CLICK_CONVERSION_RATE"

1453+ PIMMetricComscoreVceAudienceAvgFrequency -> "METRIC_COMSCORE_VCE_AUDIENCE_AVG_FREQUENCY"

1454+ PIMMetricComscoreVceAudienceImpressions -> "METRIC_COMSCORE_VCE_AUDIENCE_IMPRESSIONS"

1455+ PIMMetricComscoreVceAudienceImpressionsShare -> "METRIC_COMSCORE_VCE_AUDIENCE_IMPRESSIONS_SHARE"

1456+ PIMMetricComscoreVceAudienceReachPct -> "METRIC_COMSCORE_VCE_AUDIENCE_REACH_PCT"

1457+ PIMMetricComscoreVceAudienceSharePct -> "METRIC_COMSCORE_VCE_AUDIENCE_SHARE_PCT"

1458+ PIMMetricComscoreVceGrossRatingPoints -> "METRIC_COMSCORE_VCE_GROSS_RATING_POINTS"

1459+ PIMMetricComscoreVcePopulation -> "METRIC_COMSCORE_VCE_POPULATION"

1460+ PIMMetricComscoreVceUniqueAudience -> "METRIC_COMSCORE_VCE_UNIQUE_AUDIENCE"

1461+ PIMMetricConversionsPerMille -> "METRIC_CONVERSIONS_PER_MILLE"

1462+ PIMMetricCpmFEE1Advertiser -> "METRIC_CPM_FEE1_ADVERTISER"

1463+ PIMMetricCpmFEE1Partner -> "METRIC_CPM_FEE1_PARTNER"

1464+ PIMMetricCpmFEE1Usd -> "METRIC_CPM_FEE1_USD"

1465+ PIMMetricCpmFEE2Advertiser -> "METRIC_CPM_FEE2_ADVERTISER"

1466+ PIMMetricCpmFEE2Partner -> "METRIC_CPM_FEE2_PARTNER"

1467+ PIMMetricCpmFEE2Usd -> "METRIC_CPM_FEE2_USD"

1468+ PIMMetricCpmFEE3Advertiser -> "METRIC_CPM_FEE3_ADVERTISER"

1469+ PIMMetricCpmFEE3Partner -> "METRIC_CPM_FEE3_PARTNER"

1470+ PIMMetricCpmFEE3Usd -> "METRIC_CPM_FEE3_USD"

1471+ PIMMetricCpmFEE4Advertiser -> "METRIC_CPM_FEE4_ADVERTISER"

1472+ PIMMetricCpmFEE4Partner -> "METRIC_CPM_FEE4_PARTNER"

1473+ PIMMetricCpmFEE4Usd -> "METRIC_CPM_FEE4_USD"

1474+ PIMMetricCpmFEE5Advertiser -> "METRIC_CPM_FEE5_ADVERTISER"

1475+ PIMMetricCpmFEE5Partner -> "METRIC_CPM_FEE5_PARTNER"

1476+ PIMMetricCpmFEE5Usd -> "METRIC_CPM_FEE5_USD"

1477+ PIMMetricCtr -> "METRIC_CTR"

1478+ PIMMetricDataCostAdvertiser -> "METRIC_DATA_COST_ADVERTISER"

1479+ PIMMetricDataCostPartner -> "METRIC_DATA_COST_PARTNER"

1480+ PIMMetricDataCostUsd -> "METRIC_DATA_COST_USD"

1481+ PIMMetricFEE10Advertiser -> "METRIC_FEE10_ADVERTISER"

1482+ PIMMetricFEE10Partner -> "METRIC_FEE10_PARTNER"

1483+ PIMMetricFEE10Usd -> "METRIC_FEE10_USD"

1484+ PIMMetricFEE11Advertiser -> "METRIC_FEE11_ADVERTISER"

1485+ PIMMetricFEE11Partner -> "METRIC_FEE11_PARTNER"

1486+ PIMMetricFEE11Usd -> "METRIC_FEE11_USD"

1487+ PIMMetricFEE12Advertiser -> "METRIC_FEE12_ADVERTISER"

1488+ PIMMetricFEE12Partner -> "METRIC_FEE12_PARTNER"

1489+ PIMMetricFEE12Usd -> "METRIC_FEE12_USD"

1490+ PIMMetricFEE13Advertiser -> "METRIC_FEE13_ADVERTISER"

1491+ PIMMetricFEE13Partner -> "METRIC_FEE13_PARTNER"

1492+ PIMMetricFEE13Usd -> "METRIC_FEE13_USD"

1493+ PIMMetricFEE14Advertiser -> "METRIC_FEE14_ADVERTISER"

1494+ PIMMetricFEE14Partner -> "METRIC_FEE14_PARTNER"

1495+ PIMMetricFEE14Usd -> "METRIC_FEE14_USD"

1496+ PIMMetricFEE15Advertiser -> "METRIC_FEE15_ADVERTISER"

1497+ PIMMetricFEE15Partner -> "METRIC_FEE15_PARTNER"

1498+ PIMMetricFEE15Usd -> "METRIC_FEE15_USD"

1499+ PIMMetricFEE16Advertiser -> "METRIC_FEE16_ADVERTISER"

1500+ PIMMetricFEE16Partner -> "METRIC_FEE16_PARTNER"

1501+ PIMMetricFEE16Usd -> "METRIC_FEE16_USD"

1502+ PIMMetricFEE17Advertiser -> "METRIC_FEE17_ADVERTISER"

1503+ PIMMetricFEE17Partner -> "METRIC_FEE17_PARTNER"

1504+ PIMMetricFEE17Usd -> "METRIC_FEE17_USD"

1505+ PIMMetricFEE18Advertiser -> "METRIC_FEE18_ADVERTISER"

1506+ PIMMetricFEE18Partner -> "METRIC_FEE18_PARTNER"

1507+ PIMMetricFEE18Usd -> "METRIC_FEE18_USD"

1508+ PIMMetricFEE19Advertiser -> "METRIC_FEE19_ADVERTISER"

1509+ PIMMetricFEE19Partner -> "METRIC_FEE19_PARTNER"

1510+ PIMMetricFEE19Usd -> "METRIC_FEE19_USD"

1511+ PIMMetricFEE20Advertiser -> "METRIC_FEE20_ADVERTISER"

1512+ PIMMetricFEE20Partner -> "METRIC_FEE20_PARTNER"

1513+ PIMMetricFEE20Usd -> "METRIC_FEE20_USD"

1514+ PIMMetricFEE2Advertiser -> "METRIC_FEE2_ADVERTISER"

1515+ PIMMetricFEE2Partner -> "METRIC_FEE2_PARTNER"

1516+ PIMMetricFEE2Usd -> "METRIC_FEE2_USD"

1517+ PIMMetricFEE3Advertiser -> "METRIC_FEE3_ADVERTISER"

1518+ PIMMetricFEE3Partner -> "METRIC_FEE3_PARTNER"

1519+ PIMMetricFEE3Usd -> "METRIC_FEE3_USD"

1520+ PIMMetricFEE4Advertiser -> "METRIC_FEE4_ADVERTISER"

1521+ PIMMetricFEE4Partner -> "METRIC_FEE4_PARTNER"

1522+ PIMMetricFEE4Usd -> "METRIC_FEE4_USD"

1523+ PIMMetricFEE5Advertiser -> "METRIC_FEE5_ADVERTISER"

1524+ PIMMetricFEE5Partner -> "METRIC_FEE5_PARTNER"

1525+ PIMMetricFEE5Usd -> "METRIC_FEE5_USD"

1526+ PIMMetricFEE6Advertiser -> "METRIC_FEE6_ADVERTISER"

1527+ PIMMetricFEE6Partner -> "METRIC_FEE6_PARTNER"

1528+ PIMMetricFEE6Usd -> "METRIC_FEE6_USD"

1529+ PIMMetricFEE7Advertiser -> "METRIC_FEE7_ADVERTISER"

1530+ PIMMetricFEE7Partner -> "METRIC_FEE7_PARTNER"

1531+ PIMMetricFEE7Usd -> "METRIC_FEE7_USD"

1532+ PIMMetricFEE8Advertiser -> "METRIC_FEE8_ADVERTISER"

1533+ PIMMetricFEE8Partner -> "METRIC_FEE8_PARTNER"

1534+ PIMMetricFEE8Usd -> "METRIC_FEE8_USD"

1535+ PIMMetricFEE9Advertiser -> "METRIC_FEE9_ADVERTISER"

1536+ PIMMetricFEE9Partner -> "METRIC_FEE9_PARTNER"

1537+ PIMMetricFEE9Usd -> "METRIC_FEE9_USD"

1538+ PIMMetricImpressions -> "METRIC_IMPRESSIONS"

1539+ PIMMetricImpressionsToConversionRate -> "METRIC_IMPRESSIONS_TO_CONVERSION_RATE"

1540+ PIMMetricLastClicks -> "METRIC_LAST_CLICKS"

1541+ PIMMetricLastImpressions -> "METRIC_LAST_IMPRESSIONS"

1542+ PIMMetricMediaCostAdvertiser -> "METRIC_MEDIA_COST_ADVERTISER"

1543+ PIMMetricMediaCostEcpapcAdvertiser -> "METRIC_MEDIA_COST_ECPAPC_ADVERTISER"

1544+ PIMMetricMediaCostEcpapcPartner -> "METRIC_MEDIA_COST_ECPAPC_PARTNER"

1545+ PIMMetricMediaCostEcpapcUsd -> "METRIC_MEDIA_COST_ECPAPC_USD"

1546+ PIMMetricMediaCostEcpapvAdvertiser -> "METRIC_MEDIA_COST_ECPAPV_ADVERTISER"

1547+ PIMMetricMediaCostEcpapvPartner -> "METRIC_MEDIA_COST_ECPAPV_PARTNER"

1548+ PIMMetricMediaCostEcpapvUsd -> "METRIC_MEDIA_COST_ECPAPV_USD"

1549+ PIMMetricMediaCostEcpaAdvertiser -> "METRIC_MEDIA_COST_ECPA_ADVERTISER"

1550+ PIMMetricMediaCostEcpaPartner -> "METRIC_MEDIA_COST_ECPA_PARTNER"

1551+ PIMMetricMediaCostEcpaUsd -> "METRIC_MEDIA_COST_ECPA_USD"

1552+ PIMMetricMediaCostEcpcvAdvertiser -> "METRIC_MEDIA_COST_ECPCV_ADVERTISER"

1553+ PIMMetricMediaCostEcpcvPartner -> "METRIC_MEDIA_COST_ECPCV_PARTNER"

1554+ PIMMetricMediaCostEcpcvUsd -> "METRIC_MEDIA_COST_ECPCV_USD"

1555+ PIMMetricMediaCostEcpcAdvertiser -> "METRIC_MEDIA_COST_ECPC_ADVERTISER"

1556+ PIMMetricMediaCostEcpcPartner -> "METRIC_MEDIA_COST_ECPC_PARTNER"

1557+ PIMMetricMediaCostEcpcUsd -> "METRIC_MEDIA_COST_ECPC_USD"

1558+ PIMMetricMediaCostEcpmAdvertiser -> "METRIC_MEDIA_COST_ECPM_ADVERTISER"

1559+ PIMMetricMediaCostEcpmPartner -> "METRIC_MEDIA_COST_ECPM_PARTNER"

1560+ PIMMetricMediaCostEcpmUsd -> "METRIC_MEDIA_COST_ECPM_USD"

1561+ PIMMetricMediaCostPartner -> "METRIC_MEDIA_COST_PARTNER"

1562+ PIMMetricMediaCostUsd -> "METRIC_MEDIA_COST_USD"

1563+ PIMMetricMediaFEE1Advertiser -> "METRIC_MEDIA_FEE1_ADVERTISER"

1564+ PIMMetricMediaFEE1Partner -> "METRIC_MEDIA_FEE1_PARTNER"

1565+ PIMMetricMediaFEE1Usd -> "METRIC_MEDIA_FEE1_USD"

1566+ PIMMetricMediaFEE2Advertiser -> "METRIC_MEDIA_FEE2_ADVERTISER"

1567+ PIMMetricMediaFEE2Partner -> "METRIC_MEDIA_FEE2_PARTNER"

1568+ PIMMetricMediaFEE2Usd -> "METRIC_MEDIA_FEE2_USD"

1569+ PIMMetricMediaFEE3Advertiser -> "METRIC_MEDIA_FEE3_ADVERTISER"

1570+ PIMMetricMediaFEE3Partner -> "METRIC_MEDIA_FEE3_PARTNER"

1571+ PIMMetricMediaFEE3Usd -> "METRIC_MEDIA_FEE3_USD"

1572+ PIMMetricMediaFEE4Advertiser -> "METRIC_MEDIA_FEE4_ADVERTISER"

1573+ PIMMetricMediaFEE4Partner -> "METRIC_MEDIA_FEE4_PARTNER"

1574+ PIMMetricMediaFEE4Usd -> "METRIC_MEDIA_FEE4_USD"

1575+ PIMMetricMediaFEE5Advertiser -> "METRIC_MEDIA_FEE5_ADVERTISER"

1576+ PIMMetricMediaFEE5Partner -> "METRIC_MEDIA_FEE5_PARTNER"

1577+ PIMMetricMediaFEE5Usd -> "METRIC_MEDIA_FEE5_USD"

1578+ PIMMetricPixelLoads -> "METRIC_PIXEL_LOADS"

1579+ PIMMetricPlatformFeeAdvertiser -> "METRIC_PLATFORM_FEE_ADVERTISER"

1580+ PIMMetricPlatformFeePartner -> "METRIC_PLATFORM_FEE_PARTNER"

1581+ PIMMetricPlatformFeeUsd -> "METRIC_PLATFORM_FEE_USD"

1582+ PIMMetricPostClickDfaRevenue -> "METRIC_POST_CLICK_DFA_REVENUE"

1583+ PIMMetricPostViewDfaRevenue -> "METRIC_POST_VIEW_DFA_REVENUE"

1584+ PIMMetricProfitAdvertiser -> "METRIC_PROFIT_ADVERTISER"

1585+ PIMMetricProfitEcpapcAdvertiser -> "METRIC_PROFIT_ECPAPC_ADVERTISER"

1586+ PIMMetricProfitEcpapcPartner -> "METRIC_PROFIT_ECPAPC_PARTNER"

1587+ PIMMetricProfitEcpapcUsd -> "METRIC_PROFIT_ECPAPC_USD"

1588+ PIMMetricProfitEcpapvAdvertiser -> "METRIC_PROFIT_ECPAPV_ADVERTISER"

1589+ PIMMetricProfitEcpapvPartner -> "METRIC_PROFIT_ECPAPV_PARTNER"

1590+ PIMMetricProfitEcpapvUsd -> "METRIC_PROFIT_ECPAPV_USD"

1591+ PIMMetricProfitEcpaAdvertiser -> "METRIC_PROFIT_ECPA_ADVERTISER"

1592+ PIMMetricProfitEcpaPartner -> "METRIC_PROFIT_ECPA_PARTNER"

1593+ PIMMetricProfitEcpaUsd -> "METRIC_PROFIT_ECPA_USD"

1594+ PIMMetricProfitEcpcAdvertiser -> "METRIC_PROFIT_ECPC_ADVERTISER"

1595+ PIMMetricProfitEcpcPartner -> "METRIC_PROFIT_ECPC_PARTNER"

1596+ PIMMetricProfitEcpcUsd -> "METRIC_PROFIT_ECPC_USD"

1597+ PIMMetricProfitEcpmAdvertiser -> "METRIC_PROFIT_ECPM_ADVERTISER"

1598+ PIMMetricProfitEcpmPartner -> "METRIC_PROFIT_ECPM_PARTNER"

1599+ PIMMetricProfitEcpmUsd -> "METRIC_PROFIT_ECPM_USD"

1600+ PIMMetricProfitMargin -> "METRIC_PROFIT_MARGIN"

1601+ PIMMetricProfitPartner -> "METRIC_PROFIT_PARTNER"

1602+ PIMMetricProfitUsd -> "METRIC_PROFIT_USD"

1603+ PIMMetricRevenueAdvertiser -> "METRIC_REVENUE_ADVERTISER"

1604+ PIMMetricRevenueEcpapcAdvertiser -> "METRIC_REVENUE_ECPAPC_ADVERTISER"

1605+ PIMMetricRevenueEcpapcPartner -> "METRIC_REVENUE_ECPAPC_PARTNER"

1606+ PIMMetricRevenueEcpapcUsd -> "METRIC_REVENUE_ECPAPC_USD"

1607+ PIMMetricRevenueEcpapvAdvertiser -> "METRIC_REVENUE_ECPAPV_ADVERTISER"

1608+ PIMMetricRevenueEcpapvPartner -> "METRIC_REVENUE_ECPAPV_PARTNER"

1609+ PIMMetricRevenueEcpapvUsd -> "METRIC_REVENUE_ECPAPV_USD"

1610+ PIMMetricRevenueEcpaAdvertiser -> "METRIC_REVENUE_ECPA_ADVERTISER"

1611+ PIMMetricRevenueEcpaPartner -> "METRIC_REVENUE_ECPA_PARTNER"

1612+ PIMMetricRevenueEcpaUsd -> "METRIC_REVENUE_ECPA_USD"

1613+ PIMMetricRevenueEcpcvAdvertiser -> "METRIC_REVENUE_ECPCV_ADVERTISER"

1614+ PIMMetricRevenueEcpcvPartner -> "METRIC_REVENUE_ECPCV_PARTNER"

1615+ PIMMetricRevenueEcpcvUsd -> "METRIC_REVENUE_ECPCV_USD"

1616+ PIMMetricRevenueEcpcAdvertiser -> "METRIC_REVENUE_ECPC_ADVERTISER"

1617+ PIMMetricRevenueEcpcPartner -> "METRIC_REVENUE_ECPC_PARTNER"

1618+ PIMMetricRevenueEcpcUsd -> "METRIC_REVENUE_ECPC_USD"

1619+ PIMMetricRevenueEcpmAdvertiser -> "METRIC_REVENUE_ECPM_ADVERTISER"

1620+ PIMMetricRevenueEcpmPartner -> "METRIC_REVENUE_ECPM_PARTNER"

1621+ PIMMetricRevenueEcpmUsd -> "METRIC_REVENUE_ECPM_USD"

1622+ PIMMetricRevenuePartner -> "METRIC_REVENUE_PARTNER"

1623+ PIMMetricRevenueUsd -> "METRIC_REVENUE_USD"

1624+ PIMMetricRichMediaVideoCompletions -> "METRIC_RICH_MEDIA_VIDEO_COMPLETIONS"

1625+ PIMMetricRichMediaVideoFirstQuartileCompletes -> "METRIC_RICH_MEDIA_VIDEO_FIRST_QUARTILE_COMPLETES"

1626+ PIMMetricRichMediaVideoFullScreens -> "METRIC_RICH_MEDIA_VIDEO_FULL_SCREENS"

1627+ PIMMetricRichMediaVideoMidpoints -> "METRIC_RICH_MEDIA_VIDEO_MIDPOINTS"

1628+ PIMMetricRichMediaVideoMutes -> "METRIC_RICH_MEDIA_VIDEO_MUTES"

1629+ PIMMetricRichMediaVideoPauses -> "METRIC_RICH_MEDIA_VIDEO_PAUSES"

1630+ PIMMetricRichMediaVideoPlays -> "METRIC_RICH_MEDIA_VIDEO_PLAYS"

1631+ PIMMetricRichMediaVideoSkips -> "METRIC_RICH_MEDIA_VIDEO_SKIPS"

1632+ PIMMetricRichMediaVideoThirdQuartileCompletes -> "METRIC_RICH_MEDIA_VIDEO_THIRD_QUARTILE_COMPLETES"

1633+ PIMMetricTeaTrueviewImpressions -> "METRIC_TEA_TRUEVIEW_IMPRESSIONS"

1634+ PIMMetricTeaTrueviewUniqueCookies -> "METRIC_TEA_TRUEVIEW_UNIQUE_COOKIES"

1635+ PIMMetricTeaTrueviewUniquePeople -> "METRIC_TEA_TRUEVIEW_UNIQUE_PEOPLE"

1636+ PIMMetricTotalConversions -> "METRIC_TOTAL_CONVERSIONS"

1637+ PIMMetricTotalMediaCostAdvertiser -> "METRIC_TOTAL_MEDIA_COST_ADVERTISER"

1638+ PIMMetricTotalMediaCostEcpapcAdvertiser -> "METRIC_TOTAL_MEDIA_COST_ECPAPC_ADVERTISER"

1639+ PIMMetricTotalMediaCostEcpapcPartner -> "METRIC_TOTAL_MEDIA_COST_ECPAPC_PARTNER"

1640+ PIMMetricTotalMediaCostEcpapcUsd -> "METRIC_TOTAL_MEDIA_COST_ECPAPC_USD"

1641+ PIMMetricTotalMediaCostEcpapvAdvertiser -> "METRIC_TOTAL_MEDIA_COST_ECPAPV_ADVERTISER"

1642+ PIMMetricTotalMediaCostEcpapvPartner -> "METRIC_TOTAL_MEDIA_COST_ECPAPV_PARTNER"

1643+ PIMMetricTotalMediaCostEcpapvUsd -> "METRIC_TOTAL_MEDIA_COST_ECPAPV_USD"

1644+ PIMMetricTotalMediaCostEcpaAdvertiser -> "METRIC_TOTAL_MEDIA_COST_ECPA_ADVERTISER"

1645+ PIMMetricTotalMediaCostEcpaPartner -> "METRIC_TOTAL_MEDIA_COST_ECPA_PARTNER"

1646+ PIMMetricTotalMediaCostEcpaUsd -> "METRIC_TOTAL_MEDIA_COST_ECPA_USD"

1647+ PIMMetricTotalMediaCostEcpcvAdvertiser -> "METRIC_TOTAL_MEDIA_COST_ECPCV_ADVERTISER"

1648+ PIMMetricTotalMediaCostEcpcvPartner -> "METRIC_TOTAL_MEDIA_COST_ECPCV_PARTNER"

1649+ PIMMetricTotalMediaCostEcpcvUsd -> "METRIC_TOTAL_MEDIA_COST_ECPCV_USD"

1650+ PIMMetricTotalMediaCostEcpcAdvertiser -> "METRIC_TOTAL_MEDIA_COST_ECPC_ADVERTISER"

1651+ PIMMetricTotalMediaCostEcpcPartner -> "METRIC_TOTAL_MEDIA_COST_ECPC_PARTNER"

1652+ PIMMetricTotalMediaCostEcpcUsd -> "METRIC_TOTAL_MEDIA_COST_ECPC_USD"

1653+ PIMMetricTotalMediaCostEcpmAdvertiser -> "METRIC_TOTAL_MEDIA_COST_ECPM_ADVERTISER"

1654+ PIMMetricTotalMediaCostEcpmPartner -> "METRIC_TOTAL_MEDIA_COST_ECPM_PARTNER"

1655+ PIMMetricTotalMediaCostEcpmUsd -> "METRIC_TOTAL_MEDIA_COST_ECPM_USD"

1656+ PIMMetricTotalMediaCostPartner -> "METRIC_TOTAL_MEDIA_COST_PARTNER"

1657+ PIMMetricTotalMediaCostUsd -> "METRIC_TOTAL_MEDIA_COST_USD"

1658+ PIMMetricTrueviewConversionManyPerView -> "METRIC_TRUEVIEW_CONVERSION_MANY_PER_VIEW"

1659+ PIMMetricTrueviewConversionOnePerView -> "METRIC_TRUEVIEW_CONVERSION_ONE_PER_VIEW"

1660+ PIMMetricTrueviewConversionRateOnePerView -> "METRIC_TRUEVIEW_CONVERSION_RATE_ONE_PER_VIEW"

1661+ PIMMetricTrueviewCostConversionManyPerViewRatio -> "METRIC_TRUEVIEW_COST_CONVERSION_MANY_PER_VIEW_RATIO"

1662+ PIMMetricTrueviewCostConversionOnePerViewRatio -> "METRIC_TRUEVIEW_COST_CONVERSION_ONE_PER_VIEW_RATIO"

1663+ PIMMetricTrueviewCpvAdvertiser -> "METRIC_TRUEVIEW_CPV_ADVERTISER"

1664+ PIMMetricTrueviewCpvPartner -> "METRIC_TRUEVIEW_CPV_PARTNER"

1665+ PIMMetricTrueviewCpvUsd -> "METRIC_TRUEVIEW_CPV_USD"

1666+ PIMMetricTrueviewEarnedLikes -> "METRIC_TRUEVIEW_EARNED_LIKES"

1667+ PIMMetricTrueviewEarnedPlaylistAdditions -> "METRIC_TRUEVIEW_EARNED_PLAYLIST_ADDITIONS"

1668+ PIMMetricTrueviewEarnedShares -> "METRIC_TRUEVIEW_EARNED_SHARES"

1669+ PIMMetricTrueviewEarnedSubscribers -> "METRIC_TRUEVIEW_EARNED_SUBSCRIBERS"

1670+ PIMMetricTrueviewEarnedViews -> "METRIC_TRUEVIEW_EARNED_VIEWS"

1671+ PIMMetricTrueviewImpressionShare -> "METRIC_TRUEVIEW_IMPRESSION_SHARE"

1672+ PIMMetricTrueviewLostIsBudget -> "METRIC_TRUEVIEW_LOST_IS_BUDGET"

1673+ PIMMetricTrueviewLostIsRank -> "METRIC_TRUEVIEW_LOST_IS_RANK"

1674+ PIMMetricTrueviewTotalConversionValue -> "METRIC_TRUEVIEW_TOTAL_CONVERSION_VALUE"

1675+ PIMMetricTrueviewUniqueViewers -> "METRIC_TRUEVIEW_UNIQUE_VIEWERS"

1676+ PIMMetricTrueviewValueConversionManyPerViewRatio -> "METRIC_TRUEVIEW_VALUE_CONVERSION_MANY_PER_VIEW_RATIO"

1677+ PIMMetricTrueviewValueConversionOnePerViewRatio -> "METRIC_TRUEVIEW_VALUE_CONVERSION_ONE_PER_VIEW_RATIO"

1678+ PIMMetricTrueviewViews -> "METRIC_TRUEVIEW_VIEWS"

1679+ PIMMetricTrueviewViewRate -> "METRIC_TRUEVIEW_VIEW_RATE"

1680+ PIMMetricTrueviewViewThroughConversion -> "METRIC_TRUEVIEW_VIEW_THROUGH_CONVERSION"

1681+ PIMMetricUniqueVisitorsCookies -> "METRIC_UNIQUE_VISITORS_COOKIES"

1682+ PIMMetricUnknown -> "METRIC_UNKNOWN"

1683+ PIMMetricVideoCompanionClicks -> "METRIC_VIDEO_COMPANION_CLICKS"

1684+ PIMMetricVideoCompanionImpressions -> "METRIC_VIDEO_COMPANION_IMPRESSIONS"

1685+ PIMMetricVideoCompletionRate -> "METRIC_VIDEO_COMPLETION_RATE"

1686+

847-- | Report type.

1687-- | Report type.

848data ParametersType

1688data ParametersType

849 = PTTypeActiveGrp

1689 = PTTypeActiveGrp

@@ -900,6 +1740,63 @@ data ParametersType

900

1740

901instance Hashable ParametersType

1741instance Hashable ParametersType

902

1742

1743+instance FromText ParametersType where

1744+ fromText = \case

1745+ "TYPE_ACTIVE_GRP" -> Just PTTypeActiveGrp

1746+ "TYPE_AUDIENCE_COMPOSITION" -> Just PTTypeAudienceComposition

1747+ "TYPE_AUDIENCE_PERFORMANCE" -> Just PTTypeAudiencePerformance

1748+ "TYPE_CLIENT_SAFE" -> Just PTTypeClientSafe

1749+ "TYPE_COMSCORE_VCE" -> Just PTTypeComscoreVce

1750+ "TYPE_CROSS_FEE" -> Just PTTypeCrossFee

1751+ "TYPE_CROSS_PARTNER" -> Just PTTypeCrossPartner

1752+ "TYPE_CROSS_PARTNER_THIRD_PARTY_DATA_PROVIDER" -> Just PTTypeCrossPartnerThirdPartyDataProvider

1753+ "TYPE_ESTIMATED_CONVERSION" -> Just PTTypeEstimatedConversion

1754+ "TYPE_FEE" -> Just PTTypeFee

1755+ "TYPE_GENERAL" -> Just PTTypeGeneral

1756+ "TYPE_INVENTORY_AVAILABILITY" -> Just PTTypeInventoryAvailability

1757+ "TYPE_KEYWORD" -> Just PTTypeKeyword

1758+ "TYPE_NIELSEN_AUDIENCE_PROFILE" -> Just PTTypeNielsenAudienceProfile

1759+ "TYPE_NIELSEN_DAILY_REACH_BUILD" -> Just PTTypeNielsenDailyReachBuild

1760+ "TYPE_NIELSEN_SITE" -> Just PTTypeNielsenSite

1761+ "TYPE_ORDER_ID" -> Just PTTypeOrderId

1762+ "TYPE_PAGE_CATEGORY" -> Just PTTypePageCategory

1763+ "TYPE_PIXEL_LOAD" -> Just PTTypePixelLoad

1764+ "TYPE_REACH_AND_FREQUENCY" -> Just PTTypeReachAndFrequency

1765+ "TYPE_THIRD_PARTY_DATA_PROVIDER" -> Just PTTypeThirdPartyDataProvider

1766+ "TYPE_TRUEVIEW" -> Just PTTypeTrueview

1767+ "TYPE_TRUEVIEW_IAR" -> Just PTTypeTrueviewIar

1768+ "TYPE_VERIFICATION" -> Just PTTypeVerification

1769+ "TYPE_YOUTUBE_VERTICAL" -> Just PTTypeYoutubeVertical

1770+ _ -> Nothing

1771+

1772+instance ToText ParametersType where

1773+ toText = \case

1774+ PTTypeActiveGrp -> "TYPE_ACTIVE_GRP"

1775+ PTTypeAudienceComposition -> "TYPE_AUDIENCE_COMPOSITION"

1776+ PTTypeAudiencePerformance -> "TYPE_AUDIENCE_PERFORMANCE"

1777+ PTTypeClientSafe -> "TYPE_CLIENT_SAFE"

1778+ PTTypeComscoreVce -> "TYPE_COMSCORE_VCE"

1779+ PTTypeCrossFee -> "TYPE_CROSS_FEE"

1780+ PTTypeCrossPartner -> "TYPE_CROSS_PARTNER"

1781+ PTTypeCrossPartnerThirdPartyDataProvider -> "TYPE_CROSS_PARTNER_THIRD_PARTY_DATA_PROVIDER"

1782+ PTTypeEstimatedConversion -> "TYPE_ESTIMATED_CONVERSION"

1783+ PTTypeFee -> "TYPE_FEE"

1784+ PTTypeGeneral -> "TYPE_GENERAL"

1785+ PTTypeInventoryAvailability -> "TYPE_INVENTORY_AVAILABILITY"

1786+ PTTypeKeyword -> "TYPE_KEYWORD"

1787+ PTTypeNielsenAudienceProfile -> "TYPE_NIELSEN_AUDIENCE_PROFILE"

1788+ PTTypeNielsenDailyReachBuild -> "TYPE_NIELSEN_DAILY_REACH_BUILD"

1789+ PTTypeNielsenSite -> "TYPE_NIELSEN_SITE"

1790+ PTTypeOrderId -> "TYPE_ORDER_ID"

1791+ PTTypePageCategory -> "TYPE_PAGE_CATEGORY"

1792+ PTTypePixelLoad -> "TYPE_PIXEL_LOAD"

1793+ PTTypeReachAndFrequency -> "TYPE_REACH_AND_FREQUENCY"

1794+ PTTypeThirdPartyDataProvider -> "TYPE_THIRD_PARTY_DATA_PROVIDER"

1795+ PTTypeTrueview -> "TYPE_TRUEVIEW"

1796+ PTTypeTrueviewIar -> "TYPE_TRUEVIEW_IAR"

1797+ PTTypeVerification -> "TYPE_VERIFICATION"

1798+ PTTypeYoutubeVertical -> "TYPE_YOUTUBE_VERTICAL"

1799+

903-- | Range of report data.

1800-- | Range of report data.

904data QueryMetadataDataRange

1801data QueryMetadataDataRange

905 = QMDRAllTime

1802 = QMDRAllTime

@@ -942,6 +1839,49 @@ data QueryMetadataDataRange

942

1839

943instance Hashable QueryMetadataDataRange

1840instance Hashable QueryMetadataDataRange

944

1841

1842+instance FromText QueryMetadataDataRange where

1843+ fromText = \case

1844+ "ALL_TIME" -> Just QMDRAllTime

1845+ "CURRENT_DAY" -> Just QMDRCurrentDay

1846+ "CUSTOM_DATES" -> Just QMDRCustomDates

1847+ "LAST_14_DAYS" -> Just QMDRLast14Days

1848+ "LAST_30_DAYS" -> Just QMDRLast30Days

1849+ "LAST_365_DAYS" -> Just QMDRLast365Days

1850+ "LAST_7_DAYS" -> Just QMDRLast7Days

1851+ "LAST_90_DAYS" -> Just QMDRLast90Days

1852+ "MONTH_TO_DATE" -> Just QMDRMonthToDate

1853+ "PREVIOUS_DAY" -> Just QMDRPreviousDay

1854+ "PREVIOUS_HALF_MONTH" -> Just QMDRPreviousHalfMonth

1855+ "PREVIOUS_MONTH" -> Just QMDRPreviousMonth

1856+ "PREVIOUS_QUARTER" -> Just QMDRPreviousQuarter

1857+ "PREVIOUS_WEEK" -> Just QMDRPreviousWeek

1858+ "PREVIOUS_YEAR" -> Just QMDRPreviousYear

1859+ "QUARTER_TO_DATE" -> Just QMDRQuarterToDate

1860+ "WEEK_TO_DATE" -> Just QMDRWeekToDate

1861+ "YEAR_TO_DATE" -> Just QMDRYearToDate

1862+ _ -> Nothing

1863+

1864+instance ToText QueryMetadataDataRange where

1865+ toText = \case

1866+ QMDRAllTime -> "ALL_TIME"

1867+ QMDRCurrentDay -> "CURRENT_DAY"

1868+ QMDRCustomDates -> "CUSTOM_DATES"

1869+ QMDRLast14Days -> "LAST_14_DAYS"

1870+ QMDRLast30Days -> "LAST_30_DAYS"

1871+ QMDRLast365Days -> "LAST_365_DAYS"

1872+ QMDRLast7Days -> "LAST_7_DAYS"

1873+ QMDRLast90Days -> "LAST_90_DAYS"

1874+ QMDRMonthToDate -> "MONTH_TO_DATE"

1875+ QMDRPreviousDay -> "PREVIOUS_DAY"

1876+ QMDRPreviousHalfMonth -> "PREVIOUS_HALF_MONTH"

1877+ QMDRPreviousMonth -> "PREVIOUS_MONTH"

1878+ QMDRPreviousQuarter -> "PREVIOUS_QUARTER"

1879+ QMDRPreviousWeek -> "PREVIOUS_WEEK"

1880+ QMDRPreviousYear -> "PREVIOUS_YEAR"

1881+ QMDRQuarterToDate -> "QUARTER_TO_DATE"

1882+ QMDRWeekToDate -> "WEEK_TO_DATE"

1883+ QMDRYearToDate -> "YEAR_TO_DATE"

1884+

945-- | Format of the generated report.

1885-- | Format of the generated report.

946data QueryMetadataFormat

1886data QueryMetadataFormat

947 = QMFCSV

1887 = QMFCSV

@@ -954,6 +1894,19 @@ data QueryMetadataFormat

954

1894

955instance Hashable QueryMetadataFormat

1895instance Hashable QueryMetadataFormat

956

1896

1897+instance FromText QueryMetadataFormat where

1898+ fromText = \case

1899+ "CSV" -> Just QMFCSV

1900+ "EXCEL_CSV" -> Just QMFExcelCSV

1901+ "XLSX" -> Just QMFXlsx

1902+ _ -> Nothing

1903+

1904+instance ToText QueryMetadataFormat where

1905+ toText = \case

1906+ QMFCSV -> "CSV"

1907+ QMFExcelCSV -> "EXCEL_CSV"

1908+ QMFXlsx -> "XLSX"

1909+

957-- | How often the query is run.

1910-- | How often the query is run.

958data QueryScheduleFrequency

1911data QueryScheduleFrequency

959 = QSFDaily

1912 = QSFDaily

@@ -972,6 +1925,25 @@ data QueryScheduleFrequency

972

1925

973instance Hashable QueryScheduleFrequency

1926instance Hashable QueryScheduleFrequency

974

1927

1928+instance FromText QueryScheduleFrequency where

1929+ fromText = \case

1930+ "DAILY" -> Just QSFDaily

1931+ "MONTHLY" -> Just QSFMonthly

1932+ "ONE_TIME" -> Just QSFOneTime

1933+ "QUARTERLY" -> Just QSFQuarterly

1934+ "SEMI_MONTHLY" -> Just QSFSemiMonthly

1935+ "WEEKLY" -> Just QSFWeekly

1936+ _ -> Nothing

1937+

1938+instance ToText QueryScheduleFrequency where

1939+ toText = \case

1940+ QSFDaily -> "DAILY"

1941+ QSFMonthly -> "MONTHLY"

1942+ QSFOneTime -> "ONE_TIME"

1943+ QSFQuarterly -> "QUARTERLY"

1944+ QSFSemiMonthly -> "SEMI_MONTHLY"

1945+ QSFWeekly -> "WEEKLY"

1946+

975-- | Error code that shows why the report was not created.

1947-- | Error code that shows why the report was not created.

976data ReportFailureErrorCode

1948data ReportFailureErrorCode

977 = RFECAuthenticationError

1949 = RFECAuthenticationError

@@ -1014,6 +1986,49 @@ data ReportFailureErrorCode

1014

1986

1015instance Hashable ReportFailureErrorCode

1987instance Hashable ReportFailureErrorCode

1016

1988

1989+instance FromText ReportFailureErrorCode where

1990+ fromText = \case

1991+ "AUTHENTICATION_ERROR" -> Just RFECAuthenticationError

1992+ "DEPRECATED_REPORTING_INVALID_QUERY" -> Just RFECDeprecatedReportingInvalidQuery

1993+ "REPORTING_BUCKET_NOT_FOUND" -> Just RFECReportingBucketNotFound

1994+ "REPORTING_CREATE_BUCKET_FAILED" -> Just RFECReportingCreateBucketFailed

1995+ "REPORTING_DELETE_BUCKET_FAILED" -> Just RFECReportingDeleteBucketFailed

1996+ "REPORTING_FATAL_ERROR" -> Just RFECReportingFatalError

1997+ "REPORTING_ILLEGAL_FILENAME" -> Just RFECReportingIllegalFilename

1998+ "REPORTING_IMCOMPATIBLE_METRICS" -> Just RFECReportingImcompatibleMetrics

1999+ "REPORTING_INVALID_QUERY_MISSING_PARTNER_AND_ADVERTISER_FILTERS" -> Just RFECReportingInvalidQueryMissingPartnerAndAdvertiserFilters

2000+ "REPORTING_INVALID_QUERY_TITLE_MISSING" -> Just RFECReportingInvalidQueryTitleMissing

2001+ "REPORTING_INVALID_QUERY_TOO_MANY_UNFILTERED_LARGE_GROUP_BYS" -> Just RFECReportingInvalidQueryTooManyUnfilteredLargeGroupBys

2002+ "REPORTING_QUERY_NOT_FOUND" -> Just RFECReportingQueryNotFound

2003+ "REPORTING_TRANSIENT_ERROR" -> Just RFECReportingTransientError

2004+ "REPORTING_UPDATE_BUCKET_PERMISSION_FAILED" -> Just RFECReportingUpdateBucketPermissionFailed

2005+ "REPORTING_WRITE_BUCKET_OBJECT_FAILED" -> Just RFECReportingWriteBucketObjectFailed

2006+ "SERVER_ERROR" -> Just RFECServerError

2007+ "UNAUTHORIZED_API_ACCESS" -> Just RFECUnauthorizedAPIAccess

2008+ "VALIDATION_ERROR" -> Just RFECValidationError

2009+ _ -> Nothing

2010+

2011+instance ToText ReportFailureErrorCode where

2012+ toText = \case

2013+ RFECAuthenticationError -> "AUTHENTICATION_ERROR"

2014+ RFECDeprecatedReportingInvalidQuery -> "DEPRECATED_REPORTING_INVALID_QUERY"

2015+ RFECReportingBucketNotFound -> "REPORTING_BUCKET_NOT_FOUND"

2016+ RFECReportingCreateBucketFailed -> "REPORTING_CREATE_BUCKET_FAILED"

2017+ RFECReportingDeleteBucketFailed -> "REPORTING_DELETE_BUCKET_FAILED"

2018+ RFECReportingFatalError -> "REPORTING_FATAL_ERROR"

2019+ RFECReportingIllegalFilename -> "REPORTING_ILLEGAL_FILENAME"

2020+ RFECReportingImcompatibleMetrics -> "REPORTING_IMCOMPATIBLE_METRICS"

2021+ RFECReportingInvalidQueryMissingPartnerAndAdvertiserFilters -> "REPORTING_INVALID_QUERY_MISSING_PARTNER_AND_ADVERTISER_FILTERS"

2022+ RFECReportingInvalidQueryTitleMissing -> "REPORTING_INVALID_QUERY_TITLE_MISSING"

2023+ RFECReportingInvalidQueryTooManyUnfilteredLargeGroupBys -> "REPORTING_INVALID_QUERY_TOO_MANY_UNFILTERED_LARGE_GROUP_BYS"

2024+ RFECReportingQueryNotFound -> "REPORTING_QUERY_NOT_FOUND"

2025+ RFECReportingTransientError -> "REPORTING_TRANSIENT_ERROR"

2026+ RFECReportingUpdateBucketPermissionFailed -> "REPORTING_UPDATE_BUCKET_PERMISSION_FAILED"

2027+ RFECReportingWriteBucketObjectFailed -> "REPORTING_WRITE_BUCKET_OBJECT_FAILED"

2028+ RFECServerError -> "SERVER_ERROR"

2029+ RFECUnauthorizedAPIAccess -> "UNAUTHORIZED_API_ACCESS"

2030+ RFECValidationError -> "VALIDATION_ERROR"

2031+

1017-- | The file type of the report.

2032-- | The file type of the report.

1018data ReportStatusFormat

2033data ReportStatusFormat

1019 = RSFCSV

2034 = RSFCSV

@@ -1026,6 +2041,19 @@ data ReportStatusFormat

1026

2041

1027instance Hashable ReportStatusFormat

2042instance Hashable ReportStatusFormat

1028

2043

2044+instance FromText ReportStatusFormat where

2045+ fromText = \case

2046+ "CSV" -> Just RSFCSV

2047+ "EXCEL_CSV" -> Just RSFExcelCSV

2048+ "XLSX" -> Just RSFXlsx

2049+ _ -> Nothing

2050+

2051+instance ToText ReportStatusFormat where

2052+ toText = \case

2053+ RSFCSV -> "CSV"

2054+ RSFExcelCSV -> "EXCEL_CSV"

2055+ RSFXlsx -> "XLSX"

2056+

1029-- | The state of the report.

2057-- | The state of the report.

1030data ReportStatusState

2058data ReportStatusState

1031 = RSSDone

2059 = RSSDone

@@ -1038,6 +2066,19 @@ data ReportStatusState

1038

2066

1039instance Hashable ReportStatusState

2067instance Hashable ReportStatusState

1040

2068

2069+instance FromText ReportStatusState where

2070+ fromText = \case

2071+ "DONE" -> Just RSSDone

2072+ "FAILED" -> Just RSSFailed

2073+ "RUNNING" -> Just RSSRunning

2074+ _ -> Nothing

2075+

2076+instance ToText ReportStatusState where

2077+ toText = \case

2078+ RSSDone -> "DONE"

2079+ RSSFailed -> "FAILED"

2080+ RSSRunning -> "RUNNING"

2081+

1041-- | Report data range used to generate the report.

2082-- | Report data range used to generate the report.

1042data RunQueryRequestDataRange

2083data RunQueryRequestDataRange

1043 = RQRDRAllTime

2084 = RQRDRAllTime

@@ -1080,6 +2121,49 @@ data RunQueryRequestDataRange

1080

2121

1081instance Hashable RunQueryRequestDataRange

2122instance Hashable RunQueryRequestDataRange

1082

2123

2124+instance FromText RunQueryRequestDataRange where

2125+ fromText = \case

2126+ "ALL_TIME" -> Just RQRDRAllTime

2127+ "CURRENT_DAY" -> Just RQRDRCurrentDay

2128+ "CUSTOM_DATES" -> Just RQRDRCustomDates

2129+ "LAST_14_DAYS" -> Just RQRDRLast14Days

2130+ "LAST_30_DAYS" -> Just RQRDRLast30Days

2131+ "LAST_365_DAYS" -> Just RQRDRLast365Days

2132+ "LAST_7_DAYS" -> Just RQRDRLast7Days

2133+ "LAST_90_DAYS" -> Just RQRDRLast90Days

2134+ "MONTH_TO_DATE" -> Just RQRDRMonthToDate

2135+ "PREVIOUS_DAY" -> Just RQRDRPreviousDay

2136+ "PREVIOUS_HALF_MONTH" -> Just RQRDRPreviousHalfMonth

2137+ "PREVIOUS_MONTH" -> Just RQRDRPreviousMonth

2138+ "PREVIOUS_QUARTER" -> Just RQRDRPreviousQuarter

2139+ "PREVIOUS_WEEK" -> Just RQRDRPreviousWeek

2140+ "PREVIOUS_YEAR" -> Just RQRDRPreviousYear

2141+ "QUARTER_TO_DATE" -> Just RQRDRQuarterToDate

2142+ "WEEK_TO_DATE" -> Just RQRDRWeekToDate

2143+ "YEAR_TO_DATE" -> Just RQRDRYearToDate

2144+ _ -> Nothing

2145+

2146+instance ToText RunQueryRequestDataRange where

2147+ toText = \case

2148+ RQRDRAllTime -> "ALL_TIME"

2149+ RQRDRCurrentDay -> "CURRENT_DAY"

2150+ RQRDRCustomDates -> "CUSTOM_DATES"

2151+ RQRDRLast14Days -> "LAST_14_DAYS"

2152+ RQRDRLast30Days -> "LAST_30_DAYS"

2153+ RQRDRLast365Days -> "LAST_365_DAYS"

2154+ RQRDRLast7Days -> "LAST_7_DAYS"

2155+ RQRDRLast90Days -> "LAST_90_DAYS"

2156+ RQRDRMonthToDate -> "MONTH_TO_DATE"

2157+ RQRDRPreviousDay -> "PREVIOUS_DAY"

2158+ RQRDRPreviousHalfMonth -> "PREVIOUS_HALF_MONTH"

2159+ RQRDRPreviousMonth -> "PREVIOUS_MONTH"

2160+ RQRDRPreviousQuarter -> "PREVIOUS_QUARTER"

2161+ RQRDRPreviousWeek -> "PREVIOUS_WEEK"

2162+ RQRDRPreviousYear -> "PREVIOUS_YEAR"

2163+ RQRDRQuarterToDate -> "QUARTER_TO_DATE"

2164+ RQRDRWeekToDate -> "WEEK_TO_DATE"

2165+ RQRDRYearToDate -> "YEAR_TO_DATE"

2166+

1083-- | Format the line items are in. Default to CSV.

2167-- | Format the line items are in. Default to CSV.

1084data UploadLineItemsRequestFormat

2168data UploadLineItemsRequestFormat

1085 = ULIRFCSV

2169 = ULIRFCSV

@@ -1087,3 +2171,12 @@ data UploadLineItemsRequestFormat

1087 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

2171 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

1088

2172

1089instance Hashable UploadLineItemsRequestFormat

2173instance Hashable UploadLineItemsRequestFormat

2174+

2175+instance FromText UploadLineItemsRequestFormat where

2176+ fromText = \case

2177+ "CSV" -> Just ULIRFCSV

2178+ _ -> Nothing

2179+

2180+instance ToText UploadLineItemsRequestFormat where

2181+ toText = \case

2182+ ULIRFCSV -> "CSV"

gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.DoubleClickSearch.Types

8-- Module : Network.Google.DoubleClickSearch.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.DoubleClickSearch.Types

15module Network.Google.DoubleClickSearch.Types

14 (

16 (

15− -- * API Definition

16− doubleclicksearch

17−

18

17

19 -- * Availability

18 -- * Availability

20− , Availability

19+ Availability

21 , availability

20 , availability

22 , aAgencyId

21 , aAgencyId

23 , aAdvertiserId

22 , aAdvertiserId

@@ -194,6 +193,3 @@ module Network.Google.DoubleClickSearch.Types

194import Network.Google.DoubleClickSearch.Types.Product

193import Network.Google.DoubleClickSearch.Types.Product

195import Network.Google.DoubleClickSearch.Types.Sum

194import Network.Google.DoubleClickSearch.Types.Sum

196import Network.Google.Prelude

195import Network.Google.Prelude

197−

198−doubleclicksearch :: a

199−doubleclicksearch = error "doubleclicksearch"

gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.DoubleClickSearch.Types.Product

8-- Module : Network.Google.DoubleClickSearch.Types.Product

gogol-doubleclick-search/gen/Network/Google/DoubleClickSearch/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.DoubleClickSearch.Types.Sum

9-- Module : Network.Google.DoubleClickSearch.Types.Sum

gogol-drive/gen/Network/Google/Drive/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Drive.Types

8-- Module : Network.Google.Drive.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Drive.Types

15module Network.Google.Drive.Types

14 (

16 (

15− -- * API Definition

16− drive

17−

18

17

19 -- * About

18 -- * About

20− , About

19+ About

21 , about

20 , about

22 , aExportFormats

21 , aExportFormats

23 , aRemainingChangeIds

22 , aRemainingChangeIds

@@ -508,6 +507,3 @@ module Network.Google.Drive.Types

508import Network.Google.Drive.Types.Product

507import Network.Google.Drive.Types.Product

509import Network.Google.Drive.Types.Sum

508import Network.Google.Drive.Types.Sum

510import Network.Google.Prelude

509import Network.Google.Prelude

511−

512−drive :: a

513−drive = error "drive"

gogol-drive/gen/Network/Google/Drive/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Drive.Types.Product

8-- Module : Network.Google.Drive.Types.Product

gogol-drive/gen/Network/Google/Drive/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Drive.Types.Sum

9-- Module : Network.Google.Drive.Types.Sum

gogol-fitness/gen/Network/Google/Fitness/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Fitness.Types

8-- Module : Network.Google.Fitness.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Fitness.Types

15module Network.Google.Fitness.Types

14 (

16 (

15− -- * API Definition

16− fitness

17−

18

17

19 -- * AggregateBucket

18 -- * AggregateBucket

20− , AggregateBucket

19+ AggregateBucket

21 , aggregateBucket

20 , aggregateBucket

22 , abEndTimeMillis

21 , abEndTimeMillis

23 , abDataset

22 , abDataset

@@ -186,6 +185,3 @@ module Network.Google.Fitness.Types

186import Network.Google.Fitness.Types.Product

185import Network.Google.Fitness.Types.Product

187import Network.Google.Fitness.Types.Sum

186import Network.Google.Fitness.Types.Sum

188import Network.Google.Prelude

187import Network.Google.Prelude

189−

190−fitness :: a

191−fitness = error "fitness"

gogol-fitness/gen/Network/Google/Fitness/Types/Product.hs+6−4

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Fitness.Types.Product

8-- Module : Network.Google.Fitness.Types.Product

@@ -24,7 +26,7 @@ data AggregateBucket = AggregateBucket

24 , _abType :: !(Maybe AggregateBucketType)

26 , _abType :: !(Maybe AggregateBucketType)

25 , _abStartTimeMillis :: !(Maybe Int64)

27 , _abStartTimeMillis :: !(Maybe Int64)

26 , _abSession :: !(Maybe (Maybe Session))

28 , _abSession :: !(Maybe (Maybe Session))

27− }

29+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

28

30

29-- | Creates a value of 'AggregateBucket' with the minimum fields required to make a request.

31-- | Creates a value of 'AggregateBucket' with the minimum fields required to make a request.

30--

32--

@@ -542,7 +544,7 @@ data DataSource = DataSource

542 , _dsType :: !(Maybe DataSourceType)

544 , _dsType :: !(Maybe DataSourceType)

543 , _dsDataStreamName :: !(Maybe Text)

545 , _dsDataStreamName :: !(Maybe Text)

544 , _dsDataStreamId :: !(Maybe Text)

546 , _dsDataStreamId :: !(Maybe Text)

545− }

547+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

546

548

547-- | Creates a value of 'DataSource' with the minimum fields required to make a request.

549-- | Creates a value of 'DataSource' with the minimum fields required to make a request.

548--

550--

@@ -686,7 +688,7 @@ data DataTypeField = DataTypeField

686 { _dtfFormat :: !(Maybe DataTypeFieldFormat)

688 { _dtfFormat :: !(Maybe DataTypeFieldFormat)

687 , _dtfName :: !(Maybe Text)

689 , _dtfName :: !(Maybe Text)

688 , _dtfOptional :: !(Maybe Bool)

690 , _dtfOptional :: !(Maybe Bool)

689− }

691+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

690

692

691-- | Creates a value of 'DataTypeField' with the minimum fields required to make a request.

693-- | Creates a value of 'DataTypeField' with the minimum fields required to make a request.

692--

694--

@@ -817,7 +819,7 @@ data Device = Device

817 , _dModel :: !(Maybe Text)

819 , _dModel :: !(Maybe Text)

818 , _dVersion :: !(Maybe Text)

820 , _dVersion :: !(Maybe Text)

819 , _dType :: !(Maybe DeviceType)

821 , _dType :: !(Maybe DeviceType)

820− }

822+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

821

823

822-- | Creates a value of 'Device' with the minimum fields required to make a request.

824-- | Creates a value of 'Device' with the minimum fields required to make a request.

823--

825--

gogol-fitness/gen/Network/Google/Fitness/Types/Sum.hs+69

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Fitness.Types.Sum

9-- Module : Network.Google.Fitness.Types.Sum

@@ -31,6 +34,23 @@ data AggregateBucketType

31

34

32instance Hashable AggregateBucketType

35instance Hashable AggregateBucketType

33

36

37+instance FromText AggregateBucketType where

38+ fromText = \case

39+ "activitySegment" -> Just ABTActivitySegment

40+ "activityType" -> Just ABTActivityType

41+ "session" -> Just ABTSession

42+ "time" -> Just ABTTime

43+ "unknown" -> Just ABTUnknown

44+ _ -> Nothing

45+

46+instance ToText AggregateBucketType where

47+ toText = \case

48+ ABTActivitySegment -> "activitySegment"

49+ ABTActivityType -> "activityType"

50+ ABTSession -> "session"

51+ ABTTime -> "time"

52+ ABTUnknown -> "unknown"

53+

34-- | A constant describing the type of this data source. Indicates whether

54-- | A constant describing the type of this data source. Indicates whether

35-- this data source produces raw or derived data.

55-- this data source produces raw or derived data.

36data DataSourceType

56data DataSourceType

@@ -42,6 +62,17 @@ data DataSourceType

42

62

43instance Hashable DataSourceType

63instance Hashable DataSourceType

44

64

65+instance FromText DataSourceType where

66+ fromText = \case

67+ "derived" -> Just DSTDerived

68+ "raw" -> Just DSTRaw

69+ _ -> Nothing

70+

71+instance ToText DataSourceType where

72+ toText = \case

73+ DSTDerived -> "derived"

74+ DSTRaw -> "raw"

75+

45-- | The different supported formats for each field in a data type.

76-- | The different supported formats for each field in a data type.

46data DataTypeFieldFormat

77data DataTypeFieldFormat

47 = DTFFFloatList

78 = DTFFFloatList

@@ -60,6 +91,25 @@ data DataTypeFieldFormat

60

91

61instance Hashable DataTypeFieldFormat

92instance Hashable DataTypeFieldFormat

62

93

94+instance FromText DataTypeFieldFormat where

95+ fromText = \case

96+ "floatList" -> Just DTFFFloatList

97+ "floatPoint" -> Just DTFFFloatPoint

98+ "integer" -> Just DTFFInteger

99+ "integerList" -> Just DTFFIntegerList

100+ "map" -> Just DTFFMap

101+ "string" -> Just DTFFString

102+ _ -> Nothing

103+

104+instance ToText DataTypeFieldFormat where

105+ toText = \case

106+ DTFFFloatList -> "floatList"

107+ DTFFFloatPoint -> "floatPoint"

108+ DTFFInteger -> "integer"

109+ DTFFIntegerList -> "integerList"

110+ DTFFMap -> "map"

111+ DTFFString -> "string"

112+

63-- | A constant representing the type of the device.

113-- | A constant representing the type of the device.

64data DeviceType

114data DeviceType

65 = DTChestStrap

115 = DTChestStrap

@@ -77,3 +127,22 @@ data DeviceType

77 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

127 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

78

128

79instance Hashable DeviceType

129instance Hashable DeviceType

130+

131+instance FromText DeviceType where

132+ fromText = \case

133+ "chestStrap" -> Just DTChestStrap

134+ "phone" -> Just DTPhone

135+ "scale" -> Just DTScale

136+ "tablet" -> Just DTTablet

137+ "unknown" -> Just DTUnknown

138+ "watch" -> Just DTWatch

139+ _ -> Nothing

140+

141+instance ToText DeviceType where

142+ toText = \case

143+ DTChestStrap -> "chestStrap"

144+ DTPhone -> "phone"

145+ DTScale -> "scale"

146+ DTTablet -> "tablet"

147+ DTUnknown -> "unknown"

148+ DTWatch -> "watch"

gogol-freebasesearch/gen/Network/Google/FreebaseSearch/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.FreebaseSearch.Types

8-- Module : Network.Google.FreebaseSearch.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.FreebaseSearch.Types

15module Network.Google.FreebaseSearch.Types

14 (

16 (

15− -- * API Definition

16− freebase

17−

18

17

19 -- * ReconcileCandidate

18 -- * ReconcileCandidate

20− , ReconcileCandidate

19+ ReconcileCandidate

21 , reconcileCandidate

20 , reconcileCandidate

22 , rcLang

21 , rcLang

23 , rcConfidence

22 , rcConfidence

@@ -56,6 +55,3 @@ module Network.Google.FreebaseSearch.Types

56import Network.Google.FreebaseSearch.Types.Product

55import Network.Google.FreebaseSearch.Types.Product

57import Network.Google.FreebaseSearch.Types.Sum

56import Network.Google.FreebaseSearch.Types.Sum

58import Network.Google.Prelude

57import Network.Google.Prelude

59−

60−freebase :: a

61−freebase = error "freebase"

gogol-freebasesearch/gen/Network/Google/FreebaseSearch/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.FreebaseSearch.Types.Product

8-- Module : Network.Google.FreebaseSearch.Types.Product

gogol-freebasesearch/gen/Network/Google/FreebaseSearch/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.FreebaseSearch.Types.Sum

9-- Module : Network.Google.FreebaseSearch.Types.Sum

gogol-fusiontables/gen/Network/Google/FusionTables/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.FusionTables.Types

8-- Module : Network.Google.FusionTables.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.FusionTables.Types

15module Network.Google.FusionTables.Types

14 (

16 (

15− -- * API Definition

16− fusiontables

17−

18

17

19 -- * Bucket

18 -- * Bucket

20− , Bucket

19+ Bucket

21 , bucket

20 , bucket

22 , bMax

21 , bMax

23 , bColor

22 , bColor

@@ -224,6 +223,3 @@ module Network.Google.FusionTables.Types

224import Network.Google.FusionTables.Types.Product

223import Network.Google.FusionTables.Types.Product

225import Network.Google.FusionTables.Types.Sum

224import Network.Google.FusionTables.Types.Sum

226import Network.Google.Prelude

225import Network.Google.Prelude

227−

228−fusiontables :: a

229−fusiontables = error "fusiontables"

gogol-fusiontables/gen/Network/Google/FusionTables/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.FusionTables.Types.Product

8-- Module : Network.Google.FusionTables.Types.Product

gogol-fusiontables/gen/Network/Google/FusionTables/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.FusionTables.Types.Sum

9-- Module : Network.Google.FusionTables.Types.Sum

gogol-games-configuration/gen/Network/Google/GamesConfiguration/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.GamesConfiguration.Types

8-- Module : Network.Google.GamesConfiguration.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.GamesConfiguration.Types

15module Network.Google.GamesConfiguration.Types

14 (

16 (

15− -- * API Definition

16− gamesConfiguration

17−

18

17

19 -- * AchievementConfiguration

18 -- * AchievementConfiguration

20− , AchievementConfiguration

19+ AchievementConfiguration

21 , achievementConfiguration

20 , achievementConfiguration

22 , acAchievementType

21 , acAchievementType

23 , acStepsToUnlock

22 , acStepsToUnlock

@@ -116,6 +115,3 @@ module Network.Google.GamesConfiguration.Types

116import Network.Google.GamesConfiguration.Types.Product

115import Network.Google.GamesConfiguration.Types.Product

117import Network.Google.GamesConfiguration.Types.Sum

116import Network.Google.GamesConfiguration.Types.Sum

118import Network.Google.Prelude

117import Network.Google.Prelude

119−

120−gamesConfiguration :: a

121−gamesConfiguration = error "gamesConfiguration"

gogol-games-configuration/gen/Network/Google/GamesConfiguration/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.GamesConfiguration.Types.Product

8-- Module : Network.Google.GamesConfiguration.Types.Product

gogol-games-configuration/gen/Network/Google/GamesConfiguration/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.GamesConfiguration.Types.Sum

9-- Module : Network.Google.GamesConfiguration.Types.Sum

gogol-games-management/gen/Network/Google/GamesManagement/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.GamesManagement.Types

8-- Module : Network.Google.GamesManagement.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.GamesManagement.Types

15module Network.Google.GamesManagement.Types

14 (

16 (

15− -- * API Definition

16− gamesManagement

17−

18

17

19 -- * AchievementResetAllResponse

18 -- * AchievementResetAllResponse

20− , AchievementResetAllResponse

19+ AchievementResetAllResponse

21 , achievementResetAllResponse

20 , achievementResetAllResponse

22 , ararResults

21 , ararResults

23 , ararKind

22 , ararKind

@@ -124,6 +123,3 @@ module Network.Google.GamesManagement.Types

124import Network.Google.GamesManagement.Types.Product

123import Network.Google.GamesManagement.Types.Product

125import Network.Google.GamesManagement.Types.Sum

124import Network.Google.GamesManagement.Types.Sum

126import Network.Google.Prelude

125import Network.Google.Prelude

127−

128−gamesManagement :: a

129−gamesManagement = error "gamesManagement"

gogol-games-management/gen/Network/Google/GamesManagement/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.GamesManagement.Types.Product

8-- Module : Network.Google.GamesManagement.Types.Product

gogol-games-management/gen/Network/Google/GamesManagement/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.GamesManagement.Types.Sum

9-- Module : Network.Google.GamesManagement.Types.Sum

gogol-games/gen/Network/Google/Games/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Games.Types

8-- Module : Network.Google.Games.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Games.Types

15module Network.Google.Games.Types

14 (

16 (

15− -- * API Definition

16− games

17−

18

17

19 -- * AchievementDefinition

18 -- * AchievementDefinition

20− , AchievementDefinition

19+ AchievementDefinition

21 , achievementDefinition

20 , achievementDefinition

22 , adAchievementType

21 , adAchievementType

23 , adFormattedTotalSteps

22 , adFormattedTotalSteps

@@ -883,6 +882,3 @@ module Network.Google.Games.Types

883import Network.Google.Games.Types.Product

882import Network.Google.Games.Types.Product

884import Network.Google.Games.Types.Sum

883import Network.Google.Games.Types.Sum

885import Network.Google.Prelude

884import Network.Google.Prelude

886−

887−games :: a

888−games = error "games"

gogol-games/gen/Network/Google/Games/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Games.Types.Product

8-- Module : Network.Google.Games.Types.Product

gogol-games/gen/Network/Google/Games/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Games.Types.Sum

9-- Module : Network.Google.Games.Types.Sum

gogol-genomics/gen/Network/Google/Genomics/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Genomics.Types

8-- Module : Network.Google.Genomics.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Genomics.Types

15module Network.Google.Genomics.Types

14 (

16 (

15− -- * API Definition

16− genomics

17−

18

17

19 -- * AlignReadGroupSetsRequest

18 -- * AlignReadGroupSetsRequest

20− , AlignReadGroupSetsRequest

19+ AlignReadGroupSetsRequest

21 , alignReadGroupSetsRequest

20 , alignReadGroupSetsRequest

22 , argsrInterleavedFastqSource

21 , argsrInterleavedFastqSource

23 , argsrReadGroupSetId

22 , argsrReadGroupSetId

@@ -720,6 +719,3 @@ module Network.Google.Genomics.Types

720import Network.Google.Genomics.Types.Product

719import Network.Google.Genomics.Types.Product

721import Network.Google.Genomics.Types.Sum

720import Network.Google.Genomics.Types.Sum

722import Network.Google.Prelude

721import Network.Google.Prelude

723−

724−genomics :: a

725−genomics = error "genomics"

gogol-genomics/gen/Network/Google/Genomics/Types/Product.hs+14−12

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Genomics.Types.Product

8-- Module : Network.Google.Genomics.Types.Product

@@ -137,7 +139,7 @@ data Annotation = Annotation

137 , _aTranscript :: !(Maybe (Maybe Transcript))

139 , _aTranscript :: !(Maybe (Maybe Transcript))

138 , _aInfo :: !(Maybe AnnotationInfo)

140 , _aInfo :: !(Maybe AnnotationInfo)

139 , _aPosition :: !(Maybe (Maybe RangePosition))

141 , _aPosition :: !(Maybe (Maybe RangePosition))

140− }

142+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

141

143

142-- | Creates a value of 'Annotation' with the minimum fields required to make a request.

144-- | Creates a value of 'Annotation' with the minimum fields required to make a request.

143--

145--

@@ -242,7 +244,7 @@ data AnnotationSet = AnnotationSet

242 , _asType :: !(Maybe AnnotationSetType)

244 , _asType :: !(Maybe AnnotationSetType)

243 , _asSourceUri :: !(Maybe Text)

245 , _asSourceUri :: !(Maybe Text)

244 , _asInfo :: !(Maybe AnnotationSetInfo)

246 , _asInfo :: !(Maybe AnnotationSetInfo)

245− }

247+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

246

248

247-- | Creates a value of 'AnnotationSet' with the minimum fields required to make a request.

249-- | Creates a value of 'AnnotationSet' with the minimum fields required to make a request.

248--

250--

@@ -714,7 +716,7 @@ data CigarUnit = CigarUnit

714 { _cuOperation :: !(Maybe CigarUnitOperation)

716 { _cuOperation :: !(Maybe CigarUnitOperation)

715 , _cuOperationLength :: !(Maybe Int64)

717 , _cuOperationLength :: !(Maybe Int64)

716 , _cuReferenceSequence :: !(Maybe Text)

718 , _cuReferenceSequence :: !(Maybe Text)

717− }

719+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

718

720

719-- | Creates a value of 'CigarUnit' with the minimum fields required to make a request.

721-- | Creates a value of 'CigarUnit' with the minimum fields required to make a request.

720--

722--

@@ -1057,7 +1059,7 @@ data ExportVariantSetRequest = ExportVariantSetRequest

1057 , _evsrFormat :: !(Maybe ExportVariantSetRequestFormat)

1059 , _evsrFormat :: !(Maybe ExportVariantSetRequestFormat)

1058 , _evsrProjectNumber :: !(Maybe Int64)

1060 , _evsrProjectNumber :: !(Maybe Int64)

1059 , _evsrCallSetIds :: !(Maybe [Text])

1061 , _evsrCallSetIds :: !(Maybe [Text])

1060− }

1062+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1061

1063

1062-- | Creates a value of 'ExportVariantSetRequest' with the minimum fields required to make a request.

1064-- | Creates a value of 'ExportVariantSetRequest' with the minimum fields required to make a request.

1063--

1065--

@@ -1249,7 +1251,7 @@ data ImportReadGroupSetsRequest = ImportReadGroupSetsRequest

1249 , _irgsrDatasetId :: !(Maybe Text)

1251 , _irgsrDatasetId :: !(Maybe Text)

1250 , _irgsrSourceUris :: !(Maybe [Text])

1252 , _irgsrSourceUris :: !(Maybe [Text])

1251 , _irgsrPartitionStrategy :: !(Maybe ImportReadGroupSetsRequestPartitionStrategy)

1253 , _irgsrPartitionStrategy :: !(Maybe ImportReadGroupSetsRequestPartitionStrategy)

1252− }

1254+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1253

1255

1254-- | Creates a value of 'ImportReadGroupSetsRequest' with the minimum fields required to make a request.

1256-- | Creates a value of 'ImportReadGroupSetsRequest' with the minimum fields required to make a request.

1255--

1257--

@@ -1335,7 +1337,7 @@ data ImportVariantsRequest = ImportVariantsRequest

1335 { _ivrFormat :: !(Maybe ImportVariantsRequestFormat)

1337 { _ivrFormat :: !(Maybe ImportVariantsRequestFormat)

1336 , _ivrNormalizeReferenceNames :: !(Maybe Bool)

1338 , _ivrNormalizeReferenceNames :: !(Maybe Bool)

1337 , _ivrSourceUris :: !(Maybe [Text])

1339 , _ivrSourceUris :: !(Maybe [Text])

1338− }

1340+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1339

1341

1340-- | Creates a value of 'ImportVariantsRequest' with the minimum fields required to make a request.

1342-- | Creates a value of 'ImportVariantsRequest' with the minimum fields required to make a request.

1341--

1343--

@@ -1483,7 +1485,7 @@ data Job = Job

1483 , _jobId :: !(Maybe Text)

1485 , _jobId :: !(Maybe Text)

1484 , _jobErrors :: !(Maybe [Text])

1486 , _jobErrors :: !(Maybe [Text])

1485 , _jobRequest :: !(Maybe (Maybe JobRequest))

1487 , _jobRequest :: !(Maybe (Maybe JobRequest))

1486− }

1488+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1487

1489

1488-- | Creates a value of 'Job' with the minimum fields required to make a request.

1490-- | Creates a value of 'Job' with the minimum fields required to make a request.

1489--

1491--

@@ -1582,7 +1584,7 @@ data JobRequest = JobRequest

1582 { _jrDestination :: !(Maybe [Text])

1584 { _jrDestination :: !(Maybe [Text])

1583 , _jrSource :: !(Maybe [Text])

1585 , _jrSource :: !(Maybe [Text])

1584 , _jrType :: !(Maybe JobRequestType)

1586 , _jrType :: !(Maybe JobRequestType)

1585− }

1587+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1586

1588

1587-- | Creates a value of 'JobRequest' with the minimum fields required to make a request.

1589-- | Creates a value of 'JobRequest' with the minimum fields required to make a request.

1588--

1590--

@@ -1882,7 +1884,7 @@ data Metadata = Metadata

1882 , _mNumber :: !(Maybe Text)

1884 , _mNumber :: !(Maybe Text)

1883 , _mDescription :: !(Maybe Text)

1885 , _mDescription :: !(Maybe Text)

1884 , _mInfo :: !(Maybe MetadataInfo)

1886 , _mInfo :: !(Maybe MetadataInfo)

1885− }

1887+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1886

1888

1887-- | Creates a value of 'Metadata' with the minimum fields required to make a request.

1889-- | Creates a value of 'Metadata' with the minimum fields required to make a request.

1888--

1890--

@@ -3076,7 +3078,7 @@ data SearchAnnotationSetsRequest = SearchAnnotationSetsRequest

3076 , _sasrName :: !(Maybe Text)

3078 , _sasrName :: !(Maybe Text)

3077 , _sasrPageToken :: !(Maybe Text)

3079 , _sasrPageToken :: !(Maybe Text)

3078 , _sasrPageSize :: !(Maybe Int32)

3080 , _sasrPageSize :: !(Maybe Int32)

3079− }

3081+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

3080

3082

3081-- | Creates a value of 'SearchAnnotationSetsRequest' with the minimum fields required to make a request.

3083-- | Creates a value of 'SearchAnnotationSetsRequest' with the minimum fields required to make a request.

3082--

3084--

@@ -3392,7 +3394,7 @@ data SearchJobsRequest = SearchJobsRequest

3392 , _sjrPageToken :: !(Maybe Text)

3394 , _sjrPageToken :: !(Maybe Text)

3393 , _sjrPageSize :: !(Maybe Int32)

3395 , _sjrPageSize :: !(Maybe Int32)

3394 , _sjrCreatedBefore :: !(Maybe Int64)

3396 , _sjrCreatedBefore :: !(Maybe Int64)

3395− }

3397+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

3396

3398

3397-- | Creates a value of 'SearchJobsRequest' with the minimum fields required to make a request.

3399-- | Creates a value of 'SearchJobsRequest' with the minimum fields required to make a request.

3398--

3400--

@@ -4511,7 +4513,7 @@ data VariantAnnotation = VariantAnnotation

4511 , _vaConditions :: !(Maybe [Maybe VariantAnnotationCondition])

4513 , _vaConditions :: !(Maybe [Maybe VariantAnnotationCondition])

4512 , _vaType :: !(Maybe VariantAnnotationType)

4514 , _vaType :: !(Maybe VariantAnnotationType)

4513 , _vaTranscriptIds :: !(Maybe [Text])

4515 , _vaTranscriptIds :: !(Maybe [Text])

4514− }

4516+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

4515

4517

4516-- | Creates a value of 'VariantAnnotation' with the minimum fields required to make a request.

4518-- | Creates a value of 'VariantAnnotation' with the minimum fields required to make a request.

4517--

4519--

gogol-genomics/gen/Network/Google/Genomics/Types/Sum.hs+273

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Genomics.Types.Sum

9-- Module : Network.Google.Genomics.Types.Sum

@@ -28,6 +31,21 @@ data AnnotationSetType

28

31

29instance Hashable AnnotationSetType

32instance Hashable AnnotationSetType

30

33

34+instance FromText AnnotationSetType where

35+ fromText = \case

36+ "GENE" -> Just ASTGene

37+ "GENERIC" -> Just ASTGeneric

38+ "TRANSCRIPT" -> Just ASTTranscript

39+ "VARIANT" -> Just ASTVariant

40+ _ -> Nothing

41+

42+instance ToText AnnotationSetType where

43+ toText = \case

44+ ASTGene -> "GENE"

45+ ASTGeneric -> "GENERIC"

46+ ASTTranscript -> "TRANSCRIPT"

47+ ASTVariant -> "VARIANT"

48+

31-- | The data type for this annotation. Must match the containing annotation

49-- | The data type for this annotation. Must match the containing annotation

32-- set\'s type.

50-- set\'s type.

33data AnnotationType

51data AnnotationType

@@ -43,6 +61,21 @@ data AnnotationType

43

61

44instance Hashable AnnotationType

62instance Hashable AnnotationType

45

63

64+instance FromText AnnotationType where

65+ fromText = \case

66+ "GENE" -> Just ATGene

67+ "GENERIC" -> Just ATGeneric

68+ "TRANSCRIPT" -> Just ATTranscript

69+ "VARIANT" -> Just ATVariant

70+ _ -> Nothing

71+

72+instance ToText AnnotationType where

73+ toText = \case

74+ ATGene -> "GENE"

75+ ATGeneric -> "GENERIC"

76+ ATTranscript -> "TRANSCRIPT"

77+ ATVariant -> "VARIANT"

78+

46data CigarUnitOperation

79data CigarUnitOperation

47 = CUOAlignmentMatch

80 = CUOAlignmentMatch

48 -- ^ @ALIGNMENT_MATCH@

81 -- ^ @ALIGNMENT_MATCH@

@@ -68,6 +101,33 @@ data CigarUnitOperation

68

101

69instance Hashable CigarUnitOperation

102instance Hashable CigarUnitOperation

70

103

104+instance FromText CigarUnitOperation where

105+ fromText = \case

106+ "ALIGNMENT_MATCH" -> Just CUOAlignmentMatch

107+ "CLIP_HARD" -> Just CUOClipHard

108+ "CLIP_SOFT" -> Just CUOClipSoft

109+ "DELETE" -> Just CUODelete

110+ "INSERT" -> Just CUOInsert

111+ "OPERATION_UNSPECIFIED" -> Just CUOOperationUnspecified

112+ "PAD" -> Just CUOPad

113+ "SEQUENCE_MATCH" -> Just CUOSequenceMatch

114+ "SEQUENCE_MISMATCH" -> Just CUOSequenceMismatch

115+ "SKIP" -> Just CUOSkip

116+ _ -> Nothing

117+

118+instance ToText CigarUnitOperation where

119+ toText = \case

120+ CUOAlignmentMatch -> "ALIGNMENT_MATCH"

121+ CUOClipHard -> "CLIP_HARD"

122+ CUOClipSoft -> "CLIP_SOFT"

123+ CUODelete -> "DELETE"

124+ CUOInsert -> "INSERT"

125+ CUOOperationUnspecified -> "OPERATION_UNSPECIFIED"

126+ CUOPad -> "PAD"

127+ CUOSequenceMatch -> "SEQUENCE_MATCH"

128+ CUOSequenceMismatch -> "SEQUENCE_MISMATCH"

129+ CUOSkip -> "SKIP"

130+

71-- | The format for the exported data.

131-- | The format for the exported data.

72data ExportVariantSetRequestFormat

132data ExportVariantSetRequestFormat

73 = EVSRFBigquery

133 = EVSRFBigquery

@@ -76,6 +136,15 @@ data ExportVariantSetRequestFormat

76

136

77instance Hashable ExportVariantSetRequestFormat

137instance Hashable ExportVariantSetRequestFormat

78

138

139+instance FromText ExportVariantSetRequestFormat where

140+ fromText = \case

141+ "BIGQUERY" -> Just EVSRFBigquery

142+ _ -> Nothing

143+

144+instance ToText ExportVariantSetRequestFormat where

145+ toText = \case

146+ EVSRFBigquery -> "BIGQUERY"

147+

79-- | The partition strategy describes how read groups are partitioned into

148-- | The partition strategy describes how read groups are partitioned into

80-- read group sets.

149-- read group sets.

81data ImportReadGroupSetsRequestPartitionStrategy

150data ImportReadGroupSetsRequestPartitionStrategy

@@ -87,6 +156,17 @@ data ImportReadGroupSetsRequestPartitionStrategy

87

156

88instance Hashable ImportReadGroupSetsRequestPartitionStrategy

157instance Hashable ImportReadGroupSetsRequestPartitionStrategy

89

158

159+instance FromText ImportReadGroupSetsRequestPartitionStrategy where

160+ fromText = \case

161+ "MERGE_ALL" -> Just IRGSRPSMergeAll

162+ "PER_FILE_PER_SAMPLE" -> Just IRGSRPSPerFilePerSample

163+ _ -> Nothing

164+

165+instance ToText ImportReadGroupSetsRequestPartitionStrategy where

166+ toText = \case

167+ IRGSRPSMergeAll -> "MERGE_ALL"

168+ IRGSRPSPerFilePerSample -> "PER_FILE_PER_SAMPLE"

169+

90-- | The format of the variant data being imported. If unspecified, defaults

170-- | The format of the variant data being imported. If unspecified, defaults

91-- to to \"VCF\".

171-- to to \"VCF\".

92data ImportVariantsRequestFormat

172data ImportVariantsRequestFormat

@@ -98,6 +178,17 @@ data ImportVariantsRequestFormat

98

178

99instance Hashable ImportVariantsRequestFormat

179instance Hashable ImportVariantsRequestFormat

100

180

181+instance FromText ImportVariantsRequestFormat where

182+ fromText = \case

183+ "COMPLETE_GENOMICS" -> Just IVRFCompleteGenomics

184+ "VCF" -> Just IVRFVcf

185+ _ -> Nothing

186+

187+instance ToText ImportVariantsRequestFormat where

188+ toText = \case

189+ IVRFCompleteGenomics -> "COMPLETE_GENOMICS"

190+ IVRFVcf -> "VCF"

191+

101-- | The original request type.

192-- | The original request type.

102data JobRequestType

193data JobRequestType

103 = JRTAlignReadsets

194 = JRTAlignReadsets

@@ -120,6 +211,29 @@ data JobRequestType

120

211

121instance Hashable JobRequestType

212instance Hashable JobRequestType

122

213

214+instance FromText JobRequestType where

215+ fromText = \case

216+ "ALIGN_READSETS" -> Just JRTAlignReadsets

217+ "CALL_READSETS" -> Just JRTCallReadsets

218+ "EXPERIMENTAL_CREATE_JOB" -> Just JRTExperimentalCreateJob

219+ "EXPORT_READSETS" -> Just JRTExportReadsets

220+ "EXPORT_VARIANTS" -> Just JRTExportVariants

221+ "IMPORT_READSETS" -> Just JRTImportReadsets

222+ "IMPORT_VARIANTS" -> Just JRTImportVariants

223+ "UNKNOWN_TYPE" -> Just JRTUnknownType

224+ _ -> Nothing

225+

226+instance ToText JobRequestType where

227+ toText = \case

228+ JRTAlignReadsets -> "ALIGN_READSETS"

229+ JRTCallReadsets -> "CALL_READSETS"

230+ JRTExperimentalCreateJob -> "EXPERIMENTAL_CREATE_JOB"

231+ JRTExportReadsets -> "EXPORT_READSETS"

232+ JRTExportVariants -> "EXPORT_VARIANTS"

233+ JRTImportReadsets -> "IMPORT_READSETS"

234+ JRTImportVariants -> "IMPORT_VARIANTS"

235+ JRTUnknownType -> "UNKNOWN_TYPE"

236+

123-- | The status of this job.

237-- | The status of this job.

124data JobStatus

238data JobStatus

125 = JSCanceled

239 = JSCanceled

@@ -140,6 +254,27 @@ data JobStatus

140

254

141instance Hashable JobStatus

255instance Hashable JobStatus

142

256

257+instance FromText JobStatus where

258+ fromText = \case

259+ "CANCELED" -> Just JSCanceled

260+ "FAILURE" -> Just JSFailure

261+ "NEW" -> Just JSNew

262+ "PENDING" -> Just JSPending

263+ "RUNNING" -> Just JSRunning

264+ "SUCCESS" -> Just JSSuccess

265+ "UNKNOWN_STATUS" -> Just JSUnknownStatus

266+ _ -> Nothing

267+

268+instance ToText JobStatus where

269+ toText = \case

270+ JSCanceled -> "CANCELED"

271+ JSFailure -> "FAILURE"

272+ JSNew -> "NEW"

273+ JSPending -> "PENDING"

274+ JSRunning -> "RUNNING"

275+ JSSuccess -> "SUCCESS"

276+ JSUnknownStatus -> "UNKNOWN_STATUS"

277+

143-- | The type of data. Possible types include: Integer, Float, Flag,

278-- | The type of data. Possible types include: Integer, Float, Flag,

144-- Character, and String.

279-- Character, and String.

145data MetadataType

280data MetadataType

@@ -159,6 +294,25 @@ data MetadataType

159

294

160instance Hashable MetadataType

295instance Hashable MetadataType

161

296

297+instance FromText MetadataType where

298+ fromText = \case

299+ "CHARACTER" -> Just MTCharacter

300+ "FLAG" -> Just MTFlag

301+ "FLOAT" -> Just MTFloat

302+ "INTEGER" -> Just MTInteger

303+ "STRING" -> Just MTString

304+ "UNKNOWN_TYPE" -> Just MTUnknownType

305+ _ -> Nothing

306+

307+instance ToText MetadataType where

308+ toText = \case

309+ MTCharacter -> "CHARACTER"

310+ MTFlag -> "FLAG"

311+ MTFloat -> "FLOAT"

312+ MTInteger -> "INTEGER"

313+ MTString -> "STRING"

314+ MTUnknownType -> "UNKNOWN_TYPE"

315+

162data SearchAnnotationSetsRequestItemTypes

316data SearchAnnotationSetsRequestItemTypes

163 = SASRITGene

317 = SASRITGene

164 -- ^ @GENE@

318 -- ^ @GENE@

@@ -172,6 +326,21 @@ data SearchAnnotationSetsRequestItemTypes

172

326

173instance Hashable SearchAnnotationSetsRequestItemTypes

327instance Hashable SearchAnnotationSetsRequestItemTypes

174

328

329+instance FromText SearchAnnotationSetsRequestItemTypes where

330+ fromText = \case

331+ "GENE" -> Just SASRITGene

332+ "GENERIC" -> Just SASRITGeneric

333+ "TRANSCRIPT" -> Just SASRITTranscript

334+ "VARIANT" -> Just SASRITVariant

335+ _ -> Nothing

336+

337+instance ToText SearchAnnotationSetsRequestItemTypes where

338+ toText = \case

339+ SASRITGene -> "GENE"

340+ SASRITGeneric -> "GENERIC"

341+ SASRITTranscript -> "TRANSCRIPT"

342+ SASRITVariant -> "VARIANT"

343+

175data SearchJobsRequestItemStatus

344data SearchJobsRequestItemStatus

176 = SJRISCanceled

345 = SJRISCanceled

177 -- ^ @CANCELED@

346 -- ^ @CANCELED@

@@ -191,6 +360,27 @@ data SearchJobsRequestItemStatus

191

360

192instance Hashable SearchJobsRequestItemStatus

361instance Hashable SearchJobsRequestItemStatus

193

362

363+instance FromText SearchJobsRequestItemStatus where

364+ fromText = \case

365+ "CANCELED" -> Just SJRISCanceled

366+ "FAILURE" -> Just SJRISFailure

367+ "NEW" -> Just SJRISNew

368+ "PENDING" -> Just SJRISPending

369+ "RUNNING" -> Just SJRISRunning

370+ "SUCCESS" -> Just SJRISSuccess

371+ "UNKNOWN_STATUS" -> Just SJRISUnknownStatus

372+ _ -> Nothing

373+

374+instance ToText SearchJobsRequestItemStatus where

375+ toText = \case

376+ SJRISCanceled -> "CANCELED"

377+ SJRISFailure -> "FAILURE"

378+ SJRISNew -> "NEW"

379+ SJRISPending -> "PENDING"

380+ SJRISRunning -> "RUNNING"

381+ SJRISSuccess -> "SUCCESS"

382+ SJRISUnknownStatus -> "UNKNOWN_STATUS"

383+

194-- | Describes the clinical significance of a variant. It is adapted from the

384-- | Describes the clinical significance of a variant. It is adapted from the

195-- ClinVar controlled vocabulary for clinical significance described at:

385-- ClinVar controlled vocabulary for clinical significance described at:

196-- http:\/\/www.ncbi.nlm.nih.gov\/clinvar\/docs\/clinsig\/

386-- http:\/\/www.ncbi.nlm.nih.gov\/clinvar\/docs\/clinsig\/

@@ -227,6 +417,41 @@ data VariantAnnotationClinicalSignificance

227

417

228instance Hashable VariantAnnotationClinicalSignificance

418instance Hashable VariantAnnotationClinicalSignificance

229

419

420+instance FromText VariantAnnotationClinicalSignificance where

421+ fromText = \case

422+ "ASSOCIATION" -> Just VACSAssociation

423+ "BENIGN" -> Just VACSBenign

424+ "CLINICAL_SIGNIFICANCE_UNSPECIFIED" -> Just VACSClinicalSignificanceUnspecified

425+ "CONFERS_SENSITIVITY" -> Just VACSConfersSensitivity

426+ "DRUG_RESPONSE" -> Just VACSDrugResponse

427+ "HISTOCOMPATIBILITY" -> Just VACSHistocompatibility

428+ "LIKELY_BENIGN" -> Just VACSLikelyBenign

429+ "LIKELY_PATHOGENIC" -> Just VACSLikelyPathogenic

430+ "MULTIPLE_REPORTED" -> Just VACSMultipleReported

431+ "OTHER" -> Just VACSOther

432+ "PATHOGENIC" -> Just VACSPathogenic

433+ "PROTECTIVE" -> Just VACSProtective

434+ "RISK_FACTOR" -> Just VACSRiskFactor

435+ "UNCERTAIN" -> Just VACSUncertain

436+ _ -> Nothing

437+

438+instance ToText VariantAnnotationClinicalSignificance where

439+ toText = \case

440+ VACSAssociation -> "ASSOCIATION"

441+ VACSBenign -> "BENIGN"

442+ VACSClinicalSignificanceUnspecified -> "CLINICAL_SIGNIFICANCE_UNSPECIFIED"

443+ VACSConfersSensitivity -> "CONFERS_SENSITIVITY"

444+ VACSDrugResponse -> "DRUG_RESPONSE"

445+ VACSHistocompatibility -> "HISTOCOMPATIBILITY"

446+ VACSLikelyBenign -> "LIKELY_BENIGN"

447+ VACSLikelyPathogenic -> "LIKELY_PATHOGENIC"

448+ VACSMultipleReported -> "MULTIPLE_REPORTED"

449+ VACSOther -> "OTHER"

450+ VACSPathogenic -> "PATHOGENIC"

451+ VACSProtective -> "PROTECTIVE"

452+ VACSRiskFactor -> "RISK_FACTOR"

453+ VACSUncertain -> "UNCERTAIN"

454+

230-- | Effect of the variant on the coding sequence.

455-- | Effect of the variant on the coding sequence.

231data VariantAnnotationEffect

456data VariantAnnotationEffect

232 = VAEEffectUnspecified

457 = VAEEffectUnspecified

@@ -251,6 +476,31 @@ data VariantAnnotationEffect

251

476

252instance Hashable VariantAnnotationEffect

477instance Hashable VariantAnnotationEffect

253

478

479+instance FromText VariantAnnotationEffect where

480+ fromText = \case

481+ "EFFECT_UNSPECIFIED" -> Just VAEEffectUnspecified

482+ "FRAMESHIFT" -> Just VAEFrameshift

483+ "FRAME_PRESERVING_INDEL" -> Just VAEFramePreservingIndel

484+ "NONSYNONYMOUS_SNP" -> Just VAENonsynonymousSnp

485+ "OTHER" -> Just VAEOther

486+ "SPLICE_SITE_DISRUPTION" -> Just VAESpliceSiteDisruption

487+ "STOP_GAIN" -> Just VAEStopGain

488+ "STOP_LOSS" -> Just VAEStopLoss

489+ "SYNONYMOUS_SNP" -> Just VAESynonymousSnp

490+ _ -> Nothing

491+

492+instance ToText VariantAnnotationEffect where

493+ toText = \case

494+ VAEEffectUnspecified -> "EFFECT_UNSPECIFIED"

495+ VAEFrameshift -> "FRAMESHIFT"

496+ VAEFramePreservingIndel -> "FRAME_PRESERVING_INDEL"

497+ VAENonsynonymousSnp -> "NONSYNONYMOUS_SNP"

498+ VAEOther -> "OTHER"

499+ VAESpliceSiteDisruption -> "SPLICE_SITE_DISRUPTION"

500+ VAEStopGain -> "STOP_GAIN"

501+ VAEStopLoss -> "STOP_LOSS"

502+ VAESynonymousSnp -> "SYNONYMOUS_SNP"

503+

254-- | Type has been adapted from ClinVar\'s list of variant types.

504-- | Type has been adapted from ClinVar\'s list of variant types.

255data VariantAnnotationType

505data VariantAnnotationType

256 = VATCnv

506 = VATCnv

@@ -272,3 +522,26 @@ data VariantAnnotationType

272 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

522 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

273

523

274instance Hashable VariantAnnotationType

524instance Hashable VariantAnnotationType

525+

526+instance FromText VariantAnnotationType where

527+ fromText = \case

528+ "CNV" -> Just VATCnv

529+ "DELETION" -> Just VATDeletion

530+ "INSERTION" -> Just VATInsertion

531+ "OTHER" -> Just VATOther

532+ "SNP" -> Just VATSnp

533+ "STRUCTURAL" -> Just VATStructural

534+ "SUBSTITUTION" -> Just VATSubstitution

535+ "TYPE_UNSPECIFIED" -> Just VATTypeUnspecified

536+ _ -> Nothing

537+

538+instance ToText VariantAnnotationType where

539+ toText = \case

540+ VATCnv -> "CNV"

541+ VATDeletion -> "DELETION"

542+ VATInsertion -> "INSERTION"

543+ VATOther -> "OTHER"

544+ VATSnp -> "SNP"

545+ VATStructural -> "STRUCTURAL"

546+ VATSubstitution -> "SUBSTITUTION"

547+ VATTypeUnspecified -> "TYPE_UNSPECIFIED"

gogol-gmail/gen/Network/Google/Gmail/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Gmail.Types

8-- Module : Network.Google.Gmail.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Gmail.Types

15module Network.Google.Gmail.Types

14 (

16 (

15− -- * API Definition

16− gmail

17−

18

17

19 -- * Draft

18 -- * Draft

20− , Draft

19+ Draft

21 , draft

20 , draft

22 , dId

21 , dId

23 , dMessage

22 , dMessage

@@ -193,6 +192,3 @@ module Network.Google.Gmail.Types

193import Network.Google.Gmail.Types.Product

192import Network.Google.Gmail.Types.Product

194import Network.Google.Gmail.Types.Sum

193import Network.Google.Gmail.Types.Sum

195import Network.Google.Prelude

194import Network.Google.Prelude

196−

197−gmail :: a

198−gmail = error "gmail"

gogol-gmail/gen/Network/Google/Gmail/Types/Product.hs+4−2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Gmail.Types.Product

8-- Module : Network.Google.Gmail.Types.Product

@@ -255,7 +257,7 @@ data Label = Label

255 , _lLabelListVisibility :: !(Maybe LabelLabelListVisibility)

257 , _lLabelListVisibility :: !(Maybe LabelLabelListVisibility)

256 , _lId :: !(Maybe Text)

258 , _lId :: !(Maybe Text)

257 , _lType :: !(Maybe LabelType)

259 , _lType :: !(Maybe LabelType)

258− }

260+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

259

261

260-- | Creates a value of 'Label' with the minimum fields required to make a request.

262-- | Creates a value of 'Label' with the minimum fields required to make a request.

261--

263--

@@ -1005,7 +1007,7 @@ data WatchRequest = WatchRequest

1005 { _wrLabelFilterAction :: !(Maybe WatchRequestLabelFilterAction)

1007 { _wrLabelFilterAction :: !(Maybe WatchRequestLabelFilterAction)

1006 , _wrTopicName :: !(Maybe Text)

1008 , _wrTopicName :: !(Maybe Text)

1007 , _wrLabelIds :: !(Maybe [Text])

1009 , _wrLabelIds :: !(Maybe [Text])

1008− }

1010+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1009

1011

1010-- | Creates a value of 'WatchRequest' with the minimum fields required to make a request.

1012-- | Creates a value of 'WatchRequest' with the minimum fields required to make a request.

1011--

1013--

gogol-gmail/gen/Network/Google/Gmail/Types/Sum.hs+49

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Gmail.Types.Sum

9-- Module : Network.Google.Gmail.Types.Sum

@@ -27,6 +30,19 @@ data LabelLabelListVisibility

27

30

28instance Hashable LabelLabelListVisibility

31instance Hashable LabelLabelListVisibility

29

32

33+instance FromText LabelLabelListVisibility where

34+ fromText = \case

35+ "labelHide" -> Just LLLVLabelHide

36+ "labelShow" -> Just LLLVLabelShow

37+ "labelShowIfUnread" -> Just LLLVLabelShowIfUnread

38+ _ -> Nothing

39+

40+instance ToText LabelLabelListVisibility where

41+ toText = \case

42+ LLLVLabelHide -> "labelHide"

43+ LLLVLabelShow -> "labelShow"

44+ LLLVLabelShowIfUnread -> "labelShowIfUnread"

45+

30-- | The visibility of the label in the message list in the Gmail web

46-- | The visibility of the label in the message list in the Gmail web

31-- interface.

47-- interface.

32data LabelMessageListVisibility

48data LabelMessageListVisibility

@@ -38,6 +54,17 @@ data LabelMessageListVisibility

38

54

39instance Hashable LabelMessageListVisibility

55instance Hashable LabelMessageListVisibility

40

56

57+instance FromText LabelMessageListVisibility where

58+ fromText = \case

59+ "hide" -> Just LMLVHide

60+ "show" -> Just LMLVShow

61+ _ -> Nothing

62+

63+instance ToText LabelMessageListVisibility where

64+ toText = \case

65+ LMLVHide -> "hide"

66+ LMLVShow -> "show"

67+

41-- | The owner type for the label. User labels are created by the user and

68-- | The owner type for the label. User labels are created by the user and

42-- can be modified and deleted by the user and can be applied to any

69-- can be modified and deleted by the user and can be applied to any

43-- message or thread. System labels are internally created and cannot be

70-- message or thread. System labels are internally created and cannot be

@@ -55,6 +82,17 @@ data LabelType

55

82

56instance Hashable LabelType

83instance Hashable LabelType

57

84

85+instance FromText LabelType where

86+ fromText = \case

87+ "system" -> Just LTSystem

88+ "user" -> Just LTUser

89+ _ -> Nothing

90+

91+instance ToText LabelType where

92+ toText = \case

93+ LTSystem -> "system"

94+ LTUser -> "user"

95+

58-- | Filtering behavior of labelIds list specified.

96-- | Filtering behavior of labelIds list specified.

59data WatchRequestLabelFilterAction

97data WatchRequestLabelFilterAction

60 = WRLFAExclude

98 = WRLFAExclude

@@ -64,3 +102,14 @@ data WatchRequestLabelFilterAction

64 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

102 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

65

103

66instance Hashable WatchRequestLabelFilterAction

104instance Hashable WatchRequestLabelFilterAction

105+

106+instance FromText WatchRequestLabelFilterAction where

107+ fromText = \case

108+ "exclude" -> Just WRLFAExclude

109+ "include" -> Just WRLFAInclude

110+ _ -> Nothing

111+

112+instance ToText WatchRequestLabelFilterAction where

113+ toText = \case

114+ WRLFAExclude -> "exclude"

115+ WRLFAInclude -> "include"

gogol-groups/gen/Network/Google/GroupsMigration/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.GroupsMigration.Types

8-- Module : Network.Google.GroupsMigration.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.GroupsMigration.Types

15module Network.Google.GroupsMigration.Types

14 (

16 (

15− -- * API Definition

16− groupsmigration

17−

18

17

19 -- * Groups

18 -- * Groups

20− , Groups

19+ Groups

21 , groups

20 , groups

22 , gKind

21 , gKind

23 , gResponseCode

22 , gResponseCode

@@ -26,6 +25,3 @@ module Network.Google.GroupsMigration.Types

26import Network.Google.GroupsMigration.Types.Product

25import Network.Google.GroupsMigration.Types.Product

27import Network.Google.GroupsMigration.Types.Sum

26import Network.Google.GroupsMigration.Types.Sum

28import Network.Google.Prelude

27import Network.Google.Prelude

29−

30−groupsmigration :: a

31−groupsmigration = error "groupsmigration"

gogol-groups/gen/Network/Google/GroupsMigration/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.GroupsMigration.Types.Product

8-- Module : Network.Google.GroupsMigration.Types.Product

gogol-groups/gen/Network/Google/GroupsMigration/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.GroupsMigration.Types.Sum

9-- Module : Network.Google.GroupsMigration.Types.Sum

gogol-groups/gen/Network/Google/GroupsSettings/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.GroupsSettings.Types

8-- Module : Network.Google.GroupsSettings.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.GroupsSettings.Types

15module Network.Google.GroupsSettings.Types

14 (

16 (

15− -- * API Definition

16− groupssettings

17−

18

17

19 -- * Groups

18 -- * Groups

20− , Groups

19+ Groups

21 , groups

20 , groups

22 , gEmail

21 , gEmail

23 , gSendMessageDenyNotification

22 , gSendMessageDenyNotification

@@ -52,6 +51,3 @@ module Network.Google.GroupsSettings.Types

52import Network.Google.GroupsSettings.Types.Product

51import Network.Google.GroupsSettings.Types.Product

53import Network.Google.GroupsSettings.Types.Sum

52import Network.Google.GroupsSettings.Types.Sum

54import Network.Google.Prelude

53import Network.Google.Prelude

55−

56−groupssettings :: a

57−groupssettings = error "groupssettings"

gogol-groups/gen/Network/Google/GroupsSettings/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.GroupsSettings.Types.Product

8-- Module : Network.Google.GroupsSettings.Types.Product

gogol-groups/gen/Network/Google/GroupsSettings/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.GroupsSettings.Types.Sum

9-- Module : Network.Google.GroupsSettings.Types.Sum

gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.IdentityToolkit.Types

8-- Module : Network.Google.IdentityToolkit.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.IdentityToolkit.Types

15module Network.Google.IdentityToolkit.Types

14 (

16 (

15− -- * API Definition

16− identitytoolkit

17−

18

17

19 -- * CreateAuthUriResponse

18 -- * CreateAuthUriResponse

20− , CreateAuthUriResponse

19+ CreateAuthUriResponse

21 , createAuthUriResponse

20 , createAuthUriResponse

22 , caurProviderId

21 , caurProviderId

23 , caurKind

22 , caurKind

@@ -268,6 +267,3 @@ module Network.Google.IdentityToolkit.Types

268import Network.Google.IdentityToolkit.Types.Product

267import Network.Google.IdentityToolkit.Types.Product

269import Network.Google.IdentityToolkit.Types.Sum

268import Network.Google.IdentityToolkit.Types.Sum

270import Network.Google.Prelude

269import Network.Google.Prelude

271−

272−identitytoolkit :: a

273−identitytoolkit = error "identitytoolkit"

gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.IdentityToolkit.Types.Product

8-- Module : Network.Google.IdentityToolkit.Types.Product

gogol-identity-toolkit/gen/Network/Google/IdentityToolkit/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.IdentityToolkit.Types.Sum

9-- Module : Network.Google.IdentityToolkit.Types.Sum

gogol-licensing/gen/Network/Google/EnterpriseLicenseManager/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.EnterpriseLicenseManager.Types

8-- Module : Network.Google.EnterpriseLicenseManager.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.EnterpriseLicenseManager.Types

15module Network.Google.EnterpriseLicenseManager.Types

14 (

16 (

15− -- * API Definition

16− licensing

17−

18

17

19 -- * LicenseAssignment

18 -- * LicenseAssignment

20− , LicenseAssignment

19+ LicenseAssignment

21 , licenseAssignment

20 , licenseAssignment

22 , laEtags

21 , laEtags

23 , laKind

22 , laKind

@@ -43,6 +42,3 @@ module Network.Google.EnterpriseLicenseManager.Types

43import Network.Google.EnterpriseLicenseManager.Types.Product

42import Network.Google.EnterpriseLicenseManager.Types.Product

44import Network.Google.EnterpriseLicenseManager.Types.Sum

43import Network.Google.EnterpriseLicenseManager.Types.Sum

45import Network.Google.Prelude

44import Network.Google.Prelude

46−

47−licensing :: a

48−licensing = error "licensing"

gogol-licensing/gen/Network/Google/EnterpriseLicenseManager/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.EnterpriseLicenseManager.Types.Product

8-- Module : Network.Google.EnterpriseLicenseManager.Types.Product

gogol-licensing/gen/Network/Google/EnterpriseLicenseManager/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.EnterpriseLicenseManager.Types.Sum

9-- Module : Network.Google.EnterpriseLicenseManager.Types.Sum

gogol-maps-coordinate/gen/Network/Google/MapsCoordinate/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.MapsCoordinate.Types

8-- Module : Network.Google.MapsCoordinate.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.MapsCoordinate.Types

15module Network.Google.MapsCoordinate.Types

14 (

16 (

15− -- * API Definition

16− coordinate

17−

18

17

19 -- * CustomField

18 -- * CustomField

20− , CustomField

19+ CustomField

21 , customField

20 , customField

22 , cfCustomFieldId

21 , cfCustomFieldId

23 , cfKind

22 , cfKind

@@ -158,6 +157,3 @@ module Network.Google.MapsCoordinate.Types

158import Network.Google.MapsCoordinate.Types.Product

157import Network.Google.MapsCoordinate.Types.Product

159import Network.Google.MapsCoordinate.Types.Sum

158import Network.Google.MapsCoordinate.Types.Sum

160import Network.Google.Prelude

159import Network.Google.Prelude

161−

162−coordinate :: a

163−coordinate = error "coordinate"

gogol-maps-coordinate/gen/Network/Google/MapsCoordinate/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.MapsCoordinate.Types.Product

8-- Module : Network.Google.MapsCoordinate.Types.Product

gogol-maps-coordinate/gen/Network/Google/MapsCoordinate/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.MapsCoordinate.Types.Sum

9-- Module : Network.Google.MapsCoordinate.Types.Sum

gogol-maps-engine/gen/Network/Google/MapsEngine/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.MapsEngine.Types

8-- Module : Network.Google.MapsEngine.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.MapsEngine.Types

15module Network.Google.MapsEngine.Types

14 (

16 (

15− -- * API Definition

16− mapsengine

17−

18

17

19 -- * AcquisitionTime

18 -- * AcquisitionTime

20− , AcquisitionTime

19+ AcquisitionTime

21 , acquisitionTime

20 , acquisitionTime

22 , atStart

21 , atStart

23 , atPrecision

22 , atPrecision

@@ -703,6 +702,3 @@ module Network.Google.MapsEngine.Types

703import Network.Google.MapsEngine.Types.Product

702import Network.Google.MapsEngine.Types.Product

704import Network.Google.MapsEngine.Types.Sum

703import Network.Google.MapsEngine.Types.Sum

705import Network.Google.Prelude

704import Network.Google.Prelude

706−

707−mapsengine :: a

708−mapsengine = error "mapsengine"

gogol-maps-engine/gen/Network/Google/MapsEngine/Types/Product.hs+28−26

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.MapsEngine.Types.Product

8-- Module : Network.Google.MapsEngine.Types.Product

@@ -22,7 +24,7 @@ data AcquisitionTime = AcquisitionTime

22 { _atStart :: !(Maybe UTCTime)

24 { _atStart :: !(Maybe UTCTime)

23 , _atPrecision :: !(Maybe AcquisitionTimePrecision)

25 , _atPrecision :: !(Maybe AcquisitionTimePrecision)

24 , _atEnd :: !(Maybe UTCTime)

26 , _atEnd :: !(Maybe UTCTime)

25− }

27+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

26

28

27-- | Creates a value of 'AcquisitionTime' with the minimum fields required to make a request.

29-- | Creates a value of 'AcquisitionTime' with the minimum fields required to make a request.

28--

30--

@@ -79,7 +81,7 @@ data Asset = Asset

79 , _aType :: !(Maybe AssetType)

81 , _aType :: !(Maybe AssetType)

80 , _aDescription :: !(Maybe Text)

82 , _aDescription :: !(Maybe Text)

81 , _aTags :: !(Maybe [Text])

83 , _aTags :: !(Maybe [Text])

82− }

84+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

83

85

84-- | Creates a value of 'Asset' with the minimum fields required to make a request.

86-- | Creates a value of 'Asset' with the minimum fields required to make a request.

85--

87--

@@ -669,7 +671,7 @@ data File = File

669 { _fSize :: !(Maybe Int64)

671 { _fSize :: !(Maybe Int64)

670 , _fUploadStatus :: !(Maybe FileUploadStatus)

672 , _fUploadStatus :: !(Maybe FileUploadStatus)

671 , _fFilename :: !(Maybe Text)

673 , _fFilename :: !(Maybe Text)

672− }

674+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

673

675

674-- | Creates a value of 'File' with the minimum fields required to make a request.

676-- | Creates a value of 'File' with the minimum fields required to make a request.

675--

677--

@@ -711,7 +713,7 @@ data Filter = Filter

711 { _fOperator :: !(Maybe FilterOperator)

713 { _fOperator :: !(Maybe FilterOperator)

712 , _fValue :: !(Maybe (Either Text Int64))

714 , _fValue :: !(Maybe (Either Text Int64))

713 , _fColumn :: !(Maybe Text)

715 , _fColumn :: !(Maybe Text)

714− }

716+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

715

717

716-- | Creates a value of 'Filter' with the minimum fields required to make a request.

718-- | Creates a value of 'Filter' with the minimum fields required to make a request.

717--

719--

@@ -762,7 +764,7 @@ geoJsonGeometry = GeoJsonGeometry

762data GeoJsonGeometryCollection = GeoJsonGeometryCollection

764data GeoJsonGeometryCollection = GeoJsonGeometryCollection

763 { _gjgcGeometries :: !(Maybe [Maybe GeoJsonGeometry])

765 { _gjgcGeometries :: !(Maybe [Maybe GeoJsonGeometry])

764 , _gjgcType :: !(Maybe GeoJsonGeometryCollectionType)

766 , _gjgcType :: !(Maybe GeoJsonGeometryCollectionType)

765− }

767+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

766

768

767-- | Creates a value of 'GeoJsonGeometryCollection' with the minimum fields required to make a request.

769-- | Creates a value of 'GeoJsonGeometryCollection' with the minimum fields required to make a request.

768--

770--

@@ -797,7 +799,7 @@ gjgcType = lens _gjgcType (\ s a -> s{_gjgcType = a})

797data GeoJsonLineString = GeoJsonLineString

799data GeoJsonLineString = GeoJsonLineString

798 { _gjlsCoordinates :: !(Maybe [Maybe [Double]])

800 { _gjlsCoordinates :: !(Maybe [Maybe [Double]])

799 , _gjlsType :: !(Maybe GeoJsonLineStringType)

801 , _gjlsType :: !(Maybe GeoJsonLineStringType)

800− }

802+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

801

803

802-- | Creates a value of 'GeoJsonLineString' with the minimum fields required to make a request.

804-- | Creates a value of 'GeoJsonLineString' with the minimum fields required to make a request.

803--

805--

@@ -832,7 +834,7 @@ gjlsType = lens _gjlsType (\ s a -> s{_gjlsType = a})

832data GeoJsonMultiLineString = GeoJsonMultiLineString

834data GeoJsonMultiLineString = GeoJsonMultiLineString

833 { _gjmlsCoordinates :: !(Maybe [[Maybe [Double]]])

835 { _gjmlsCoordinates :: !(Maybe [[Maybe [Double]]])

834 , _gjmlsType :: !(Maybe GeoJsonMultiLineStringType)

836 , _gjmlsType :: !(Maybe GeoJsonMultiLineStringType)

835− }

837+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

836

838

837-- | Creates a value of 'GeoJsonMultiLineString' with the minimum fields required to make a request.

839-- | Creates a value of 'GeoJsonMultiLineString' with the minimum fields required to make a request.

838--

840--

@@ -867,7 +869,7 @@ gjmlsType

867data GeoJsonMultiPoint = GeoJsonMultiPoint

869data GeoJsonMultiPoint = GeoJsonMultiPoint

868 { _gjsonmpCoordinates :: !(Maybe [Maybe [Double]])

870 { _gjsonmpCoordinates :: !(Maybe [Maybe [Double]])

869 , _gjsonmpType :: !(Maybe GeoJsonMultiPointType)

871 , _gjsonmpType :: !(Maybe GeoJsonMultiPointType)

870− }

872+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

871

873

872-- | Creates a value of 'GeoJsonMultiPoint' with the minimum fields required to make a request.

874-- | Creates a value of 'GeoJsonMultiPoint' with the minimum fields required to make a request.

873--

875--

@@ -902,7 +904,7 @@ gjsonmpType

902data GeoJsonMultiPolygon = GeoJsonMultiPolygon

904data GeoJsonMultiPolygon = GeoJsonMultiPolygon

903 { _gjmpCoordinates :: !(Maybe [[[Maybe [Double]]]])

905 { _gjmpCoordinates :: !(Maybe [[[Maybe [Double]]]])

904 , _gjmpType :: !(Maybe GeoJsonMultiPolygonType)

906 , _gjmpType :: !(Maybe GeoJsonMultiPolygonType)

905− }

907+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

906

908

907-- | Creates a value of 'GeoJsonMultiPolygon' with the minimum fields required to make a request.

909-- | Creates a value of 'GeoJsonMultiPolygon' with the minimum fields required to make a request.

908--

910--

@@ -936,7 +938,7 @@ gjmpType = lens _gjmpType (\ s a -> s{_gjmpType = a})

936data GeoJsonPoint = GeoJsonPoint

938data GeoJsonPoint = GeoJsonPoint

937 { _gjpCoordinates :: !(Maybe (Maybe [Double]))

939 { _gjpCoordinates :: !(Maybe (Maybe [Double]))

938 , _gjpType :: !(Maybe GeoJsonPointType)

940 , _gjpType :: !(Maybe GeoJsonPointType)

939− }

941+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

940

942

941-- | Creates a value of 'GeoJsonPoint' with the minimum fields required to make a request.

943-- | Creates a value of 'GeoJsonPoint' with the minimum fields required to make a request.

942--

944--

@@ -969,7 +971,7 @@ gjpType = lens _gjpType (\ s a -> s{_gjpType = a})

969data GeoJsonPolygon = GeoJsonPolygon

971data GeoJsonPolygon = GeoJsonPolygon

970 { _gjsonpCoordinates :: !(Maybe [[Maybe [Double]]])

972 { _gjsonpCoordinates :: !(Maybe [[Maybe [Double]]])

971 , _gjsonpType :: !(Maybe GeoJsonPolygonType)

973 , _gjsonpType :: !(Maybe GeoJsonPolygonType)

972− }

974+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

973

975

974-- | Creates a value of 'GeoJsonPolygon' with the minimum fields required to make a request.

976-- | Creates a value of 'GeoJsonPolygon' with the minimum fields required to make a request.

975--

977--

@@ -1158,7 +1160,7 @@ data LabelStyle = LabelStyle

1158 , _lsOutline :: !(Maybe (Maybe Color))

1160 , _lsOutline :: !(Maybe (Maybe Color))

1159 , _lsFontWeight :: !(Maybe LabelStyleFontWeight)

1161 , _lsFontWeight :: !(Maybe LabelStyleFontWeight)

1160 , _lsColumn :: !(Maybe Text)

1162 , _lsColumn :: !(Maybe Text)

1161− }

1163+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1162

1164

1163-- | Creates a value of 'LabelStyle' with the minimum fields required to make a request.

1165-- | Creates a value of 'LabelStyle' with the minimum fields required to make a request.

1164--

1166--

@@ -1248,7 +1250,7 @@ data Layer = Layer

1248 , _lPublishedAccessList :: !(Maybe Text)

1250 , _lPublishedAccessList :: !(Maybe Text)

1249 , _lDescription :: !(Maybe Text)

1251 , _lDescription :: !(Maybe Text)

1250 , _lTags :: !(Maybe (Maybe [Text]))

1252 , _lTags :: !(Maybe (Maybe [Text]))

1251− }

1253+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1252

1254

1253-- | Creates a value of 'Layer' with the minimum fields required to make a request.

1255-- | Creates a value of 'Layer' with the minimum fields required to make a request.

1254--

1256--

@@ -1618,7 +1620,7 @@ data Map = Map

1618 , _mapPublishedAccessList :: !(Maybe Text)

1620 , _mapPublishedAccessList :: !(Maybe Text)

1619 , _mapDescription :: !(Maybe Text)

1621 , _mapDescription :: !(Maybe Text)

1620 , _mapTags :: !(Maybe (Maybe [Text]))

1622 , _mapTags :: !(Maybe (Maybe [Text]))

1621− }

1623+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1622

1624

1623-- | Creates a value of 'Map' with the minimum fields required to make a request.

1625-- | Creates a value of 'Map' with the minimum fields required to make a request.

1624--

1626--

@@ -1832,7 +1834,7 @@ data MapFolder = MapFolder

1832 , _mfKey :: !(Maybe Text)

1834 , _mfKey :: !(Maybe Text)

1833 , _mfName :: !(Maybe Text)

1835 , _mfName :: !(Maybe Text)

1834 , _mfType :: !(Maybe MapFolderType)

1836 , _mfType :: !(Maybe MapFolderType)

1835− }

1837+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1836

1838

1837-- | Creates a value of 'MapFolder' with the minimum fields required to make a request.

1839-- | Creates a value of 'MapFolder' with the minimum fields required to make a request.

1838--

1840--

@@ -1924,7 +1926,7 @@ data MapKmlLink = MapKmlLink

1924 , _mklName :: !(Maybe Text)

1926 , _mklName :: !(Maybe Text)

1925 , _mklType :: !(Maybe MapKmlLinkType)

1927 , _mklType :: !(Maybe MapKmlLinkType)

1926 , _mklKmlUrl :: !(Maybe Text)

1928 , _mklKmlUrl :: !(Maybe Text)

1927− }

1929+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1928

1930

1929-- | Creates a value of 'MapKmlLink' with the minimum fields required to make a request.

1931-- | Creates a value of 'MapKmlLink' with the minimum fields required to make a request.

1930--

1932--

@@ -1989,7 +1991,7 @@ data MapLayer = MapLayer

1989 , _mlName :: !(Maybe Text)

1991 , _mlName :: !(Maybe Text)

1990 , _mlId :: !(Maybe Text)

1992 , _mlId :: !(Maybe Text)

1991 , _mlType :: !(Maybe MapLayerType)

1993 , _mlType :: !(Maybe MapLayerType)

1992− }

1994+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1993

1995

1994-- | Creates a value of 'MapLayer' with the minimum fields required to make a request.

1996-- | Creates a value of 'MapLayer' with the minimum fields required to make a request.

1995--

1997--

@@ -2154,7 +2156,7 @@ data Permission = Permission

2154 , _pId :: !(Maybe Text)

2156 , _pId :: !(Maybe Text)

2155 , _pType :: !(Maybe PermissionType)

2157 , _pType :: !(Maybe PermissionType)

2156 , _pDiscoverable :: !(Maybe Bool)

2158 , _pDiscoverable :: !(Maybe Bool)

2157− }

2159+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

2158

2160

2159-- | Creates a value of 'Permission' with the minimum fields required to make a request.

2161-- | Creates a value of 'Permission' with the minimum fields required to make a request.

2160--

2162--

@@ -2469,7 +2471,7 @@ data PublishedLayer = PublishedLayer

2469 , _plId :: !(Maybe Text)

2471 , _plId :: !(Maybe Text)

2470 , _plProjectId :: !(Maybe Text)

2472 , _plProjectId :: !(Maybe Text)

2471 , _plDescription :: !(Maybe Text)

2473 , _plDescription :: !(Maybe Text)

2472− }

2474+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

2473

2475

2474-- | Creates a value of 'PublishedLayer' with the minimum fields required to make a request.

2476-- | Creates a value of 'PublishedLayer' with the minimum fields required to make a request.

2475--

2477--

@@ -2689,7 +2691,7 @@ data Raster = Raster

2689 , _rDescription :: !(Maybe Text)

2691 , _rDescription :: !(Maybe Text)

2690 , _rAttribution :: !(Maybe Text)

2692 , _rAttribution :: !(Maybe Text)

2691 , _rTags :: !(Maybe (Maybe [Text]))

2693 , _rTags :: !(Maybe (Maybe [Text]))

2692− }

2694+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

2693

2695

2694-- | Creates a value of 'Raster' with the minimum fields required to make a request.

2696-- | Creates a value of 'Raster' with the minimum fields required to make a request.

2695--

2697--

@@ -2896,7 +2898,7 @@ data RasterCollection = RasterCollection

2896 , _rcDescription :: !(Maybe Text)

2898 , _rcDescription :: !(Maybe Text)

2897 , _rcAttribution :: !(Maybe Text)

2899 , _rcAttribution :: !(Maybe Text)

2898 , _rcTags :: !(Maybe (Maybe [Text]))

2900 , _rcTags :: !(Maybe (Maybe [Text]))

2899− }

2901+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

2900

2902

2901-- | Creates a value of 'RasterCollection' with the minimum fields required to make a request.

2903-- | Creates a value of 'RasterCollection' with the minimum fields required to make a request.

2902--

2904--

@@ -3375,7 +3377,7 @@ data ScaledShape = ScaledShape

3375 { _ssBorder :: !(Maybe (Maybe Border))

3377 { _ssBorder :: !(Maybe (Maybe Border))

3376 , _ssFill :: !(Maybe (Maybe Color))

3378 , _ssFill :: !(Maybe (Maybe Color))

3377 , _ssShape :: !(Maybe ScaledShapeShape)

3379 , _ssShape :: !(Maybe ScaledShapeShape)

3378− }

3380+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

3379

3381

3380-- | Creates a value of 'ScaledShape' with the minimum fields required to make a request.

3382-- | Creates a value of 'ScaledShape' with the minimum fields required to make a request.

3381--

3383--

@@ -3417,7 +3419,7 @@ data ScalingFunction = ScalingFunction

3417 , _sfSizeRange :: !(Maybe (Maybe SizeRange))

3419 , _sfSizeRange :: !(Maybe (Maybe SizeRange))

3418 , _sfScalingType :: !(Maybe ScalingFunctionScalingType)

3420 , _sfScalingType :: !(Maybe ScalingFunctionScalingType)

3419 , _sfColumn :: !(Maybe Text)

3421 , _sfColumn :: !(Maybe Text)

3420− }

3422+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

3421

3423

3422-- | Creates a value of 'ScalingFunction' with the minimum fields required to make a request.

3424-- | Creates a value of 'ScalingFunction' with the minimum fields required to make a request.

3423--

3425--

@@ -3567,7 +3569,7 @@ data Table = Table

3567 , _tSourceEncoding :: !Text

3569 , _tSourceEncoding :: !Text

3568 , _tDescription :: !(Maybe Text)

3570 , _tDescription :: !(Maybe Text)

3569 , _tTags :: !(Maybe (Maybe [Text]))

3571 , _tTags :: !(Maybe (Maybe [Text]))

3570− }

3572+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

3571

3573

3572-- | Creates a value of 'Table' with the minimum fields required to make a request.

3574-- | Creates a value of 'Table' with the minimum fields required to make a request.

3573--

3575--

@@ -3763,7 +3765,7 @@ tTags

3763data TableColumn = TableColumn

3765data TableColumn = TableColumn

3764 { _tcName :: !(Maybe Text)

3766 { _tcName :: !(Maybe Text)

3765 , _tcType :: !(Maybe TableColumnType)

3767 , _tcType :: !(Maybe TableColumnType)

3766− }

3768+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

3767

3769

3768-- | Creates a value of 'TableColumn' with the minimum fields required to make a request.

3770-- | Creates a value of 'TableColumn' with the minimum fields required to make a request.

3769--

3771--

@@ -3867,7 +3869,7 @@ data VectorStyle = VectorStyle

3867 { _vsDisplayRules :: !(Maybe [Maybe DisplayRule])

3869 { _vsDisplayRules :: !(Maybe [Maybe DisplayRule])

3868 , _vsFeatureInfo :: !(Maybe (Maybe FeatureInfo))

3870 , _vsFeatureInfo :: !(Maybe (Maybe FeatureInfo))

3869 , _vsType :: !(Maybe VectorStyleType)

3871 , _vsType :: !(Maybe VectorStyleType)

3870− }

3872+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

3871

3873

3872-- | Creates a value of 'VectorStyle' with the minimum fields required to make a request.

3874-- | Creates a value of 'VectorStyle' with the minimum fields required to make a request.

3873--

3875--

gogol-maps-engine/gen/Network/Google/MapsEngine/Types/Sum.hs+429

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.MapsEngine.Types.Sum

9-- Module : Network.Google.MapsEngine.Types.Sum

@@ -32,6 +35,25 @@ data AcquisitionTimePrecision

32

35

33instance Hashable AcquisitionTimePrecision

36instance Hashable AcquisitionTimePrecision

34

37

38+instance FromText AcquisitionTimePrecision where

39+ fromText = \case

40+ "day" -> Just ATPDay

41+ "hour" -> Just ATPHour

42+ "minute" -> Just ATPMinute

43+ "month" -> Just ATPMonth

44+ "second" -> Just ATPSecond

45+ "year" -> Just ATPYear

46+ _ -> Nothing

47+

48+instance ToText AcquisitionTimePrecision where

49+ toText = \case

50+ ATPDay -> "day"

51+ ATPHour -> "hour"

52+ ATPMinute -> "minute"

53+ ATPMonth -> "month"

54+ ATPSecond -> "second"

55+ ATPYear -> "year"

56+

35-- | The type of asset. One of raster, rasterCollection, table, map, or

57-- | The type of asset. One of raster, rasterCollection, table, map, or

36-- layer.

58-- layer.

37data AssetType

59data AssetType

@@ -49,6 +71,23 @@ data AssetType

49

71

50instance Hashable AssetType

72instance Hashable AssetType

51

73

74+instance FromText AssetType where

75+ fromText = \case

76+ "layer" -> Just ATLayer

77+ "map" -> Just ATMap

78+ "raster" -> Just ATRaster

79+ "rasterCollection" -> Just ATRasterCollection

80+ "table" -> Just ATTable

81+ _ -> Nothing

82+

83+instance ToText AssetType where

84+ toText = \case

85+ ATLayer -> "layer"

86+ ATMap -> "map"

87+ ATRaster -> "raster"

88+ ATRasterCollection -> "rasterCollection"

89+ ATTable -> "table"

90+

52-- | The upload status of the file.

91-- | The upload status of the file.

53data FileUploadStatus

92data FileUploadStatus

54 = FUSCanceled

93 = FUSCanceled

@@ -63,6 +102,21 @@ data FileUploadStatus

63

102

64instance Hashable FileUploadStatus

103instance Hashable FileUploadStatus

65

104

105+instance FromText FileUploadStatus where

106+ fromText = \case

107+ "canceled" -> Just FUSCanceled

108+ "complete" -> Just FUSComplete

109+ "failed" -> Just FUSFailed

110+ "inProgress" -> Just FUSInProgress

111+ _ -> Nothing

112+

113+instance ToText FileUploadStatus where

114+ toText = \case

115+ FUSCanceled -> "canceled"

116+ FUSComplete -> "complete"

117+ FUSFailed -> "failed"

118+ FUSInProgress -> "inProgress"

119+

66-- | Operation used to evaluate the filter.

120-- | Operation used to evaluate the filter.

67data FilterOperator

121data FilterOperator

68 = FONotEqual

122 = FONotEqual

@@ -87,6 +141,31 @@ data FilterOperator

87

141

88instance Hashable FilterOperator

142instance Hashable FilterOperator

89

143

144+instance FromText FilterOperator where

145+ fromText = \case

146+ "!=" -> Just FONotEqual

147+ "<" -> Just FOLess

148+ "<=" -> Just FOLessOrEqual

149+ "==" -> Just FOEqual

150+ ">" -> Just FOGreater

151+ ">=" -> Just FOGreaterEqual

152+ "contains" -> Just FOContains

153+ "endsWith" -> Just FOEndsWith

154+ "startsWith" -> Just FOStartsWith

155+ _ -> Nothing

156+

157+instance ToText FilterOperator where

158+ toText = \case

159+ FONotEqual -> "!="

160+ FOLess -> "<"

161+ FOLessOrEqual -> "<="

162+ FOEqual -> "=="

163+ FOGreater -> ">"

164+ FOGreaterEqual -> ">="

165+ FOContains -> "contains"

166+ FOEndsWith -> "endsWith"

167+ FOStartsWith -> "startsWith"

168+

90-- | Identifies this object as a GeoJsonGeometryCollection.

169-- | Identifies this object as a GeoJsonGeometryCollection.

91data GeoJsonGeometryCollectionType

170data GeoJsonGeometryCollectionType

92 = GJGCTGeometryCollection

171 = GJGCTGeometryCollection

@@ -95,6 +174,15 @@ data GeoJsonGeometryCollectionType

95

174

96instance Hashable GeoJsonGeometryCollectionType

175instance Hashable GeoJsonGeometryCollectionType

97

176

177+instance FromText GeoJsonGeometryCollectionType where

178+ fromText = \case

179+ "GeometryCollection" -> Just GJGCTGeometryCollection

180+ _ -> Nothing

181+

182+instance ToText GeoJsonGeometryCollectionType where

183+ toText = \case

184+ GJGCTGeometryCollection -> "GeometryCollection"

185+

98-- | Identifies this object as a GeoJsonLineString.

186-- | Identifies this object as a GeoJsonLineString.

99data GeoJsonLineStringType

187data GeoJsonLineStringType

100 = GJLSTLineString

188 = GJLSTLineString

@@ -103,6 +191,15 @@ data GeoJsonLineStringType

103

191

104instance Hashable GeoJsonLineStringType

192instance Hashable GeoJsonLineStringType

105

193

194+instance FromText GeoJsonLineStringType where

195+ fromText = \case

196+ "LineString" -> Just GJLSTLineString

197+ _ -> Nothing

198+

199+instance ToText GeoJsonLineStringType where

200+ toText = \case

201+ GJLSTLineString -> "LineString"

202+

106-- | Identifies this object as a GeoJsonMultiLineString.

203-- | Identifies this object as a GeoJsonMultiLineString.

107data GeoJsonMultiLineStringType

204data GeoJsonMultiLineStringType

108 = GJMLSTMultiLineString

205 = GJMLSTMultiLineString

@@ -111,6 +208,15 @@ data GeoJsonMultiLineStringType

111

208

112instance Hashable GeoJsonMultiLineStringType

209instance Hashable GeoJsonMultiLineStringType

113

210

211+instance FromText GeoJsonMultiLineStringType where

212+ fromText = \case

213+ "MultiLineString" -> Just GJMLSTMultiLineString

214+ _ -> Nothing

215+

216+instance ToText GeoJsonMultiLineStringType where

217+ toText = \case

218+ GJMLSTMultiLineString -> "MultiLineString"

219+

114-- | Identifies this object as a GeoJsonMultiPoint.

220-- | Identifies this object as a GeoJsonMultiPoint.

115data GeoJsonMultiPointType

221data GeoJsonMultiPointType

116 = GJMPTMultiPoint

222 = GJMPTMultiPoint

@@ -119,6 +225,15 @@ data GeoJsonMultiPointType

119

225

120instance Hashable GeoJsonMultiPointType

226instance Hashable GeoJsonMultiPointType

121

227

228+instance FromText GeoJsonMultiPointType where

229+ fromText = \case

230+ "MultiPoint" -> Just GJMPTMultiPoint

231+ _ -> Nothing

232+

233+instance ToText GeoJsonMultiPointType where

234+ toText = \case

235+ GJMPTMultiPoint -> "MultiPoint"

236+

122-- | Identifies this object as a GeoJsonMultiPolygon.

237-- | Identifies this object as a GeoJsonMultiPolygon.

123data GeoJsonMultiPolygonType

238data GeoJsonMultiPolygonType

124 = GJMPTMultiPolygon

239 = GJMPTMultiPolygon

@@ -127,6 +242,15 @@ data GeoJsonMultiPolygonType

127

242

128instance Hashable GeoJsonMultiPolygonType

243instance Hashable GeoJsonMultiPolygonType

129

244

245+instance FromText GeoJsonMultiPolygonType where

246+ fromText = \case

247+ "MultiPolygon" -> Just GJMPTMultiPolygon

248+ _ -> Nothing

249+

250+instance ToText GeoJsonMultiPolygonType where

251+ toText = \case

252+ GJMPTMultiPolygon -> "MultiPolygon"

253+

130-- | Identifies this object as a GeoJsonPoint.

254-- | Identifies this object as a GeoJsonPoint.

131data GeoJsonPointType

255data GeoJsonPointType

132 = GJPTPoint

256 = GJPTPoint

@@ -135,6 +259,15 @@ data GeoJsonPointType

135

259

136instance Hashable GeoJsonPointType

260instance Hashable GeoJsonPointType

137

261

262+instance FromText GeoJsonPointType where

263+ fromText = \case

264+ "Point" -> Just GJPTPoint

265+ _ -> Nothing

266+

267+instance ToText GeoJsonPointType where

268+ toText = \case

269+ GJPTPoint -> "Point"

270+

138-- | Identifies this object as a GeoJsonPolygon.

271-- | Identifies this object as a GeoJsonPolygon.

139data GeoJsonPolygonType

272data GeoJsonPolygonType

140 = GJPTPolygon

273 = GJPTPolygon

@@ -143,6 +276,15 @@ data GeoJsonPolygonType

143

276

144instance Hashable GeoJsonPolygonType

277instance Hashable GeoJsonPolygonType

145

278

279+instance FromText GeoJsonPolygonType where

280+ fromText = \case

281+ "Polygon" -> Just GJPTPolygon

282+ _ -> Nothing

283+

284+instance ToText GeoJsonPolygonType where

285+ toText = \case

286+ GJPTPolygon -> "Polygon"

287+

146-- | Font style of the label, defaults to \'normal\'.

288-- | Font style of the label, defaults to \'normal\'.

147data LabelStyleFontStyle

289data LabelStyleFontStyle

148 = LSFSItalic

290 = LSFSItalic

@@ -153,6 +295,17 @@ data LabelStyleFontStyle

153

295

154instance Hashable LabelStyleFontStyle

296instance Hashable LabelStyleFontStyle

155

297

298+instance FromText LabelStyleFontStyle where

299+ fromText = \case

300+ "italic" -> Just LSFSItalic

301+ "normal" -> Just LSFSNormal

302+ _ -> Nothing

303+

304+instance ToText LabelStyleFontStyle where

305+ toText = \case

306+ LSFSItalic -> "italic"

307+ LSFSNormal -> "normal"

308+

156-- | Font weight of the label, defaults to \'normal\'.

309-- | Font weight of the label, defaults to \'normal\'.

157data LabelStyleFontWeight

310data LabelStyleFontWeight

158 = LSFWBold

311 = LSFWBold

@@ -163,6 +316,17 @@ data LabelStyleFontWeight

163

316

164instance Hashable LabelStyleFontWeight

317instance Hashable LabelStyleFontWeight

165

318

319+instance FromText LabelStyleFontWeight where

320+ fromText = \case

321+ "bold" -> Just LSFWBold

322+ "normal" -> Just LSFWNormal

323+ _ -> Nothing

324+

325+instance ToText LabelStyleFontWeight where

326+ toText = \case

327+ LSFWBold -> "bold"

328+ LSFWNormal -> "normal"

329+

166-- | Deprecated: The type of the datasources used to build this Layer. Note:

330-- | Deprecated: The type of the datasources used to build this Layer. Note:

167-- This has been replaced by layerType, but is still available for now to

331-- This has been replaced by layerType, but is still available for now to

168-- maintain backward compatibility.

332-- maintain backward compatibility.

@@ -175,6 +339,17 @@ data LayerDatasourceType

175

339

176instance Hashable LayerDatasourceType

340instance Hashable LayerDatasourceType

177

341

342+instance FromText LayerDatasourceType where

343+ fromText = \case

344+ "image" -> Just LDTImage

345+ "table" -> Just LDTTable

346+ _ -> Nothing

347+

348+instance ToText LayerDatasourceType where

349+ toText = \case

350+ LDTImage -> "image"

351+ LDTTable -> "table"

352+

178-- | The type of the datasources used to build this Layer. This should be

353-- | The type of the datasources used to build this Layer. This should be

179-- used instead of datasourceType. At least one of layerType and

354-- used instead of datasourceType. At least one of layerType and

180-- datasourceType and must be specified, but layerType takes precedence.

355-- datasourceType and must be specified, but layerType takes precedence.

@@ -187,6 +362,17 @@ data LayerLayerType

187

362

188instance Hashable LayerLayerType

363instance Hashable LayerLayerType

189

364

365+instance FromText LayerLayerType where

366+ fromText = \case

367+ "image" -> Just LLTImage

368+ "vector" -> Just LLTVector

369+ _ -> Nothing

370+

371+instance ToText LayerLayerType where

372+ toText = \case

373+ LLTImage -> "image"

374+ LLTVector -> "vector"

375+

190-- | The processing status of this layer.

376-- | The processing status of this layer.

191data LayerProcessingStatus

377data LayerProcessingStatus

192 = LPSComplete

378 = LPSComplete

@@ -203,6 +389,23 @@ data LayerProcessingStatus

203

389

204instance Hashable LayerProcessingStatus

390instance Hashable LayerProcessingStatus

205

391

392+instance FromText LayerProcessingStatus where

393+ fromText = \case

394+ "complete" -> Just LPSComplete

395+ "failed" -> Just LPSFailed

396+ "notReady" -> Just LPSNotReady

397+ "processing" -> Just LPSProcessing

398+ "ready" -> Just LPSReady

399+ _ -> Nothing

400+

401+instance ToText LayerProcessingStatus where

402+ toText = \case

403+ LPSComplete -> "complete"

404+ LPSFailed -> "failed"

405+ LPSNotReady -> "notReady"

406+ LPSProcessing -> "processing"

407+ LPSReady -> "ready"

408+

206-- | The publishing status of this layer.

409-- | The publishing status of this layer.

207data LayerPublishingStatus

410data LayerPublishingStatus

208 = LPSNotPublished

411 = LPSNotPublished

@@ -213,6 +416,17 @@ data LayerPublishingStatus

213

416

214instance Hashable LayerPublishingStatus

417instance Hashable LayerPublishingStatus

215

418

419+instance FromText LayerPublishingStatus where

420+ fromText = \case

421+ "notPublished" -> Just LPSNotPublished

422+ "published" -> Just LPSPublished

423+ _ -> Nothing

424+

425+instance ToText LayerPublishingStatus where

426+ toText = \case

427+ LPSNotPublished -> "notPublished"

428+ LPSPublished -> "published"

429+

216-- | Identifies this object as a MapFolder.

430-- | Identifies this object as a MapFolder.

217data MapFolderType

431data MapFolderType

218 = MFTFolder

432 = MFTFolder

@@ -221,6 +435,15 @@ data MapFolderType

221

435

222instance Hashable MapFolderType

436instance Hashable MapFolderType

223

437

438+instance FromText MapFolderType where

439+ fromText = \case

440+ "folder" -> Just MFTFolder

441+ _ -> Nothing

442+

443+instance ToText MapFolderType where

444+ toText = \case

445+ MFTFolder -> "folder"

446+

224-- | Identifies this object as a MapKmlLink.

447-- | Identifies this object as a MapKmlLink.

225data MapKmlLinkType

448data MapKmlLinkType

226 = MKLTKmlLink

449 = MKLTKmlLink

@@ -229,6 +452,15 @@ data MapKmlLinkType

229

452

230instance Hashable MapKmlLinkType

453instance Hashable MapKmlLinkType

231

454

455+instance FromText MapKmlLinkType where

456+ fromText = \case

457+ "kmlLink" -> Just MKLTKmlLink

458+ _ -> Nothing

459+

460+instance ToText MapKmlLinkType where

461+ toText = \case

462+ MKLTKmlLink -> "kmlLink"

463+

232-- | Identifies this object as a MapLayer.

464-- | Identifies this object as a MapLayer.

233data MapLayerType

465data MapLayerType

234 = MLTLayer

466 = MLTLayer

@@ -237,6 +469,15 @@ data MapLayerType

237

469

238instance Hashable MapLayerType

470instance Hashable MapLayerType

239

471

472+instance FromText MapLayerType where

473+ fromText = \case

474+ "layer" -> Just MLTLayer

475+ _ -> Nothing

476+

477+instance ToText MapLayerType where

478+ toText = \case

479+ MLTLayer -> "layer"

480+

240-- | The processing status of this map. Map processing is automatically

481-- | The processing status of this map. Map processing is automatically

241-- started once a map becomes ready for processing.

482-- started once a map becomes ready for processing.

242data MapProcessingStatus

483data MapProcessingStatus

@@ -254,6 +495,23 @@ data MapProcessingStatus

254

495

255instance Hashable MapProcessingStatus

496instance Hashable MapProcessingStatus

256

497

498+instance FromText MapProcessingStatus where

499+ fromText = \case

500+ "complete" -> Just MPSComplete

501+ "failed" -> Just MPSFailed

502+ "notReady" -> Just MPSNotReady

503+ "processing" -> Just MPSProcessing

504+ "ready" -> Just MPSReady

505+ _ -> Nothing

506+

507+instance ToText MapProcessingStatus where

508+ toText = \case

509+ MPSComplete -> "complete"

510+ MPSFailed -> "failed"

511+ MPSNotReady -> "notReady"

512+ MPSProcessing -> "processing"

513+ MPSReady -> "ready"

514+

257-- | The publishing status of this map.

515-- | The publishing status of this map.

258data MapPublishingStatus

516data MapPublishingStatus

259 = MPSNotPublished

517 = MPSNotPublished

@@ -264,6 +522,17 @@ data MapPublishingStatus

264

522

265instance Hashable MapPublishingStatus

523instance Hashable MapPublishingStatus

266

524

525+instance FromText MapPublishingStatus where

526+ fromText = \case

527+ "notPublished" -> Just MPSNotPublished

528+ "published" -> Just MPSPublished

529+ _ -> Nothing

530+

531+instance ToText MapPublishingStatus where

532+ toText = \case

533+ MPSNotPublished -> "notPublished"

534+ MPSPublished -> "published"

535+

267-- | The type of access granted to this user or group.

536-- | The type of access granted to this user or group.

268data PermissionRole

537data PermissionRole

269 = PROwner

538 = PROwner

@@ -278,6 +547,21 @@ data PermissionRole

278

547

279instance Hashable PermissionRole

548instance Hashable PermissionRole

280

549

550+instance FromText PermissionRole where

551+ fromText = \case

552+ "owner" -> Just PROwner

553+ "reader" -> Just PRReader

554+ "viewer" -> Just PRViewer

555+ "writer" -> Just PRWriter

556+ _ -> Nothing

557+

558+instance ToText PermissionRole where

559+ toText = \case

560+ PROwner -> "owner"

561+ PRReader -> "reader"

562+ PRViewer -> "viewer"

563+ PRWriter -> "writer"

564+

281-- | The account type.

565-- | The account type.

282data PermissionType

566data PermissionType

283 = PTAnyone

567 = PTAnyone

@@ -290,6 +574,19 @@ data PermissionType

290

574

291instance Hashable PermissionType

575instance Hashable PermissionType

292

576

577+instance FromText PermissionType where

578+ fromText = \case

579+ "anyone" -> Just PTAnyone

580+ "group" -> Just PTGroup

581+ "user" -> Just PTUser

582+ _ -> Nothing

583+

584+instance ToText PermissionType where

585+ toText = \case

586+ PTAnyone -> "anyone"

587+ PTGroup -> "group"

588+ PTUser -> "user"

589+

293-- | The type of the datasources used to build this Layer. This should be

590-- | The type of the datasources used to build this Layer. This should be

294-- used instead of datasourceType. At least one of layerType and

591-- used instead of datasourceType. At least one of layerType and

295-- datasourceType and must be specified, but layerType takes precedence.

592-- datasourceType and must be specified, but layerType takes precedence.

@@ -302,6 +599,17 @@ data PublishedLayerLayerType

302

599

303instance Hashable PublishedLayerLayerType

600instance Hashable PublishedLayerLayerType

304

601

602+instance FromText PublishedLayerLayerType where

603+ fromText = \case

604+ "image" -> Just PLLTImage

605+ "vector" -> Just PLLTVector

606+ _ -> Nothing

607+

608+instance ToText PublishedLayerLayerType where

609+ toText = \case

610+ PLLTImage -> "image"

611+ PLLTVector -> "vector"

612+

305-- | The processing status of this RasterCollection.

613-- | The processing status of this RasterCollection.

306data RasterCollectionProcessingStatus

614data RasterCollectionProcessingStatus

307 = RCPSComplete

615 = RCPSComplete

@@ -318,6 +626,23 @@ data RasterCollectionProcessingStatus

318

626

319instance Hashable RasterCollectionProcessingStatus

627instance Hashable RasterCollectionProcessingStatus

320

628

629+instance FromText RasterCollectionProcessingStatus where

630+ fromText = \case

631+ "complete" -> Just RCPSComplete

632+ "failed" -> Just RCPSFailed

633+ "notReady" -> Just RCPSNotReady

634+ "processing" -> Just RCPSProcessing

635+ "ready" -> Just RCPSReady

636+ _ -> Nothing

637+

638+instance ToText RasterCollectionProcessingStatus where

639+ toText = \case

640+ RCPSComplete -> "complete"

641+ RCPSFailed -> "failed"

642+ RCPSNotReady -> "notReady"

643+ RCPSProcessing -> "processing"

644+ RCPSReady -> "ready"

645+

321-- | The type of rasters contained within this RasterCollection.

646-- | The type of rasters contained within this RasterCollection.

322data RasterCollectionRasterType

647data RasterCollectionRasterType

323 = RCRTImage

648 = RCRTImage

@@ -326,6 +651,15 @@ data RasterCollectionRasterType

326

651

327instance Hashable RasterCollectionRasterType

652instance Hashable RasterCollectionRasterType

328

653

654+instance FromText RasterCollectionRasterType where

655+ fromText = \case

656+ "image" -> Just RCRTImage

657+ _ -> Nothing

658+

659+instance ToText RasterCollectionRasterType where

660+ toText = \case

661+ RCRTImage -> "image"

662+

329-- | The processing status of this Raster.

663-- | The processing status of this Raster.

330data RasterProcessingStatus

664data RasterProcessingStatus

331 = RPSComplete

665 = RPSComplete

@@ -342,6 +676,23 @@ data RasterProcessingStatus

342

676

343instance Hashable RasterProcessingStatus

677instance Hashable RasterProcessingStatus

344

678

679+instance FromText RasterProcessingStatus where

680+ fromText = \case

681+ "complete" -> Just RPSComplete

682+ "failed" -> Just RPSFailed

683+ "notReady" -> Just RPSNotReady

684+ "processing" -> Just RPSProcessing

685+ "ready" -> Just RPSReady

686+ _ -> Nothing

687+

688+instance ToText RasterProcessingStatus where

689+ toText = \case

690+ RPSComplete -> "complete"

691+ RPSFailed -> "failed"

692+ RPSNotReady -> "notReady"

693+ RPSProcessing -> "processing"

694+ RPSReady -> "ready"

695+

345-- | The type of this Raster. Always \"image\" today.

696-- | The type of this Raster. Always \"image\" today.

346data RasterRasterType

697data RasterRasterType

347 = RRTImage

698 = RRTImage

@@ -350,6 +701,15 @@ data RasterRasterType

350

701

351instance Hashable RasterRasterType

702instance Hashable RasterRasterType

352

703

704+instance FromText RasterRasterType where

705+ fromText = \case

706+ "image" -> Just RRTImage

707+ _ -> Nothing

708+

709+instance ToText RasterRasterType where

710+ toText = \case

711+ RRTImage -> "image"

712+

353-- | Name of the shape.

713-- | Name of the shape.

354data ScaledShapeShape

714data ScaledShapeShape

355 = SSSCircle

715 = SSSCircle

@@ -358,6 +718,15 @@ data ScaledShapeShape

358

718

359instance Hashable ScaledShapeShape

719instance Hashable ScaledShapeShape

360

720

721+instance FromText ScaledShapeShape where

722+ fromText = \case

723+ "circle" -> Just SSSCircle

724+ _ -> Nothing

725+

726+instance ToText ScaledShapeShape where

727+ toText = \case

728+ SSSCircle -> "circle"

729+

361-- | The type of scaling function to use. Defaults to SQRT. Currently only

730-- | The type of scaling function to use. Defaults to SQRT. Currently only

362-- linear and square root scaling are supported.

731-- linear and square root scaling are supported.

363data ScalingFunctionScalingType

732data ScalingFunctionScalingType

@@ -369,6 +738,17 @@ data ScalingFunctionScalingType

369

738

370instance Hashable ScalingFunctionScalingType

739instance Hashable ScalingFunctionScalingType

371

740

741+instance FromText ScalingFunctionScalingType where

742+ fromText = \case

743+ "linear" -> Just SFSTLinear

744+ "sqrt" -> Just SFSTSqrt

745+ _ -> Nothing

746+

747+instance ToText ScalingFunctionScalingType where

748+ toText = \case

749+ SFSTLinear -> "linear"

750+ SFSTSqrt -> "sqrt"

751+

372-- | The type of data stored in this column.

752-- | The type of data stored in this column.

373data TableColumnType

753data TableColumnType

374 = TCTDatetime

754 = TCTDatetime

@@ -391,6 +771,29 @@ data TableColumnType

391

771

392instance Hashable TableColumnType

772instance Hashable TableColumnType

393

773

774+instance FromText TableColumnType where

775+ fromText = \case

776+ "datetime" -> Just TCTDatetime

777+ "double" -> Just TCTDouble

778+ "integer" -> Just TCTInteger

779+ "lineStrings" -> Just TCTLineStrings

780+ "mixedGeometry" -> Just TCTMixedGeometry

781+ "points" -> Just TCTPoints

782+ "polygons" -> Just TCTPolygons

783+ "string" -> Just TCTString

784+ _ -> Nothing

785+

786+instance ToText TableColumnType where

787+ toText = \case

788+ TCTDatetime -> "datetime"

789+ TCTDouble -> "double"

790+ TCTInteger -> "integer"

791+ TCTLineStrings -> "lineStrings"

792+ TCTMixedGeometry -> "mixedGeometry"

793+ TCTPoints -> "points"

794+ TCTPolygons -> "polygons"

795+ TCTString -> "string"

796+

394-- | The processing status of this table.

797-- | The processing status of this table.

395data TableProcessingStatus

798data TableProcessingStatus

396 = TPSComplete

799 = TPSComplete

@@ -407,6 +810,23 @@ data TableProcessingStatus

407

810

408instance Hashable TableProcessingStatus

811instance Hashable TableProcessingStatus

409

812

813+instance FromText TableProcessingStatus where

814+ fromText = \case

815+ "complete" -> Just TPSComplete

816+ "failed" -> Just TPSFailed

817+ "notReady" -> Just TPSNotReady

818+ "processing" -> Just TPSProcessing

819+ "ready" -> Just TPSReady

820+ _ -> Nothing

821+

822+instance ToText TableProcessingStatus where

823+ toText = \case

824+ TPSComplete -> "complete"

825+ TPSFailed -> "failed"

826+ TPSNotReady -> "notReady"

827+ TPSProcessing -> "processing"

828+ TPSReady -> "ready"

829+

410-- | The type of the vector style. Currently, only displayRule is supported.

830-- | The type of the vector style. Currently, only displayRule is supported.

411data VectorStyleType

831data VectorStyleType

412 = VSTDisplayRule

832 = VSTDisplayRule

@@ -414,3 +834,12 @@ data VectorStyleType

414 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

834 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

415

835

416instance Hashable VectorStyleType

836instance Hashable VectorStyleType

837+

838+instance FromText VectorStyleType where

839+ fromText = \case

840+ "displayRule" -> Just VSTDisplayRule

841+ _ -> Nothing

842+

843+instance ToText VectorStyleType where

844+ toText = \case

845+ VSTDisplayRule -> "displayRule"

gogol-mirror/gen/Network/Google/Mirror/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Mirror.Types

8-- Module : Network.Google.Mirror.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Mirror.Types

15module Network.Google.Mirror.Types

14 (

16 (

15− -- * API Definition

16− mirror

17−

18

17

19 -- * Account

18 -- * Account

20− , Account

19+ Account

21 , account

20 , account

22 , aAuthTokens

21 , aAuthTokens

23 , aUserData

22 , aUserData

@@ -201,6 +200,3 @@ module Network.Google.Mirror.Types

201import Network.Google.Mirror.Types.Product

200import Network.Google.Mirror.Types.Product

202import Network.Google.Mirror.Types.Sum

201import Network.Google.Mirror.Types.Sum

203import Network.Google.Prelude

202import Network.Google.Prelude

204−

205−mirror :: a

206−mirror = error "mirror"

gogol-mirror/gen/Network/Google/Mirror/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Mirror.Types.Product

8-- Module : Network.Google.Mirror.Types.Product

gogol-mirror/gen/Network/Google/Mirror/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Mirror.Types.Sum

9-- Module : Network.Google.Mirror.Types.Sum

gogol-oauth2/gen/Network/Google/OAuth2/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.OAuth2.Types

8-- Module : Network.Google.OAuth2.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.OAuth2.Types

15module Network.Google.OAuth2.Types

14 (

16 (

15− -- * API Definition

16− oauth2

17−

18

17

19 -- * Jwk

18 -- * Jwk

20− , Jwk

19+ Jwk

21 , jwk

20 , jwk

22 , jwkKeys

21 , jwkKeys

23

22

@@ -63,6 +62,3 @@ module Network.Google.OAuth2.Types

63import Network.Google.OAuth2.Types.Product

62import Network.Google.OAuth2.Types.Product

64import Network.Google.OAuth2.Types.Sum

63import Network.Google.OAuth2.Types.Sum

65import Network.Google.Prelude

64import Network.Google.Prelude

66−

67−oauth2 :: a

68−oauth2 = error "oauth2"

gogol-oauth2/gen/Network/Google/OAuth2/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.OAuth2.Types.Product

8-- Module : Network.Google.OAuth2.Types.Product

gogol-oauth2/gen/Network/Google/OAuth2/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.OAuth2.Types.Sum

9-- Module : Network.Google.OAuth2.Types.Sum

gogol-pagespeed/gen/Network/Google/PageSpeedInsights/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.PageSpeedInsights.Types

8-- Module : Network.Google.PageSpeedInsights.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.PageSpeedInsights.Types

15module Network.Google.PageSpeedInsights.Types

14 (

16 (

15− -- * API Definition

16− pagespeedonline

17−

18

17

19 -- * PagespeedApiFormatStringV2

18 -- * PagespeedApiFormatStringV2

20− , PagespeedApiFormatStringV2

19+ PagespeedApiFormatStringV2

21 , pagespeedApiFormatStringV2

20 , pagespeedApiFormatStringV2

22 , pafsvArgs

21 , pafsvArgs

23 , pafsvFormat

22 , pafsvFormat

@@ -120,6 +119,3 @@ module Network.Google.PageSpeedInsights.Types

120import Network.Google.PageSpeedInsights.Types.Product

119import Network.Google.PageSpeedInsights.Types.Product

121import Network.Google.PageSpeedInsights.Types.Sum

120import Network.Google.PageSpeedInsights.Types.Sum

122import Network.Google.Prelude

121import Network.Google.Prelude

123−

124−pagespeedonline :: a

125−pagespeedonline = error "pagespeedonline"

gogol-pagespeed/gen/Network/Google/PageSpeedInsights/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.PageSpeedInsights.Types.Product

8-- Module : Network.Google.PageSpeedInsights.Types.Product

gogol-pagespeed/gen/Network/Google/PageSpeedInsights/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.PageSpeedInsights.Types.Sum

9-- Module : Network.Google.PageSpeedInsights.Types.Sum

gogol-partners/gen/Network/Google/Partners/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Partners.Types

8-- Module : Network.Google.Partners.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Partners.Types

15module Network.Google.Partners.Types

14 (

16 (

15− -- * API Definition

16− partners

17−

18

17

19 -- * CertificationExamStatus

18 -- * CertificationExamStatus

20− , CertificationExamStatus

19+ CertificationExamStatus

21 , certificationExamStatus

20 , certificationExamStatus

22 , cesNumberUsersPass

21 , cesNumberUsersPass

23 , cesType

22 , cesType

@@ -215,6 +214,3 @@ module Network.Google.Partners.Types

215import Network.Google.Partners.Types.Product

214import Network.Google.Partners.Types.Product

216import Network.Google.Partners.Types.Sum

215import Network.Google.Partners.Types.Sum

217import Network.Google.Prelude

216import Network.Google.Prelude

218−

219−partners :: a

220−partners = error "partners"

gogol-partners/gen/Network/Google/Partners/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Partners.Types.Product

8-- Module : Network.Google.Partners.Types.Product

gogol-partners/gen/Network/Google/Partners/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Partners.Types.Sum

9-- Module : Network.Google.Partners.Types.Sum

gogol-play-moviespartner/gen/Network/Google/PlayMoviesPartner/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.PlayMoviesPartner.Types

8-- Module : Network.Google.PlayMoviesPartner.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.PlayMoviesPartner.Types

15module Network.Google.PlayMoviesPartner.Types

14 (

16 (

15− -- * API Definition

16− playmoviespartner

17−

18

17

19 -- * Avail

18 -- * Avail

20− , Avail

19+ Avail

21 , avail

20 , avail

22 , aAltId

21 , aAltId

23 , aPphNames

22 , aPphNames

@@ -163,6 +162,3 @@ module Network.Google.PlayMoviesPartner.Types

163import Network.Google.PlayMoviesPartner.Types.Product

162import Network.Google.PlayMoviesPartner.Types.Product

164import Network.Google.PlayMoviesPartner.Types.Sum

163import Network.Google.PlayMoviesPartner.Types.Sum

165import Network.Google.Prelude

164import Network.Google.Prelude

166−

167−playmoviespartner :: a

168−playmoviespartner = error "playmoviespartner"

gogol-play-moviespartner/gen/Network/Google/PlayMoviesPartner/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.PlayMoviesPartner.Types.Product

8-- Module : Network.Google.PlayMoviesPartner.Types.Product

gogol-play-moviespartner/gen/Network/Google/PlayMoviesPartner/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.PlayMoviesPartner.Types.Sum

9-- Module : Network.Google.PlayMoviesPartner.Types.Sum

gogol-plus-domains/gen/Network/Google/PlusDomains/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.PlusDomains.Types

8-- Module : Network.Google.PlusDomains.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.PlusDomains.Types

15module Network.Google.PlusDomains.Types

14 (

16 (

15− -- * API Definition

16− plusDomains

17−

18

17

19 -- * Acl

18 -- * Acl

20− , Acl

19+ Acl

21 , acl

20 , acl

22 , aclKind

21 , aclKind

23 , aclItems

22 , aclItems

@@ -509,6 +508,3 @@ module Network.Google.PlusDomains.Types

509import Network.Google.PlusDomains.Types.Product

508import Network.Google.PlusDomains.Types.Product

510import Network.Google.PlusDomains.Types.Sum

509import Network.Google.PlusDomains.Types.Sum

511import Network.Google.Prelude

510import Network.Google.Prelude

512−

513−plusDomains :: a

514−plusDomains = error "plusDomains"

gogol-plus-domains/gen/Network/Google/PlusDomains/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.PlusDomains.Types.Product

8-- Module : Network.Google.PlusDomains.Types.Product

gogol-plus-domains/gen/Network/Google/PlusDomains/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.PlusDomains.Types.Sum

9-- Module : Network.Google.PlusDomains.Types.Sum

gogol-plus/gen/Network/Google/Plus/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Plus.Types

8-- Module : Network.Google.Plus.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Plus.Types

15module Network.Google.Plus.Types

14 (

16 (

15− -- * API Definition

16− plus

17−

18

17

19 -- * Acl

18 -- * Acl

20− , Acl

19+ Acl

21 , acl

20 , acl

22 , aclKind

21 , aclKind

23 , aclItems

22 , aclItems

@@ -488,6 +487,3 @@ module Network.Google.Plus.Types

488import Network.Google.Plus.Types.Product

487import Network.Google.Plus.Types.Product

489import Network.Google.Plus.Types.Sum

488import Network.Google.Plus.Types.Sum

490import Network.Google.Prelude

489import Network.Google.Prelude

491−

492−plus :: a

493−plus = error "plus"

gogol-plus/gen/Network/Google/Plus/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Plus.Types.Product

8-- Module : Network.Google.Plus.Types.Product

gogol-plus/gen/Network/Google/Plus/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Plus.Types.Sum

9-- Module : Network.Google.Plus.Types.Sum

gogol-prediction/gen/Network/Google/Prediction/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Prediction.Types

8-- Module : Network.Google.Prediction.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Prediction.Types

15module Network.Google.Prediction.Types

14 (

16 (

15− -- * API Definition

16− prediction

17−

18

17

19 -- * Analyze

18 -- * Analyze

20− , Analyze

19+ Analyze

21 , analyze

20 , analyze

22 , aKind

21 , aKind

23 , aModelDescription

22 , aModelDescription

@@ -193,6 +192,3 @@ module Network.Google.Prediction.Types

193import Network.Google.Prediction.Types.Product

192import Network.Google.Prediction.Types.Product

194import Network.Google.Prediction.Types.Sum

193import Network.Google.Prediction.Types.Sum

195import Network.Google.Prelude

194import Network.Google.Prelude

196−

197−prediction :: a

198−prediction = error "prediction"

gogol-prediction/gen/Network/Google/Prediction/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Prediction.Types.Product

8-- Module : Network.Google.Prediction.Types.Product

gogol-prediction/gen/Network/Google/Prediction/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Prediction.Types.Sum

9-- Module : Network.Google.Prediction.Types.Sum

gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.ProximityBeacon.Types

8-- Module : Network.Google.ProximityBeacon.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.ProximityBeacon.Types

15module Network.Google.ProximityBeacon.Types

14 (

16 (

15− -- * API Definition

16− proximitybeacon

17−

18

17

19 -- * AdvertisedId

18 -- * AdvertisedId

20− , AdvertisedId

19+ AdvertisedId

21 , advertisedId

20 , advertisedId

22 , aiId

21 , aiId

23 , aiType

22 , aiType

@@ -145,6 +144,3 @@ module Network.Google.ProximityBeacon.Types

145import Network.Google.Prelude

144import Network.Google.Prelude

146import Network.Google.ProximityBeacon.Types.Product

145import Network.Google.ProximityBeacon.Types.Product

147import Network.Google.ProximityBeacon.Types.Sum

146import Network.Google.ProximityBeacon.Types.Sum

148−

149−proximitybeacon :: a

150−proximitybeacon = error "proximitybeacon"

gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.ProximityBeacon.Types.Product

8-- Module : Network.Google.ProximityBeacon.Types.Product

gogol-proximitybeacon/gen/Network/Google/ProximityBeacon/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.ProximityBeacon.Types.Sum

9-- Module : Network.Google.ProximityBeacon.Types.Sum

gogol-qpxexpress/gen/Network/Google/QPXExpress/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.QPXExpress.Types

8-- Module : Network.Google.QPXExpress.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.QPXExpress.Types

15module Network.Google.QPXExpress.Types

14 (

16 (

15− -- * API Definition

16− qpxExpress

17−

18

17

19 -- * AircraftData

18 -- * AircraftData

20− , AircraftData

19+ AircraftData

21 , aircraftData

20 , aircraftData

22 , adKind

21 , adKind

23 , adName

22 , adName

@@ -251,6 +250,3 @@ module Network.Google.QPXExpress.Types

251import Network.Google.Prelude

250import Network.Google.Prelude

252import Network.Google.QPXExpress.Types.Product

251import Network.Google.QPXExpress.Types.Product

253import Network.Google.QPXExpress.Types.Sum

252import Network.Google.QPXExpress.Types.Sum

254−

255−qpxExpress :: a

256−qpxExpress = error "qpxExpress"

gogol-qpxexpress/gen/Network/Google/QPXExpress/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.QPXExpress.Types.Product

8-- Module : Network.Google.QPXExpress.Types.Product

gogol-qpxexpress/gen/Network/Google/QPXExpress/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.QPXExpress.Types.Sum

9-- Module : Network.Google.QPXExpress.Types.Sum

gogol-replicapool-updater/gen/Network/Google/ComputeEngineInstanceGroupUpdater/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.ComputeEngineInstanceGroupUpdater.Types

8-- Module : Network.Google.ComputeEngineInstanceGroupUpdater.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.ComputeEngineInstanceGroupUpdater.Types

15module Network.Google.ComputeEngineInstanceGroupUpdater.Types

14 (

16 (

15− -- * API Definition

16− replicapoolupdater

17−

18

17

19 -- * InstanceUpdate

18 -- * InstanceUpdate

20− , InstanceUpdate

19+ InstanceUpdate

21 , instanceUpdate

20 , instanceUpdate

22 , iuStatus

21 , iuStatus

23 , iuError

22 , iuError

@@ -156,6 +155,3 @@ module Network.Google.ComputeEngineInstanceGroupUpdater.Types

156import Network.Google.ComputeEngineInstanceGroupUpdater.Types.Product

155import Network.Google.ComputeEngineInstanceGroupUpdater.Types.Product

157import Network.Google.ComputeEngineInstanceGroupUpdater.Types.Sum

156import Network.Google.ComputeEngineInstanceGroupUpdater.Types.Sum

158import Network.Google.Prelude

157import Network.Google.Prelude

159−

160−replicapoolupdater :: a

161−replicapoolupdater = error "replicapoolupdater"

gogol-replicapool-updater/gen/Network/Google/ComputeEngineInstanceGroupUpdater/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.ComputeEngineInstanceGroupUpdater.Types.Product

8-- Module : Network.Google.ComputeEngineInstanceGroupUpdater.Types.Product

gogol-replicapool-updater/gen/Network/Google/ComputeEngineInstanceGroupUpdater/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.ComputeEngineInstanceGroupUpdater.Types.Sum

9-- Module : Network.Google.ComputeEngineInstanceGroupUpdater.Types.Sum

gogol-replicapool/gen/Network/Google/ComputeEngineInstanceGroupManager/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.ComputeEngineInstanceGroupManager.Types

8-- Module : Network.Google.ComputeEngineInstanceGroupManager.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.ComputeEngineInstanceGroupManager.Types

15module Network.Google.ComputeEngineInstanceGroupManager.Types

14 (

16 (

15− -- * API Definition

16− replicapool

17−

18

17

19 -- * InstanceGroupManager

18 -- * InstanceGroupManager

20− , InstanceGroupManager

19+ InstanceGroupManager

21 , instanceGroupManager

20 , instanceGroupManager

22 , igmCurrentSize

21 , igmCurrentSize

23 , igmGroup

22 , igmGroup

@@ -148,6 +147,3 @@ module Network.Google.ComputeEngineInstanceGroupManager.Types

148import Network.Google.ComputeEngineInstanceGroupManager.Types.Product

147import Network.Google.ComputeEngineInstanceGroupManager.Types.Product

149import Network.Google.ComputeEngineInstanceGroupManager.Types.Sum

148import Network.Google.ComputeEngineInstanceGroupManager.Types.Sum

150import Network.Google.Prelude

149import Network.Google.Prelude

151−

152−replicapool :: a

153−replicapool = error "replicapool"

gogol-replicapool/gen/Network/Google/ComputeEngineInstanceGroupManager/Types/Product.hs+5−3

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.ComputeEngineInstanceGroupManager.Types.Product

8-- Module : Network.Google.ComputeEngineInstanceGroupManager.Types.Product

@@ -417,7 +419,7 @@ data Operation = Operation

417 , _oRegion :: !(Maybe Text)

419 , _oRegion :: !(Maybe Text)

418 , _oTargetLink :: !(Maybe Text)

420 , _oTargetLink :: !(Maybe Text)

419 , _oClientOperationId :: !(Maybe Text)

421 , _oClientOperationId :: !(Maybe Text)

420− }

422+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

421

423

422-- | Creates a value of 'Operation' with the minimum fields required to make a request.

424-- | Creates a value of 'Operation' with the minimum fields required to make a request.

423--

425--

@@ -728,7 +730,7 @@ data OperationItemWarnings = OperationItemWarnings

728 { _oiwData :: !(Maybe [OperationItemDataItemWarnings])

730 { _oiwData :: !(Maybe [OperationItemDataItemWarnings])

729 , _oiwCode :: !(Maybe OperationCodeItemWarnings)

731 , _oiwCode :: !(Maybe OperationCodeItemWarnings)

730 , _oiwMessage :: !(Maybe Text)

732 , _oiwMessage :: !(Maybe Text)

731− }

733+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

732

734

733-- | Creates a value of 'OperationItemWarnings' with the minimum fields required to make a request.

735-- | Creates a value of 'OperationItemWarnings' with the minimum fields required to make a request.

734--

736--

@@ -827,7 +829,7 @@ olId = lens _olId (\ s a -> s{_olId = a})

827data ReplicaPoolAutoHealingPolicy = ReplicaPoolAutoHealingPolicy

829data ReplicaPoolAutoHealingPolicy = ReplicaPoolAutoHealingPolicy

828 { _rpahpHealthCheck :: !(Maybe Text)

830 { _rpahpHealthCheck :: !(Maybe Text)

829 , _rpahpActionType :: !(Maybe ReplicaPoolAutoHealingPolicyActionType)

831 , _rpahpActionType :: !(Maybe ReplicaPoolAutoHealingPolicyActionType)

830− }

832+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

831

833

832-- | Creates a value of 'ReplicaPoolAutoHealingPolicy' with the minimum fields required to make a request.

834-- | Creates a value of 'ReplicaPoolAutoHealingPolicy' with the minimum fields required to make a request.

833--

835--

gogol-replicapool/gen/Network/Google/ComputeEngineInstanceGroupManager/Types/Sum.hs+60

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.ComputeEngineInstanceGroupManager.Types.Sum

9-- Module : Network.Google.ComputeEngineInstanceGroupManager.Types.Sum

@@ -46,6 +49,39 @@ data OperationCodeItemWarnings

46

49

47instance Hashable OperationCodeItemWarnings

50instance Hashable OperationCodeItemWarnings

48

51

52+instance FromText OperationCodeItemWarnings where

53+ fromText = \case

54+ "DEPRECATED_RESOURCE_USED" -> Just OCIWDeprecatedResourceUsed

55+ "DISK_SIZE_LARGER_THAN_IMAGE_SIZE" -> Just OCIWDiskSizeLargerThanImageSize

56+ "INJECTED_KERNELS_DEPRECATED" -> Just OCIWInjectedKernelsDeprecated

57+ "NEXT_HOP_ADDRESS_NOT_ASSIGNED" -> Just OCIWNextHopAddressNotAssigned

58+ "NEXT_HOP_CANNOT_IP_FORWARD" -> Just OCIWNextHopCannotIPForward

59+ "NEXT_HOP_INSTANCE_NOT_FOUND" -> Just OCIWNextHopInstanceNotFound

60+ "NEXT_HOP_INSTANCE_NOT_ON_NETWORK" -> Just OCIWNextHopInstanceNotOnNetwork

61+ "NEXT_HOP_NOT_RUNNING" -> Just OCIWNextHopNotRunning

62+ "NO_RESULTS_ON_PAGE" -> Just OCIWNoResultsOnPage

63+ "REQUIRED_TOS_AGREEMENT" -> Just OCIWRequiredTosAgreement

64+ "RESOURCE_NOT_DELETED" -> Just OCIWResourceNotDeleted

65+ "SINGLE_INSTANCE_PROPERTY_TEMPLATE" -> Just OCIWSingleInstancePropertyTemplate

66+ "UNREACHABLE" -> Just OCIWUnreachable

67+ _ -> Nothing

68+

69+instance ToText OperationCodeItemWarnings where

70+ toText = \case

71+ OCIWDeprecatedResourceUsed -> "DEPRECATED_RESOURCE_USED"

72+ OCIWDiskSizeLargerThanImageSize -> "DISK_SIZE_LARGER_THAN_IMAGE_SIZE"

73+ OCIWInjectedKernelsDeprecated -> "INJECTED_KERNELS_DEPRECATED"

74+ OCIWNextHopAddressNotAssigned -> "NEXT_HOP_ADDRESS_NOT_ASSIGNED"

75+ OCIWNextHopCannotIPForward -> "NEXT_HOP_CANNOT_IP_FORWARD"

76+ OCIWNextHopInstanceNotFound -> "NEXT_HOP_INSTANCE_NOT_FOUND"

77+ OCIWNextHopInstanceNotOnNetwork -> "NEXT_HOP_INSTANCE_NOT_ON_NETWORK"

78+ OCIWNextHopNotRunning -> "NEXT_HOP_NOT_RUNNING"

79+ OCIWNoResultsOnPage -> "NO_RESULTS_ON_PAGE"

80+ OCIWRequiredTosAgreement -> "REQUIRED_TOS_AGREEMENT"

81+ OCIWResourceNotDeleted -> "RESOURCE_NOT_DELETED"

82+ OCIWSingleInstancePropertyTemplate -> "SINGLE_INSTANCE_PROPERTY_TEMPLATE"

83+ OCIWUnreachable -> "UNREACHABLE"

84+

49-- | [Output Only] Status of the operation.

85-- | [Output Only] Status of the operation.

50data OperationStatus

86data OperationStatus

51 = OSDone

87 = OSDone

@@ -58,6 +94,19 @@ data OperationStatus

58

94

59instance Hashable OperationStatus

95instance Hashable OperationStatus

60

96

97+instance FromText OperationStatus where

98+ fromText = \case

99+ "DONE" -> Just OSDone

100+ "PENDING" -> Just OSPending

101+ "RUNNING" -> Just OSRunning

102+ _ -> Nothing

103+

104+instance ToText OperationStatus where

105+ toText = \case

106+ OSDone -> "DONE"

107+ OSPending -> "PENDING"

108+ OSRunning -> "RUNNING"

109+

61-- | The action to perform when an instance becomes unhealthy. Possible

110-- | The action to perform when an instance becomes unhealthy. Possible

62-- values are RECREATE or REBOOT. RECREATE replaces an unhealthy instance

111-- values are RECREATE or REBOOT. RECREATE replaces an unhealthy instance

63-- with a new instance that is based on the instance template for this

112-- with a new instance that is based on the instance template for this

@@ -71,3 +120,14 @@ data ReplicaPoolAutoHealingPolicyActionType

71 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

120 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

72

121

73instance Hashable ReplicaPoolAutoHealingPolicyActionType

122instance Hashable ReplicaPoolAutoHealingPolicyActionType

123+

124+instance FromText ReplicaPoolAutoHealingPolicyActionType where

125+ fromText = \case

126+ "REBOOT" -> Just RPAHPATReboot

127+ "RECREATE" -> Just RPAHPATRecreate

128+ _ -> Nothing

129+

130+instance ToText ReplicaPoolAutoHealingPolicyActionType where

131+ toText = \case

132+ RPAHPATReboot -> "REBOOT"

133+ RPAHPATRecreate -> "RECREATE"

gogol-reseller/gen/Network/Google/EnterpriseAppsReseller/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.EnterpriseAppsReseller.Types

8-- Module : Network.Google.EnterpriseAppsReseller.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.EnterpriseAppsReseller.Types

15module Network.Google.EnterpriseAppsReseller.Types

14 (

16 (

15− -- * API Definition

16− reseller

17−

18

17

19 -- * Address

18 -- * Address

20− , Address

19+ Address

21 , address

20 , address

22 , aOrganizationName

21 , aOrganizationName

23 , aKind

22 , aKind

@@ -118,6 +117,3 @@ module Network.Google.EnterpriseAppsReseller.Types

118import Network.Google.EnterpriseAppsReseller.Types.Product

117import Network.Google.EnterpriseAppsReseller.Types.Product

119import Network.Google.EnterpriseAppsReseller.Types.Sum

118import Network.Google.EnterpriseAppsReseller.Types.Sum

120import Network.Google.Prelude

119import Network.Google.Prelude

121−

122−reseller :: a

123−reseller = error "reseller"

gogol-reseller/gen/Network/Google/EnterpriseAppsReseller/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.EnterpriseAppsReseller.Types.Product

8-- Module : Network.Google.EnterpriseAppsReseller.Types.Product

gogol-reseller/gen/Network/Google/EnterpriseAppsReseller/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.EnterpriseAppsReseller.Types.Sum

9-- Module : Network.Google.EnterpriseAppsReseller.Types.Sum

gogol-resourceviews/gen/Network/Google/ComputeEngineInstanceGroups/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.ComputeEngineInstanceGroups.Types

8-- Module : Network.Google.ComputeEngineInstanceGroups.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.ComputeEngineInstanceGroups.Types

15module Network.Google.ComputeEngineInstanceGroups.Types

14 (

16 (

15− -- * API Definition

16− resourceviews

17−

18

17

19 -- * Label

18 -- * Label

20− , Label

19+ Label

21 , label

20 , label

22 , lValue

21 , lValue

23 , lKey

22 , lKey

@@ -156,6 +155,3 @@ module Network.Google.ComputeEngineInstanceGroups.Types

156import Network.Google.ComputeEngineInstanceGroups.Types.Product

155import Network.Google.ComputeEngineInstanceGroups.Types.Product

157import Network.Google.ComputeEngineInstanceGroups.Types.Sum

156import Network.Google.ComputeEngineInstanceGroups.Types.Sum

158import Network.Google.Prelude

157import Network.Google.Prelude

159−

160−resourceviews :: a

161−resourceviews = error "resourceviews"

gogol-resourceviews/gen/Network/Google/ComputeEngineInstanceGroups/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.ComputeEngineInstanceGroups.Types.Product

8-- Module : Network.Google.ComputeEngineInstanceGroups.Types.Product

gogol-resourceviews/gen/Network/Google/ComputeEngineInstanceGroups/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.ComputeEngineInstanceGroups.Types.Sum

9-- Module : Network.Google.ComputeEngineInstanceGroups.Types.Sum

gogol-siteverification/gen/Network/Google/SiteVerification/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.SiteVerification.Types

8-- Module : Network.Google.SiteVerification.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.SiteVerification.Types

15module Network.Google.SiteVerification.Types

14 (

16 (

15− -- * API Definition

16− siteVerification

17−

18

17

19 -- * SiteVerificationWebResourceGettokenRequest

18 -- * SiteVerificationWebResourceGettokenRequest

20− , SiteVerificationWebResourceGettokenRequest

19+ SiteVerificationWebResourceGettokenRequest

21 , siteVerificationWebResourceGettokenRequest

20 , siteVerificationWebResourceGettokenRequest

22 , svwrgrSite

21 , svwrgrSite

23 , svwrgrVerificationMethod

22 , svwrgrVerificationMethod

@@ -56,6 +55,3 @@ module Network.Google.SiteVerification.Types

56import Network.Google.Prelude

55import Network.Google.Prelude

57import Network.Google.SiteVerification.Types.Product

56import Network.Google.SiteVerification.Types.Product

58import Network.Google.SiteVerification.Types.Sum

57import Network.Google.SiteVerification.Types.Sum

59−

60−siteVerification :: a

61−siteVerification = error "siteVerification"

gogol-siteverification/gen/Network/Google/SiteVerification/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.SiteVerification.Types.Product

8-- Module : Network.Google.SiteVerification.Types.Product

gogol-siteverification/gen/Network/Google/SiteVerification/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.SiteVerification.Types.Sum

9-- Module : Network.Google.SiteVerification.Types.Sum

gogol-spectrum/gen/Network/Google/Spectrum/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Spectrum.Types

8-- Module : Network.Google.Spectrum.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Spectrum.Types

15module Network.Google.Spectrum.Types

14 (

16 (

15− -- * API Definition

16− spectrum

17−

18

17

19 -- * AntennaCharacteristics

18 -- * AntennaCharacteristics

20− , AntennaCharacteristics

19+ AntennaCharacteristics

21 , antennaCharacteristics

20 , antennaCharacteristics

22 , acHeight

21 , acHeight

23 , acHeightType

22 , acHeightType

@@ -288,6 +287,3 @@ module Network.Google.Spectrum.Types

288import Network.Google.Prelude

287import Network.Google.Prelude

289import Network.Google.Spectrum.Types.Product

288import Network.Google.Spectrum.Types.Product

290import Network.Google.Spectrum.Types.Sum

289import Network.Google.Spectrum.Types.Sum

291−

292−spectrum :: a

293−spectrum = error "spectrum"

gogol-spectrum/gen/Network/Google/Spectrum/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Spectrum.Types.Product

8-- Module : Network.Google.Spectrum.Types.Product

gogol-spectrum/gen/Network/Google/Spectrum/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Spectrum.Types.Sum

9-- Module : Network.Google.Spectrum.Types.Sum

gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.StorageTransfer.Types

8-- Module : Network.Google.StorageTransfer.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.StorageTransfer.Types

15module Network.Google.StorageTransfer.Types

14 (

16 (

15− -- * API Definition

16− storagetransfer

17−

18

17

19 -- * AwsAccessKey

18 -- * AwsAccessKey

20− , AwsAccessKey

19+ AwsAccessKey

21 , awsAccessKey

20 , awsAccessKey

22 , aakSecretAccessKey

21 , aakSecretAccessKey

23 , aakAccessKeyId

22 , aakAccessKeyId

@@ -212,6 +211,3 @@ module Network.Google.StorageTransfer.Types

212import Network.Google.Prelude

211import Network.Google.Prelude

213import Network.Google.StorageTransfer.Types.Product

212import Network.Google.StorageTransfer.Types.Product

214import Network.Google.StorageTransfer.Types.Sum

213import Network.Google.StorageTransfer.Types.Sum

215−

216−storagetransfer :: a

217−storagetransfer = error "storagetransfer"

gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.StorageTransfer.Types.Product

8-- Module : Network.Google.StorageTransfer.Types.Product

gogol-storage-transfer/gen/Network/Google/StorageTransfer/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.StorageTransfer.Types.Sum

9-- Module : Network.Google.StorageTransfer.Types.Sum

gogol-storage/gen/Network/Google/CloudStorage/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudStorage.Types

8-- Module : Network.Google.CloudStorage.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.CloudStorage.Types

15module Network.Google.CloudStorage.Types

14 (

16 (

15− -- * API Definition

16− storage

17−

18

17

19 -- * Bucket

18 -- * Bucket

20− , Bucket

19+ Bucket

21 , bucket

20 , bucket

22 , bucEtag

21 , bucEtag

23 , bucLocation

22 , bucLocation

@@ -228,6 +227,3 @@ module Network.Google.CloudStorage.Types

228import Network.Google.CloudStorage.Types.Product

227import Network.Google.CloudStorage.Types.Product

229import Network.Google.CloudStorage.Types.Sum

228import Network.Google.CloudStorage.Types.Sum

230import Network.Google.Prelude

229import Network.Google.Prelude

231−

232−storage :: a

233−storage = error "storage"

gogol-storage/gen/Network/Google/CloudStorage/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.CloudStorage.Types.Product

8-- Module : Network.Google.CloudStorage.Types.Product

gogol-storage/gen/Network/Google/CloudStorage/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.CloudStorage.Types.Sum

9-- Module : Network.Google.CloudStorage.Types.Sum

gogol-tagmanager/gen/Network/Google/TagManager/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.TagManager.Types

8-- Module : Network.Google.TagManager.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.TagManager.Types

15module Network.Google.TagManager.Types

14 (

16 (

15− -- * API Definition

16− tagmanager

17−

18

17

19 -- * Account

18 -- * Account

20− , Account

19+ Account

21 , account

20 , account

22 , aShareData

21 , aShareData

23 , aFingerprint

22 , aFingerprint

@@ -324,6 +323,3 @@ module Network.Google.TagManager.Types

324import Network.Google.Prelude

323import Network.Google.Prelude

325import Network.Google.TagManager.Types.Product

324import Network.Google.TagManager.Types.Product

326import Network.Google.TagManager.Types.Sum

325import Network.Google.TagManager.Types.Sum

327−

328−tagmanager :: a

329−tagmanager = error "tagmanager"

gogol-tagmanager/gen/Network/Google/TagManager/Types/Product.hs+9−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.TagManager.Types.Product

8-- Module : Network.Google.TagManager.Types.Product

@@ -71,7 +73,7 @@ aName = lens _aName (\ s a -> s{_aName = a})

71-- /See:/ 'accountAccess' smart constructor.

73-- /See:/ 'accountAccess' smart constructor.

72newtype AccountAccess = AccountAccess

74newtype AccountAccess = AccountAccess

73 { _aaPermission :: Maybe [AccountAccessItemPermission]

75 { _aaPermission :: Maybe [AccountAccessItemPermission]

74− }

76+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

75

77

76-- | Creates a value of 'AccountAccess' with the minimum fields required to make a request.

78-- | Creates a value of 'AccountAccess' with the minimum fields required to make a request.

77--

79--

@@ -99,7 +101,7 @@ aaPermission

99data Condition = Condition

101data Condition = Condition

100 { _cType :: !(Maybe ConditionType)

102 { _cType :: !(Maybe ConditionType)

101 , _cParameter :: !(Maybe [Maybe Parameter])

103 , _cParameter :: !(Maybe [Maybe Parameter])

102− }

104+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

103

105

104-- | Creates a value of 'Condition' with the minimum fields required to make a request.

106-- | Creates a value of 'Condition' with the minimum fields required to make a request.

105--

107--

@@ -150,7 +152,7 @@ data Container = Container

150 , _cName :: !(Maybe Text)

152 , _cName :: !(Maybe Text)

151 , _cNotes :: !(Maybe Text)

153 , _cNotes :: !(Maybe Text)

152 , _cTimeZoneId :: !(Maybe Text)

154 , _cTimeZoneId :: !(Maybe Text)

153− }

155+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

154

156

155-- | Creates a value of 'Container' with the minimum fields required to make a request.

157-- | Creates a value of 'Container' with the minimum fields required to make a request.

156--

158--

@@ -270,7 +272,7 @@ cTimeZoneId

270data ContainerAccess = ContainerAccess

272data ContainerAccess = ContainerAccess

271 { _caContainerId :: !(Maybe Text)

273 { _caContainerId :: !(Maybe Text)

272 , _caPermission :: !(Maybe [ContainerAccessItemPermission])

274 , _caPermission :: !(Maybe [ContainerAccessItemPermission])

273− }

275+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

274

276

275-- | Creates a value of 'ContainerAccess' with the minimum fields required to make a request.

277-- | Creates a value of 'ContainerAccess' with the minimum fields required to make a request.

276--

278--

@@ -1178,7 +1180,7 @@ data Parameter = Parameter

1178 , _pMap :: !(Maybe [Maybe Parameter])

1180 , _pMap :: !(Maybe [Maybe Parameter])

1179 , _pKey :: !(Maybe Text)

1181 , _pKey :: !(Maybe Text)

1180 , _pType :: !(Maybe ParameterType)

1182 , _pType :: !(Maybe ParameterType)

1181− }

1183+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1182

1184

1183-- | Creates a value of 'Parameter' with the minimum fields required to make a request.

1185-- | Creates a value of 'Parameter' with the minimum fields required to make a request.

1184--

1186--

@@ -1409,7 +1411,7 @@ data Tag = Tag

1409 , _tagNotes :: !(Maybe Text)

1411 , _tagNotes :: !(Maybe Text)

1410 , _tagFiringRuleId :: !(Maybe [Text])

1412 , _tagFiringRuleId :: !(Maybe [Text])

1411 , _tagParameter :: !(Maybe [Maybe Parameter])

1413 , _tagParameter :: !(Maybe [Maybe Parameter])

1412− }

1414+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1413

1415

1414-- | Creates a value of 'Tag' with the minimum fields required to make a request.

1416-- | Creates a value of 'Tag' with the minimum fields required to make a request.

1415--

1417--

@@ -1668,7 +1670,7 @@ data Trigger = Trigger

1668 , _tVideoPercentageList :: !(Maybe (Maybe Parameter))

1670 , _tVideoPercentageList :: !(Maybe (Maybe Parameter))

1669 , _tEventName :: !(Maybe (Maybe Parameter))

1671 , _tEventName :: !(Maybe (Maybe Parameter))

1670 , _tWaitForTags :: !(Maybe (Maybe Parameter))

1672 , _tWaitForTags :: !(Maybe (Maybe Parameter))

1671− }

1673+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1672

1674

1673-- | Creates a value of 'Trigger' with the minimum fields required to make a request.

1675-- | Creates a value of 'Trigger' with the minimum fields required to make a request.

1674--

1676--

gogol-tagmanager/gen/Network/Google/TagManager/Types/Sum.hs+233

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.TagManager.Types.Sum

9-- Module : Network.Google.TagManager.Types.Sum

@@ -29,6 +32,23 @@ data AccountAccessItemPermission

29

32

30instance Hashable AccountAccessItemPermission

33instance Hashable AccountAccessItemPermission

31

34

35+instance FromText AccountAccessItemPermission where

36+ fromText = \case

37+ "delete" -> Just AAIPDelete

38+ "edit" -> Just AAIPEdit

39+ "manage" -> Just AAIPManage

40+ "publish" -> Just AAIPPublish

41+ "read" -> Just AAIPRead

42+ _ -> Nothing

43+

44+instance ToText AccountAccessItemPermission where

45+ toText = \case

46+ AAIPDelete -> "delete"

47+ AAIPEdit -> "edit"

48+ AAIPManage -> "manage"

49+ AAIPPublish -> "publish"

50+ AAIPRead -> "read"

51+

32-- | The type of operator for this condition.

52-- | The type of operator for this condition.

33data ConditionType

53data ConditionType

34 = CTContains

54 = CTContains

@@ -57,6 +77,35 @@ data ConditionType

57

77

58instance Hashable ConditionType

78instance Hashable ConditionType

59

79

80+instance FromText ConditionType where

81+ fromText = \case

82+ "contains" -> Just CTContains

83+ "cssSelector" -> Just CTCssSelector

84+ "endsWith" -> Just CTEndsWith

85+ "equals" -> Just CTEquals

86+ "greater" -> Just CTGreater

87+ "greaterOrEquals" -> Just CTGreaterOrEquals

88+ "less" -> Just CTLess

89+ "lessOrEquals" -> Just CTLessOrEquals

90+ "matchRegex" -> Just CTMatchRegex

91+ "startsWith" -> Just CTStartsWith

92+ "urlMatches" -> Just CTURLMatches

93+ _ -> Nothing

94+

95+instance ToText ConditionType where

96+ toText = \case

97+ CTContains -> "contains"

98+ CTCssSelector -> "cssSelector"

99+ CTEndsWith -> "endsWith"

100+ CTEquals -> "equals"

101+ CTGreater -> "greater"

102+ CTGreaterOrEquals -> "greaterOrEquals"

103+ CTLess -> "less"

104+ CTLessOrEquals -> "lessOrEquals"

105+ CTMatchRegex -> "matchRegex"

106+ CTStartsWith -> "startsWith"

107+ CTURLMatches -> "urlMatches"

108+

60data ContainerAccessItemPermission

109data ContainerAccessItemPermission

61 = CAIPDelete

110 = CAIPDelete

62 -- ^ @delete@

111 -- ^ @delete@

@@ -72,6 +121,23 @@ data ContainerAccessItemPermission

72

121

73instance Hashable ContainerAccessItemPermission

122instance Hashable ContainerAccessItemPermission

74

123

124+instance FromText ContainerAccessItemPermission where

125+ fromText = \case

126+ "delete" -> Just CAIPDelete

127+ "edit" -> Just CAIPEdit

128+ "manage" -> Just CAIPManage

129+ "publish" -> Just CAIPPublish

130+ "read" -> Just CAIPRead

131+ _ -> Nothing

132+

133+instance ToText ContainerAccessItemPermission where

134+ toText = \case

135+ CAIPDelete -> "delete"

136+ CAIPEdit -> "edit"

137+ CAIPManage -> "manage"

138+ CAIPPublish -> "publish"

139+ CAIPRead -> "read"

140+

75data ContainerItemEnabledBuiltInVariable

141data ContainerItemEnabledBuiltInVariable

76 = CIEBIVAdvertiserId

142 = CIEBIVAdvertiserId

77 -- ^ @advertiserId@

143 -- ^ @advertiserId@

@@ -161,6 +227,97 @@ data ContainerItemEnabledBuiltInVariable

161

227

162instance Hashable ContainerItemEnabledBuiltInVariable

228instance Hashable ContainerItemEnabledBuiltInVariable

163

229

230+instance FromText ContainerItemEnabledBuiltInVariable where

231+ fromText = \case

232+ "advertiserId" -> Just CIEBIVAdvertiserId

233+ "advertisingTrackingEnabled" -> Just CIEBIVAdvertisingTrackingEnabled

234+ "appId" -> Just CIEBIVAppId

235+ "appName" -> Just CIEBIVAppName

236+ "appVersionCode" -> Just CIEBIVAppVersionCode

237+ "appVersionName" -> Just CIEBIVAppVersionName

238+ "clickClasses" -> Just CIEBIVClickClasses

239+ "clickElement" -> Just CIEBIVClickElement

240+ "clickId" -> Just CIEBIVClickId

241+ "clickTarget" -> Just CIEBIVClickTarget

242+ "clickText" -> Just CIEBIVClickText

243+ "clickUrl" -> Just CIEBIVClickURL

244+ "containerId" -> Just CIEBIVContainerId

245+ "containerVersion" -> Just CIEBIVContainerVersion

246+ "debugMode" -> Just CIEBIVDebugMode

247+ "deviceName" -> Just CIEBIVDeviceName

248+ "errorLine" -> Just CIEBIVErrorLine

249+ "errorMessage" -> Just CIEBIVErrorMessage

250+ "errorUrl" -> Just CIEBIVErrorURL

251+ "event" -> Just CIEBIVEvent

252+ "formClasses" -> Just CIEBIVFormClasses

253+ "formElement" -> Just CIEBIVFormElement

254+ "formId" -> Just CIEBIVFormId

255+ "formTarget" -> Just CIEBIVFormTarget

256+ "formText" -> Just CIEBIVFormText

257+ "formUrl" -> Just CIEBIVFormURL

258+ "historySource" -> Just CIEBIVHistorySource

259+ "htmlId" -> Just CIEBIVHTMLId

260+ "language" -> Just CIEBIVLanguage

261+ "newHistoryFragment" -> Just CIEBIVNewHistoryFragment

262+ "newHistoryState" -> Just CIEBIVNewHistoryState

263+ "oldHistoryFragment" -> Just CIEBIVOldHistoryFragment

264+ "oldHistoryState" -> Just CIEBIVOldHistoryState

265+ "osVersion" -> Just CIEBIVOsVersion

266+ "pageHostname" -> Just CIEBIVPageHostname

267+ "pagePath" -> Just CIEBIVPagePath

268+ "pageUrl" -> Just CIEBIVPageURL

269+ "platform" -> Just CIEBIVPlatform

270+ "randomNumber" -> Just CIEBIVRandomNumber

271+ "referrer" -> Just CIEBIVReferrer

272+ "resolution" -> Just CIEBIVResolution

273+ "sdkVersion" -> Just CIEBIVSdkVersion

274+ _ -> Nothing

275+

276+instance ToText ContainerItemEnabledBuiltInVariable where

277+ toText = \case

278+ CIEBIVAdvertiserId -> "advertiserId"

279+ CIEBIVAdvertisingTrackingEnabled -> "advertisingTrackingEnabled"

280+ CIEBIVAppId -> "appId"

281+ CIEBIVAppName -> "appName"

282+ CIEBIVAppVersionCode -> "appVersionCode"

283+ CIEBIVAppVersionName -> "appVersionName"

284+ CIEBIVClickClasses -> "clickClasses"

285+ CIEBIVClickElement -> "clickElement"

286+ CIEBIVClickId -> "clickId"

287+ CIEBIVClickTarget -> "clickTarget"

288+ CIEBIVClickText -> "clickText"

289+ CIEBIVClickURL -> "clickUrl"

290+ CIEBIVContainerId -> "containerId"

291+ CIEBIVContainerVersion -> "containerVersion"

292+ CIEBIVDebugMode -> "debugMode"

293+ CIEBIVDeviceName -> "deviceName"

294+ CIEBIVErrorLine -> "errorLine"

295+ CIEBIVErrorMessage -> "errorMessage"

296+ CIEBIVErrorURL -> "errorUrl"

297+ CIEBIVEvent -> "event"

298+ CIEBIVFormClasses -> "formClasses"

299+ CIEBIVFormElement -> "formElement"

300+ CIEBIVFormId -> "formId"

301+ CIEBIVFormTarget -> "formTarget"

302+ CIEBIVFormText -> "formText"

303+ CIEBIVFormURL -> "formUrl"

304+ CIEBIVHistorySource -> "historySource"

305+ CIEBIVHTMLId -> "htmlId"

306+ CIEBIVLanguage -> "language"

307+ CIEBIVNewHistoryFragment -> "newHistoryFragment"

308+ CIEBIVNewHistoryState -> "newHistoryState"

309+ CIEBIVOldHistoryFragment -> "oldHistoryFragment"

310+ CIEBIVOldHistoryState -> "oldHistoryState"

311+ CIEBIVOsVersion -> "osVersion"

312+ CIEBIVPageHostname -> "pageHostname"

313+ CIEBIVPagePath -> "pagePath"

314+ CIEBIVPageURL -> "pageUrl"

315+ CIEBIVPlatform -> "platform"

316+ CIEBIVRandomNumber -> "randomNumber"

317+ CIEBIVReferrer -> "referrer"

318+ CIEBIVResolution -> "resolution"

319+ CIEBIVSdkVersion -> "sdkVersion"

320+

164data ContainerItemUsageContext

321data ContainerItemUsageContext

165 = CIUCAndroid

322 = CIUCAndroid

166 -- ^ @android@

323 -- ^ @android@

@@ -172,6 +329,19 @@ data ContainerItemUsageContext

172

329

173instance Hashable ContainerItemUsageContext

330instance Hashable ContainerItemUsageContext

174

331

332+instance FromText ContainerItemUsageContext where

333+ fromText = \case

334+ "android" -> Just CIUCAndroid

335+ "ios" -> Just CIUCIos

336+ "web" -> Just CIUCWeb

337+ _ -> Nothing

338+

339+instance ToText ContainerItemUsageContext where

340+ toText = \case

341+ CIUCAndroid -> "android"

342+ CIUCIos -> "ios"

343+ CIUCWeb -> "web"

344+

175-- | The parameter type. Valid values are: - boolean: The value represents a

345-- | The parameter type. Valid values are: - boolean: The value represents a

176-- boolean, represented as \'true\' or \'false\' - integer: The value

346-- boolean, represented as \'true\' or \'false\' - integer: The value

177-- represents a 64-bit signed integer value, in base 10 - list: A list of

347-- represents a 64-bit signed integer value, in base 10 - list: A list of

@@ -194,6 +364,23 @@ data ParameterType

194

364

195instance Hashable ParameterType

365instance Hashable ParameterType

196

366

367+instance FromText ParameterType where

368+ fromText = \case

369+ "boolean" -> Just PTBoolean

370+ "integer" -> Just PTInteger

371+ "list" -> Just PTList

372+ "map" -> Just PTMap

373+ "template" -> Just PTTemplate

374+ _ -> Nothing

375+

376+instance ToText ParameterType where

377+ toText = \case

378+ PTBoolean -> "boolean"

379+ PTInteger -> "integer"

380+ PTList -> "list"

381+ PTMap -> "map"

382+ PTTemplate -> "template"

383+

197-- | Option to fire this tag.

384-- | Option to fire this tag.

198data TagTagFiringOption

385data TagTagFiringOption

199 = TTFOOncePerEvent

386 = TTFOOncePerEvent

@@ -206,6 +393,19 @@ data TagTagFiringOption

206

393

207instance Hashable TagTagFiringOption

394instance Hashable TagTagFiringOption

208

395

396+instance FromText TagTagFiringOption where

397+ fromText = \case

398+ "oncePerEvent" -> Just TTFOOncePerEvent

399+ "oncePerLoad" -> Just TTFOOncePerLoad

400+ "unlimited" -> Just TTFOUnlimited

401+ _ -> Nothing

402+

403+instance ToText TagTagFiringOption where

404+ toText = \case

405+ TTFOOncePerEvent -> "oncePerEvent"

406+ TTFOOncePerLoad -> "oncePerLoad"

407+ TTFOUnlimited -> "unlimited"

408+

209-- | Defines the data layer event that causes this trigger.

409-- | Defines the data layer event that causes this trigger.

210data TriggerType

410data TriggerType

211 = TTAjaxSubmission

411 = TTAjaxSubmission

@@ -237,3 +437,36 @@ data TriggerType

237 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

437 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

238

438

239instance Hashable TriggerType

439instance Hashable TriggerType

440+

441+instance FromText TriggerType where

442+ fromText = \case

443+ "ajaxSubmission" -> Just TTAjaxSubmission

444+ "always" -> Just TTAlways

445+ "click" -> Just TTClick

446+ "customEvent" -> Just TTCustomEvent

447+ "domReady" -> Just TTDomReady

448+ "formSubmission" -> Just TTFormSubmission

449+ "historyChange" -> Just TTHistoryChange

450+ "jsError" -> Just TTJsError

451+ "linkClick" -> Just TTLinkClick

452+ "pageview" -> Just TTPageview

453+ "timer" -> Just TTTimer

454+ "windowLoaded" -> Just TTWindowLoaded

455+ "youTube" -> Just TTYouTube

456+ _ -> Nothing

457+

458+instance ToText TriggerType where

459+ toText = \case

460+ TTAjaxSubmission -> "ajaxSubmission"

461+ TTAlways -> "always"

462+ TTClick -> "click"

463+ TTCustomEvent -> "customEvent"

464+ TTDomReady -> "domReady"

465+ TTFormSubmission -> "formSubmission"

466+ TTHistoryChange -> "historyChange"

467+ TTJsError -> "jsError"

468+ TTLinkClick -> "linkClick"

469+ TTPageview -> "pageview"

470+ TTTimer -> "timer"

471+ TTWindowLoaded -> "windowLoaded"

472+ TTYouTube -> "youTube"

gogol-taskqueue/gen/Network/Google/TaskQueue/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.TaskQueue.Types

8-- Module : Network.Google.TaskQueue.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.TaskQueue.Types

15module Network.Google.TaskQueue.Types

14 (

16 (

15− -- * API Definition

16− taskqueue

17−

18

17

19 -- * Task

18 -- * Task

20− , Task

19+ Task

21 , task

20 , task

22 , tRetryCount

21 , tRetryCount

23 , tEnqueueTimestamp

22 , tEnqueueTimestamp

@@ -68,6 +67,3 @@ module Network.Google.TaskQueue.Types

68import Network.Google.Prelude

67import Network.Google.Prelude

69import Network.Google.TaskQueue.Types.Product

68import Network.Google.TaskQueue.Types.Product

70import Network.Google.TaskQueue.Types.Sum

69import Network.Google.TaskQueue.Types.Sum

71−

72−taskqueue :: a

73−taskqueue = error "taskqueue"

gogol-taskqueue/gen/Network/Google/TaskQueue/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.TaskQueue.Types.Product

8-- Module : Network.Google.TaskQueue.Types.Product

gogol-taskqueue/gen/Network/Google/TaskQueue/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.TaskQueue.Types.Sum

9-- Module : Network.Google.TaskQueue.Types.Sum

gogol-tasks/gen/Network/Google/Tasks/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Tasks.Types

8-- Module : Network.Google.Tasks.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Tasks.Types

15module Network.Google.Tasks.Types

14 (

16 (

15− -- * API Definition

16− tasks

17−

18

17

19 -- * Task

18 -- * Task

20− , Task

19+ Task

21 , task

20 , task

22 , tasParent

21 , tasParent

23 , tasStatus

22 , tasStatus

@@ -72,6 +71,3 @@ module Network.Google.Tasks.Types

72import Network.Google.Prelude

71import Network.Google.Prelude

73import Network.Google.Tasks.Types.Product

72import Network.Google.Tasks.Types.Product

74import Network.Google.Tasks.Types.Sum

73import Network.Google.Tasks.Types.Sum

75−

76−tasks :: a

77−tasks = error "tasks"

gogol-tasks/gen/Network/Google/Tasks/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Tasks.Types.Product

8-- Module : Network.Google.Tasks.Types.Product

gogol-tasks/gen/Network/Google/Tasks/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Tasks.Types.Sum

9-- Module : Network.Google.Tasks.Types.Sum

gogol-translate/gen/Network/Google/Translate/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Translate.Types

8-- Module : Network.Google.Translate.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.Translate.Types

15module Network.Google.Translate.Types

14 (

16 (

15− -- * API Definition

16− translate

17−

18

17

19 -- * DetectionsListResponse

18 -- * DetectionsListResponse

20− , DetectionsListResponse

19+ DetectionsListResponse

21 , detectionsListResponse

20 , detectionsListResponse

22 , dlrDetections

21 , dlrDetections

23

22

@@ -54,6 +53,3 @@ module Network.Google.Translate.Types

54import Network.Google.Prelude

53import Network.Google.Prelude

55import Network.Google.Translate.Types.Product

54import Network.Google.Translate.Types.Product

56import Network.Google.Translate.Types.Sum

55import Network.Google.Translate.Types.Sum

57−

58−translate :: a

59−translate = error "translate"

gogol-translate/gen/Network/Google/Translate/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.Translate.Types.Product

8-- Module : Network.Google.Translate.Types.Product

gogol-translate/gen/Network/Google/Translate/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.Translate.Types.Sum

9-- Module : Network.Google.Translate.Types.Sum

gogol-urlshortener/gen/Network/Google/URLShortener/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.URLShortener.Types

8-- Module : Network.Google.URLShortener.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.URLShortener.Types

15module Network.Google.URLShortener.Types

14 (

16 (

15− -- * API Definition

16− urlshortener

17−

18

17

19 -- * AnalyticsSnapshot

18 -- * AnalyticsSnapshot

20− , AnalyticsSnapshot

19+ AnalyticsSnapshot

21 , analyticsSnapshot

20 , analyticsSnapshot

22 , asPlatforms

21 , asPlatforms

23 , asShortUrlClicks

22 , asShortUrlClicks

@@ -64,6 +63,3 @@ module Network.Google.URLShortener.Types

64import Network.Google.Prelude

63import Network.Google.Prelude

65import Network.Google.URLShortener.Types.Product

64import Network.Google.URLShortener.Types.Product

66import Network.Google.URLShortener.Types.Sum

65import Network.Google.URLShortener.Types.Sum

67−

68−urlshortener :: a

69−urlshortener = error "urlshortener"

gogol-urlshortener/gen/Network/Google/URLShortener/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.URLShortener.Types.Product

8-- Module : Network.Google.URLShortener.Types.Product

gogol-urlshortener/gen/Network/Google/URLShortener/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.URLShortener.Types.Sum

9-- Module : Network.Google.URLShortener.Types.Sum

gogol-webfonts/gen/Network/Google/WebFonts/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.WebFonts.Types

8-- Module : Network.Google.WebFonts.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.WebFonts.Types

15module Network.Google.WebFonts.Types

14 (

16 (

15− -- * API Definition

16− webfonts

17−

18

17

19 -- * Webfont

18 -- * Webfont

20− , Webfont

19+ Webfont

21 , webfont

20 , webfont

22 , wVariants

21 , wVariants

23 , wKind

22 , wKind

@@ -42,6 +41,3 @@ module Network.Google.WebFonts.Types

42import Network.Google.Prelude

41import Network.Google.Prelude

43import Network.Google.WebFonts.Types.Product

42import Network.Google.WebFonts.Types.Product

44import Network.Google.WebFonts.Types.Sum

43import Network.Google.WebFonts.Types.Sum

45−

46−webfonts :: a

47−webfonts = error "webfonts"

gogol-webfonts/gen/Network/Google/WebFonts/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.WebFonts.Types.Product

8-- Module : Network.Google.WebFonts.Types.Product

gogol-webfonts/gen/Network/Google/WebFonts/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.WebFonts.Types.Sum

9-- Module : Network.Google.WebFonts.Types.Sum

gogol-webmaster-tools/gen/Network/Google/WebmasterTools/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.WebmasterTools.Types

8-- Module : Network.Google.WebmasterTools.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.WebmasterTools.Types

15module Network.Google.WebmasterTools.Types

14 (

16 (

15− -- * API Definition

16− webmasters

17−

18

17

19 -- * ApiDataRow

18 -- * ApiDataRow

20− , ApiDataRow

19+ ApiDataRow

21 , apiDataRow

20 , apiDataRow

22 , adrImpressions

21 , adrImpressions

23 , adrKeys

22 , adrKeys

@@ -133,6 +132,3 @@ module Network.Google.WebmasterTools.Types

133import Network.Google.Prelude

132import Network.Google.Prelude

134import Network.Google.WebmasterTools.Types.Product

133import Network.Google.WebmasterTools.Types.Product

135import Network.Google.WebmasterTools.Types.Sum

134import Network.Google.WebmasterTools.Types.Sum

136−

137−webmasters :: a

138−webmasters = error "webmasters"

gogol-webmaster-tools/gen/Network/Google/WebmasterTools/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.WebmasterTools.Types.Product

8-- Module : Network.Google.WebmasterTools.Types.Product

gogol-webmaster-tools/gen/Network/Google/WebmasterTools/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.WebmasterTools.Types.Sum

9-- Module : Network.Google.WebmasterTools.Types.Sum

gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.YouTubeAnalytics.Types

8-- Module : Network.Google.YouTubeAnalytics.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.YouTubeAnalytics.Types

15module Network.Google.YouTubeAnalytics.Types

14 (

16 (

15− -- * API Definition

16− youtubeAnalytics

17−

18

17

19 -- * BatchReport

18 -- * BatchReport

20− , BatchReport

19+ BatchReport

21 , batchReport

20 , batchReport

22 , brTimeUpdated

21 , brTimeUpdated

23 , brKind

22 , brKind

@@ -128,6 +127,3 @@ module Network.Google.YouTubeAnalytics.Types

128import Network.Google.Prelude

127import Network.Google.Prelude

129import Network.Google.YouTubeAnalytics.Types.Product

128import Network.Google.YouTubeAnalytics.Types.Product

130import Network.Google.YouTubeAnalytics.Types.Sum

129import Network.Google.YouTubeAnalytics.Types.Sum

131−

132−youtubeAnalytics :: a

133−youtubeAnalytics = error "youtubeAnalytics"

gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics/Types/Product.hs+2

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.YouTubeAnalytics.Types.Product

8-- Module : Network.Google.YouTubeAnalytics.Types.Product

gogol-youtube-analytics/gen/Network/Google/YouTubeAnalytics/Types/Sum.hs+3

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.YouTubeAnalytics.Types.Sum

9-- Module : Network.Google.YouTubeAnalytics.Types.Sum

gogol-youtube/gen/Network/Google/YouTube/Types.hs+3−7

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.YouTube.Types

8-- Module : Network.Google.YouTube.Types

@@ -12,12 +14,9 @@

12--

14--

13module Network.Google.YouTube.Types

15module Network.Google.YouTube.Types

14 (

16 (

15− -- * API Definition

16− youtube

17−

18

17

19 -- * AccessPolicy

18 -- * AccessPolicy

20− , AccessPolicy

19+ AccessPolicy

21 , accessPolicy

20 , accessPolicy

22 , apException

21 , apException

23 , apAllowed

22 , apAllowed

@@ -1771,6 +1770,3 @@ module Network.Google.YouTube.Types

1771import Network.Google.Prelude

1770import Network.Google.Prelude

1772import Network.Google.YouTube.Types.Product

1771import Network.Google.YouTube.Types.Product

1773import Network.Google.YouTube.Types.Sum

1772import Network.Google.YouTube.Types.Sum

1774−

1775−youtube :: a

1776−youtube = error "youtube"

gogol-youtube/gen/Network/Google/YouTube/Types/Product.hs+35−33

@@ -2,6 +2,8 @@

2{-# LANGUAGE DeriveGeneric #-}

3{-# LANGUAGE OverloadedStrings #-}

4

5+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

6+

5-- |

7-- |

6-- Module : Network.Google.YouTube.Types.Product

8-- Module : Network.Google.YouTube.Types.Product

@@ -446,7 +448,7 @@ data ActivityContentDetailsPromotedItem = ActivityContentDetailsPromotedItem

446 , _acdpiCreativeViewUrl :: !(Maybe Text)

448 , _acdpiCreativeViewUrl :: !(Maybe Text)

447 , _acdpiImpressionUrl :: !(Maybe [Text])

449 , _acdpiImpressionUrl :: !(Maybe [Text])

448 , _acdpiCustomCtaButtonText :: !(Maybe Text)

450 , _acdpiCustomCtaButtonText :: !(Maybe Text)

449− }

451+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

450

452

451-- | Creates a value of 'ActivityContentDetailsPromotedItem' with the minimum fields required to make a request.

453-- | Creates a value of 'ActivityContentDetailsPromotedItem' with the minimum fields required to make a request.

452--

454--

@@ -563,7 +565,7 @@ data ActivityContentDetailsRecommendation = ActivityContentDetailsRecommendation

563 { _acdrResourceId :: !(Maybe (Maybe ResourceId))

565 { _acdrResourceId :: !(Maybe (Maybe ResourceId))

564 , _acdrSeedResourceId :: !(Maybe (Maybe ResourceId))

566 , _acdrSeedResourceId :: !(Maybe (Maybe ResourceId))

565 , _acdrReason :: !(Maybe ActivityContentDetailsRecommendationReason)

567 , _acdrReason :: !(Maybe ActivityContentDetailsRecommendationReason)

566− }

568+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

567

569

568-- | Creates a value of 'ActivityContentDetailsRecommendation' with the minimum fields required to make a request.

570-- | Creates a value of 'ActivityContentDetailsRecommendation' with the minimum fields required to make a request.

569--

571--

@@ -611,7 +613,7 @@ data ActivityContentDetailsSocial = ActivityContentDetailsSocial

611 , _acdsAuthor :: !(Maybe Text)

613 , _acdsAuthor :: !(Maybe Text)

612 , _acdsReferenceUrl :: !(Maybe Text)

614 , _acdsReferenceUrl :: !(Maybe Text)

613 , _acdsType :: !(Maybe ActivityContentDetailsSocialType)

615 , _acdsType :: !(Maybe ActivityContentDetailsSocialType)

614− }

616+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

615

617

616-- | Creates a value of 'ActivityContentDetailsSocial' with the minimum fields required to make a request.

618-- | Creates a value of 'ActivityContentDetailsSocial' with the minimum fields required to make a request.

617--

619--

@@ -825,7 +827,7 @@ data ActivitySnippet = ActivitySnippet

825 , _asTitle :: !(Maybe Text)

827 , _asTitle :: !(Maybe Text)

826 , _asType :: !(Maybe ActivitySnippetType)

828 , _asType :: !(Maybe ActivitySnippetType)

827 , _asDescription :: !(Maybe Text)

829 , _asDescription :: !(Maybe Text)

828− }

830+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

829

831

830-- | Creates a value of 'ActivitySnippet' with the minimum fields required to make a request.

832-- | Creates a value of 'ActivitySnippet' with the minimum fields required to make a request.

831--

833--

@@ -1038,7 +1040,7 @@ data CaptionSnippet = CaptionSnippet

1038 , _csIsAutoSynced :: !(Maybe Bool)

1040 , _csIsAutoSynced :: !(Maybe Bool)

1039 , _csIsEasyReader :: !(Maybe Bool)

1041 , _csIsEasyReader :: !(Maybe Bool)

1040 , _csAudioTrackType :: !(Maybe CaptionSnippetAudioTrackType)

1042 , _csAudioTrackType :: !(Maybe CaptionSnippetAudioTrackType)

1041− }

1043+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1042

1044

1043-- | Creates a value of 'CaptionSnippet' with the minimum fields required to make a request.

1045-- | Creates a value of 'CaptionSnippet' with the minimum fields required to make a request.

1044--

1046--

@@ -1178,7 +1180,7 @@ data CdnSettings = CdnSettings

1178 { _csIngestionInfo :: !(Maybe (Maybe IngestionInfo))

1180 { _csIngestionInfo :: !(Maybe (Maybe IngestionInfo))

1179 , _csFormat :: !(Maybe Text)

1181 , _csFormat :: !(Maybe Text)

1180 , _csIngestionType :: !(Maybe CdnSettingsIngestionType)

1182 , _csIngestionType :: !(Maybe CdnSettingsIngestionType)

1181− }

1183+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1182

1184

1183-- | Creates a value of 'CdnSettings' with the minimum fields required to make a request.

1185-- | Creates a value of 'CdnSettings' with the minimum fields required to make a request.

1184--

1186--

@@ -1677,7 +1679,7 @@ ccodContentOwner

1677data ChannelConversionPing = ChannelConversionPing

1679data ChannelConversionPing = ChannelConversionPing

1678 { _ccpContext :: !(Maybe ChannelConversionPingContext)

1680 { _ccpContext :: !(Maybe ChannelConversionPingContext)

1679 , _ccpConversionUrl :: !(Maybe Text)

1681 , _ccpConversionUrl :: !(Maybe Text)

1680− }

1682+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

1681

1683

1682-- | Creates a value of 'ChannelConversionPing' with the minimum fields required to make a request.

1684-- | Creates a value of 'ChannelConversionPing' with the minimum fields required to make a request.

1683--

1685--

@@ -2134,7 +2136,7 @@ data ChannelSectionSnippet = ChannelSectionSnippet

2134 , _cssType :: !(Maybe ChannelSectionSnippetType)

2136 , _cssType :: !(Maybe ChannelSectionSnippetType)

2135 , _cssPosition :: !(Maybe Word32)

2137 , _cssPosition :: !(Maybe Word32)

2136 , _cssDefaultLanguage :: !(Maybe Text)

2138 , _cssDefaultLanguage :: !(Maybe Text)

2137− }

2139+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

2138

2140

2139-- | Creates a value of 'ChannelSectionSnippet' with the minimum fields required to make a request.

2141-- | Creates a value of 'ChannelSectionSnippet' with the minimum fields required to make a request.

2140--

2142--

@@ -2555,7 +2557,7 @@ data ChannelStatus = ChannelStatus

2555 { _csIsLinked :: !(Maybe Bool)

2557 { _csIsLinked :: !(Maybe Bool)

2556 , _csLongUploadsStatus :: !(Maybe ChannelStatusLongUploadsStatus)

2558 , _csLongUploadsStatus :: !(Maybe ChannelStatusLongUploadsStatus)

2557 , _csPrivacyStatus :: !(Maybe ChannelStatusPrivacyStatus)

2559 , _csPrivacyStatus :: !(Maybe ChannelStatusPrivacyStatus)

2558− }

2560+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

2559

2561

2560-- | Creates a value of 'ChannelStatus' with the minimum fields required to make a request.

2562-- | Creates a value of 'ChannelStatus' with the minimum fields required to make a request.

2561--

2563--

@@ -2778,7 +2780,7 @@ data CommentSnippet = CommentSnippet

2778 , _csniCanRate :: !(Maybe Bool)

2780 , _csniCanRate :: !(Maybe Bool)

2779 , _csniAuthorGoogleplusProfileUrl :: !(Maybe Text)

2781 , _csniAuthorGoogleplusProfileUrl :: !(Maybe Text)

2780 , _csniParentId :: !(Maybe Text)

2782 , _csniParentId :: !(Maybe Text)

2781− }

2783+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

2782

2784

2783-- | Creates a value of 'CommentSnippet' with the minimum fields required to make a request.

2785-- | Creates a value of 'CommentSnippet' with the minimum fields required to make a request.

2784--

2786--

@@ -3267,7 +3269,7 @@ data ContentRating = ContentRating

3267 , _crSkfilmRating :: !(Maybe ContentRatingSkfilmRating)

3269 , _crSkfilmRating :: !(Maybe ContentRatingSkfilmRating)

3268 , _crOflcRating :: !(Maybe ContentRatingOflcRating)

3270 , _crOflcRating :: !(Maybe ContentRatingOflcRating)

3269 , _crKmrbRating :: !(Maybe ContentRatingKmrbRating)

3271 , _crKmrbRating :: !(Maybe ContentRatingKmrbRating)

3270− }

3272+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

3271

3273

3272-- | Creates a value of 'ContentRating' with the minimum fields required to make a request.

3274-- | Creates a value of 'ContentRating' with the minimum fields required to make a request.

3273--

3275--

@@ -4741,7 +4743,7 @@ ibPosition

4741data InvideoPosition = InvideoPosition

4743data InvideoPosition = InvideoPosition

4742 { _ipCornerPosition :: !(Maybe InvideoPositionCornerPosition)

4744 { _ipCornerPosition :: !(Maybe InvideoPositionCornerPosition)

4743 , _ipType :: !(Maybe InvideoPositionType)

4745 , _ipType :: !(Maybe InvideoPositionType)

4744− }

4746+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

4745

4747

4746-- | Creates a value of 'InvideoPosition' with the minimum fields required to make a request.

4748-- | Creates a value of 'InvideoPosition' with the minimum fields required to make a request.

4747--

4749--

@@ -4836,7 +4838,7 @@ data InvideoTiming = InvideoTiming

4836 { _itDurationMs :: !(Maybe Word64)

4838 { _itDurationMs :: !(Maybe Word64)

4837 , _itOffsetMs :: !(Maybe Word64)

4839 , _itOffsetMs :: !(Maybe Word64)

4838 , _itType :: !(Maybe InvideoTimingType)

4840 , _itType :: !(Maybe InvideoTimingType)

4839− }

4841+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

4840

4842

4841-- | Creates a value of 'InvideoTiming' with the minimum fields required to make a request.

4843-- | Creates a value of 'InvideoTiming' with the minimum fields required to make a request.

4842--

4844--

@@ -5411,7 +5413,7 @@ data LiveBroadcastStatus = LiveBroadcastStatus

5411 , _lbsRecordingStatus :: !(Maybe LiveBroadcastStatusRecordingStatus)

5413 , _lbsRecordingStatus :: !(Maybe LiveBroadcastStatusRecordingStatus)

5412 , _lbsLifeCycleStatus :: !(Maybe LiveBroadcastStatusLifeCycleStatus)

5414 , _lbsLifeCycleStatus :: !(Maybe LiveBroadcastStatusLifeCycleStatus)

5413 , _lbsPrivacyStatus :: !(Maybe LiveBroadcastStatusPrivacyStatus)

5415 , _lbsPrivacyStatus :: !(Maybe LiveBroadcastStatusPrivacyStatus)

5414− }

5416+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5415

5417

5416-- | Creates a value of 'LiveBroadcastStatus' with the minimum fields required to make a request.

5418-- | Creates a value of 'LiveBroadcastStatus' with the minimum fields required to make a request.

5417--

5419--

@@ -5469,7 +5471,7 @@ data LiveBroadcastTopic = LiveBroadcastTopic

5469 { _lbtSnippet :: !(Maybe (Maybe LiveBroadcastTopicSnippet))

5471 { _lbtSnippet :: !(Maybe (Maybe LiveBroadcastTopicSnippet))

5470 , _lbtUnmatched :: !(Maybe Bool)

5472 , _lbtUnmatched :: !(Maybe Bool)

5471 , _lbtType :: !(Maybe LiveBroadcastTopicType)

5473 , _lbtType :: !(Maybe LiveBroadcastTopicType)

5472− }

5474+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5473

5475

5474-- | Creates a value of 'LiveBroadcastTopic' with the minimum fields required to make a request.

5476-- | Creates a value of 'LiveBroadcastTopic' with the minimum fields required to make a request.

5475--

5477--

@@ -5646,7 +5648,7 @@ data LiveStreamConfigurationIssue = LiveStreamConfigurationIssue

5646 , _lsciReason :: !(Maybe Text)

5648 , _lsciReason :: !(Maybe Text)

5647 , _lsciType :: !(Maybe LiveStreamConfigurationIssueType)

5649 , _lsciType :: !(Maybe LiveStreamConfigurationIssueType)

5648 , _lsciDescription :: !(Maybe Text)

5650 , _lsciDescription :: !(Maybe Text)

5649− }

5651+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5650

5652

5651-- | Creates a value of 'LiveStreamConfigurationIssue' with the minimum fields required to make a request.

5653-- | Creates a value of 'LiveStreamConfigurationIssue' with the minimum fields required to make a request.

5652--

5654--

@@ -5741,7 +5743,7 @@ data LiveStreamHealthStatus = LiveStreamHealthStatus

5741 { _lshsStatus :: !(Maybe LiveStreamHealthStatusStatus)

5743 { _lshsStatus :: !(Maybe LiveStreamHealthStatusStatus)

5742 , _lshsConfigurationIssues :: !(Maybe [Maybe LiveStreamConfigurationIssue])

5744 , _lshsConfigurationIssues :: !(Maybe [Maybe LiveStreamConfigurationIssue])

5743 , _lshsLastUpdateTimeSeconds :: !(Maybe Word64)

5745 , _lshsLastUpdateTimeSeconds :: !(Maybe Word64)

5744− }

5746+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5745

5747

5746-- | Creates a value of 'LiveStreamHealthStatus' with the minimum fields required to make a request.

5748-- | Creates a value of 'LiveStreamHealthStatus' with the minimum fields required to make a request.

5747--

5749--

@@ -5950,7 +5952,7 @@ lssDescription

5950data LiveStreamStatus = LiveStreamStatus

5952data LiveStreamStatus = LiveStreamStatus

5951 { _lssStreamStatus :: !(Maybe LiveStreamStatusStreamStatus)

5953 { _lssStreamStatus :: !(Maybe LiveStreamStatusStreamStatus)

5952 , _lssHealthStatus :: !(Maybe (Maybe LiveStreamHealthStatus))

5954 , _lssHealthStatus :: !(Maybe (Maybe LiveStreamHealthStatus))

5953− }

5955+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

5954

5956

5955-- | Creates a value of 'LiveStreamStatus' with the minimum fields required to make a request.

5957-- | Creates a value of 'LiveStreamStatus' with the minimum fields required to make a request.

5956--

5958--

@@ -6622,7 +6624,7 @@ pisPosition

6622-- /See:/ 'playlistItemStatus' smart constructor.

6624-- /See:/ 'playlistItemStatus' smart constructor.

6623newtype PlaylistItemStatus = PlaylistItemStatus

6625newtype PlaylistItemStatus = PlaylistItemStatus

6624 { _pisPrivacyStatus :: Maybe PlaylistItemStatusPrivacyStatus

6626 { _pisPrivacyStatus :: Maybe PlaylistItemStatusPrivacyStatus

6625− }

6627+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

6626

6628

6627-- | Creates a value of 'PlaylistItemStatus' with the minimum fields required to make a request.

6629-- | Creates a value of 'PlaylistItemStatus' with the minimum fields required to make a request.

6628--

6630--

@@ -6920,7 +6922,7 @@ psDefaultLanguage

6920-- /See:/ 'playlistStatus' smart constructor.

6922-- /See:/ 'playlistStatus' smart constructor.

6921newtype PlaylistStatus = PlaylistStatus

6923newtype PlaylistStatus = PlaylistStatus

6922 { _psPrivacyStatus :: Maybe PlaylistStatusPrivacyStatus

6924 { _psPrivacyStatus :: Maybe PlaylistStatusPrivacyStatus

6923− }

6925+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

6924

6926

6925-- | Creates a value of 'PlaylistStatus' with the minimum fields required to make a request.

6927-- | Creates a value of 'PlaylistStatus' with the minimum fields required to make a request.

6926--

6928--

@@ -7004,7 +7006,7 @@ data PromotedItemId = PromotedItemId

7004 , _piiVideoId :: !(Maybe Text)

7006 , _piiVideoId :: !(Maybe Text)

7005 , _piiWebsiteUrl :: !(Maybe Text)

7007 , _piiWebsiteUrl :: !(Maybe Text)

7006 , _piiType :: !(Maybe PromotedItemIdType)

7008 , _piiType :: !(Maybe PromotedItemIdType)

7007− }

7009+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

7008

7010

7009-- | Creates a value of 'PromotedItemId' with the minimum fields required to make a request.

7011-- | Creates a value of 'PromotedItemId' with the minimum fields required to make a request.

7010--

7012--

@@ -7310,7 +7312,7 @@ data SearchResultSnippet = SearchResultSnippet

7310 , _srsTitle :: !(Maybe Text)

7312 , _srsTitle :: !(Maybe Text)

7311 , _srsLiveBroadcastContent :: !(Maybe SearchResultSnippetLiveBroadcastContent)

7313 , _srsLiveBroadcastContent :: !(Maybe SearchResultSnippetLiveBroadcastContent)

7312 , _srsDescription :: !(Maybe Text)

7314 , _srsDescription :: !(Maybe Text)

7313− }

7315+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

7314

7316

7315-- | Creates a value of 'SearchResultSnippet' with the minimum fields required to make a request.

7317-- | Creates a value of 'SearchResultSnippet' with the minimum fields required to make a request.

7316--

7318--

@@ -7471,7 +7473,7 @@ data SubscriptionContentDetails = SubscriptionContentDetails

7471 { _scdActivityType :: !(Maybe SubscriptionContentDetailsActivityType)

7473 { _scdActivityType :: !(Maybe SubscriptionContentDetailsActivityType)

7472 , _scdTotalItemCount :: !(Maybe Word32)

7474 , _scdTotalItemCount :: !(Maybe Word32)

7473 , _scdNewItemCount :: !(Maybe Word32)

7475 , _scdNewItemCount :: !(Maybe Word32)

7474− }

7476+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

7475

7477

7476-- | Creates a value of 'SubscriptionContentDetails' with the minimum fields required to make a request.

7478-- | Creates a value of 'SubscriptionContentDetails' with the minimum fields required to make a request.

7477--

7479--

@@ -8383,7 +8385,7 @@ data VideoAgeGating = VideoAgeGating

8383 { _vagAlcoholContent :: !(Maybe Bool)

8385 { _vagAlcoholContent :: !(Maybe Bool)

8384 , _vagRestricted :: !(Maybe Bool)

8386 , _vagRestricted :: !(Maybe Bool)

8385 , _vagVideoGameRating :: !(Maybe VideoAgeGatingVideoGameRating)

8387 , _vagVideoGameRating :: !(Maybe VideoAgeGatingVideoGameRating)

8386− }

8388+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

8387

8389

8388-- | Creates a value of 'VideoAgeGating' with the minimum fields required to make a request.

8390-- | Creates a value of 'VideoAgeGating' with the minimum fields required to make a request.

8389--

8391--

@@ -8632,7 +8634,7 @@ data VideoContentDetails = VideoContentDetails

8632 , _vcdDuration :: !(Maybe Text)

8634 , _vcdDuration :: !(Maybe Text)

8633 , _vcdContentRating :: !(Maybe (Maybe ContentRating))

8635 , _vcdContentRating :: !(Maybe (Maybe ContentRating))

8634 , _vcdLicensedContent :: !(Maybe Bool)

8636 , _vcdLicensedContent :: !(Maybe Bool)

8635− }

8637+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

8636

8638

8637-- | Creates a value of 'VideoContentDetails' with the minimum fields required to make a request.

8639-- | Creates a value of 'VideoContentDetails' with the minimum fields required to make a request.

8638--

8640--

@@ -8776,7 +8778,7 @@ vcdrrBlocked

8776data VideoConversionPing = VideoConversionPing

8778data VideoConversionPing = VideoConversionPing

8777 { _vcpContext :: !(Maybe VideoConversionPingContext)

8779 { _vcpContext :: !(Maybe VideoConversionPingContext)

8778 , _vcpConversionUrl :: !(Maybe Text)

8780 , _vcpConversionUrl :: !(Maybe Text)

8779− }

8781+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

8780

8782

8781-- | Creates a value of 'VideoConversionPing' with the minimum fields required to make a request.

8783-- | Creates a value of 'VideoConversionPing' with the minimum fields required to make a request.

8782--

8784--

@@ -8853,7 +8855,7 @@ data VideoFileDetails = VideoFileDetails

8853 , _vfdVideoStreams :: !(Maybe [Maybe VideoFileDetailsVideoStream])

8855 , _vfdVideoStreams :: !(Maybe [Maybe VideoFileDetailsVideoStream])

8854 , _vfdAudioStreams :: !(Maybe [Maybe VideoFileDetailsAudioStream])

8856 , _vfdAudioStreams :: !(Maybe [Maybe VideoFileDetailsAudioStream])

8855 , _vfdFileName :: !(Maybe Text)

8857 , _vfdFileName :: !(Maybe Text)

8856− }

8858+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

8857

8859

8858-- | Creates a value of 'VideoFileDetails' with the minimum fields required to make a request.

8860-- | Creates a value of 'VideoFileDetails' with the minimum fields required to make a request.

8859--

8861--

@@ -9031,7 +9033,7 @@ data VideoFileDetailsVideoStream = VideoFileDetailsVideoStream

9031 , _vfdvsCodec :: !(Maybe Text)

9033 , _vfdvsCodec :: !(Maybe Text)

9032 , _vfdvsAspectRatio :: !(Maybe Double)

9034 , _vfdvsAspectRatio :: !(Maybe Double)

9033 , _vfdvsWidthPixels :: !(Maybe Word32)

9035 , _vfdvsWidthPixels :: !(Maybe Word32)

9034− }

9036+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

9035

9037

9036-- | Creates a value of 'VideoFileDetailsVideoStream' with the minimum fields required to make a request.

9038-- | Creates a value of 'VideoFileDetailsVideoStream' with the minimum fields required to make a request.

9037--

9039--

@@ -9463,7 +9465,7 @@ data VideoProcessingDetails = VideoProcessingDetails

9463 , _vpdProcessingStatus :: !(Maybe VideoProcessingDetailsProcessingStatus)

9465 , _vpdProcessingStatus :: !(Maybe VideoProcessingDetailsProcessingStatus)

9464 , _vpdEditorSuggestionsAvailability :: !(Maybe Text)

9466 , _vpdEditorSuggestionsAvailability :: !(Maybe Text)

9465 , _vpdFileDetailsAvailability :: !(Maybe Text)

9467 , _vpdFileDetailsAvailability :: !(Maybe Text)

9466− }

9468+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

9467

9469

9468-- | Creates a value of 'VideoProcessingDetails' with the minimum fields required to make a request.

9470-- | Creates a value of 'VideoProcessingDetails' with the minimum fields required to make a request.

9469--

9471--

@@ -9647,7 +9649,7 @@ vpdTags

9647data VideoRating = VideoRating

9649data VideoRating = VideoRating

9648 { _vrRating :: !(Maybe VideoRatingRating)

9650 { _vrRating :: !(Maybe VideoRatingRating)

9649 , _vrVideoId :: !(Maybe Text)

9651 , _vrVideoId :: !(Maybe Text)

9650− }

9652+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

9651

9653

9652-- | Creates a value of 'VideoRating' with the minimum fields required to make a request.

9654-- | Creates a value of 'VideoRating' with the minimum fields required to make a request.

9653--

9655--

@@ -9733,7 +9735,7 @@ data VideoSnippet = VideoSnippet

9733 , _vsDescription :: !(Maybe Text)

9735 , _vsDescription :: !(Maybe Text)

9734 , _vsTags :: !(Maybe [Text])

9736 , _vsTags :: !(Maybe [Text])

9735 , _vsDefaultLanguage :: !(Maybe Text)

9737 , _vsDefaultLanguage :: !(Maybe Text)

9736− }

9738+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

9737

9739

9738-- | Creates a value of 'VideoSnippet' with the minimum fields required to make a request.

9740-- | Creates a value of 'VideoSnippet' with the minimum fields required to make a request.

9739--

9741--

@@ -9934,7 +9936,7 @@ data VideoStatus = VideoStatus

9934 , _vsPrivacyStatus :: !(Maybe VideoStatusPrivacyStatus)

9936 , _vsPrivacyStatus :: !(Maybe VideoStatusPrivacyStatus)

9935 , _vsEmbeddable :: !(Maybe Bool)

9937 , _vsEmbeddable :: !(Maybe Bool)

9936 , _vsLicense :: !(Maybe VideoStatusLicense)

9938 , _vsLicense :: !(Maybe VideoStatusLicense)

9937− }

9939+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

9938

9940

9939-- | Creates a value of 'VideoStatus' with the minimum fields required to make a request.

9941-- | Creates a value of 'VideoStatus' with the minimum fields required to make a request.

9940--

9942--

@@ -10031,7 +10033,7 @@ data VideoSuggestions = VideoSuggestions

10031 , _vsEditorSuggestions :: !(Maybe [VideoSuggestionsItemEditorSuggestions])

10033 , _vsEditorSuggestions :: !(Maybe [VideoSuggestionsItemEditorSuggestions])

10032 , _vsProcessingWarnings :: !(Maybe [VideoSuggestionsItemProcessingWarnings])

10034 , _vsProcessingWarnings :: !(Maybe [VideoSuggestionsItemProcessingWarnings])

10033 , _vsTagSuggestions :: !(Maybe [Maybe VideoSuggestionsTagSuggestion])

10035 , _vsTagSuggestions :: !(Maybe [Maybe VideoSuggestionsTagSuggestion])

10034− }

10036+ } deriving (Eq,Read,Show,Data,Typeable,Generic)

10035

10037

10036-- | Creates a value of 'VideoSuggestions' with the minimum fields required to make a request.

10038-- | Creates a value of 'VideoSuggestions' with the minimum fields required to make a request.

10037--

10039--

gogol-youtube/gen/Network/Google/YouTube/Types/Sum.hs+2182

@@ -1,7 +1,10 @@

1{-# LANGUAGE DeriveDataTypeable #-}

2{-# LANGUAGE DeriveGeneric #-}

3+{-# LANGUAGE LambdaCase #-}

3{-# LANGUAGE OverloadedStrings #-}

4{-# LANGUAGE OverloadedStrings #-}

4

5

6+{-# OPTIONS_GHC -fno-warn-unused-imports #-}

7+

5-- |

8-- |

6-- Module : Network.Google.YouTube.Types.Sum

9-- Module : Network.Google.YouTube.Types.Sum

@@ -25,6 +28,17 @@ data ActivityContentDetailsPromotedItemCtaType

25

28

26instance Hashable ActivityContentDetailsPromotedItemCtaType

29instance Hashable ActivityContentDetailsPromotedItemCtaType

27

30

31+instance FromText ActivityContentDetailsPromotedItemCtaType where

32+ fromText = \case

33+ "unspecified" -> Just ACDPICTUnspecified

34+ "visitAdvertiserSite" -> Just ACDPICTVisitAdvertiserSite

35+ _ -> Nothing

36+

37+instance ToText ActivityContentDetailsPromotedItemCtaType where

38+ toText = \case

39+ ACDPICTUnspecified -> "unspecified"

40+ ACDPICTVisitAdvertiserSite -> "visitAdvertiserSite"

41+

28-- | The reason that the resource is recommended to the user.

42-- | The reason that the resource is recommended to the user.

29data ActivityContentDetailsRecommendationReason

43data ActivityContentDetailsRecommendationReason

30 = ACDRRUnspecified

44 = ACDRRUnspecified

@@ -39,6 +53,21 @@ data ActivityContentDetailsRecommendationReason

39

53

40instance Hashable ActivityContentDetailsRecommendationReason

54instance Hashable ActivityContentDetailsRecommendationReason

41

55

56+instance FromText ActivityContentDetailsRecommendationReason where

57+ fromText = \case

58+ "unspecified" -> Just ACDRRUnspecified

59+ "videoFavorited" -> Just ACDRRVideoFavorited

60+ "videoLiked" -> Just ACDRRVideoLiked

61+ "videoWatched" -> Just ACDRRVideoWatched

62+ _ -> Nothing

63+

64+instance ToText ActivityContentDetailsRecommendationReason where

65+ toText = \case

66+ ACDRRUnspecified -> "unspecified"

67+ ACDRRVideoFavorited -> "videoFavorited"

68+ ACDRRVideoLiked -> "videoLiked"

69+ ACDRRVideoWatched -> "videoWatched"

70+

42-- | The name of the social network.

71-- | The name of the social network.

43data ActivityContentDetailsSocialType

72data ActivityContentDetailsSocialType

44 = ACDSTFacebook

73 = ACDSTFacebook

@@ -53,6 +82,21 @@ data ActivityContentDetailsSocialType

53

82

54instance Hashable ActivityContentDetailsSocialType

83instance Hashable ActivityContentDetailsSocialType

55

84

85+instance FromText ActivityContentDetailsSocialType where

86+ fromText = \case

87+ "facebook" -> Just ACDSTFacebook

88+ "googlePlus" -> Just ACDSTGooglePlus

89+ "twitter" -> Just ACDSTTwitter

90+ "unspecified" -> Just ACDSTUnspecified

91+ _ -> Nothing

92+

93+instance ToText ActivityContentDetailsSocialType where

94+ toText = \case

95+ ACDSTFacebook -> "facebook"

96+ ACDSTGooglePlus -> "googlePlus"

97+ ACDSTTwitter -> "twitter"

98+ ACDSTUnspecified -> "unspecified"

99+

56-- | The type of activity that the resource describes.

100-- | The type of activity that the resource describes.

57data ActivitySnippetType

101data ActivitySnippetType

58 = ASTBulletin

102 = ASTBulletin

@@ -81,6 +125,35 @@ data ActivitySnippetType

81

125

82instance Hashable ActivitySnippetType

126instance Hashable ActivitySnippetType

83

127

128+instance FromText ActivitySnippetType where

129+ fromText = \case

130+ "bulletin" -> Just ASTBulletin

131+ "channelItem" -> Just ASTChannelItem

132+ "comment" -> Just ASTComment

133+ "favorite" -> Just ASTFavorite

134+ "like" -> Just ASTLike

135+ "playlistItem" -> Just ASTPlaylistItem

136+ "promotedItem" -> Just ASTPromotedItem

137+ "recommendation" -> Just ASTRecommendation

138+ "social" -> Just ASTSocial

139+ "subscription" -> Just ASTSubscription

140+ "upload" -> Just ASTUpload

141+ _ -> Nothing

142+

143+instance ToText ActivitySnippetType where

144+ toText = \case

145+ ASTBulletin -> "bulletin"

146+ ASTChannelItem -> "channelItem"

147+ ASTComment -> "comment"

148+ ASTFavorite -> "favorite"

149+ ASTLike -> "like"

150+ ASTPlaylistItem -> "playlistItem"

151+ ASTPromotedItem -> "promotedItem"

152+ ASTRecommendation -> "recommendation"

153+ ASTSocial -> "social"

154+ ASTSubscription -> "subscription"

155+ ASTUpload -> "upload"

156+

84-- | The type of audio track associated with the caption track.

157-- | The type of audio track associated with the caption track.

85data CaptionSnippetAudioTrackType

158data CaptionSnippetAudioTrackType

86 = CSATTCommentary

159 = CSATTCommentary

@@ -95,6 +168,21 @@ data CaptionSnippetAudioTrackType

95

168

96instance Hashable CaptionSnippetAudioTrackType

169instance Hashable CaptionSnippetAudioTrackType

97

170

171+instance FromText CaptionSnippetAudioTrackType where

172+ fromText = \case

173+ "commentary" -> Just CSATTCommentary

174+ "descriptive" -> Just CSATTDescriptive

175+ "primary" -> Just CSATTPrimary

176+ "unknown" -> Just CSATTUnknown

177+ _ -> Nothing

178+

179+instance ToText CaptionSnippetAudioTrackType where

180+ toText = \case

181+ CSATTCommentary -> "commentary"

182+ CSATTDescriptive -> "descriptive"

183+ CSATTPrimary -> "primary"

184+ CSATTUnknown -> "unknown"

185+

98-- | The reason that YouTube failed to process the caption track. This

186-- | The reason that YouTube failed to process the caption track. This

99-- property is only present if the state property\'s value is failed.

187-- property is only present if the state property\'s value is failed.

100data CaptionSnippetFailureReason

188data CaptionSnippetFailureReason

@@ -108,6 +196,19 @@ data CaptionSnippetFailureReason

108

196

109instance Hashable CaptionSnippetFailureReason

197instance Hashable CaptionSnippetFailureReason

110

198

199+instance FromText CaptionSnippetFailureReason where

200+ fromText = \case

201+ "processingFailed" -> Just CSFRProcessingFailed

202+ "unknownFormat" -> Just CSFRUnknownFormat

203+ "unsupportedFormat" -> Just CSFRUnsupportedFormat

204+ _ -> Nothing

205+

206+instance ToText CaptionSnippetFailureReason where

207+ toText = \case

208+ CSFRProcessingFailed -> "processingFailed"

209+ CSFRUnknownFormat -> "unknownFormat"

210+ CSFRUnsupportedFormat -> "unsupportedFormat"

211+

111-- | The caption track\'s status.

212-- | The caption track\'s status.

112data CaptionSnippetStatus

213data CaptionSnippetStatus

113 = CSSFailed

214 = CSSFailed

@@ -120,6 +221,19 @@ data CaptionSnippetStatus

120

221

121instance Hashable CaptionSnippetStatus

222instance Hashable CaptionSnippetStatus

122

223

224+instance FromText CaptionSnippetStatus where

225+ fromText = \case

226+ "failed" -> Just CSSFailed

227+ "serving" -> Just CSSServing

228+ "syncing" -> Just CSSSyncing

229+ _ -> Nothing

230+

231+instance ToText CaptionSnippetStatus where

232+ toText = \case

233+ CSSFailed -> "failed"

234+ CSSServing -> "serving"

235+ CSSSyncing -> "syncing"

236+

123-- | The caption track\'s type.

237-- | The caption track\'s type.

124data CaptionSnippetTrackKind

238data CaptionSnippetTrackKind

125 = CSTKAsr

239 = CSTKAsr

@@ -132,6 +246,19 @@ data CaptionSnippetTrackKind

132

246

133instance Hashable CaptionSnippetTrackKind

247instance Hashable CaptionSnippetTrackKind

134

248

249+instance FromText CaptionSnippetTrackKind where

250+ fromText = \case

251+ "ASR" -> Just CSTKAsr

252+ "forced" -> Just CSTKForced

253+ "standard" -> Just CSTKStandard

254+ _ -> Nothing

255+

256+instance ToText CaptionSnippetTrackKind where

257+ toText = \case

258+ CSTKAsr -> "ASR"

259+ CSTKForced -> "forced"

260+ CSTKStandard -> "standard"

261+

135-- | The method or protocol used to transmit the video stream.

262-- | The method or protocol used to transmit the video stream.

136data CdnSettingsIngestionType

263data CdnSettingsIngestionType

137 = CSITDash

264 = CSITDash

@@ -142,6 +269,17 @@ data CdnSettingsIngestionType

142

269

143instance Hashable CdnSettingsIngestionType

270instance Hashable CdnSettingsIngestionType

144

271

272+instance FromText CdnSettingsIngestionType where

273+ fromText = \case

274+ "dash" -> Just CSITDash

275+ "rtmp" -> Just CSITRtmp

276+ _ -> Nothing

277+

278+instance ToText CdnSettingsIngestionType where

279+ toText = \case

280+ CSITDash -> "dash"

281+ CSITRtmp -> "rtmp"

282+

145-- | Defines the context of the ping.

283-- | Defines the context of the ping.

146data ChannelConversionPingContext

284data ChannelConversionPingContext

147 = CCPCCview

285 = CCPCCview

@@ -154,6 +292,19 @@ data ChannelConversionPingContext

154

292

155instance Hashable ChannelConversionPingContext

293instance Hashable ChannelConversionPingContext

156

294

295+instance FromText ChannelConversionPingContext where

296+ fromText = \case

297+ "cview" -> Just CCPCCview

298+ "subscribe" -> Just CCPCSubscribe

299+ "unsubscribe" -> Just CCPCUnsubscribe

300+ _ -> Nothing

301+

302+instance ToText ChannelConversionPingContext where

303+ toText = \case

304+ CCPCCview -> "cview"

305+ CCPCSubscribe -> "subscribe"

306+ CCPCUnsubscribe -> "unsubscribe"

307+

157-- | The style of the channel section.

308-- | The style of the channel section.

158data ChannelSectionSnippetStyle

309data ChannelSectionSnippetStyle

159 = CSSSChannelsectionStyleUndefined

310 = CSSSChannelsectionStyleUndefined

@@ -166,6 +317,19 @@ data ChannelSectionSnippetStyle

166

317

167instance Hashable ChannelSectionSnippetStyle

318instance Hashable ChannelSectionSnippetStyle

168

319

320+instance FromText ChannelSectionSnippetStyle where

321+ fromText = \case

322+ "channelsectionStyleUndefined" -> Just CSSSChannelsectionStyleUndefined

323+ "horizontalRow" -> Just CSSSHorizontalRow

324+ "verticalList" -> Just CSSSVerticalList

325+ _ -> Nothing

326+

327+instance ToText ChannelSectionSnippetStyle where

328+ toText = \case

329+ CSSSChannelsectionStyleUndefined -> "channelsectionStyleUndefined"

330+ CSSSHorizontalRow -> "horizontalRow"

331+ CSSSVerticalList -> "verticalList"

332+

169-- | The type of the channel section.

333-- | The type of the channel section.

170data ChannelSectionSnippetType

334data ChannelSectionSnippetType

171 = CSSTAllPlaylists

335 = CSSTAllPlaylists

@@ -206,6 +370,47 @@ data ChannelSectionSnippetType

206

370

207instance Hashable ChannelSectionSnippetType

371instance Hashable ChannelSectionSnippetType

208

372

373+instance FromText ChannelSectionSnippetType where

374+ fromText = \case

375+ "allPlaylists" -> Just CSSTAllPlaylists

376+ "channelsectionTypeUndefined" -> Just CSSTChannelsectionTypeUndefined

377+ "completedEvents" -> Just CSSTCompletedEvents

378+ "likedPlaylists" -> Just CSSTLikedPlaylists

379+ "likes" -> Just CSSTLikes

380+ "liveEvents" -> Just CSSTLiveEvents

381+ "multipleChannels" -> Just CSSTMultipleChannels

382+ "multiplePlaylists" -> Just CSSTMultiplePlaylists

383+ "popularUploads" -> Just CSSTPopularUploads

384+ "postedPlaylists" -> Just CSSTPostedPlaylists

385+ "postedVideos" -> Just CSSTPostedVideos

386+ "recentActivity" -> Just CSSTRecentActivity

387+ "recentPosts" -> Just CSSTRecentPosts

388+ "recentUploads" -> Just CSSTRecentUploads

389+ "singlePlaylist" -> Just CSSTSinglePlaylist

390+ "subscriptions" -> Just CSSTSubscriptions

391+ "upcomingEvents" -> Just CSSTUpcomingEvents

392+ _ -> Nothing

393+

394+instance ToText ChannelSectionSnippetType where

395+ toText = \case

396+ CSSTAllPlaylists -> "allPlaylists"

397+ CSSTChannelsectionTypeUndefined -> "channelsectionTypeUndefined"

398+ CSSTCompletedEvents -> "completedEvents"

399+ CSSTLikedPlaylists -> "likedPlaylists"

400+ CSSTLikes -> "likes"

401+ CSSTLiveEvents -> "liveEvents"

402+ CSSTMultipleChannels -> "multipleChannels"

403+ CSSTMultiplePlaylists -> "multiplePlaylists"

404+ CSSTPopularUploads -> "popularUploads"

405+ CSSTPostedPlaylists -> "postedPlaylists"

406+ CSSTPostedVideos -> "postedVideos"

407+ CSSTRecentActivity -> "recentActivity"

408+ CSSTRecentPosts -> "recentPosts"

409+ CSSTRecentUploads -> "recentUploads"

410+ CSSTSinglePlaylist -> "singlePlaylist"

411+ CSSTSubscriptions -> "subscriptions"

412+ CSSTUpcomingEvents -> "upcomingEvents"

413+

209-- | The long uploads status of this channel. See

414-- | The long uploads status of this channel. See

210data ChannelStatusLongUploadsStatus

415data ChannelStatusLongUploadsStatus

211 = CSLUSAllowed

416 = CSLUSAllowed

@@ -220,6 +425,21 @@ data ChannelStatusLongUploadsStatus

220

425

221instance Hashable ChannelStatusLongUploadsStatus

426instance Hashable ChannelStatusLongUploadsStatus

222

427

428+instance FromText ChannelStatusLongUploadsStatus where

429+ fromText = \case

430+ "allowed" -> Just CSLUSAllowed

431+ "disallowed" -> Just CSLUSDisallowed

432+ "eligible" -> Just CSLUSEligible

433+ "longUploadsUnspecified" -> Just CSLUSLongUploadsUnspecified

434+ _ -> Nothing

435+

436+instance ToText ChannelStatusLongUploadsStatus where

437+ toText = \case

438+ CSLUSAllowed -> "allowed"

439+ CSLUSDisallowed -> "disallowed"

440+ CSLUSEligible -> "eligible"

441+ CSLUSLongUploadsUnspecified -> "longUploadsUnspecified"

442+

223-- | Privacy status of the channel.

443-- | Privacy status of the channel.

224data ChannelStatusPrivacyStatus

444data ChannelStatusPrivacyStatus

225 = CSPSPrivate

445 = CSPSPrivate

@@ -232,6 +452,19 @@ data ChannelStatusPrivacyStatus

232

452

233instance Hashable ChannelStatusPrivacyStatus

453instance Hashable ChannelStatusPrivacyStatus

234

454

455+instance FromText ChannelStatusPrivacyStatus where

456+ fromText = \case

457+ "private" -> Just CSPSPrivate

458+ "public" -> Just CSPSPublic

459+ "unlisted" -> Just CSPSUnlisted

460+ _ -> Nothing

461+

462+instance ToText ChannelStatusPrivacyStatus where

463+ toText = \case

464+ CSPSPrivate -> "private"

465+ CSPSPublic -> "public"

466+ CSPSUnlisted -> "unlisted"

467+

235-- | The comment\'s moderation status. Will not be set if the comments were

468-- | The comment\'s moderation status. Will not be set if the comments were

236-- requested through the id filter.

469-- requested through the id filter.

237data CommentSnippetModerationStatus

470data CommentSnippetModerationStatus

@@ -247,6 +480,21 @@ data CommentSnippetModerationStatus

247

480

248instance Hashable CommentSnippetModerationStatus

481instance Hashable CommentSnippetModerationStatus

249

482

483+instance FromText CommentSnippetModerationStatus where

484+ fromText = \case

485+ "heldForReview" -> Just CSMSHeldForReview

486+ "likelySpam" -> Just CSMSLikelySpam

487+ "published" -> Just CSMSPublished

488+ "rejected" -> Just CSMSRejected

489+ _ -> Nothing

490+

491+instance ToText CommentSnippetModerationStatus where

492+ toText = \case

493+ CSMSHeldForReview -> "heldForReview"

494+ CSMSLikelySpam -> "likelySpam"

495+ CSMSPublished -> "published"

496+ CSMSRejected -> "rejected"

497+

250-- | The rating the viewer has given to this comment. For the time being this

498-- | The rating the viewer has given to this comment. For the time being this

251-- will never return RATE_TYPE_DISLIKE and instead return RATE_TYPE_NONE.

499-- will never return RATE_TYPE_DISLIKE and instead return RATE_TYPE_NONE.

252-- This may change in the future.

500-- This may change in the future.

@@ -263,6 +511,21 @@ data CommentSnippetViewerRating

263

511

264instance Hashable CommentSnippetViewerRating

512instance Hashable CommentSnippetViewerRating

265

513

514+instance FromText CommentSnippetViewerRating where

515+ fromText = \case

516+ "dislike" -> Just CSVRDislike

517+ "like" -> Just CSVRLike

518+ "none" -> Just CSVRNone

519+ "unspecified" -> Just CSVRUnspecified

520+ _ -> Nothing

521+

522+instance ToText CommentSnippetViewerRating where

523+ toText = \case

524+ CSVRDislike -> "dislike"

525+ CSVRLike -> "like"

526+ CSVRNone -> "none"

527+ CSVRUnspecified -> "unspecified"

528+

266-- | The video\'s Australian Classification Board (ACB) or Australian

529-- | The video\'s Australian Classification Board (ACB) or Australian

267-- Communications and Media Authority (ACMA) rating. ACMA ratings are used

530-- Communications and Media Authority (ACMA) rating. ACMA ratings are used

268-- to classify children\'s television programming.

531-- to classify children\'s television programming.

@@ -289,6 +552,31 @@ data ContentRatingAcbRating

289

552

290instance Hashable ContentRatingAcbRating

553instance Hashable ContentRatingAcbRating

291

554

555+instance FromText ContentRatingAcbRating where

556+ fromText = \case

557+ "acbC" -> Just CRARAcbC

558+ "acbE" -> Just CRARAcbE

559+ "acbG" -> Just CRARAcbG

560+ "acbM" -> Just CRARAcbM

561+ "acbMa15plus" -> Just CRARAcbMa15plus

562+ "acbP" -> Just CRARAcbP

563+ "acbPg" -> Just CRARAcbPg

564+ "acbR18plus" -> Just CRARAcbR18plus

565+ "acbUnrated" -> Just CRARAcbUnrated

566+ _ -> Nothing

567+

568+instance ToText ContentRatingAcbRating where

569+ toText = \case

570+ CRARAcbC -> "acbC"

571+ CRARAcbE -> "acbE"

572+ CRARAcbG -> "acbG"

573+ CRARAcbM -> "acbM"

574+ CRARAcbMa15plus -> "acbMa15plus"

575+ CRARAcbP -> "acbP"

576+ CRARAcbPg -> "acbPg"

577+ CRARAcbR18plus -> "acbR18plus"

578+ CRARAcbUnrated -> "acbUnrated"

579+

292-- | The video\'s rating from Italy\'s Autorità per le Garanzie nelle

580-- | The video\'s rating from Italy\'s Autorità per le Garanzie nelle

293-- Comunicazioni (AGCOM).

581-- Comunicazioni (AGCOM).

294data ContentRatingAgcomRating

582data ContentRatingAgcomRating

@@ -304,6 +592,21 @@ data ContentRatingAgcomRating

304

592

305instance Hashable ContentRatingAgcomRating

593instance Hashable ContentRatingAgcomRating

306

594

595+instance FromText ContentRatingAgcomRating where

596+ fromText = \case

597+ "agcomT" -> Just CRARAgcomT

598+ "agcomUnrated" -> Just CRARAgcomUnrated

599+ "agcomVm14" -> Just CRARAGCOMVM14

600+ "agcomVm18" -> Just CRARAGCOMVM18

601+ _ -> Nothing

602+

603+instance ToText ContentRatingAgcomRating where

604+ toText = \case

605+ CRARAgcomT -> "agcomT"

606+ CRARAgcomUnrated -> "agcomUnrated"

607+ CRARAGCOMVM14 -> "agcomVm14"

608+ CRARAGCOMVM18 -> "agcomVm18"

609+

307-- | The video\'s Anatel (Asociación Nacional de Televisión) rating for

610-- | The video\'s Anatel (Asociación Nacional de Televisión) rating for

308-- Chilean television.

611-- Chilean television.

309data ContentRatingAnatelRating

612data ContentRatingAnatelRating

@@ -327,6 +630,29 @@ data ContentRatingAnatelRating

327

630

328instance Hashable ContentRatingAnatelRating

631instance Hashable ContentRatingAnatelRating

329

632

633+instance FromText ContentRatingAnatelRating where

634+ fromText = \case

635+ "anatelA" -> Just CRARAnatelA

636+ "anatelF" -> Just CRARAnatelF

637+ "anatelI" -> Just CRARAnatelI

638+ "anatelI10" -> Just CRARANATELI10

639+ "anatelI12" -> Just CRARANATELI12

640+ "anatelI7" -> Just CRARANATELI7

641+ "anatelR" -> Just CRARAnatelR

642+ "anatelUnrated" -> Just CRARAnatelUnrated

643+ _ -> Nothing

644+

645+instance ToText ContentRatingAnatelRating where

646+ toText = \case

647+ CRARAnatelA -> "anatelA"

648+ CRARAnatelF -> "anatelF"

649+ CRARAnatelI -> "anatelI"

650+ CRARANATELI10 -> "anatelI10"

651+ CRARANATELI12 -> "anatelI12"

652+ CRARANATELI7 -> "anatelI7"

653+ CRARAnatelR -> "anatelR"

654+ CRARAnatelUnrated -> "anatelUnrated"

655+

330-- | The video\'s British Board of Film Classification (BBFC) rating.

656-- | The video\'s British Board of Film Classification (BBFC) rating.

331data ContentRatingBbfcRating

657data ContentRatingBbfcRating

332 = CRBRBBFC12

658 = CRBRBBFC12

@@ -349,6 +675,29 @@ data ContentRatingBbfcRating

349

675

350instance Hashable ContentRatingBbfcRating

676instance Hashable ContentRatingBbfcRating

351

677

678+instance FromText ContentRatingBbfcRating where

679+ fromText = \case

680+ "bbfc12" -> Just CRBRBBFC12

681+ "bbfc12a" -> Just CRBRBbfc12a

682+ "bbfc15" -> Just CRBRBBFC15

683+ "bbfc18" -> Just CRBRBBFC18

684+ "bbfcPg" -> Just CRBRBbfcPg

685+ "bbfcR18" -> Just CRBRBBFCR18

686+ "bbfcU" -> Just CRBRBbfcU

687+ "bbfcUnrated" -> Just CRBRBbfcUnrated

688+ _ -> Nothing

689+

690+instance ToText ContentRatingBbfcRating where

691+ toText = \case

692+ CRBRBBFC12 -> "bbfc12"

693+ CRBRBbfc12a -> "bbfc12a"

694+ CRBRBBFC15 -> "bbfc15"

695+ CRBRBBFC18 -> "bbfc18"

696+ CRBRBbfcPg -> "bbfcPg"

697+ CRBRBBFCR18 -> "bbfcR18"

698+ CRBRBbfcU -> "bbfcU"

699+ CRBRBbfcUnrated -> "bbfcUnrated"

700+

352-- | The video\'s rating from Thailand\'s Board of Film and Video Censors.

701-- | The video\'s rating from Thailand\'s Board of Film and Video Censors.

353data ContentRatingBfvcRating

702data ContentRatingBfvcRating

354 = CRBRBFVC13

703 = CRBRBFVC13

@@ -371,6 +720,29 @@ data ContentRatingBfvcRating

371

720

372instance Hashable ContentRatingBfvcRating

721instance Hashable ContentRatingBfvcRating

373

722

723+instance FromText ContentRatingBfvcRating where

724+ fromText = \case

725+ "bfvc13" -> Just CRBRBFVC13

726+ "bfvc15" -> Just CRBRBFVC15

727+ "bfvc18" -> Just CRBRBFVC18

728+ "bfvc20" -> Just CRBRBFVC20

729+ "bfvcB" -> Just CRBRBfvcB

730+ "bfvcE" -> Just CRBRBfvcE

731+ "bfvcG" -> Just CRBRBfvcG

732+ "bfvcUnrated" -> Just CRBRBfvcUnrated

733+ _ -> Nothing

734+

735+instance ToText ContentRatingBfvcRating where

736+ toText = \case

737+ CRBRBFVC13 -> "bfvc13"

738+ CRBRBFVC15 -> "bfvc15"

739+ CRBRBFVC18 -> "bfvc18"

740+ CRBRBFVC20 -> "bfvc20"

741+ CRBRBfvcB -> "bfvcB"

742+ CRBRBfvcE -> "bfvcE"

743+ CRBRBfvcG -> "bfvcG"

744+ CRBRBfvcUnrated -> "bfvcUnrated"

745+

374-- | The video\'s rating from the Austrian Board of Media Classification

746-- | The video\'s rating from the Austrian Board of Media Classification

375-- (Bundesministerium für Unterricht, Kunst und Kultur).

747-- (Bundesministerium für Unterricht, Kunst und Kultur).

376data ContentRatingBmukkRating

748data ContentRatingBmukkRating

@@ -394,6 +766,29 @@ data ContentRatingBmukkRating

394

766

395instance Hashable ContentRatingBmukkRating

767instance Hashable ContentRatingBmukkRating

396

768

769+instance FromText ContentRatingBmukkRating where

770+ fromText = \case

771+ "bmukk10" -> Just CRBRBMUKK10

772+ "bmukk12" -> Just CRBRBMUKK12

773+ "bmukk14" -> Just CRBRBMUKK14

774+ "bmukk16" -> Just CRBRBMUKK16

775+ "bmukk6" -> Just CRBRBMUKK6

776+ "bmukk8" -> Just CRBRBMUKK8

777+ "bmukkAa" -> Just CRBRBmukkAa

778+ "bmukkUnrated" -> Just CRBRBmukkUnrated

779+ _ -> Nothing

780+

781+instance ToText ContentRatingBmukkRating where

782+ toText = \case

783+ CRBRBMUKK10 -> "bmukk10"

784+ CRBRBMUKK12 -> "bmukk12"

785+ CRBRBMUKK14 -> "bmukk14"

786+ CRBRBMUKK16 -> "bmukk16"

787+ CRBRBMUKK6 -> "bmukk6"

788+ CRBRBMUKK8 -> "bmukk8"

789+ CRBRBmukkAa -> "bmukkAa"

790+ CRBRBmukkUnrated -> "bmukkUnrated"

791+

397-- | Rating system for Canadian TV - Canadian TV Classification System The

792-- | Rating system for Canadian TV - Canadian TV Classification System The

398-- video\'s rating from the Canadian Radio-Television and

793-- video\'s rating from the Canadian Radio-Television and

399-- Telecommunications Commission (CRTC) for Canadian English-language

794-- Telecommunications Commission (CRTC) for Canadian English-language

@@ -418,6 +813,27 @@ data ContentRatingCatvRating

418

813

419instance Hashable ContentRatingCatvRating

814instance Hashable ContentRatingCatvRating

420

815

816+instance FromText ContentRatingCatvRating where

817+ fromText = \case

818+ "catv14plus" -> Just CRCRCatv14plus

819+ "catv18plus" -> Just CRCRCatv18plus

820+ "catvC" -> Just CRCRCatvC

821+ "catvC8" -> Just CRCRCATVC8

822+ "catvG" -> Just CRCRCatvG

823+ "catvPg" -> Just CRCRCatvPg

824+ "catvUnrated" -> Just CRCRCatvUnrated

825+ _ -> Nothing

826+

827+instance ToText ContentRatingCatvRating where

828+ toText = \case

829+ CRCRCatv14plus -> "catv14plus"

830+ CRCRCatv18plus -> "catv18plus"

831+ CRCRCatvC -> "catvC"

832+ CRCRCATVC8 -> "catvC8"

833+ CRCRCatvG -> "catvG"

834+ CRCRCatvPg -> "catvPg"

835+ CRCRCatvUnrated -> "catvUnrated"

836+

421-- | The video\'s rating from the Canadian Radio-Television and

837-- | The video\'s rating from the Canadian Radio-Television and

422-- Telecommunications Commission (CRTC) for Canadian French-language

838-- Telecommunications Commission (CRTC) for Canadian French-language

423-- broadcasts. For more information, see the Canadian Broadcast Standards

839-- broadcasts. For more information, see the Canadian Broadcast Standards

@@ -439,6 +855,25 @@ data ContentRatingCatvfrRating

439

855

440instance Hashable ContentRatingCatvfrRating

856instance Hashable ContentRatingCatvfrRating

441

857

858+instance FromText ContentRatingCatvfrRating where

859+ fromText = \case

860+ "catvfr13plus" -> Just CRCRCatvfr13plus

861+ "catvfr16plus" -> Just CRCRCatvfr16plus

862+ "catvfr18plus" -> Just CRCRCatvfr18plus

863+ "catvfr8plus" -> Just CRCRCatvfr8plus

864+ "catvfrG" -> Just CRCRCatvfrG

865+ "catvfrUnrated" -> Just CRCRCatvfrUnrated

866+ _ -> Nothing

867+

868+instance ToText ContentRatingCatvfrRating where

869+ toText = \case

870+ CRCRCatvfr13plus -> "catvfr13plus"

871+ CRCRCatvfr16plus -> "catvfr16plus"

872+ CRCRCatvfr18plus -> "catvfr18plus"

873+ CRCRCatvfr8plus -> "catvfr8plus"

874+ CRCRCatvfrG -> "catvfrG"

875+ CRCRCatvfrUnrated -> "catvfrUnrated"

876+

442-- | The video\'s Central Board of Film Certification (CBFC - India) rating.

877-- | The video\'s Central Board of Film Certification (CBFC - India) rating.

443data ContentRatingCbfcRating

878data ContentRatingCbfcRating

444 = CRCRCbfcA

879 = CRCRCbfcA

@@ -455,6 +890,23 @@ data ContentRatingCbfcRating

455

890

456instance Hashable ContentRatingCbfcRating

891instance Hashable ContentRatingCbfcRating

457

892

893+instance FromText ContentRatingCbfcRating where

894+ fromText = \case

895+ "cbfcA" -> Just CRCRCbfcA

896+ "cbfcS" -> Just CRCRCbfcS

897+ "cbfcU" -> Just CRCRCbfcU

898+ "cbfcUA" -> Just CRCRCbfcUA

899+ "cbfcUnrated" -> Just CRCRCbfcUnrated

900+ _ -> Nothing

901+

902+instance ToText ContentRatingCbfcRating where

903+ toText = \case

904+ CRCRCbfcA -> "cbfcA"

905+ CRCRCbfcS -> "cbfcS"

906+ CRCRCbfcU -> "cbfcU"

907+ CRCRCbfcUA -> "cbfcUA"

908+ CRCRCbfcUnrated -> "cbfcUnrated"

909+

458-- | The video\'s Consejo de Calificación Cinematográfica (Chile) rating.

910-- | The video\'s Consejo de Calificación Cinematográfica (Chile) rating.

459data ContentRatingCccRating

911data ContentRatingCccRating

460 = CRCRCCC14

912 = CRCRCCC14

@@ -475,6 +927,27 @@ data ContentRatingCccRating

475

927

476instance Hashable ContentRatingCccRating

928instance Hashable ContentRatingCccRating

477

929

930+instance FromText ContentRatingCccRating where

931+ fromText = \case

932+ "ccc14" -> Just CRCRCCC14

933+ "ccc18" -> Just CRCRCCC18

934+ "ccc18s" -> Just CRCRCcc18s

935+ "ccc18v" -> Just CRCRCcc18v

936+ "ccc6" -> Just CRCRCCC6

937+ "cccTe" -> Just CRCRCccTe

938+ "cccUnrated" -> Just CRCRCccUnrated

939+ _ -> Nothing

940+

941+instance ToText ContentRatingCccRating where

942+ toText = \case

943+ CRCRCCC14 -> "ccc14"

944+ CRCRCCC18 -> "ccc18"

945+ CRCRCcc18s -> "ccc18s"

946+ CRCRCcc18v -> "ccc18v"

947+ CRCRCCC6 -> "ccc6"

948+ CRCRCccTe -> "cccTe"

949+ CRCRCccUnrated -> "cccUnrated"

950+

478-- | The video\'s rating from Portugal\'s Comissão de Classificação de

951-- | The video\'s rating from Portugal\'s Comissão de Classificação de

479-- Espect´culos.

952-- Espect´culos.

480data ContentRatingCceRating

953data ContentRatingCceRating

@@ -494,6 +967,25 @@ data ContentRatingCceRating

494

967

495instance Hashable ContentRatingCceRating

968instance Hashable ContentRatingCceRating

496

969

970+instance FromText ContentRatingCceRating where

971+ fromText = \case

972+ "cceM12" -> Just CRCRCCEM12

973+ "cceM16" -> Just CRCRCCEM16

974+ "cceM18" -> Just CRCRCCEM18

975+ "cceM4" -> Just CRCRCCEM4

976+ "cceM6" -> Just CRCRCCEM6

977+ "cceUnrated" -> Just CRCRCceUnrated

978+ _ -> Nothing

979+

980+instance ToText ContentRatingCceRating where

981+ toText = \case

982+ CRCRCCEM12 -> "cceM12"

983+ CRCRCCEM16 -> "cceM16"

984+ CRCRCCEM18 -> "cceM18"

985+ CRCRCCEM4 -> "cceM4"

986+ CRCRCCEM6 -> "cceM6"

987+ CRCRCceUnrated -> "cceUnrated"

988+

497-- | The video\'s rating in Switzerland.

989-- | The video\'s rating in Switzerland.

498data ContentRatingChfilmRating

990data ContentRatingChfilmRating

499 = CRCRCHFILM0

991 = CRCRCHFILM0

@@ -512,6 +1004,25 @@ data ContentRatingChfilmRating

512

1004

513instance Hashable ContentRatingChfilmRating

1005instance Hashable ContentRatingChfilmRating

514

1006

1007+instance FromText ContentRatingChfilmRating where

1008+ fromText = \case

1009+ "chfilm0" -> Just CRCRCHFILM0

1010+ "chfilm12" -> Just CRCRCHFILM12

1011+ "chfilm16" -> Just CRCRCHFILM16

1012+ "chfilm18" -> Just CRCRCHFILM18

1013+ "chfilm6" -> Just CRCRCHFILM6

1014+ "chfilmUnrated" -> Just CRCRChfilmUnrated

1015+ _ -> Nothing

1016+

1017+instance ToText ContentRatingChfilmRating where

1018+ toText = \case

1019+ CRCRCHFILM0 -> "chfilm0"

1020+ CRCRCHFILM12 -> "chfilm12"

1021+ CRCRCHFILM16 -> "chfilm16"

1022+ CRCRCHFILM18 -> "chfilm18"

1023+ CRCRCHFILM6 -> "chfilm6"

1024+ CRCRChfilmUnrated -> "chfilmUnrated"

1025+

515-- | The video\'s Canadian Home Video Rating System (CHVRS) rating.

1026-- | The video\'s Canadian Home Video Rating System (CHVRS) rating.

516data ContentRatingChvrsRating

1027data ContentRatingChvrsRating

517 = CRCRChvrs14a

1028 = CRCRChvrs14a

@@ -532,6 +1043,27 @@ data ContentRatingChvrsRating

532

1043

533instance Hashable ContentRatingChvrsRating

1044instance Hashable ContentRatingChvrsRating

534

1045

1046+instance FromText ContentRatingChvrsRating where

1047+ fromText = \case

1048+ "chvrs14a" -> Just CRCRChvrs14a

1049+ "chvrs18a" -> Just CRCRChvrs18a

1050+ "chvrsE" -> Just CRCRChvrsE

1051+ "chvrsG" -> Just CRCRChvrsG

1052+ "chvrsPg" -> Just CRCRChvrsPg

1053+ "chvrsR" -> Just CRCRChvrsR

1054+ "chvrsUnrated" -> Just CRCRChvrsUnrated

1055+ _ -> Nothing

1056+

1057+instance ToText ContentRatingChvrsRating where

1058+ toText = \case

1059+ CRCRChvrs14a -> "chvrs14a"

1060+ CRCRChvrs18a -> "chvrs18a"

1061+ CRCRChvrsE -> "chvrsE"

1062+ CRCRChvrsG -> "chvrsG"

1063+ CRCRChvrsPg -> "chvrsPg"

1064+ CRCRChvrsR -> "chvrsR"

1065+ CRCRChvrsUnrated -> "chvrsUnrated"

1066+

535-- | The video\'s rating from the Commission de Contrôle des Films (Belgium).

1067-- | The video\'s rating from the Commission de Contrôle des Films (Belgium).

536data ContentRatingCicfRating

1068data ContentRatingCicfRating

537 = CRCRCicfE

1069 = CRCRCicfE

@@ -546,6 +1078,21 @@ data ContentRatingCicfRating

546

1078

547instance Hashable ContentRatingCicfRating

1079instance Hashable ContentRatingCicfRating

548

1080

1081+instance FromText ContentRatingCicfRating where

1082+ fromText = \case

1083+ "cicfE" -> Just CRCRCicfE

1084+ "cicfKntEna" -> Just CRCRCicfKntEna

1085+ "cicfKtEa" -> Just CRCRCicfKtEa

1086+ "cicfUnrated" -> Just CRCRCicfUnrated

1087+ _ -> Nothing

1088+

1089+instance ToText ContentRatingCicfRating where

1090+ toText = \case

1091+ CRCRCicfE -> "cicfE"

1092+ CRCRCicfKntEna -> "cicfKntEna"

1093+ CRCRCicfKtEa -> "cicfKtEa"

1094+ CRCRCicfUnrated -> "cicfUnrated"

1095+

549-- | The video\'s rating from Romania\'s CONSILIUL NATIONAL AL

1096-- | The video\'s rating from Romania\'s CONSILIUL NATIONAL AL

550-- AUDIOVIZUALULUI (CNA).

1097-- AUDIOVIZUALULUI (CNA).

551data ContentRatingCnaRating

1098data ContentRatingCnaRating

@@ -565,6 +1112,25 @@ data ContentRatingCnaRating

565

1112

566instance Hashable ContentRatingCnaRating

1113instance Hashable ContentRatingCnaRating

567

1114

1115+instance FromText ContentRatingCnaRating where

1116+ fromText = \case

1117+ "cna12" -> Just CRCRCNA12

1118+ "cna15" -> Just CRCRCNA15

1119+ "cna18" -> Just CRCRCNA18

1120+ "cna18plus" -> Just CRCRCna18plus

1121+ "cnaAp" -> Just CRCRCnaAp

1122+ "cnaUnrated" -> Just CRCRCnaUnrated

1123+ _ -> Nothing

1124+

1125+instance ToText ContentRatingCnaRating where

1126+ toText = \case

1127+ CRCRCNA12 -> "cna12"

1128+ CRCRCNA15 -> "cna15"

1129+ CRCRCNA18 -> "cna18"

1130+ CRCRCna18plus -> "cna18plus"

1131+ CRCRCnaAp -> "cnaAp"

1132+ CRCRCnaUnrated -> "cnaUnrated"

1133+

568-- | Rating system in France - Commission de classification cinematographique

1134-- | Rating system in France - Commission de classification cinematographique

569data ContentRatingCncRating

1135data ContentRatingCncRating

570 = CRCRCNC10

1136 = CRCRCNC10

@@ -585,6 +1151,27 @@ data ContentRatingCncRating

585

1151

586instance Hashable ContentRatingCncRating

1152instance Hashable ContentRatingCncRating

587

1153

1154+instance FromText ContentRatingCncRating where

1155+ fromText = \case

1156+ "cnc10" -> Just CRCRCNC10

1157+ "cnc12" -> Just CRCRCNC12

1158+ "cnc16" -> Just CRCRCNC16

1159+ "cnc18" -> Just CRCRCNC18

1160+ "cncE" -> Just CRCRCncE

1161+ "cncT" -> Just CRCRCncT

1162+ "cncUnrated" -> Just CRCRCncUnrated

1163+ _ -> Nothing

1164+

1165+instance ToText ContentRatingCncRating where

1166+ toText = \case

1167+ CRCRCNC10 -> "cnc10"

1168+ CRCRCNC12 -> "cnc12"

1169+ CRCRCNC16 -> "cnc16"

1170+ CRCRCNC18 -> "cnc18"

1171+ CRCRCncE -> "cncE"

1172+ CRCRCncT -> "cncT"

1173+ CRCRCncUnrated -> "cncUnrated"

1174+

588-- | The video\'s rating from France\'s Conseil supérieur de l?audiovisuel,

1175-- | The video\'s rating from France\'s Conseil supérieur de l?audiovisuel,

589-- which rates broadcast content.

1176-- which rates broadcast content.

590data ContentRatingCsaRating

1177data ContentRatingCsaRating

@@ -606,6 +1193,27 @@ data ContentRatingCsaRating

606

1193

607instance Hashable ContentRatingCsaRating

1194instance Hashable ContentRatingCsaRating

608

1195

1196+instance FromText ContentRatingCsaRating where

1197+ fromText = \case

1198+ "csa10" -> Just CRCRCSA10

1199+ "csa12" -> Just CRCRCSA12

1200+ "csa16" -> Just CRCRCSA16

1201+ "csa18" -> Just CRCRCSA18

1202+ "csaInterdiction" -> Just CRCRCsaInterdiction

1203+ "csaT" -> Just CRCRCsaT

1204+ "csaUnrated" -> Just CRCRCsaUnrated

1205+ _ -> Nothing

1206+

1207+instance ToText ContentRatingCsaRating where

1208+ toText = \case

1209+ CRCRCSA10 -> "csa10"

1210+ CRCRCSA12 -> "csa12"

1211+ CRCRCSA16 -> "csa16"

1212+ CRCRCSA18 -> "csa18"

1213+ CRCRCsaInterdiction -> "csaInterdiction"

1214+ CRCRCsaT -> "csaT"

1215+ CRCRCsaUnrated -> "csaUnrated"

1216+

609-- | The video\'s rating from Luxembourg\'s Commission de surveillance de la

1217-- | The video\'s rating from Luxembourg\'s Commission de surveillance de la

610-- classification des films (CSCF).

1218-- classification des films (CSCF).

611data ContentRatingCscfRating

1219data ContentRatingCscfRating

@@ -629,6 +1237,29 @@ data ContentRatingCscfRating

629

1237

630instance Hashable ContentRatingCscfRating

1238instance Hashable ContentRatingCscfRating

631

1239

1240+instance FromText ContentRatingCscfRating where

1241+ fromText = \case

1242+ "cscf12" -> Just CRCRCSCF12

1243+ "cscf16" -> Just CRCRCSCF16

1244+ "cscf18" -> Just CRCRCSCF18

1245+ "cscf6" -> Just CRCRCSCF6

1246+ "cscf9" -> Just CRCRCSCF9

1247+ "cscfA" -> Just CRCRCscfA

1248+ "cscfAl" -> Just CRCRCscfAl

1249+ "cscfUnrated" -> Just CRCRCscfUnrated

1250+ _ -> Nothing

1251+

1252+instance ToText ContentRatingCscfRating where

1253+ toText = \case

1254+ CRCRCSCF12 -> "cscf12"

1255+ CRCRCSCF16 -> "cscf16"

1256+ CRCRCSCF18 -> "cscf18"

1257+ CRCRCSCF6 -> "cscf6"

1258+ CRCRCSCF9 -> "cscf9"

1259+ CRCRCscfA -> "cscfA"

1260+ CRCRCscfAl -> "cscfAl"

1261+ CRCRCscfUnrated -> "cscfUnrated"

1262+

632-- | The video\'s rating in the Czech Republic.

1263-- | The video\'s rating in the Czech Republic.

633data ContentRatingCzfilmRating

1264data ContentRatingCzfilmRating

634 = CRCRCZFILM12

1265 = CRCRCZFILM12

@@ -645,6 +1276,23 @@ data ContentRatingCzfilmRating

645

1276

646instance Hashable ContentRatingCzfilmRating

1277instance Hashable ContentRatingCzfilmRating

647

1278

1279+instance FromText ContentRatingCzfilmRating where

1280+ fromText = \case

1281+ "czfilm12" -> Just CRCRCZFILM12

1282+ "czfilm14" -> Just CRCRCZFILM14

1283+ "czfilm18" -> Just CRCRCZFILM18

1284+ "czfilmU" -> Just CRCRCzfilmU

1285+ "czfilmUnrated" -> Just CRCRCzfilmUnrated

1286+ _ -> Nothing

1287+

1288+instance ToText ContentRatingCzfilmRating where

1289+ toText = \case

1290+ CRCRCZFILM12 -> "czfilm12"

1291+ CRCRCZFILM14 -> "czfilm14"

1292+ CRCRCZFILM18 -> "czfilm18"

1293+ CRCRCzfilmU -> "czfilmU"

1294+ CRCRCzfilmUnrated -> "czfilmUnrated"

1295+

648-- | The video\'s Departamento de Justiça, Classificação, Qualificação e

1296-- | The video\'s Departamento de Justiça, Classificação, Qualificação e

649-- Títulos (DJCQT - Brazil) rating.

1297-- Títulos (DJCQT - Brazil) rating.

650data ContentRatingDjctqRating

1298data ContentRatingDjctqRating

@@ -666,6 +1314,27 @@ data ContentRatingDjctqRating

666

1314

667instance Hashable ContentRatingDjctqRating

1315instance Hashable ContentRatingDjctqRating

668

1316

1317+instance FromText ContentRatingDjctqRating where

1318+ fromText = \case

1319+ "djctq10" -> Just CRDRDJCTQ10

1320+ "djctq12" -> Just CRDRDJCTQ12

1321+ "djctq14" -> Just CRDRDJCTQ14

1322+ "djctq16" -> Just CRDRDJCTQ16

1323+ "djctq18" -> Just CRDRDJCTQ18

1324+ "djctqL" -> Just CRDRDjctqL

1325+ "djctqUnrated" -> Just CRDRDjctqUnrated

1326+ _ -> Nothing

1327+

1328+instance ToText ContentRatingDjctqRating where

1329+ toText = \case

1330+ CRDRDJCTQ10 -> "djctq10"

1331+ CRDRDJCTQ12 -> "djctq12"

1332+ CRDRDJCTQ14 -> "djctq14"

1333+ CRDRDJCTQ16 -> "djctq16"

1334+ CRDRDJCTQ18 -> "djctq18"

1335+ CRDRDjctqL -> "djctqL"

1336+ CRDRDjctqUnrated -> "djctqUnrated"

1337+

669-- | The video\'s rating in Estonia.

1338-- | The video\'s rating in Estonia.

670data ContentRatingEefilmRating

1339data ContentRatingEefilmRating

671 = CREREEFILMK12

1340 = CREREEFILMK12

@@ -690,6 +1359,31 @@ data ContentRatingEefilmRating

690

1359

691instance Hashable ContentRatingEefilmRating

1360instance Hashable ContentRatingEefilmRating

692

1361

1362+instance FromText ContentRatingEefilmRating where

1363+ fromText = \case

1364+ "eefilmK12" -> Just CREREEFILMK12

1365+ "eefilmK14" -> Just CREREEFILMK14

1366+ "eefilmK16" -> Just CREREEFILMK16

1367+ "eefilmK6" -> Just CREREEFILMK6

1368+ "eefilmL" -> Just CREREefilmL

1369+ "eefilmMs12" -> Just CREREEFILMMS12

1370+ "eefilmMs6" -> Just CREREEFILMMS6

1371+ "eefilmPere" -> Just CREREefilmPere

1372+ "eefilmUnrated" -> Just CREREefilmUnrated

1373+ _ -> Nothing

1374+

1375+instance ToText ContentRatingEefilmRating where

1376+ toText = \case

1377+ CREREEFILMK12 -> "eefilmK12"

1378+ CREREEFILMK14 -> "eefilmK14"

1379+ CREREEFILMK16 -> "eefilmK16"

1380+ CREREEFILMK6 -> "eefilmK6"

1381+ CREREefilmL -> "eefilmL"

1382+ CREREEFILMMS12 -> "eefilmMs12"

1383+ CREREEFILMMS6 -> "eefilmMs6"

1384+ CREREefilmPere -> "eefilmPere"

1385+ CREREefilmUnrated -> "eefilmUnrated"

1386+

693-- | The video\'s rating in Egypt.

1387-- | The video\'s rating in Egypt.

694data ContentRatingEgfilmRating

1388data ContentRatingEgfilmRating

695 = CREREGFILM18

1389 = CREREGFILM18

@@ -704,6 +1398,21 @@ data ContentRatingEgfilmRating

704

1398

705instance Hashable ContentRatingEgfilmRating

1399instance Hashable ContentRatingEgfilmRating

706

1400

1401+instance FromText ContentRatingEgfilmRating where

1402+ fromText = \case

1403+ "egfilm18" -> Just CREREGFILM18

1404+ "egfilmBn" -> Just CREREgfilmBn

1405+ "egfilmGn" -> Just CREREgfilmGn

1406+ "egfilmUnrated" -> Just CREREgfilmUnrated

1407+ _ -> Nothing

1408+

1409+instance ToText ContentRatingEgfilmRating where

1410+ toText = \case

1411+ CREREGFILM18 -> "egfilm18"

1412+ CREREgfilmBn -> "egfilmBn"

1413+ CREREgfilmGn -> "egfilmGn"

1414+ CREREgfilmUnrated -> "egfilmUnrated"

1415+

707-- | The video\'s Eirin (映倫) rating. Eirin is the Japanese rating system.

1416-- | The video\'s Eirin (映倫) rating. Eirin is the Japanese rating system.

708data ContentRatingEirinRating

1417data ContentRatingEirinRating

709 = CREREirinG

1418 = CREREirinG

@@ -720,6 +1429,23 @@ data ContentRatingEirinRating

720

1429

721instance Hashable ContentRatingEirinRating

1430instance Hashable ContentRatingEirinRating

722

1431

1432+instance FromText ContentRatingEirinRating where

1433+ fromText = \case

1434+ "eirinG" -> Just CREREirinG

1435+ "eirinPg12" -> Just CREREIRINPG12

1436+ "eirinR15plus" -> Just CREREirinR15plus

1437+ "eirinR18plus" -> Just CREREirinR18plus

1438+ "eirinUnrated" -> Just CREREirinUnrated

1439+ _ -> Nothing

1440+

1441+instance ToText ContentRatingEirinRating where

1442+ toText = \case

1443+ CREREirinG -> "eirinG"

1444+ CREREIRINPG12 -> "eirinPg12"

1445+ CREREirinR15plus -> "eirinR15plus"

1446+ CREREirinR18plus -> "eirinR18plus"

1447+ CREREirinUnrated -> "eirinUnrated"

1448+

723-- | The video\'s rating from Malaysia\'s Film Censorship Board.

1449-- | The video\'s rating from Malaysia\'s Film Censorship Board.

724data ContentRatingFcbmRating

1450data ContentRatingFcbmRating

725 = CRFRFCBM18

1451 = CRFRFCBM18

@@ -744,6 +1470,31 @@ data ContentRatingFcbmRating

744

1470

745instance Hashable ContentRatingFcbmRating

1471instance Hashable ContentRatingFcbmRating

746

1472

1473+instance FromText ContentRatingFcbmRating where

1474+ fromText = \case

1475+ "fcbm18" -> Just CRFRFCBM18

1476+ "fcbm18pa" -> Just CRFRFcbm18pa

1477+ "fcbm18pl" -> Just CRFRFcbm18pl

1478+ "fcbm18sg" -> Just CRFRFcbm18sg

1479+ "fcbm18sx" -> Just CRFRFcbm18sx

1480+ "fcbmP13" -> Just CRFRFCBMP13

1481+ "fcbmPg13" -> Just CRFRFCBMPG13

1482+ "fcbmU" -> Just CRFRFcbmU

1483+ "fcbmUnrated" -> Just CRFRFcbmUnrated

1484+ _ -> Nothing

1485+

1486+instance ToText ContentRatingFcbmRating where

1487+ toText = \case

1488+ CRFRFCBM18 -> "fcbm18"

1489+ CRFRFcbm18pa -> "fcbm18pa"

1490+ CRFRFcbm18pl -> "fcbm18pl"

1491+ CRFRFcbm18sg -> "fcbm18sg"

1492+ CRFRFcbm18sx -> "fcbm18sx"

1493+ CRFRFCBMP13 -> "fcbmP13"

1494+ CRFRFCBMPG13 -> "fcbmPg13"

1495+ CRFRFcbmU -> "fcbmU"

1496+ CRFRFcbmUnrated -> "fcbmUnrated"

1497+

747-- | The video\'s rating from Hong Kong\'s Office for Film, Newspaper and

1498-- | The video\'s rating from Hong Kong\'s Office for Film, Newspaper and

748-- Article Administration.

1499-- Article Administration.

749data ContentRatingFcoRating

1500data ContentRatingFcoRating

@@ -763,6 +1514,25 @@ data ContentRatingFcoRating

763

1514

764instance Hashable ContentRatingFcoRating

1515instance Hashable ContentRatingFcoRating

765

1516

1517+instance FromText ContentRatingFcoRating where

1518+ fromText = \case

1519+ "fcoI" -> Just CRFRFcoI

1520+ "fcoIi" -> Just CRFRFcoIi

1521+ "fcoIia" -> Just CRFRFcoIia

1522+ "fcoIib" -> Just CRFRFcoIib

1523+ "fcoIii" -> Just CRFRFcoIii

1524+ "fcoUnrated" -> Just CRFRFcoUnrated

1525+ _ -> Nothing

1526+

1527+instance ToText ContentRatingFcoRating where

1528+ toText = \case

1529+ CRFRFcoI -> "fcoI"

1530+ CRFRFcoIi -> "fcoIi"

1531+ CRFRFcoIia -> "fcoIia"

1532+ CRFRFcoIib -> "fcoIib"

1533+ CRFRFcoIii -> "fcoIii"

1534+ CRFRFcoUnrated -> "fcoUnrated"

1535+

766-- | This property has been deprecated. Use the

1536-- | This property has been deprecated. Use the

767-- contentDetails.contentRating.cncRating instead.

1537-- contentDetails.contentRating.cncRating instead.

768data ContentRatingFmocRating

1538data ContentRatingFmocRating

@@ -784,6 +1554,27 @@ data ContentRatingFmocRating

784

1554

785instance Hashable ContentRatingFmocRating

1555instance Hashable ContentRatingFmocRating

786

1556

1557+instance FromText ContentRatingFmocRating where

1558+ fromText = \case

1559+ "fmoc10" -> Just CRFRFMOC10

1560+ "fmoc12" -> Just CRFRFMOC12

1561+ "fmoc16" -> Just CRFRFMOC16

1562+ "fmoc18" -> Just CRFRFMOC18

1563+ "fmocE" -> Just CRFRFmocE

1564+ "fmocU" -> Just CRFRFmocU

1565+ "fmocUnrated" -> Just CRFRFmocUnrated

1566+ _ -> Nothing

1567+

1568+instance ToText ContentRatingFmocRating where

1569+ toText = \case

1570+ CRFRFMOC10 -> "fmoc10"

1571+ CRFRFMOC12 -> "fmoc12"

1572+ CRFRFMOC16 -> "fmoc16"

1573+ CRFRFMOC18 -> "fmoc18"

1574+ CRFRFmocE -> "fmocE"

1575+ CRFRFmocU -> "fmocU"

1576+ CRFRFmocUnrated -> "fmocUnrated"

1577+

787-- | The video\'s rating from South Africa\'s Film and Publication Board.

1578-- | The video\'s rating from South Africa\'s Film and Publication Board.

788data ContentRatingFpbRating

1579data ContentRatingFpbRating

789 = CRFRFpb1012Pg

1580 = CRFRFpb1012Pg

@@ -810,6 +1601,33 @@ data ContentRatingFpbRating

810

1601

811instance Hashable ContentRatingFpbRating

1602instance Hashable ContentRatingFpbRating

812

1603

1604+instance FromText ContentRatingFpbRating where

1605+ fromText = \case

1606+ "fpb1012Pg" -> Just CRFRFpb1012Pg

1607+ "fpb13" -> Just CRFRFPB13

1608+ "fpb16" -> Just CRFRFPB16

1609+ "fpb18" -> Just CRFRFPB18

1610+ "fpb79Pg" -> Just CRFRFpb79Pg

1611+ "fpbA" -> Just CRFRFpbA

1612+ "fpbPg" -> Just CRFRFpbPg

1613+ "fpbUnrated" -> Just CRFRFpbUnrated

1614+ "fpbX18" -> Just CRFRFPBX18

1615+ "fpbXx" -> Just CRFRFpbXx

1616+ _ -> Nothing

1617+

1618+instance ToText ContentRatingFpbRating where

1619+ toText = \case

1620+ CRFRFpb1012Pg -> "fpb1012Pg"

1621+ CRFRFPB13 -> "fpb13"

1622+ CRFRFPB16 -> "fpb16"

1623+ CRFRFPB18 -> "fpb18"

1624+ CRFRFpb79Pg -> "fpb79Pg"

1625+ CRFRFpbA -> "fpbA"

1626+ CRFRFpbPg -> "fpbPg"

1627+ CRFRFpbUnrated -> "fpbUnrated"

1628+ CRFRFPBX18 -> "fpbX18"

1629+ CRFRFpbXx -> "fpbXx"

1630+

813-- | The video\'s Freiwillige Selbstkontrolle der Filmwirtschaft (FSK -

1631-- | The video\'s Freiwillige Selbstkontrolle der Filmwirtschaft (FSK -

814-- Germany) rating.

1632-- Germany) rating.

815data ContentRatingFskRating

1633data ContentRatingFskRating

@@ -829,6 +1647,25 @@ data ContentRatingFskRating

829

1647

830instance Hashable ContentRatingFskRating

1648instance Hashable ContentRatingFskRating

831

1649

1650+instance FromText ContentRatingFskRating where

1651+ fromText = \case

1652+ "fsk0" -> Just CRFRFSK0

1653+ "fsk12" -> Just CRFRFSK12

1654+ "fsk16" -> Just CRFRFSK16

1655+ "fsk18" -> Just CRFRFSK18

1656+ "fsk6" -> Just CRFRFSK6

1657+ "fskUnrated" -> Just CRFRFskUnrated

1658+ _ -> Nothing

1659+

1660+instance ToText ContentRatingFskRating where

1661+ toText = \case

1662+ CRFRFSK0 -> "fsk0"

1663+ CRFRFSK12 -> "fsk12"

1664+ CRFRFSK16 -> "fsk16"

1665+ CRFRFSK18 -> "fsk18"

1666+ CRFRFSK6 -> "fsk6"

1667+ CRFRFskUnrated -> "fskUnrated"

1668+

832-- | The video\'s rating in Greece.

1669-- | The video\'s rating in Greece.

833data ContentRatingGrfilmRating

1670data ContentRatingGrfilmRating

834 = CRGRGrfilmE

1671 = CRGRGrfilmE

@@ -845,6 +1682,23 @@ data ContentRatingGrfilmRating

845

1682

846instance Hashable ContentRatingGrfilmRating

1683instance Hashable ContentRatingGrfilmRating

847

1684

1685+instance FromText ContentRatingGrfilmRating where

1686+ fromText = \case

1687+ "grfilmE" -> Just CRGRGrfilmE

1688+ "grfilmK" -> Just CRGRGrfilmK

1689+ "grfilmK13" -> Just CRGRGRFILMK13

1690+ "grfilmK17" -> Just CRGRGRFILMK17

1691+ "grfilmUnrated" -> Just CRGRGrfilmUnrated

1692+ _ -> Nothing

1693+

1694+instance ToText ContentRatingGrfilmRating where

1695+ toText = \case

1696+ CRGRGrfilmE -> "grfilmE"

1697+ CRGRGrfilmK -> "grfilmK"

1698+ CRGRGRFILMK13 -> "grfilmK13"

1699+ CRGRGRFILMK17 -> "grfilmK17"

1700+ CRGRGrfilmUnrated -> "grfilmUnrated"

1701+

848-- | The video\'s Instituto de la Cinematografía y de las Artes Audiovisuales

1702-- | The video\'s Instituto de la Cinematografía y de las Artes Audiovisuales

849-- (ICAA - Spain) rating.

1703-- (ICAA - Spain) rating.

850data ContentRatingIcaaRating

1704data ContentRatingIcaaRating

@@ -868,6 +1722,29 @@ data ContentRatingIcaaRating

868

1722

869instance Hashable ContentRatingIcaaRating

1723instance Hashable ContentRatingIcaaRating

870

1724

1725+instance FromText ContentRatingIcaaRating where

1726+ fromText = \case

1727+ "icaa12" -> Just CRIRICAA12

1728+ "icaa13" -> Just CRIRICAA13

1729+ "icaa16" -> Just CRIRICAA16

1730+ "icaa18" -> Just CRIRICAA18

1731+ "icaa7" -> Just CRIRICAA7

1732+ "icaaApta" -> Just CRIRIcaaApta

1733+ "icaaUnrated" -> Just CRIRIcaaUnrated

1734+ "icaaX" -> Just CRIRIcaaX

1735+ _ -> Nothing

1736+

1737+instance ToText ContentRatingIcaaRating where

1738+ toText = \case

1739+ CRIRICAA12 -> "icaa12"

1740+ CRIRICAA13 -> "icaa13"

1741+ CRIRICAA16 -> "icaa16"

1742+ CRIRICAA18 -> "icaa18"

1743+ CRIRICAA7 -> "icaa7"

1744+ CRIRIcaaApta -> "icaaApta"

1745+ CRIRIcaaUnrated -> "icaaUnrated"

1746+ CRIRIcaaX -> "icaaX"

1747+

871-- | The video\'s Irish Film Classification Office (IFCO - Ireland) rating.

1748-- | The video\'s Irish Film Classification Office (IFCO - Ireland) rating.

872-- See the IFCO website for more information.

1749-- See the IFCO website for more information.

873data ContentRatingIfcoRating

1750data ContentRatingIfcoRating

@@ -893,6 +1770,31 @@ data ContentRatingIfcoRating

893

1770

894instance Hashable ContentRatingIfcoRating

1771instance Hashable ContentRatingIfcoRating

895

1772

1773+instance FromText ContentRatingIfcoRating where

1774+ fromText = \case

1775+ "ifco12" -> Just CRIRIFCO12

1776+ "ifco12a" -> Just CRIRIfco12a

1777+ "ifco15" -> Just CRIRIFCO15

1778+ "ifco15a" -> Just CRIRIfco15a

1779+ "ifco16" -> Just CRIRIFCO16

1780+ "ifco18" -> Just CRIRIFCO18

1781+ "ifcoG" -> Just CRIRIfcoG

1782+ "ifcoPg" -> Just CRIRIfcoPg

1783+ "ifcoUnrated" -> Just CRIRIfcoUnrated

1784+ _ -> Nothing

1785+

1786+instance ToText ContentRatingIfcoRating where

1787+ toText = \case

1788+ CRIRIFCO12 -> "ifco12"

1789+ CRIRIfco12a -> "ifco12a"

1790+ CRIRIFCO15 -> "ifco15"

1791+ CRIRIfco15a -> "ifco15a"

1792+ CRIRIFCO16 -> "ifco16"

1793+ CRIRIFCO18 -> "ifco18"

1794+ CRIRIfcoG -> "ifcoG"

1795+ CRIRIfcoPg -> "ifcoPg"

1796+ CRIRIfcoUnrated -> "ifcoUnrated"

1797+

896-- | The video\'s rating in Israel.

1798-- | The video\'s rating in Israel.

897data ContentRatingIlfilmRating

1799data ContentRatingIlfilmRating

898 = CRIRILFILM12

1800 = CRIRILFILM12

@@ -909,6 +1811,23 @@ data ContentRatingIlfilmRating

909

1811

910instance Hashable ContentRatingIlfilmRating

1812instance Hashable ContentRatingIlfilmRating

911

1813

1814+instance FromText ContentRatingIlfilmRating where

1815+ fromText = \case

1816+ "ilfilm12" -> Just CRIRILFILM12

1817+ "ilfilm16" -> Just CRIRILFILM16

1818+ "ilfilm18" -> Just CRIRILFILM18

1819+ "ilfilmAa" -> Just CRIRIlfilmAa

1820+ "ilfilmUnrated" -> Just CRIRIlfilmUnrated

1821+ _ -> Nothing

1822+

1823+instance ToText ContentRatingIlfilmRating where

1824+ toText = \case

1825+ CRIRILFILM12 -> "ilfilm12"

1826+ CRIRILFILM16 -> "ilfilm16"

1827+ CRIRILFILM18 -> "ilfilm18"

1828+ CRIRIlfilmAa -> "ilfilmAa"

1829+ CRIRIlfilmUnrated -> "ilfilmUnrated"

1830+

912-- | The video\'s INCAA (Instituto Nacional de Cine y Artes Audiovisuales -

1831-- | The video\'s INCAA (Instituto Nacional de Cine y Artes Audiovisuales -

913-- Argentina) rating.

1832-- Argentina) rating.

914data ContentRatingIncaaRating

1833data ContentRatingIncaaRating

@@ -928,6 +1847,25 @@ data ContentRatingIncaaRating

928

1847

929instance Hashable ContentRatingIncaaRating

1848instance Hashable ContentRatingIncaaRating

930

1849

1850+instance FromText ContentRatingIncaaRating where

1851+ fromText = \case

1852+ "incaaAtp" -> Just CRIRIncaaAtp

1853+ "incaaC" -> Just CRIRIncaaC

1854+ "incaaSam13" -> Just CRIRINCAASAM13

1855+ "incaaSam16" -> Just CRIRINCAASAM16

1856+ "incaaSam18" -> Just CRIRINCAASAM18

1857+ "incaaUnrated" -> Just CRIRIncaaUnrated

1858+ _ -> Nothing

1859+

1860+instance ToText ContentRatingIncaaRating where

1861+ toText = \case

1862+ CRIRIncaaAtp -> "incaaAtp"

1863+ CRIRIncaaC -> "incaaC"

1864+ CRIRINCAASAM13 -> "incaaSam13"

1865+ CRIRINCAASAM16 -> "incaaSam16"

1866+ CRIRINCAASAM18 -> "incaaSam18"

1867+ CRIRIncaaUnrated -> "incaaUnrated"

1868+

931data ContentRatingItemDjctqRatingReasons

1869data ContentRatingItemDjctqRatingReasons

932 = CRIDRRDjctqCriminalActs

1870 = CRIDRRDjctqCriminalActs

933 -- ^ @djctqCriminalActs@

1871 -- ^ @djctqCriminalActs@

@@ -957,6 +1895,37 @@ data ContentRatingItemDjctqRatingReasons

957

1895

958instance Hashable ContentRatingItemDjctqRatingReasons

1896instance Hashable ContentRatingItemDjctqRatingReasons

959

1897

1898+instance FromText ContentRatingItemDjctqRatingReasons where

1899+ fromText = \case

1900+ "djctqCriminalActs" -> Just CRIDRRDjctqCriminalActs

1901+ "djctqDrugs" -> Just CRIDRRDjctqDrugs

1902+ "djctqExplicitSex" -> Just CRIDRRDjctqExplicitSex

1903+ "djctqExtremeViolence" -> Just CRIDRRDjctqExtremeViolence

1904+ "djctqIllegalDrugs" -> Just CRIDRRDjctqIllegalDrugs

1905+ "djctqImpactingContent" -> Just CRIDRRDjctqImpactingContent

1906+ "djctqInappropriateLanguage" -> Just CRIDRRDjctqInappropriateLanguage

1907+ "djctqLegalDrugs" -> Just CRIDRRDjctqLegalDrugs

1908+ "djctqNudity" -> Just CRIDRRDjctqNudity

1909+ "djctqSex" -> Just CRIDRRDjctqSex

1910+ "djctqSexualContent" -> Just CRIDRRDjctqSexualContent

1911+ "djctqViolence" -> Just CRIDRRDjctqViolence

1912+ _ -> Nothing

1913+

1914+instance ToText ContentRatingItemDjctqRatingReasons where

1915+ toText = \case

1916+ CRIDRRDjctqCriminalActs -> "djctqCriminalActs"

1917+ CRIDRRDjctqDrugs -> "djctqDrugs"

1918+ CRIDRRDjctqExplicitSex -> "djctqExplicitSex"

1919+ CRIDRRDjctqExtremeViolence -> "djctqExtremeViolence"

1920+ CRIDRRDjctqIllegalDrugs -> "djctqIllegalDrugs"

1921+ CRIDRRDjctqImpactingContent -> "djctqImpactingContent"

1922+ CRIDRRDjctqInappropriateLanguage -> "djctqInappropriateLanguage"

1923+ CRIDRRDjctqLegalDrugs -> "djctqLegalDrugs"

1924+ CRIDRRDjctqNudity -> "djctqNudity"

1925+ CRIDRRDjctqSex -> "djctqSex"

1926+ CRIDRRDjctqSexualContent -> "djctqSexualContent"

1927+ CRIDRRDjctqViolence -> "djctqViolence"

1928+

960-- | The video\'s rating from the Kenya Film Classification Board.

1929-- | The video\'s rating from the Kenya Film Classification Board.

961data ContentRatingKfcbRating

1930data ContentRatingKfcbRating

962 = CRKRKfcb16plus

1931 = CRKRKfcb16plus

@@ -973,6 +1942,23 @@ data ContentRatingKfcbRating

973

1942

974instance Hashable ContentRatingKfcbRating

1943instance Hashable ContentRatingKfcbRating

975

1944

1945+instance FromText ContentRatingKfcbRating where

1946+ fromText = \case

1947+ "kfcb16plus" -> Just CRKRKfcb16plus

1948+ "kfcbG" -> Just CRKRKfcbG

1949+ "kfcbPg" -> Just CRKRKfcbPg

1950+ "kfcbR" -> Just CRKRKfcbR

1951+ "kfcbUnrated" -> Just CRKRKfcbUnrated

1952+ _ -> Nothing

1953+

1954+instance ToText ContentRatingKfcbRating where

1955+ toText = \case

1956+ CRKRKfcb16plus -> "kfcb16plus"

1957+ CRKRKfcbG -> "kfcbG"

1958+ CRKRKfcbPg -> "kfcbPg"

1959+ CRKRKfcbR -> "kfcbR"

1960+ CRKRKfcbUnrated -> "kfcbUnrated"

1961+

976-- | voor de Classificatie van Audiovisuele Media (Netherlands).

1962-- | voor de Classificatie van Audiovisuele Media (Netherlands).

977data ContentRatingKijkwijzerRating

1963data ContentRatingKijkwijzerRating

978 = CRKRKIJKWIJZER12

1964 = CRKRKIJKWIJZER12

@@ -993,6 +1979,27 @@ data ContentRatingKijkwijzerRating

993

1979

994instance Hashable ContentRatingKijkwijzerRating

1980instance Hashable ContentRatingKijkwijzerRating

995

1981

1982+instance FromText ContentRatingKijkwijzerRating where

1983+ fromText = \case

1984+ "kijkwijzer12" -> Just CRKRKIJKWIJZER12

1985+ "kijkwijzer16" -> Just CRKRKIJKWIJZER16

1986+ "kijkwijzer18" -> Just CRKRKIJKWIJZER18

1987+ "kijkwijzer6" -> Just CRKRKIJKWIJZER6

1988+ "kijkwijzer9" -> Just CRKRKIJKWIJZER9

1989+ "kijkwijzerAl" -> Just CRKRKijkwijzerAl

1990+ "kijkwijzerUnrated" -> Just CRKRKijkwijzerUnrated

1991+ _ -> Nothing

1992+

1993+instance ToText ContentRatingKijkwijzerRating where

1994+ toText = \case

1995+ CRKRKIJKWIJZER12 -> "kijkwijzer12"

1996+ CRKRKIJKWIJZER16 -> "kijkwijzer16"

1997+ CRKRKIJKWIJZER18 -> "kijkwijzer18"

1998+ CRKRKIJKWIJZER6 -> "kijkwijzer6"

1999+ CRKRKIJKWIJZER9 -> "kijkwijzer9"

2000+ CRKRKijkwijzerAl -> "kijkwijzerAl"

2001+ CRKRKijkwijzerUnrated -> "kijkwijzerUnrated"

2002+

996-- | The video\'s Korea Media Rating Board (영상물등급위원회) rating. The

2003-- | The video\'s Korea Media Rating Board (영상물등급위원회) rating. The

997-- KMRB rates videos in South Korea.

2004-- KMRB rates videos in South Korea.

998data ContentRatingKmrbRating

2005data ContentRatingKmrbRating

@@ -1012,6 +2019,25 @@ data ContentRatingKmrbRating

1012

2019

1013instance Hashable ContentRatingKmrbRating

2020instance Hashable ContentRatingKmrbRating

1014

2021

2022+instance FromText ContentRatingKmrbRating where

2023+ fromText = \case

2024+ "kmrb12plus" -> Just CRKRKmrb12plus

2025+ "kmrb15plus" -> Just CRKRKmrb15plus

2026+ "kmrbAll" -> Just CRKRKmrbAll

2027+ "kmrbR" -> Just CRKRKmrbR

2028+ "kmrbTeenr" -> Just CRKRKmrbTeenr

2029+ "kmrbUnrated" -> Just CRKRKmrbUnrated

2030+ _ -> Nothing

2031+

2032+instance ToText ContentRatingKmrbRating where

2033+ toText = \case

2034+ CRKRKmrb12plus -> "kmrb12plus"

2035+ CRKRKmrb15plus -> "kmrb15plus"

2036+ CRKRKmrbAll -> "kmrbAll"

2037+ CRKRKmrbR -> "kmrbR"

2038+ CRKRKmrbTeenr -> "kmrbTeenr"

2039+ CRKRKmrbUnrated -> "kmrbUnrated"

2040+

1015-- | The video\'s rating from Indonesia\'s Lembaga Sensor Film.

2041-- | The video\'s rating from Indonesia\'s Lembaga Sensor Film.

1016data ContentRatingLsfRating

2042data ContentRatingLsfRating

1017 = CRLRLSF13

2043 = CRLRLSF13

@@ -1036,6 +2062,31 @@ data ContentRatingLsfRating

1036

2062

1037instance Hashable ContentRatingLsfRating

2063instance Hashable ContentRatingLsfRating

1038

2064

2065+instance FromText ContentRatingLsfRating where

2066+ fromText = \case

2067+ "lsf13" -> Just CRLRLSF13

2068+ "lsf17" -> Just CRLRLSF17

2069+ "lsf21" -> Just CRLRLSF21

2070+ "lsfA" -> Just CRLRLsfA

2071+ "lsfBo" -> Just CRLRLsfBo

2072+ "lsfD" -> Just CRLRLsfD

2073+ "lsfR" -> Just CRLRLsfR

2074+ "lsfSu" -> Just CRLRLsfSu

2075+ "lsfUnrated" -> Just CRLRLsfUnrated

2076+ _ -> Nothing

2077+

2078+instance ToText ContentRatingLsfRating where

2079+ toText = \case

2080+ CRLRLSF13 -> "lsf13"

2081+ CRLRLSF17 -> "lsf17"

2082+ CRLRLSF21 -> "lsf21"

2083+ CRLRLsfA -> "lsfA"

2084+ CRLRLsfBo -> "lsfBo"

2085+ CRLRLsfD -> "lsfD"

2086+ CRLRLsfR -> "lsfR"

2087+ CRLRLsfSu -> "lsfSu"

2088+ CRLRLsfUnrated -> "lsfUnrated"

2089+

1039-- | The video\'s rating from Malta\'s Film Age-Classification Board.

2090-- | The video\'s rating from Malta\'s Film Age-Classification Board.

1040data ContentRatingMccaaRating

2091data ContentRatingMccaaRating

1041 = CRMRMCCAA12

2092 = CRMRMCCAA12

@@ -1060,6 +2111,31 @@ data ContentRatingMccaaRating

1060

2111

1061instance Hashable ContentRatingMccaaRating

2112instance Hashable ContentRatingMccaaRating

1062

2113

2114+instance FromText ContentRatingMccaaRating where

2115+ fromText = \case

2116+ "mccaa12" -> Just CRMRMCCAA12

2117+ "mccaa12a" -> Just CRMRMccaa12a

2118+ "mccaa14" -> Just CRMRMCCAA14

2119+ "mccaa15" -> Just CRMRMCCAA15

2120+ "mccaa16" -> Just CRMRMCCAA16

2121+ "mccaa18" -> Just CRMRMCCAA18

2122+ "mccaaPg" -> Just CRMRMccaaPg

2123+ "mccaaU" -> Just CRMRMccaaU

2124+ "mccaaUnrated" -> Just CRMRMccaaUnrated

2125+ _ -> Nothing

2126+

2127+instance ToText ContentRatingMccaaRating where

2128+ toText = \case

2129+ CRMRMCCAA12 -> "mccaa12"

2130+ CRMRMccaa12a -> "mccaa12a"

2131+ CRMRMCCAA14 -> "mccaa14"

2132+ CRMRMCCAA15 -> "mccaa15"

2133+ CRMRMCCAA16 -> "mccaa16"

2134+ CRMRMCCAA18 -> "mccaa18"

2135+ CRMRMccaaPg -> "mccaaPg"

2136+ CRMRMccaaU -> "mccaaU"

2137+ CRMRMccaaUnrated -> "mccaaUnrated"

2138+

1063-- | The video\'s rating from the Danish Film Institute\'s (Det Danske

2139-- | The video\'s rating from the Danish Film Institute\'s (Det Danske

1064-- Filminstitut) Media Council for Children and Young People.

2140-- Filminstitut) Media Council for Children and Young People.

1065data ContentRatingMccypRating

2141data ContentRatingMccypRating

@@ -1077,6 +2153,23 @@ data ContentRatingMccypRating

1077

2153

1078instance Hashable ContentRatingMccypRating

2154instance Hashable ContentRatingMccypRating

1079

2155

2156+instance FromText ContentRatingMccypRating where

2157+ fromText = \case

2158+ "mccyp11" -> Just CRMRMCCYP11

2159+ "mccyp15" -> Just CRMRMCCYP15

2160+ "mccyp7" -> Just CRMRMCCYP7

2161+ "mccypA" -> Just CRMRMccypA

2162+ "mccypUnrated" -> Just CRMRMccypUnrated

2163+ _ -> Nothing

2164+

2165+instance ToText ContentRatingMccypRating where

2166+ toText = \case

2167+ CRMRMCCYP11 -> "mccyp11"

2168+ CRMRMCCYP15 -> "mccyp15"

2169+ CRMRMCCYP7 -> "mccyp7"

2170+ CRMRMccypA -> "mccypA"

2171+ CRMRMccypUnrated -> "mccypUnrated"

2172+

1080-- | The video\'s rating from Singapore\'s Media Development Authority (MDA)

2173-- | The video\'s rating from Singapore\'s Media Development Authority (MDA)

1081-- and, specifically, it\'s Board of Film Censors (BFC).

2174-- and, specifically, it\'s Board of Film Censors (BFC).

1082data ContentRatingMdaRating

2175data ContentRatingMdaRating

@@ -1098,6 +2191,27 @@ data ContentRatingMdaRating

1098

2191

1099instance Hashable ContentRatingMdaRating

2192instance Hashable ContentRatingMdaRating

1100

2193

2194+instance FromText ContentRatingMdaRating where

2195+ fromText = \case

2196+ "mdaG" -> Just CRMRMdaG

2197+ "mdaM18" -> Just CRMRMDAM18

2198+ "mdaNc16" -> Just CRMRMDANC16

2199+ "mdaPg" -> Just CRMRMdaPg

2200+ "mdaPg13" -> Just CRMRMDAPG13

2201+ "mdaR21" -> Just CRMRMDAR21

2202+ "mdaUnrated" -> Just CRMRMdaUnrated

2203+ _ -> Nothing

2204+

2205+instance ToText ContentRatingMdaRating where

2206+ toText = \case

2207+ CRMRMdaG -> "mdaG"

2208+ CRMRMDAM18 -> "mdaM18"

2209+ CRMRMDANC16 -> "mdaNc16"

2210+ CRMRMdaPg -> "mdaPg"

2211+ CRMRMDAPG13 -> "mdaPg13"

2212+ CRMRMDAR21 -> "mdaR21"

2213+ CRMRMdaUnrated -> "mdaUnrated"

2214+

1101-- | The video\'s rating from Medietilsynet, the Norwegian Media Authority.

2215-- | The video\'s rating from Medietilsynet, the Norwegian Media Authority.

1102data ContentRatingMedietilsynetRating

2216data ContentRatingMedietilsynetRating

1103 = CRMRMEDIETILSYNET11

2217 = CRMRMEDIETILSYNET11

@@ -1122,6 +2236,31 @@ data ContentRatingMedietilsynetRating

1122

2236

1123instance Hashable ContentRatingMedietilsynetRating

2237instance Hashable ContentRatingMedietilsynetRating

1124

2238

2239+instance FromText ContentRatingMedietilsynetRating where

2240+ fromText = \case

2241+ "medietilsynet11" -> Just CRMRMEDIETILSYNET11

2242+ "medietilsynet12" -> Just CRMRMEDIETILSYNET12

2243+ "medietilsynet15" -> Just CRMRMEDIETILSYNET15

2244+ "medietilsynet18" -> Just CRMRMEDIETILSYNET18

2245+ "medietilsynet6" -> Just CRMRMEDIETILSYNET6

2246+ "medietilsynet7" -> Just CRMRMEDIETILSYNET7

2247+ "medietilsynet9" -> Just CRMRMEDIETILSYNET9

2248+ "medietilsynetA" -> Just CRMRMedietilsynetA

2249+ "medietilsynetUnrated" -> Just CRMRMedietilsynetUnrated

2250+ _ -> Nothing

2251+

2252+instance ToText ContentRatingMedietilsynetRating where

2253+ toText = \case

2254+ CRMRMEDIETILSYNET11 -> "medietilsynet11"

2255+ CRMRMEDIETILSYNET12 -> "medietilsynet12"

2256+ CRMRMEDIETILSYNET15 -> "medietilsynet15"

2257+ CRMRMEDIETILSYNET18 -> "medietilsynet18"

2258+ CRMRMEDIETILSYNET6 -> "medietilsynet6"

2259+ CRMRMEDIETILSYNET7 -> "medietilsynet7"

2260+ CRMRMEDIETILSYNET9 -> "medietilsynet9"

2261+ CRMRMedietilsynetA -> "medietilsynetA"

2262+ CRMRMedietilsynetUnrated -> "medietilsynetUnrated"

2263+

1125-- | The video\'s rating from Finland\'s Kansallinen Audiovisuaalinen

2264-- | The video\'s rating from Finland\'s Kansallinen Audiovisuaalinen

1126-- Instituutti (National Audiovisual Institute).

2265-- Instituutti (National Audiovisual Institute).

1127data ContentRatingMekuRating

2266data ContentRatingMekuRating

@@ -1141,6 +2280,25 @@ data ContentRatingMekuRating

1141

2280

1142instance Hashable ContentRatingMekuRating

2281instance Hashable ContentRatingMekuRating

1143

2282

2283+instance FromText ContentRatingMekuRating where

2284+ fromText = \case

2285+ "meku12" -> Just CRMRMEKU12

2286+ "meku16" -> Just CRMRMEKU16

2287+ "meku18" -> Just CRMRMEKU18

2288+ "meku7" -> Just CRMRMEKU7

2289+ "mekuS" -> Just CRMRMekuS

2290+ "mekuUnrated" -> Just CRMRMekuUnrated

2291+ _ -> Nothing

2292+

2293+instance ToText ContentRatingMekuRating where

2294+ toText = \case

2295+ CRMRMEKU12 -> "meku12"

2296+ CRMRMEKU16 -> "meku16"

2297+ CRMRMEKU18 -> "meku18"

2298+ CRMRMEKU7 -> "meku7"

2299+ CRMRMekuS -> "mekuS"

2300+ CRMRMekuUnrated -> "mekuUnrated"

2301+

1144-- | The video\'s rating from the Ministero dei Beni e delle Attività

2302-- | The video\'s rating from the Ministero dei Beni e delle Attività

1145-- Culturali e del Turismo (Italy).

2303-- Culturali e del Turismo (Italy).

1146data ContentRatingMibacRating

2304data ContentRatingMibacRating

@@ -1160,6 +2318,25 @@ data ContentRatingMibacRating

1160

2318

1161instance Hashable ContentRatingMibacRating

2319instance Hashable ContentRatingMibacRating

1162

2320

2321+instance FromText ContentRatingMibacRating where

2322+ fromText = \case

2323+ "mibacT" -> Just CRMRMibacT

2324+ "mibacUnrated" -> Just CRMRMibacUnrated

2325+ "mibacVap" -> Just CRMRMibacVap

2326+ "mibacVm12" -> Just CRMRMIBACVM12

2327+ "mibacVm14" -> Just CRMRMIBACVM14

2328+ "mibacVm18" -> Just CRMRMIBACVM18

2329+ _ -> Nothing

2330+

2331+instance ToText ContentRatingMibacRating where

2332+ toText = \case

2333+ CRMRMibacT -> "mibacT"

2334+ CRMRMibacUnrated -> "mibacUnrated"

2335+ CRMRMibacVap -> "mibacVap"

2336+ CRMRMIBACVM12 -> "mibacVm12"

2337+ CRMRMIBACVM14 -> "mibacVm14"

2338+ CRMRMIBACVM18 -> "mibacVm18"

2339+

1163-- | The video\'s Ministerio de Cultura (Colombia) rating.

2340-- | The video\'s Ministerio de Cultura (Colombia) rating.

1164data ContentRatingMocRating

2341data ContentRatingMocRating

1165 = CRMRMOC12

2342 = CRMRMOC12

@@ -1184,6 +2361,31 @@ data ContentRatingMocRating

1184

2361

1185instance Hashable ContentRatingMocRating

2362instance Hashable ContentRatingMocRating

1186

2363

2364+instance FromText ContentRatingMocRating where

2365+ fromText = \case

2366+ "moc12" -> Just CRMRMOC12

2367+ "moc15" -> Just CRMRMOC15

2368+ "moc18" -> Just CRMRMOC18

2369+ "moc7" -> Just CRMRMOC7

2370+ "mocBanned" -> Just CRMRMocBanned

2371+ "mocE" -> Just CRMRMocE

2372+ "mocT" -> Just CRMRMocT

2373+ "mocUnrated" -> Just CRMRMocUnrated

2374+ "mocX" -> Just CRMRMocX

2375+ _ -> Nothing

2376+

2377+instance ToText ContentRatingMocRating where

2378+ toText = \case

2379+ CRMRMOC12 -> "moc12"

2380+ CRMRMOC15 -> "moc15"

2381+ CRMRMOC18 -> "moc18"

2382+ CRMRMOC7 -> "moc7"

2383+ CRMRMocBanned -> "mocBanned"

2384+ CRMRMocE -> "mocE"

2385+ CRMRMocT -> "mocT"

2386+ CRMRMocUnrated -> "mocUnrated"

2387+ CRMRMocX -> "mocX"

2388+

1187-- | The video\'s rating from Taiwan\'s Ministry of Culture (文化部).

2389-- | The video\'s rating from Taiwan\'s Ministry of Culture (文化部).

1188data ContentRatingMoctwRating

2390data ContentRatingMoctwRating

1189 = CRMRMoctwG

2391 = CRMRMoctwG

@@ -1200,6 +2402,23 @@ data ContentRatingMoctwRating

1200

2402

1201instance Hashable ContentRatingMoctwRating

2403instance Hashable ContentRatingMoctwRating

1202

2404

2405+instance FromText ContentRatingMoctwRating where

2406+ fromText = \case

2407+ "moctwG" -> Just CRMRMoctwG

2408+ "moctwP" -> Just CRMRMoctwP

2409+ "moctwPg" -> Just CRMRMoctwPg

2410+ "moctwR" -> Just CRMRMoctwR

2411+ "moctwUnrated" -> Just CRMRMoctwUnrated

2412+ _ -> Nothing

2413+

2414+instance ToText ContentRatingMoctwRating where

2415+ toText = \case

2416+ CRMRMoctwG -> "moctwG"

2417+ CRMRMoctwP -> "moctwP"

2418+ CRMRMoctwPg -> "moctwPg"

2419+ CRMRMoctwR -> "moctwR"

2420+ CRMRMoctwUnrated -> "moctwUnrated"

2421+

1203-- | The video\'s Motion Picture Association of America (MPAA) rating.

2422-- | The video\'s Motion Picture Association of America (MPAA) rating.

1204data ContentRatingMpaaRating

2423data ContentRatingMpaaRating

1205 = CRMRMpaaG

2424 = CRMRMpaaG

@@ -1218,6 +2437,25 @@ data ContentRatingMpaaRating

1218

2437

1219instance Hashable ContentRatingMpaaRating

2438instance Hashable ContentRatingMpaaRating

1220

2439

2440+instance FromText ContentRatingMpaaRating where

2441+ fromText = \case

2442+ "mpaaG" -> Just CRMRMpaaG

2443+ "mpaaNc17" -> Just CRMRMPAANC17

2444+ "mpaaPg" -> Just CRMRMpaaPg

2445+ "mpaaPg13" -> Just CRMRMPAAPG13

2446+ "mpaaR" -> Just CRMRMpaaR

2447+ "mpaaUnrated" -> Just CRMRMpaaUnrated

2448+ _ -> Nothing

2449+

2450+instance ToText ContentRatingMpaaRating where

2451+ toText = \case

2452+ CRMRMpaaG -> "mpaaG"

2453+ CRMRMPAANC17 -> "mpaaNc17"

2454+ CRMRMpaaPg -> "mpaaPg"

2455+ CRMRMPAAPG13 -> "mpaaPg13"

2456+ CRMRMpaaR -> "mpaaR"

2457+ CRMRMpaaUnrated -> "mpaaUnrated"

2458+

1221-- | The video\'s rating from the Movie and Television Review and

2459-- | The video\'s rating from the Movie and Television Review and

1222-- Classification Board (Philippines).

2460-- Classification Board (Philippines).

1223data ContentRatingMtrcbRating

2461data ContentRatingMtrcbRating

@@ -1239,6 +2477,27 @@ data ContentRatingMtrcbRating

1239

2477

1240instance Hashable ContentRatingMtrcbRating

2478instance Hashable ContentRatingMtrcbRating

1241

2479

2480+instance FromText ContentRatingMtrcbRating where

2481+ fromText = \case

2482+ "mtrcbG" -> Just CRMRMtrcbG

2483+ "mtrcbPg" -> Just CRMRMtrcbPg

2484+ "mtrcbR13" -> Just CRMRMTRCBR13

2485+ "mtrcbR16" -> Just CRMRMTRCBR16

2486+ "mtrcbR18" -> Just CRMRMTRCBR18

2487+ "mtrcbUnrated" -> Just CRMRMtrcbUnrated

2488+ "mtrcbX" -> Just CRMRMtrcbX

2489+ _ -> Nothing

2490+

2491+instance ToText ContentRatingMtrcbRating where

2492+ toText = \case

2493+ CRMRMtrcbG -> "mtrcbG"

2494+ CRMRMtrcbPg -> "mtrcbPg"

2495+ CRMRMTRCBR13 -> "mtrcbR13"

2496+ CRMRMTRCBR16 -> "mtrcbR16"

2497+ CRMRMTRCBR18 -> "mtrcbR18"

2498+ CRMRMtrcbUnrated -> "mtrcbUnrated"

2499+ CRMRMtrcbX -> "mtrcbX"

2500+

1242-- | The video\'s rating from the Maldives National Bureau of Classification.

2501-- | The video\'s rating from the Maldives National Bureau of Classification.

1243data ContentRatingNbcRating

2502data ContentRatingNbcRating

1244 = CRNRNbc12plus

2503 = CRNRNbc12plus

@@ -1261,6 +2520,29 @@ data ContentRatingNbcRating

1261

2520

1262instance Hashable ContentRatingNbcRating

2521instance Hashable ContentRatingNbcRating

1263

2522

2523+instance FromText ContentRatingNbcRating where

2524+ fromText = \case

2525+ "nbc12plus" -> Just CRNRNbc12plus

2526+ "nbc15plus" -> Just CRNRNbc15plus

2527+ "nbc18plus" -> Just CRNRNbc18plus

2528+ "nbc18plusr" -> Just CRNRNbc18plusr

2529+ "nbcG" -> Just CRNRNbcG

2530+ "nbcPg" -> Just CRNRNbcPg

2531+ "nbcPu" -> Just CRNRNbcPu

2532+ "nbcUnrated" -> Just CRNRNbcUnrated

2533+ _ -> Nothing

2534+

2535+instance ToText ContentRatingNbcRating where

2536+ toText = \case

2537+ CRNRNbc12plus -> "nbc12plus"

2538+ CRNRNbc15plus -> "nbc15plus"

2539+ CRNRNbc18plus -> "nbc18plus"

2540+ CRNRNbc18plusr -> "nbc18plusr"

2541+ CRNRNbcG -> "nbcG"

2542+ CRNRNbcPg -> "nbcPg"

2543+ CRNRNbcPu -> "nbcPu"

2544+ CRNRNbcUnrated -> "nbcUnrated"

2545+

1264-- | The video\'s rating in Poland.

2546-- | The video\'s rating in Poland.

1265data ContentRatingNbcplRating

2547data ContentRatingNbcplRating

1266 = CRNRNbcpl18plus

2548 = CRNRNbcpl18plus

@@ -1279,6 +2561,25 @@ data ContentRatingNbcplRating

1279

2561

1280instance Hashable ContentRatingNbcplRating

2562instance Hashable ContentRatingNbcplRating

1281

2563

2564+instance FromText ContentRatingNbcplRating where

2565+ fromText = \case

2566+ "nbcpl18plus" -> Just CRNRNbcpl18plus

2567+ "nbcplI" -> Just CRNRNbcplI

2568+ "nbcplIi" -> Just CRNRNbcplIi

2569+ "nbcplIii" -> Just CRNRNbcplIii

2570+ "nbcplIv" -> Just CRNRNbcplIv

2571+ "nbcplUnrated" -> Just CRNRNbcplUnrated

2572+ _ -> Nothing

2573+

2574+instance ToText ContentRatingNbcplRating where

2575+ toText = \case

2576+ CRNRNbcpl18plus -> "nbcpl18plus"

2577+ CRNRNbcplI -> "nbcplI"

2578+ CRNRNbcplIi -> "nbcplIi"

2579+ CRNRNbcplIii -> "nbcplIii"

2580+ CRNRNbcplIv -> "nbcplIv"

2581+ CRNRNbcplUnrated -> "nbcplUnrated"

2582+

1282-- | The video\'s rating from the Bulgarian National Film Center.

2583-- | The video\'s rating from the Bulgarian National Film Center.

1283data ContentRatingNfrcRating

2584data ContentRatingNfrcRating

1284 = CRNRNfrcA

2585 = CRNRNfrcA

@@ -1297,6 +2598,25 @@ data ContentRatingNfrcRating

1297

2598

1298instance Hashable ContentRatingNfrcRating

2599instance Hashable ContentRatingNfrcRating

1299

2600

2601+instance FromText ContentRatingNfrcRating where

2602+ fromText = \case

2603+ "nfrcA" -> Just CRNRNfrcA

2604+ "nfrcB" -> Just CRNRNfrcB

2605+ "nfrcC" -> Just CRNRNfrcC

2606+ "nfrcD" -> Just CRNRNfrcD

2607+ "nfrcUnrated" -> Just CRNRNfrcUnrated

2608+ "nfrcX" -> Just CRNRNfrcX

2609+ _ -> Nothing

2610+

2611+instance ToText ContentRatingNfrcRating where

2612+ toText = \case

2613+ CRNRNfrcA -> "nfrcA"

2614+ CRNRNfrcB -> "nfrcB"

2615+ CRNRNfrcC -> "nfrcC"

2616+ CRNRNfrcD -> "nfrcD"

2617+ CRNRNfrcUnrated -> "nfrcUnrated"

2618+ CRNRNfrcX -> "nfrcX"

2619+

1300-- | The video\'s rating from Nigeria\'s National Film and Video Censors

2620-- | The video\'s rating from Nigeria\'s National Film and Video Censors

1301-- Board.

2621-- Board.

1302data ContentRatingNfvcbRating

2622data ContentRatingNfvcbRating

@@ -1320,6 +2640,29 @@ data ContentRatingNfvcbRating

1320

2640

1321instance Hashable ContentRatingNfvcbRating

2641instance Hashable ContentRatingNfvcbRating

1322

2642

2643+instance FromText ContentRatingNfvcbRating where

2644+ fromText = \case

2645+ "nfvcb12" -> Just CRNRNFVCB12

2646+ "nfvcb12a" -> Just CRNRNfvcb12a

2647+ "nfvcb15" -> Just CRNRNFVCB15

2648+ "nfvcb18" -> Just CRNRNFVCB18

2649+ "nfvcbG" -> Just CRNRNfvcbG

2650+ "nfvcbPg" -> Just CRNRNfvcbPg

2651+ "nfvcbRe" -> Just CRNRNfvcbRe

2652+ "nfvcbUnrated" -> Just CRNRNfvcbUnrated

2653+ _ -> Nothing

2654+

2655+instance ToText ContentRatingNfvcbRating where

2656+ toText = \case

2657+ CRNRNFVCB12 -> "nfvcb12"

2658+ CRNRNfvcb12a -> "nfvcb12a"

2659+ CRNRNFVCB15 -> "nfvcb15"

2660+ CRNRNFVCB18 -> "nfvcb18"

2661+ CRNRNfvcbG -> "nfvcbG"

2662+ CRNRNfvcbPg -> "nfvcbPg"

2663+ CRNRNfvcbRe -> "nfvcbRe"

2664+ CRNRNfvcbUnrated -> "nfvcbUnrated"

2665+

1323-- | The video\'s rating from the Nacionãlais Kino centrs (National Film

2666-- | The video\'s rating from the Nacionãlais Kino centrs (National Film

1324-- Centre of Latvia).

2667-- Centre of Latvia).

1325data ContentRatingNkclvRating

2668data ContentRatingNkclvRating

@@ -1337,6 +2680,23 @@ data ContentRatingNkclvRating

1337

2680

1338instance Hashable ContentRatingNkclvRating

2681instance Hashable ContentRatingNkclvRating

1339

2682

2683+instance FromText ContentRatingNkclvRating where

2684+ fromText = \case

2685+ "nkclv12plus" -> Just CRNRNkclv12plus

2686+ "nkclv18plus" -> Just CRNRNkclv18plus

2687+ "nkclv7plus" -> Just CRNRNkclv7plus

2688+ "nkclvU" -> Just CRNRNkclvU

2689+ "nkclvUnrated" -> Just CRNRNkclvUnrated

2690+ _ -> Nothing

2691+

2692+instance ToText ContentRatingNkclvRating where

2693+ toText = \case

2694+ CRNRNkclv12plus -> "nkclv12plus"

2695+ CRNRNkclv18plus -> "nkclv18plus"

2696+ CRNRNkclv7plus -> "nkclv7plus"

2697+ CRNRNkclvU -> "nkclvU"

2698+ CRNRNkclvUnrated -> "nkclvUnrated"

2699+

1340-- | The video\'s Office of Film and Literature Classification (OFLC - New

2700-- | The video\'s Office of Film and Literature Classification (OFLC - New

1341-- Zealand) rating.

2701-- Zealand) rating.

1342data ContentRatingOflcRating

2702data ContentRatingOflcRating

@@ -1364,6 +2724,33 @@ data ContentRatingOflcRating

1364

2724

1365instance Hashable ContentRatingOflcRating

2725instance Hashable ContentRatingOflcRating

1366

2726

2727+instance FromText ContentRatingOflcRating where

2728+ fromText = \case

2729+ "oflcG" -> Just CROROflcG

2730+ "oflcM" -> Just CROROflcM

2731+ "oflcPg" -> Just CROROflcPg

2732+ "oflcR13" -> Just CROROFLCR13

2733+ "oflcR15" -> Just CROROFLCR15

2734+ "oflcR16" -> Just CROROFLCR16

2735+ "oflcR18" -> Just CROROFLCR18

2736+ "oflcRp13" -> Just CROROFLCRP13

2737+ "oflcRp16" -> Just CROROFLCRP16

2738+ "oflcUnrated" -> Just CROROflcUnrated

2739+ _ -> Nothing

2740+

2741+instance ToText ContentRatingOflcRating where

2742+ toText = \case

2743+ CROROflcG -> "oflcG"

2744+ CROROflcM -> "oflcM"

2745+ CROROflcPg -> "oflcPg"

2746+ CROROFLCR13 -> "oflcR13"

2747+ CROROFLCR15 -> "oflcR15"

2748+ CROROFLCR16 -> "oflcR16"

2749+ CROROFLCR18 -> "oflcR18"

2750+ CROROFLCRP13 -> "oflcRp13"

2751+ CROROFLCRP16 -> "oflcRp16"

2752+ CROROflcUnrated -> "oflcUnrated"

2753+

1367-- | The video\'s rating in Peru.

2754-- | The video\'s rating in Peru.

1368data ContentRatingPefilmRating

2755data ContentRatingPefilmRating

1369 = CRPRPEFILM14

2756 = CRPRPEFILM14

@@ -1380,6 +2767,23 @@ data ContentRatingPefilmRating

1380

2767

1381instance Hashable ContentRatingPefilmRating

2768instance Hashable ContentRatingPefilmRating

1382

2769

2770+instance FromText ContentRatingPefilmRating where

2771+ fromText = \case

2772+ "pefilm14" -> Just CRPRPEFILM14

2773+ "pefilm18" -> Just CRPRPEFILM18

2774+ "pefilmPg" -> Just CRPRPefilmPg

2775+ "pefilmPt" -> Just CRPRPefilmPt

2776+ "pefilmUnrated" -> Just CRPRPefilmUnrated

2777+ _ -> Nothing

2778+

2779+instance ToText ContentRatingPefilmRating where

2780+ toText = \case

2781+ CRPRPEFILM14 -> "pefilm14"

2782+ CRPRPEFILM18 -> "pefilm18"

2783+ CRPRPefilmPg -> "pefilmPg"

2784+ CRPRPefilmPt -> "pefilmPt"

2785+ CRPRPefilmUnrated -> "pefilmUnrated"

2786+

1383-- | The video\'s rating from the Hungarian Nemzeti Filmiroda, the Rating

2787-- | The video\'s rating from the Hungarian Nemzeti Filmiroda, the Rating

1384-- Committee of the National Office of Film.

2788-- Committee of the National Office of Film.

1385data ContentRatingRcnofRating

2789data ContentRatingRcnofRating

@@ -1401,6 +2805,27 @@ data ContentRatingRcnofRating

1401

2805

1402instance Hashable ContentRatingRcnofRating

2806instance Hashable ContentRatingRcnofRating

1403

2807

2808+instance FromText ContentRatingRcnofRating where

2809+ fromText = \case

2810+ "rcnofI" -> Just CRRRRcnofI

2811+ "rcnofIi" -> Just CRRRRcnofIi

2812+ "rcnofIii" -> Just CRRRRcnofIii

2813+ "rcnofIv" -> Just CRRRRcnofIv

2814+ "rcnofUnrated" -> Just CRRRRcnofUnrated

2815+ "rcnofV" -> Just CRRRRcnofV

2816+ "rcnofVi" -> Just CRRRRcnofVi

2817+ _ -> Nothing

2818+

2819+instance ToText ContentRatingRcnofRating where

2820+ toText = \case

2821+ CRRRRcnofI -> "rcnofI"

2822+ CRRRRcnofIi -> "rcnofIi"

2823+ CRRRRcnofIii -> "rcnofIii"

2824+ CRRRRcnofIv -> "rcnofIv"

2825+ CRRRRcnofUnrated -> "rcnofUnrated"

2826+ CRRRRcnofV -> "rcnofV"

2827+ CRRRRcnofVi -> "rcnofVi"

2828+

1404-- | The video\'s rating in Venezuela.

2829-- | The video\'s rating in Venezuela.

1405data ContentRatingResorteviolenciaRating

2830data ContentRatingResorteviolenciaRating

1406 = CRRRResorteviolenciaA

2831 = CRRRResorteviolenciaA

@@ -1419,6 +2844,25 @@ data ContentRatingResorteviolenciaRating

1419

2844

1420instance Hashable ContentRatingResorteviolenciaRating

2845instance Hashable ContentRatingResorteviolenciaRating

1421

2846

2847+instance FromText ContentRatingResorteviolenciaRating where

2848+ fromText = \case

2849+ "resorteviolenciaA" -> Just CRRRResorteviolenciaA

2850+ "resorteviolenciaB" -> Just CRRRResorteviolenciaB

2851+ "resorteviolenciaC" -> Just CRRRResorteviolenciaC

2852+ "resorteviolenciaD" -> Just CRRRResorteviolenciaD

2853+ "resorteviolenciaE" -> Just CRRRResorteviolenciaE

2854+ "resorteviolenciaUnrated" -> Just CRRRResorteviolenciaUnrated

2855+ _ -> Nothing

2856+

2857+instance ToText ContentRatingResorteviolenciaRating where

2858+ toText = \case

2859+ CRRRResorteviolenciaA -> "resorteviolenciaA"

2860+ CRRRResorteviolenciaB -> "resorteviolenciaB"

2861+ CRRRResorteviolenciaC -> "resorteviolenciaC"

2862+ CRRRResorteviolenciaD -> "resorteviolenciaD"

2863+ CRRRResorteviolenciaE -> "resorteviolenciaE"

2864+ CRRRResorteviolenciaUnrated -> "resorteviolenciaUnrated"

2865+

1422-- | The video\'s General Directorate of Radio, Television and Cinematography

2866-- | The video\'s General Directorate of Radio, Television and Cinematography

1423-- (Mexico) rating.

2867-- (Mexico) rating.

1424data ContentRatingRtcRating

2868data ContentRatingRtcRating

@@ -1440,6 +2884,27 @@ data ContentRatingRtcRating

1440

2884

1441instance Hashable ContentRatingRtcRating

2885instance Hashable ContentRatingRtcRating

1442

2886

2887+instance FromText ContentRatingRtcRating where

2888+ fromText = \case

2889+ "rtcA" -> Just CRRRRtcA

2890+ "rtcAa" -> Just CRRRRtcAa

2891+ "rtcB" -> Just CRRRRtcB

2892+ "rtcB15" -> Just CRRRRTCB15

2893+ "rtcC" -> Just CRRRRtcC

2894+ "rtcD" -> Just CRRRRtcD

2895+ "rtcUnrated" -> Just CRRRRtcUnrated

2896+ _ -> Nothing

2897+

2898+instance ToText ContentRatingRtcRating where

2899+ toText = \case

2900+ CRRRRtcA -> "rtcA"

2901+ CRRRRtcAa -> "rtcAa"

2902+ CRRRRtcB -> "rtcB"

2903+ CRRRRTCB15 -> "rtcB15"

2904+ CRRRRtcC -> "rtcC"

2905+ CRRRRtcD -> "rtcD"

2906+ CRRRRtcUnrated -> "rtcUnrated"

2907+

1443-- | The video\'s rating from Ireland\'s Raidió Teilifís Éireann.

2908-- | The video\'s rating from Ireland\'s Raidió Teilifís Éireann.

1444data ContentRatingRteRating

2909data ContentRatingRteRating

1445 = CRRRRteCh

2910 = CRRRRteCh

@@ -1456,6 +2921,23 @@ data ContentRatingRteRating

1456

2921

1457instance Hashable ContentRatingRteRating

2922instance Hashable ContentRatingRteRating

1458

2923

2924+instance FromText ContentRatingRteRating where

2925+ fromText = \case

2926+ "rteCh" -> Just CRRRRteCh

2927+ "rteGa" -> Just CRRRRteGa

2928+ "rteMa" -> Just CRRRRteMa

2929+ "rtePs" -> Just CRRRRtePs

2930+ "rteUnrated" -> Just CRRRRteUnrated

2931+ _ -> Nothing

2932+

2933+instance ToText ContentRatingRteRating where

2934+ toText = \case

2935+ CRRRRteCh -> "rteCh"

2936+ CRRRRteGa -> "rteGa"

2937+ CRRRRteMa -> "rteMa"

2938+ CRRRRtePs -> "rtePs"

2939+ CRRRRteUnrated -> "rteUnrated"

2940+

1459-- | The video\'s National Film Registry of the Russian Federation (MKRF -

2941-- | The video\'s National Film Registry of the Russian Federation (MKRF -

1460-- Russia) rating.

2942-- Russia) rating.

1461data ContentRatingRussiaRating

2943data ContentRatingRussiaRating

@@ -1475,6 +2957,25 @@ data ContentRatingRussiaRating

1475

2957

1476instance Hashable ContentRatingRussiaRating

2958instance Hashable ContentRatingRussiaRating

1477

2959

2960+instance FromText ContentRatingRussiaRating where

2961+ fromText = \case

2962+ "russia0" -> Just CRRRRUSSIA0

2963+ "russia12" -> Just CRRRRUSSIA12

2964+ "russia16" -> Just CRRRRUSSIA16

2965+ "russia18" -> Just CRRRRUSSIA18

2966+ "russia6" -> Just CRRRRUSSIA6

2967+ "russiaUnrated" -> Just CRRRRussiaUnrated

2968+ _ -> Nothing

2969+

2970+instance ToText ContentRatingRussiaRating where

2971+ toText = \case

2972+ CRRRRUSSIA0 -> "russia0"

2973+ CRRRRUSSIA12 -> "russia12"

2974+ CRRRRUSSIA16 -> "russia16"

2975+ CRRRRUSSIA18 -> "russia18"

2976+ CRRRRUSSIA6 -> "russia6"

2977+ CRRRRussiaUnrated -> "russiaUnrated"

2978+

1478-- | The video\'s rating in Slovakia.

2979-- | The video\'s rating in Slovakia.

1479data ContentRatingSkfilmRating

2980data ContentRatingSkfilmRating

1480 = CRSRSkfilmG

2981 = CRSRSkfilmG

@@ -1491,6 +2992,23 @@ data ContentRatingSkfilmRating

1491

2992

1492instance Hashable ContentRatingSkfilmRating

2993instance Hashable ContentRatingSkfilmRating

1493

2994

2995+instance FromText ContentRatingSkfilmRating where

2996+ fromText = \case

2997+ "skfilmG" -> Just CRSRSkfilmG

2998+ "skfilmP2" -> Just CRSRSKFILMP2

2999+ "skfilmP5" -> Just CRSRSKFILMP5

3000+ "skfilmP8" -> Just CRSRSKFILMP8

3001+ "skfilmUnrated" -> Just CRSRSkfilmUnrated

3002+ _ -> Nothing

3003+

3004+instance ToText ContentRatingSkfilmRating where

3005+ toText = \case

3006+ CRSRSkfilmG -> "skfilmG"

3007+ CRSRSKFILMP2 -> "skfilmP2"

3008+ CRSRSKFILMP5 -> "skfilmP5"

3009+ CRSRSKFILMP8 -> "skfilmP8"

3010+ CRSRSkfilmUnrated -> "skfilmUnrated"

3011+

1494-- | The video\'s rating in Iceland.

3012-- | The video\'s rating in Iceland.

1495data ContentRatingSmaisRating

3013data ContentRatingSmaisRating

1496 = CRSRSMAIS12

3014 = CRSRSMAIS12

@@ -1511,6 +3029,27 @@ data ContentRatingSmaisRating

1511

3029

1512instance Hashable ContentRatingSmaisRating

3030instance Hashable ContentRatingSmaisRating

1513

3031

3032+instance FromText ContentRatingSmaisRating where

3033+ fromText = \case

3034+ "smais12" -> Just CRSRSMAIS12

3035+ "smais14" -> Just CRSRSMAIS14

3036+ "smais16" -> Just CRSRSMAIS16

3037+ "smais18" -> Just CRSRSMAIS18

3038+ "smais7" -> Just CRSRSMAIS7

3039+ "smaisL" -> Just CRSRSmaisL

3040+ "smaisUnrated" -> Just CRSRSmaisUnrated

3041+ _ -> Nothing

3042+

3043+instance ToText ContentRatingSmaisRating where

3044+ toText = \case

3045+ CRSRSMAIS12 -> "smais12"

3046+ CRSRSMAIS14 -> "smais14"

3047+ CRSRSMAIS16 -> "smais16"

3048+ CRSRSMAIS18 -> "smais18"

3049+ CRSRSMAIS7 -> "smais7"

3050+ CRSRSmaisL -> "smaisL"

3051+ CRSRSmaisUnrated -> "smaisUnrated"

3052+

1514-- | The video\'s rating from Statens medieråd (Sweden\'s National Media

3053-- | The video\'s rating from Statens medieråd (Sweden\'s National Media

1515-- Council).

3054-- Council).

1516data ContentRatingSmsaRating

3055data ContentRatingSmsaRating

@@ -1528,6 +3067,23 @@ data ContentRatingSmsaRating

1528

3067

1529instance Hashable ContentRatingSmsaRating

3068instance Hashable ContentRatingSmsaRating

1530

3069

3070+instance FromText ContentRatingSmsaRating where

3071+ fromText = \case

3072+ "smsa11" -> Just CRSRSMSA11

3073+ "smsa15" -> Just CRSRSMSA15

3074+ "smsa7" -> Just CRSRSMSA7

3075+ "smsaA" -> Just CRSRSmsaA

3076+ "smsaUnrated" -> Just CRSRSmsaUnrated

3077+ _ -> Nothing

3078+

3079+instance ToText ContentRatingSmsaRating where

3080+ toText = \case

3081+ CRSRSMSA11 -> "smsa11"

3082+ CRSRSMSA15 -> "smsa15"

3083+ CRSRSMSA7 -> "smsa7"

3084+ CRSRSmsaA -> "smsaA"

3085+ CRSRSmsaUnrated -> "smsaUnrated"

3086+

1531-- | The video\'s TV Parental Guidelines (TVPG) rating.

3087-- | The video\'s TV Parental Guidelines (TVPG) rating.

1532data ContentRatingTvpgRating

3088data ContentRatingTvpgRating

1533 = CRTRPG14

3089 = CRTRPG14

@@ -1550,6 +3106,29 @@ data ContentRatingTvpgRating

1550

3106

1551instance Hashable ContentRatingTvpgRating

3107instance Hashable ContentRatingTvpgRating

1552

3108

3109+instance FromText ContentRatingTvpgRating where

3110+ fromText = \case

3111+ "pg14" -> Just CRTRPG14

3112+ "tvpgG" -> Just CRTRTvpgG

3113+ "tvpgMa" -> Just CRTRTvpgMa

3114+ "tvpgPg" -> Just CRTRTvpgPg

3115+ "tvpgUnrated" -> Just CRTRTvpgUnrated

3116+ "tvpgY" -> Just CRTRTvpgY

3117+ "tvpgY7" -> Just CRTRTVPGY7

3118+ "tvpgY7Fv" -> Just CRTRTvpgY7Fv

3119+ _ -> Nothing

3120+

3121+instance ToText ContentRatingTvpgRating where

3122+ toText = \case

3123+ CRTRPG14 -> "pg14"

3124+ CRTRTvpgG -> "tvpgG"

3125+ CRTRTvpgMa -> "tvpgMa"

3126+ CRTRTvpgPg -> "tvpgPg"

3127+ CRTRTvpgUnrated -> "tvpgUnrated"

3128+ CRTRTvpgY -> "tvpgY"

3129+ CRTRTVPGY7 -> "tvpgY7"

3130+ CRTRTvpgY7Fv -> "tvpgY7Fv"

3131+

1553-- | A rating that YouTube uses to identify age-restricted content.

3132-- | A rating that YouTube uses to identify age-restricted content.

1554data ContentRatingYtRating

3133data ContentRatingYtRating

1555 = CRYRYtAgeRestricted

3134 = CRYRYtAgeRestricted

@@ -1558,6 +3137,15 @@ data ContentRatingYtRating

1558

3137

1559instance Hashable ContentRatingYtRating

3138instance Hashable ContentRatingYtRating

1560

3139

3140+instance FromText ContentRatingYtRating where

3141+ fromText = \case

3142+ "ytAgeRestricted" -> Just CRYRYtAgeRestricted

3143+ _ -> Nothing

3144+

3145+instance ToText ContentRatingYtRating where

3146+ toText = \case

3147+ CRYRYtAgeRestricted -> "ytAgeRestricted"

3148+

1561-- | Describes in which corner of the video the visual widget will appear.

3149-- | Describes in which corner of the video the visual widget will appear.

1562data InvideoPositionCornerPosition

3150data InvideoPositionCornerPosition

1563 = IPCPBottomLeft

3151 = IPCPBottomLeft

@@ -1572,6 +3160,21 @@ data InvideoPositionCornerPosition

1572

3160

1573instance Hashable InvideoPositionCornerPosition

3161instance Hashable InvideoPositionCornerPosition

1574

3162

3163+instance FromText InvideoPositionCornerPosition where

3164+ fromText = \case

3165+ "bottomLeft" -> Just IPCPBottomLeft

3166+ "bottomRight" -> Just IPCPBottomRight

3167+ "topLeft" -> Just IPCPTopLeft

3168+ "topRight" -> Just IPCPTopRight

3169+ _ -> Nothing

3170+

3171+instance ToText InvideoPositionCornerPosition where

3172+ toText = \case

3173+ IPCPBottomLeft -> "bottomLeft"

3174+ IPCPBottomRight -> "bottomRight"

3175+ IPCPTopLeft -> "topLeft"

3176+ IPCPTopRight -> "topRight"

3177+

1575-- | Defines the position type.

3178-- | Defines the position type.

1576data InvideoPositionType

3179data InvideoPositionType

1577 = IPTCorner

3180 = IPTCorner

@@ -1580,6 +3183,15 @@ data InvideoPositionType

1580

3183

1581instance Hashable InvideoPositionType

3184instance Hashable InvideoPositionType

1582

3185

3186+instance FromText InvideoPositionType where

3187+ fromText = \case

3188+ "corner" -> Just IPTCorner

3189+ _ -> Nothing

3190+

3191+instance ToText InvideoPositionType where

3192+ toText = \case

3193+ IPTCorner -> "corner"

3194+

1583-- | Describes a timing type. If the value is offsetFromStart, then the

3195-- | Describes a timing type. If the value is offsetFromStart, then the

1584-- offsetMs field represents an offset from the start of the video. If the

3196-- offsetMs field represents an offset from the start of the video. If the

1585-- value is offsetFromEnd, then the offsetMs field represents an offset

3197-- value is offsetFromEnd, then the offsetMs field represents an offset

@@ -1593,6 +3205,17 @@ data InvideoTimingType

1593

3205

1594instance Hashable InvideoTimingType

3206instance Hashable InvideoTimingType

1595

3207

3208+instance FromText InvideoTimingType where

3209+ fromText = \case

3210+ "offsetFromEnd" -> Just ITTOffsetFromEnd

3211+ "offsetFromStart" -> Just ITTOffsetFromStart

3212+ _ -> Nothing

3213+

3214+instance ToText InvideoTimingType where

3215+ toText = \case

3216+ ITTOffsetFromEnd -> "offsetFromEnd"

3217+ ITTOffsetFromStart -> "offsetFromStart"

3218+

1596-- | The broadcast\'s status. The status can be updated using the API\'s

3219-- | The broadcast\'s status. The status can be updated using the API\'s

1597-- liveBroadcasts.transition method.

3220-- liveBroadcasts.transition method.

1598data LiveBroadcastStatusLifeCycleStatus

3221data LiveBroadcastStatusLifeCycleStatus

@@ -1622,6 +3245,35 @@ data LiveBroadcastStatusLifeCycleStatus

1622

3245

1623instance Hashable LiveBroadcastStatusLifeCycleStatus

3246instance Hashable LiveBroadcastStatusLifeCycleStatus

1624

3247

3248+instance FromText LiveBroadcastStatusLifeCycleStatus where

3249+ fromText = \case

3250+ "abandoned" -> Just LBSLCSAbandoned

3251+ "complete" -> Just LBSLCSComplete

3252+ "completeStarting" -> Just LBSLCSCompleteStarting

3253+ "created" -> Just LBSLCSCreated

3254+ "live" -> Just LBSLCSLive

3255+ "liveStarting" -> Just LBSLCSLiveStarting

3256+ "ready" -> Just LBSLCSReady

3257+ "reclaimed" -> Just LBSLCSReclaimed

3258+ "revoked" -> Just LBSLCSRevoked

3259+ "testStarting" -> Just LBSLCSTestStarting

3260+ "testing" -> Just LBSLCSTesting

3261+ _ -> Nothing

3262+

3263+instance ToText LiveBroadcastStatusLifeCycleStatus where

3264+ toText = \case

3265+ LBSLCSAbandoned -> "abandoned"

3266+ LBSLCSComplete -> "complete"

3267+ LBSLCSCompleteStarting -> "completeStarting"

3268+ LBSLCSCreated -> "created"

3269+ LBSLCSLive -> "live"

3270+ LBSLCSLiveStarting -> "liveStarting"

3271+ LBSLCSReady -> "ready"

3272+ LBSLCSReclaimed -> "reclaimed"

3273+ LBSLCSRevoked -> "revoked"

3274+ LBSLCSTestStarting -> "testStarting"

3275+ LBSLCSTesting -> "testing"

3276+

1625-- | Priority of the live broadcast event (internal state).

3277-- | Priority of the live broadcast event (internal state).

1626data LiveBroadcastStatusLiveBroadcastPriority

3278data LiveBroadcastStatusLiveBroadcastPriority

1627 = LBSLBPHigh

3279 = LBSLBPHigh

@@ -1634,6 +3286,19 @@ data LiveBroadcastStatusLiveBroadcastPriority

1634

3286

1635instance Hashable LiveBroadcastStatusLiveBroadcastPriority

3287instance Hashable LiveBroadcastStatusLiveBroadcastPriority

1636

3288

3289+instance FromText LiveBroadcastStatusLiveBroadcastPriority where

3290+ fromText = \case

3291+ "high" -> Just LBSLBPHigh

3292+ "low" -> Just LBSLBPLow

3293+ "normal" -> Just LBSLBPNormal

3294+ _ -> Nothing

3295+

3296+instance ToText LiveBroadcastStatusLiveBroadcastPriority where

3297+ toText = \case

3298+ LBSLBPHigh -> "high"

3299+ LBSLBPLow -> "low"

3300+ LBSLBPNormal -> "normal"

3301+

1637-- | The broadcast\'s privacy status. Note that the broadcast represents

3302-- | The broadcast\'s privacy status. Note that the broadcast represents

1638-- exactly one YouTube video, so the privacy settings are identical to

3303-- exactly one YouTube video, so the privacy settings are identical to

1639-- those supported for videos. In addition, you can set this field by

3304-- those supported for videos. In addition, you can set this field by

@@ -1650,6 +3315,19 @@ data LiveBroadcastStatusPrivacyStatus

1650

3315

1651instance Hashable LiveBroadcastStatusPrivacyStatus

3316instance Hashable LiveBroadcastStatusPrivacyStatus

1652

3317

3318+instance FromText LiveBroadcastStatusPrivacyStatus where

3319+ fromText = \case

3320+ "private" -> Just LBSPSPrivate

3321+ "public" -> Just LBSPSPublic

3322+ "unlisted" -> Just LBSPSUnlisted

3323+ _ -> Nothing

3324+

3325+instance ToText LiveBroadcastStatusPrivacyStatus where

3326+ toText = \case

3327+ LBSPSPrivate -> "private"

3328+ LBSPSPublic -> "public"

3329+ LBSPSUnlisted -> "unlisted"

3330+

1653-- | The broadcast\'s recording status.

3331-- | The broadcast\'s recording status.

1654data LiveBroadcastStatusRecordingStatus

3332data LiveBroadcastStatusRecordingStatus

1655 = LBSRSNotRecording

3333 = LBSRSNotRecording

@@ -1662,6 +3340,19 @@ data LiveBroadcastStatusRecordingStatus

1662

3340

1663instance Hashable LiveBroadcastStatusRecordingStatus

3341instance Hashable LiveBroadcastStatusRecordingStatus

1664

3342

3343+instance FromText LiveBroadcastStatusRecordingStatus where

3344+ fromText = \case

3345+ "notRecording" -> Just LBSRSNotRecording

3346+ "recorded" -> Just LBSRSRecorded

3347+ "recording" -> Just LBSRSRecording

3348+ _ -> Nothing

3349+

3350+instance ToText LiveBroadcastStatusRecordingStatus where

3351+ toText = \case

3352+ LBSRSNotRecording -> "notRecording"

3353+ LBSRSRecorded -> "recorded"

3354+ LBSRSRecording -> "recording"

3355+

1665-- | The type of the topic.

3356-- | The type of the topic.

1666data LiveBroadcastTopicType

3357data LiveBroadcastTopicType

1667 = LBTTVideoGame

3358 = LBTTVideoGame

@@ -1670,6 +3361,15 @@ data LiveBroadcastTopicType

1670

3361

1671instance Hashable LiveBroadcastTopicType

3362instance Hashable LiveBroadcastTopicType

1672

3363

3364+instance FromText LiveBroadcastTopicType where

3365+ fromText = \case

3366+ "videoGame" -> Just LBTTVideoGame

3367+ _ -> Nothing

3368+

3369+instance ToText LiveBroadcastTopicType where

3370+ toText = \case

3371+ LBTTVideoGame -> "videoGame"

3372+

1673-- | How severe this issue is to the stream.

3373-- | How severe this issue is to the stream.

1674data LiveStreamConfigurationIssueSeverity

3374data LiveStreamConfigurationIssueSeverity

1675 = LSCISError

3375 = LSCISError

@@ -1682,6 +3382,19 @@ data LiveStreamConfigurationIssueSeverity

1682

3382

1683instance Hashable LiveStreamConfigurationIssueSeverity

3383instance Hashable LiveStreamConfigurationIssueSeverity

1684

3384

3385+instance FromText LiveStreamConfigurationIssueSeverity where

3386+ fromText = \case

3387+ "error" -> Just LSCISError

3388+ "info" -> Just LSCISInfo

3389+ "warning" -> Just LSCISWarning

3390+ _ -> Nothing

3391+

3392+instance ToText LiveStreamConfigurationIssueSeverity where

3393+ toText = \case

3394+ LSCISError -> "error"

3395+ LSCISInfo -> "info"

3396+ LSCISWarning -> "warning"

3397+

1685-- | The kind of error happening.

3398-- | The kind of error happening.

1686data LiveStreamConfigurationIssueType

3399data LiveStreamConfigurationIssueType

1687 = LSCITAudioBitrateHigh

3400 = LSCITAudioBitrateHigh

@@ -1754,6 +3467,79 @@ data LiveStreamConfigurationIssueType

1754

3467

1755instance Hashable LiveStreamConfigurationIssueType

3468instance Hashable LiveStreamConfigurationIssueType

1756

3469

3470+instance FromText LiveStreamConfigurationIssueType where

3471+ fromText = \case

3472+ "audioBitrateHigh" -> Just LSCITAudioBitrateHigh

3473+ "audioBitrateLow" -> Just LSCITAudioBitrateLow

3474+ "audioBitrateMismatch" -> Just LSCITAudioBitrateMismatch

3475+ "audioCodec" -> Just LSCITAudioCodec

3476+ "audioCodecMismatch" -> Just LSCITAudioCodecMismatch

3477+ "audioSampleRate" -> Just LSCITAudioSampleRate

3478+ "audioSampleRateMismatch" -> Just LSCITAudioSampleRateMismatch

3479+ "audioStereoMismatch" -> Just LSCITAudioStereoMismatch

3480+ "audioTooManyChannels" -> Just LSCITAudioTooManyChannels

3481+ "badContainer" -> Just LSCITBadContainer

3482+ "bitrateHigh" -> Just LSCITBitrateHigh

3483+ "bitrateLow" -> Just LSCITBitrateLow

3484+ "frameRateHigh" -> Just LSCITFrameRateHigh

3485+ "framerateMismatch" -> Just LSCITFramerateMismatch

3486+ "gopMismatch" -> Just LSCITGopMismatch

3487+ "gopSizeLong" -> Just LSCITGopSizeLong

3488+ "gopSizeOver" -> Just LSCITGopSizeOver

3489+ "gopSizeShort" -> Just LSCITGopSizeShort

3490+ "interlacedVideo" -> Just LSCITInterlacedVideo

3491+ "multipleAudioStreams" -> Just LSCITMultipleAudioStreams

3492+ "multipleVideoStreams" -> Just LSCITMultipleVideoStreams

3493+ "noAudioStream" -> Just LSCITNoAudioStream

3494+ "noVideoStream" -> Just LSCITNoVideoStream

3495+ "openGop" -> Just LSCITOpenGop

3496+ "resolutionMismatch" -> Just LSCITResolutionMismatch

3497+ "videoBitrateMismatch" -> Just LSCITVideoBitrateMismatch

3498+ "videoCodec" -> Just LSCITVideoCodec

3499+ "videoCodecMismatch" -> Just LSCITVideoCodecMismatch

3500+ "videoIngestionStarved" -> Just LSCITVideoIngestionStarved

3501+ "videoInterlaceMismatch" -> Just LSCITVideoInterlaceMismatch

3502+ "videoProfileMismatch" -> Just LSCITVideoProfileMismatch

3503+ "videoResolutionSuboptimal" -> Just LSCITVideoResolutionSuboptimal

3504+ "videoResolutionUnsupported" -> Just LSCITVideoResolutionUnsupported

3505+ _ -> Nothing

3506+

3507+instance ToText LiveStreamConfigurationIssueType where

3508+ toText = \case

3509+ LSCITAudioBitrateHigh -> "audioBitrateHigh"

3510+ LSCITAudioBitrateLow -> "audioBitrateLow"

3511+ LSCITAudioBitrateMismatch -> "audioBitrateMismatch"

3512+ LSCITAudioCodec -> "audioCodec"

3513+ LSCITAudioCodecMismatch -> "audioCodecMismatch"

3514+ LSCITAudioSampleRate -> "audioSampleRate"

3515+ LSCITAudioSampleRateMismatch -> "audioSampleRateMismatch"

3516+ LSCITAudioStereoMismatch -> "audioStereoMismatch"

3517+ LSCITAudioTooManyChannels -> "audioTooManyChannels"

3518+ LSCITBadContainer -> "badContainer"

3519+ LSCITBitrateHigh -> "bitrateHigh"

3520+ LSCITBitrateLow -> "bitrateLow"

3521+ LSCITFrameRateHigh -> "frameRateHigh"

3522+ LSCITFramerateMismatch -> "framerateMismatch"

3523+ LSCITGopMismatch -> "gopMismatch"

3524+ LSCITGopSizeLong -> "gopSizeLong"

3525+ LSCITGopSizeOver -> "gopSizeOver"

3526+ LSCITGopSizeShort -> "gopSizeShort"

3527+ LSCITInterlacedVideo -> "interlacedVideo"

3528+ LSCITMultipleAudioStreams -> "multipleAudioStreams"

3529+ LSCITMultipleVideoStreams -> "multipleVideoStreams"

3530+ LSCITNoAudioStream -> "noAudioStream"

3531+ LSCITNoVideoStream -> "noVideoStream"

3532+ LSCITOpenGop -> "openGop"

3533+ LSCITResolutionMismatch -> "resolutionMismatch"

3534+ LSCITVideoBitrateMismatch -> "videoBitrateMismatch"

3535+ LSCITVideoCodec -> "videoCodec"

3536+ LSCITVideoCodecMismatch -> "videoCodecMismatch"

3537+ LSCITVideoIngestionStarved -> "videoIngestionStarved"

3538+ LSCITVideoInterlaceMismatch -> "videoInterlaceMismatch"

3539+ LSCITVideoProfileMismatch -> "videoProfileMismatch"

3540+ LSCITVideoResolutionSuboptimal -> "videoResolutionSuboptimal"

3541+ LSCITVideoResolutionUnsupported -> "videoResolutionUnsupported"

3542+

1757-- | The status code of this stream

3543-- | The status code of this stream

1758data LiveStreamHealthStatusStatus

3544data LiveStreamHealthStatusStatus

1759 = LSHSSBad

3545 = LSHSSBad

@@ -1770,6 +3556,23 @@ data LiveStreamHealthStatusStatus

1770

3556

1771instance Hashable LiveStreamHealthStatusStatus

3557instance Hashable LiveStreamHealthStatusStatus

1772

3558

3559+instance FromText LiveStreamHealthStatusStatus where

3560+ fromText = \case

3561+ "bad" -> Just LSHSSBad

3562+ "good" -> Just LSHSSGood

3563+ "noData" -> Just LSHSSNoData

3564+ "ok" -> Just LSHSSOK

3565+ "revoked" -> Just LSHSSRevoked

3566+ _ -> Nothing

3567+

3568+instance ToText LiveStreamHealthStatusStatus where

3569+ toText = \case

3570+ LSHSSBad -> "bad"

3571+ LSHSSGood -> "good"

3572+ LSHSSNoData -> "noData"

3573+ LSHSSOK -> "ok"

3574+ LSHSSRevoked -> "revoked"

3575+

1773data LiveStreamStatusStreamStatus

3576data LiveStreamStatusStreamStatus

1774 = LSSSSActive

3577 = LSSSSActive

1775 -- ^ @active@

3578 -- ^ @active@

@@ -1785,6 +3588,23 @@ data LiveStreamStatusStreamStatus

1785

3588

1786instance Hashable LiveStreamStatusStreamStatus

3589instance Hashable LiveStreamStatusStreamStatus

1787

3590

3591+instance FromText LiveStreamStatusStreamStatus where

3592+ fromText = \case

3593+ "active" -> Just LSSSSActive

3594+ "created" -> Just LSSSSCreated

3595+ "error" -> Just LSSSSError

3596+ "inactive" -> Just LSSSSInactive

3597+ "ready" -> Just LSSSSReady

3598+ _ -> Nothing

3599+

3600+instance ToText LiveStreamStatusStreamStatus where

3601+ toText = \case

3602+ LSSSSActive -> "active"

3603+ LSSSSCreated -> "created"

3604+ LSSSSError -> "error"

3605+ LSSSSInactive -> "inactive"

3606+ LSSSSReady -> "ready"

3607+

1788-- | This resource\'s privacy status.

3608-- | This resource\'s privacy status.

1789data PlaylistItemStatusPrivacyStatus

3609data PlaylistItemStatusPrivacyStatus

1790 = PISPSPrivate

3610 = PISPSPrivate

@@ -1797,6 +3617,19 @@ data PlaylistItemStatusPrivacyStatus

1797

3617

1798instance Hashable PlaylistItemStatusPrivacyStatus

3618instance Hashable PlaylistItemStatusPrivacyStatus

1799

3619

3620+instance FromText PlaylistItemStatusPrivacyStatus where

3621+ fromText = \case

3622+ "private" -> Just PISPSPrivate

3623+ "public" -> Just PISPSPublic

3624+ "unlisted" -> Just PISPSUnlisted

3625+ _ -> Nothing

3626+

3627+instance ToText PlaylistItemStatusPrivacyStatus where

3628+ toText = \case

3629+ PISPSPrivate -> "private"

3630+ PISPSPublic -> "public"

3631+ PISPSUnlisted -> "unlisted"

3632+

1800-- | The playlist\'s privacy status.

3633-- | The playlist\'s privacy status.

1801data PlaylistStatusPrivacyStatus

3634data PlaylistStatusPrivacyStatus

1802 = PSPSPrivate

3635 = PSPSPrivate

@@ -1809,6 +3642,19 @@ data PlaylistStatusPrivacyStatus

1809

3642

1810instance Hashable PlaylistStatusPrivacyStatus

3643instance Hashable PlaylistStatusPrivacyStatus

1811

3644

3645+instance FromText PlaylistStatusPrivacyStatus where

3646+ fromText = \case

3647+ "private" -> Just PSPSPrivate

3648+ "public" -> Just PSPSPublic

3649+ "unlisted" -> Just PSPSUnlisted

3650+ _ -> Nothing

3651+

3652+instance ToText PlaylistStatusPrivacyStatus where

3653+ toText = \case

3654+ PSPSPrivate -> "private"

3655+ PSPSPublic -> "public"

3656+ PSPSUnlisted -> "unlisted"

3657+

1812-- | Describes the type of the promoted item.

3658-- | Describes the type of the promoted item.

1813data PromotedItemIdType

3659data PromotedItemIdType

1814 = PIITRecentUpload

3660 = PIITRecentUpload

@@ -1821,6 +3667,19 @@ data PromotedItemIdType

1821

3667

1822instance Hashable PromotedItemIdType

3668instance Hashable PromotedItemIdType

1823

3669

3670+instance FromText PromotedItemIdType where

3671+ fromText = \case

3672+ "recentUpload" -> Just PIITRecentUpload

3673+ "video" -> Just PIITVideo

3674+ "website" -> Just PIITWebsite

3675+ _ -> Nothing

3676+

3677+instance ToText PromotedItemIdType where

3678+ toText = \case

3679+ PIITRecentUpload -> "recentUpload"

3680+ PIITVideo -> "video"

3681+ PIITWebsite -> "website"

3682+

1824-- | It indicates if the resource (video or channel) has upcoming\/active

3683-- | It indicates if the resource (video or channel) has upcoming\/active

1825-- live broadcast content. Or it\'s \"none\" if there is not any

3684-- live broadcast content. Or it\'s \"none\" if there is not any

1826-- upcoming\/active live broadcasts.

3685-- upcoming\/active live broadcasts.

@@ -1835,6 +3694,19 @@ data SearchResultSnippetLiveBroadcastContent

1835

3694

1836instance Hashable SearchResultSnippetLiveBroadcastContent

3695instance Hashable SearchResultSnippetLiveBroadcastContent

1837

3696

3697+instance FromText SearchResultSnippetLiveBroadcastContent where

3698+ fromText = \case

3699+ "live" -> Just SRSLBCLive

3700+ "none" -> Just SRSLBCNone

3701+ "upcoming" -> Just SRSLBCUpcoming

3702+ _ -> Nothing

3703+

3704+instance ToText SearchResultSnippetLiveBroadcastContent where

3705+ toText = \case

3706+ SRSLBCLive -> "live"

3707+ SRSLBCNone -> "none"

3708+ SRSLBCUpcoming -> "upcoming"

3709+

1838-- | The type of activity this subscription is for (only uploads,

3710-- | The type of activity this subscription is for (only uploads,

1839-- everything).

3711-- everything).

1840data SubscriptionContentDetailsActivityType

3712data SubscriptionContentDetailsActivityType

@@ -1846,6 +3718,17 @@ data SubscriptionContentDetailsActivityType

1846

3718

1847instance Hashable SubscriptionContentDetailsActivityType

3719instance Hashable SubscriptionContentDetailsActivityType

1848

3720

3721+instance FromText SubscriptionContentDetailsActivityType where

3722+ fromText = \case

3723+ "all" -> Just SCDATAll

3724+ "uploads" -> Just SCDATUploads

3725+ _ -> Nothing

3726+

3727+instance ToText SubscriptionContentDetailsActivityType where

3728+ toText = \case

3729+ SCDATAll -> "all"

3730+ SCDATUploads -> "uploads"

3731+

1849-- | Video game rating, if any.

3732-- | Video game rating, if any.

1850data VideoAgeGatingVideoGameRating

3733data VideoAgeGatingVideoGameRating

1851 = VAGVGRAnyone

3734 = VAGVGRAnyone

@@ -1860,6 +3743,21 @@ data VideoAgeGatingVideoGameRating

1860

3743

1861instance Hashable VideoAgeGatingVideoGameRating

3744instance Hashable VideoAgeGatingVideoGameRating

1862

3745

3746+instance FromText VideoAgeGatingVideoGameRating where

3747+ fromText = \case

3748+ "anyone" -> Just VAGVGRAnyone

3749+ "m15Plus" -> Just VAGVGRM15Plus

3750+ "m16Plus" -> Just VAGVGRM16Plus

3751+ "m17Plus" -> Just VAGVGRM17Plus

3752+ _ -> Nothing

3753+

3754+instance ToText VideoAgeGatingVideoGameRating where

3755+ toText = \case

3756+ VAGVGRAnyone -> "anyone"

3757+ VAGVGRM15Plus -> "m15Plus"

3758+ VAGVGRM16Plus -> "m16Plus"

3759+ VAGVGRM17Plus -> "m17Plus"

3760+

1863-- | The value of captions indicates whether the video has captions or not.

3761-- | The value of captions indicates whether the video has captions or not.

1864data VideoContentDetailsCaption

3762data VideoContentDetailsCaption

1865 = VCDCFalse

3763 = VCDCFalse

@@ -1870,6 +3768,17 @@ data VideoContentDetailsCaption

1870

3768

1871instance Hashable VideoContentDetailsCaption

3769instance Hashable VideoContentDetailsCaption

1872

3770

3771+instance FromText VideoContentDetailsCaption where

3772+ fromText = \case

3773+ "false" -> Just VCDCFalse

3774+ "true" -> Just VCDCTrue

3775+ _ -> Nothing

3776+

3777+instance ToText VideoContentDetailsCaption where

3778+ toText = \case

3779+ VCDCFalse -> "false"

3780+ VCDCTrue -> "true"

3781+

1873-- | The value of definition indicates whether the video is available in high

3782-- | The value of definition indicates whether the video is available in high

1874-- definition or only in standard definition.

3783-- definition or only in standard definition.

1875data VideoContentDetailsDefinition

3784data VideoContentDetailsDefinition

@@ -1881,6 +3790,17 @@ data VideoContentDetailsDefinition

1881

3790

1882instance Hashable VideoContentDetailsDefinition

3791instance Hashable VideoContentDetailsDefinition

1883

3792

3793+instance FromText VideoContentDetailsDefinition where

3794+ fromText = \case

3795+ "hd" -> Just VCDDHD

3796+ "sd" -> Just VCDDSD

3797+ _ -> Nothing

3798+

3799+instance ToText VideoContentDetailsDefinition where

3800+ toText = \case

3801+ VCDDHD -> "hd"

3802+ VCDDSD -> "sd"

3803+

1884-- | Defines the context of the ping.

3804-- | Defines the context of the ping.

1885data VideoConversionPingContext

3805data VideoConversionPingContext

1886 = VCPCComment

3806 = VCPCComment

@@ -1895,6 +3815,21 @@ data VideoConversionPingContext

1895

3815

1896instance Hashable VideoConversionPingContext

3816instance Hashable VideoConversionPingContext

1897

3817

3818+instance FromText VideoConversionPingContext where

3819+ fromText = \case

3820+ "comment" -> Just VCPCComment

3821+ "dislike" -> Just VCPCDislike

3822+ "like" -> Just VCPCLike

3823+ "share" -> Just VCPCShare

3824+ _ -> Nothing

3825+

3826+instance ToText VideoConversionPingContext where

3827+ toText = \case

3828+ VCPCComment -> "comment"

3829+ VCPCDislike -> "dislike"

3830+ VCPCLike -> "like"

3831+ VCPCShare -> "share"

3832+

1898-- | The uploaded file\'s type as detected by YouTube\'s video processing

3833-- | The uploaded file\'s type as detected by YouTube\'s video processing

1899-- engine. Currently, YouTube only processes video files, but this field is

3834-- engine. Currently, YouTube only processes video files, but this field is

1900-- present whether a video file or another type of file was uploaded.

3835-- present whether a video file or another type of file was uploaded.

@@ -1917,6 +3852,27 @@ data VideoFileDetailsFileType

1917

3852

1918instance Hashable VideoFileDetailsFileType

3853instance Hashable VideoFileDetailsFileType

1919

3854

3855+instance FromText VideoFileDetailsFileType where

3856+ fromText = \case

3857+ "archive" -> Just VFDFTArchive

3858+ "audio" -> Just VFDFTAudio

3859+ "document" -> Just VFDFTDocument

3860+ "image" -> Just VFDFTImage

3861+ "other" -> Just VFDFTOther

3862+ "project" -> Just VFDFTProject

3863+ "video" -> Just VFDFTVideo

3864+ _ -> Nothing

3865+

3866+instance ToText VideoFileDetailsFileType where

3867+ toText = \case

3868+ VFDFTArchive -> "archive"

3869+ VFDFTAudio -> "audio"

3870+ VFDFTDocument -> "document"

3871+ VFDFTImage -> "image"

3872+ VFDFTOther -> "other"

3873+ VFDFTProject -> "project"

3874+ VFDFTVideo -> "video"

3875+

1920-- | The amount that YouTube needs to rotate the original source content to

3876-- | The amount that YouTube needs to rotate the original source content to

1921-- properly display the video.

3877-- properly display the video.

1922data VideoFileDetailsVideoStreamRotation

3878data VideoFileDetailsVideoStreamRotation

@@ -1934,6 +3890,23 @@ data VideoFileDetailsVideoStreamRotation

1934

3890

1935instance Hashable VideoFileDetailsVideoStreamRotation

3891instance Hashable VideoFileDetailsVideoStreamRotation

1936

3892

3893+instance FromText VideoFileDetailsVideoStreamRotation where

3894+ fromText = \case

3895+ "clockwise" -> Just VFDVSRClockwise

3896+ "counterClockwise" -> Just VFDVSRCounterClockwise

3897+ "none" -> Just VFDVSRNone

3898+ "other" -> Just VFDVSROther

3899+ "upsideDown" -> Just VFDVSRUpsideDown

3900+ _ -> Nothing

3901+

3902+instance ToText VideoFileDetailsVideoStreamRotation where

3903+ toText = \case

3904+ VFDVSRClockwise -> "clockwise"

3905+ VFDVSRCounterClockwise -> "counterClockwise"

3906+ VFDVSRNone -> "none"

3907+ VFDVSROther -> "other"

3908+ VFDVSRUpsideDown -> "upsideDown"

3909+

1937-- | The reason that YouTube failed to process the video. This property will

3910-- | The reason that YouTube failed to process the video. This property will

1938-- only have a value if the processingStatus property\'s value is failed.

3911-- only have a value if the processingStatus property\'s value is failed.

1939data VideoProcessingDetailsProcessingFailureReason

3912data VideoProcessingDetailsProcessingFailureReason

@@ -1949,6 +3922,21 @@ data VideoProcessingDetailsProcessingFailureReason

1949

3922

1950instance Hashable VideoProcessingDetailsProcessingFailureReason

3923instance Hashable VideoProcessingDetailsProcessingFailureReason

1951

3924

3925+instance FromText VideoProcessingDetailsProcessingFailureReason where

3926+ fromText = \case

3927+ "other" -> Just VPDPFROther

3928+ "streamingFailed" -> Just VPDPFRStreamingFailed

3929+ "transcodeFailed" -> Just VPDPFRTranscodeFailed

3930+ "uploadFailed" -> Just VPDPFRUploadFailed

3931+ _ -> Nothing

3932+

3933+instance ToText VideoProcessingDetailsProcessingFailureReason where

3934+ toText = \case

3935+ VPDPFROther -> "other"

3936+ VPDPFRStreamingFailed -> "streamingFailed"

3937+ VPDPFRTranscodeFailed -> "transcodeFailed"

3938+ VPDPFRUploadFailed -> "uploadFailed"

3939+

1952-- | The video\'s processing status. This value indicates whether YouTube was

3940-- | The video\'s processing status. This value indicates whether YouTube was

1953-- able to process the video or if the video is still being processed.

3941-- able to process the video or if the video is still being processed.

1954data VideoProcessingDetailsProcessingStatus

3942data VideoProcessingDetailsProcessingStatus

@@ -1964,6 +3952,21 @@ data VideoProcessingDetailsProcessingStatus

1964

3952

1965instance Hashable VideoProcessingDetailsProcessingStatus

3953instance Hashable VideoProcessingDetailsProcessingStatus

1966

3954

3955+instance FromText VideoProcessingDetailsProcessingStatus where

3956+ fromText = \case

3957+ "failed" -> Just VPDPSFailed

3958+ "processing" -> Just VPDPSProcessing

3959+ "succeeded" -> Just VPDPSSucceeded

3960+ "terminated" -> Just VPDPSTerminated

3961+ _ -> Nothing

3962+

3963+instance ToText VideoProcessingDetailsProcessingStatus where

3964+ toText = \case

3965+ VPDPSFailed -> "failed"

3966+ VPDPSProcessing -> "processing"

3967+ VPDPSSucceeded -> "succeeded"

3968+ VPDPSTerminated -> "terminated"

3969+

1967data VideoRatingRating

3970data VideoRatingRating

1968 = VRRDislike

3971 = VRRDislike

1969 -- ^ @dislike@

3972 -- ^ @dislike@

@@ -1977,6 +3980,21 @@ data VideoRatingRating

1977

3980

1978instance Hashable VideoRatingRating

3981instance Hashable VideoRatingRating

1979

3982

3983+instance FromText VideoRatingRating where

3984+ fromText = \case

3985+ "dislike" -> Just VRRDislike

3986+ "like" -> Just VRRLike

3987+ "none" -> Just VRRNone

3988+ "unspecified" -> Just VRRUnspecified

3989+ _ -> Nothing

3990+

3991+instance ToText VideoRatingRating where

3992+ toText = \case

3993+ VRRDislike -> "dislike"

3994+ VRRLike -> "like"

3995+ VRRNone -> "none"

3996+ VRRUnspecified -> "unspecified"

3997+

1980-- | Indicates if the video is an upcoming\/active live broadcast. Or it\'s

3998-- | Indicates if the video is an upcoming\/active live broadcast. Or it\'s

1981-- \"none\" if the video is not an upcoming\/active live broadcast.

3999-- \"none\" if the video is not an upcoming\/active live broadcast.

1982data VideoSnippetLiveBroadcastContent

4000data VideoSnippetLiveBroadcastContent

@@ -1990,6 +4008,19 @@ data VideoSnippetLiveBroadcastContent

1990

4008

1991instance Hashable VideoSnippetLiveBroadcastContent

4009instance Hashable VideoSnippetLiveBroadcastContent

1992

4010

4011+instance FromText VideoSnippetLiveBroadcastContent where

4012+ fromText = \case

4013+ "live" -> Just VSLBCLive

4014+ "none" -> Just VSLBCNone

4015+ "upcoming" -> Just VSLBCUpcoming

4016+ _ -> Nothing

4017+

4018+instance ToText VideoSnippetLiveBroadcastContent where

4019+ toText = \case

4020+ VSLBCLive -> "live"

4021+ VSLBCNone -> "none"

4022+ VSLBCUpcoming -> "upcoming"

4023+

1993-- | This value explains why a video failed to upload. This property is only

4024-- | This value explains why a video failed to upload. This property is only

1994-- present if the uploadStatus property indicates that the upload failed.

4025-- present if the uploadStatus property indicates that the upload failed.

1995data VideoStatusFailureReason

4026data VideoStatusFailureReason

@@ -2009,6 +4040,25 @@ data VideoStatusFailureReason

2009

4040

2010instance Hashable VideoStatusFailureReason

4041instance Hashable VideoStatusFailureReason

2011

4042

4043+instance FromText VideoStatusFailureReason where

4044+ fromText = \case

4045+ "codec" -> Just VSFRCodec

4046+ "conversion" -> Just VSFRConversion

4047+ "emptyFile" -> Just VSFREmptyFile

4048+ "invalidFile" -> Just VSFRInvalidFile

4049+ "tooSmall" -> Just VSFRTooSmall

4050+ "uploadAborted" -> Just VSFRUploadAborted

4051+ _ -> Nothing

4052+

4053+instance ToText VideoStatusFailureReason where

4054+ toText = \case

4055+ VSFRCodec -> "codec"

4056+ VSFRConversion -> "conversion"

4057+ VSFREmptyFile -> "emptyFile"

4058+ VSFRInvalidFile -> "invalidFile"

4059+ VSFRTooSmall -> "tooSmall"

4060+ VSFRUploadAborted -> "uploadAborted"

4061+

2012-- | The video\'s license.

4062-- | The video\'s license.

2013data VideoStatusLicense

4063data VideoStatusLicense

2014 = VSLCreativeCommon

4064 = VSLCreativeCommon

@@ -2019,6 +4069,17 @@ data VideoStatusLicense

2019

4069

2020instance Hashable VideoStatusLicense

4070instance Hashable VideoStatusLicense

2021

4071

4072+instance FromText VideoStatusLicense where

4073+ fromText = \case

4074+ "creativeCommon" -> Just VSLCreativeCommon

4075+ "youtube" -> Just VSLYoutube

4076+ _ -> Nothing

4077+

4078+instance ToText VideoStatusLicense where

4079+ toText = \case

4080+ VSLCreativeCommon -> "creativeCommon"

4081+ VSLYoutube -> "youtube"

4082+

2022-- | The video\'s privacy status.

4083-- | The video\'s privacy status.

2023data VideoStatusPrivacyStatus

4084data VideoStatusPrivacyStatus

2024 = VSPSPrivate

4085 = VSPSPrivate

@@ -2031,6 +4092,19 @@ data VideoStatusPrivacyStatus

2031

4092

2032instance Hashable VideoStatusPrivacyStatus

4093instance Hashable VideoStatusPrivacyStatus

2033

4094

4095+instance FromText VideoStatusPrivacyStatus where

4096+ fromText = \case

4097+ "private" -> Just VSPSPrivate

4098+ "public" -> Just VSPSPublic

4099+ "unlisted" -> Just VSPSUnlisted

4100+ _ -> Nothing

4101+

4102+instance ToText VideoStatusPrivacyStatus where

4103+ toText = \case

4104+ VSPSPrivate -> "private"

4105+ VSPSPublic -> "public"

4106+ VSPSUnlisted -> "unlisted"

4107+

2034-- | This value explains why YouTube rejected an uploaded video. This

4108-- | This value explains why YouTube rejected an uploaded video. This

2035-- property is only present if the uploadStatus property indicates that the

4109-- property is only present if the uploadStatus property indicates that the

2036-- upload was rejected.

4110-- upload was rejected.

@@ -2057,6 +4131,31 @@ data VideoStatusRejectionReason

2057

4131

2058instance Hashable VideoStatusRejectionReason

4132instance Hashable VideoStatusRejectionReason

2059

4133

4134+instance FromText VideoStatusRejectionReason where

4135+ fromText = \case

4136+ "claim" -> Just VSRRClaim

4137+ "copyright" -> Just VSRRCopyright

4138+ "duplicate" -> Just VSRRDuplicate

4139+ "inappropriate" -> Just VSRRInappropriate

4140+ "length" -> Just VSRRLength

4141+ "termsOfUse" -> Just VSRRTermsOfUse

4142+ "trademark" -> Just VSRRTrademark

4143+ "uploaderAccountClosed" -> Just VSRRUploaderAccountClosed

4144+ "uploaderAccountSuspended" -> Just VSRRUploaderAccountSuspended

4145+ _ -> Nothing

4146+

4147+instance ToText VideoStatusRejectionReason where

4148+ toText = \case

4149+ VSRRClaim -> "claim"

4150+ VSRRCopyright -> "copyright"

4151+ VSRRDuplicate -> "duplicate"

4152+ VSRRInappropriate -> "inappropriate"

4153+ VSRRLength -> "length"

4154+ VSRRTermsOfUse -> "termsOfUse"

4155+ VSRRTrademark -> "trademark"

4156+ VSRRUploaderAccountClosed -> "uploaderAccountClosed"

4157+ VSRRUploaderAccountSuspended -> "uploaderAccountSuspended"

4158+

2060-- | The status of the uploaded video.

4159-- | The status of the uploaded video.

2061data VideoStatusUploadStatus

4160data VideoStatusUploadStatus

2062 = VSUSDeleted

4161 = VSUSDeleted

@@ -2073,6 +4172,23 @@ data VideoStatusUploadStatus

2073

4172

2074instance Hashable VideoStatusUploadStatus

4173instance Hashable VideoStatusUploadStatus

2075

4174

4175+instance FromText VideoStatusUploadStatus where

4176+ fromText = \case

4177+ "deleted" -> Just VSUSDeleted

4178+ "failed" -> Just VSUSFailed

4179+ "processed" -> Just VSUSProcessed

4180+ "rejected" -> Just VSUSRejected

4181+ "uploaded" -> Just VSUSUploaded

4182+ _ -> Nothing

4183+

4184+instance ToText VideoStatusUploadStatus where

4185+ toText = \case

4186+ VSUSDeleted -> "deleted"

4187+ VSUSFailed -> "failed"

4188+ VSUSProcessed -> "processed"

4189+ VSUSRejected -> "rejected"

4190+ VSUSUploaded -> "uploaded"

4191+

2076data VideoSuggestionsItemEditorSuggestions

4192data VideoSuggestionsItemEditorSuggestions

2077 = VSIESAudioQuietAudioSwap

4193 = VSIESAudioQuietAudioSwap

2078 -- ^ @audioQuietAudioSwap@

4194 -- ^ @audioQuietAudioSwap@

@@ -2086,6 +4202,21 @@ data VideoSuggestionsItemEditorSuggestions

2086

4202

2087instance Hashable VideoSuggestionsItemEditorSuggestions

4203instance Hashable VideoSuggestionsItemEditorSuggestions

2088

4204

4205+instance FromText VideoSuggestionsItemEditorSuggestions where

4206+ fromText = \case

4207+ "audioQuietAudioSwap" -> Just VSIESAudioQuietAudioSwap

4208+ "videoAutoLevels" -> Just VSIESVideoAutoLevels

4209+ "videoCrop" -> Just VSIESVideoCrop

4210+ "videoStabilize" -> Just VSIESVideoStabilize

4211+ _ -> Nothing

4212+

4213+instance ToText VideoSuggestionsItemEditorSuggestions where

4214+ toText = \case

4215+ VSIESAudioQuietAudioSwap -> "audioQuietAudioSwap"

4216+ VSIESVideoAutoLevels -> "videoAutoLevels"

4217+ VSIESVideoCrop -> "videoCrop"

4218+ VSIESVideoStabilize -> "videoStabilize"

4219+

2089data VideoSuggestionsItemProcessingErrors

4220data VideoSuggestionsItemProcessingErrors

2090 = VSIPEArchiveFile

4221 = VSIPEArchiveFile

2091 -- ^ @archiveFile@

4222 -- ^ @archiveFile@

@@ -2103,6 +4234,25 @@ data VideoSuggestionsItemProcessingErrors

2103

4234

2104instance Hashable VideoSuggestionsItemProcessingErrors

4235instance Hashable VideoSuggestionsItemProcessingErrors

2105

4236

4237+instance FromText VideoSuggestionsItemProcessingErrors where

4238+ fromText = \case

4239+ "archiveFile" -> Just VSIPEArchiveFile

4240+ "audioFile" -> Just VSIPEAudioFile

4241+ "docFile" -> Just VSIPEDocFile

4242+ "imageFile" -> Just VSIPEImageFile

4243+ "notAVideoFile" -> Just VSIPENotAVideoFile

4244+ "projectFile" -> Just VSIPEProjectFile

4245+ _ -> Nothing

4246+

4247+instance ToText VideoSuggestionsItemProcessingErrors where

4248+ toText = \case

4249+ VSIPEArchiveFile -> "archiveFile"

4250+ VSIPEAudioFile -> "audioFile"

4251+ VSIPEDocFile -> "docFile"

4252+ VSIPEImageFile -> "imageFile"

4253+ VSIPENotAVideoFile -> "notAVideoFile"

4254+ VSIPEProjectFile -> "projectFile"

4255+

2106data VideoSuggestionsItemProcessingHints

4256data VideoSuggestionsItemProcessingHints

2107 = VSIPHNonStreamableMov

4257 = VSIPHNonStreamableMov

2108 -- ^ @nonStreamableMov@

4258 -- ^ @nonStreamableMov@

@@ -2112,6 +4262,17 @@ data VideoSuggestionsItemProcessingHints

2112

4262

2113instance Hashable VideoSuggestionsItemProcessingHints

4263instance Hashable VideoSuggestionsItemProcessingHints

2114

4264

4265+instance FromText VideoSuggestionsItemProcessingHints where

4266+ fromText = \case

4267+ "nonStreamableMov" -> Just VSIPHNonStreamableMov

4268+ "sendBestQualityVideo" -> Just VSIPHSendBestQualityVideo

4269+ _ -> Nothing

4270+

4271+instance ToText VideoSuggestionsItemProcessingHints where

4272+ toText = \case

4273+ VSIPHNonStreamableMov -> "nonStreamableMov"

4274+ VSIPHSendBestQualityVideo -> "sendBestQualityVideo"

4275+

2115data VideoSuggestionsItemProcessingWarnings

4276data VideoSuggestionsItemProcessingWarnings

2116 = VSIPWHasEditlist

4277 = VSIPWHasEditlist

2117 -- ^ @hasEditlist@

4278 -- ^ @hasEditlist@

@@ -2130,3 +4291,24 @@ data VideoSuggestionsItemProcessingWarnings

2130 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

4291 deriving (Eq,Ord,Enum,Read,Show,Data,Typeable,Generic)

2131

4292

2132instance Hashable VideoSuggestionsItemProcessingWarnings

4293instance Hashable VideoSuggestionsItemProcessingWarnings

4294+

4295+instance FromText VideoSuggestionsItemProcessingWarnings where

4296+ fromText = \case

4297+ "hasEditlist" -> Just VSIPWHasEditlist

4298+ "inconsistentResolution" -> Just VSIPWInconsistentResolution

4299+ "problematicAudioCodec" -> Just VSIPWProblematicAudioCodec

4300+ "problematicVideoCodec" -> Just VSIPWProblematicVideoCodec

4301+ "unknownAudioCodec" -> Just VSIPWUnknownAudioCodec

4302+ "unknownContainer" -> Just VSIPWUnknownContainer

4303+ "unknownVideoCodec" -> Just VSIPWUnknownVideoCodec

4304+ _ -> Nothing

4305+

4306+instance ToText VideoSuggestionsItemProcessingWarnings where

4307+ toText = \case

4308+ VSIPWHasEditlist -> "hasEditlist"

4309+ VSIPWInconsistentResolution -> "inconsistentResolution"

4310+ VSIPWProblematicAudioCodec -> "problematicAudioCodec"

4311+ VSIPWProblematicVideoCodec -> "problematicVideoCodec"

4312+ VSIPWUnknownAudioCodec -> "unknownAudioCodec"

4313+ VSIPWUnknownContainer -> "unknownContainer"

4314+ VSIPWUnknownVideoCodec -> "unknownVideoCodec"