{-# LANGUAGE DataKinds #-} {-# LANGUAGE DeriveDataTypeable #-} {-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE FlexibleInstances #-} {-# LANGUAGE NoImplicitPrelude #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE TypeOperators #-} {-# OPTIONS_GHC -fno-warn-duplicate-exports #-} {-# OPTIONS_GHC -fno-warn-unused-binds #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} -- | -- Module : Network.Google.Resource.Content.Orders.Cancellineitem -- Copyright : (c) 2015-2016 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Cancels a line item, making a full refund. -- -- /See:/ for @content.orders.cancellineitem@. module Network.Google.Resource.Content.Orders.Cancellineitem ( -- * REST Resource OrdersCancellineitemResource -- * Creating a Request , ordersCancellineitem , OrdersCancellineitem -- * Request Lenses , oc1MerchantId , oc1Payload , oc1OrderId ) where import Network.Google.Prelude import Network.Google.ShoppingContent.Types -- | A resource alias for @content.orders.cancellineitem@ method which the -- 'OrdersCancellineitem' request conforms to. type OrdersCancellineitemResource = "content" :> "v2.1" :> Capture "merchantId" (Textual Word64) :> "orders" :> Capture "orderId" Text :> "cancelLineItem" :> QueryParam "alt" AltJSON :> ReqBody '[JSON] OrdersCancelLineItemRequest :> Post '[JSON] OrdersCancelLineItemResponse -- | Cancels a line item, making a full refund. -- -- /See:/ 'ordersCancellineitem' smart constructor. data OrdersCancellineitem = OrdersCancellineitem' { _oc1MerchantId :: !(Textual Word64) , _oc1Payload :: !OrdersCancelLineItemRequest , _oc1OrderId :: !Text } deriving (Eq,Show,Data,Typeable,Generic) -- | Creates a value of 'OrdersCancellineitem' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: -- -- * 'oc1MerchantId' -- -- * 'oc1Payload' -- -- * 'oc1OrderId' ordersCancellineitem :: Word64 -- ^ 'oc1MerchantId' -> OrdersCancelLineItemRequest -- ^ 'oc1Payload' -> Text -- ^ 'oc1OrderId' -> OrdersCancellineitem ordersCancellineitem pOc1MerchantId_ pOc1Payload_ pOc1OrderId_ = OrdersCancellineitem' { _oc1MerchantId = _Coerce # pOc1MerchantId_ , _oc1Payload = pOc1Payload_ , _oc1OrderId = pOc1OrderId_ } -- | The ID of the account that manages the order. This cannot be a -- multi-client account. oc1MerchantId :: Lens' OrdersCancellineitem Word64 oc1MerchantId = lens _oc1MerchantId (\ s a -> s{_oc1MerchantId = a}) . _Coerce -- | Multipart request metadata. oc1Payload :: Lens' OrdersCancellineitem OrdersCancelLineItemRequest oc1Payload = lens _oc1Payload (\ s a -> s{_oc1Payload = a}) -- | The ID of the order. oc1OrderId :: Lens' OrdersCancellineitem Text oc1OrderId = lens _oc1OrderId (\ s a -> s{_oc1OrderId = a}) instance GoogleRequest OrdersCancellineitem where type Rs OrdersCancellineitem = OrdersCancelLineItemResponse type Scopes OrdersCancellineitem = '["https://www.googleapis.com/auth/content"] requestClient OrdersCancellineitem'{..} = go _oc1MerchantId _oc1OrderId (Just AltJSON) _oc1Payload shoppingContentService where go = buildClient (Proxy :: Proxy OrdersCancellineitemResource) mempty