#############################################################################
# Original Author: JBM                                                      #
# Original Date: Aug/15/2005                                                #
# Updated: 08/29/2005 Remove sleeps                                         #
#############################################################################
# TEST: SP that creates table, starts tranaction inserts. Save point, insert#
#       rollback to save point and then commits.                            #
#############################################################################
# Includes
-- source include/have_binlog_format_row.inc
-- source include/master-slave.inc

# Begin clean up test section
connection master;
--disable_warnings
DROP PROCEDURE IF EXISTS test.p1;
DROP TABLE IF EXISTS test.t1;
--enable_warnings
# End of cleanup

# Begin test section 1
delimiter |;
eval CREATE PROCEDURE test.p1(IN i INT)
BEGIN
  DECLARE CONTINUE HANDLER FOR sqlexception BEGIN END;
  DROP TABLE IF EXISTS test.t1;
  CREATE TABLE test.t1 (num INT,PRIMARY KEY(num))ENGINE=$engine_type;
  START TRANSACTION;
    INSERT INTO test.t1 VALUES(i);
    savepoint t1_save;
    INSERT INTO test.t1 VALUES (14);
    ROLLBACK to savepoint t1_save;
    COMMIT;
END|
delimiter ;|

let $message=< ---- Master selects-- >;
--source include/show_msg.inc
CALL test.p1(12);
SELECT * FROM test.t1;


let $message=< ---- Slave selects-- >;
--source include/show_msg.inc
save_master_pos;
connection slave;
sync_with_master;
SELECT * FROM test.t1;

let $message=< ---- Master selects-- >;
--source include/show_msg.inc
connection master;
CALL test.p1(13);
SELECT * FROM test.t1;

let $message=< ---- Slave selects-- >;
--source include/show_msg.inc
save_master_pos;
connection slave;
sync_with_master;
SELECT * FROM test.t1;

connection master;
#show binlog events;


DROP PROCEDURE IF EXISTS test.p1;
DROP TABLE IF EXISTS test.t1;

# End of 5.0 test case
