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

admin

& C: Q% X6 h4 K5 u  w

Technique  
There is no difference in setting up a query for a single Item or for many.  Only the
6 T! t  {1 H5 d: T* J8 s$ ucriteria define the set size returned.  In this recipe you create an Item and populate
5 x7 K0 F3 M# |' }( q. Lthe query criteria, apply it, and iterating over the Items returned producing a HTML
<TABLE>  fragment.

- w' B& {9 C% h$ r
JavaScript  
var qryItem = this.newItem("Part","get");
qryItem.setAttribute("select","item_number,description,cost");
qryItem.setProperty("cost", "100", "gt");
var results = qryItem.apply();
6 B& p; C  X9 p# {5 ]var count = results.getItemCount();
var content = "<table>";
" s; ]8 b6 [4 x9 Xfor (var i=0; i<count; ++i)
6 V7 x& J. i* f{
  var item = results.getItemByIndex(i);
" U, o5 x& X+ D0 r- D2 D0 F  content += "" +
    "<tr>" +
$ M/ j' o" ]/ |. G      "<td>" + item.getProperty("item_number") + "</td>" +
      "<td>" + item.getProperty("description") + "</td>" +
      "<td>" + item.getProperty("cost") + "</td>" +
    "</tr>";
}
content += "</table>";
return content;

& c+ S6 G% ^! T+ F* Z; y' lC#  
2 U+ ]+ E) F' V! x- m4 S8 zItem qryItem = this.newItem("Part","get");
qryItem.setAttribute("select","item_number,description,cost");
. Y3 u7 J$ q+ Q& A6 kqryItem.setProperty("cost", "100", "gt");
Item results = qryItem.apply();
- i# u" ^/ \9 l& E/ n, ~& Uint count = results.getItemCount();
- E) r% ]3 V. i/ ~: `: ~int i;
5 X! O" _* K  \/ qstring content = "<table>";
for (i=0; i<count; ++i)
1 ~0 O! R+ o. V4 m2 B{
  Item item = results.getItemByIndex(i);
  content += "" +
    "<tr>" +
      "<td>" + item.getProperty("item_number") + "</td>" +
" ^3 G8 |- r0 ]2 M      "<td>" + item.getProperty("description") + "</td>" +
6 ^/ Y4 @/ R( s. Y# b1 s" g7 b      "<td>" + item.getProperty("cost") + "</td>" +
    "</tr>";
7 r  f1 Z. Q7 b& T% G}
/ W; ^  j  t0 z" b( Y- b8 J" @) ~1 acontent += "</table>";
Innovator innovator = this.newInnovator();
return innovator.newResult(content);
; t! A( r5 z9 X% ^4 j; N2 [
) u4 L& x2 L1 K2 ~VB.Net  
Dim qryItem As Item = Me.NewItem("Part","get")
# ]$ ?* i/ v3 F+ u4 j4 hqryItem.SetAttribute("select","item_number,description,cost")
qryItem.SetProperty("cost", "100", "gt")
Dim results As Item = qryItem.Apply()
Dim count As Integer = results.GetItemCount()
Dim i As Integer
Dim content As String = "<table>"
5 o$ H" C- p' g" v, V$ \For i=0 to count - 1
! T* Z( k) c8 Y- _& Z% T5 H/ H  Dim item As Item = results.GetItemByIndex(i)
  content += "" + _
$ l) W1 B9 t+ Y! i, |    "<tr>" + _
7 h0 I# L7 `0 p- T      "<td>" + item.GetProperty("item_number") + "</td>" + _
9 Y) x  _7 A- x0 w# j      "<td>" + item.GetProperty("description") + "</td>" + _
      "<td>" + item.GetProperty("cost") + "</td>" + _
5 A" g- B, k; T& e6 i6 Z    "</tr>"
Next
) K% _% U/ L. G& q  jcontent += "</table>"

& [: Y" {5 s! fDim innovator As Innovator = Me.NewInnovator()
. F, H% d% A6 p. hreturn innovator.NewResult(content)
0 B9 X/ ?) p7 l/ s2 O
) m+ {% @0 S+ ]