{-# 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 #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.MediaConvert.ListJobTemplates
-- Copyright   : (c) 2013-2021 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Retrieve a JSON array of up to twenty of your job templates. This will
-- return the templates themselves, not just a list of them. To retrieve
-- the next twenty templates, use the nextToken string returned with the
-- array
--
-- This operation returns paginated results.
module Amazonka.MediaConvert.ListJobTemplates
  ( -- * Creating a Request
    ListJobTemplates (..),
    newListJobTemplates,

    -- * Request Lenses
    listJobTemplates_category,
    listJobTemplates_listBy,
    listJobTemplates_nextToken,
    listJobTemplates_order,
    listJobTemplates_maxResults,

    -- * Destructuring the Response
    ListJobTemplatesResponse (..),
    newListJobTemplatesResponse,

    -- * Response Lenses
    listJobTemplatesResponse_jobTemplates,
    listJobTemplatesResponse_nextToken,
    listJobTemplatesResponse_httpStatus,
  )
where

import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import Amazonka.MediaConvert.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response

-- | /See:/ 'newListJobTemplates' smart constructor.
data ListJobTemplates = ListJobTemplates'
  { -- | Optionally, specify a job template category to limit responses to only
    -- job templates from that category.
    ListJobTemplates -> Maybe Text
category :: Prelude.Maybe Prelude.Text,
    -- | Optional. When you request a list of job templates, you can choose to
    -- list them alphabetically by NAME or chronologically by CREATION_DATE. If
    -- you don\'t specify, the service will list them by name.
    ListJobTemplates -> Maybe JobTemplateListBy
listBy :: Prelude.Maybe JobTemplateListBy,
    -- | Use this string, provided with the response to a previous request, to
    -- request the next batch of job templates.
    ListJobTemplates -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | Optional. When you request lists of resources, you can specify whether
    -- they are sorted in ASCENDING or DESCENDING order. Default varies by
    -- resource.
    ListJobTemplates -> Maybe Order
order :: Prelude.Maybe Order,
    -- | Optional. Number of job templates, up to twenty, that will be returned
    -- at one time.
    ListJobTemplates -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural
  }
  deriving (ListJobTemplates -> ListJobTemplates -> Bool
(ListJobTemplates -> ListJobTemplates -> Bool)
-> (ListJobTemplates -> ListJobTemplates -> Bool)
-> Eq ListJobTemplates
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListJobTemplates -> ListJobTemplates -> Bool
$c/= :: ListJobTemplates -> ListJobTemplates -> Bool
== :: ListJobTemplates -> ListJobTemplates -> Bool
$c== :: ListJobTemplates -> ListJobTemplates -> Bool
Prelude.Eq, ReadPrec [ListJobTemplates]
ReadPrec ListJobTemplates
Int -> ReadS ListJobTemplates
ReadS [ListJobTemplates]
(Int -> ReadS ListJobTemplates)
-> ReadS [ListJobTemplates]
-> ReadPrec ListJobTemplates
-> ReadPrec [ListJobTemplates]
-> Read ListJobTemplates
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListJobTemplates]
$creadListPrec :: ReadPrec [ListJobTemplates]
readPrec :: ReadPrec ListJobTemplates
$creadPrec :: ReadPrec ListJobTemplates
readList :: ReadS [ListJobTemplates]
$creadList :: ReadS [ListJobTemplates]
readsPrec :: Int -> ReadS ListJobTemplates
$creadsPrec :: Int -> ReadS ListJobTemplates
Prelude.Read, Int -> ListJobTemplates -> ShowS
[ListJobTemplates] -> ShowS
ListJobTemplates -> String
(Int -> ListJobTemplates -> ShowS)
-> (ListJobTemplates -> String)
-> ([ListJobTemplates] -> ShowS)
-> Show ListJobTemplates
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListJobTemplates] -> ShowS
$cshowList :: [ListJobTemplates] -> ShowS
show :: ListJobTemplates -> String
$cshow :: ListJobTemplates -> String
showsPrec :: Int -> ListJobTemplates -> ShowS
$cshowsPrec :: Int -> ListJobTemplates -> ShowS
Prelude.Show, (forall x. ListJobTemplates -> Rep ListJobTemplates x)
-> (forall x. Rep ListJobTemplates x -> ListJobTemplates)
-> Generic ListJobTemplates
forall x. Rep ListJobTemplates x -> ListJobTemplates
forall x. ListJobTemplates -> Rep ListJobTemplates x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ListJobTemplates x -> ListJobTemplates
$cfrom :: forall x. ListJobTemplates -> Rep ListJobTemplates x
Prelude.Generic)

