module Network.Google.Resource.Container.Projects.Zones.Operations.Cancel
(
ProjectsZonesOperationsCancelResource
, projectsZonesOperationsCancel
, ProjectsZonesOperationsCancel
, pzocXgafv
, pzocUploadProtocol
, pzocPp
, pzocAccessToken
, pzocUploadType
, pzocZone
, pzocPayload
, pzocBearerToken
, pzocProjectId
, pzocOperationId
, pzocCallback
) where
import Network.Google.Container.Types
import Network.Google.Prelude
type ProjectsZonesOperationsCancelResource =
"v1" :>
"projects" :>
Capture "projectId" Text :>
"zones" :>
Capture "zone" Text :>
"operations" :>
CaptureMode "operationId" "cancel" 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 :>
ReqBody '[JSON] CancelOperationRequest :>
Post '[JSON] Empty
data ProjectsZonesOperationsCancel = ProjectsZonesOperationsCancel'
{ _pzocXgafv :: !(Maybe Text)
, _pzocUploadProtocol :: !(Maybe Text)
, _pzocPp :: !Bool
, _pzocAccessToken :: !(Maybe Text)
, _pzocUploadType :: !(Maybe Text)
, _pzocZone :: !Text
, _pzocPayload :: !CancelOperationRequest
, _pzocBearerToken :: !(Maybe Text)
, _pzocProjectId :: !Text
, _pzocOperationId :: !Text
, _pzocCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
projectsZonesOperationsCancel
:: Text
-> CancelOperationRequest
-> Text
-> Text
-> ProjectsZonesOperationsCancel
projectsZonesOperationsCancel pPzocZone_ pPzocPayload_ pPzocProjectId_ pPzocOperationId_ =
ProjectsZonesOperationsCancel'
{ _pzocXgafv = Nothing
, _pzocUploadProtocol = Nothing
, _pzocPp = True
, _pzocAccessToken = Nothing
, _pzocUploadType = Nothing
, _pzocZone = pPzocZone_
, _pzocPayload = pPzocPayload_
, _pzocBearerToken = Nothing
, _pzocProjectId = pPzocProjectId_
, _pzocOperationId = pPzocOperationId_
, _pzocCallback = Nothing
}
pzocXgafv :: Lens' ProjectsZonesOperationsCancel (Maybe Text)
pzocXgafv
= lens _pzocXgafv (\ s a -> s{_pzocXgafv = a})
pzocUploadProtocol :: Lens' ProjectsZonesOperationsCancel (Maybe Text)
pzocUploadProtocol
= lens _pzocUploadProtocol
(\ s a -> s{_pzocUploadProtocol = a})
pzocPp :: Lens' ProjectsZonesOperationsCancel Bool
pzocPp = lens _pzocPp (\ s a -> s{_pzocPp = a})
pzocAccessToken :: Lens' ProjectsZonesOperationsCancel (Maybe Text)
pzocAccessToken
= lens _pzocAccessToken
(\ s a -> s{_pzocAccessToken = a})
pzocUploadType :: Lens' ProjectsZonesOperationsCancel (Maybe Text)
pzocUploadType
= lens _pzocUploadType
(\ s a -> s{_pzocUploadType = a})
pzocZone :: Lens' ProjectsZonesOperationsCancel Text
pzocZone = lens _pzocZone (\ s a -> s{_pzocZone = a})
pzocPayload :: Lens' ProjectsZonesOperationsCancel CancelOperationRequest
pzocPayload
= lens _pzocPayload (\ s a -> s{_pzocPayload = a})
pzocBearerToken :: Lens' ProjectsZonesOperationsCancel (Maybe Text)
pzocBearerToken
= lens _pzocBearerToken
(\ s a -> s{_pzocBearerToken = a})
pzocProjectId :: Lens' ProjectsZonesOperationsCancel Text
pzocProjectId
= lens _pzocProjectId
(\ s a -> s{_pzocProjectId = a})
pzocOperationId :: Lens' ProjectsZonesOperationsCancel Text
pzocOperationId
= lens _pzocOperationId
(\ s a -> s{_pzocOperationId = a})
pzocCallback :: Lens' ProjectsZonesOperationsCancel (Maybe Text)
pzocCallback
= lens _pzocCallback (\ s a -> s{_pzocCallback = a})
instance GoogleRequest ProjectsZonesOperationsCancel
where
type Rs ProjectsZonesOperationsCancel = Empty
type Scopes ProjectsZonesOperationsCancel =
'["https://www.googleapis.com/auth/cloud-platform"]
requestClient ProjectsZonesOperationsCancel'{..}
= go _pzocProjectId _pzocZone _pzocOperationId
_pzocXgafv
_pzocUploadProtocol
(Just _pzocPp)
_pzocAccessToken
_pzocUploadType
_pzocBearerToken
_pzocCallback
(Just AltJSON)
_pzocPayload
containerService
where go
= buildClient
(Proxy ::
Proxy ProjectsZonesOperationsCancelResource)
mempty