I am Using the following code to Update Subledger.DBF file from Schedule.DBF.
Kindly provide me Equivalent SQL to do the same. Currently I am using the following code.

******UPDATE SUBLEDGER DETAILS*******
Goto Top
Scan While .Not. Eof()
T_Newcode=Left(Accode,3)+"0000"

Select Schedule
Locate For newcode=T_Newcode
If Found()=.T.
T_desc=Desc
Else
T_desc="Account Code Missing"
Endif
Select Subledger
Replace Schedule With T_desc
Endscan

Regards
Harsh