Subject | Dialect 3 Problem |
---|---|
Author | Steven Gibb |
Post date | 2002-09-05T19:30:06Z |
I am using IOBjects 3.6 and Delphi 5 Enterprise.
The database server is Firebird 1.0.
In delphi code and stored procedure code that has been stable for several
months I am getting an error in a stored procedure. It happened when I
changed the Dialect from 1 to 3. If I change it back to Dialect 1, the
error goes away.
I want to move the database to Dialect 3 but I can't figure out the source
of this error.
Can anyone suggest a solution?
*******The stored procedure code*************
CREATE PROCEDURE DELETECONTACTTEMP (
EMPLOYEE CHAR (6))
AS
BEGIN
DELETE FROM CONTACTTEMP WHERE EmpID = :EMPLOYEE;
SUSPEND;
END
*******The delphi code*************
with DM_StoredProc.spDelContactTmp do
begin
// insertcontactlabeldata
DatabaseName := gsDataBaseName;
StoredProcName := 'deletecontacttemp';
Prepare;
ParamByName('EMPLOYEE').Value := gsEmpID;
try
ExecProc;
except
on E: Exception do
MessageDlg(rsErrMsg2, mtWarning, [mbOK], 0);
end;
UnPrepare;
end;
*******The error message*************
ISC ERROR CODE:33544569
ISC ERROR MESSAGE:
Dynamic SQL Error
parameter mismatch for procedure DELETECONTACTTEMP
STATEMENT:
TIBOInternalDataset: "spDelContactTmp.IBOqrspDelContactTmp"
The database server is Firebird 1.0.
In delphi code and stored procedure code that has been stable for several
months I am getting an error in a stored procedure. It happened when I
changed the Dialect from 1 to 3. If I change it back to Dialect 1, the
error goes away.
I want to move the database to Dialect 3 but I can't figure out the source
of this error.
Can anyone suggest a solution?
*******The stored procedure code*************
CREATE PROCEDURE DELETECONTACTTEMP (
EMPLOYEE CHAR (6))
AS
BEGIN
DELETE FROM CONTACTTEMP WHERE EmpID = :EMPLOYEE;
SUSPEND;
END
*******The delphi code*************
with DM_StoredProc.spDelContactTmp do
begin
// insertcontactlabeldata
DatabaseName := gsDataBaseName;
StoredProcName := 'deletecontacttemp';
Prepare;
ParamByName('EMPLOYEE').Value := gsEmpID;
try
ExecProc;
except
on E: Exception do
MessageDlg(rsErrMsg2, mtWarning, [mbOK], 0);
end;
UnPrepare;
end;
*******The error message*************
ISC ERROR CODE:33544569
ISC ERROR MESSAGE:
Dynamic SQL Error
parameter mismatch for procedure DELETECONTACTTEMP
STATEMENT:
TIBOInternalDataset: "spDelContactTmp.IBOqrspDelContactTmp"