这个存储过程有什么问题呢

[xiedi1209]

create or replace package testproc2
is type type2 is ref cursor;
procedure proc2(usercode in number,userlist out type2);
end testproc2;

Create or replace package body testproc2
procedure proc2(usercode in number,userlist out type2)
as
  begin
       open userlist for
       select * from lduser where rownum <= usercode;
  end proc2;
end testproc2;

[minitoy]

create or replace package testproc2
is type type2 is ref cursor;
procedure proc2(usercode in number,userlist out type2);
end testproc2;

Create or replace package body testproc2 is
procedure proc2(usercode in number,userlist out type2)
as
  begin
       open userlist for
       select * from lduser where rownum <= usercode;
  end proc2;
end testproc2;

[minitoy]

没大问题.Create or replace package body testproc2后面少了个is.
写as也可以.

[xiedi1209]

Compilation errors for PACKAGE EAPP.TESTPROC2

Error: PLS-00103: 出现符号 "CREATE"
Line: 6
Text: Create or replace package body testproc2 is

加上之前和之后 都提示我这个 不知道原因

[gelyon]

少了个is 吧

Create or replace package body testproc2 is
。。。。
。。。

[crazylaa]

就是查一段数据。条件是<=usercode的行数(rownum伪列）

[gelyon]

[Quote=引用 3 楼 xiedi1209 的回复:]

Compilation errors for PACKAGE EAPP.TESTPROC2

Error: PLS-00103: 出现符号 "CREATE"
Line: 6
Text: Create or replace package body testproc2 is

加上之前和之后 都提示我这个 不知道原因
[/Quote]

这样，你第一个packeage执行后 要加一个“/”
即：
create or replace package testproc2
is type type2 is ref cursor;
procedure proc2(usercode in number,userlist out type2);
end testproc2;
/

Create or replace package body testproc2 is
procedure proc2(usercode in number,userlist out type2)
as
begin
open userlist for
select * from lduser where rownum <= usercode;
end proc2;
end testproc2;

[心中的彩虹]

[Quote=引用楼主 xiedi1209 的回复:]
SQL code

create or replace package testproc2
is type type2 is ref cursor;
procedure proc2(usercode in number,userlist out type2);
end testproc2;

Create or replace package body testproc2
proc……
[/Quote]
--先有包头 在有包体 不可没包体但决定不能没包头
create or replace package testproc2
is type type2 is ref cursor;
procedure proc2(usercode in number,userlist out type2);
end testproc2;

/

Create or replace package body testproc2 as
procedure proc2(usercode in number,userlist out type2)
as
begin
open userlist for
select * from lduser where rownum <= usercode;
end proc2;
end testproc2;

[minitoy]

你不会是放一起编译的吧.先编译包头,再编译包体.[Quote=引用 3 楼 xiedi1209 的回复:]
Compilation errors for PACKAGE EAPP.TESTPROC2

Error: PLS-00103: 出现符号 "CREATE"
Line: 6
Text: Create or replace package body testproc2 is

加上之前和之后 都提示我这个 不知道原因
[/Quote]