> > Dear Sir,
> >
> > I have following working codes
> >
> >
> > select crsalp
> > goto top
> > do while !eof()
> > scatter memvar
> >
> > xyz="crs"+sys(2015)
> > select ;
> > sum(iif(type="P",cr_amount,0))as cr_amount,;
> > sum(iif(type="D",dr_amount,0))as ddr_amount1;
> > where vou_no=m.vou_no;
> > from crsalp;
> > group by vou_no;
> > into cursor xyz readwrite
> >
> > wait window alltrim(str(m.vou_no)) at srows()/2,scols()/2 nowait
> >
> > select xyz
> > am1=cr_amount-ddr_amount1
> >
> > select cr_sum
> > locate for vou_no=M.vou_no
> > if found()
> > replace dr_amount with am1
> > endif
> >
> > select crsalp
> > if !eof()
> > skip
> > endif
> >
> > enddo
> >
> > messagebox("Done",0+16+256,"Successfully")
> >
> >
> >
> > I need UPDADTE SQL command against above codes.
> >
> > Please help
>
> Not tested...
>
>
> UPDATE A SET A.dr_amount = B.am1;
> FROM cr_sum A JOIN;
> (select vou_no, sum(iif(type="P",cr_amount,0)) - sum(iif(type="D",dr_amount,0) as am1 FROM crsalp group by 1) B;
> ON B.vou_no == A.vou_no
>
>
>
> Best Regards,
>
> CriZ (,")
>
> "We are the foxes, we are the runners, we are the dancers, we create the dreams."
But it updates only First record.