EsbOtlSetOutlineInfo

アウトライン情報を設定します。

構文

            EsbOtlSetOutlineInfo (
            hOutline, pInfo
            )
ByVal 
            hOutline
             As Long
      
            pInfo
                As ESB_OUTLINEINFO_T

パラメータ	説明
hOutline	アウトラインのコンテキスト・ハンドル。
pInfo	呼出し元によって割り当てられる、アウトライン情報のストレージ変数。

備考

ESB_OUTLINEINFO_T構造体の一部のフィールドのみを使用して情報を設定します。詳細は「API構造体」のセクションを参照してください。
ESB_OUTLINEINFO_T構造体の各フィールドを初期化するには、EsbOtlGetOutlineInfo()を呼び出します。
ESB_OUTLINEINFO_T構造体のfCaseSensitiveフラグがESB_TRUEからESB_FALSEに変更され、そのためにメンバー名が重複してしまった場合、この呼出しは失敗します。

戻り値

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

OTLAPI_BAD_OUTLINETYPE
OTLAPI_ERR_DUPLICATEALIAS
OTLAPI_ERR_CURTOOMANYDIMS
OTLAPI_ERR_ILLEGALTAG
OTLAPI_ERR_DUPLICATENAME

例

         Declare Function EsbOtlSetOutlineInfo Lib
"ESBOTLN" (ByVal hOutline As Long, 
pInfo As ESB_OUTLINEINFO_T) As Long

Sub ESB_OtlSetOutlineInfo()
Dim sts As Long
Dim Object As ESB_OBJDEF_T
Dim hOutline As Long
Dim Info As ESB_OUTLINEINFO_T
Object.hCtx = hCtx
Object.Type = ESB_OBJTYPE_OUTLINE
Object.AppName = "Sample"
Object.DbName = "Basic"
Object.FileName = "Basic"
sts = EsbOtlOpenOutline(hCtx, Object, 
ESB_YES, hOutline)
'call GetOutlineInfo() to fill structure
If sts = 0 Then
   Info.fCaseSensitive = ESB_FALSE
   sts = EsbOtlSetOutlineInfo(hOutline, Info)
End If
End Sub