Publishing Aurelius objects through webservice

BIZ TMS Aurelius
1

I have buildt a DataSnap server With TMS Aurelius. In itself it Works fine. I have a single Class in my model:



type



[Entity]

[Automapping]

TPerson = class

private

    FId: integer;

    FLastName: string;

    FFirstName: string;

    FEmail: string;

public

    Constructor Create; overload;

    property Id: integer read FId;

    property LastName: string read FLastName write FLastName;

    property FirstName: string read FFirstName write FFirstName;

    property Email: string read FEmail write FEmail;

end;





The datasnap is being called by a webservice dll, which again is called remotely by a forms Application.



Now, to get this Object visible in the Client end, i need to do 2 Things:

- Set the TPerson class to inherit from TRemotable

- Set all Properties to be 'published'.



So I end up With this class:

type



[Entity]

[Automapping]

TPerson = class(TRemotable)

private

    FId: integer;

    FLastName: string;

    FFirstName: string;

    FEmail: string;

published

    Constructor Create; overload;

    property Id: integer read FId;

    property LastName: string read FLastName write FLastName;

    property FirstName: string read FFirstName write FFirstName;

    property Email: string read FEmail write FEmail;

end;



But now, in the datasnap, when i do

p := manager.Find<TPerson>(lID);



i get an error saying that the class TRemotable does not have a property named "Id". Looks like TMS Aurelius expects this to be a Public property.



Any input on how to Access these classes through the web service?

2

Hi Jordan,

this is indeed an issue we Aurelius, we could reproduce here and confirm. We have already made a fix, please contact through private support e-mail so we can send you a patch, thanks.
3

Ok, great! I'll be requesting this by mail, thanks for your reply.