Ошибка выполнения запроса

[Maks57]

Работаю с MS SQL 2000
есть хранимая процедура:

CREATE PROCEDURE nstage
@ccode int,
@snum int,
@empnum int,
@stitle varchar(30),
@title varchar(100),
@cont varchar(1000),
@sdate datetime,
@edate datetime,
@surname varchar(15)
AS
SET DATEFORMAT DMY
SET @snum=(SELECT Stages.Stage_num FROM Stages WHERE Stages.Stage_title=@stitle)
SET @empnum=(SELECT Employees.Employee_num FROM Employees WHERE Employees.Surname=@surname)
INSERT INTO Contract_Stages(Contract_code, Stage_num, Employee_num, Title, Content, Start_date, End_date)
VALUES (@ccode, @snum, @empnum, @title, @cont, @sdate, @edate)
GO

и код в делфи, по которому она выполняется:

 DM.ProcNStage.Active:=false;
 DM.ProcNStage.Parameters.ParamByName('@stitle').Value:=CBStages.Text;
 DM.ProcNStage.Parameters.ParamByName('@surname').Value:=CBExec.Text;

 DM.ProcNStage.Parameters.ParamByName('@ccode').Value:=DM.DSVContracts.DataSet.FieldByName('Contract_code').Value;;
 DM.ProcNStage.Parameters.ParamByName('@title').Value:=ETitle.Text;
 DM.ProcNStage.Parameters.ParamByName('@cont').Value:=MCom.Lines.Text;
 DM.ProcNStage.Parameters.ParamByName('@sdate').Value:=DTPStart.Date;
 DM.ProcNStage.Parameters.ParamByName('@edate').Value:=DTPEnd.Date;

 DM.ProcNStage.ExecProc;

при выполнении возникает ошибка Error converting data type varchar to datetime.
как только не мучался с форматами даты, ничего не выходит..подскажите, пожалуйста, как быть