Pasted

THIS OUTPUT IS GENERATED BY THE SCRIPT BELOW...
 ============== OUTPUT ============
 16:44:23,516 INFO  ===== before ====
16:44:23,516 INFO  R<'id'=1,'type'=1,'name'='item 1'>
16:44:23,516 INFO  R<'id'=2,'type'=2,'name'='item 2'>
16:44:23,516 INFO  R<'id'=3,'type'=0,'name'='item 3'>
16:44:23,516 INFO  R<'id'=4,'type'=1,'name'='item 4'>
16:44:23,516 INFO  R<'id'=5,'type'=2,'name'='item 5'>
16:44:23,516 INFO  R<'id'=6,'type'=0,'name'='item 6'>
16:44:23,516 INFO  R<'id'=7,'type'=1,'name'='item 7'>
16:44:23,516 INFO  R<'id'=8,'type'=2,'name'='item 8'>
16:44:23,516 INFO  R<'id'=9,'type'=0,'name'='item 9'>
16:44:23,531 INFO  R<'id'=10,'type'=1,'name'='item 10'>
16:44:23,531 INFO  ===== after ====
16:44:23,531 INFO  R<'id'=1,'type'=1,'name'='item 1'>
16:44:23,531 INFO  R<'id'=3,'type'=0,'name'='item 3'>
16:44:23,531 INFO  R<'id'=4,'type'=1,'name'='item 4'>
16:44:23,531 INFO  R<'id'=6,'type'=0,'name'='item 6'>
16:44:23,531 INFO  R<'id'=7,'type'=1,'name'='item 7'>
16:44:23,531 INFO  R<'id'=9,'type'=0,'name'='item 9'>
16:44:23,531 INFO  R<'id'=10,'type'=1,'name'='item 10'>
 =======================   SCRIPT SOURCE   ===================
List names
RecArray data
Record rec
Integer i
Integer type
 names = { "id", "type", "name" }
data = RecArray.Create(names)
 for i = 1 to 10
	type = i % 3
	RecArray.AddRecord( data , { i, type, Str.Format("item %1", i) } )
end
 echo("===== before ====")
for rec in data
	echo(rec)
end
  //work from the end to the begining so the index
//value of a given record does not change as you
//drop records...
for i = Length(data) downto 1
	rec = data[i]
	if (rec.type == 2)
		RecArray.DropRecord(data, i)
	end
end
 echo("===== after ====")
for rec in data
	echo(rec)
end