-- |
-- Create a value of 'ListJobTemplates' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'category', 'listJobTemplates_category' - Optionally, specify a job template category to limit responses to only
-- job templates from that category.
--
-- 'listBy', 'listJobTemplates_listBy' - Optional. When you request a list of job templates, you can choose to
-- list them alphabetically by NAME or chronologically by CREATION_DATE. If
-- you don\'t specify, the service will list them by name.
--
-- 'nextToken', 'listJobTemplates_nextToken' - Use this string, provided with the response to a previous request, to
-- request the next batch of job templates.
--
-- 'order', 'listJobTemplates_order' - Optional. When you request lists of resources, you can specify whether
-- they are sorted in ASCENDING or DESCENDING order. Default varies by
-- resource.
--
-- 'maxResults', 'listJobTemplates_maxResults' - Optional. Number of job templates, up to twenty, that will be returned
-- at one time.
newListJobTemplates ::
  ListJobTemplates
newListJobTemplates :: ListJobTemplates
newListJobTemplates =
  ListJobTemplates' :: Maybe Text
-> Maybe JobTemplateListBy
-> Maybe Text
-> Maybe Order
-> Maybe Natural
-> ListJobTemplates
ListJobTemplates'
    { $sel:category:ListJobTemplates' :: Maybe Text
category = Maybe Text
forall a. Maybe a
Prelude.Nothing,
      $sel:listBy:ListJobTemplates' :: Maybe JobTemplateListBy
listBy = Maybe JobTemplateListBy
forall a. Maybe a
Prelude.Nothing,
      $sel:nextToken:ListJobTemplates' :: Maybe Text
nextToken = Maybe Text
forall a. Maybe a
Prelude.Nothing,
      $sel:order:ListJobTemplates' :: Maybe Order
order = Maybe Order
forall a. Maybe a
Prelude.Nothing,
      $sel:maxResults:ListJobTemplates' :: Maybe Natural
maxResults = Maybe Natural
forall a. Maybe a
Prelude.Nothing
    }

-- | Optionally, specify a job template category to limit responses to only
-- job templates from that category.
listJobTemplates_category :: Lens.Lens' ListJobTemplates (Prelude.Maybe Prelude.Text)
listJobTemplates_category :: (Maybe Text -> f (Maybe Text))
-> ListJobTemplates -> f ListJobTemplates
listJobTemplates_category = (ListJobTemplates -> Maybe Text)
-> (ListJobTemplates -> Maybe Text -> ListJobTemplates)
-> Lens ListJobTemplates ListJobTemplates (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListJobTemplates' {Maybe Text
category :: Maybe Text
$sel:category:ListJobTemplates' :: ListJobTemplates -> Maybe Text
category} -> Maybe Text
category) (\s :: ListJobTemplates
s@ListJobTemplates' {} Maybe Text
a -> ListJobTemplates
s {$sel:category:ListJobTemplates' :: Maybe Text
category = Maybe Text
a} :: ListJobTemplates)

-- | Optional. When you request a list of job templates, you can choose to
-- list them alphabetically by NAME or chronologically by CREATION_DATE. If
-- you don\'t specify, the service will list them by name.
listJobTemplates_listBy :: Lens.Lens' ListJobTemplates (Prelude.Maybe JobTemplateListBy)
listJobTemplates_listBy :: (Maybe JobTemplateListBy -> f (Maybe JobTemplateListBy))
-> ListJobTemplates -> f ListJobTemplates
listJobTemplates_listBy = (ListJobTemplates -> Maybe JobTemplateListBy)
-> (ListJobTemplates
    -> Maybe JobTemplateListBy -> ListJobTemplates)
-> Lens
     ListJobTemplates
     ListJobTemplates
     (Maybe JobTemplateListBy)
     (Maybe JobTemplateListBy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListJobTemplates' {Maybe JobTemplateListBy
listBy :: Maybe JobTemplateListBy
$sel:listBy:ListJobTemplates' :: ListJobTemplates -> Maybe JobTemplateListBy
listBy} -> Maybe JobTemplateListBy
listBy) (\s :: ListJobTemplates
s@ListJobTemplates' {} Maybe JobTemplateListBy
a -> ListJobTemplates
s {$sel:listBy:ListJobTemplates' :: Maybe JobTemplateListBy
listBy = Maybe JobTemplateListBy
a} :: ListJobTemplates)

