https://frp.sage.fr/wiki1000/index.php?title=PutEntity_(TSDataServiceProviderInfo)&feed=atom&action=history
PutEntity (TSDataServiceProviderInfo) - Historique des versions
2024-03-29T05:36:25Z
Historique pour cette page sur le wiki
MediaWiki 1.18.6
https://frp.sage.fr/wiki1000/index.php?title=PutEntity_(TSDataServiceProviderInfo)&diff=6723&oldid=prev
Syfre le 15 mars 2013 à 08:04
2013-03-15T08:04:04Z
<p></p>
<table class='diff diff-contentalign-left'>
<col class='diff-marker' />
<col class='diff-content' />
<col class='diff-marker' />
<col class='diff-content' />
<tr valign='top'>
<td colspan='2' style="background-color: white; color:black;">← Version précédente</td>
<td colspan='2' style="background-color: white; color:black;">Version du 15 mars 2013 à 08:04</td>
</tr><tr><td colspan="2" class="diff-lineno">Ligne 49 :</td>
<td colspan="2" class="diff-lineno">Ligne 49 :</td></tr>
<tr><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"></td><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"></td></tr>
<tr><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"><div>{{Footer|TSDataServiceProviderInfo (class)}}</div></td><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"><div>{{Footer|TSDataServiceProviderInfo (class)}}</div></td></tr>
<tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div><ins style="color: red; font-weight: bold; text-decoration: none;">[[Category:Stéréotype entité de service distant]]</ins></div></td></tr>
</table>
Syfre
https://frp.sage.fr/wiki1000/index.php?title=PutEntity_(TSDataServiceProviderInfo)&diff=5100&oldid=prev
Syfre le 9 mai 2011 à 12:12
2011-05-09T12:12:30Z
<p></p>
<table class='diff diff-contentalign-left'>
<col class='diff-marker' />
<col class='diff-content' />
<col class='diff-marker' />
<col class='diff-content' />
<tr valign='top'>
<td colspan='2' style="background-color: white; color:black;">← Version précédente</td>
<td colspan='2' style="background-color: white; color:black;">Version du 9 mai 2011 à 12:12</td>
</tr><tr><td colspan="2" class="diff-lineno">Ligne 14 :</td>
<td colspan="2" class="diff-lineno">Ligne 14 :</td></tr>
<tr><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"></td><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"></td></tr>
<tr><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"><div><source lang="delphi"></div></td><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"><div><source lang="delphi"></div></td></tr>
<tr><td class='diff-marker'>−</td><td style="background: #ffa; color:black; font-size: smaller;"><div>var <del class="diffchange diffchange-inline">data</del>:<del class="diffchange diffchange-inline">remoteEntity</del>;</div></td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div>var <ins class="diffchange diffchange-inline">prv</ins>:<ins class="diffchange diffchange-inline">TSDataServiceProviderInfo; inst:RE_Expense; aReason:string</ins>;</div></td></tr>
<tr><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"><div>begin</div></td><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"><div>begin</div></td></tr>
<tr><td class='diff-marker'>−</td><td style="background: #ffa; color:black; font-size: smaller;"><div><del style="color: red; font-weight: bold; text-decoration: none;">  // create an instance of sdata service provider</del></div></td><td colspan="2"> </td></tr>
<tr><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"><div>   prv := TSDataServiceProviderInfo.Create;</div></td><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"><div>   prv := TSDataServiceProviderInfo.Create;</div></td></tr>
<tr><td class='diff-marker'>−</td><td style="background: #ffa; color:black; font-size: smaller;"><div>   prv.UserName := <del class="diffchange diffchange-inline">userName</del>;</div></td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div>   prv.UserName := <ins class="diffchange diffchange-inline">'syfre'</ins>;</div></td></tr>
<tr><td class='diff-marker'>−</td><td style="background: #ffa; color:black; font-size: smaller;"><div>   prv.UserPassword := <del class="diffchange diffchange-inline">jeton</del>;  </div></td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div>   prv.UserPassword := <ins class="diffchange diffchange-inline">''</ins>;</div></td></tr>
<tr><td class='diff-marker'>−</td><td style="background: #ffa; color:black; font-size: smaller;"><div>   prv.EndPointURL := <del class="diffchange diffchange-inline">endpoint</del>;</div></td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div>   prv.EndPointURL := <ins class="diffchange diffchange-inline">'http://syfre/syfre/server/sdata/syfre/ndfContract/-/'</ins>;</div></td></tr>
<tr><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"></td><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"></td></tr>
<tr><td class='diff-marker'>−</td><td style="background: #ffa; color:black; font-size: smaller;"><div>   <del class="diffchange diffchange-inline">// Update an entity</del></div></td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div>   <ins class="diffchange diffchange-inline">aReason := Format('expense du %s',[FormatDatetime('c',Now)]);</ins></div></td></tr>
<tr><td class='diff-marker'>−</td><td style="background: #ffa; color:black; font-size: smaller;"><div>   <del class="diffchange diffchange-inline">//</del></div></td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div> </div></td></tr>
<tr><td class='diff-marker'>−</td><td style="background: #ffa; color:black; font-size: smaller;"><div>   <del class="diffchange diffchange-inline">data </del>:= prv.<del class="diffchange diffchange-inline">GetEntity</del>('<del class="diffchange diffchange-inline">remoteEntity</del>','<del class="diffchange diffchange-inline">id</del>=%1',[<del class="diffchange diffchange-inline">remoteID</del>]);</div></td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div>   <ins class="diffchange diffchange-inline">inst := RE_Expense.Create;</ins></div></td></tr>
<tr><td class='diff-marker'>−</td><td style="background: #ffa; color:black; font-size: smaller;"><div>   <del class="diffchange diffchange-inline">data</del>.<del class="diffchange diffchange-inline">someProperty :</del>= <del class="diffchange diffchange-inline">newValue;</del></div></td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div>   <ins class="diffchange diffchange-inline">inst.reason </ins>:= <ins class="diffchange diffchange-inline">aReason;</ins></div></td></tr>
<tr><td class='diff-marker'>−</td><td style="background: #ffa; color:black; font-size: smaller;"><div><del class="diffchange diffchange-inline">  prv</del>.<del class="diffchange diffchange-inline">putEntity</del>(<del class="diffchange diffchange-inline">data</del>);</div></td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div><ins class="diffchange diffchange-inline">  inst.dateExpense := Now;</ins></div></td></tr>
<tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div><ins class="diffchange diffchange-inline">  inst.quantity := 1;</ins></div></td></tr>
<tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div><ins class="diffchange diffchange-inline">  inst.status.AsVariant := RE_NDF_STATUS_DRAFT;</ins></div></td></tr>
<tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div><ins class="diffchange diffchange-inline">  </ins>prv.<ins class="diffchange diffchange-inline">PostEntity(inst);</ins></div></td></tr>
<tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div> </div></td></tr>
<tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div><ins class="diffchange diffchange-inline">  inst.quantity := 2;</ins></div></td></tr>
<tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div><ins class="diffchange diffchange-inline">  prv.PutEntity(inst);</ins></div></td></tr>
<tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div> </div></td></tr>
<tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div><ins class="diffchange diffchange-inline">  inst := prv.GetEntityWhere</ins>('<ins class="diffchange diffchange-inline">RE_Expense</ins>','<ins class="diffchange diffchange-inline">reason</ins>=%1<ins class="diffchange diffchange-inline">','dateExpense</ins>',[<ins class="diffchange diffchange-inline">aReason</ins>]) <ins class="diffchange diffchange-inline">as RE_expense</ins>;</div></td></tr>
<tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div>   <ins class="diffchange diffchange-inline">if Assigned(inst) then</ins></div></td></tr>
<tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div><ins class="diffchange diffchange-inline">  begin</ins></div></td></tr>
<tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div><ins class="diffchange diffchange-inline">    if inst</ins>.<ins class="diffchange diffchange-inline">quantity</ins>=<ins class="diffchange diffchange-inline">2</ins></div></td></tr>
<tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div><ins class="diffchange diffchange-inline">      then showMessage('udate ok')</ins></div></td></tr>
<tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div><ins class="diffchange diffchange-inline">      else showMessage(Format('update failed (quantity=%0</ins>.<ins class="diffchange diffchange-inline">2f)',[inst.quantity]));</ins></div></td></tr>
<tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div><ins class="diffchange diffchange-inline">  end</ins></div></td></tr>
<tr><td colspan="2"> </td><td class='diff-marker'>+</td><td style="background: #cfc; color:black; font-size: smaller;"><div><ins class="diffchange diffchange-inline">  else showMessage</ins>(<ins class="diffchange diffchange-inline">'not found after update'</ins>);</div></td></tr>
<tr><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"><div>end;</div></td><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"><div>end;</div></td></tr>
<tr><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"><div></source></div></td><td class='diff-marker'> </td><td style="background: #eee; color:black; font-size: smaller;"><div></source></div></td></tr>
</table>
Syfre
https://frp.sage.fr/wiki1000/index.php?title=PutEntity_(TSDataServiceProviderInfo)&diff=5082&oldid=prev
Syfre : a renommé PutEntity (sdata) en PutEntity (TSDataServiceProviderInfo)
2011-05-06T11:21:53Z
<p>a renommé <a href="/wiki1000/index.php/PutEntity_(sdata)" class="mw-redirect" title="PutEntity (sdata)">PutEntity (sdata)</a> en <a href="/wiki1000/index.php/PutEntity_(TSDataServiceProviderInfo)" title="PutEntity (TSDataServiceProviderInfo)">PutEntity (TSDataServiceProviderInfo)</a></p>
<table class='diff diff-contentalign-left'>
<tr valign='top'>
<td colspan='1' style="background-color: white; color:black;">← Version précédente</td>
<td colspan='1' style="background-color: white; color:black;">Version du 6 mai 2011 à 11:21</td>
</tr></table>
Syfre
https://frp.sage.fr/wiki1000/index.php?title=PutEntity_(TSDataServiceProviderInfo)&diff=5079&oldid=prev
Syfre : Page créée avec « <source lang='delphi'>procedure putEntity(data:TitObject);</source> Cette fonction met à jour une ressource en effectuant un HTTP PUT de l'entité sur le Service SData. {|… »
2011-05-06T10:08:28Z
<p>Page créée avec « <source lang='delphi'>procedure putEntity(data:TitObject);</source> Cette fonction met à jour une ressource en effectuant un HTTP PUT de l'entité sur le Service SData. {|… »</p>
<p><b>Nouvelle page</b></p><div><source lang='delphi'>procedure putEntity(data:TitObject);</source><br />
<br />
Cette fonction met à jour une ressource en effectuant un HTTP PUT de l'entité sur le Service SData.<br />
<br />
{|class="wikitable"<br />
|-<br />
|data<br />
|Un objet de type [[Classe entité de service distant non persistante (stereotype)|classe d'entité de service distant non persistant]].<br />
|}<br />
<br />
{{info|En cas d'erreur cette méthode lève une exception et le code de retour et le message correspondant peuvent être obtenu dans lastResultCode et lastResultText }}<br />
<br />
Exemple :<br />
<br />
<source lang="delphi"><br />
var data:remoteEntity;<br />
begin<br />
// create an instance of sdata service provider<br />
prv := TSDataServiceProviderInfo.Create;<br />
prv.UserName := userName;<br />
prv.UserPassword := jeton; <br />
prv.EndPointURL := endpoint;<br />
<br />
// Update an entity<br />
//<br />
data := prv.GetEntity('remoteEntity','id=%1',[remoteID]);<br />
data.someProperty := newValue;<br />
prv.putEntity(data);<br />
end;<br />
</source><br />
<br />
Voir aussi<br />
<br />
*[[Classe entité de service distant non persistante (stereotype)|Classe entité de service distant non persistant]]<br />
<br />
{{Footer|TSDataServiceProviderInfo (class)}}</div>
Syfre