#PUSH !Zd
#SET ZD$ |CI-1 // -1 means in an item list.
#PUSH !Zg
#PUSH !Zj
#SET ZJ$ !a
#PUSH !Zj
#SET ZG$ 0 // Set the item counter to zero. This is used to
// count and assign ID's to the items.
!A [] OBJ$ILIST |CI0 // Create the command to save the item count,
#FREF OBJ$!Zj$INUM !a // and tell flex to update it later.