module Stratosphere.WAFv2.WebACL.RequestInspectionACFPProperty (
        module Exports, RequestInspectionACFPProperty(..),
        mkRequestInspectionACFPProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.WAFv2.WebACL.FieldIdentifierProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data RequestInspectionACFPProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafv2-webacl-requestinspectionacfp.html>
    RequestInspectionACFPProperty {RequestInspectionACFPProperty -> ()
haddock_workaround_ :: (),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafv2-webacl-requestinspectionacfp.html#cfn-wafv2-webacl-requestinspectionacfp-addressfields>
                                   RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
addressFields :: (Prelude.Maybe [FieldIdentifierProperty]),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafv2-webacl-requestinspectionacfp.html#cfn-wafv2-webacl-requestinspectionacfp-emailfield>
                                   RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
emailField :: (Prelude.Maybe FieldIdentifierProperty),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafv2-webacl-requestinspectionacfp.html#cfn-wafv2-webacl-requestinspectionacfp-passwordfield>
                                   RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
passwordField :: (Prelude.Maybe FieldIdentifierProperty),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafv2-webacl-requestinspectionacfp.html#cfn-wafv2-webacl-requestinspectionacfp-payloadtype>
                                   RequestInspectionACFPProperty -> Value Text
payloadType :: (Value Prelude.Text),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafv2-webacl-requestinspectionacfp.html#cfn-wafv2-webacl-requestinspectionacfp-phonenumberfields>
                                   RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
phoneNumberFields :: (Prelude.Maybe [FieldIdentifierProperty]),
                                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-wafv2-webacl-requestinspectionacfp.html#cfn-wafv2-webacl-requestinspectionacfp-usernamefield>
                                   RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
usernameField :: (Prelude.Maybe FieldIdentifierProperty)}
  deriving stock (RequestInspectionACFPProperty
-> RequestInspectionACFPProperty -> Bool
(RequestInspectionACFPProperty
 -> RequestInspectionACFPProperty -> Bool)
-> (RequestInspectionACFPProperty
    -> RequestInspectionACFPProperty -> Bool)
-> Eq RequestInspectionACFPProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RequestInspectionACFPProperty
-> RequestInspectionACFPProperty -> Bool
== :: RequestInspectionACFPProperty
-> RequestInspectionACFPProperty -> Bool
$c/= :: RequestInspectionACFPProperty
-> RequestInspectionACFPProperty -> Bool
/= :: RequestInspectionACFPProperty
-> RequestInspectionACFPProperty -> Bool
Prelude.Eq, Int -> RequestInspectionACFPProperty -> ShowS
[RequestInspectionACFPProperty] -> ShowS
RequestInspectionACFPProperty -> String
(Int -> RequestInspectionACFPProperty -> ShowS)
-> (RequestInspectionACFPProperty -> String)
-> ([RequestInspectionACFPProperty] -> ShowS)
-> Show RequestInspectionACFPProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> RequestInspectionACFPProperty -> ShowS
showsPrec :: Int -> RequestInspectionACFPProperty -> ShowS
$cshow :: RequestInspectionACFPProperty -> String
show :: RequestInspectionACFPProperty -> String
$cshowList :: [RequestInspectionACFPProperty] -> ShowS
showList :: [RequestInspectionACFPProperty] -> ShowS
Prelude.Show)
mkRequestInspectionACFPProperty ::
  Value Prelude.Text -> RequestInspectionACFPProperty
mkRequestInspectionACFPProperty :: Value Text -> RequestInspectionACFPProperty
mkRequestInspectionACFPProperty Value Text
payloadType
  = RequestInspectionACFPProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), payloadType :: Value Text
payloadType = Value Text
payloadType,
       addressFields :: Maybe [FieldIdentifierProperty]
addressFields = Maybe [FieldIdentifierProperty]
forall a. Maybe a
Prelude.Nothing, emailField :: Maybe FieldIdentifierProperty
emailField = Maybe FieldIdentifierProperty
forall a. Maybe a
Prelude.Nothing,
       passwordField :: Maybe FieldIdentifierProperty
passwordField = Maybe FieldIdentifierProperty
forall a. Maybe a
Prelude.Nothing,
       phoneNumberFields :: Maybe [FieldIdentifierProperty]
phoneNumberFields = Maybe [FieldIdentifierProperty]
forall a. Maybe a
Prelude.Nothing,
       usernameField :: Maybe FieldIdentifierProperty
usernameField = Maybe FieldIdentifierProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties RequestInspectionACFPProperty where
  toResourceProperties :: RequestInspectionACFPProperty -> ResourceProperties
