Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- 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
Advertisement
Add Comment
Please, Sign In to add comment