{-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE DuplicateRecordFields #-} {-# LANGUAGE NamedFieldPuns #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE StrictData #-} {-# LANGUAGE TypeFamilies #-} {-# LANGUAGE NoImplicitPrelude #-} {-# OPTIONS_GHC -fno-warn-unused-binds #-} {-# OPTIONS_GHC -fno-warn-unused-imports #-} {-# OPTIONS_GHC -fno-warn-unused-matches #-} -- Derived from AWS service descriptions, licensed under Apache 2.0. -- | -- Module : Amazonka.Connect.UpdateUserHierarchyGroupName -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Updates the name of the user hierarchy group. module Amazonka.Connect.UpdateUserHierarchyGroupName ( -- * Creating a Request UpdateUserHierarchyGroupName (..), newUpdateUserHierarchyGroupName, -- * Request Lenses updateUserHierarchyGroupName_name, updateUserHierarchyGroupName_hierarchyGroupId, updateUserHierarchyGroupName_instanceId, -- * Destructuring the Response UpdateUserHierarchyGroupNameResponse (..), newUpdateUserHierarchyGroupNameResponse, ) where import Amazonka.Connect.Types import qualified Amazonka.Core as Core import qualified Amazonka.Core.Lens.Internal as Lens import qualified Amazonka.Data as Data import qualified Amazonka.Prelude as Prelude import qualified Amazonka.Request as Request import qualified Amazonka.Response as Response -- | /See:/ 'newUpdateUserHierarchyGroupName' smart constructor. data UpdateUserHierarchyGroupName = UpdateUserHierarchyGroupName' { -- | The name of the hierarchy group. Must not be more than 100 characters. name :: Prelude.Text, -- | The identifier of the hierarchy group. hierarchyGroupId :: Prelude.Text, -- | The identifier of the Amazon Connect instance. You can find the -- instanceId in the ARN of the instance. instanceId :: Prelude.Text } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'UpdateUserHierarchyGroupName' with all optional fields omitted. -- -- Use or to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'name', 'updateUserHierarchyGroupName_name' - The name of the hierarchy group. Must not be more than 100 characters. -- -- 'hierarchyGroupId', 'updateUserHierarchyGroupName_hierarchyGroupId' - The identifier of the hierarchy group. -- -- 'instanceId', 'updateUserHierarchyGroupName_instanceId' - The identifier of the Amazon Connect instance. You can find the -- instanceId in the ARN of the instance. newUpdateUserHierarchyGroupName :: -- | 'name' Prelude.Text -> -- | 'hierarchyGroupId' Prelude.Text -> -- | 'instanceId' Prelude.Text -> UpdateUserHierarchyGroupName newUpdateUserHierarchyGroupName pName_ pHierarchyGroupId_ pInstanceId_ = UpdateUserHierarchyGroupName' { name = pName_, hierarchyGroupId = pHierarchyGroupId_, instanceId = pInstanceId_ } -- | The name of the hierarchy group. Must not be more than 100 characters. updateUserHierarchyGroupName_name :: Lens.Lens' UpdateUserHierarchyGroupName Prelude.Text updateUserHierarchyGroupName_name = Lens.lens (\UpdateUserHierarchyGroupName' {name} -> name) (\s@UpdateUserHierarchyGroupName' {} a -> s {name = a} :: UpdateUserHierarchyGroupName) -- | The identifier of the hierarchy group. updateUserHierarchyGroupName_hierarchyGroupId :: Lens.Lens' UpdateUserHierarchyGroupName Prelude.Text updateUserHierarchyGroupName_hierarchyGroupId = Lens.lens (\UpdateUserHierarchyGroupName' {hierarchyGroupId} -> hierarchyGroupId) (\s@UpdateUserHierarchyGroupName' {} a -> s {hierarchyGroupId = a} :: UpdateUserHierarchyGroupName) -- | The identifier of the Amazon Connect instance. You can find the -- instanceId in the ARN of the instance. updateUserHierarchyGroupName_instanceId :: Lens.Lens' UpdateUserHierarchyGroupName Prelude.Text updateUserHierarchyGroupName_instanceId = Lens.lens (\UpdateUserHierarchyGroupName' {instanceId} -> instanceId) (\s@UpdateUserHierarchyGroupName' {} a -> s {instanceId = a} :: UpdateUserHierarchyGroupName) instance Core.AWSRequest UpdateUserHierarchyGroupName where type AWSResponse UpdateUserHierarchyGroupName = UpdateUserHierarchyGroupNameResponse request overrides = Request.postJSON (overrides defaultService) response = Response.receiveNull UpdateUserHierarchyGroupNameResponse' instance Prelude.Hashable UpdateUserHierarchyGroupName where hashWithSalt _salt UpdateUserHierarchyGroupName' {..} = _salt `Prelude.hashWithSalt` name `Prelude.hashWithSalt` hierarchyGroupId `Prelude.hashWithSalt` instanceId instance Prelude.NFData UpdateUserHierarchyGroupName where rnf UpdateUserHierarchyGroupName' {..} = Prelude.rnf name `Prelude.seq` Prelude.rnf hierarchyGroupId `Prelude.seq` Prelude.rnf instanceId instance Data.ToHeaders UpdateUserHierarchyGroupName where toHeaders = Prelude.const ( Prelude.mconcat [ "Content-Type" Data.=# ( "application/x-amz-json-1.1" :: Prelude.ByteString ) ] ) instance Data.ToJSON UpdateUserHierarchyGroupName where toJSON UpdateUserHierarchyGroupName' {..} = Data.object ( Prelude.catMaybes [Prelude.Just ("Name" Data..= name)] ) instance Data.ToPath UpdateUserHierarchyGroupName where toPath UpdateUserHierarchyGroupName' {..} = Prelude.mconcat [ "/user-hierarchy-groups/", Data.toBS instanceId, "/", Data.toBS hierarchyGroupId, "/name" ] instance Data.ToQuery UpdateUserHierarchyGroupName where toQuery = Prelude.const Prelude.mempty -- | /See:/ 'newUpdateUserHierarchyGroupNameResponse' smart constructor. data UpdateUserHierarchyGroupNameResponse = UpdateUserHierarchyGroupNameResponse' { } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'UpdateUserHierarchyGroupNameResponse' with all optional fields omitted. -- -- Use or to modify other optional fields. newUpdateUserHierarchyGroupNameResponse :: UpdateUserHierarchyGroupNameResponse newUpdateUserHierarchyGroupNameResponse = UpdateUserHierarchyGroupNameResponse' instance Prelude.NFData UpdateUserHierarchyGroupNameResponse where rnf _ = ()