Matt,

You can use < pre > and < /pre > tags (w/o spaces) to preserve code formatting.

>Hi David
>
>Thanks, I probably wouldn't go back either, but there are a few frutrating things in VFP8...anyway, the code is as follows. The case statement that was executed is for mnOption=1. Yes these forms were converted from 2.6 using a neat converter that I had to tweak a bit to work satisfactorily:

>PRIVATE mlTaxInv, mcReps, i
>* set by rep07/rep03
>mlTaxInv=.f.
>mcReps=''
>
>do case
>case mnOption=1
>	for i=1 to 10
>		mcReps=mcReps+iif(maSR[i], 'Y', 'N')
>	endfor
>	
>	=WriteLog('Standard reports ['+mcReps+']')
>	
>	* printer prompts
>	if maSR[50]
>		mcPrompt='prompt'
>	else
>		mcPrompt=''
>	endif
>	
>	if maSR[1]
>		set message to 'Pay Input Audit Trail'
>		do rep01
>	endif
>	
>	if maSR[2]
>		set message to 'Payroll Summary Report'
>		do rep02
>	endif
>	
>	if maSR[3]
>		set message to 'Payslips'
>		if inlist(company.pstype, 3, 5, 6)
>			* use cItem cursor for all employees in one go
>			do rep07
>		else
>			* use cPayslip cursor - one per employee
>			do rep03 with .f.
>		endif
>		
>		* print any tax invoices
>		if mlTaxInv
>			do rep03 with .t.
>		endif
>	endif
>	
>	if maSR[4]
>		set message to 'Allowance/deduction/banking schedules'
>		do rep04
>	endif
>	
>	if maSR[5]
>		set message to 'Ledger account analysis'
>		do rep05
>	endif
>	
>	if maSR[6]
>		set message to 'Enterprise analysis'
>		do rep06
>	endif
>	
>	if maSR[7]
>		set message to 'Employer schedules'
>		do rep08
>	endif
>	
>	set message to
>	
>	=messagebox('Your selected reports have been produced.','Status',64)
>	
>case mnOption=2
>	set safety off
>	save to masr all like maSR
>	set safety on
>	
>	mlModified=.f.
>	thisform.refresh26()
>	thisform.refresh()
>	
>case mnOption=3
>	help
>
>otherwise
>	thisform.release()
>endcase