mORMot Open Source

Hello,

I am trying to insert 2 values in a table with 2 columns (+ ID). The columns where the values are to be stored do both have a foreign key relation; both to some other table.

Why does the code below not work?

        in declaration: data: TSQLTable;

        sSQL := 'insert into PatientAppointments (patient_id, appointment_id) values (' +
        IntToStr(aPatient_id) + ', ' + IntToStr(aAppointment_id) + ')';
        data:=Database.ExecuteList([], sSQL);
        Database.Commit();

Please don't tell me to use the function 'ManyAdd' as I do not have columns named Dest and Source....

Regards,
Maurijn

Hello,

I am new to mORMot and have built some code to learn it. But I cannot figure out how to retrieve data sorted when using CreateAndFillPrepare (from a table by using an TSQLRecord).

How can I change the code below to retrieve my data sorted?

In the code below TSQLPatientsis just an TSQLRecord with some properties.

  patients := TSQLPatients.CreateAndFillPrepare(DatabaseClient, '');
  cbListPatients.Clear();
  try
    while patients.FillOne do
    begin
      Inc(iTemp);
      cbListPatients.AddItem(patients.name, Pointer(patients.id));
      cbListPatients.Checked[iTemp]:= (patients.active='y');
    end
  finally
    FreeAndNil(patients);
  end;

I am curious to read the answer...!

Regards,
Maurijn