toResourceProperties RequestInspectionACFPProperty {Maybe [FieldIdentifierProperty]
Maybe FieldIdentifierProperty
()
Value Text
haddock_workaround_ :: RequestInspectionACFPProperty -> ()
addressFields :: RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
emailField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
passwordField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
payloadType :: RequestInspectionACFPProperty -> Value Text
phoneNumberFields :: RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
usernameField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
emailField :: Maybe FieldIdentifierProperty
passwordField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
phoneNumberFields :: Maybe [FieldIdentifierProperty]
usernameField :: Maybe FieldIdentifierProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::WAFv2::WebACL.RequestInspectionACFP",
         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
"PayloadType" 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
payloadType]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> [FieldIdentifierProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AddressFields" ([FieldIdentifierProperty] -> (Key, Value))
-> Maybe [FieldIdentifierProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [FieldIdentifierProperty]
addressFields,
                               Key -> FieldIdentifierProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EmailField" (FieldIdentifierProperty -> (Key, Value))
-> Maybe FieldIdentifierProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FieldIdentifierProperty
emailField,
                               Key -> FieldIdentifierProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PasswordField" (FieldIdentifierProperty -> (Key, Value))
-> Maybe FieldIdentifierProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FieldIdentifierProperty
passwordField,
                               Key -> [FieldIdentifierProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PhoneNumberFields" ([FieldIdentifierProperty] -> (Key, Value))
-> Maybe [FieldIdentifierProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [FieldIdentifierProperty]
phoneNumberFields,
                               Key -> FieldIdentifierProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"UsernameField" (FieldIdentifierProperty -> (Key, Value))
-> Maybe FieldIdentifierProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FieldIdentifierProperty
usernameField]))}
instance JSON.ToJSON RequestInspectionACFPProperty where
  toJSON :: RequestInspectionACFPProperty -> Value
