>TheEndOfTheFile = reccount() >dimension nFoo(TheEndOfTheFile) > >For RecordCount = 1 To TheEndOfTheFile >Goto RecordCount >NumericValue = Datafile.n1 >nFOO(RecordCount) = NumericValue && <<<< >Next RecordCount > >* but this would be better >dimension nFoo(reccount()) >lcOrder = tag() >set order to >scan >nFOO(RecordCount) = Datafile.n1 >endscan >set order &lcTag >>
>>For RecordCount = 1 To TheEndOfTheFile >>Goto RecordCount >>NumericValue = Datafile.n1 >>nFOO(RecordCount) = NumericValue && <<<< >>Next RecordCount >>