19 lines
194 B
Plaintext
19 lines
194 B
Plaintext
/*
|
|
* $Id$
|
|
*/
|
|
|
|
FUNCTION Main()
|
|
LOCAL nCount
|
|
|
|
USE test
|
|
|
|
dbGoto( 4 )
|
|
? RecNo()
|
|
COUNT TO nCount
|
|
? RecNo(), nCount
|
|
COUNT TO nCount NEXT 10
|
|
? RecNo(), nCount
|
|
|
|
RETURN NIL
|
|
|