{-# LANGUAGE DataKinds #-}
{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE TypeOperators #-}
{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module Network.Google.Resource.DoubleClickBidManager.Queries.GetQuery
(
QueriesGetQueryResource
, queriesGetQuery
, QueriesGetQuery
, qgqQueryId
) where
import Network.Google.DoubleClickBids.Types
import Network.Google.Prelude
type QueriesGetQueryResource =
"doubleclickbidmanager" :>
"v1" :>
"query" :>
Capture "queryId" (Textual Int64) :>
QueryParam "alt" AltJSON :> Get '[JSON] Query
-- | Retrieves a stored query.
--
-- /See:/ 'queriesGetQuery' smart constructor.
newtype QueriesGetQuery = QueriesGetQuery'
{ _qgqQueryId :: Textual Int64
} deriving (Eq,Show,Data,Typeable,Generic)
-- | Creates a value of 'QueriesGetQuery' with the minimum fields required to make a request.
--
-- Use one of the following lenses to modify other fields as desired:
--
-- * 'qgqQueryId'
queriesGetQuery
:: Int64 -- ^ 'qgqQueryId'
-> QueriesGetQuery
queriesGetQuery pQgqQueryId_ =
QueriesGetQuery'
{ _qgqQueryId = _Coerce # pQgqQueryId_
}
-- | Query ID to retrieve.
qgqQueryId :: Lens' QueriesGetQuery Int64
qgqQueryId
= lens _qgqQueryId (\ s a -> s{_qgqQueryId = a}) .
_Coerce
instance GoogleRequest QueriesGetQuery where
type Rs QueriesGetQuery = Query
type Scopes QueriesGetQuery = '[]
requestClient QueriesGetQuery'{..}
= go _qgqQueryId (Just AltJSON)
doubleClickBidsService
where go
= buildClient
(Proxy :: Proxy QueriesGetQueryResource)
mempty