Please add
function TObjectManager.FindSql(aSql: string): TCriteria;
begin
Result := Find;
Result.Sql := aSql;
end;
TCriteria = class
...
property Sql: string read FSql write FSql;
function TSelecter.ExecuteSelectSome(Command: TSelectCommand;
...
begin
...
if ACriteria.Sql <> '' then
Sql := ACriteria.Sql
else
Sql := SQLGenerator.GenerateSelect(Command);
...
So it will be possible to load entities from arbitrary queries ( stored procedures adn functions included )
and it will be possible to use Aurelius also to create data analysis objects or complex calculation objects
TIA