-- | Use this string, provided with the response to a previous request, to
-- request the next batch of job templates.
listJobTemplates_nextToken :: Lens.Lens' ListJobTemplates (Prelude.Maybe Prelude.Text)
listJobTemplates_nextToken :: (Maybe Text -> f (Maybe Text))
-> ListJobTemplates -> f ListJobTemplates
listJobTemplates_nextToken = (ListJobTemplates -> Maybe Text)
-> (ListJobTemplates -> Maybe Text -> ListJobTemplates)
-> Lens ListJobTemplates ListJobTemplates (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListJobTemplates' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListJobTemplates' :: ListJobTemplates -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListJobTemplates
s@ListJobTemplates' {} Maybe Text
a -> ListJobTemplates
s {$sel:nextToken:ListJobTemplates' :: Maybe Text
nextToken = Maybe Text
a} :: ListJobTemplates)

-- | Optional. When you request lists of resources, you can specify whether
-- they are sorted in ASCENDING or DESCENDING order. Default varies by
-- resource.
listJobTemplates_order :: Lens.Lens' ListJobTemplates (Prelude.Maybe Order)
listJobTemplates_order :: (Maybe Order -> f (Maybe Order))
-> ListJobTemplates -> f ListJobTemplates
listJobTemplates_order = (ListJobTemplates -> Maybe Order)
-> (ListJobTemplates -> Maybe Order -> ListJobTemplates)
-> Lens
     ListJobTemplates ListJobTemplates (Maybe Order) (Maybe Order)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListJobTemplates' {Maybe Order
order :: Maybe Order
$sel:order:ListJobTemplates' :: ListJobTemplates -> Maybe Order
order} -> Maybe Order
order) (\s :: ListJobTemplates
s@ListJobTemplates' {} Maybe Order
a -> ListJobTemplates
s {$sel:order:ListJobTemplates' :: Maybe Order
order = Maybe Order
a} :: ListJobTemplates)

-- | Optional. Number of job templates, up to twenty, that will be returned
-- at one time.
listJobTemplates_maxResults :: Lens.Lens' ListJobTemplates (Prelude.Maybe Prelude.Natural)
listJobTemplates_maxResults :: (Maybe Natural -> f (Maybe Natural))
-> ListJobTemplates -> f ListJobTemplates
listJobTemplates_maxResults = (ListJobTemplates -> Maybe Natural)
-> (ListJobTemplates -> Maybe Natural -> ListJobTemplates)
-> Lens
     ListJobTemplates ListJobTemplates (Maybe Natural) (Maybe Natural)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListJobTemplates' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListJobTemplates' :: ListJobTemplates -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListJobTemplates
