mORMot Open Source

Thanks, but another Error popped up: File not found: 'Windows.dcu'

This error is shown under 'SynCrossPlatformSpecific' class.

Now I have removed mORMotHttpClient and using only SynCrossPlatformREST.

Any suggestions?

I mean, at the runtime if I need to fetch data from a different table for different purpose.

I didn't mean JOIN, anyhow I need to use JOIN function for later purposes. Thanks for your references, I will also look into those links.

Example Server side source code:

 aModel := fetchModel; // TSQL Record Class for fetching data from 'Row1' table.
 VirtualTableExternalRegister(aModel, TRow, aProps, 'Row1');
    aModel.Props[TRow].ExternalDB.MapField('ID','IDNo');
    try
      aRestServer := TSQLRestServerDB.Create(aModel,':memory:',false); 

In the above code, I am using a 'fetchModel' TSQLRecord Class for fetching data from a 'Row1' table. If I need to use another TSQLRecord Class like 'createModel' from a 'Package1' table for different purpose, what I need to do?

Kindly let me know, if I am not clear with my question.

Thanks in advance.

@Admin: Thanks for your quick reply. It works like a charm now. And your new HTML documentation is much comfortable than the PDF, well done work

@Admin: Now I have found the exact problem of not fetching from the existing table.

Problem:
In my existing table I don't have the Column name 'ID', which the REST server is expecting. While debugging in the Server side, I got to know this problem.

Question:
Can't we have a table without an 'ID' column (which is automatically created by TSQLRecord in a REST Model)?  If so, how could I do it?

Thanks in advance.

Thanks for your reply. I am using the latest 1.18 nightly build version of the source code.

In the IDE debugger, it says JSON Format is False and I couldn't see computed SQL and JSON.

Problem:
For your information, the Table which I am accessing is not created through mORMot (REST Model). It means I am trying to access the existing Table (which I have created manually) from my DB.

Working Scenario:
If I am retrieving a Table record which is created through mORMot (REST Model), then I can retrieve those table records.

Kindly let me know if I am confusing or you couldn't understand. Thanks in advance.

Thanks @DigDriver, it works now

Sorry, I was confused between the REST Server and MSSQL Server in that part.

Actually, now I am following the Sample 28. But I got an error 'A connection with the server could not be established'.

Code where the program breaks:

While debugging, the program breaks in the mORMot unit which follows

function TSQLRestClientURI.EngineAdd(TableModelIndex: integer;
  const SentData: RawUTF8): integer;
var P: PUTF8Char;
    url, Head: RawUTF8;
begin
  result := 0;
  url := Model.URI[Model.Tables[TableModelIndex]];
  if URI(url,'POST',nil,@Head,@SentData).Lo<>HTML_CREATED then
    exit; // response must be '201 Created'

In the above code 'url' value is 'root/TRecord' and '@SentData' value is '{'JSON values of my TRecord'}'

And to be more detailed about this error code is followed,

function TSQLRestClientURI.ServerTimeStampSynchronize: boolean;
var status: integer;
    aResp: RawUTF8;
begin
  fServerTimeStampOffset := 0.0001; // avoid endless recursive call
  status := CallBackGet('TimeStamp',[],aResp);      // exactly on this line the error throws

I could only find where was the error, but don't know exactly what the error was?

Let me know if you couldn't understand anywhere in this question.

Thanks in advance.

Thanks for your reply. I have changed as you said, but now the problem with HttpSetServiceConfiguration.

Error: project raised exception class EHttpApiServer with message 'HttpSetServiceConfiguration failed: The parameter is incorrect (87)'.

The coding part is:
 
  aHttpServer: TSQLHttpServer;
  aHttpServer := TSQLHttpServer.Create(SERVER_PORT,[aRestServer],'+',useHttpApiRegisteringURI);

Here SERVER_PORT:= 888 and aRestServer:= TSQLRestServerDB.Create(aModel,':memory:',false);

Thanks in advance.

@ChinaPeng: Thanks for your reply. I have another question, but I don't know whether it's a stupid question.

Question: How could I access the MSSQL local database in localhost or 127.0.0.1?

I have enabled tcp protocol(port: 1433) in mssql server configurations and mssql server is running perfectly. But I don't know how to access it in a localhost or 127.0.0.1.

@Admin: Thanks and I am using TOleDBConnectionProperties as defined in SynOleDB.pas in my application. Can you also answer my above mentioned question if possible.

Thanks in advance.

Ok! Thanks, I will let you know if it works.