Domino 使用递归算法获取视图值

Posted wzjhoutai

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了Domino 使用递归算法获取视图值相关的知识,希望对你有一定的参考价值。

    在关系数据库中,有两字段是父子关系。通过递归算法,输入一个父ID,能够获取全部相应的子ID。这种数据结构在组织架构中常常使用。显示一般使用树形结构。在Domino中相同能够处理这种情况,下面是个小demo,希望对大家有帮助。交流QQ 873968102

   1)视图的数据结构(这数据结构使用在一些应用其中,这是前台UI xpages domino动态编辑树

      技术分享

    2)下面是使用LS的递归算法,通过输入一个父ID,把全部子ID带出来。通过 : 分隔,其他JAVA、SSJS写法类似,就不写出来了。

有些同学会想。为什么要获取全部的子ID呢?比如删除一个ID,就先要获取子ID一起。然后当前ID和子ID全删除。


%REM
    视图第一第二列递归取数据
    view,id为全局变量
%END REM

Dim id asstring

Function tempstring1(key As String) AsString
    Dim vc1 AsNotesViewEntryCollection
    Dim entry1 As NotesViewEntry
    Set vc1=view.GetAllEntriesByKey(key,True)
    Set entry1=vc1.GetFirstEntry   
    While Not entry1 Is Nothing
       If id=""Then
           id=CStr(entry1.ColumnValues(1))
       Else
           id=id & ":" & CStr(entry1.ColumnValues(1))
       EndIf
       tempstring1=id & ":" &tempstring1(CStr(entry1.ColumnValues(1)))
       Setentry1=vc1.Getnextentry(entry1)
    Wend  
EndFunction







以上是关于Domino 使用递归算法获取视图值的主要内容,如果未能解决你的问题,请参考以下文章

如何使用 c# 以编程方式在 domino 服务器中获取 CA 配置的验证者名称列表?

从片段中的json获取值

如何使列表视图出现在片段中?

片段中的 notifyDataSetChanged() 不刷新列表视图

从图库中获取图像以在片段中的图像视图中设置? [复制]

IBM LOTUS DOMINO 9 部署SSL证书