s@ListJobTemplates' {} Maybe Natural
a -> ListJobTemplates
s {$sel:maxResults:ListJobTemplates' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListJobTemplates)

instance Core.AWSPager ListJobTemplates where
  page :: ListJobTemplates
-> AWSResponse ListJobTemplates -> Maybe ListJobTemplates
page ListJobTemplates
rq AWSResponse ListJobTemplates
rs
    | Maybe Text -> Bool
forall a. AWSTruncated a => a -> Bool
Core.stop
        ( AWSResponse ListJobTemplates
ListJobTemplatesResponse
rs
            ListJobTemplatesResponse
-> Getting (First Text) ListJobTemplatesResponse Text -> Maybe Text
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? (Maybe Text -> Const (First Text) (Maybe Text))
-> ListJobTemplatesResponse
-> Const (First Text) ListJobTemplatesResponse
Lens' ListJobTemplatesResponse (Maybe Text)
listJobTemplatesResponse_nextToken
              ((Maybe Text -> Const (First Text) (Maybe Text))
 -> ListJobTemplatesResponse
 -> Const (First Text) ListJobTemplatesResponse)
-> ((Text -> Const (First Text) Text)
    -> Maybe Text -> Const (First Text) (Maybe Text))
-> Getting (First Text) ListJobTemplatesResponse Text
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. (Text -> Const (First Text) Text)
-> Maybe Text -> Const (First Text) (Maybe Text)
forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
        ) =
      Maybe ListJobTemplates
forall a. Maybe a
Prelude.Nothing
    | Maybe [JobTemplate] -> Bool
forall a. AWSTruncated a => a -> Bool
Core.stop
        ( AWSResponse ListJobTemplates
ListJobTemplatesResponse
rs
            ListJobTemplatesResponse
-> Getting
     (First [JobTemplate]) ListJobTemplatesResponse [JobTemplate]
-> Maybe [JobTemplate]
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? (Maybe [JobTemplate]
 -> Const (First [JobTemplate]) (Maybe [JobTemplate]))
-> ListJobTemplatesResponse
-> Const (First [JobTemplate]) ListJobTemplatesResponse
Lens' ListJobTemplatesResponse (Maybe [JobTemplate])
listJobTemplatesResponse_jobTemplates
              ((Maybe [JobTemplate]
  -> Const (First [JobTemplate]) (Maybe [JobTemplate]))
 -> ListJobTemplatesResponse
 -> Const (First [JobTemplate]) ListJobTemplatesResponse)
-> (([JobTemplate] -> Const (First [JobTemplate]) [JobTemplate])
    -> Maybe [JobTemplate]
    -> Const (First [JobTemplate]) (Maybe [JobTemplate]))
-> Getting
     (First [JobTemplate]) ListJobTemplatesResponse [JobTemplate]
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. ([JobTemplate] -> Const (First [JobTemplate]) [JobTemplate])
-> Maybe [JobTemplate]
-> Const (First [JobTemplate]) (Maybe [JobTemplate])
forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
        ) =
      Maybe ListJobTemplates
forall a. Maybe a
Prelude.Nothing
    | Bool
Prelude.otherwise =
      ListJobTemplates -> Maybe ListJobTemplates
forall a. a -> Maybe a
Prelude.Just (ListJobTemplates -> Maybe ListJobTemplates)
-> ListJobTemplates -> Maybe ListJobTemplates
forall a b. (a -> b) -> a -> b
Prelude.$
        ListJobTemplates
rq
          ListJobTemplates
-> (ListJobTemplates -> ListJobTemplates) -> ListJobTemplates
forall a b. a -> (a -> b) -> b
Prelude.& (Maybe Text -> Identity (Maybe Text))
-> ListJobTemplates -> Identity ListJobTemplates
Lens ListJobTemplates ListJobTemplates (Maybe Text) (Maybe Text)
listJobTemplates_nextToken
          ((Maybe Text -> Identity (Maybe Text))
 -> ListJobTemplates -> Identity ListJobTemplates)
-> Maybe Text -> ListJobTemplates -> ListJobTemplates
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse ListJobTemplates
ListJobTemplatesResponse
rs
          ListJobTemplatesResponse
-> Getting (First Text) ListJobTemplatesResponse Text -> Maybe Text
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? (Maybe Text -> Const (First Text) (Maybe Text))
-> ListJobTemplatesResponse
-> Const (First Text) ListJobTemplatesResponse
Lens' ListJobTemplatesResponse (Maybe Text)
listJobTemplatesResponse_nextToken
            ((Maybe Text -> Const (First Text) (Maybe Text))
 -> ListJobTemplatesResponse
 -> Const (First Text) ListJobTemplatesResponse)
-> ((Text -> Const (First Text) Text)
    -> Maybe Text -> Const (First Text) (Maybe Text))
-> Getting (First Text) ListJobTemplatesResponse Text
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. (Text -> Const (First Text) Text)
-> Maybe Text -> Const (First Text) (Maybe Text)
forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just

instance Core.AWSRequest ListJobTemplates where
  type
    AWSResponse ListJobTemplates =
      ListJobTemplatesResponse
  request :: ListJobTemplates -> Request ListJobTemplates
request = Service -> ListJobTemplates -> Request ListJobTemplates
forall a. ToRequest a => Service -> a -> Request a
Request.get Service
defaultService
  response :: Logger
-> Service
-> Proxy ListJobTemplates
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse ListJobTemplates)))
response =
    (Int
 -> ResponseHeaders
 -> Object
 -> Either String (AWSResponse ListJobTemplates))
