param	MAXCOUNT,NOTEN

BENCH:=new BENCH()
works(#DEMO)

FIL[1]:=alias(@DEMO.FIL[1])
FIL[2]:=alias(@DEMO.FIL[2])
FIL[3]:=alias(@DEMO.FIL[3])
FIL[4]:=alias(@DEMO.FIL[4])
FIL[5]:=alias(@DEMO.FIL[5])
FIL[6]:=alias(@DEMO.FIL[6])
FIL[7]:=alias(@DEMO.FIL[7])
FIL[8]:=alias(@DEMO.FIL[8])
FIL[9]:=alias(@DEMO.FIL[9])
FIL[10]:=alias(@DEMO.FIL[10])

// ----------------------------------------
BENCH.SET("OPEN")
loop(MAXCOUNT)
	#NULL:open "DEMO3"
	#DEMO3:close
endloop
BENCH.SAVE()


// ----------------------------------------
BENCH.SET("POP_ITMS")
loop(MAXCOUNT)
	A:=@FIL1
endloop
BENCH.SAVE()

// ----------------------------------------
BENCH.SET("ALIAS POP")
loop(MAXCOUNT)
	A:=FIL[1]
endloop
BENCH.SAVE()

// ----------------------------------------
BENCH.SET("ALIAS PUSH")
loop(MAXCOUNT)
	FIL[1]:="123"
endloop
BENCH.SAVE()

// ----------------------------------------
BENCH.SET("DB DIM PUSH")
loop(MAXCOUNT)
	@FIL[1]:="123"
endloop
BENCH.SAVE()

// ----------------------------------------
BENCH.SET("DB DIM POP")
loop(MAXCOUNT)
	A:=@FIL[1]
endloop
BENCH.SAVE()

// ----------------------------------------
A:=0
BENCH.SET("FIELD")
loop(MAXCOUNT)
	A:=field(1)
endloop
BENCH.SAVE()

// ----------------------------------------
i:=1
BENCH.SET("SETFIELD")
loop(MAXCOUNT)
	setfield(1,str(i))
endloop
BENCH.SAVE()


// ----------------------------------------
BENCH.SET("PUSH_ITMS")
loop(MAXCOUNT)
	@FIL1:="123"
endloop
BENCH.SAVE()


// ----------------------------------------
#DEMO:zap
i:=1
BENCH.SET("APPEND")
loop(MAXCOUNT)
	@NO:=i
	append
	i:=i+1
endloop
BENCH.SAVE()

// ----------------------------------------
#DEMO:zap
i:=1
BENCH.SET("T_APPEND")
transact(MAXCOUNT+100)
loop(MAXCOUNT)
	@NO:=i
	append
	i:=i+1
endloop
BENCH.SAVE()
BENCH.SET("COMMIT")
commit
BENCH.SAVE()

// ----------------------------------------
#DEMO:top
BENCH.SET("FORWARD")
repeat
until(forward=0)
BENCH.SAVE()

// ----------------------------------------
#DEMO:top
BENCH.SET("BACK")
#DEMO:botom
repeat
until(back=0)
BENCH.SAVE()


// ----------------------------------------
#DEMO:top
BENCH.SET("TOP")
loop(MAXCOUNT)
	top
endloop
BENCH.SAVE()

// ----------------------------------------
#DEMO:top
BENCH.SET("BOTOM")
loop(MAXCOUNT)
	botom
endloop
BENCH.SAVE()

// ----------------------------------------
i:=1
#DEMO:top
BENCH.SET("UPDATE")
repeat
	@COUNT:=i
	update
	i:=i+1
until(#DEMO:forward=0)
BENCH.SAVE()


// ----------------------------------------
i:=1
BENCH.SET("FIND")
loop(MAXCOUNT)
	find(!NO,i)
	i:=i+1
endloop
BENCH.SAVE()


// ----------------------------------------
i:=1
BENCH.SET("BIND")
loop(MAXCOUNT)
	bind(!NO,i)
	i:=i+1
endloop
BENCH.SAVE()


// ----------------------------------------
i:=1
BENCH.SET("WHERE")
loop(MAXCOUNT)
	where("NO="+i)
	i:=i+1
endloop
BENCH.SAVE()