toJSON RequestInspectionACFPProperty {Maybe [FieldIdentifierProperty]
Maybe FieldIdentifierProperty
()
Value Text
haddock_workaround_ :: RequestInspectionACFPProperty -> ()
addressFields :: RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
emailField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
passwordField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
payloadType :: RequestInspectionACFPProperty -> Value Text
phoneNumberFields :: RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
usernameField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
emailField :: Maybe FieldIdentifierProperty
passwordField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
phoneNumberFields :: Maybe [FieldIdentifierProperty]
usernameField :: Maybe FieldIdentifierProperty
..}
    = [(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
"PayloadType" 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
payloadType]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> [FieldIdentifierProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AddressFields" ([FieldIdentifierProperty] -> (Key, Value))
-> Maybe [FieldIdentifierProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [FieldIdentifierProperty]
addressFields,
                  Key -> FieldIdentifierProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EmailField" (FieldIdentifierProperty -> (Key, Value))
-> Maybe FieldIdentifierProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FieldIdentifierProperty
emailField,
                  Key -> FieldIdentifierProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PasswordField" (FieldIdentifierProperty -> (Key, Value))
-> Maybe FieldIdentifierProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FieldIdentifierProperty
passwordField,
                  Key -> [FieldIdentifierProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PhoneNumberFields" ([FieldIdentifierProperty] -> (Key, Value))
-> Maybe [FieldIdentifierProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [FieldIdentifierProperty]
phoneNumberFields,
                  Key -> FieldIdentifierProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"UsernameField" (FieldIdentifierProperty -> (Key, Value))
-> Maybe FieldIdentifierProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FieldIdentifierProperty
usernameField])))
instance Property "AddressFields" RequestInspectionACFPProperty where
  type PropertyType "AddressFields" RequestInspectionACFPProperty = [FieldIdentifierProperty]
  set :: PropertyType "AddressFields" RequestInspectionACFPProperty
-> RequestInspectionACFPProperty -> RequestInspectionACFPProperty
set PropertyType "AddressFields" RequestInspectionACFPProperty
newValue RequestInspectionACFPProperty {Maybe [FieldIdentifierProperty]
Maybe FieldIdentifierProperty
()
Value Text
haddock_workaround_ :: RequestInspectionACFPProperty -> ()
addressFields :: RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
emailField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
passwordField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
payloadType :: RequestInspectionACFPProperty -> Value Text
phoneNumberFields :: RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
usernameField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
emailField :: Maybe FieldIdentifierProperty
passwordField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
phoneNumberFields :: Maybe [FieldIdentifierProperty]
usernameField :: Maybe FieldIdentifierProperty
..}
    = RequestInspectionACFPProperty
        {addressFields :: Maybe [FieldIdentifierProperty]
addressFields = [FieldIdentifierProperty] -> Maybe [FieldIdentifierProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [FieldIdentifierProperty]
PropertyType "AddressFields" RequestInspectionACFPProperty
newValue, Maybe [FieldIdentifierProperty]
Maybe FieldIdentifierProperty
()
Value Text
haddock_workaround_ :: ()
emailField :: Maybe FieldIdentifierProperty
passwordField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
phoneNumberFields :: Maybe [FieldIdentifierProperty]
usernameField :: Maybe FieldIdentifierProperty
haddock_workaround_ :: ()
emailField :: Maybe FieldIdentifierProperty
passwordField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
phoneNumberFields :: Maybe [FieldIdentifierProperty]
usernameField :: Maybe FieldIdentifierProperty
..}
instance Property "EmailField" RequestInspectionACFPProperty where
  type PropertyType "EmailField" RequestInspectionACFPProperty = FieldIdentifierProperty
  set :: PropertyType "EmailField" RequestInspectionACFPProperty
-> RequestInspectionACFPProperty -> RequestInspectionACFPProperty
set PropertyType "EmailField" RequestInspectionACFPProperty
newValue RequestInspectionACFPProperty {Maybe [FieldIdentifierProperty]
Maybe FieldIdentifierProperty
()
Value Text
haddock_workaround_ :: RequestInspectionACFPProperty -> ()
addressFields :: RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
emailField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
passwordField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
payloadType :: RequestInspectionACFPProperty -> Value Text
phoneNumberFields :: RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
usernameField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
emailField :: Maybe FieldIdentifierProperty
passwordField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
phoneNumberFields :: Maybe [FieldIdentifierProperty]
usernameField :: Maybe FieldIdentifierProperty
..}
    = RequestInspectionACFPProperty
        {emailField :: Maybe FieldIdentifierProperty
emailField = FieldIdentifierProperty -> Maybe FieldIdentifierProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EmailField" RequestInspectionACFPProperty
FieldIdentifierProperty
newValue, Maybe [FieldIdentifierProperty]
Maybe FieldIdentifierProperty
()
Value Text
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
passwordField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
phoneNumberFields :: Maybe [FieldIdentifierProperty]
usernameField :: Maybe FieldIdentifierProperty
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
passwordField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
phoneNumberFields :: Maybe [FieldIdentifierProperty]
usernameField :: Maybe FieldIdentifierProperty
..}
instance Property "PasswordField" RequestInspectionACFPProperty where
  type PropertyType "PasswordField" RequestInspectionACFPProperty = FieldIdentifierProperty
  set :: PropertyType "PasswordField" RequestInspectionACFPProperty
-> RequestInspectionACFPProperty -> RequestInspectionACFPProperty
set PropertyType "PasswordField" RequestInspectionACFPProperty
newValue RequestInspectionACFPProperty {Maybe [FieldIdentifierProperty]
Maybe FieldIdentifierProperty
()
Value Text
haddock_workaround_ :: RequestInspectionACFPProperty -> ()
addressFields :: RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
emailField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
passwordField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
payloadType :: RequestInspectionACFPProperty -> Value Text
phoneNumberFields :: RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
usernameField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
emailField :: Maybe FieldIdentifierProperty
passwordField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
phoneNumberFields :: Maybe [FieldIdentifierProperty]
usernameField :: Maybe FieldIdentifierProperty
..}
    = RequestInspectionACFPProperty
        {passwordField :: Maybe FieldIdentifierProperty
passwordField = FieldIdentifierProperty -> Maybe FieldIdentifierProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PasswordField" RequestInspectionACFPProperty
FieldIdentifierProperty
newValue, Maybe [FieldIdentifierProperty]
Maybe FieldIdentifierProperty
()
Value Text
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
emailField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
phoneNumberFields :: Maybe [FieldIdentifierProperty]
usernameField :: Maybe FieldIdentifierProperty
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
emailField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
phoneNumberFields :: Maybe [FieldIdentifierProperty]
usernameField :: Maybe FieldIdentifierProperty
..}
instance Property "PayloadType" RequestInspectionACFPProperty where
  type PropertyType "PayloadType" RequestInspectionACFPProperty = Value Prelude.Text
  set :: PropertyType "PayloadType" RequestInspectionACFPProperty
-> RequestInspectionACFPProperty -> RequestInspectionACFPProperty
set PropertyType "PayloadType" RequestInspectionACFPProperty
newValue RequestInspectionACFPProperty {Maybe [FieldIdentifierProperty]
Maybe FieldIdentifierProperty
()
Value Text
haddock_workaround_ :: RequestInspectionACFPProperty -> ()
addressFields :: RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
emailField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
passwordField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
payloadType :: RequestInspectionACFPProperty -> Value Text
phoneNumberFields :: RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
usernameField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
emailField :: Maybe FieldIdentifierProperty
passwordField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
phoneNumberFields :: Maybe [FieldIdentifierProperty]
usernameField :: Maybe FieldIdentifierProperty
..}
    = RequestInspectionACFPProperty {payloadType :: Value Text
payloadType = PropertyType "PayloadType" RequestInspectionACFPProperty
Value Text
newValue, Maybe [FieldIdentifierProperty]
Maybe FieldIdentifierProperty
()
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
emailField :: Maybe FieldIdentifierProperty
passwordField :: Maybe FieldIdentifierProperty
phoneNumberFields :: Maybe [FieldIdentifierProperty]
usernameField :: Maybe FieldIdentifierProperty
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
emailField :: Maybe FieldIdentifierProperty
passwordField :: Maybe FieldIdentifierProperty
phoneNumberFields :: Maybe [FieldIdentifierProperty]
usernameField :: Maybe FieldIdentifierProperty
..}
instance Property "PhoneNumberFields" RequestInspectionACFPProperty where
  type PropertyType "PhoneNumberFields" RequestInspectionACFPProperty = [FieldIdentifierProperty]
  set :: PropertyType "PhoneNumberFields" RequestInspectionACFPProperty
-> RequestInspectionACFPProperty -> RequestInspectionACFPProperty
set PropertyType "PhoneNumberFields" RequestInspectionACFPProperty
newValue RequestInspectionACFPProperty {Maybe [FieldIdentifierProperty]
Maybe FieldIdentifierProperty
()
Value Text
haddock_workaround_ :: RequestInspectionACFPProperty -> ()
addressFields :: RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
emailField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
passwordField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
payloadType :: RequestInspectionACFPProperty -> Value Text
phoneNumberFields :: RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
usernameField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
emailField :: Maybe FieldIdentifierProperty
passwordField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
phoneNumberFields :: Maybe [FieldIdentifierProperty]
usernameField :: Maybe FieldIdentifierProperty
..}
    = RequestInspectionACFPProperty
        {phoneNumberFields :: Maybe [FieldIdentifierProperty]
phoneNumberFields = [FieldIdentifierProperty] -> Maybe [FieldIdentifierProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [FieldIdentifierProperty]
PropertyType "PhoneNumberFields" RequestInspectionACFPProperty
newValue, Maybe [FieldIdentifierProperty]
Maybe FieldIdentifierProperty
()
Value Text
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
emailField :: Maybe FieldIdentifierProperty
passwordField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
usernameField :: Maybe FieldIdentifierProperty
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
emailField :: Maybe FieldIdentifierProperty
passwordField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
usernameField :: Maybe FieldIdentifierProperty
..}
instance Property "UsernameField" RequestInspectionACFPProperty where
  type PropertyType "UsernameField" RequestInspectionACFPProperty = FieldIdentifierProperty
  set :: PropertyType "UsernameField" RequestInspectionACFPProperty
-> RequestInspectionACFPProperty -> RequestInspectionACFPProperty
set PropertyType "UsernameField" RequestInspectionACFPProperty
newValue RequestInspectionACFPProperty {Maybe [FieldIdentifierProperty]
Maybe FieldIdentifierProperty
()
Value Text
haddock_workaround_ :: RequestInspectionACFPProperty -> ()
addressFields :: RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
emailField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
passwordField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
payloadType :: RequestInspectionACFPProperty -> Value Text
phoneNumberFields :: RequestInspectionACFPProperty -> Maybe [FieldIdentifierProperty]
usernameField :: RequestInspectionACFPProperty -> Maybe FieldIdentifierProperty
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
emailField :: Maybe FieldIdentifierProperty
passwordField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
phoneNumberFields :: Maybe [FieldIdentifierProperty]
usernameField :: Maybe FieldIdentifierProperty
..}
    = RequestInspectionACFPProperty
        {usernameField :: Maybe FieldIdentifierProperty
usernameField = FieldIdentifierProperty -> Maybe FieldIdentifierProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "UsernameField" RequestInspectionACFPProperty
FieldIdentifierProperty
newValue, Maybe [FieldIdentifierProperty]
Maybe FieldIdentifierProperty
()
Value Text
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
emailField :: Maybe FieldIdentifierProperty
passwordField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
phoneNumberFields :: Maybe [FieldIdentifierProperty]
haddock_workaround_ :: ()
addressFields :: Maybe [FieldIdentifierProperty]
emailField :: Maybe FieldIdentifierProperty
passwordField :: Maybe FieldIdentifierProperty
payloadType :: Value Text
phoneNumberFields :: Maybe [FieldIdentifierProperty]
..}