EdiConfigurationProperty.hs

module Stratosphere.B2BI.Capability.EdiConfigurationProperty (
        module Exports, EdiConfigurationProperty(..),
        mkEdiConfigurationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.B2BI.Capability.EdiTypeProperty as Exports
import {-# SOURCE #-} Stratosphere.B2BI.Capability.S3LocationProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data EdiConfigurationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-b2bi-capability-ediconfiguration.html>
    EdiConfigurationProperty {haddock_workaround_ :: (),
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-b2bi-capability-ediconfiguration.html#cfn-b2bi-capability-ediconfiguration-capabilitydirection>
                              capabilityDirection :: (Prelude.Maybe (Value Prelude.Text)),
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-b2bi-capability-ediconfiguration.html#cfn-b2bi-capability-ediconfiguration-inputlocation>
                              inputLocation :: S3LocationProperty,
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-b2bi-capability-ediconfiguration.html#cfn-b2bi-capability-ediconfiguration-outputlocation>
                              outputLocation :: S3LocationProperty,
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-b2bi-capability-ediconfiguration.html#cfn-b2bi-capability-ediconfiguration-transformerid>
                              transformerId :: (Value Prelude.Text),
                              -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-b2bi-capability-ediconfiguration.html#cfn-b2bi-capability-ediconfiguration-type>
                              type' :: EdiTypeProperty}
  deriving stock (Prelude.Eq, Prelude.Show)
mkEdiConfigurationProperty ::
  S3LocationProperty
  -> S3LocationProperty
     -> Value Prelude.Text
        -> EdiTypeProperty -> EdiConfigurationProperty
mkEdiConfigurationProperty
  inputLocation
  outputLocation
  transformerId
  type'
  = EdiConfigurationProperty
      {haddock_workaround_ = (), inputLocation = inputLocation,
       outputLocation = outputLocation, transformerId = transformerId,
       type' = type', capabilityDirection = Prelude.Nothing}
instance ToResourceProperties EdiConfigurationProperty where
  toResourceProperties EdiConfigurationProperty {..}
    = ResourceProperties
        {awsType = "AWS::B2BI::Capability.EdiConfiguration",
         supportsTags = Prelude.False,
         properties = Prelude.fromList
                        ((Prelude.<>)
                           ["InputLocation" JSON..= inputLocation,
                            "OutputLocation" JSON..= outputLocation,
                            "TransformerId" JSON..= transformerId, "Type" JSON..= type']
                           (Prelude.catMaybes
                              [(JSON..=) "CapabilityDirection"
                                 Prelude.<$> capabilityDirection]))}
instance JSON.ToJSON EdiConfigurationProperty where
  toJSON EdiConfigurationProperty {..}
    = JSON.object
        (Prelude.fromList
           ((Prelude.<>)
              ["InputLocation" JSON..= inputLocation,
               "OutputLocation" JSON..= outputLocation,
               "TransformerId" JSON..= transformerId, "Type" JSON..= type']
              (Prelude.catMaybes
                 [(JSON..=) "CapabilityDirection"
                    Prelude.<$> capabilityDirection])))
instance Property "CapabilityDirection" EdiConfigurationProperty where
  type PropertyType "CapabilityDirection" EdiConfigurationProperty = Value Prelude.Text
  set newValue EdiConfigurationProperty {..}
    = EdiConfigurationProperty
        {capabilityDirection = Prelude.pure newValue, ..}
instance Property "InputLocation" EdiConfigurationProperty where
  type PropertyType "InputLocation" EdiConfigurationProperty = S3LocationProperty
  set newValue EdiConfigurationProperty {..}
    = EdiConfigurationProperty {inputLocation = newValue, ..}
instance Property "OutputLocation" EdiConfigurationProperty where
  type PropertyType "OutputLocation" EdiConfigurationProperty = S3LocationProperty
  set newValue EdiConfigurationProperty {..}
    = EdiConfigurationProperty {outputLocation = newValue, ..}
instance Property "TransformerId" EdiConfigurationProperty where
  type PropertyType "TransformerId" EdiConfigurationProperty = Value Prelude.Text
  set newValue EdiConfigurationProperty {..}
    = EdiConfigurationProperty {transformerId = newValue, ..}
instance Property "Type" EdiConfigurationProperty where
  type PropertyType "Type" EdiConfigurationProperty = EdiTypeProperty
  set newValue EdiConfigurationProperty {..}
    = EdiConfigurationProperty {type' = newValue, ..}