module Aws.Elb.Commands.DeregisterInstancesFromLoadBalancer where
import qualified Network.HTTP.Types as HTTP
import Aws.Elb.TH
import Aws.Elb.Types
data DeregisterInstancesFromLoadBalancer = DeregisterInstancesFromLoadBalancer
{ dilb_name :: Text
, dilb_instanceIds :: [Text]
} deriving (Show)
instance SignQuery DeregisterInstancesFromLoadBalancer where
type ServiceConfiguration DeregisterInstancesFromLoadBalancer = QueryAPIConfiguration
signQuery DeregisterInstancesFromLoadBalancer{..} = elbSignQuery $
[ ("Action", qArg "DeregisterInstancesFromLoadBalancer")
, defVersion
, ("LoadBalancerName", qArg dilb_name)
] +++ enumerateInstanceIds dilb_instanceIds
ELBVALUETRANSACTION(DeregisterInstancesFromLoadBalancer,"DeregisterInstancesFromLoadBalancerResult")