Execute_sql  $CONNECT $SQLFILE $SQLLOG $COMITINTV >> ${SCRIPTLOG}
if [ $? -ne 0 ]
then update KO
fi
update OK

function Execute_sql
{
 CONNECT=$1
 SQLFILE=$2
 LOGFILE=$3
 FREQCOMMIT=$4

`sqlplus -s /NOLOG > /dev/null <<END
 connect ${CONNECT}
 set serveroutput on
 set verify on
 set feedback on
 spool ${LOGFILE}
 @${SQLFILE} ${FREQCOMMIT}  
 spool off
 exit;
END`
}

set serveroutput on
DECLARE

V1....
V2....
BEGIN

  DBMS_OUTPUT.ENABLE( 1000000 );

    USER.PKG.P_PROCEDURE(v1,v2,err_code,err_msg);

   IF err_code !=  CSTE_OK THEN
        dbms_output.put_line('---> ERROR    : '||err_msg);
    END IF;


EXCEPTION
WHEN OTHERS THEN
 dbms_output.put_line('---> ERR CODE   : '||to_char(SQLCODE));
 dbms_output.put_line('---> ERR MSG : '||SUBSTR(SQLERRM, 1, 250));
END;
/
EXIT;