CustomLineItem.hs

module Stratosphere.BillingConductor.CustomLineItem (
        module Exports, CustomLineItem(..), mkCustomLineItem
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.BillingConductor.CustomLineItem.BillingPeriodRangeProperty as Exports
import {-# SOURCE #-} Stratosphere.BillingConductor.CustomLineItem.CustomLineItemChargeDetailsProperty as Exports
import {-# SOURCE #-} Stratosphere.BillingConductor.CustomLineItem.PresentationDetailsProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data CustomLineItem
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-billingconductor-customlineitem.html>
    CustomLineItem {haddock_workaround_ :: (),
                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-billingconductor-customlineitem.html#cfn-billingconductor-customlineitem-accountid>
                    accountId :: (Prelude.Maybe (Value Prelude.Text)),
                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-billingconductor-customlineitem.html#cfn-billingconductor-customlineitem-billinggrouparn>
                    billingGroupArn :: (Value Prelude.Text),
                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-billingconductor-customlineitem.html#cfn-billingconductor-customlineitem-billingperiodrange>
                    billingPeriodRange :: (Prelude.Maybe BillingPeriodRangeProperty),
                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-billingconductor-customlineitem.html#cfn-billingconductor-customlineitem-computationrule>
                    computationRule :: (Prelude.Maybe (Value Prelude.Text)),
                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-billingconductor-customlineitem.html#cfn-billingconductor-customlineitem-customlineitemchargedetails>
                    customLineItemChargeDetails :: (Prelude.Maybe CustomLineItemChargeDetailsProperty),
                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-billingconductor-customlineitem.html#cfn-billingconductor-customlineitem-description>
                    description :: (Prelude.Maybe (Value Prelude.Text)),
                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-billingconductor-customlineitem.html#cfn-billingconductor-customlineitem-name>
                    name :: (Value Prelude.Text),
                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-billingconductor-customlineitem.html#cfn-billingconductor-customlineitem-presentationdetails>
                    presentationDetails :: (Prelude.Maybe PresentationDetailsProperty),
                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-billingconductor-customlineitem.html#cfn-billingconductor-customlineitem-tags>
                    tags :: (Prelude.Maybe [Tag])}
  deriving stock (Prelude.Eq, Prelude.Show)
mkCustomLineItem ::
  Value Prelude.Text -> Value Prelude.Text -> CustomLineItem
mkCustomLineItem billingGroupArn name
  = CustomLineItem
      {haddock_workaround_ = (), billingGroupArn = billingGroupArn,
       name = name, accountId = Prelude.Nothing,
       billingPeriodRange = Prelude.Nothing,
       computationRule = Prelude.Nothing,
       customLineItemChargeDetails = Prelude.Nothing,
       description = Prelude.Nothing,
       presentationDetails = Prelude.Nothing, tags = Prelude.Nothing}
instance ToResourceProperties CustomLineItem where
  toResourceProperties CustomLineItem {..}
    = ResourceProperties
        {awsType = "AWS::BillingConductor::CustomLineItem",
         supportsTags = Prelude.True,
         properties = Prelude.fromList
                        ((Prelude.<>)
                           ["BillingGroupArn" JSON..= billingGroupArn, "Name" JSON..= name]
                           (Prelude.catMaybes
                              [(JSON..=) "AccountId" Prelude.<$> accountId,
                               (JSON..=) "BillingPeriodRange" Prelude.<$> billingPeriodRange,
                               (JSON..=) "ComputationRule" Prelude.<$> computationRule,
                               (JSON..=) "CustomLineItemChargeDetails"
                                 Prelude.<$> customLineItemChargeDetails,
                               (JSON..=) "Description" Prelude.<$> description,
                               (JSON..=) "PresentationDetails" Prelude.<$> presentationDetails,
                               (JSON..=) "Tags" Prelude.<$> tags]))}
instance JSON.ToJSON CustomLineItem where
  toJSON CustomLineItem {..}
    = JSON.object
        (Prelude.fromList
           ((Prelude.<>)
              ["BillingGroupArn" JSON..= billingGroupArn, "Name" JSON..= name]
              (Prelude.catMaybes
                 [(JSON..=) "AccountId" Prelude.<$> accountId,
                  (JSON..=) "BillingPeriodRange" Prelude.<$> billingPeriodRange,
                  (JSON..=) "ComputationRule" Prelude.<$> computationRule,
                  (JSON..=) "CustomLineItemChargeDetails"
                    Prelude.<$> customLineItemChargeDetails,
                  (JSON..=) "Description" Prelude.<$> description,
                  (JSON..=) "PresentationDetails" Prelude.<$> presentationDetails,
                  (JSON..=) "Tags" Prelude.<$> tags])))
instance Property "AccountId" CustomLineItem where
  type PropertyType "AccountId" CustomLineItem = Value Prelude.Text
  set newValue CustomLineItem {..}
    = CustomLineItem {accountId = Prelude.pure newValue, ..}
instance Property "BillingGroupArn" CustomLineItem where
  type PropertyType "BillingGroupArn" CustomLineItem = Value Prelude.Text
  set newValue CustomLineItem {..}
    = CustomLineItem {billingGroupArn = newValue, ..}
instance Property "BillingPeriodRange" CustomLineItem where
  type PropertyType "BillingPeriodRange" CustomLineItem = BillingPeriodRangeProperty
  set newValue CustomLineItem {..}
    = CustomLineItem {billingPeriodRange = Prelude.pure newValue, ..}
instance Property "ComputationRule" CustomLineItem where
  type PropertyType "ComputationRule" CustomLineItem = Value Prelude.Text
  set newValue CustomLineItem {..}
    = CustomLineItem {computationRule = Prelude.pure newValue, ..}
instance Property "CustomLineItemChargeDetails" CustomLineItem where
  type PropertyType "CustomLineItemChargeDetails" CustomLineItem = CustomLineItemChargeDetailsProperty
  set newValue CustomLineItem {..}
    = CustomLineItem
        {customLineItemChargeDetails = Prelude.pure newValue, ..}
instance Property "Description" CustomLineItem where
  type PropertyType "Description" CustomLineItem = Value Prelude.Text
  set newValue CustomLineItem {..}
    = CustomLineItem {description = Prelude.pure newValue, ..}
instance Property "Name" CustomLineItem where
  type PropertyType "Name" CustomLineItem = Value Prelude.Text
  set newValue CustomLineItem {..}
    = CustomLineItem {name = newValue, ..}
instance Property "PresentationDetails" CustomLineItem where
  type PropertyType "PresentationDetails" CustomLineItem = PresentationDetailsProperty
  set newValue CustomLineItem {..}
    = CustomLineItem {presentationDetails = Prelude.pure newValue, ..}
instance Property "Tags" CustomLineItem where
  type PropertyType "Tags" CustomLineItem = [Tag]
  set newValue CustomLineItem {..}
    = CustomLineItem {tags = Prelude.pure newValue, ..}