Painful Migration on Midess from D5 to D7

[Hardy LIM]

Hi,

We are trying to migrate our program from D5 to D7,
We use Midess 1.1 (Midas Essential Pack) from Dan Miser and IBX in D7

The same codes that were running for about 10 years on D5 are causing
problem when inserting, update or delete in D7

Program generate error in statement Delta := (IDispatch(AProvider[0])
as IAppServer).AS_ApplyUpdates(AProvider[1], Delta, 0, ErrCount,
OwnerData)

The error message is:
Project Test.exe raised exception class EIBClientError with message
'SQL Parse Error: Parameter name expected'. Process stopped. Use Step
or Run to continue

Please help........!

procedure ApplyDelta(AProvider: OleVariant; var Delta : OleVariant;
Local: Boolean);
var
ErrCount : integer;
OwnerData: OleVariant;
begin
if not VarIsNull(Delta) then
begin
if Local then
// the program control goes to here and causing error
msg....why ?
Delta := (IDispatch(AProvider[0]) as
IAppServer).AS_ApplyUpdates(AProvider[1], Delta, 0, ErrCount,
OwnerData)
else
Delta :=
IAppServerDisp(IDispatch(AProvider[0])).AS_ApplyUpdates(AProvider[1],
Delta, 0, ErrCount, OwnerData);

if ErrCount > 0 then
SysUtils.Abort;
end;
end;