{-# 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.Omics.ListVariantImportJobs
(
ListVariantImportJobs (..),
newListVariantImportJobs,
listVariantImportJobs_filter,
listVariantImportJobs_ids,
listVariantImportJobs_maxResults,
listVariantImportJobs_nextToken,
ListVariantImportJobsResponse (..),
newListVariantImportJobsResponse,
listVariantImportJobsResponse_nextToken,
listVariantImportJobsResponse_variantImportJobs,
listVariantImportJobsResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.Omics.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data ListVariantImportJobs = ListVariantImportJobs'
{
ListVariantImportJobs -> Maybe ListVariantImportJobsFilter
filter' :: Prelude.Maybe ListVariantImportJobsFilter,
ListVariantImportJobs -> Maybe (NonEmpty Text)
ids :: Prelude.Maybe (Prelude.NonEmpty Prelude.Text),
ListVariantImportJobs -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
ListVariantImportJobs -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text
}
deriving (ListVariantImportJobs -> ListVariantImportJobs -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListVariantImportJobs -> ListVariantImportJobs -> Bool
$c/= :: ListVariantImportJobs -> ListVariantImportJobs -> Bool
== :: ListVariantImportJobs -> ListVariantImportJobs -> Bool
$c== :: ListVariantImportJobs -> ListVariantImportJobs -> Bool
Prelude.Eq, ReadPrec [ListVariantImportJobs]
ReadPrec ListVariantImportJobs
Int -> ReadS ListVariantImportJobs
ReadS [ListVariantImportJobs]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListVariantImportJobs]
$creadListPrec :: ReadPrec [ListVariantImportJobs]
readPrec :: ReadPrec ListVariantImportJobs
$creadPrec :: ReadPrec ListVariantImportJobs
readList :: ReadS [ListVariantImportJobs]
$creadList :: ReadS [ListVariantImportJobs]
readsPrec :: Int -> ReadS ListVariantImportJobs
$creadsPrec :: Int -> ReadS ListVariantImportJobs
Prelude.Read, Int -> ListVariantImportJobs -> ShowS
[ListVariantImportJobs] -> ShowS
ListVariantImportJobs -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListVariantImportJobs] -> ShowS
$cshowList :: [ListVariantImportJobs] -> ShowS
show :: ListVariantImportJobs -> String
$cshow :: ListVariantImportJobs -> String
showsPrec :: Int -> ListVariantImportJobs -> ShowS
$cshowsPrec :: Int -> ListVariantImportJobs -> ShowS
Prelude.Show, forall x. Rep ListVariantImportJobs x -> ListVariantImportJobs
forall x. ListVariantImportJobs -> Rep ListVariantImportJobs x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ListVariantImportJobs x -> ListVariantImportJobs
$cfrom :: forall x. ListVariantImportJobs -> Rep ListVariantImportJobs x
Prelude.Generic)
newListVariantImportJobs ::
ListVariantImportJobs
newListVariantImportJobs :: ListVariantImportJobs
newListVariantImportJobs =
ListVariantImportJobs'
{ $sel:filter':ListVariantImportJobs' :: Maybe ListVariantImportJobsFilter
filter' = forall a. Maybe a
Prelude.Nothing,
$sel:ids:ListVariantImportJobs' :: Maybe (NonEmpty Text)
ids = forall a. Maybe a
Prelude.Nothing,
$sel:maxResults:ListVariantImportJobs' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:ListVariantImportJobs' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing
}
listVariantImportJobs_filter :: Lens.Lens' ListVariantImportJobs (Prelude.Maybe ListVariantImportJobsFilter)
listVariantImportJobs_filter :: Lens' ListVariantImportJobs (Maybe ListVariantImportJobsFilter)
listVariantImportJobs_filter = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListVariantImportJobs' {Maybe ListVariantImportJobsFilter
filter' :: Maybe ListVariantImportJobsFilter
$sel:filter':ListVariantImportJobs' :: ListVariantImportJobs -> Maybe ListVariantImportJobsFilter
filter'} -> Maybe ListVariantImportJobsFilter
filter') (\s :: ListVariantImportJobs
s@ListVariantImportJobs' {} Maybe ListVariantImportJobsFilter
a -> ListVariantImportJobs
s {$sel:filter':ListVariantImportJobs' :: Maybe ListVariantImportJobsFilter
filter' = Maybe ListVariantImportJobsFilter
a} :: ListVariantImportJobs)
listVariantImportJobs_ids :: Lens.Lens' ListVariantImportJobs (Prelude.Maybe (Prelude.NonEmpty Prelude.Text))
listVariantImportJobs_ids :: Lens' ListVariantImportJobs (Maybe (NonEmpty Text))
listVariantImportJobs_ids = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListVariantImportJobs' {Maybe (NonEmpty Text)
ids :: Maybe (NonEmpty Text)
$sel:ids:ListVariantImportJobs' :: ListVariantImportJobs -> Maybe (NonEmpty Text)
ids} -> Maybe (NonEmpty Text)
ids) (\s :: ListVariantImportJobs
s@ListVariantImportJobs' {} Maybe (NonEmpty Text)
a -> ListVariantImportJobs
s {$sel:ids:ListVariantImportJobs' :: Maybe (NonEmpty Text)
ids = Maybe (NonEmpty Text)
a} :: ListVariantImportJobs) 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
listVariantImportJobs_maxResults :: Lens.Lens' ListVariantImportJobs (Prelude.Maybe Prelude.Natural)
listVariantImportJobs_maxResults :: Lens' ListVariantImportJobs (Maybe Natural)
listVariantImportJobs_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListVariantImportJobs' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListVariantImportJobs' :: ListVariantImportJobs -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListVariantImportJobs
s@ListVariantImportJobs' {} Maybe Natural
a -> ListVariantImportJobs
s {$sel:maxResults:ListVariantImportJobs' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListVariantImportJobs)
listVariantImportJobs_nextToken :: Lens.Lens' ListVariantImportJobs (Prelude.Maybe Prelude.Text)
listVariantImportJobs_nextToken :: Lens' ListVariantImportJobs (Maybe Text)
listVariantImportJobs_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListVariantImportJobs' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListVariantImportJobs' :: ListVariantImportJobs -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListVariantImportJobs
s@ListVariantImportJobs' {} Maybe Text
a -> ListVariantImportJobs
s {$sel:nextToken:ListVariantImportJobs' :: Maybe Text
nextToken = Maybe Text
a} :: ListVariantImportJobs)
instance Core.AWSPager ListVariantImportJobs where
page :: ListVariantImportJobs
-> AWSResponse ListVariantImportJobs -> Maybe ListVariantImportJobs
page ListVariantImportJobs
rq AWSResponse ListVariantImportJobs
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse ListVariantImportJobs
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListVariantImportJobsResponse (Maybe Text)
listVariantImportJobsResponse_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 ListVariantImportJobs
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListVariantImportJobsResponse (Maybe [VariantImportJobItem])
listVariantImportJobsResponse_variantImportJobs
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.$ ListVariantImportJobs
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' ListVariantImportJobs (Maybe Text)
listVariantImportJobs_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse ListVariantImportJobs
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' ListVariantImportJobsResponse (Maybe Text)
listVariantImportJobsResponse_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 ListVariantImportJobs where
type
AWSResponse ListVariantImportJobs =
ListVariantImportJobsResponse
request :: (Service -> Service)
-> ListVariantImportJobs -> Request ListVariantImportJobs
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 ListVariantImportJobs
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse ListVariantImportJobs)))
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 Text
-> Maybe [VariantImportJobItem]
-> Int
-> ListVariantImportJobsResponse
ListVariantImportJobsResponse'
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
"nextToken")
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
"variantImportJobs"
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.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance Prelude.Hashable ListVariantImportJobs where
hashWithSalt :: Int -> ListVariantImportJobs -> Int
hashWithSalt Int
_salt ListVariantImportJobs' {Maybe Natural
Maybe (NonEmpty Text)
Maybe Text
Maybe ListVariantImportJobsFilter
nextToken :: Maybe Text
maxResults :: Maybe Natural
ids :: Maybe (NonEmpty Text)
filter' :: Maybe ListVariantImportJobsFilter
$sel:nextToken:ListVariantImportJobs' :: ListVariantImportJobs -> Maybe Text
$sel:maxResults:ListVariantImportJobs' :: ListVariantImportJobs -> Maybe Natural
$sel:ids:ListVariantImportJobs' :: ListVariantImportJobs -> Maybe (NonEmpty Text)
$sel:filter':ListVariantImportJobs' :: ListVariantImportJobs -> Maybe ListVariantImportJobsFilter
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ListVariantImportJobsFilter
filter'
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (NonEmpty Text)
ids
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
instance Prelude.NFData ListVariantImportJobs where
rnf :: ListVariantImportJobs -> ()
rnf ListVariantImportJobs' {Maybe Natural
Maybe (NonEmpty Text)
Maybe Text
Maybe ListVariantImportJobsFilter
nextToken :: Maybe Text
maxResults :: Maybe Natural
ids :: Maybe (NonEmpty Text)
filter' :: Maybe ListVariantImportJobsFilter
$sel:nextToken:ListVariantImportJobs' :: ListVariantImportJobs -> Maybe Text
$sel:maxResults:ListVariantImportJobs' :: ListVariantImportJobs -> Maybe Natural
$sel:ids:ListVariantImportJobs' :: ListVariantImportJobs -> Maybe (NonEmpty Text)
$sel:filter':ListVariantImportJobs' :: ListVariantImportJobs -> Maybe ListVariantImportJobsFilter
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe ListVariantImportJobsFilter
filter'
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (NonEmpty Text)
ids
seq :: forall a b. a -> b -> b
`Prelude.seq` 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
instance Data.ToHeaders ListVariantImportJobs where
toHeaders :: ListVariantImportJobs -> 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 ListVariantImportJobs where
toJSON :: ListVariantImportJobs -> Value
toJSON ListVariantImportJobs' {Maybe Natural
Maybe (NonEmpty Text)
Maybe Text
Maybe ListVariantImportJobsFilter
nextToken :: Maybe Text
maxResults :: Maybe Natural
ids :: Maybe (NonEmpty Text)
filter' :: Maybe ListVariantImportJobsFilter
$sel:nextToken:ListVariantImportJobs' :: ListVariantImportJobs -> Maybe Text
$sel:maxResults:ListVariantImportJobs' :: ListVariantImportJobs -> Maybe Natural
$sel:ids:ListVariantImportJobs' :: ListVariantImportJobs -> Maybe (NonEmpty Text)
$sel:filter':ListVariantImportJobs' :: ListVariantImportJobs -> Maybe ListVariantImportJobsFilter
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"filter" 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 ListVariantImportJobsFilter
filter',
(Key
"ids" 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 (NonEmpty Text)
ids
]
)
instance Data.ToPath ListVariantImportJobs where
toPath :: ListVariantImportJobs -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/import/variants"
instance Data.ToQuery ListVariantImportJobs where
toQuery :: ListVariantImportJobs -> QueryString
toQuery ListVariantImportJobs' {Maybe Natural
Maybe (NonEmpty Text)
Maybe Text
Maybe ListVariantImportJobsFilter
nextToken :: Maybe Text
maxResults :: Maybe Natural
ids :: Maybe (NonEmpty Text)
filter' :: Maybe ListVariantImportJobsFilter
$sel:nextToken:ListVariantImportJobs' :: ListVariantImportJobs -> Maybe Text
$sel:maxResults:ListVariantImportJobs' :: ListVariantImportJobs -> Maybe Natural
$sel:ids:ListVariantImportJobs' :: ListVariantImportJobs -> Maybe (NonEmpty Text)
$sel:filter':ListVariantImportJobs' :: ListVariantImportJobs -> Maybe ListVariantImportJobsFilter
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"maxResults" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Natural
maxResults,
ByteString
"nextToken" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
nextToken
]
data ListVariantImportJobsResponse = ListVariantImportJobsResponse'
{
ListVariantImportJobsResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
ListVariantImportJobsResponse -> Maybe [VariantImportJobItem]
variantImportJobs :: Prelude.Maybe [VariantImportJobItem],
ListVariantImportJobsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (ListVariantImportJobsResponse
-> ListVariantImportJobsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListVariantImportJobsResponse
-> ListVariantImportJobsResponse -> Bool
$c/= :: ListVariantImportJobsResponse
-> ListVariantImportJobsResponse -> Bool
== :: ListVariantImportJobsResponse
-> ListVariantImportJobsResponse -> Bool
$c== :: ListVariantImportJobsResponse
-> ListVariantImportJobsResponse -> Bool
Prelude.Eq, ReadPrec [ListVariantImportJobsResponse]
ReadPrec ListVariantImportJobsResponse
Int -> ReadS ListVariantImportJobsResponse
ReadS [ListVariantImportJobsResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListVariantImportJobsResponse]
$creadListPrec :: ReadPrec [ListVariantImportJobsResponse]
readPrec :: ReadPrec ListVariantImportJobsResponse
$creadPrec :: ReadPrec ListVariantImportJobsResponse
readList :: ReadS [ListVariantImportJobsResponse]
$creadList :: ReadS [ListVariantImportJobsResponse]
readsPrec :: Int -> ReadS ListVariantImportJobsResponse
$creadsPrec :: Int -> ReadS ListVariantImportJobsResponse
Prelude.Read, Int -> ListVariantImportJobsResponse -> ShowS
[ListVariantImportJobsResponse] -> ShowS
ListVariantImportJobsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListVariantImportJobsResponse] -> ShowS
$cshowList :: [ListVariantImportJobsResponse] -> ShowS
show :: ListVariantImportJobsResponse -> String
$cshow :: ListVariantImportJobsResponse -> String
showsPrec :: Int -> ListVariantImportJobsResponse -> ShowS
$cshowsPrec :: Int -> ListVariantImportJobsResponse -> ShowS
Prelude.Show, forall x.
Rep ListVariantImportJobsResponse x
-> ListVariantImportJobsResponse
forall x.
ListVariantImportJobsResponse
-> Rep ListVariantImportJobsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListVariantImportJobsResponse x
-> ListVariantImportJobsResponse
$cfrom :: forall x.
ListVariantImportJobsResponse
-> Rep ListVariantImportJobsResponse x
Prelude.Generic)
newListVariantImportJobsResponse ::
Prelude.Int ->
ListVariantImportJobsResponse
newListVariantImportJobsResponse :: Int -> ListVariantImportJobsResponse
newListVariantImportJobsResponse Int
pHttpStatus_ =
ListVariantImportJobsResponse'
{ $sel:nextToken:ListVariantImportJobsResponse' :: Maybe Text
nextToken =
forall a. Maybe a
Prelude.Nothing,
$sel:variantImportJobs:ListVariantImportJobsResponse' :: Maybe [VariantImportJobItem]
variantImportJobs = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:ListVariantImportJobsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
listVariantImportJobsResponse_nextToken :: Lens.Lens' ListVariantImportJobsResponse (Prelude.Maybe Prelude.Text)
listVariantImportJobsResponse_nextToken :: Lens' ListVariantImportJobsResponse (Maybe Text)
listVariantImportJobsResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListVariantImportJobsResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListVariantImportJobsResponse' :: ListVariantImportJobsResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListVariantImportJobsResponse
s@ListVariantImportJobsResponse' {} Maybe Text
a -> ListVariantImportJobsResponse
s {$sel:nextToken:ListVariantImportJobsResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListVariantImportJobsResponse)
listVariantImportJobsResponse_variantImportJobs :: Lens.Lens' ListVariantImportJobsResponse (Prelude.Maybe [VariantImportJobItem])
listVariantImportJobsResponse_variantImportJobs :: Lens' ListVariantImportJobsResponse (Maybe [VariantImportJobItem])
listVariantImportJobsResponse_variantImportJobs = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListVariantImportJobsResponse' {Maybe [VariantImportJobItem]
variantImportJobs :: Maybe [VariantImportJobItem]
$sel:variantImportJobs:ListVariantImportJobsResponse' :: ListVariantImportJobsResponse -> Maybe [VariantImportJobItem]
variantImportJobs} -> Maybe [VariantImportJobItem]
variantImportJobs) (\s :: ListVariantImportJobsResponse
s@ListVariantImportJobsResponse' {} Maybe [VariantImportJobItem]
a -> ListVariantImportJobsResponse
s {$sel:variantImportJobs:ListVariantImportJobsResponse' :: Maybe [VariantImportJobItem]
variantImportJobs = Maybe [VariantImportJobItem]
a} :: ListVariantImportJobsResponse) 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
listVariantImportJobsResponse_httpStatus :: Lens.Lens' ListVariantImportJobsResponse Prelude.Int
listVariantImportJobsResponse_httpStatus :: Lens' ListVariantImportJobsResponse Int
listVariantImportJobsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListVariantImportJobsResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListVariantImportJobsResponse' :: ListVariantImportJobsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListVariantImportJobsResponse
s@ListVariantImportJobsResponse' {} Int
a -> ListVariantImportJobsResponse
s {$sel:httpStatus:ListVariantImportJobsResponse' :: Int
httpStatus = Int
a} :: ListVariantImportJobsResponse)
instance Prelude.NFData ListVariantImportJobsResponse where
rnf :: ListVariantImportJobsResponse -> ()
rnf ListVariantImportJobsResponse' {Int
Maybe [VariantImportJobItem]
Maybe Text
httpStatus :: Int
variantImportJobs :: Maybe [VariantImportJobItem]
nextToken :: Maybe Text
$sel:httpStatus:ListVariantImportJobsResponse' :: ListVariantImportJobsResponse -> Int
$sel:variantImportJobs:ListVariantImportJobsResponse' :: ListVariantImportJobsResponse -> Maybe [VariantImportJobItem]
$sel:nextToken:ListVariantImportJobsResponse' :: ListVariantImportJobsResponse -> Maybe Text
..} =
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 [VariantImportJobItem]
variantImportJobs
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus