EsbOtlSortChildren

アウトライン・メンバーの子をソートします。

構文

            EsbOtlSortChildren
             (
            hOutline, hParent, usType
            )
ByVal 
            hOutline
             As Long
ByVal 
            hParent
              As Long
ByVal 
            usType
               As Integer

パラメータ	説明
hOutline	アウトラインのコンテキスト・ハンドル。
hParent	ソートする子の親のハンドル。ESB_NULLが指定されている場合は、次元がソートされます。
usType	ソート・タイプ。次のいずれかを指定できます: ESB_SORT_ASCENDING ESB_SORT_DESCENDING

戻り値

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

OTLAPI_BAD_SORTTYPE
OTLAPI_BAD_SORTCOMPAREFUNC
OTLAPI_SORT_TOOMANY

例

         Declare Function EsbOtlSortChildren Lib 
"ESBOTLW" (ByVal hOutline As Long, ByVal hParent As Long, 
ByVal usType As Integer) As Long
Sub ESB_OtlSortChildren()
Dim sts As Long
Dim Object As ESB_OBJDEF_T
Dim hOutline As Long
Dim hParent 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", hParent) 
End If
If sts = 0 And hParent <> 0 Then
   sts = EsbOtlSortChildren(hOutline,
    hParent, ESB_SORT_DESCENDING) 
End If
End Sub