-> Logger
-> Service
-> Proxy ListJobTemplates
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse ListJobTemplates)))
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> Logger
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
      ( \Int
s ResponseHeaders
h Object
x ->
          Maybe [JobTemplate]
-> Maybe Text -> Int -> ListJobTemplatesResponse
ListJobTemplatesResponse'
            (Maybe [JobTemplate]
 -> Maybe Text -> Int -> ListJobTemplatesResponse)
-> Either String (Maybe [JobTemplate])
-> Either String (Maybe Text -> Int -> ListJobTemplatesResponse)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Either String (Maybe (Maybe [JobTemplate]))
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"jobTemplates" Either String (Maybe (Maybe [JobTemplate]))
-> Maybe [JobTemplate] -> Either String (Maybe [JobTemplate])
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ Maybe [JobTemplate]
forall a. Monoid a => a
Prelude.mempty)
            Either String (Maybe Text -> Int -> ListJobTemplatesResponse)
-> Either String (Maybe Text)
-> Either String (Int -> ListJobTemplatesResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"nextToken")
            Either String (Int -> ListJobTemplatesResponse)
-> Either String Int -> Either String ListJobTemplatesResponse
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Int -> Either String Int
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (Int -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
      )

instance Prelude.Hashable ListJobTemplates

instance Prelude.NFData ListJobTemplates

instance Core.ToHeaders ListJobTemplates where
  toHeaders :: ListJobTemplates -> ResponseHeaders
toHeaders =
    ResponseHeaders -> ListJobTemplates -> ResponseHeaders
forall a b. a -> b -> a
Prelude.const
      ( [ResponseHeaders] -> ResponseHeaders
forall a. Monoid a => [a] -> a
Prelude.mconcat
          [ HeaderName
"Content-Type"
              HeaderName -> ByteString -> ResponseHeaders
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Core.=# ( ByteString
"application/x-amz-json-1.1" ::
                          Prelude.ByteString
                      )
          ]
      )

instance Core.ToPath ListJobTemplates where
  toPath :: ListJobTemplates -> ByteString
toPath = ByteString -> ListJobTemplates -> ByteString
forall a b. a -> b -> a
Prelude.const ByteString
"/2017-08-29/jobTemplates"

instance Core.ToQuery ListJobTemplates where
  toQuery :: ListJobTemplates -> QueryString
toQuery ListJobTemplates' {Maybe Natural
Maybe Text
Maybe JobTemplateListBy
Maybe Order
maxResults :: Maybe Natural
order :: Maybe Order
nextToken :: Maybe Text
listBy :: Maybe JobTemplateListBy
category :: Maybe Text
$sel:maxResults:ListJobTemplates' :: ListJobTemplates -> Maybe Natural
$sel:order:ListJobTemplates' :: ListJobTemplates -> Maybe Order
$sel:nextToken:ListJobTemplates' :: ListJobTemplates -> Maybe Text
$sel:listBy:ListJobTemplates' :: ListJobTemplates -> Maybe JobTemplateListBy
$sel:category:ListJobTemplates' :: ListJobTemplates -> Maybe Text
..} =
    [QueryString] -> QueryString
forall a. Monoid a => [a] -> a
Prelude.mconcat
      [ ByteString
"category" ByteString -> Maybe Text -> QueryString
forall a. ToQuery a => ByteString -> a -> QueryString
Core.=: Maybe Text
category,
        ByteString
"listBy" ByteString -> Maybe JobTemplateListBy -> QueryString
forall a. ToQuery a => ByteString -> a -> QueryString
Core.=: Maybe JobTemplateListBy
listBy,
        ByteString
"nextToken" ByteString -> Maybe Text -> QueryString
forall a. ToQuery a => ByteString -> a -> QueryString
Core.=: Maybe Text
nextToken,
        ByteString
"order" ByteString -> Maybe Order -> QueryString
forall a. ToQuery a => ByteString -> a -> QueryString
Core.=: Maybe Order
order,
        ByteString
"maxResults" ByteString -> Maybe Natural -> QueryString
forall a. ToQuery a => ByteString -> a -> QueryString
Core.=: Maybe Natural
maxResults
      ]

