Hi Nadya,

I don't see any problem in your code that could cause that. To be sure I would put SUSPEND right before DODEFAULT() and check that everything is ok.

>Hi everybody,
>
>In one of my form I generate report on the fly because this form is used for any file. Here is my code:
>
>

>********************************************************************
>*  Description.......: TableMaint.PrintM
>*  Calling Samples...: 
>*  Parameter List....: 
>*  Created by........:  
>*  Modified by.......: Nadya Nosonovsky 06/06/2000 12:51:08 PM
>********************************************************************
>local lcReportName, lcSafety, lnRecno, lcOrder
>lcReportName='Reports\TableMaint'
>lcSafety=set('safety')
>set safety off
>select TableMstr
>lnRecno=recno()
>lcOrder=order()
>create report (m.lcReportName) from alias() column
>select TableMstr
>if !empty(m.lcOrder)
>   set order to tag (m.lcOrder) && Restore tag
>endif
>dodefault()
>goto m.lnRecno
>if m.lcSafety='ON'
>     set safety on
>endif

>
>dodefault() invokes Report application, which allows to select destination. There are only 5 records in this file, when the filtered index is used. However, the whole file is printed. Do you see the problem in the above code or it might be a problem in Report application itself (I already asked my colleague to check this)?
>
>Thanks in advance.