【结贴】获取了重复的自动编码，怎么回事？**

Anson.Leung

有30个人用户在用同一个功能，偶尔保存时会出现ID违反唯一约束，出现问题时我用对象查看器，看到的ID实际上数据库已经有了，属于另一个人录入的，请问为什么会出现这种情况？谢谢！

lixy

您的id是怎么获得的？

Anson.Leung

参数，类似于GUID的那种，客户端新增的时候会自动填充

lixy

如果是newguid，应该很难重复的。您的算法是什么？

Anson.Leung

就是一个自动参数
procedure TPUB_PARA.ParamSALES_RECORD_SNGetValue(Sender: TObject; var Value: Variant);
begin
    Value := TCommonUtils.GetAutoIncreaseID(Self.Context,
    TBizParam(Sender).ID, TBizParam(Sender).DisplayName);
  { 可根据需要定制Value的格式 }
  Value := 'SR'+ TCommonUtils.StrToRightLenStr(Variants.VarToStr(Value), '0', 10);
end;

yancm

TCommonUtils.GetAutoIncreaseID 由于没有使用事务封装，这个方法有可能读到脏数据。
楼主可以参考业务模型\协同系统\工作事务(处理功能)\业务基础信息
中的function TBIZBASEINFO.GetNewAutoIncNumber(AConnection: TConnection): Integer;方法来避免读到脏数据。
本来业务空间下的内容是给用户参考的，我们并不推荐使用。
不过，现在看来很多用户都在使用，我已经作为缺陷提交，请我们的平台组重新整理一下这些函数，使他们的使用能够更加安全。

Anson.Leung

多谢，我试试。

zfang

楼主，记得反馈
谢谢

jiahaiminghr

由于长时间没有反馈，先结贴了！
有问题请开新贴。