If you're using SQL Server try

text to lcSQL noshow

select acc_code,sum(dr_amount)as dramount,sum(cr_amount)as cramount
	from vouchers where acc_code=?m.cash_code1 and [date]<f_date1
        GROUP BY acc_code
	union all 
	select acc_code,sum(dr_amount)as dramount, sum(cr_amount)as cramount
	from cashsalp where acc_code=?m.cash_code1 and [date]<f_date1
        GROUP BY acc_code
	union all
	select acc_code,sum(dr_amount) as dramount, sum(cr_amount) as cramount
	from crsalp where acc_code=?m.cash_code1 and [date]<f_date1
        GROUP BY acc_code 
	union all
	select acc_code,sum(dr_amount)as dramount,sum(cr_amount)as cramount;
	from cashprp where acc_code=?m.cash_code1 and [date]<f_date1
     GROUP BY acc_code
endtext

>Sir I have these codes
>
>

>cmd="select acc_code,sum(dr_amount)as dramount,sum(cr_amount)as cramount;
>	from vouchers where acc_code=m.cash_code1 and date<f_date1;
>	union all;
>	select acc_code,sum(dr_amount)as dramount,sum(cr_amount)as cramount;
>	from cashsalp where acc_code=m.cash_code1 and date<f_date1;
>	union all;
>	select acc_code,sum(dr_amount)as dramount,sum(cr_amount)as cramount;
>	from crsalp where acc_code=m.cash_code1 and date<f_date1;
>	union all;
>	select acc_code,sum(dr_amount)as dramount,sum(cr_amount)as cramount;
>	from cashprp where acc_code=m.cash_code1 and date<f_date1;
>	into cursor cbk"
>	
>if sqlexec(con,cmd,'cbk')<0
>	aerror(laerror)
>	messagebox(laerror[1,2])
>	return
>ENDIF
>

>
>It says:
>Command contains unrecognized phrase/keyword.
>
>Please help me to locate error