Firebird Internal Function

火鸟自定义内置函数，方便、强大。

特点：只可以返回单值，不能返回多行。

若想返回多行table，可以定义存储过程 Procedure，用suspend返回。

自定义内置函数，示例：返回当前批次号。

create or alter function BATCH_NO
returns varchar(10)
AS
declare variable mth varchar(10);
declare variable bt varchar(10);
begin
  /* Function Text */
  select extract(month from current_date) from rdb$database into :mth;
  if(char_length(:mth) = 1) then
    mth = '0' || mth;

  select extract(year from current_date) || :mth || extract(day from current_date)
  from rdb$database into :bt;
  return bt;

end

调用方式： select batch_no() from rdb$database;  结果：20180722

或者这样也行：

insert into m_user (code)
values(batch_no());