module Stratosphere.Lex.Bot.SlotCaptureSettingProperty (
module Exports, SlotCaptureSettingProperty(..),
mkSlotCaptureSettingProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Lex.Bot.ConditionalSpecificationProperty as Exports
import {-# SOURCE #-} Stratosphere.Lex.Bot.DialogCodeHookInvocationSettingProperty as Exports
import {-# SOURCE #-} Stratosphere.Lex.Bot.DialogStateProperty as Exports
import {-# SOURCE #-} Stratosphere.Lex.Bot.ElicitationCodeHookInvocationSettingProperty as Exports
import {-# SOURCE #-} Stratosphere.Lex.Bot.ResponseSpecificationProperty as Exports
import Stratosphere.ResourceProperties
data SlotCaptureSettingProperty
=
SlotCaptureSettingProperty {SlotCaptureSettingProperty -> ()
haddock_workaround_ :: (),
SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
captureConditional :: (Prelude.Maybe ConditionalSpecificationProperty),
SlotCaptureSettingProperty -> Maybe DialogStateProperty
captureNextStep :: (Prelude.Maybe DialogStateProperty),
SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
captureResponse :: (Prelude.Maybe ResponseSpecificationProperty),
SlotCaptureSettingProperty
-> Maybe DialogCodeHookInvocationSettingProperty
codeHook :: (Prelude.Maybe DialogCodeHookInvocationSettingProperty),
SlotCaptureSettingProperty
-> Maybe ElicitationCodeHookInvocationSettingProperty
elicitationCodeHook :: (Prelude.Maybe ElicitationCodeHookInvocationSettingProperty),
SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
failureConditional :: (Prelude.Maybe ConditionalSpecificationProperty),
SlotCaptureSettingProperty -> Maybe DialogStateProperty
failureNextStep :: (Prelude.Maybe DialogStateProperty),
SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
failureResponse :: (Prelude.Maybe ResponseSpecificationProperty)}
deriving stock (SlotCaptureSettingProperty -> SlotCaptureSettingProperty -> Bool
(SlotCaptureSettingProperty -> SlotCaptureSettingProperty -> Bool)
-> (SlotCaptureSettingProperty
-> SlotCaptureSettingProperty -> Bool)
-> Eq SlotCaptureSettingProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SlotCaptureSettingProperty -> SlotCaptureSettingProperty -> Bool
== :: SlotCaptureSettingProperty -> SlotCaptureSettingProperty -> Bool
$c/= :: SlotCaptureSettingProperty -> SlotCaptureSettingProperty -> Bool
/= :: SlotCaptureSettingProperty -> SlotCaptureSettingProperty -> Bool
Prelude.Eq, Int -> SlotCaptureSettingProperty -> ShowS
[SlotCaptureSettingProperty] -> ShowS
SlotCaptureSettingProperty -> String
(Int -> SlotCaptureSettingProperty -> ShowS)
-> (SlotCaptureSettingProperty -> String)
-> ([SlotCaptureSettingProperty] -> ShowS)
-> Show SlotCaptureSettingProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SlotCaptureSettingProperty -> ShowS
showsPrec :: Int -> SlotCaptureSettingProperty -> ShowS
$cshow :: SlotCaptureSettingProperty -> String
show :: SlotCaptureSettingProperty -> String
$cshowList :: [SlotCaptureSettingProperty] -> ShowS
showList :: [SlotCaptureSettingProperty] -> ShowS
Prelude.Show)
mkSlotCaptureSettingProperty :: SlotCaptureSettingProperty
mkSlotCaptureSettingProperty :: SlotCaptureSettingProperty
mkSlotCaptureSettingProperty
= SlotCaptureSettingProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), captureConditional :: Maybe ConditionalSpecificationProperty
captureConditional = Maybe ConditionalSpecificationProperty
forall a. Maybe a
Prelude.Nothing,
captureNextStep :: Maybe DialogStateProperty
captureNextStep = Maybe DialogStateProperty
forall a. Maybe a
Prelude.Nothing,
captureResponse :: Maybe ResponseSpecificationProperty
captureResponse = Maybe ResponseSpecificationProperty
forall a. Maybe a
Prelude.Nothing, codeHook :: Maybe DialogCodeHookInvocationSettingProperty
codeHook = Maybe DialogCodeHookInvocationSettingProperty
forall a. Maybe a
Prelude.Nothing,
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
elicitationCodeHook = Maybe ElicitationCodeHookInvocationSettingProperty
forall a. Maybe a
Prelude.Nothing,
failureConditional :: Maybe ConditionalSpecificationProperty
failureConditional = Maybe ConditionalSpecificationProperty
forall a. Maybe a
Prelude.Nothing,
failureNextStep :: Maybe DialogStateProperty
failureNextStep = Maybe DialogStateProperty
forall a. Maybe a
Prelude.Nothing,
failureResponse :: Maybe ResponseSpecificationProperty
failureResponse = Maybe ResponseSpecificationProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties SlotCaptureSettingProperty where
toResourceProperties :: SlotCaptureSettingProperty -> ResourceProperties
toResourceProperties SlotCaptureSettingProperty {Maybe ElicitationCodeHookInvocationSettingProperty
Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
Maybe DialogCodeHookInvocationSettingProperty
()
haddock_workaround_ :: SlotCaptureSettingProperty -> ()
captureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
captureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
captureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
codeHook :: SlotCaptureSettingProperty
-> Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: SlotCaptureSettingProperty
-> Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
failureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
failureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::Lex::Bot.SlotCaptureSetting",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> ConditionalSpecificationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CaptureConditional" (ConditionalSpecificationProperty -> (Key, Value))
-> Maybe ConditionalSpecificationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ConditionalSpecificationProperty
captureConditional,
Key -> DialogStateProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CaptureNextStep" (DialogStateProperty -> (Key, Value))
-> Maybe DialogStateProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DialogStateProperty
captureNextStep,
Key -> ResponseSpecificationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CaptureResponse" (ResponseSpecificationProperty -> (Key, Value))
-> Maybe ResponseSpecificationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ResponseSpecificationProperty
captureResponse,
Key -> DialogCodeHookInvocationSettingProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CodeHook" (DialogCodeHookInvocationSettingProperty -> (Key, Value))
-> Maybe DialogCodeHookInvocationSettingProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DialogCodeHookInvocationSettingProperty
codeHook,
Key -> ElicitationCodeHookInvocationSettingProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ElicitationCodeHook" (ElicitationCodeHookInvocationSettingProperty -> (Key, Value))
-> Maybe ElicitationCodeHookInvocationSettingProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ElicitationCodeHookInvocationSettingProperty
elicitationCodeHook,
Key -> ConditionalSpecificationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FailureConditional" (ConditionalSpecificationProperty -> (Key, Value))
-> Maybe ConditionalSpecificationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ConditionalSpecificationProperty
failureConditional,
Key -> DialogStateProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FailureNextStep" (DialogStateProperty -> (Key, Value))
-> Maybe DialogStateProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DialogStateProperty
failureNextStep,
Key -> ResponseSpecificationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FailureResponse" (ResponseSpecificationProperty -> (Key, Value))
-> Maybe ResponseSpecificationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ResponseSpecificationProperty
failureResponse])}
instance JSON.ToJSON SlotCaptureSettingProperty where
toJSON :: SlotCaptureSettingProperty -> Value
toJSON SlotCaptureSettingProperty {Maybe ElicitationCodeHookInvocationSettingProperty
Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
Maybe DialogCodeHookInvocationSettingProperty
()
haddock_workaround_ :: SlotCaptureSettingProperty -> ()
captureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
captureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
captureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
codeHook :: SlotCaptureSettingProperty
-> Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: SlotCaptureSettingProperty
-> Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
failureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
failureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
..}
= [(Key, Value)] -> Value
JSON.object
([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> ConditionalSpecificationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CaptureConditional" (ConditionalSpecificationProperty -> (Key, Value))
-> Maybe ConditionalSpecificationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ConditionalSpecificationProperty
captureConditional,
Key -> DialogStateProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CaptureNextStep" (DialogStateProperty -> (Key, Value))
-> Maybe DialogStateProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DialogStateProperty
captureNextStep,
Key -> ResponseSpecificationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CaptureResponse" (ResponseSpecificationProperty -> (Key, Value))
-> Maybe ResponseSpecificationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ResponseSpecificationProperty
captureResponse,
Key -> DialogCodeHookInvocationSettingProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CodeHook" (DialogCodeHookInvocationSettingProperty -> (Key, Value))
-> Maybe DialogCodeHookInvocationSettingProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DialogCodeHookInvocationSettingProperty
codeHook,
Key -> ElicitationCodeHookInvocationSettingProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ElicitationCodeHook" (ElicitationCodeHookInvocationSettingProperty -> (Key, Value))
-> Maybe ElicitationCodeHookInvocationSettingProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ElicitationCodeHookInvocationSettingProperty
elicitationCodeHook,
Key -> ConditionalSpecificationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FailureConditional" (ConditionalSpecificationProperty -> (Key, Value))
-> Maybe ConditionalSpecificationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ConditionalSpecificationProperty
failureConditional,
Key -> DialogStateProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FailureNextStep" (DialogStateProperty -> (Key, Value))
-> Maybe DialogStateProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DialogStateProperty
failureNextStep,
Key -> ResponseSpecificationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FailureResponse" (ResponseSpecificationProperty -> (Key, Value))
-> Maybe ResponseSpecificationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ResponseSpecificationProperty
failureResponse]))
instance Property "CaptureConditional" SlotCaptureSettingProperty where
type PropertyType "CaptureConditional" SlotCaptureSettingProperty = ConditionalSpecificationProperty
set :: PropertyType "CaptureConditional" SlotCaptureSettingProperty
-> SlotCaptureSettingProperty -> SlotCaptureSettingProperty
set PropertyType "CaptureConditional" SlotCaptureSettingProperty
newValue SlotCaptureSettingProperty {Maybe ElicitationCodeHookInvocationSettingProperty
Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
Maybe DialogCodeHookInvocationSettingProperty
()
haddock_workaround_ :: SlotCaptureSettingProperty -> ()
captureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
captureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
captureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
codeHook :: SlotCaptureSettingProperty
-> Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: SlotCaptureSettingProperty
-> Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
failureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
failureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
..}
= SlotCaptureSettingProperty
{captureConditional :: Maybe ConditionalSpecificationProperty
captureConditional = ConditionalSpecificationProperty
-> Maybe ConditionalSpecificationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "CaptureConditional" SlotCaptureSettingProperty
ConditionalSpecificationProperty
newValue, Maybe ElicitationCodeHookInvocationSettingProperty
Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
Maybe DialogCodeHookInvocationSettingProperty
()
haddock_workaround_ :: ()
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
haddock_workaround_ :: ()
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
..}
instance Property "CaptureNextStep" SlotCaptureSettingProperty where
type PropertyType "CaptureNextStep" SlotCaptureSettingProperty = DialogStateProperty
set :: PropertyType "CaptureNextStep" SlotCaptureSettingProperty
-> SlotCaptureSettingProperty -> SlotCaptureSettingProperty
set PropertyType "CaptureNextStep" SlotCaptureSettingProperty
newValue SlotCaptureSettingProperty {Maybe ElicitationCodeHookInvocationSettingProperty
Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
Maybe DialogCodeHookInvocationSettingProperty
()
haddock_workaround_ :: SlotCaptureSettingProperty -> ()
captureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
captureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
captureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
codeHook :: SlotCaptureSettingProperty
-> Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: SlotCaptureSettingProperty
-> Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
failureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
failureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
..}
= SlotCaptureSettingProperty
{captureNextStep :: Maybe DialogStateProperty
captureNextStep = DialogStateProperty -> Maybe DialogStateProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "CaptureNextStep" SlotCaptureSettingProperty
DialogStateProperty
newValue, Maybe ElicitationCodeHookInvocationSettingProperty
Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
Maybe DialogCodeHookInvocationSettingProperty
()
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
..}
instance Property "CaptureResponse" SlotCaptureSettingProperty where
type PropertyType "CaptureResponse" SlotCaptureSettingProperty = ResponseSpecificationProperty
set :: PropertyType "CaptureResponse" SlotCaptureSettingProperty
-> SlotCaptureSettingProperty -> SlotCaptureSettingProperty
set PropertyType "CaptureResponse" SlotCaptureSettingProperty
newValue SlotCaptureSettingProperty {Maybe ElicitationCodeHookInvocationSettingProperty
Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
Maybe DialogCodeHookInvocationSettingProperty
()
haddock_workaround_ :: SlotCaptureSettingProperty -> ()
captureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
captureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
captureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
codeHook :: SlotCaptureSettingProperty
-> Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: SlotCaptureSettingProperty
-> Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
failureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
failureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
..}
= SlotCaptureSettingProperty
{captureResponse :: Maybe ResponseSpecificationProperty
captureResponse = ResponseSpecificationProperty
-> Maybe ResponseSpecificationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "CaptureResponse" SlotCaptureSettingProperty
ResponseSpecificationProperty
newValue, Maybe ElicitationCodeHookInvocationSettingProperty
Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
Maybe DialogCodeHookInvocationSettingProperty
()
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
..}
instance Property "CodeHook" SlotCaptureSettingProperty where
type PropertyType "CodeHook" SlotCaptureSettingProperty = DialogCodeHookInvocationSettingProperty
set :: PropertyType "CodeHook" SlotCaptureSettingProperty
-> SlotCaptureSettingProperty -> SlotCaptureSettingProperty
set PropertyType "CodeHook" SlotCaptureSettingProperty
newValue SlotCaptureSettingProperty {Maybe ElicitationCodeHookInvocationSettingProperty
Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
Maybe DialogCodeHookInvocationSettingProperty
()
haddock_workaround_ :: SlotCaptureSettingProperty -> ()
captureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
captureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
captureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
codeHook :: SlotCaptureSettingProperty
-> Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: SlotCaptureSettingProperty
-> Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
failureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
failureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
..}
= SlotCaptureSettingProperty {codeHook :: Maybe DialogCodeHookInvocationSettingProperty
codeHook = DialogCodeHookInvocationSettingProperty
-> Maybe DialogCodeHookInvocationSettingProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "CodeHook" SlotCaptureSettingProperty
DialogCodeHookInvocationSettingProperty
newValue, Maybe ElicitationCodeHookInvocationSettingProperty
Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
()
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
..}
instance Property "ElicitationCodeHook" SlotCaptureSettingProperty where
type PropertyType "ElicitationCodeHook" SlotCaptureSettingProperty = ElicitationCodeHookInvocationSettingProperty
set :: PropertyType "ElicitationCodeHook" SlotCaptureSettingProperty
-> SlotCaptureSettingProperty -> SlotCaptureSettingProperty
set PropertyType "ElicitationCodeHook" SlotCaptureSettingProperty
newValue SlotCaptureSettingProperty {Maybe ElicitationCodeHookInvocationSettingProperty
Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
Maybe DialogCodeHookInvocationSettingProperty
()
haddock_workaround_ :: SlotCaptureSettingProperty -> ()
captureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
captureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
captureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
codeHook :: SlotCaptureSettingProperty
-> Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: SlotCaptureSettingProperty
-> Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
failureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
failureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
..}
= SlotCaptureSettingProperty
{elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
elicitationCodeHook = ElicitationCodeHookInvocationSettingProperty
-> Maybe ElicitationCodeHookInvocationSettingProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ElicitationCodeHook" SlotCaptureSettingProperty
ElicitationCodeHookInvocationSettingProperty
newValue, Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
Maybe DialogCodeHookInvocationSettingProperty
()
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
..}
instance Property "FailureConditional" SlotCaptureSettingProperty where
type PropertyType "FailureConditional" SlotCaptureSettingProperty = ConditionalSpecificationProperty
set :: PropertyType "FailureConditional" SlotCaptureSettingProperty
-> SlotCaptureSettingProperty -> SlotCaptureSettingProperty
set PropertyType "FailureConditional" SlotCaptureSettingProperty
newValue SlotCaptureSettingProperty {Maybe ElicitationCodeHookInvocationSettingProperty
Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
Maybe DialogCodeHookInvocationSettingProperty
()
haddock_workaround_ :: SlotCaptureSettingProperty -> ()
captureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
captureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
captureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
codeHook :: SlotCaptureSettingProperty
-> Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: SlotCaptureSettingProperty
-> Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
failureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
failureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
..}
= SlotCaptureSettingProperty
{failureConditional :: Maybe ConditionalSpecificationProperty
failureConditional = ConditionalSpecificationProperty
-> Maybe ConditionalSpecificationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "FailureConditional" SlotCaptureSettingProperty
ConditionalSpecificationProperty
newValue, Maybe ElicitationCodeHookInvocationSettingProperty
Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
Maybe DialogCodeHookInvocationSettingProperty
()
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
..}
instance Property "FailureNextStep" SlotCaptureSettingProperty where
type PropertyType "FailureNextStep" SlotCaptureSettingProperty = DialogStateProperty
set :: PropertyType "FailureNextStep" SlotCaptureSettingProperty
-> SlotCaptureSettingProperty -> SlotCaptureSettingProperty
set PropertyType "FailureNextStep" SlotCaptureSettingProperty
newValue SlotCaptureSettingProperty {Maybe ElicitationCodeHookInvocationSettingProperty
Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
Maybe DialogCodeHookInvocationSettingProperty
()
haddock_workaround_ :: SlotCaptureSettingProperty -> ()
captureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
captureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
captureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
codeHook :: SlotCaptureSettingProperty
-> Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: SlotCaptureSettingProperty
-> Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
failureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
failureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
..}
= SlotCaptureSettingProperty
{failureNextStep :: Maybe DialogStateProperty
failureNextStep = DialogStateProperty -> Maybe DialogStateProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "FailureNextStep" SlotCaptureSettingProperty
DialogStateProperty
newValue, Maybe ElicitationCodeHookInvocationSettingProperty
Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
Maybe DialogCodeHookInvocationSettingProperty
()
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureResponse :: Maybe ResponseSpecificationProperty
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureResponse :: Maybe ResponseSpecificationProperty
..}
instance Property "FailureResponse" SlotCaptureSettingProperty where
type PropertyType "FailureResponse" SlotCaptureSettingProperty = ResponseSpecificationProperty
set :: PropertyType "FailureResponse" SlotCaptureSettingProperty
-> SlotCaptureSettingProperty -> SlotCaptureSettingProperty
set PropertyType "FailureResponse" SlotCaptureSettingProperty
newValue SlotCaptureSettingProperty {Maybe ElicitationCodeHookInvocationSettingProperty
Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
Maybe DialogCodeHookInvocationSettingProperty
()
haddock_workaround_ :: SlotCaptureSettingProperty -> ()
captureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
captureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
captureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
codeHook :: SlotCaptureSettingProperty
-> Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: SlotCaptureSettingProperty
-> Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: SlotCaptureSettingProperty
-> Maybe ConditionalSpecificationProperty
failureNextStep :: SlotCaptureSettingProperty -> Maybe DialogStateProperty
failureResponse :: SlotCaptureSettingProperty -> Maybe ResponseSpecificationProperty
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
failureResponse :: Maybe ResponseSpecificationProperty
..}
= SlotCaptureSettingProperty
{failureResponse :: Maybe ResponseSpecificationProperty
failureResponse = ResponseSpecificationProperty
-> Maybe ResponseSpecificationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "FailureResponse" SlotCaptureSettingProperty
ResponseSpecificationProperty
newValue, Maybe ElicitationCodeHookInvocationSettingProperty
Maybe ResponseSpecificationProperty
Maybe DialogStateProperty
Maybe ConditionalSpecificationProperty
Maybe DialogCodeHookInvocationSettingProperty
()
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
haddock_workaround_ :: ()
captureConditional :: Maybe ConditionalSpecificationProperty
captureNextStep :: Maybe DialogStateProperty
captureResponse :: Maybe ResponseSpecificationProperty
codeHook :: Maybe DialogCodeHookInvocationSettingProperty
elicitationCodeHook :: Maybe ElicitationCodeHookInvocationSettingProperty
failureConditional :: Maybe ConditionalSpecificationProperty
failureNextStep :: Maybe DialogStateProperty
..}