UPDATE "C:\DB_ADO\base\obl.dbf" SET ;
shortname=UPPER(ALLTRIM(a.fam)+space( 1 )+LEFT(LTRIM(a.im), 1 )+LEFT(LTRIM(a.ot), 1 )+space( 1 )+RIGHT(ALLTRIM(STR(YEAR(a.dr))), 2 )),;
fullname=UPPER(ALLTRIM(a.fam)+space( 1 )+ALLTRIM(a.im)+space( 1 )+ALLTRIM(a.ot)+space( 1 )+ALLTRIM(STR(YEAR(a.dr)))),;
fam=c.fam,im=c.im,ot=c.ot,dr=c.dr,w=c.w,s_pol=c.s_pol,n_pol=c.n_pol,q=c.q,qprz=c.qprz,dp=c.dp,jt=c.jt,dendp=c.dendp,sn_pasp=c.sn_pasp,;
ndog=alltrim(c.ndog),regp=c.regp,regs=c.regs,ul=c.ul,dom=c.dom,kor=c.kor,str=c.str,kv=c.kv,sp=c.sp,kt=c.kt,gr=c.gr,old_n_pol=c.old_n_pol,;
old_s_pol=c.old_s_pol,old_fam=c.old_fam ;
FROM "C:\DB_ADO\base\obl.dbf" as a, "K:\Documents and Settings\Administrator\Desktop\Обновление базы\FZS2089.DBF" AS c ;
WHERE a.fam=c.fam AND a.im=c.im AND a.ot=c.ot AND a.dr=c.dr AND a.dp<=c.dp

UPDATE "C:\DB_ADO\base\obl.dbf" as a SET ...
FROM "K:\Documents and Settings\Administrator\Desktop\Обновление базы\FZS2089.DBF" AS c ;
WHERE a.fam=c.fam AND a.im=c.im AND a.ot=c.ot AND a.dr=c.dr AND a.dp<=c.dp

UPDATE "C:\DB_ADO\base\obl.dbf" as a SET ...
FROM "K:\Documents and Settings\Administrator\Desktop\Обновление базы\FZS2089.DBF" AS c ;
WHERE obl.fam=c.fam AND obl.im=c.im AND obl.ot=c.ot AND obl.dr=c.dr AND obl.dp<=c.dp

UPDATE "C:\DB_ADO\base\obl.dbf" SET ...
FROM "K:\Documents and Settings\Administrator\Desktop\Обновление базы\FZS2089.DBF" AS c ;
WHERE a.fam=c.fam AND a.im=c.im AND a.ot=c.ot AND a.dr=c.dr AND a.dp<=c.dp