Question

此代码块在调用“put_line”时返回错误 pls-00306 错误数量或类型的参数：

SET SERVEROUTPUT ON
DECLARE  
   ch varchar2(16);
   cursor ebs_user_cur 
   is
   select xmlagg(xmlelement("r", ch)).extract('//text()').getstringval() 
from
(
  select distinct first_value(ch) over (partition by lower(ch))  
  from (
    select substr('abcd#efghijklmn#pqrstuvwxyzABC$DEFGHIJK$LMNPQR!STUVWXYZ1!23456789',
        level, 1)  ch
    from dual 
    connect by level <= 59
    order by dbms_random.value
  )
  where rownum <= dbms_random.value(18,18)
);
l_passwd   ebs_user_cur%ROWTYPE;
BEGIN
open ebs_user_cur;
loop
fetch ebs_user_cur into l_passwd;
DBMS_OUTPUT.PUT_LINE(l_passwd);
EXIT WHEN l_passwd%NOTFOUND;
END LOOP;
close ebs_user_cur;
END;

错在哪里？

谢谢

Answer 1

您应该在游标中指定列别名
您应该在 l_passwd.{field_name} 中指定确切的字段名称：

SET SERVEROUTPUT ON
DECLARE  
   ch varchar2(16);
   cursor ebs_user_cur 
   is
   select xmlagg(xmlelement("r", ch)).extract('//text()').getstringval() 
    as res -- <<< see here
    from
    (
      select distinct first_value(ch) over (partition by lower(ch))  
      from (
        select substr('abcd#efghijklmn#pqrstuvwxyzABC$DEFGHIJK$LMNPQR!STUVWXYZ1!23456789',
            level, 1)  ch
        from dual 
        connect by level <= 59
        order by dbms_random.value
      )
      where rownum <= dbms_random.value(18,18)
    );
    l_passwd   ebs_user_cur%ROWTYPE;
BEGIN
  open ebs_user_cur;
  loop
    fetch ebs_user_cur into l_passwd;
    DBMS_OUTPUT.PUT_LINE(l_passwd.res); -- <<< .res here
    EXIT WHEN l_passwd%NOTFOUND;
  END LOOP;
  close ebs_user_cur;
END;

尝试打印输出时出现 pls-00306 错误

1 个答案: