FillWithDASQL error

Data Abstract
1

Hi,
I applied the following SQL statement that return “field not found”. How to solve it? I need to use same field to handle DBLookupCombo because it has multiple language description.

SELECT SDC_guid, SDC_code, SDC_CHSDesc AS DeptDesc FROM SampleDepartment

2

Hi,

Can you show declaration of SampleDepartment in schema modeller, pls?

3

Hi,
Are you need this?

image
image829×691 56.4 KB

4

Logged as bugs://D19266.

5

Hi,

I can reproduce that AS keyword doesn’t work as expected

6

Hi,

update uDASQLQueryProcessor.pas as

procedure TQueryProcessor.VisitSelect(action: TSelectAction);
...
        list.Add(s);
        action.ResultTable.Fields[i].SQLOrigin :=s;
        action.ResultTable.Fields[i].Name := s;  // <<<<< added
7

bugs://D19266 was closed as fixed.

8

Hi,
I added your suggestion and recompile all files (includes my application). But it also can’t show the correct field name.

9

Hi,

odd. it works on my side:

untitled
untitled885×524 40.5 KB

can you create a simple testcase, pls?
you can drop email to support@ for keeping privacy

10

Hi,
I’m not doing in Schema Modeler. It is using in client side.

DASQL3 := ‘SELECT SDC_guid, SDC_code, SDC_CHSDesc AS DeptDesc FROM SampleDepartment’;
ClientDataModule.RemoteDataAdapter.FillWithDASql([SMPDept], [DASQL3], [nil]);

11

Hi,

the issue was that sql like SELECT SDC_guid, SDC_code, SDC_CHSDesc AS DeptDesc FROM SampleDepartment returned 3 fields :

  • SDC_guid
  • SDC_code
  • SDC_CHSDesc instead of DeptDesc

now it should return DeptDesc as 3rd field.

Have you caught another issue? in DA SQL itself?

12

Hi,
I got the different result with you.

image
image1029×505 149 KB

13

Hi,

try to close Delphi IDE and launch C:\Program Files (x86)\RemObjects Software\Build\install_DA.cmd with admin rights.

it should rebuild .dcu, .dcp and .bpl

14

Hi,
I tried your suggestion and then rebuild all DA and client. The result is the same that can’t show the correct field name.

15

Hi,
I created the simple testcase by email. Please check it.

16

Hi,

you can update field’s DisplayLabel too as

procedure TQueryProcessor.VisitSelect(action: TSelectAction);
...
        list.Add(s);
        action.ResultTable.Fields[i].SQLOrigin :=s;
        if action.ResultTable.Fields[i].DisplayLabel = action.ResultTable.Fields[i].Name then  // added
          action.ResultTable.Fields[i].DisplayLabel := s; //added
        action.ResultTable.Fields[i].Name := s;           //added
17

Hi,
I tested it works fine. Thanks a lot. Does it include in next version?

18

Hi,

of course