Type mismatch in expression error in delphi 2010

Question

0.00/5 (No votes)

See more:

In Delphi 2010, when executing the below query, it displays the "Type mismatch in expression" error . But when I run the same query in Interbase, query executed and displaying the records.

Why it is not executing from software??

What I have tried:

Query:

SQL

select distinct 'D' x,76 Dlid, Seqno, DLYear, LTime, SigNo , DSigStatus , DDLCS, DRIGS from DIGDATA76  where DRIGS <> -1 and ((( DLYEAR = 2018) And ( LTime > 756141126) or (DLYEAR > 2018)) and ((DLYEAR = 2018 ) And
( LTime <= 761732473) or ( DLYEAR < 2018))) Union All select distinct 'A' x,76 Dlid, Seqno, DLYear, LTime, ASigNo, ASigno AVoltage, LTime DDLCS, LTime DRIGS from ANGDATA76  where ((( DLYEAR = 2018) And ( LTime > 756141126)
 or (DLYEAR > 2018)) and ((DLYEAR = 2018 ) And ( LTime <= 761732473) or ( DLYEAR < 2018))) Union All select distinct 'M' x,76 Dlid, Seqno, DLYear, LTime, MByte89, MByteAB a, LTime DDLCS, LTIME DRIGS from MDATA76
  where  ((( DLYEAR = 2018) And ( LTime > 756141126) or (DLYEAR > 2018)) and ((DLYEAR = 2018 ) And ( LTime <= 761732473) or ( DLYEAR < 2018))) order by 4, 5, 3

Posted 22-May-18 2:03am

Member 13838888

Updated 22-May-18 2:25am

Patrice T

v3

Add a Solution

Comments

[no name] 22-May-18 8:23am

How do you Access the database from your code?
a.) BDE
b.) FireDAC
c.) dbExpress
d.) ADO?
others?

Member 13838888 22-May-18 8:29am

BDE

[no name] 22-May-18 8:32am

Are you sure that the bde is configured to SQLQRYMODE=SERVERrespectively configure it explicitely and try again.

Member 13838888 23-May-18 3:37am

Can u plz tell me how to set SQLQRYMODE = SERVER??

[no name] 23-May-18 3:41am

I'm sure you now the property Params from TDatabase. You can simply add SQLQRYMODE = SERVER there.

Member 13838888 23-May-18 3:48am

Now it is displaying new error.

Unknown database.
Your user name and password are not defined. Ask your database administrator to set up an InterBase login.
Alias: 180519002

NOTE : Same query executed in Interbase.

[no name] 23-May-18 4:03am

My assumption is you removed the values USER NAME=xyz and PASSWORD=xyz.
You should add the line SQLQRYMODE=SERVER not replace the whole params by this line

Member 13838888 23-May-18 4:50am

RHBkDataBase[SelDBCtr] := TDataBase.Create(RHBkDataBase[SelDBCtr]);
With RHBkDataBase[SelDBCtr] Do
Begin
DatabaseName := SelDblist.Strings [SelDBCtr];
AliasName := SelDblist.Strings [SelDBCtr];
With Params Do
Begin
Add('USER NAME=SYSDBA');
Add('PASSWORD=masterkey');
Add('SQLQRYMODE=SERVER');
End;
LoginPrompt := False;
Connected := True;
NOTE : Previously Databasename not assigned to TQuery. After I assigned the databasename of RHBkDataBase then UnKnown database error displaying.

[no name] 23-May-18 5:07am

You don't specify the database file, something like this: Add('SERVER NAME=c:\temp\MyDB.IB');

Member 13838888 23-May-18 5:40am

with TableList[SelDBCtr] do
begin
cUserName := 'USER NAME=SYSDBA';
cPassWord := 'PASSWORD=masterkey';
Add( 'SERVER NAME='+ConnectDB );
Add( cUserName );
Add( cPassWord );
end;
Session.AddAlias(SelDblist.Strings [SelDBCtr], 'INTRBASE', TableList[SelDBCtr]);
RHBkDataBase[SelDBCtr] := TDataBase.Create(RHBkDataBase[SelDBCtr]);
With RHBkDataBase[SelDBCtr] Do
Begin
DatabaseName := SelDblist.Strings [SelDBCtr];
AliasName := SelDblist.Strings [SelDBCtr];
With Params Do
Begin
Add( 'SERVER NAME='+ConnectDB );
Add('USER NAME=SYSDBA');
Add('PASSWORD=masterkey');
Add('SQLQRYMODE=SERVER');
End;
LoginPrompt := False;
Connected := True;
CreateAndConnectBakUpDb := True;

NOTE : Still same error displaying.

[no name] 23-May-18 6:04am

How you connected you DB until now. It is not Logical for me that you have so much Problem now. Btw. it Looks now that you mix up Alias vs. non Alias

[no name] 22-May-18 10:26am

In your case I would make a small test app.
Test your query using the Interbase components TIBDatabase and TIBQuery. In case you have the same problem again, you know at least it is not the BDE. Otherwhise you Need to find why BDE makes the Problem.

Patrice T 22-May-18 8:23am

This look like SQL

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)