module Stratosphere.ApiGatewayV2.Integration (
        module Exports, Integration(..), mkIntegration
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.ApiGatewayV2.Integration.ResponseParameterMapProperty as Exports
import {-# SOURCE #-} Stratosphere.ApiGatewayV2.Integration.TlsConfigProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data Integration
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html>
    Integration {Integration -> ()
haddock_workaround_ :: (),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-apiid>
                 Integration -> Value Text
apiId :: (Value Prelude.Text),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-connectionid>
                 Integration -> Maybe (Value Text)
connectionId :: (Prelude.Maybe (Value Prelude.Text)),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-connectiontype>
                 Integration -> Maybe (Value Text)
connectionType :: (Prelude.Maybe (Value Prelude.Text)),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-contenthandlingstrategy>
                 Integration -> Maybe (Value Text)
contentHandlingStrategy :: (Prelude.Maybe (Value Prelude.Text)),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-credentialsarn>
                 Integration -> Maybe (Value Text)
credentialsArn :: (Prelude.Maybe (Value Prelude.Text)),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-description>
                 Integration -> Maybe (Value Text)
description :: (Prelude.Maybe (Value Prelude.Text)),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-integrationmethod>
                 Integration -> Maybe (Value Text)
integrationMethod :: (Prelude.Maybe (Value Prelude.Text)),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-integrationsubtype>
                 Integration -> Maybe (Value Text)
integrationSubtype :: (Prelude.Maybe (Value Prelude.Text)),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-integrationtype>
                 Integration -> Value Text
integrationType :: (Value Prelude.Text),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-integrationuri>
                 Integration -> Maybe (Value Text)
integrationUri :: (Prelude.Maybe (Value Prelude.Text)),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-passthroughbehavior>
                 Integration -> Maybe (Value Text)
passthroughBehavior :: (Prelude.Maybe (Value Prelude.Text)),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-payloadformatversion>
                 Integration -> Maybe (Value Text)
payloadFormatVersion :: (Prelude.Maybe (Value Prelude.Text)),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-requestparameters>
                 Integration -> Maybe (Map Text (Value Text))
requestParameters :: (Prelude.Maybe (Prelude.Map Prelude.Text (Value Prelude.Text))),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-requesttemplates>
                 Integration -> Maybe (Map Text (Value Text))
requestTemplates :: (Prelude.Maybe (Prelude.Map Prelude.Text (Value Prelude.Text))),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-responseparameters>
                 Integration -> Maybe (Map Text ResponseParameterMapProperty)
responseParameters :: (Prelude.Maybe (Prelude.Map Prelude.Text ResponseParameterMapProperty)),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-templateselectionexpression>
                 Integration -> Maybe (Value Text)
templateSelectionExpression :: (Prelude.Maybe (Value Prelude.Text)),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-timeoutinmillis>
                 Integration -> Maybe (Value Integer)
timeoutInMillis :: (Prelude.Maybe (Value Prelude.Integer)),
                 -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigatewayv2-integration.html#cfn-apigatewayv2-integration-tlsconfig>
                 Integration -> Maybe TlsConfigProperty
tlsConfig :: (Prelude.Maybe TlsConfigProperty)}
  deriving stock (Integration -> Integration -> Bool
(Integration -> Integration -> Bool)
-> (Integration -> Integration -> Bool) -> Eq Integration
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Integration -> Integration -> Bool
== :: Integration -> Integration -> Bool
$c/= :: Integration -> Integration -> Bool
/= :: Integration -> Integration -> Bool
Prelude.Eq, Int -> Integration -> ShowS
[Integration] -> ShowS
Integration -> String
(Int -> Integration -> ShowS)
-> (Integration -> String)
-> ([Integration] -> ShowS)
-> Show Integration
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> Integration -> ShowS
showsPrec :: Int -> Integration -> ShowS
$cshow :: Integration -> String
show :: Integration -> String
$cshowList :: [Integration] -> ShowS
showList :: [Integration] -> ShowS
Prelude.Show)
mkIntegration ::
  Value Prelude.Text -> Value Prelude.Text -> Integration
mkIntegration :: Value Text -> Value Text -> Integration
mkIntegration Value Text
apiId Value Text
integrationType
  = Integration
      {haddock_workaround_ :: ()
haddock_workaround_ = (), apiId :: Value Text
apiId = Value Text
apiId,
       integrationType :: Value Text
integrationType = Value Text
integrationType, connectionId :: Maybe (Value Text)
connectionId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       connectionType :: Maybe (Value Text)
connectionType = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       contentHandlingStrategy :: Maybe (Value Text)
contentHandlingStrategy = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       credentialsArn :: Maybe (Value Text)
credentialsArn = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, description :: Maybe (Value Text)
description = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       integrationMethod :: Maybe (Value Text)
integrationMethod = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       integrationSubtype :: Maybe (Value Text)
integrationSubtype = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       integrationUri :: Maybe (Value Text)
integrationUri = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       passthroughBehavior :: Maybe (Value Text)
passthroughBehavior = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       payloadFormatVersion :: Maybe (Value Text)
payloadFormatVersion = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       requestParameters :: Maybe (Map Text (Value Text))
requestParameters = Maybe (Map Text (Value Text))
forall a. Maybe a
Prelude.Nothing,
       requestTemplates :: Maybe (Map Text (Value Text))
requestTemplates = Maybe (Map Text (Value Text))
forall a. Maybe a
Prelude.Nothing,
       responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
responseParameters = Maybe (Map Text ResponseParameterMapProperty)
forall a. Maybe a
Prelude.Nothing,
       templateSelectionExpression :: Maybe (Value Text)
templateSelectionExpression = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       timeoutInMillis :: Maybe (Value Integer)
timeoutInMillis = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing, tlsConfig :: Maybe TlsConfigProperty
tlsConfig = Maybe TlsConfigProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties Integration where
  toResourceProperties :: Integration -> ResourceProperties
toResourceProperties Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::ApiGatewayV2::Integration",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
                           [Key
"ApiId" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
apiId, Key
"IntegrationType" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
integrationType]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ConnectionId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
connectionId,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ConnectionType" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
connectionType,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ContentHandlingStrategy"
                                 (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
contentHandlingStrategy,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CredentialsArn" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
credentialsArn,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Description" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
description,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"IntegrationMethod" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
integrationMethod,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"IntegrationSubtype" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
integrationSubtype,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"IntegrationUri" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
integrationUri,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PassthroughBehavior" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
passthroughBehavior,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PayloadFormatVersion" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
payloadFormatVersion,
                               Key -> Map Text (Value Text) -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RequestParameters" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
requestParameters,
                               Key -> Map Text (Value Text) -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RequestTemplates" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
requestTemplates,
                               Key -> Map Text ResponseParameterMapProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ResponseParameters" (Map Text ResponseParameterMapProperty -> (Key, Value))
-> Maybe (Map Text ResponseParameterMapProperty)
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text ResponseParameterMapProperty)
responseParameters,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TemplateSelectionExpression"
                                 (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
templateSelectionExpression,
                               Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TimeoutInMillis" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
timeoutInMillis,
                               Key -> TlsConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TlsConfig" (TlsConfigProperty -> (Key, Value))
-> Maybe TlsConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TlsConfigProperty
tlsConfig]))}
instance JSON.ToJSON Integration where
  toJSON :: Integration -> Value
