求急!调试存储过程时,报ora-06550 PLS-00103
create or replace procedure P_grade(abc varchar2)
as
gradeid varchar2(10);
begin
select ptgradeid INTO gradeid FROM B_PILOTTECHGRADE where ptgradeid = abc;
dbms_output.put_line(gradeid);
end P_gradebe;
/
begin
exec P_grade( 'M ');
end;
[解决办法]
create table B_PILOTTECHGRADE (ptgradeid varchar2(100) );
insert into B_PILOTTECHGRADE values( 'aa ');
create or replace procedure P_grade(abc in varchar2)
as
gradeid varchar2(10);
begin
select ptgradeid INTO gradeid FROM B_PILOTTECHGRADE where ptgradeid = abc;
dbms_output.put_line(gradeid);
end P_grade;
declare
begin
p_grade( 'aa ' );
end;
