i = 1 Do While .T. Select * From YourTable Where Reccno() > = i And Recno() <= i + 10000 ; Into Cursor YourCursorName i = i + 10000 If Reccount( "YourCursorName" ) > 0 Report Form MyReport To Printer Else Exit EndIf EndDo>>>My report prints telephone bills. There are more than 200,000 customers. When the print dialog comes up, it has a selection for All or Page from and to. in FROM it has 1 and in TO it has 9999. If I select ALL, it does not print beyond 9999 pages. If I put a value of more than 9999 in the TO field, it does not accept it.
>>REPORT FORM MyReport TO PRINTER RANGE 1, 9999 >>REPORT FORM MyReport TO PRINTER RANGE 10000, 19999>>and so on.