toJSON Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
              [Key
"ApiId" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
apiId, Key
"IntegrationType" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
integrationType]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ConnectionId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
connectionId,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ConnectionType" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
connectionType,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ContentHandlingStrategy"
                    (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
contentHandlingStrategy,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CredentialsArn" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
credentialsArn,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Description" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
description,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"IntegrationMethod" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
integrationMethod,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"IntegrationSubtype" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
integrationSubtype,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"IntegrationUri" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
integrationUri,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PassthroughBehavior" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
passthroughBehavior,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PayloadFormatVersion" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
payloadFormatVersion,
                  Key -> Map Text (Value Text) -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RequestParameters" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
requestParameters,
                  Key -> Map Text (Value Text) -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RequestTemplates" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
requestTemplates,
                  Key -> Map Text ResponseParameterMapProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ResponseParameters" (Map Text ResponseParameterMapProperty -> (Key, Value))
-> Maybe (Map Text ResponseParameterMapProperty)
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text ResponseParameterMapProperty)
responseParameters,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TemplateSelectionExpression"
                    (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
templateSelectionExpression,
                  Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TimeoutInMillis" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
timeoutInMillis,
                  Key -> TlsConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TlsConfig" (TlsConfigProperty -> (Key, Value))
-> Maybe TlsConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TlsConfigProperty
tlsConfig])))
instance Property "ApiId" Integration where
  type PropertyType "ApiId" Integration = Value Prelude.Text
  set :: PropertyType "ApiId" Integration -> Integration -> Integration
