module Network.Google.Resource.AppEngine.Apps.Services.Versions.Instances.Get
(
AppsServicesVersionsInstancesGetResource
, appsServicesVersionsInstancesGet
, AppsServicesVersionsInstancesGet
, asvigXgafv
, asvigInstancesId
, asvigUploadProtocol
, asvigPp
, asvigAccessToken
, asvigUploadType
, asvigVersionsId
, asvigBearerToken
, asvigAppsId
, asvigServicesId
, asvigCallback
) where
import Network.Google.AppEngine.Types
import Network.Google.Prelude
type AppsServicesVersionsInstancesGetResource =
"v1" :>
"apps" :>
Capture "appsId" Text :>
"services" :>
Capture "servicesId" Text :>
"versions" :>
Capture "versionsId" Text :>
"instances" :>
Capture "instancesId" 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] Instance
data AppsServicesVersionsInstancesGet = AppsServicesVersionsInstancesGet'
{ _asvigXgafv :: !(Maybe Text)
, _asvigInstancesId :: !Text
, _asvigUploadProtocol :: !(Maybe Text)
, _asvigPp :: !Bool
, _asvigAccessToken :: !(Maybe Text)
, _asvigUploadType :: !(Maybe Text)
, _asvigVersionsId :: !Text
, _asvigBearerToken :: !(Maybe Text)
, _asvigAppsId :: !Text
, _asvigServicesId :: !Text
, _asvigCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
appsServicesVersionsInstancesGet
:: Text
-> Text
-> Text
-> Text
-> AppsServicesVersionsInstancesGet
appsServicesVersionsInstancesGet pAsvigInstancesId_ pAsvigVersionsId_ pAsvigAppsId_ pAsvigServicesId_ =
AppsServicesVersionsInstancesGet'
{ _asvigXgafv = Nothing
, _asvigInstancesId = pAsvigInstancesId_
, _asvigUploadProtocol = Nothing
, _asvigPp = True
, _asvigAccessToken = Nothing
, _asvigUploadType = Nothing
, _asvigVersionsId = pAsvigVersionsId_
, _asvigBearerToken = Nothing
, _asvigAppsId = pAsvigAppsId_
, _asvigServicesId = pAsvigServicesId_
, _asvigCallback = Nothing
}
asvigXgafv :: Lens' AppsServicesVersionsInstancesGet (Maybe Text)
asvigXgafv
= lens _asvigXgafv (\ s a -> s{_asvigXgafv = a})
asvigInstancesId :: Lens' AppsServicesVersionsInstancesGet Text
asvigInstancesId
= lens _asvigInstancesId
(\ s a -> s{_asvigInstancesId = a})
asvigUploadProtocol :: Lens' AppsServicesVersionsInstancesGet (Maybe Text)
asvigUploadProtocol
= lens _asvigUploadProtocol
(\ s a -> s{_asvigUploadProtocol = a})
asvigPp :: Lens' AppsServicesVersionsInstancesGet Bool
asvigPp = lens _asvigPp (\ s a -> s{_asvigPp = a})
asvigAccessToken :: Lens' AppsServicesVersionsInstancesGet (Maybe Text)
asvigAccessToken
= lens _asvigAccessToken
(\ s a -> s{_asvigAccessToken = a})
asvigUploadType :: Lens' AppsServicesVersionsInstancesGet (Maybe Text)
asvigUploadType
= lens _asvigUploadType
(\ s a -> s{_asvigUploadType = a})
asvigVersionsId :: Lens' AppsServicesVersionsInstancesGet Text
asvigVersionsId
= lens _asvigVersionsId
(\ s a -> s{_asvigVersionsId = a})
asvigBearerToken :: Lens' AppsServicesVersionsInstancesGet (Maybe Text)
asvigBearerToken
= lens _asvigBearerToken
(\ s a -> s{_asvigBearerToken = a})
asvigAppsId :: Lens' AppsServicesVersionsInstancesGet Text
asvigAppsId
= lens _asvigAppsId (\ s a -> s{_asvigAppsId = a})
asvigServicesId :: Lens' AppsServicesVersionsInstancesGet Text
asvigServicesId
= lens _asvigServicesId
(\ s a -> s{_asvigServicesId = a})
asvigCallback :: Lens' AppsServicesVersionsInstancesGet (Maybe Text)
asvigCallback
= lens _asvigCallback
(\ s a -> s{_asvigCallback = a})
instance GoogleRequest
AppsServicesVersionsInstancesGet where
type Rs AppsServicesVersionsInstancesGet = Instance
type Scopes AppsServicesVersionsInstancesGet =
'["https://www.googleapis.com/auth/cloud-platform"]
requestClient AppsServicesVersionsInstancesGet'{..}
= go _asvigAppsId _asvigServicesId _asvigVersionsId
_asvigInstancesId
_asvigXgafv
_asvigUploadProtocol
(Just _asvigPp)
_asvigAccessToken
_asvigUploadType
_asvigBearerToken
_asvigCallback
(Just AltJSON)
appEngineService
where go
= buildClient
(Proxy ::
Proxy AppsServicesVersionsInstancesGetResource)
mempty