EsbOtlRenameMember

メンバー名を変更します。

構文

            EsbOtlRenameMember
             (
            hOutline, hMember, pszNewMember
            )
ByVal 
            hOutline
                 As Long
ByVal 
            hMember
                  As Long
ByVal 
            pszNewMember
             As String

パラメータ	説明
hOutline	アウトラインのコンテキスト・ハンドル。
hMember	名前を変更するメンバーのハンドル。
pszNewMember	新しいメンバー名。

備考

すべての共有メンバー名も変更されます。
hMemberが共有メンバーを指している場合、この呼出しは失敗します。
ESB_ATTRMBRDT_STRING型に属さないゼロレベル(リーフ・ノード)の属性メンバー名を変更すると、次がリセットされます:
- 属性値
- メンバーのロング名。ESB_ATTRSPECS_T構造体のアウトラインに対する定義を使用
祖先の名前を変更すると、ゼロレベルの属性メンバーのロング名に影響する場合があります。

戻り値

正常終了の場合は0が戻されます。それ以外の場合は、次のいずれかの値が戻されます:

OTLAPI_BAD_MBRNAME
TLAPI_BAD_RENAMESHARE
OTLAPI_ERR_RENAMENAMEUSED

例

         Declare Function EsbOtlRenameMember Lib 
"ESBOTLN" (ByVal hOutline As Long, ByVal hMember As Long,
ByVal pszNewMember As String) As Long

Sub ESB_OtlRenameMember()
Dim sts As Long
Dim Object As ESB_OBJDEF_T
Dim hOutline As Long
Dim hMemProfit As Long
Object.hCtx = hCtx
Object.Type = ESB_OBJTYPE_OUTLINE
Object.AppName = "Sample"
Object.DbName = "Basic"
Object.FileName = "Basic"
sts = EsbOtlOpenOutline(hCtx, Object, 
ESB_YES, ESB_YES, hOutline) 
If sts = 0 Then
   sts = EsbOtlFindMember(hOutline, "Profit", 
    hMemProfit) 
End If
If sts = 0 And hMemberProfit <> 0 Then
   sts = EsbOtlRenameMember(hOutline, hMemProfit, 
    "Prelim Profit") 
End If
End Sub