我在oracle中为过程创建类型数据。
程序:
create or replace TYPE ROW_USER as object
(
ID NUMBER(4),
ROLES_ID NUMBER(1),
FIRST_NAME VARCHAR2(60 BYTE),
SECOND_NAME VARCHAR2(60 BYTE),
FIRST_LAST_NAME VARCHAR2(60 BYTE),
SECOND_LAST_NAME VARCHAR2(60 BYTE),
CC NUMBER(10,0),
EMAIL VARCHAR2(60 BYTE)
);
和:
create or replace type NESTED_ROW_USER as table of ROW_USER;
当我在匿名块中使用这种类型的数据并且可以正常工作时。
set serveroutput on;
DECLARE
ROWUSR NESTED_ROW_USER;
BEGIN
select cast( multiset(select id, ROLES_ID, FIRST_NAME, SEGUNDO_NOMBRE,
FIRST_LAST_NAME, SECOND_LAST_NAME, CC, EMAIL from USERS where id = 1) as
NESTED_ROW_USER)
into ROWUSR
from users;
DBMS_OUTPUT.PUT_LINE(ROWUSR(1).id||','||ROWUSR(1).ROLES_ID||','||
ROWUSR(1).FIRST_NAME);
END;
阻止结果:
Process PL/SQL exited successfully.
1,1,DIEGO
但是当我在存储过程中使用它返回它时,会出现错误。
程序:
create or replace PROCEDURE outnested(ROWUSR OUT NESTED_ROW_USR)
AS
BEGIN
select cast( multiset(select id, ROLES_ID, FIRST_NAME, SECOND_NAME,
FIRST_LAST_NAME, SECOND_LAST_NAME, CC, EMAIL from USERS where id = 1) as
NESTED_ROW_USER)
into ROWUSR
from users;
END;
错误:
ORA-06550: line 5, column 16:
PLS-00302: component 'NESTED_ROW_USER' must be declared
ORA-06550: line 5, column 11:
PL/SQL: Item ignored
ORA-06550: line 14, column 16:
PLS-00320: the declaration of the type of this expression is incomplete or malformed
ORA-06550: line 10, column 3:
PL/SQL: Statement ignored
为什么它不返回值?
答案 0 :(得分:1)
您是否真的要生成一个集合,该集合具有与usarios
表相同的行数,并且该集合的每个元素中的对象值都相同?听起来很奇怪。
我的猜测是您真的想要这样的东西
create or replace PROCEDURE outnested(p_FILAUSU OUT NESTED_FILA_USUARIO)
AS
BEGIN
select FILA_USUARIOr( id,
ROLES_ID,
PRIMER_NOMBRE,
SEGUNDO_NOMBRE,
PRIMER_APELLIDO,
SEGUNDO_APELLIDO,
CC,
EMAIL )
bulk collect into p_FILAUSU
from USUARIOS
where id = 1;
END;
答案 1 :(得分:1)
我在Oracle 12c数据库中运行了您的DDL,将古老的EMP
表替换为usuario
表,它似乎可以正常工作。
我注意到的唯一潜在错误是您在查询中两次包含from usuario
:一次是多重集,一次是外部SELECT
的来源。
在查询结束时,我用from dual
替换了from usuario
。
为方便起见,我删除了WHERE
子句;我假设您会保留它。
请确保NESTED_FILA_USUARIO
类型与outnested
过程属于同一模式,否则,您将必须包含模式名称前缀并确保存在 direct < / em>从NESTED_FILA_USUARIO
的所有者授予outnested
的模式(角色在已编译的PL / SQL中不起作用)。
create or replace TYPE FILA_USUARIO as object
(
EMPNO NUMBER(4),
ENAME VARCHAR2(10),
JOB VARCHAR2(9),
MGR NUMBER(4),
HIREDATE DATE,
SAL NUMBER(7,2),
COMM NUMBER(7,2),
DEPTNO NUMBER(2)
);
create or replace type NESTED_FILA_USUARIO as table of FILA_USUARIO;
这是匿名块:
DECLARE
FILAUSU NESTED_FILA_USUARIO;
BEGIN
select cast( multiset(select EMPNO,ENAME,JOB,MGR,HIREDATE,SAL,COMM,DEPTNO from EMP) as
NESTED_FILA_USUARIO)
into FILAUSU
from dual;
DBMS_OUTPUT.PUT_LINE(FILAUSU(1).EMPNO||','||FILAUSU(1).ENAME||','||
FILAUSU(1).JOB);
END;
这是存储过程,带有测试:
create or replace PROCEDURE outnested(FILAUSU OUT NESTED_FILA_USUARIO)
AS
BEGIN
select cast( multiset(select EMPNO,ENAME,JOB,MGR,HIREDATE,SAL,COMM,DEPTNO from EMP) as
NESTED_FILA_USUARIO)
into FILAUSU
from dual;
END;
/
declare
filausu NESTED_FILA_USUARIO;
begin
outnested(filausu);
DBMS_OUTPUT.PUT_LINE(FILAUSU(1).EMPNO||','||FILAUSU(1).ENAME||','||
FILAUSU(1).JOB);
end;
/
输出是这样的:
7839,国王,总统
这是该查询所期望的。