shell调用存储过程

来源：互联网发布：业绩考核软件编辑：程序博客网时间：2024/05/21 22:23

#!/bin/sh
##--------------------------------------------------------
##
##--功能说明:调用SP(只支持SP有0-4个in参数，2个out参数)
## 需要完善的地方：参数类型判断
##--输入参数：
##--        $1:数据库名称(必须)
##--        $2:数据库用户名(必须)
##--        $3:数据库用户密码(必须)
##--        $4:数据库SP名称(必须)
##--        $5:SP输入参数(可选)--$8:SP输入参数(可选)
##--返回参数说明：
##--        p_out_sqlcode:存储过程执行错误代码()
##--        p_out_errmsg:存储过程执行错误描述()
##--        p_errmsg:程序错误描述
##--------------------------------------------------------
sqlLogFile=sqllog.tmp
dbname=$1
dbuser=$2
dbpwd=$3
spname=$4
param1=$5
param2=$6
param3=$7
param4=$8
paramnum=$#                    #SP参数个数
if [ $# -lt 4 ]
then
echo "至少输入4个参数！"
exit
fi
sqlplus -S $dbuser/$dbpwd@$dbname>>${sqlLogFile} <<!
set serveroutput on size 100000
declare
   p_out_sqlcode number;
   p_out_errmsg VARCHAR2(2000);
   V_SQL VARCHAR2(2000);
   v_num   number; --shell传递的参数IN个数
   v_sp_num number;--SP参数IN个数
begin
   SELECT '('||WMSYS.WM_CONCAT(':P' || ROWNUM)||')' INTO V_SQL FROM DUAL
   CONNECT BY LEVEL <=$paramnum-4+2;
   V_SQL := 'CALL ' || '$spname ' ||V_SQL ;
   v_num :=$paramnum-4;
   select count(1) into v_sp_num From user_arguments
   where object_name=upper('$spname')
   And in_out='IN';
   if v_num !=v_sp_num
    then
       RAISE_APPLICATION_ERROR( -20001, 'p_errmsg^输入的参数个数出错!' );
   end if;

   if v_num ='0'
   then
   EXECUTE IMMEDIATE V_SQL
   USING OUT p_out_sqlcode, OUT p_out_errmsg;
   elsif v_num='1'
   then
   EXECUTE IMMEDIATE V_SQL
   USING IN '$param1',
   OUT p_out_sqlcode, OUT p_out_errmsg;

elsif v_num='2'
   then
   EXECUTE IMMEDIATE V_SQL
   USING IN '$param1',IN '$param2',
   OUT p_out_sqlcode, OUT p_out_errmsg;

elsif v_num='3'
   then
   EXECUTE IMMEDIATE V_SQL
   USING IN '$param1',IN '$param2',IN '$param3',
   OUT p_out_sqlcode, OUT p_out_errmsg;

elsif v_num='4'
   then
   EXECUTE IMMEDIATE V_SQL
   USING IN '$param1',IN '$param2',IN '$param3',IN '$param4',
   OUT p_out_sqlcode, OUT p_out_errmsg;
else
RAISE_APPLICATION_ERROR( -20001, 'p_errmsg^输入的参数个数出错!' );
end if;
dbms_output.put('p_out_sqlcode^');
dbms_output.put_line(p_out_sqlcode);
dbms_output.put('p_out_errmsg^');
dbms_output.put_line(p_out_errmsg);
end;

/
!

# get p_out_sqlcode
p_out_sqlcode=$(awk -F"^" '/^p_out_sqlcode/ {print $2}' ${sqlLogFile})
p_out_errmsg=$(awk -F"^" '/^p_out_errmsg/ {print $2}' ${sqlLogFile})
p_errmsg=$(awk -F"^" '{ if ($1~"p_errmsg") print $2}' ${sqlLogFile})
rm sqllog.tmp
echo $p_out_sqlcode
echo $p_out_errmsg
echo $p_errmsg

0 0