Oracle函数生成用户未归还图书提醒邮件内容相关问题咨询

问题1 多本图书拼接实现 #

Oracle中实现字符串累加拼接直接复用原有结果变量即可，语法为Result := Result || 新增内容，注意需要先初始化结果变量的抬头内容，避免空值拼接导致内容丢失，同时可在循环内用计数器生成序号匹配你需要的列表格式。

问题2 客户名称获取方案 #

不需要额外新增游标，你当前定义的查询已经通过natural join client关联了客户表，只要client表存储客户名称的字段（示例中默认字段名为client_name）在关联查询结果中，直接取出拼入抬头即可，无需重复查询。

问题3 函数传参调用方法 #

直接将查询结果中的clientid字段作为参数传入函数即可，建议增加distinct去重，避免同一用户有多本逾期书时返回重复结果。 #

修正后完整函数代码 #

create or replace function get_un_recived_books(param_client_id in number) return varchar2 is
  -- 适当调大长度避免内容溢出，Oracle PL/SQL中varchar2最大可设为32767
  Result varchar2(32767);
  -- 定义序号计数器
  v_seq number := 1;
begin
  -- 初始化邮件抬头，先查询获取客户名称
  select 'hello ' || client_name || chr(10) || '您需要归还以下图书：' || chr(10)
    into Result
    from client
   where clientid = param_client_id;

  -- 循环拼接所有逾期图书信息
  FOR b IN (select book_name, taken_date 
              from hashala 
              natural join all_books 
              natural join book
             where recived = 0
               and recived_date is null
               and clientid = param_client_id          
               and taken_date < add_months(trunc(sysdate, 'month'), -3)) LOOP
    Result:= Result || v_seq || '. ' || b.book_name || ' 借阅于' || to_char(b.taken_date, 'yyyy-mm-dd') || chr(10);
    v_seq := v_seq + 1;
  END LOOP;

  -- 无逾期图书时返回友好提示
  if v_seq = 1 then
    Result := 'hello，您当前无逾期未归还的图书';
  end if;

  return Result;
end;
/

正确调用查询语句 #

select distinct get_un_recived_books(clientid) as overdue_notice, clientid 
  from hashala 
 natural join client 
 natural join all_books 
 natural join book
 where recived = 0
   and recived_date is null
   and taken_date < add_months(trunc(sysdate, 'month'), -3);

内容的提问来源于stack exchange，提问作者24sharon