Exit from a pl/sql block

Question

Hi all. I'm on oracle 9i.
I have a problem: I launch my sql file, which has a part made of some SQL commands and then inside it there is a part that is a PL/SQL block.
What I want is that if a certain if condition is verified it must exit from PL/SQL block and also it must exit from all the file!
Here is a part of code:
drop table test1;
create table test1
as select * from test2;
create table prova_test1
as select * from test_1
where 1=2;
DECLARE
conta number := 0;
valore number := 0;
contap number := 0;
valorep number := 0;
istruzione varchar2(2000) := null;
BEGIN
select count(1), sum(val) into contap,valorep
from prova_test1;
select count(1), sum(val) into conta,valore
from test_1;
if conta <> contap or valore <> valorep then
istruzione := 'exit';
execute immediate istruzione;
else
others sql statements.....
end if;
end;
So what I want is that if the condition is verified it must exit from pl/sql block and also from all the process.
How can I achieve that??
Thanks for collaboration,
Fabrizio

Answer 1

Fabrizio Delli Priscoli wrote:
whenever sqlerror exit 99
whenever oserror exit 98
Number 99 or 98, are SQLCODE returned from my exception?No, they are NOT SQLCODE.
SQLCODE is an oracle database error code.
Now,
sqlerror is how 'Sql*Plus' (the one that is calling the pl/sql block) would handle ANY SQL ERROR coming out of pl/sql block OR other parts of the sql you are running within the SQL*Plus construct.
99 and 98 are the error numbers that SQL*Plus is returning to the script or code that is calling SQL*Plus. In this case, probably the 'shell script' that calls this SQL*Plus construct.
So, you would handle that error in the shell script.
Maybe something like this: (this is the shell script that is calling a sqlplus session).
1>>$LOGFILE 2>>$LOGFILE sqlplus -s $DBCONN <<EOF
whenever sqlerror exit 99
whenever oserror exit 98
set serveroutput on
set feedback off
BEGIN
some_code;
END;
exit
EOF
ret_value=$(echo $?)
case "$ret_value" in
    99) mail -s "Error: Some sqlerror on the script on $(date)" $SOME_EMAIL <$LOGFILE ;;
    98) mail -s "Error: Some oserror on the script on $(date)" $SOME_EMAIL <$LOGFILE ;;
esac