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

admin

4 F% d9 Z& }9 n4 M& L5 l/ k! m/ E! P/ O
" @8 A8 d( m# ~/ m3 T: ?8 o
Technique  
& o1 \5 Q4 b* G7 bThere is no difference in setting up a query for a single Item or for many.  Only the
  \3 t7 |; F0 R  y) U6 Qcriteria define the set size returned.  In this recipe you create an Item and populate
the query criteria, apply it, and iterating over the Items returned producing a HTML
<TABLE>  fragment.
- V1 b  ?% u, L! R/ {
. l# A2 W, b$ I/ D' l1 q8 L/ a; r
JavaScript  
var qryItem = this.newItem("Part","get");
; x. G1 D6 E: \; F' A6 sqryItem.setAttribute("select","item_number,description,cost");
qryItem.setProperty("cost", "100", "gt");
var results = qryItem.apply();
var count = results.getItemCount();
- U3 ~9 d1 \" ^7 b6 r- rvar content = "<table>";
$ x: @# X1 n4 s% y4 @3 efor (var i=0; i<count; ++i)
{
  var item = results.getItemByIndex(i);
: \# p5 p& e. R% n* }  content += "" +
    "<tr>" +
      "<td>" + item.getProperty("item_number") + "</td>" +
      "<td>" + item.getProperty("description") + "</td>" +
  q7 ^9 C4 H! p% Y2 S      "<td>" + item.getProperty("cost") + "</td>" +
2 O% q5 _  R! j' G* _' H5 G! L9 X    "</tr>";
}
content += "</table>";
+ f6 [1 U0 ?1 o' E0 ureturn content;

! I, K3 t" ^/ j6 G1 _C#  
Item qryItem = this.newItem("Part","get");
qryItem.setAttribute("select","item_number,description,cost");
qryItem.setProperty("cost", "100", "gt");
Item results = qryItem.apply();
) j0 }9 q" t+ K% q, q$ t7 M4 bint count = results.getItemCount();
int i;
; \" T9 O& X* O% ^string content = "<table>";
. j6 S4 n4 k7 ~9 afor (i=0; i<count; ++i)
& r( A* n: S. s1 T9 s{
  Item item = results.getItemByIndex(i);
  content += "" +
    "<tr>" +
0 K% ~) @9 p6 B/ D5 N, j  I$ ?! x      "<td>" + item.getProperty("item_number") + "</td>" +
      "<td>" + item.getProperty("description") + "</td>" +
      "<td>" + item.getProperty("cost") + "</td>" +
$ _% x' R4 E. [8 M$ g# P6 l: L2 K    "</tr>";
}
* S5 o; e1 G, c3 w4 Wcontent += "</table>";
' J5 N9 X8 `6 H. V; O6 l4 EInnovator innovator = this.newInnovator();
return innovator.newResult(content);

# _, m) G9 F' I; I3 X, ?, g! ~7 }" QVB.Net  
# Z. ~, @5 q/ Y! a. E, p* o1 }Dim qryItem As Item = Me.NewItem("Part","get")
9 g* p4 V, n% b% fqryItem.SetAttribute("select","item_number,description,cost")
qryItem.SetProperty("cost", "100", "gt")
$ s; m- q6 J# ~5 Y5 r; }0 e7 PDim results As Item = qryItem.Apply()
Dim count As Integer = results.GetItemCount()
5 y: u, w3 \+ S% E9 }( PDim i As Integer
Dim content As String = "<table>"
For i=0 to count - 1
8 _' _3 H9 `; I" F* a  Dim item As Item = results.GetItemByIndex(i)
! ?* |  n' \! O$ w$ ~1 U0 f  content += "" + _
    "<tr>" + _
      "<td>" + item.GetProperty("item_number") + "</td>" + _
      "<td>" + item.GetProperty("description") + "</td>" + _
: N3 O" T3 p5 q4 {1 Z8 K/ e      "<td>" + item.GetProperty("cost") + "</td>" + _
: o$ _! _1 p: z3 Z* H& @    "</tr>"
Next
5 g5 }' k0 T: A- Ccontent += "</table>"

Dim innovator As Innovator = Me.NewInnovator()
return innovator.NewResult(content)
8 t7 H9 j4 Y" S$ o

* S7 \* f+ c* j$ J5 r4 R  \