delimiter @@
	create procedure abgleich()
		begin
		declare i int;
		declare x int;
		declare z int;
		set i=0;
		set x=(Select max(einkauf_id) as menge from kassenbon);
		set z=(select count(einkauf_id) as anzahl from kassenbon where einkauf_id=(select max(einkauf_id) as m from kassenbon));
		myloop: REPEAT
			update bestand
			set bestand.menge=bestand.menge+kassenbon.menge
			where bestand.artikel=kassenbon.artikel_id and kassenbon.einkauf_id=x;
			set i=i+1;
		UNTIL i>=z
		END REPEAT;
		End;
		@@
DELIMITER ;