【Aras二次开发】查询和迭代查找item集

admin

& ~# V. ~5 p* q$ p' r. q% u
Technique  
+ Z5 \4 T/ e& V) m# T$ D6 _8 yThere is no difference in setting up a query for a single Item or for many.  Only the
! N! o$ o% z5 g! F: [criteria define the set size returned.  In this recipe you create an Item and populate
2 S" u4 L8 L+ R5 F. L* Pthe query criteria, apply it, and iterating over the Items returned producing a HTML
<TABLE>  fragment.
( t5 K+ k" x) R8 Z) @7 x

& [: r- q. L. N" ~; fJavaScript  
var qryItem = this.newItem("Part","get");
qryItem.setAttribute("select","item_number,description,cost");
qryItem.setProperty("cost", "100", "gt");
" h! n! U$ d/ H$ v7 _1 mvar results = qryItem.apply();
var count = results.getItemCount();
1 v' M& }2 Y+ J. k* a8 Lvar content = "<table>";
for (var i=0; i<count; ++i)
{
, D# ^& I3 L9 F0 p: p+ p6 z2 Z  var item = results.getItemByIndex(i);
  content += "" +
- W, }+ K0 ~5 e3 C    "<tr>" +
, ?3 q7 {0 s( L* m  D2 w6 E5 |1 X" w      "<td>" + item.getProperty("item_number") + "</td>" +
- b5 N1 E  V- T& o" R      "<td>" + item.getProperty("description") + "</td>" +
      "<td>" + item.getProperty("cost") + "</td>" +
    "</tr>";
) p9 }$ ]3 Y9 y( n- i; Y9 E  o, Q}
content += "</table>";
return content;

C#  
* r- N- J8 N+ z0 w+ R0 ^Item qryItem = this.newItem("Part","get");
3 u% B! J. @% f& C# l6 A$ B  UqryItem.setAttribute("select","item_number,description,cost");
* A7 l4 v" N8 T3 v/ S# JqryItem.setProperty("cost", "100", "gt");
Item results = qryItem.apply();
% p' w- [; i/ |int count = results.getItemCount();
int i;
" [# j6 M% E5 @$ h; u2 c0 Y; ^string content = "<table>";
for (i=0; i<count; ++i)
5 `8 z. ^7 z; o  v* H2 E4 S{
  Item item = results.getItemByIndex(i);
  content += "" +
    "<tr>" +
      "<td>" + item.getProperty("item_number") + "</td>" +
. ^, m, T% K6 ]8 A- N( T      "<td>" + item.getProperty("description") + "</td>" +
      "<td>" + item.getProperty("cost") + "</td>" +
    "</tr>";
. M( u4 J- r" ~; S}
content += "</table>";
' g1 I/ f6 z% s4 `" ZInnovator innovator = this.newInnovator();
return innovator.newResult(content);
, \& M# N2 s: I2 ^" L+ `7 |
VB.Net  
Dim qryItem As Item = Me.NewItem("Part","get")
  I# b) v7 c% E& c, B9 cqryItem.SetAttribute("select","item_number,description,cost")
* e8 t  }% I: a2 `+ hqryItem.SetProperty("cost", "100", "gt")
Dim results As Item = qryItem.Apply()
5 |; i2 J  x% y$ @Dim count As Integer = results.GetItemCount()
Dim i As Integer
7 K: x) n. K! [! ]Dim content As String = "<table>"
For i=0 to count - 1
2 b0 ~/ M! {% j: B  Dim item As Item = results.GetItemByIndex(i)
  content += "" + _
* ]6 L4 H( S! e6 A3 _. h    "<tr>" + _
      "<td>" + item.GetProperty("item_number") + "</td>" + _
      "<td>" + item.GetProperty("description") + "</td>" + _
      "<td>" + item.GetProperty("cost") + "</td>" + _
4 t0 k% w! k6 m1 O    "</tr>"
8 V  O5 K' J9 j. }& L4 Y- VNext
content += "</table>"
& W/ U" k" [3 I) w
7 E9 ^# |7 `) U: T4 @/ _, u2 x! GDim innovator As Innovator = Me.NewInnovator()
return innovator.NewResult(content)