在客户化Form开发中,经常会遇到需要给表格的记录块添加一个行号,行号不但作为数据行的一个序号,同时经常被作为单击的行标识,具有比较重要的业务意义。
这个行号的特点是:
- 新增行时自动生成默认行号:已有的最大行号+1
- 用户可以修改行号为合法的数字:大于0;保证唯一
- 如果用户修改了行号,新增生成的行号必须在用户修改行号的基础上+1
实现这样的行号相对比较麻烦,下面描述如何来实现上图中所示的行号功能:
- 在记录块的PRE-QUERY中查询出数据库中已有的最大行号,并将其记录到参数中作为最大的行号,如果单据的头是新建的,那这个参数默认的最大值则为1
- 在行记录的WHEN-CREATE-RECORD中将最大行号的参数值+1赋给行号字段
- 行号数据项的WHEN-VALIDATE-ITEM中检查行号是否<0;同时检查行号在数据库中是否存在(对于同时录入多行相同的行号在这个触发器中无需处理)
- 在WHEN-NEW-RECORD-INSTANCE中检查如果块的状态是NEW,从数据库中获取最大的行号,并设置行号
- 在WHEN-VALIDATE-RECORD中判断当前的行号是否大于参数中的最大行号,如果是则覆盖参数的最大行号
下面是将上面的代码按照HANDLER机制包装为LINE_NUM过程的列子:
各触发器的HANDLER:
添加一个MAX_LINE_NUM(NUMBER)的参数来保存当前最大行号的值