module Network.Google.Resource.CloudBilling.BillingAccounts.List
(
BillingAccountsListResource
, billingAccountsList
, BillingAccountsList
, balXgafv
, balUploadProtocol
, balPp
, balAccessToken
, balUploadType
, balBearerToken
, balPageToken
, balPageSize
, balCallback
) where
import Network.Google.Billing.Types
import Network.Google.Prelude
type BillingAccountsListResource =
"v1" :>
"billingAccounts" :>
QueryParam "$.xgafv" Text :>
QueryParam "upload_protocol" Text :>
QueryParam "pp" Bool :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "bearer_token" Text :>
QueryParam "pageToken" Text :>
QueryParam "pageSize" (Textual Int32) :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
Get '[JSON] ListBillingAccountsResponse
data BillingAccountsList = BillingAccountsList
{ _balXgafv :: !(Maybe Text)
, _balUploadProtocol :: !(Maybe Text)
, _balPp :: !Bool
, _balAccessToken :: !(Maybe Text)
, _balUploadType :: !(Maybe Text)
, _balBearerToken :: !(Maybe Text)
, _balPageToken :: !(Maybe Text)
, _balPageSize :: !(Maybe (Textual Int32))
, _balCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
billingAccountsList
:: BillingAccountsList
billingAccountsList =
BillingAccountsList
{ _balXgafv = Nothing
, _balUploadProtocol = Nothing
, _balPp = True
, _balAccessToken = Nothing
, _balUploadType = Nothing
, _balBearerToken = Nothing
, _balPageToken = Nothing
, _balPageSize = Nothing
, _balCallback = Nothing
}
balXgafv :: Lens' BillingAccountsList (Maybe Text)
balXgafv = lens _balXgafv (\ s a -> s{_balXgafv = a})
balUploadProtocol :: Lens' BillingAccountsList (Maybe Text)
balUploadProtocol
= lens _balUploadProtocol
(\ s a -> s{_balUploadProtocol = a})
balPp :: Lens' BillingAccountsList Bool
balPp = lens _balPp (\ s a -> s{_balPp = a})
balAccessToken :: Lens' BillingAccountsList (Maybe Text)
balAccessToken
= lens _balAccessToken
(\ s a -> s{_balAccessToken = a})
balUploadType :: Lens' BillingAccountsList (Maybe Text)
balUploadType
= lens _balUploadType
(\ s a -> s{_balUploadType = a})
balBearerToken :: Lens' BillingAccountsList (Maybe Text)
balBearerToken
= lens _balBearerToken
(\ s a -> s{_balBearerToken = a})
balPageToken :: Lens' BillingAccountsList (Maybe Text)
balPageToken
= lens _balPageToken (\ s a -> s{_balPageToken = a})
balPageSize :: Lens' BillingAccountsList (Maybe Int32)
balPageSize
= lens _balPageSize (\ s a -> s{_balPageSize = a}) .
mapping _Coerce
balCallback :: Lens' BillingAccountsList (Maybe Text)
balCallback
= lens _balCallback (\ s a -> s{_balCallback = a})
instance GoogleRequest BillingAccountsList where
type Rs BillingAccountsList =
ListBillingAccountsResponse
requestClient BillingAccountsList{..}
= go _balXgafv _balUploadProtocol (Just _balPp)
_balAccessToken
_balUploadType
_balBearerToken
_balPageToken
_balPageSize
_balCallback
(Just AltJSON)
billingService
where go
= buildClient
(Proxy :: Proxy BillingAccountsListResource)
mempty