{-# LANGUAGE MultiWayIf #-}
-- CHANGE WITH CAUTION: This is a generated code file generated by https://github.com/Haskell-OpenAPI-Code-Generator/Haskell-OpenAPI-Client-Code-Generator.
{-# LANGUAGE OverloadedStrings #-}

-- | Contains the types generated from the schema FinancialReportingFinanceReportRunRunParameters
module StripeAPI.Types.FinancialReportingFinanceReportRunRunParameters where

import qualified Control.Monad.Fail
import qualified Data.Aeson
import qualified Data.Aeson as Data.Aeson.Encoding.Internal
import qualified Data.Aeson as Data.Aeson.Types
import qualified Data.Aeson as Data.Aeson.Types.FromJSON
import qualified Data.Aeson as Data.Aeson.Types.Internal
import qualified Data.Aeson as Data.Aeson.Types.ToJSON
import qualified Data.ByteString.Char8
import qualified Data.ByteString.Char8 as Data.ByteString.Internal
import qualified Data.Functor
import qualified Data.Scientific
import qualified Data.Text
import qualified Data.Text.Internal
import qualified Data.Time.Calendar as Data.Time.Calendar.Days
import qualified Data.Time.LocalTime as Data.Time.LocalTime.Internal.ZonedTime
import qualified GHC.Base
import qualified GHC.Classes
import qualified GHC.Int
import qualified GHC.Show
import qualified GHC.Types
import qualified StripeAPI.Common
import StripeAPI.TypeAlias
import qualified Prelude as GHC.Integer.Type
import qualified Prelude as GHC.Maybe

-- | Defines the object schema located at @components.schemas.financial_reporting_finance_report_run_run_parameters@ in the specification.
data FinancialReportingFinanceReportRunRunParameters = FinancialReportingFinanceReportRunRunParameters
  { -- | columns: The set of output columns requested for inclusion in the report run.
    FinancialReportingFinanceReportRunRunParameters -> Maybe [Text]
financialReportingFinanceReportRunRunParametersColumns :: (GHC.Maybe.Maybe ([Data.Text.Internal.Text])),
    -- | connected_account: Connected account ID by which to filter the report run.
    --
    -- Constraints:
    --
    -- * Maximum length of 5000
    FinancialReportingFinanceReportRunRunParameters -> Maybe Text
financialReportingFinanceReportRunRunParametersConnectedAccount :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
    -- | currency: Currency of objects to be included in the report run.
    FinancialReportingFinanceReportRunRunParameters -> Maybe Text
financialReportingFinanceReportRunRunParametersCurrency :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
    -- | interval_end: Ending timestamp of data to be included in the report run (exclusive).
    FinancialReportingFinanceReportRunRunParameters -> Maybe Int
financialReportingFinanceReportRunRunParametersIntervalEnd :: (GHC.Maybe.Maybe GHC.Types.Int),
    -- | interval_start: Starting timestamp of data to be included in the report run.
    FinancialReportingFinanceReportRunRunParameters -> Maybe Int
financialReportingFinanceReportRunRunParametersIntervalStart :: (GHC.Maybe.Maybe GHC.Types.Int),
    -- | payout: Payout ID by which to filter the report run.
    --
    -- Constraints:
    --
    -- * Maximum length of 5000
    FinancialReportingFinanceReportRunRunParameters -> Maybe Text
financialReportingFinanceReportRunRunParametersPayout :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
    -- | reporting_category: Category of balance transactions to be included in the report run.
    --
    -- Constraints:
    --
    -- * Maximum length of 5000
    FinancialReportingFinanceReportRunRunParameters -> Maybe Text
financialReportingFinanceReportRunRunParametersReportingCategory :: (GHC.Maybe.Maybe Data.Text.Internal.Text),
    -- | timezone: Defaults to \`Etc\/UTC\`. The output timezone for all timestamps in the report. A list of possible time zone values is maintained at the [IANA Time Zone Database](http:\/\/www.iana.org\/time-zones). Has no effect on \`interval_start\` or \`interval_end\`.
    --
    -- Constraints:
    --
    -- * Maximum length of 5000
    FinancialReportingFinanceReportRunRunParameters -> Maybe Text
financialReportingFinanceReportRunRunParametersTimezone :: (GHC.Maybe.Maybe Data.Text.Internal.Text)
  }
  deriving
    ( Int -> FinancialReportingFinanceReportRunRunParameters -> ShowS
[FinancialReportingFinanceReportRunRunParameters] -> ShowS
FinancialReportingFinanceReportRunRunParameters -> String
(Int -> FinancialReportingFinanceReportRunRunParameters -> ShowS)
-> (FinancialReportingFinanceReportRunRunParameters -> String)
-> ([FinancialReportingFinanceReportRunRunParameters] -> ShowS)
-> Show FinancialReportingFinanceReportRunRunParameters
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [FinancialReportingFinanceReportRunRunParameters] -> ShowS
$cshowList :: [FinancialReportingFinanceReportRunRunParameters] -> ShowS
show :: FinancialReportingFinanceReportRunRunParameters -> String
$cshow :: FinancialReportingFinanceReportRunRunParameters -> String
showsPrec :: Int -> FinancialReportingFinanceReportRunRunParameters -> ShowS
$cshowsPrec :: Int -> FinancialReportingFinanceReportRunRunParameters -> ShowS
GHC.Show.Show,
      FinancialReportingFinanceReportRunRunParameters
-> FinancialReportingFinanceReportRunRunParameters -> Bool
(FinancialReportingFinanceReportRunRunParameters
 -> FinancialReportingFinanceReportRunRunParameters -> Bool)
-> (FinancialReportingFinanceReportRunRunParameters
    -> FinancialReportingFinanceReportRunRunParameters -> Bool)
-> Eq FinancialReportingFinanceReportRunRunParameters
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: FinancialReportingFinanceReportRunRunParameters
-> FinancialReportingFinanceReportRunRunParameters -> Bool
$c/= :: FinancialReportingFinanceReportRunRunParameters
-> FinancialReportingFinanceReportRunRunParameters -> Bool
== :: FinancialReportingFinanceReportRunRunParameters
-> FinancialReportingFinanceReportRunRunParameters -> Bool
$c== :: FinancialReportingFinanceReportRunRunParameters
-> FinancialReportingFinanceReportRunRunParameters -> Bool
GHC.Classes.Eq
    )

instance Data.Aeson.Types.ToJSON.ToJSON FinancialReportingFinanceReportRunRunParameters where
  toJSON :: FinancialReportingFinanceReportRunRunParameters -> Value
toJSON FinancialReportingFinanceReportRunRunParameters
obj = [Pair] -> Value
Data.Aeson.Types.Internal.object (Text
"columns" Text -> Maybe [Text] -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= FinancialReportingFinanceReportRunRunParameters -> Maybe [Text]
financialReportingFinanceReportRunRunParametersColumns FinancialReportingFinanceReportRunRunParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"connected_account" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= FinancialReportingFinanceReportRunRunParameters -> Maybe Text
financialReportingFinanceReportRunRunParametersConnectedAccount FinancialReportingFinanceReportRunRunParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"currency" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= FinancialReportingFinanceReportRunRunParameters -> Maybe Text
financialReportingFinanceReportRunRunParametersCurrency FinancialReportingFinanceReportRunRunParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"interval_end" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= FinancialReportingFinanceReportRunRunParameters -> Maybe Int
financialReportingFinanceReportRunRunParametersIntervalEnd FinancialReportingFinanceReportRunRunParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"interval_start" Text -> Maybe Int -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= FinancialReportingFinanceReportRunRunParameters -> Maybe Int
financialReportingFinanceReportRunRunParametersIntervalStart FinancialReportingFinanceReportRunRunParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"payout" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= FinancialReportingFinanceReportRunRunParameters -> Maybe Text
financialReportingFinanceReportRunRunParametersPayout FinancialReportingFinanceReportRunRunParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"reporting_category" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= FinancialReportingFinanceReportRunRunParameters -> Maybe Text
financialReportingFinanceReportRunRunParametersReportingCategory FinancialReportingFinanceReportRunRunParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: Text
"timezone" Text -> Maybe Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= FinancialReportingFinanceReportRunRunParameters -> Maybe Text
financialReportingFinanceReportRunRunParametersTimezone FinancialReportingFinanceReportRunRunParameters
obj Pair -> [Pair] -> [Pair]
forall a. a -> [a] -> [a]
: [Pair]
forall a. Monoid a => a
GHC.Base.mempty)
  toEncoding :: FinancialReportingFinanceReportRunRunParameters -> Encoding
toEncoding FinancialReportingFinanceReportRunRunParameters
obj = Series -> Encoding
Data.Aeson.Encoding.Internal.pairs ((Text
"columns" Text -> Maybe [Text] -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= FinancialReportingFinanceReportRunRunParameters -> Maybe [Text]
financialReportingFinanceReportRunRunParametersColumns FinancialReportingFinanceReportRunRunParameters
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"connected_account" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= FinancialReportingFinanceReportRunRunParameters -> Maybe Text
financialReportingFinanceReportRunRunParametersConnectedAccount FinancialReportingFinanceReportRunRunParameters
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"currency" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= FinancialReportingFinanceReportRunRunParameters -> Maybe Text
financialReportingFinanceReportRunRunParametersCurrency FinancialReportingFinanceReportRunRunParameters
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"interval_end" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= FinancialReportingFinanceReportRunRunParameters -> Maybe Int
financialReportingFinanceReportRunRunParametersIntervalEnd FinancialReportingFinanceReportRunRunParameters
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"interval_start" Text -> Maybe Int -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= FinancialReportingFinanceReportRunRunParameters -> Maybe Int
financialReportingFinanceReportRunRunParametersIntervalStart FinancialReportingFinanceReportRunRunParameters
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"payout" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= FinancialReportingFinanceReportRunRunParameters -> Maybe Text
financialReportingFinanceReportRunRunParametersPayout FinancialReportingFinanceReportRunRunParameters
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> ((Text
"reporting_category" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= FinancialReportingFinanceReportRunRunParameters -> Maybe Text
financialReportingFinanceReportRunRunParametersReportingCategory FinancialReportingFinanceReportRunRunParameters
obj) Series -> Series -> Series
forall a. Semigroup a => a -> a -> a
GHC.Base.<> (Text
"timezone" Text -> Maybe Text -> Series
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Data.Aeson.Types.ToJSON..= FinancialReportingFinanceReportRunRunParameters -> Maybe Text
financialReportingFinanceReportRunRunParametersTimezone FinancialReportingFinanceReportRunRunParameters
obj))))))))

instance Data.Aeson.Types.FromJSON.FromJSON FinancialReportingFinanceReportRunRunParameters where
  parseJSON :: Value -> Parser FinancialReportingFinanceReportRunRunParameters
parseJSON = String
-> (Object
    -> Parser FinancialReportingFinanceReportRunRunParameters)
-> Value
-> Parser FinancialReportingFinanceReportRunRunParameters
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.Aeson.Types.FromJSON.withObject String
"FinancialReportingFinanceReportRunRunParameters" (\Object
obj -> ((((((((Maybe [Text]
 -> Maybe Text
 -> Maybe Text
 -> Maybe Int
 -> Maybe Int
 -> Maybe Text
 -> Maybe Text
 -> Maybe Text
 -> FinancialReportingFinanceReportRunRunParameters)
-> Parser
     (Maybe [Text]
      -> Maybe Text
      -> Maybe Text
      -> Maybe Int
      -> Maybe Int
      -> Maybe Text
      -> Maybe Text
      -> Maybe Text
      -> FinancialReportingFinanceReportRunRunParameters)
forall (f :: * -> *) a. Applicative f => a -> f a
GHC.Base.pure Maybe [Text]
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> FinancialReportingFinanceReportRunRunParameters
FinancialReportingFinanceReportRunRunParameters Parser
  (Maybe [Text]
   -> Maybe Text
   -> Maybe Text
   -> Maybe Int
   -> Maybe Int
   -> Maybe Text
   -> Maybe Text
   -> Maybe Text
   -> FinancialReportingFinanceReportRunRunParameters)
-> Parser (Maybe [Text])
-> Parser
     (Maybe Text
      -> Maybe Text
      -> Maybe Int
      -> Maybe Int
      -> Maybe Text
      -> Maybe Text
      -> Maybe Text
      -> FinancialReportingFinanceReportRunRunParameters)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe [Text])
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"columns")) Parser
  (Maybe Text
   -> Maybe Text
   -> Maybe Int
   -> Maybe Int
   -> Maybe Text
   -> Maybe Text
   -> Maybe Text
   -> FinancialReportingFinanceReportRunRunParameters)
-> Parser (Maybe Text)
-> Parser
     (Maybe Text
      -> Maybe Int
      -> Maybe Int
      -> Maybe Text
      -> Maybe Text
      -> Maybe Text
      -> FinancialReportingFinanceReportRunRunParameters)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"connected_account")) Parser
  (Maybe Text
   -> Maybe Int
   -> Maybe Int
   -> Maybe Text
   -> Maybe Text
   -> Maybe Text
   -> FinancialReportingFinanceReportRunRunParameters)
-> Parser (Maybe Text)
-> Parser
     (Maybe Int
      -> Maybe Int
      -> Maybe Text
      -> Maybe Text
      -> Maybe Text
      -> FinancialReportingFinanceReportRunRunParameters)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"currency")) Parser
  (Maybe Int
   -> Maybe Int
   -> Maybe Text
   -> Maybe Text
   -> Maybe Text
   -> FinancialReportingFinanceReportRunRunParameters)
-> Parser (Maybe Int)
-> Parser
     (Maybe Int
      -> Maybe Text
      -> Maybe Text
      -> Maybe Text
      -> FinancialReportingFinanceReportRunRunParameters)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"interval_end")) Parser
  (Maybe Int
   -> Maybe Text
   -> Maybe Text
   -> Maybe Text
   -> FinancialReportingFinanceReportRunRunParameters)
-> Parser (Maybe Int)
-> Parser
     (Maybe Text
      -> Maybe Text
      -> Maybe Text
      -> FinancialReportingFinanceReportRunRunParameters)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Int)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"interval_start")) Parser
  (Maybe Text
   -> Maybe Text
   -> Maybe Text
   -> FinancialReportingFinanceReportRunRunParameters)
-> Parser (Maybe Text)
-> Parser
     (Maybe Text
      -> Maybe Text -> FinancialReportingFinanceReportRunRunParameters)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"payout")) Parser
  (Maybe Text
   -> Maybe Text -> FinancialReportingFinanceReportRunRunParameters)
-> Parser (Maybe Text)
-> Parser
     (Maybe Text -> FinancialReportingFinanceReportRunRunParameters)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"reporting_category")) Parser
  (Maybe Text -> FinancialReportingFinanceReportRunRunParameters)
-> Parser (Maybe Text)
-> Parser FinancialReportingFinanceReportRunRunParameters
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
GHC.Base.<*> (Object
obj Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Data.Aeson.Types.FromJSON..:? Text
"timezone"))

-- | Create a new 'FinancialReportingFinanceReportRunRunParameters' with all required fields.
mkFinancialReportingFinanceReportRunRunParameters :: FinancialReportingFinanceReportRunRunParameters
mkFinancialReportingFinanceReportRunRunParameters :: FinancialReportingFinanceReportRunRunParameters
mkFinancialReportingFinanceReportRunRunParameters =
  FinancialReportingFinanceReportRunRunParameters :: Maybe [Text]
-> Maybe Text
-> Maybe Text
-> Maybe Int
-> Maybe Int
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> FinancialReportingFinanceReportRunRunParameters
FinancialReportingFinanceReportRunRunParameters
    { financialReportingFinanceReportRunRunParametersColumns :: Maybe [Text]
financialReportingFinanceReportRunRunParametersColumns = Maybe [Text]
forall a. Maybe a
GHC.Maybe.Nothing,
      financialReportingFinanceReportRunRunParametersConnectedAccount :: Maybe Text
financialReportingFinanceReportRunRunParametersConnectedAccount = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
      financialReportingFinanceReportRunRunParametersCurrency :: Maybe Text
financialReportingFinanceReportRunRunParametersCurrency = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
      financialReportingFinanceReportRunRunParametersIntervalEnd :: Maybe Int
financialReportingFinanceReportRunRunParametersIntervalEnd = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
      financialReportingFinanceReportRunRunParametersIntervalStart :: Maybe Int
financialReportingFinanceReportRunRunParametersIntervalStart = Maybe Int
forall a. Maybe a
GHC.Maybe.Nothing,
      financialReportingFinanceReportRunRunParametersPayout :: Maybe Text
financialReportingFinanceReportRunRunParametersPayout = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
      financialReportingFinanceReportRunRunParametersReportingCategory :: Maybe Text
financialReportingFinanceReportRunRunParametersReportingCategory = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing,
      financialReportingFinanceReportRunRunParametersTimezone :: Maybe Text
financialReportingFinanceReportRunRunParametersTimezone = Maybe Text
forall a. Maybe a
GHC.Maybe.Nothing
    }