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

admin

* Y# U4 u' q- q/ `5 K, `8 V9 @6 k

1 H3 V* t5 H4 P" `" ?
8 l( Y/ Q) d" cTechnique  
* S* l/ v; [; h4 SThere is no difference in setting up a query for a single Item or for many.  Only the
/ Q+ \9 {8 l4 f  x' t, e, Jcriteria 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
, J1 y: X, v: o$ g<TABLE>  fragment.

8 d8 ]; ~8 P' m$ w0 ~3 H
/ F1 c8 K6 k  \* E/ @: nJavaScript  
! W) I# }$ H, \var qryItem = this.newItem("Part","get");
; O! P  h' R, O# WqryItem.setAttribute("select","item_number,description,cost");
qryItem.setProperty("cost", "100", "gt");
var results = qryItem.apply();
. O0 M% C' Q  D0 B% W5 K7 Qvar count = results.getItemCount();
var content = "<table>";
3 w7 ~; F( E# `4 _1 _' Zfor (var i=0; i<count; ++i)
{
  var item = results.getItemByIndex(i);
  content += "" +
+ c# F- q' ?  n- n" K4 L/ r1 g. q    "<tr>" +
. A6 a4 x9 G# L+ {& g- o      "<td>" + item.getProperty("item_number") + "</td>" +
7 f& _" o' V6 }( a9 J5 T. Q% X      "<td>" + item.getProperty("description") + "</td>" +
9 Z$ s# O; o$ ?, n1 D      "<td>" + item.getProperty("cost") + "</td>" +
, D- K8 K# i2 q/ L% t/ k# Q  J    "</tr>";
}
, `" m5 @; E* R6 w# \content += "</table>";
0 C0 A0 _4 h" Q; r4 R9 U6 n- J/ Yreturn content;
+ j* K; ^. g2 w! q& ?
7 M; p2 |: f$ _1 s0 V/ P. ]C#  
3 p+ o  f" C# a* }& UItem qryItem = this.newItem("Part","get");
qryItem.setAttribute("select","item_number,description,cost");
- h; `9 T  Z! R4 b8 ^3 l1 AqryItem.setProperty("cost", "100", "gt");
+ s# H- A2 t& V( [# @Item results = qryItem.apply();
int count = results.getItemCount();
int i;
# ^4 H6 s. Z: A4 z  Lstring content = "<table>";
for (i=0; i<count; ++i)
6 b; ^6 d, ~  @/ I* [! J{
  Item item = results.getItemByIndex(i);
" r' {/ Y0 [  P1 |  content += "" +
( W3 K4 r" v; ]0 a4 E2 K    "<tr>" +
      "<td>" + item.getProperty("item_number") + "</td>" +
% h. P- M- E! V7 n2 ]# v$ B5 T      "<td>" + item.getProperty("description") + "</td>" +
      "<td>" + item.getProperty("cost") + "</td>" +
    "</tr>";
$ E) y; h4 f: Q1 F}
content += "</table>";
1 s2 }; U/ e: ?( Y0 K8 w7 H  yInnovator innovator = this.newInnovator();
return innovator.newResult(content);

VB.Net  
; O9 i8 ?1 o8 aDim qryItem As Item = Me.NewItem("Part","get")
qryItem.SetAttribute("select","item_number,description,cost")
qryItem.SetProperty("cost", "100", "gt")
Dim results As Item = qryItem.Apply()
  o6 @& b8 U+ X% }Dim count As Integer = results.GetItemCount()
: m3 ]1 P. ~3 i* [9 Y' ^# \5 ]3 N5 \Dim i As Integer
- }7 w# A7 p! Y, C* x. ]Dim content As String = "<table>"
For i=0 to count - 1
  Dim item As Item = results.GetItemByIndex(i)
  content += "" + _
    "<tr>" + _
3 v+ L3 X4 ~- }0 d7 d8 I( S1 s      "<td>" + item.GetProperty("item_number") + "</td>" + _
      "<td>" + item.GetProperty("description") + "</td>" + _
8 t* g# d" q" e1 F      "<td>" + item.GetProperty("cost") + "</td>" + _
( a" z/ M0 F8 O    "</tr>"
Next
3 W$ N3 L1 W% e" o. |2 Pcontent += "</table>"

7 t6 J( h0 I6 L* A; Q7 m4 ~" I6 FDim innovator As Innovator = Me.NewInnovator()
return innovator.NewResult(content)


, u) m% I+ r. k; j" P1 L, P