EsbOtlFindMember

指定した名前を持つメンバーを検索し、そのメンバーにハンドルを戻します。

構文

            EsbOtlFindMember
             (
            hOutline, pszMember, phMember
            )
ByVal 
            hOutline
              As Long
ByVal 
            pszMember
             As String
      
            phMember
              As Long

パラメータ	説明
hOutline	アウトラインのコンテキスト・ハンドル。
pszMember	検索対象のメンバー名。
phMember	メンバー・ハンドルの戻り変数。メンバーが見つからなかった場合はESB_NULLです。

備考

検索対象のメンバーが共有メンバーを持っている場合、実メンバーへのハンドルのみが戻されます。ハンドルを持っている場合、EsbOtlGetNextSharedMember()を使用して共有メンバー情報を取得します。
メンバーが見つからない場合、phMemberがESB_NULLに設定され、呼出しは0を戻します。

戻り値

成功の場合、0が戻されます。

例

         Declare Function EsbOtlFindMember Lib 
"ESBOTLN" (ByVal hOutline As Long,
ByVal pszMember As String, phMember As Long) As Long
Sub ESB_OtlFindMember()
Dim sts As Long
Dim Object As ESB_OBJDEF_T
Dim hOutline As Long
Dim MbrInfo As ESB_MBRINFO_T
Dim hMemberProfit As Long
Dim hNewMember 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",
    hMemberProfit) 
End If
End Sub