I assume that there's always only one record in the cursor 'mydcnC', right? You've to move pointer back to that record after printing each report because REPORT FORM leaves it at EOF.

...
	Select mydcnC
        GO TOP
        Append General ...
...

>Sergey,
>
>I am just now getting back to this project. I am having a little problem. Some of our reports are mulitple pages. I have each file path stored in seperate fields and only one empty general field. I create a little program that loop through the possibilites and generates a report. This all works good if I preview the reports, but if I do To Printer after the first page I get an End Of File encountered error. My Code:

>lParam what_temp_dwgno, what_temp_dwgrev
>Public shy_no
>Select * From changetable ;
 Where AllT(dmdrno) == AllT(what_temp_dwgno) ;
  And AllT(dmpchg) == AllT(what_temp_dwgrev) ;
  InTo Cursor mydcntemp
>Select * From mydcntemp, newdatatbl ;
  Where AllT(mydcntemp.dmdrno)+AllT(mydcntemp.dmpchg) == AllT(newdatatbl.dwgno) ;
  InTo Cursor mydcngraphic
>
>Use DBF("mydcngraphic") Again Alias mydcnC In 0
>Select mydcnC
>
>For x = 1 To mydcnC.eosht
>	If x > 1 Then
>		temp_name = "mydcngraphic.sorfile"+AllT(Str(x))
>		shy_no = x
>	Else
>		temp_name =  "mydcngraphic.sorfile"
>		shy_no = x
>	EndIf
>	? x
>	Select mydcnC
>	Append General mydcnC.sorgen From AllT(Eval(temp_name))
>	Report Form dcn_test_report.frx NoConsole to Printer &&Preview
>Next x
>Use In mydcnC