存储过程能返回记录集吗？？

Question

type Tcursor is ref cursor
cc Tcursor;
beginopen cc for
    select * from tablenaem;
end;

Answer 1

type Tcursor is ref cursorprocedure getlevelbyname(p_level in varchar2,outCursor out TCursor) as
       CC TCursor;
       begin
         
             open CC for
                select t.cid Cvalue,t.code_name Ctext from code_title_level t 
                        where t.cname=p_level
                        and t.active='Y';
          
      
            outCursor:=CC;
            
       end;

Answer 2

用REF CURSOR。
例子同楼上的！

Answer 3

我试试，顺便再问各位刚碰到的一个问题，有两个表t1（ID  id，zoneno  varchar2(4)）、t2（zoneno varchar2），我想执行如下的语句：
insert into t1 values(s_id.nextval,select * from t2），可是会出错，要如何才能实现该功能。s_id是我定义的sequence变量。

Answer 4

insert into t1 values(s_id.nextval,select t2.zoneno from t2)

Answer 5

create trigger name_tri
before insert on t1
for each row
begin
select s_id.nextval into :new.id from dual;
end;
/insert into t1 (zoneno) (select * from t2);

Answer 6

insert into t1 (select s_id.nextval,t2.zoneno from t2)

Answer 7

insert into t1 (select s_id.nextval,t2.zoneno from t2)不行的，因为t2表中的记录不仅一条

Answer 8

SQL> select * from aa;ID FID
-- ---
1  0
2  1
3  1
4  2
5  3
6  4
6  57 rows selectedCREATE SEQUENCE s_id INCREMENT BY 1 START WITH 1 
    MAXVALUE 1.0E28 MINVALUE 1 CYCLE 
    NOCACHE NOORDER;SQL> desc bb;
Name Type        Nullable Default Comments 
---- ----------- -------- ------- -------- 
A    VARCHAR2(2) Y                         
B    VARCHAR2(2) Y                         SQL> insert into bb select s_id.nextval,fid from aa;7 rows insertedSQL> select * from bb;A  B
-- --
1  0
2  1
3  1
4  2
5  3
6  4
7  57 rows selected

Answer 9

高，实在是高人，请问高人：我想在存储过程中实现创建序号和表，如(肯定出错，我主要是想表达我的想法）：create ....
(v_name   int  varchar2,
 v_msg    out  number)
is
  v_err_code number;
begin
  drop sequence $seq;
  create  sequence $seq increment by 1 start with 1 minvalue 1;
  create table $seq
  (
    .....
  )
exception 
  when others then
    ...
end  ..;其中：seq是一个变量，用来创建序号和表明的，如seq='best'，则该存储过程能自动创建best序号和best表名，分数没问题，要多少给多少！在线！

Answer 10

create or replace procedure name_pro(seq in varchar2,v_name   int  varchar2,
 v_msg    out  number)
as
str varchar2(50);
begin
str:='create or replace sequence '||seq||' increment by 1 start with 1 minvalue 1';--注意用要权限grant create any sequence to 当前用户
execute immediate str;
str:='create table '||seq||'
  (
    .....
  )';--grant create any table to 当前用户
execute immediate str;
exception 
  when others then
    ...
end;
/

Answer 11

我试了，基本上OK，先谢谢了！，但存在以下两个问题：
1：str:='create or replace sequence '||seq||' increment by 1 start with 1 不可含有replace，去掉即可。2：insert into bb select s_id.nextval,fid from aa;中若加上group by 就会提示不能用序号，可我程序又必须能实现此项功能，请问高兄台如何解决，不胜感激！！在线！

Answer 12

“beckham”，在吗，再拉兄弟一把！！

Answer 13

insert into bb select s_id.nextval,fid from aa group by fid;--是这样吗？把你的语句写出来

Answer 14

很高兴看到你的到来，我前面写错了，不是group by ,是order by 如：
insert into bb(id,zoneno,accno,cino,amount) select s_id.nextval,zoneno,accno,cino,amount from aa where zoneno<'aaaa' and amount>111.11 order  by zoneno,accno;又：type Tcursor is ref cursor
  procedure getlevelbyname(p_level in varchar2,outCursor out TCursor) as
       CC TCursor； ...
中的type Tcursor is ref cursor在存储过程中如何定义？？实在不好意思，我对Oracle不熟，以前用的较多的是Informix ，谢谢老兄了！

Answer 15

问题一:
QL> insert into bb select s_id.nextval,fid from aa order by fid;insert into bb select s_id.nextval,fid from aa order by fidORA-02287: 此处不允许序号序列号不是表所有，它是不以表排序而排序，解决方法还是以触发器生成吧.create trigger name_tri
before insert on t1
for each row
begin
select s_id.nextval into :new.id from dual;
end;
/
insert into bb(zoneno,accno,cino,amount) select zoneno,accno,cino,amount from aa where zoneno<'aaaa' and amount>111.11 order  by zoneno,accno;问题二:
首先创建一个包
CREATE OR REPLACE PACKAGE pkg_test
AS
   TYPE TCursor IS REF CURSOR;END pkg_test;
/
procedure getlevelbyname(p_level in varchar2,outCursor out pkg_test.TCursor)
as
CC pkg_test.TCursor;
............

Answer 16

因为每个用户要从原表(如cc)中读出各自不同的子集，返回给Web端给相应客户分页查询使用，若合成一张表无法实现该功能！

Answer 17

两个表可以做到用户表user_main
user_id(pk)
user_name
.....用户明细表user_record
user_id   --用户ID
client_id  --客户id
.....
pk(user_id,client_id)web端分页以用户表与用户明细表关联

Answer 18

是我没和你说清楚，客户是随机的，可以任意增加和删除，而且客户读取的明细也是随机的，并没有一个固定的关系，即客户随时可以按不同的条件组合从原表中读取出不同的明细记录用于web端分页。我有个想法，还是一个登录用户临时生成一个触发器，在退出时马上将该临时触发器删除，可否？？

Answer 19

我说的临时表也是用create table创建的，你说的领时表可能是是表空间自带的吧！

Answer 20

在Oracle8i中，可以创建以下两种临时表： 
1。会话特有的临时表 
CREATE GLOBAL TEMPORARY <TABLE_NAME> (<column specification> ) 
ON COMMIT PRESERVE ROWS； 2。事务特有的临时表 
CREATE GLOBAL TEMPORARY <TABLE_NAME> (<column specification> ) 
ON COMMIT DELETE ROWS； 
CREATE GLOBAL TEMPORARY TABLE MyTempTable 
所建的临时表虽然是存在的，但是你试一下insert 一条记录然后用别的连接登上去select，记录是空的，明白了吧。
下面两句话再贴一下： 
--ON COMMIT DELETE ROWS 说明临时表是事务指定，每次提交后ORACLE将截断表（删除全部行） 
--ON COMMIT PRESERVE ROWS 说明临时表是会话指定，当中断会话时ORACLE将截断表。