module Network.Google.Resource.Content.Accountstatuses.List
(
AccountstatusesListResource
, accountstatusesList
, AccountstatusesList
, acc3MerchantId
, acc3PageToken
, acc3MaxResults
) where
import Network.Google.Prelude
import Network.Google.ShoppingContent.Types
type AccountstatusesListResource =
"content" :>
"v2" :>
Capture "merchantId" (Textual Word64) :>
"accountstatuses" :>
QueryParam "pageToken" Text :>
QueryParam "maxResults" (Textual Word32) :>
QueryParam "alt" AltJSON :>
Get '[JSON] AccountstatusesListResponse
data AccountstatusesList = AccountstatusesList'
{ _acc3MerchantId :: !(Textual Word64)
, _acc3PageToken :: !(Maybe Text)
, _acc3MaxResults :: !(Maybe (Textual Word32))
} deriving (Eq,Show,Data,Typeable,Generic)
accountstatusesList
:: Word64
-> AccountstatusesList
accountstatusesList pAcc3MerchantId_ =
AccountstatusesList'
{ _acc3MerchantId = _Coerce # pAcc3MerchantId_
, _acc3PageToken = Nothing
, _acc3MaxResults = Nothing
}
acc3MerchantId :: Lens' AccountstatusesList Word64
acc3MerchantId
= lens _acc3MerchantId
(\ s a -> s{_acc3MerchantId = a})
. _Coerce
acc3PageToken :: Lens' AccountstatusesList (Maybe Text)
acc3PageToken
= lens _acc3PageToken
(\ s a -> s{_acc3PageToken = a})
acc3MaxResults :: Lens' AccountstatusesList (Maybe Word32)
acc3MaxResults
= lens _acc3MaxResults
(\ s a -> s{_acc3MaxResults = a})
. mapping _Coerce
instance GoogleRequest AccountstatusesList where
type Rs AccountstatusesList =
AccountstatusesListResponse
type Scopes AccountstatusesList =
'["https://www.googleapis.com/auth/content"]
requestClient AccountstatusesList'{..}
= go _acc3MerchantId _acc3PageToken _acc3MaxResults
(Just AltJSON)
shoppingContentService
where go
= buildClient
(Proxy :: Proxy AccountstatusesListResource)
mempty