GetEntity (TSDataServiceProviderInfo)
De Wiki1000
(Différences entre les versions)
(Page créée avec « <source lang='delphi'>function GetEntityById(const iClassName:string; const iID:string):TsdataRemoteObjectNP;</source> Cette fonction retrouve une ressource SData identifié… ») |
|||
| (4 révisions intermédiaires par un utilisateur sont masquées) | |||
| Ligne 1 : | Ligne 1 : | ||
| − | <source lang='delphi'>function | + | <source lang='delphi'>function GetEntity(const iClassName:string; const iKey:string):TsdataRemoteObjectNP;</source> |
Cette fonction retrouve une ressource SData identifiée par sa clé unique. | Cette fonction retrouve une ressource SData identifiée par sa clé unique. | ||
| Ligne 8 : | Ligne 8 : | ||
|Une classe d'entité de service distant non persistante. | |Une classe d'entité de service distant non persistante. | ||
|- | |- | ||
| − | | | + | |iKey |
|L'identifiant SData de la ressource à retrouvée | |L'identifiant SData de la ressource à retrouvée | ||
|} | |} | ||
| Ligne 24 : | Ligne 24 : | ||
prv.EndPointURL := 'http://syfre/syfre/server/sdata/syfre/ndfContract/-/'; | prv.EndPointURL := 'http://syfre/syfre/server/sdata/syfre/ndfContract/-/'; | ||
| − | inst := prv. | + | inst := prv.GetEntity('RE_Expense','11CD0000000001D20002000000090002') as RE_expense; |
if Assigned(inst) | if Assigned(inst) | ||
then showMessage('ok') | then showMessage('ok') | ||
| Ligne 36 : | Ligne 36 : | ||
{{Footer|TSDataServiceProviderInfo (class)}} | {{Footer|TSDataServiceProviderInfo (class)}} | ||
| + | [[Category:Stéréotype entité de service distant]] | ||
Version actuelle en date du 15 mars 2013 à 10:04
function GetEntity(const iClassName:string; const iKey:string):TsdataRemoteObjectNP;
Cette fonction retrouve une ressource SData identifiée par sa clé unique.
| iClassName | Une classe d'entité de service distant non persistante. |
| iKey | L'identifiant SData de la ressource à retrouvée |
|
Note : L'identifiant SData de la ressource est la propriété key SData |
Exemple :
var prv:TSDataServiceProviderInfo; inst:RE_Expense; begin prv := TSDataServiceProviderInfo.Create; prv.UserName := 'syfre'; prv.UserPassword := ''; prv.EndPointURL := 'http://syfre/syfre/server/sdata/syfre/ndfContract/-/'; inst := prv.GetEntity('RE_Expense','11CD0000000001D20002000000090002') as RE_expense; if Assigned(inst) then showMessage('ok') else showMessage('not found'); end;
Voir aussi
| Whos here now: Members 0 Guests 1 Bots & Crawlers 0 |