-- | /See:/ 'newListJobTemplatesResponse' smart constructor.
data ListJobTemplatesResponse = ListJobTemplatesResponse'
  { -- | List of Job templates.
    ListJobTemplatesResponse -> Maybe [JobTemplate]
jobTemplates :: Prelude.Maybe [JobTemplate],
    -- | Use this string to request the next batch of job templates.
    ListJobTemplatesResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | The response's http status code.
    ListJobTemplatesResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (ListJobTemplatesResponse -> ListJobTemplatesResponse -> Bool
(ListJobTemplatesResponse -> ListJobTemplatesResponse -> Bool)
-> (ListJobTemplatesResponse -> ListJobTemplatesResponse -> Bool)
-> Eq ListJobTemplatesResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListJobTemplatesResponse -> ListJobTemplatesResponse -> Bool
$c/= :: ListJobTemplatesResponse -> ListJobTemplatesResponse -> Bool
== :: ListJobTemplatesResponse -> ListJobTemplatesResponse -> Bool
$c== :: ListJobTemplatesResponse -> ListJobTemplatesResponse -> Bool
Prelude.Eq, ReadPrec [ListJobTemplatesResponse]
ReadPrec ListJobTemplatesResponse
Int -> ReadS ListJobTemplatesResponse
ReadS [ListJobTemplatesResponse]
(Int -> ReadS ListJobTemplatesResponse)
-> ReadS [ListJobTemplatesResponse]
-> ReadPrec ListJobTemplatesResponse
-> ReadPrec [ListJobTemplatesResponse]
-> Read ListJobTemplatesResponse
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListJobTemplatesResponse]
$creadListPrec :: ReadPrec [ListJobTemplatesResponse]
readPrec :: ReadPrec ListJobTemplatesResponse
$creadPrec :: ReadPrec ListJobTemplatesResponse
readList :: ReadS [ListJobTemplatesResponse]
$creadList :: ReadS [ListJobTemplatesResponse]
readsPrec :: Int -> ReadS ListJobTemplatesResponse
$creadsPrec :: Int -> ReadS ListJobTemplatesResponse
Prelude.Read, Int -> ListJobTemplatesResponse -> ShowS
[ListJobTemplatesResponse] -> ShowS
ListJobTemplatesResponse -> String
(Int -> ListJobTemplatesResponse -> ShowS)
-> (ListJobTemplatesResponse -> String)
-> ([ListJobTemplatesResponse] -> ShowS)
-> Show ListJobTemplatesResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListJobTemplatesResponse] -> ShowS
$cshowList :: [ListJobTemplatesResponse] -> ShowS
show :: ListJobTemplatesResponse -> String
$cshow :: ListJobTemplatesResponse -> String
showsPrec :: Int -> ListJobTemplatesResponse -> ShowS
$cshowsPrec :: Int -> ListJobTemplatesResponse -> ShowS
Prelude.Show, (forall x.
 ListJobTemplatesResponse -> Rep ListJobTemplatesResponse x)
-> (forall x.
    Rep ListJobTemplatesResponse x -> ListJobTemplatesResponse)
-> Generic ListJobTemplatesResponse
forall x.
Rep ListJobTemplatesResponse x -> ListJobTemplatesResponse
forall x.
ListJobTemplatesResponse -> Rep ListJobTemplatesResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListJobTemplatesResponse x -> ListJobTemplatesResponse
$cfrom :: forall x.
ListJobTemplatesResponse -> Rep ListJobTemplatesResponse x
Prelude.Generic)

-- |
-- Create a value of 'ListJobTemplatesResponse' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'jobTemplates', 'listJobTemplatesResponse_jobTemplates' - List of Job templates.
--
-- 'nextToken', 'listJobTemplatesResponse_nextToken' - Use this string to request the next batch of job templates.
--
-- 'httpStatus', 'listJobTemplatesResponse_httpStatus' - The response's http status code.
newListJobTemplatesResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  ListJobTemplatesResponse
newListJobTemplatesResponse :: Int -> ListJobTemplatesResponse
newListJobTemplatesResponse Int
pHttpStatus_ =
  ListJobTemplatesResponse' :: Maybe [JobTemplate]
-> Maybe Text -> Int -> ListJobTemplatesResponse
ListJobTemplatesResponse'
    { $sel:jobTemplates:ListJobTemplatesResponse' :: Maybe [JobTemplate]
jobTemplates =
        Maybe [JobTemplate]
forall a. Maybe a
Prelude.Nothing,
      $sel:nextToken:ListJobTemplatesResponse' :: Maybe Text
nextToken = Maybe Text
forall a. Maybe a
Prelude.Nothing,
      $sel:httpStatus:ListJobTemplatesResponse' :: Int
httpStatus = Int
pHttpStatus_
    }

