EsbGetFilterList

フィルタを割り当てられたユーザーのリストを取得します。

構文

            EsbGetFilterList
             (
            hCtx, AppName, DbName, FltName, pItems
            )
ByVal 
            hCtx
                As Long
ByVal 
            AppName
             As String
ByVal 
            DbName
              As String
ByVal 
            FltName
             As String
      
            pItems
              As Integer
         

戻り値

正常終了の場合、このフィルタが割り当てられているユーザーのアイテムがpItemsに戻され、EsbGetNextItem()を介してアクセス可能なユーザー名の文字列の配列が生成されます。

アクセス

この関数を使用するには、指定したデータベースに対して、呼出し元がデータベース・デザイン権限(ESB_PRIV_DBDESIGN)を持っている必要があります。

例

         Declare Function EsbGetFilterList Lib "ESBAPIN" (ByVal hCtx As 
Long, ByVal AppName As String, ByVal DbName As String, ByVal 
FilterName As String, Items As Integer) As Long

Sub ESB_GetFilterList ()
   Dim Items As Integer
   Dim AppName As String
   Dim DbName As String 
   Dim FilterName As String
   Dim User As String * ESB_USERNAMELEN
   Dim sts As Long   AppName = "Sample"
   DbName = "Basic"
   FilterName = "Filter"   '****************
   ' Get Filter List
   '**************** 
   sts = EsbGetFilterList (hCtx, AppName, DbName, FilterName, Items)   For n = 1 To Items     '**************************
     ' Get next User Name String 
     ' from the list
     '**************************
     sts = EsbGetNextItem (hCtx, 
     ESB_FUSERNAME_TYPE, ByVal User)
   Next
End Sub
      

関連トピック

• EsbGetFilter
• EsbListFilters
• EsbSetFilterList
• EsbGetNextItem