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

admin

9 R$ t# Z! a: z2 Z


Technique  
$ @' Z  O0 l; A( hThere is no difference in setting up a query for a single Item or for many.  Only the
( A. n& L( e( }- l7 Ncriteria 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
+ F1 {/ A7 K& l- ]$ y<TABLE>  fragment.
2 d$ |% S1 L; F- }! m. q# C
+ s7 C$ F  J0 K2 c! y; @7 W1 G
7 P' \1 g0 w4 ]% p% X+ }- ^4 FJavaScript  
var qryItem = this.newItem("Part","get");
/ z) s4 H5 i$ G, t( B) e8 K) h5 vqryItem.setAttribute("select","item_number,description,cost");
qryItem.setProperty("cost", "100", "gt");
var results = qryItem.apply();
2 k( G) t; D6 O  i7 C4 qvar count = results.getItemCount();
" @; y- `( i' Z8 avar content = "<table>";
$ W4 e  |; F6 r" Lfor (var i=0; i<count; ++i)
{
' X! Z% |( b; S. f+ |  K  [; U  var item = results.getItemByIndex(i);
5 G& p3 [( |, t  e& x  content += "" +
    "<tr>" +
      "<td>" + item.getProperty("item_number") + "</td>" +
: ]# n! N0 x# Z, @; ]      "<td>" + item.getProperty("description") + "</td>" +
      "<td>" + item.getProperty("cost") + "</td>" +
    "</tr>";
}
& B1 N' Z5 f" @+ T+ _content += "</table>";
return content;

( j! E8 Q6 @( W, k2 VC#  
Item qryItem = this.newItem("Part","get");
qryItem.setAttribute("select","item_number,description,cost");
qryItem.setProperty("cost", "100", "gt");
Item results = qryItem.apply();
int count = results.getItemCount();
int i;
1 o/ U2 t8 L! ^. b9 Ostring content = "<table>";
for (i=0; i<count; ++i)
{
( h; i: g% H) k* T4 b6 W  Item item = results.getItemByIndex(i);
  content += "" +
. m% S( A/ g9 W    "<tr>" +
7 I# n  l. }) `+ B  F      "<td>" + item.getProperty("item_number") + "</td>" +
* f$ h9 N5 m# j' D6 w+ z. Z5 A$ n      "<td>" + item.getProperty("description") + "</td>" +
# w4 s. ?! ~- i' r0 u% J. V9 i  B' K$ J      "<td>" + item.getProperty("cost") + "</td>" +
% i, E4 _) o1 a9 g# k" Q2 z$ X    "</tr>";
}
" \5 U$ z- r$ ~% p" econtent += "</table>";
% L( a6 [. [8 O7 N' qInnovator innovator = this.newInnovator();
return innovator.newResult(content);
7 ^! a% ^1 d" i  c' B0 r6 B" j& J  P( g
VB.Net  
# L  Q$ V4 H4 d2 Q+ U! ]+ GDim qryItem As Item = Me.NewItem("Part","get")
qryItem.SetAttribute("select","item_number,description,cost")
0 H, u9 M8 {* }9 QqryItem.SetProperty("cost", "100", "gt")
+ F/ j3 F: [, H) y: ]  |8 i3 LDim results As Item = qryItem.Apply()
% f8 Q1 }9 a; I3 nDim count As Integer = results.GetItemCount()
Dim i As Integer
/ e! _" ~3 p) A, jDim content As String = "<table>"
For i=0 to count - 1
7 B- E5 n( p9 V2 ~) [  Dim item As Item = results.GetItemByIndex(i)
  content += "" + _
, x' O0 C  m8 k) O$ a. P( I2 d    "<tr>" + _
+ T: E+ W6 O$ P8 f; U; V      "<td>" + item.GetProperty("item_number") + "</td>" + _
: ^( J- F: g) Y! A0 h/ N( t0 _0 L. c      "<td>" + item.GetProperty("description") + "</td>" + _
5 O& e0 X0 G4 P& N- l      "<td>" + item.GetProperty("cost") + "</td>" + _
    "</tr>"
Next
& a  K' E1 u( m! bcontent += "</table>"
, l) ]& W- T7 J* P
Dim innovator As Innovator = Me.NewInnovator()
2 P2 v5 u1 \) g% w- Jreturn innovator.NewResult(content)

2 `4 v* S% \" i, z* h" \, W/ O& E  L  m