{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.Connect.SearchAvailablePhoneNumbers
(
SearchAvailablePhoneNumbers (..),
newSearchAvailablePhoneNumbers,
searchAvailablePhoneNumbers_maxResults,
searchAvailablePhoneNumbers_nextToken,
searchAvailablePhoneNumbers_phoneNumberPrefix,
searchAvailablePhoneNumbers_targetArn,
searchAvailablePhoneNumbers_phoneNumberCountryCode,
searchAvailablePhoneNumbers_phoneNumberType,
SearchAvailablePhoneNumbersResponse (..),
newSearchAvailablePhoneNumbersResponse,
searchAvailablePhoneNumbersResponse_availableNumbersList,
searchAvailablePhoneNumbersResponse_nextToken,
searchAvailablePhoneNumbersResponse_httpStatus,
)
where
import Amazonka.Connect.Types
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data SearchAvailablePhoneNumbers = SearchAvailablePhoneNumbers'
{
SearchAvailablePhoneNumbers -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
SearchAvailablePhoneNumbers -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
SearchAvailablePhoneNumbers -> Maybe Text
phoneNumberPrefix :: Prelude.Maybe Prelude.Text,
SearchAvailablePhoneNumbers -> Text
targetArn :: Prelude.Text,
SearchAvailablePhoneNumbers -> PhoneNumberCountryCode
phoneNumberCountryCode :: PhoneNumberCountryCode,
SearchAvailablePhoneNumbers -> PhoneNumberType
phoneNumberType :: PhoneNumberType
}
deriving (SearchAvailablePhoneNumbers -> SearchAvailablePhoneNumbers -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SearchAvailablePhoneNumbers -> SearchAvailablePhoneNumbers -> Bool
$c/= :: SearchAvailablePhoneNumbers -> SearchAvailablePhoneNumbers -> Bool
== :: SearchAvailablePhoneNumbers -> SearchAvailablePhoneNumbers -> Bool
$c== :: SearchAvailablePhoneNumbers -> SearchAvailablePhoneNumbers -> Bool
Prelude.Eq, ReadPrec [SearchAvailablePhoneNumbers]
ReadPrec SearchAvailablePhoneNumbers
Int -> ReadS SearchAvailablePhoneNumbers
ReadS [SearchAvailablePhoneNumbers]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [SearchAvailablePhoneNumbers]
$creadListPrec :: ReadPrec [SearchAvailablePhoneNumbers]
readPrec :: ReadPrec SearchAvailablePhoneNumbers
$creadPrec :: ReadPrec SearchAvailablePhoneNumbers
readList :: ReadS [SearchAvailablePhoneNumbers]
$creadList :: ReadS [SearchAvailablePhoneNumbers]
readsPrec :: Int -> ReadS SearchAvailablePhoneNumbers
$creadsPrec :: Int -> ReadS SearchAvailablePhoneNumbers
Prelude.Read, Int -> SearchAvailablePhoneNumbers -> ShowS
[SearchAvailablePhoneNumbers] -> ShowS
SearchAvailablePhoneNumbers -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [SearchAvailablePhoneNumbers] -> ShowS
$cshowList :: [SearchAvailablePhoneNumbers] -> ShowS
show :: SearchAvailablePhoneNumbers -> String
$cshow :: SearchAvailablePhoneNumbers -> String
showsPrec :: Int -> SearchAvailablePhoneNumbers -> ShowS
$cshowsPrec :: Int -> SearchAvailablePhoneNumbers -> ShowS
Prelude.Show, forall x.
Rep SearchAvailablePhoneNumbers x -> SearchAvailablePhoneNumbers
forall x.
SearchAvailablePhoneNumbers -> Rep SearchAvailablePhoneNumbers x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep SearchAvailablePhoneNumbers x -> SearchAvailablePhoneNumbers
$cfrom :: forall x.
SearchAvailablePhoneNumbers -> Rep SearchAvailablePhoneNumbers x
Prelude.Generic)
newSearchAvailablePhoneNumbers ::
Prelude.Text ->
PhoneNumberCountryCode ->
PhoneNumberType ->
SearchAvailablePhoneNumbers
newSearchAvailablePhoneNumbers :: Text
-> PhoneNumberCountryCode
-> PhoneNumberType
-> SearchAvailablePhoneNumbers
newSearchAvailablePhoneNumbers
Text
pTargetArn_
PhoneNumberCountryCode
pPhoneNumberCountryCode_
PhoneNumberType
pPhoneNumberType_ =
SearchAvailablePhoneNumbers'
{ $sel:maxResults:SearchAvailablePhoneNumbers' :: Maybe Natural
maxResults =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:SearchAvailablePhoneNumbers' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:phoneNumberPrefix:SearchAvailablePhoneNumbers' :: Maybe Text
phoneNumberPrefix = forall a. Maybe a
Prelude.Nothing,
$sel:targetArn:SearchAvailablePhoneNumbers' :: Text
targetArn = Text
pTargetArn_,
$sel:phoneNumberCountryCode:SearchAvailablePhoneNumbers' :: PhoneNumberCountryCode
phoneNumberCountryCode =
PhoneNumberCountryCode
pPhoneNumberCountryCode_,
$sel:phoneNumberType:SearchAvailablePhoneNumbers' :: PhoneNumberType
phoneNumberType = PhoneNumberType
pPhoneNumberType_
}
searchAvailablePhoneNumbers_maxResults :: Lens.Lens' SearchAvailablePhoneNumbers (Prelude.Maybe Prelude.Natural)
searchAvailablePhoneNumbers_maxResults :: Lens' SearchAvailablePhoneNumbers (Maybe Natural)
searchAvailablePhoneNumbers_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SearchAvailablePhoneNumbers' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: SearchAvailablePhoneNumbers
s@SearchAvailablePhoneNumbers' {} Maybe Natural
a -> SearchAvailablePhoneNumbers
s {$sel:maxResults:SearchAvailablePhoneNumbers' :: Maybe Natural
maxResults = Maybe Natural
a} :: SearchAvailablePhoneNumbers)
searchAvailablePhoneNumbers_nextToken :: Lens.Lens' SearchAvailablePhoneNumbers (Prelude.Maybe Prelude.Text)
searchAvailablePhoneNumbers_nextToken :: Lens' SearchAvailablePhoneNumbers (Maybe Text)
searchAvailablePhoneNumbers_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SearchAvailablePhoneNumbers' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: SearchAvailablePhoneNumbers
s@SearchAvailablePhoneNumbers' {} Maybe Text
a -> SearchAvailablePhoneNumbers
s {$sel:nextToken:SearchAvailablePhoneNumbers' :: Maybe Text
nextToken = Maybe Text
a} :: SearchAvailablePhoneNumbers)
searchAvailablePhoneNumbers_phoneNumberPrefix :: Lens.Lens' SearchAvailablePhoneNumbers (Prelude.Maybe Prelude.Text)
searchAvailablePhoneNumbers_phoneNumberPrefix :: Lens' SearchAvailablePhoneNumbers (Maybe Text)
searchAvailablePhoneNumbers_phoneNumberPrefix = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SearchAvailablePhoneNumbers' {Maybe Text
phoneNumberPrefix :: Maybe Text
$sel:phoneNumberPrefix:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> Maybe Text
phoneNumberPrefix} -> Maybe Text
phoneNumberPrefix) (\s :: SearchAvailablePhoneNumbers
s@SearchAvailablePhoneNumbers' {} Maybe Text
a -> SearchAvailablePhoneNumbers
s {$sel:phoneNumberPrefix:SearchAvailablePhoneNumbers' :: Maybe Text
phoneNumberPrefix = Maybe Text
a} :: SearchAvailablePhoneNumbers)
searchAvailablePhoneNumbers_targetArn :: Lens.Lens' SearchAvailablePhoneNumbers Prelude.Text
searchAvailablePhoneNumbers_targetArn :: Lens' SearchAvailablePhoneNumbers Text
searchAvailablePhoneNumbers_targetArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SearchAvailablePhoneNumbers' {Text
targetArn :: Text
$sel:targetArn:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> Text
targetArn} -> Text
targetArn) (\s :: SearchAvailablePhoneNumbers
s@SearchAvailablePhoneNumbers' {} Text
a -> SearchAvailablePhoneNumbers
s {$sel:targetArn:SearchAvailablePhoneNumbers' :: Text
targetArn = Text
a} :: SearchAvailablePhoneNumbers)
searchAvailablePhoneNumbers_phoneNumberCountryCode :: Lens.Lens' SearchAvailablePhoneNumbers PhoneNumberCountryCode
searchAvailablePhoneNumbers_phoneNumberCountryCode :: Lens' SearchAvailablePhoneNumbers PhoneNumberCountryCode
searchAvailablePhoneNumbers_phoneNumberCountryCode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SearchAvailablePhoneNumbers' {PhoneNumberCountryCode
phoneNumberCountryCode :: PhoneNumberCountryCode
$sel:phoneNumberCountryCode:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> PhoneNumberCountryCode
phoneNumberCountryCode} -> PhoneNumberCountryCode
phoneNumberCountryCode) (\s :: SearchAvailablePhoneNumbers
s@SearchAvailablePhoneNumbers' {} PhoneNumberCountryCode
a -> SearchAvailablePhoneNumbers
s {$sel:phoneNumberCountryCode:SearchAvailablePhoneNumbers' :: PhoneNumberCountryCode
phoneNumberCountryCode = PhoneNumberCountryCode
a} :: SearchAvailablePhoneNumbers)
searchAvailablePhoneNumbers_phoneNumberType :: Lens.Lens' SearchAvailablePhoneNumbers PhoneNumberType
searchAvailablePhoneNumbers_phoneNumberType :: Lens' SearchAvailablePhoneNumbers PhoneNumberType
searchAvailablePhoneNumbers_phoneNumberType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SearchAvailablePhoneNumbers' {PhoneNumberType
phoneNumberType :: PhoneNumberType
$sel:phoneNumberType:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> PhoneNumberType
phoneNumberType} -> PhoneNumberType
phoneNumberType) (\s :: SearchAvailablePhoneNumbers
s@SearchAvailablePhoneNumbers' {} PhoneNumberType
a -> SearchAvailablePhoneNumbers
s {$sel:phoneNumberType:SearchAvailablePhoneNumbers' :: PhoneNumberType
phoneNumberType = PhoneNumberType
a} :: SearchAvailablePhoneNumbers)
instance Core.AWSPager SearchAvailablePhoneNumbers where
page :: SearchAvailablePhoneNumbers
-> AWSResponse SearchAvailablePhoneNumbers
-> Maybe SearchAvailablePhoneNumbers
page SearchAvailablePhoneNumbers
rq AWSResponse SearchAvailablePhoneNumbers
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse SearchAvailablePhoneNumbers
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' SearchAvailablePhoneNumbersResponse (Maybe Text)
searchAvailablePhoneNumbersResponse_nextToken
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse SearchAvailablePhoneNumbers
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens'
SearchAvailablePhoneNumbersResponse
(Maybe [AvailableNumberSummary])
searchAvailablePhoneNumbersResponse_availableNumbersList
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| Bool
Prelude.otherwise =
forall a. a -> Maybe a
Prelude.Just
forall a b. (a -> b) -> a -> b
Prelude.$ SearchAvailablePhoneNumbers
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' SearchAvailablePhoneNumbers (Maybe Text)
searchAvailablePhoneNumbers_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse SearchAvailablePhoneNumbers
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' SearchAvailablePhoneNumbersResponse (Maybe Text)
searchAvailablePhoneNumbersResponse_nextToken
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
instance Core.AWSRequest SearchAvailablePhoneNumbers where
type
AWSResponse SearchAvailablePhoneNumbers =
SearchAvailablePhoneNumbersResponse
request :: (Service -> Service)
-> SearchAvailablePhoneNumbers
-> Request SearchAvailablePhoneNumbers
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy SearchAvailablePhoneNumbers
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse SearchAvailablePhoneNumbers)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe [AvailableNumberSummary]
-> Maybe Text -> Int -> SearchAvailablePhoneNumbersResponse
SearchAvailablePhoneNumbersResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ( Object
x
forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"AvailableNumbersList"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"NextToken")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance Prelude.Hashable SearchAvailablePhoneNumbers where
hashWithSalt :: Int -> SearchAvailablePhoneNumbers -> Int
hashWithSalt Int
_salt SearchAvailablePhoneNumbers' {Maybe Natural
Maybe Text
Text
PhoneNumberCountryCode
PhoneNumberType
phoneNumberType :: PhoneNumberType
phoneNumberCountryCode :: PhoneNumberCountryCode
targetArn :: Text
phoneNumberPrefix :: Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:phoneNumberType:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> PhoneNumberType
$sel:phoneNumberCountryCode:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> PhoneNumberCountryCode
$sel:targetArn:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> Text
$sel:phoneNumberPrefix:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> Maybe Text
$sel:nextToken:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> Maybe Text
$sel:maxResults:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> Maybe Natural
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
phoneNumberPrefix
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
targetArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` PhoneNumberCountryCode
phoneNumberCountryCode
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` PhoneNumberType
phoneNumberType
instance Prelude.NFData SearchAvailablePhoneNumbers where
rnf :: SearchAvailablePhoneNumbers -> ()
rnf SearchAvailablePhoneNumbers' {Maybe Natural
Maybe Text
Text
PhoneNumberCountryCode
PhoneNumberType
phoneNumberType :: PhoneNumberType
phoneNumberCountryCode :: PhoneNumberCountryCode
targetArn :: Text
phoneNumberPrefix :: Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:phoneNumberType:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> PhoneNumberType
$sel:phoneNumberCountryCode:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> PhoneNumberCountryCode
$sel:targetArn:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> Text
$sel:phoneNumberPrefix:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> Maybe Text
$sel:nextToken:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> Maybe Text
$sel:maxResults:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> Maybe Natural
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
maxResults
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
phoneNumberPrefix
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
targetArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf PhoneNumberCountryCode
phoneNumberCountryCode
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf PhoneNumberType
phoneNumberType
instance Data.ToHeaders SearchAvailablePhoneNumbers where
toHeaders :: SearchAvailablePhoneNumbers -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON SearchAvailablePhoneNumbers where
toJSON :: SearchAvailablePhoneNumbers -> Value
toJSON SearchAvailablePhoneNumbers' {Maybe Natural
Maybe Text
Text
PhoneNumberCountryCode
PhoneNumberType
phoneNumberType :: PhoneNumberType
phoneNumberCountryCode :: PhoneNumberCountryCode
targetArn :: Text
phoneNumberPrefix :: Maybe Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:phoneNumberType:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> PhoneNumberType
$sel:phoneNumberCountryCode:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> PhoneNumberCountryCode
$sel:targetArn:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> Text
$sel:phoneNumberPrefix:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> Maybe Text
$sel:nextToken:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> Maybe Text
$sel:maxResults:SearchAvailablePhoneNumbers' :: SearchAvailablePhoneNumbers -> Maybe Natural
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"MaxResults" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Natural
maxResults,
(Key
"NextToken" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
nextToken,
(Key
"PhoneNumberPrefix" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
phoneNumberPrefix,
forall a. a -> Maybe a
Prelude.Just (Key
"TargetArn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
targetArn),
forall a. a -> Maybe a
Prelude.Just
( Key
"PhoneNumberCountryCode"
forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= PhoneNumberCountryCode
phoneNumberCountryCode
),
forall a. a -> Maybe a
Prelude.Just
(Key
"PhoneNumberType" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= PhoneNumberType
phoneNumberType)
]
)
instance Data.ToPath SearchAvailablePhoneNumbers where
toPath :: SearchAvailablePhoneNumbers -> ByteString
toPath =
forall a b. a -> b -> a
Prelude.const ByteString
"/phone-number/search-available"
instance Data.ToQuery SearchAvailablePhoneNumbers where
toQuery :: SearchAvailablePhoneNumbers -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data SearchAvailablePhoneNumbersResponse = SearchAvailablePhoneNumbersResponse'
{
SearchAvailablePhoneNumbersResponse
-> Maybe [AvailableNumberSummary]
availableNumbersList :: Prelude.Maybe [AvailableNumberSummary],
SearchAvailablePhoneNumbersResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
SearchAvailablePhoneNumbersResponse -> Int
httpStatus :: Prelude.Int
}
deriving (SearchAvailablePhoneNumbersResponse
-> SearchAvailablePhoneNumbersResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SearchAvailablePhoneNumbersResponse
-> SearchAvailablePhoneNumbersResponse -> Bool
$c/= :: SearchAvailablePhoneNumbersResponse
-> SearchAvailablePhoneNumbersResponse -> Bool
== :: SearchAvailablePhoneNumbersResponse
-> SearchAvailablePhoneNumbersResponse -> Bool
$c== :: SearchAvailablePhoneNumbersResponse
-> SearchAvailablePhoneNumbersResponse -> Bool
Prelude.Eq, ReadPrec [SearchAvailablePhoneNumbersResponse]
ReadPrec SearchAvailablePhoneNumbersResponse
Int -> ReadS SearchAvailablePhoneNumbersResponse
ReadS [SearchAvailablePhoneNumbersResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [SearchAvailablePhoneNumbersResponse]
$creadListPrec :: ReadPrec [SearchAvailablePhoneNumbersResponse]
readPrec :: ReadPrec SearchAvailablePhoneNumbersResponse
$creadPrec :: ReadPrec SearchAvailablePhoneNumbersResponse
readList :: ReadS [SearchAvailablePhoneNumbersResponse]
$creadList :: ReadS [SearchAvailablePhoneNumbersResponse]
readsPrec :: Int -> ReadS SearchAvailablePhoneNumbersResponse
$creadsPrec :: Int -> ReadS SearchAvailablePhoneNumbersResponse
Prelude.Read, Int -> SearchAvailablePhoneNumbersResponse -> ShowS
[SearchAvailablePhoneNumbersResponse] -> ShowS
SearchAvailablePhoneNumbersResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [SearchAvailablePhoneNumbersResponse] -> ShowS
$cshowList :: [SearchAvailablePhoneNumbersResponse] -> ShowS
show :: SearchAvailablePhoneNumbersResponse -> String
$cshow :: SearchAvailablePhoneNumbersResponse -> String
showsPrec :: Int -> SearchAvailablePhoneNumbersResponse -> ShowS
$cshowsPrec :: Int -> SearchAvailablePhoneNumbersResponse -> ShowS
Prelude.Show, forall x.
Rep SearchAvailablePhoneNumbersResponse x
-> SearchAvailablePhoneNumbersResponse
forall x.
SearchAvailablePhoneNumbersResponse
-> Rep SearchAvailablePhoneNumbersResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep SearchAvailablePhoneNumbersResponse x
-> SearchAvailablePhoneNumbersResponse
$cfrom :: forall x.
SearchAvailablePhoneNumbersResponse
-> Rep SearchAvailablePhoneNumbersResponse x
Prelude.Generic)
newSearchAvailablePhoneNumbersResponse ::
Prelude.Int ->
SearchAvailablePhoneNumbersResponse
newSearchAvailablePhoneNumbersResponse :: Int -> SearchAvailablePhoneNumbersResponse
newSearchAvailablePhoneNumbersResponse Int
pHttpStatus_ =
SearchAvailablePhoneNumbersResponse'
{ $sel:availableNumbersList:SearchAvailablePhoneNumbersResponse' :: Maybe [AvailableNumberSummary]
availableNumbersList =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:SearchAvailablePhoneNumbersResponse' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:SearchAvailablePhoneNumbersResponse' :: Int
httpStatus = Int
pHttpStatus_
}
searchAvailablePhoneNumbersResponse_availableNumbersList :: Lens.Lens' SearchAvailablePhoneNumbersResponse (Prelude.Maybe [AvailableNumberSummary])
searchAvailablePhoneNumbersResponse_availableNumbersList :: Lens'
SearchAvailablePhoneNumbersResponse
(Maybe [AvailableNumberSummary])
searchAvailablePhoneNumbersResponse_availableNumbersList = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SearchAvailablePhoneNumbersResponse' {Maybe [AvailableNumberSummary]
availableNumbersList :: Maybe [AvailableNumberSummary]
$sel:availableNumbersList:SearchAvailablePhoneNumbersResponse' :: SearchAvailablePhoneNumbersResponse
-> Maybe [AvailableNumberSummary]
availableNumbersList} -> Maybe [AvailableNumberSummary]
availableNumbersList) (\s :: SearchAvailablePhoneNumbersResponse
s@SearchAvailablePhoneNumbersResponse' {} Maybe [AvailableNumberSummary]
a -> SearchAvailablePhoneNumbersResponse
s {$sel:availableNumbersList:SearchAvailablePhoneNumbersResponse' :: Maybe [AvailableNumberSummary]
availableNumbersList = Maybe [AvailableNumberSummary]
a} :: SearchAvailablePhoneNumbersResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
searchAvailablePhoneNumbersResponse_nextToken :: Lens.Lens' SearchAvailablePhoneNumbersResponse (Prelude.Maybe Prelude.Text)
searchAvailablePhoneNumbersResponse_nextToken :: Lens' SearchAvailablePhoneNumbersResponse (Maybe Text)
searchAvailablePhoneNumbersResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SearchAvailablePhoneNumbersResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:SearchAvailablePhoneNumbersResponse' :: SearchAvailablePhoneNumbersResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: SearchAvailablePhoneNumbersResponse
s@SearchAvailablePhoneNumbersResponse' {} Maybe Text
a -> SearchAvailablePhoneNumbersResponse
s {$sel:nextToken:SearchAvailablePhoneNumbersResponse' :: Maybe Text
nextToken = Maybe Text
a} :: SearchAvailablePhoneNumbersResponse)
searchAvailablePhoneNumbersResponse_httpStatus :: Lens.Lens' SearchAvailablePhoneNumbersResponse Prelude.Int
searchAvailablePhoneNumbersResponse_httpStatus :: Lens' SearchAvailablePhoneNumbersResponse Int
searchAvailablePhoneNumbersResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SearchAvailablePhoneNumbersResponse' {Int
httpStatus :: Int
$sel:httpStatus:SearchAvailablePhoneNumbersResponse' :: SearchAvailablePhoneNumbersResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: SearchAvailablePhoneNumbersResponse
s@SearchAvailablePhoneNumbersResponse' {} Int
a -> SearchAvailablePhoneNumbersResponse
s {$sel:httpStatus:SearchAvailablePhoneNumbersResponse' :: Int
httpStatus = Int
a} :: SearchAvailablePhoneNumbersResponse)
instance
Prelude.NFData
SearchAvailablePhoneNumbersResponse
where
rnf :: SearchAvailablePhoneNumbersResponse -> ()
rnf SearchAvailablePhoneNumbersResponse' {Int
Maybe [AvailableNumberSummary]
Maybe Text
httpStatus :: Int
nextToken :: Maybe Text
availableNumbersList :: Maybe [AvailableNumberSummary]
$sel:httpStatus:SearchAvailablePhoneNumbersResponse' :: SearchAvailablePhoneNumbersResponse -> Int
$sel:nextToken:SearchAvailablePhoneNumbersResponse' :: SearchAvailablePhoneNumbersResponse -> Maybe Text
$sel:availableNumbersList:SearchAvailablePhoneNumbersResponse' :: SearchAvailablePhoneNumbersResponse
-> Maybe [AvailableNumberSummary]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [AvailableNumberSummary]
availableNumbersList
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus