データベース内の特定のデータ・セルのデータにリンクされたすべてのオブジェクトを削除します。セルにリンクされた特定のオブジェクトを削除するには、EsbLRODeleteObjectを使用します。
構文
EsbLRODeleteCellObjects ( hCtx, memCount, memComb, PulCount ) ByVal hCtx As Long ByVal memCount As Long ByVal memComb As String PulCount As Long
パラメータ | 説明 |
---|---|
hCtx |
APIコンテキスト・ハンドル。 |
memCount |
MemCombに指定されているメンバー数。 |
MemComb |
メンバー名の文字列(EOL、CRで区切られる)。 |
PulCount |
削除されたLROカタログ・エントリ数。 |
備考
この関数では、指定されたセルにリンクされているすべてのオブジェクトがそれらのカタログ・エントリと一緒に削除されます。
オブジェクトがサーバーに保管されていない場合は、セル・リンクのみ破棄されます。
EsbLRODeleteCellObjects()では、削除するオブジェクトのリストが生成されます。この関数の呼出し後、EsbGetNextItemを使用して、削除した各オブジェクトの情報を取得します。コード例でこの方法を示します。
戻り値
正常終了の場合は、ESB_STS_NOERRが戻されます。それ以外の場合、エラー・コードが戻されます。
アクセス
この関数を呼び出すには、データ・セルまたはアクティブなデータベースに対して書込み権限(ESB_PRIV_WRITE)を持っている必要があります。
例
Declare Function EsbLRODeleteCellObjects Lib "esbapin" _ (ByVal hCtx As Long, ByVal memCount As Long, _ ByVal memComb As String, PulCount As Long) As Long Public Sub ESB_LRODeleteCellObjects() Dim Desc As ESB_LRODESC_API_T Dim Items As Long Dim memCount As Long Dim memComb As String Dim i As Integer memCount = 5 memComb = "Jan" & vbCrLf & "Sales" & _ "Cola" & vbCrLf & "Utah" & _ "Actual" sts = EsbLRODeleteCellObjects(hCtx, memCount, _ memComb, Items) If sts = 0 Then For i = 1 To Items '******************************* '* Get the next LRO description '* item from the list '******************************* sts = EsbGetNextItem(hCtx, ESB_LRO_TYPE, Desc) Next i End IfEnd Sub
関連トピック