-- | List of Job templates.
listJobTemplatesResponse_jobTemplates :: Lens.Lens' ListJobTemplatesResponse (Prelude.Maybe [JobTemplate])
listJobTemplatesResponse_jobTemplates :: (Maybe [JobTemplate] -> f (Maybe [JobTemplate]))
-> ListJobTemplatesResponse -> f ListJobTemplatesResponse
listJobTemplatesResponse_jobTemplates = (ListJobTemplatesResponse -> Maybe [JobTemplate])
-> (ListJobTemplatesResponse
    -> Maybe [JobTemplate] -> ListJobTemplatesResponse)
-> Lens' ListJobTemplatesResponse (Maybe [JobTemplate])
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListJobTemplatesResponse' {Maybe [JobTemplate]
jobTemplates :: Maybe [JobTemplate]
$sel:jobTemplates:ListJobTemplatesResponse' :: ListJobTemplatesResponse -> Maybe [JobTemplate]
jobTemplates} -> Maybe [JobTemplate]
jobTemplates) (\s :: ListJobTemplatesResponse
s@ListJobTemplatesResponse' {} Maybe [JobTemplate]
a -> ListJobTemplatesResponse
s {$sel:jobTemplates:ListJobTemplatesResponse' :: Maybe [JobTemplate]
jobTemplates = Maybe [JobTemplate]
a} :: ListJobTemplatesResponse) ((Maybe [JobTemplate] -> f (Maybe [JobTemplate]))
 -> ListJobTemplatesResponse -> f ListJobTemplatesResponse)
-> ((Maybe [JobTemplate] -> f (Maybe [JobTemplate]))
    -> Maybe [JobTemplate] -> f (Maybe [JobTemplate]))
-> (Maybe [JobTemplate] -> f (Maybe [JobTemplate]))
-> ListJobTemplatesResponse
-> f ListJobTemplatesResponse
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso [JobTemplate] [JobTemplate] [JobTemplate] [JobTemplate]
-> Iso
     (Maybe [JobTemplate])
     (Maybe [JobTemplate])
     (Maybe [JobTemplate])
     (Maybe [JobTemplate])
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 AnIso [JobTemplate] [JobTemplate] [JobTemplate] [JobTemplate]
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced

-- | Use this string to request the next batch of job templates.
listJobTemplatesResponse_nextToken :: Lens.Lens' ListJobTemplatesResponse (Prelude.Maybe Prelude.Text)
listJobTemplatesResponse_nextToken :: (Maybe Text -> f (Maybe Text))
-> ListJobTemplatesResponse -> f ListJobTemplatesResponse
listJobTemplatesResponse_nextToken = (ListJobTemplatesResponse -> Maybe Text)
-> (ListJobTemplatesResponse
    -> Maybe Text -> ListJobTemplatesResponse)
-> Lens' ListJobTemplatesResponse (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListJobTemplatesResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListJobTemplatesResponse' :: ListJobTemplatesResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListJobTemplatesResponse
s@ListJobTemplatesResponse' {} Maybe Text
a -> ListJobTemplatesResponse
s {$sel:nextToken:ListJobTemplatesResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListJobTemplatesResponse)

-- | The response's http status code.
listJobTemplatesResponse_httpStatus :: Lens.Lens' ListJobTemplatesResponse Prelude.Int
listJobTemplatesResponse_httpStatus :: (Int -> f Int)
-> ListJobTemplatesResponse -> f ListJobTemplatesResponse
listJobTemplatesResponse_httpStatus = (ListJobTemplatesResponse -> Int)
-> (ListJobTemplatesResponse -> Int -> ListJobTemplatesResponse)
-> Lens ListJobTemplatesResponse ListJobTemplatesResponse Int Int
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListJobTemplatesResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListJobTemplatesResponse' :: ListJobTemplatesResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListJobTemplatesResponse
s@ListJobTemplatesResponse' {} Int
a -> ListJobTemplatesResponse
s {$sel:httpStatus:ListJobTemplatesResponse' :: Int
httpStatus = Int
a} :: ListJobTemplatesResponse)

instance Prelude.NFData ListJobTemplatesResponse