Firebird: after upgrade from 6.3.14 to 6.4.15 don't find a record that exists.
Posted: Fri 04 Nov 2016 08:40
Hi,
After upgrade from 6.3.14 to 6.4.15 with the same SQL instruction and same database Firebird the
record that exists is not found with TUniQuery component. The code is:
With UniQ_BfSca do
begin
Close;
Prepare;
SQL.Clear;
SQL.Add('SELECT * FROM BFSCA');
SQL.Add('WHERE OTTIPO=:qOTTIPO');
SQL.Add('AND OTANNO=:qOTANNO');
SQL.Add('AND OTNORD=:qOTNORD');
SQL.Add('AND OTNRIG=:qOTNRIG');
SQL.Add('ORDER BY OTTIPO, OTANNO, OTNORD, OTNRIG');
ParamByName('qOTTIPO').AsString := UpperCase(pOTTIPO);
ParamByName('qOTANNO').AsString := UpperCase(pOTANNO);
ParamByName('qOTNORD').AsInteger := pOTNORD;
ParamByName('qOTNRIG').AsInteger := pOTNRIG;
Open;
If RecordCount > 0 then Trova_BfScaR := True;
end;
Why?
Best regards
Giovanna Cellitti.
After upgrade from 6.3.14 to 6.4.15 with the same SQL instruction and same database Firebird the
record that exists is not found with TUniQuery component. The code is:
With UniQ_BfSca do
begin
Close;
Prepare;
SQL.Clear;
SQL.Add('SELECT * FROM BFSCA');
SQL.Add('WHERE OTTIPO=:qOTTIPO');
SQL.Add('AND OTANNO=:qOTANNO');
SQL.Add('AND OTNORD=:qOTNORD');
SQL.Add('AND OTNRIG=:qOTNRIG');
SQL.Add('ORDER BY OTTIPO, OTANNO, OTNORD, OTNRIG');
ParamByName('qOTTIPO').AsString := UpperCase(pOTTIPO);
ParamByName('qOTANNO').AsString := UpperCase(pOTANNO);
ParamByName('qOTNORD').AsInteger := pOTNORD;
ParamByName('qOTNRIG').AsInteger := pOTNRIG;
Open;
If RecordCount > 0 then Trova_BfScaR := True;
end;
Why?
Best regards
Giovanna Cellitti.