set PropertyType "ApiId" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..} = Integration {apiId :: Value Text
apiId = PropertyType "ApiId" Integration
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: ()
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
haddock_workaround_ :: ()
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
instance Property "ConnectionId" Integration where
  type PropertyType "ConnectionId" Integration = Value Prelude.Text
  set :: PropertyType "ConnectionId" Integration
-> Integration -> Integration
set PropertyType "ConnectionId" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = Integration {connectionId :: Maybe (Value Text)
connectionId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ConnectionId" Integration
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
instance Property "ConnectionType" Integration where
  type PropertyType "ConnectionType" Integration = Value Prelude.Text
  set :: PropertyType "ConnectionType" Integration
-> Integration -> Integration
set PropertyType "ConnectionType" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = Integration {connectionType :: Maybe (Value Text)
connectionType = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ConnectionType" Integration
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
instance Property "ContentHandlingStrategy" Integration where
  type PropertyType "ContentHandlingStrategy" Integration = Value Prelude.Text
  set :: PropertyType "ContentHandlingStrategy" Integration
-> Integration -> Integration
set PropertyType "ContentHandlingStrategy" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = Integration {contentHandlingStrategy :: Maybe (Value Text)
contentHandlingStrategy = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ContentHandlingStrategy" Integration
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
instance Property "CredentialsArn" Integration where
  type PropertyType "CredentialsArn" Integration = Value Prelude.Text
  set :: PropertyType "CredentialsArn" Integration
-> Integration -> Integration
set PropertyType "CredentialsArn" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = Integration {credentialsArn :: Maybe (Value Text)
credentialsArn = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "CredentialsArn" Integration
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
instance Property "Description" Integration where
  type PropertyType "Description" Integration = Value Prelude.Text
  set :: PropertyType "Description" Integration
-> Integration -> Integration
set PropertyType "Description" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = Integration {description :: Maybe (Value Text)
description = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Description" Integration
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
instance Property "IntegrationMethod" Integration where
  type PropertyType "IntegrationMethod" Integration = Value Prelude.Text
  set :: PropertyType "IntegrationMethod" Integration
-> Integration -> Integration
set PropertyType "IntegrationMethod" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = Integration {integrationMethod :: Maybe (Value Text)
integrationMethod = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "IntegrationMethod" Integration
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
instance Property "IntegrationSubtype" Integration where
  type PropertyType "IntegrationSubtype" Integration = Value Prelude.Text
  set :: PropertyType "IntegrationSubtype" Integration
-> Integration -> Integration
set PropertyType "IntegrationSubtype" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = Integration {integrationSubtype :: Maybe (Value Text)
integrationSubtype = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "IntegrationSubtype" Integration
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
instance Property "IntegrationType" Integration where
  type PropertyType "IntegrationType" Integration = Value Prelude.Text
  set :: PropertyType "IntegrationType" Integration
-> Integration -> Integration
set PropertyType "IntegrationType" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = Integration {integrationType :: Value Text
integrationType = PropertyType "IntegrationType" Integration
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
instance Property "IntegrationUri" Integration where
  type PropertyType "IntegrationUri" Integration = Value Prelude.Text
  set :: PropertyType "IntegrationUri" Integration
-> Integration -> Integration
set PropertyType "IntegrationUri" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = Integration {integrationUri :: Maybe (Value Text)
integrationUri = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "IntegrationUri" Integration
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
instance Property "PassthroughBehavior" Integration where
  type PropertyType "PassthroughBehavior" Integration = Value Prelude.Text
  set :: PropertyType "PassthroughBehavior" Integration
-> Integration -> Integration
set PropertyType "PassthroughBehavior" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = Integration {passthroughBehavior :: Maybe (Value Text)
passthroughBehavior = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PassthroughBehavior" Integration
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
instance Property "PayloadFormatVersion" Integration where
  type PropertyType "PayloadFormatVersion" Integration = Value Prelude.Text
  set :: PropertyType "PayloadFormatVersion" Integration
-> Integration -> Integration
set PropertyType "PayloadFormatVersion" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = Integration {payloadFormatVersion :: Maybe (Value Text)
payloadFormatVersion = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PayloadFormatVersion" Integration
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
instance Property "RequestParameters" Integration where
  type PropertyType "RequestParameters" Integration = Prelude.Map Prelude.Text (Value Prelude.Text)
  set :: PropertyType "RequestParameters" Integration
-> Integration -> Integration
set PropertyType "RequestParameters" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = Integration {requestParameters :: Maybe (Map Text (Value Text))
requestParameters = Map Text (Value Text) -> Maybe (Map Text (Value Text))
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Map Text (Value Text)
PropertyType "RequestParameters" Integration
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
instance Property "RequestTemplates" Integration where
  type PropertyType "RequestTemplates" Integration = Prelude.Map Prelude.Text (Value Prelude.Text)
  set :: PropertyType "RequestTemplates" Integration
-> Integration -> Integration
set PropertyType "RequestTemplates" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = Integration {requestTemplates :: Maybe (Map Text (Value Text))
requestTemplates = Map Text (Value Text) -> Maybe (Map Text (Value Text))
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Map Text (Value Text)
PropertyType "RequestTemplates" Integration
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
instance Property "ResponseParameters" Integration where
  type PropertyType "ResponseParameters" Integration = Prelude.Map Prelude.Text ResponseParameterMapProperty
  set :: PropertyType "ResponseParameters" Integration
-> Integration -> Integration
set PropertyType "ResponseParameters" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = Integration {responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
responseParameters = Map Text ResponseParameterMapProperty
-> Maybe (Map Text ResponseParameterMapProperty)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Map Text ResponseParameterMapProperty
PropertyType "ResponseParameters" Integration
newValue, Maybe (Map Text (Value Text))
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
instance Property "TemplateSelectionExpression" Integration where
  type PropertyType "TemplateSelectionExpression" Integration = Value Prelude.Text
  set :: PropertyType "TemplateSelectionExpression" Integration
-> Integration -> Integration
set PropertyType "TemplateSelectionExpression" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = Integration
        {templateSelectionExpression :: Maybe (Value Text)
templateSelectionExpression = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TemplateSelectionExpression" Integration
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
instance Property "TimeoutInMillis" Integration where
  type PropertyType "TimeoutInMillis" Integration = Value Prelude.Integer
  set :: PropertyType "TimeoutInMillis" Integration
-> Integration -> Integration
set PropertyType "TimeoutInMillis" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = Integration {timeoutInMillis :: Maybe (Value Integer)
timeoutInMillis = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TimeoutInMillis" Integration
Value Integer
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
tlsConfig :: Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
tlsConfig :: Maybe TlsConfigProperty
..}
instance Property "TlsConfig" Integration where
  type PropertyType "TlsConfig" Integration = TlsConfigProperty
  set :: PropertyType "TlsConfig" Integration -> Integration -> Integration
set PropertyType "TlsConfig" Integration
newValue Integration {Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
Maybe TlsConfigProperty
()
Value Text
haddock_workaround_ :: Integration -> ()
apiId :: Integration -> Value Text
connectionId :: Integration -> Maybe (Value Text)
connectionType :: Integration -> Maybe (Value Text)
contentHandlingStrategy :: Integration -> Maybe (Value Text)
credentialsArn :: Integration -> Maybe (Value Text)
description :: Integration -> Maybe (Value Text)
integrationMethod :: Integration -> Maybe (Value Text)
integrationSubtype :: Integration -> Maybe (Value Text)
integrationType :: Integration -> Value Text
integrationUri :: Integration -> Maybe (Value Text)
passthroughBehavior :: Integration -> Maybe (Value Text)
payloadFormatVersion :: Integration -> Maybe (Value Text)
requestParameters :: Integration -> Maybe (Map Text (Value Text))
requestTemplates :: Integration -> Maybe (Map Text (Value Text))
responseParameters :: Integration -> Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Integration -> Maybe (Value Text)
timeoutInMillis :: Integration -> Maybe (Value Integer)
tlsConfig :: Integration -> Maybe TlsConfigProperty
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
tlsConfig :: Maybe TlsConfigProperty
..}
    = Integration {tlsConfig :: Maybe TlsConfigProperty
tlsConfig = TlsConfigProperty -> Maybe TlsConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TlsConfig" Integration
TlsConfigProperty
newValue, Maybe (Map Text (Value Text))
Maybe (Map Text ResponseParameterMapProperty)
Maybe (Value Integer)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
haddock_workaround_ :: ()
apiId :: Value Text
connectionId :: Maybe (Value Text)
connectionType :: Maybe (Value Text)
contentHandlingStrategy :: Maybe (Value Text)
credentialsArn :: Maybe (Value Text)
description :: Maybe (Value Text)
integrationMethod :: Maybe (Value Text)
integrationSubtype :: Maybe (Value Text)
integrationType :: Value Text
integrationUri :: Maybe (Value Text)
passthroughBehavior :: Maybe (Value Text)
payloadFormatVersion :: Maybe (Value Text)
requestParameters :: Maybe (Map Text (Value Text))
requestTemplates :: Maybe (Map Text (Value Text))
responseParameters :: Maybe (Map Text ResponseParameterMapProperty)
templateSelectionExpression :: Maybe (Value Text)
timeoutInMillis :: Maybe (Value Integer)
..}