module Network.Google.Resource.CloudResourceManager.Organizations.Get
(
OrganizationsGetResource
, organizationsGet
, OrganizationsGet
, ogXgafv
, ogUploadProtocol
, ogPp
, ogAccessToken
, ogUploadType
, ogBearerToken
, ogOrganizationId
, ogCallback
) where
import Network.Google.Prelude
import Network.Google.ResourceManager.Types
type OrganizationsGetResource =
"v1beta1" :>
"organizations" :>
Capture "organizationId" Text :>
QueryParam "$.xgafv" Text :>
QueryParam "upload_protocol" Text :>
QueryParam "pp" Bool :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "bearer_token" Text :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :> Get '[JSON] Organization
data OrganizationsGet = OrganizationsGet
{ _ogXgafv :: !(Maybe Text)
, _ogUploadProtocol :: !(Maybe Text)
, _ogPp :: !Bool
, _ogAccessToken :: !(Maybe Text)
, _ogUploadType :: !(Maybe Text)
, _ogBearerToken :: !(Maybe Text)
, _ogOrganizationId :: !Text
, _ogCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
organizationsGet
:: Text
-> OrganizationsGet
organizationsGet pOgOrganizationId_ =
OrganizationsGet
{ _ogXgafv = Nothing
, _ogUploadProtocol = Nothing
, _ogPp = True
, _ogAccessToken = Nothing
, _ogUploadType = Nothing
, _ogBearerToken = Nothing
, _ogOrganizationId = pOgOrganizationId_
, _ogCallback = Nothing
}
ogXgafv :: Lens' OrganizationsGet (Maybe Text)
ogXgafv = lens _ogXgafv (\ s a -> s{_ogXgafv = a})
ogUploadProtocol :: Lens' OrganizationsGet (Maybe Text)
ogUploadProtocol
= lens _ogUploadProtocol
(\ s a -> s{_ogUploadProtocol = a})
ogPp :: Lens' OrganizationsGet Bool
ogPp = lens _ogPp (\ s a -> s{_ogPp = a})
ogAccessToken :: Lens' OrganizationsGet (Maybe Text)
ogAccessToken
= lens _ogAccessToken
(\ s a -> s{_ogAccessToken = a})
ogUploadType :: Lens' OrganizationsGet (Maybe Text)
ogUploadType
= lens _ogUploadType (\ s a -> s{_ogUploadType = a})
ogBearerToken :: Lens' OrganizationsGet (Maybe Text)
ogBearerToken
= lens _ogBearerToken
(\ s a -> s{_ogBearerToken = a})
ogOrganizationId :: Lens' OrganizationsGet Text
ogOrganizationId
= lens _ogOrganizationId
(\ s a -> s{_ogOrganizationId = a})
ogCallback :: Lens' OrganizationsGet (Maybe Text)
ogCallback
= lens _ogCallback (\ s a -> s{_ogCallback = a})
instance GoogleRequest OrganizationsGet where
type Rs OrganizationsGet = Organization
requestClient OrganizationsGet{..}
= go _ogOrganizationId _ogXgafv _ogUploadProtocol
(Just _ogPp)
_ogAccessToken
_ogUploadType
_ogBearerToken
_ogCallback
(Just AltJSON)
resourceManagerService
where go
= buildClient
(Proxy :: Proxy OrganizationsGetResource)
mempty