【搞定】自动编码的问题**

debug_fan

定单表的编号需要根据所选择的用户编号+"HT"+2位顺序号，例如“xxxxxHT01”



我新建了一个业务参数叫"编号",在 OnGetValue 事件处理中写了如下代码.
procedure TYWCSZ.ParamCodeGetValue(Sender: TObject; var Value: Variant);
var
  lTempStr: string;
begin
  Value := TCommonUtils.GetAutoIncreaseID(Self.Context,
    TBizParam(Sender).ID, TBizParam(Sender).DisplayName);
  { 可根据需要定制Value的格式 }
  lTempStr := TCommonUtils.StrToRightLenStr(Variants.VarToStr(Value), '0', 10);
  Value := 'HT' + lTempStr;
end;


然后在数据表定单编号字段 的自动填充属性设置了填充表达式为 "&[编号]"



目的是先测试一下  "HT"+2位顺序号  的编码生成.  但新增加记录时,编号并没有自动产生...



不知道是哪里有问题?  另外,要实现我这个完整的需求 应该怎么做呢?  谢谢!

atiger

你是怎么测试，不是直接预览表，或者在数据集上测试的吧

如果是肯定不行，因为你这是代码赋值，所有的代码只有在运行功能的时候才起作用，

debug_fan

我是运行业务功能来试的

lisb

参考
http://bbs.justep.com/forum.php? ... t=GetAutoIncreaseID

debug_fan

添加定单的时候, 选择完用户,自动生成定单编号.规则是: 用户编号+"HT"+2位顺序号，例如“xxxxxHT01”


什么方式实现呢?

atiger

运行功能，你在1楼处，设置断点了吗？你跟踪一下，运行到这里了吗？

回复5楼，设置该字段的自动填充，填充的表达式就是，把完用户 的字段加上你定义参数就可以了

debug_fan

设了断点,但没能进去.   是运行业务功能试的.


另外, 定单这个表里只是存的 用户ID(不是用户编号.用户表里有ID,编号 等字段) , 如何在定单编号字段的自动填充中通过表达式获取到用户的编号. 似乎不可行

lisb

参数问题已经远程连接看了，是签入的问题。

debug_fan

感谢 lisb 帮我把问题解决了,谢谢!!

同时也感谢 atiger !


问题可能是因为另一个人把业务参数组签出,但没签入.  也可能是要重新编译.

atiger

ok