Lotus BS下生成流水号如何保证唯一
Published by admin on 05月 31, 2010
bs系统中经常需要生成流水号,常用的做法是使用简要表.比如现在的规则是:AZ+ 年月+4位流水号
Dim profiledoc as NotesDocument
set profiledoc = db.GetProfileDocument(”optionform”)
profiledoc.sailno(0)
但如果并发时呢..比如同时俩个人点击新建时,这时俩个人的流水号肯定一致.
为止,我们需要使用视图,首先.在文档中增加个域（year_month）存储年月.增加个视图,视图第一列分类显示，值就是year_month，这样保证每月的文档都在一个分类中.
接下来.仍然从简要表profiledoc中获取,然后在保存时.在做个判断.
Dim dc as NotesDocumentCollection
set dc = view.getallDocumentsBykey(”当前年月”)
这样用dc.count和获取到的流水号比较.如果流水号大.说明中间有变动,则以dc.count作为流水号.并且把dc.count回存到简要表中.
上一篇文章:« Lotus生成流水号方法一(CS)|通过Lock来锁定
下一篇文章:js判断fck编辑器内容是否为空并获得焦点 »
【版权说明】：本网页上有部分内容来源于网上收集,但不能保证资料的完整性和准确性，仅提供参考和学习。如有侵权请立即通知我们,我们将立即删除,谢谢合作!