【结贴】业务参数值基数序号的问题

jianth2005

我在业务参数组中写了自动加1
代码
-----------------------------------------------------------------
var
   lTempStr,strYear:string;
begin
    strYear :=sysUtils.FloatToStr(DateUtils.YearOf(Business.Data.SysSrv.SysService.Time));
    strYear :=strutils.RightStr(strYear,2);
    Value := TCommonUtils.GetAutoIncreaseID(Self.Context,TBizParam(Sender).ID, TBizParam(Sender).DisplayName);{ 可根据需要定制Value的格式 }
    lTempStr := TCommonUtils.StrToRightLenStr(Variants.VarToStr(Value), '0', 4);
    Value :=strYear+lTempStr;
end;
----------------------------------------------------------
我在数据集新增的时候，ID的自动填充引用了这个参数组，没有问题。比如我在点击添加按钮的时候，编号就会是0001开始，但是我没保存，而是取消更新，当我再添加的时候编号就会是0002开始了，我要怎样才能让编号再从0001开始啊 ？

shangxy

这个如果使用自动填充做不到这种效果，
beforeapplyupdates的时候在代码中使用参数对字段赋值呢？

jianth2005

试试看

FBO

GetAutoIncreaseID是在系统库的表里建了这个参数的记录，然后有个字段作为基数，每操作一次基数就增加1。再从1开始的话，基数就得还原为0。

jianth2005

结贴