需要急速解决的问题！请帮助！！！！！！

煤生5－1表
数据库中表名称：sms5_1字段名 来源表 来源表字段
单位代号
单位名称
采煤队名称（quduimingcheng)
TI11 bqita TI11
TI12 bqita TI12
TI13 bqita TI13
W61 sms5_1 TA26+TB14+TI14
TA26 bhuicai TA26
TB14 bjuejin TB14
TI14 bqita TI14
W62 sms5_1+sms2 TI11÷W26
TE8 bdanhao TE8
W63 sms5_1+sms2 TI12÷W26
W64 sms5_1+sms2 TI13÷W26
TE9 bdanhao TE9
W65 sms5_1+sms2 TI13÷W26
W66 sms5_1+bhuicai TA26÷TA10
W67 sms5_1+bjuejin TB14÷TB10现在我想统计sms5-1表的这些字段，在统计w66的时候，它是：w66=TA26/TA10,
TA26是sms5-1表的字段，而TA10是来自bhuicai表的一个字段。这个统计过程怎么写。
我用的是在代码中的动态赋值：
  procedure Tongji_w66;
    a:string;
     b:integer;
  begin
   query1.close;
   query1.sql.clear;
   query1.sql.add('select quduimingcheng,tba0 from bhuicai');
   query1.open;
   query1.first;
    while not query1.eof do
       a=:query1.fieldvalues['quduimingcheng'];
       b:=query1.fieldvalues['ta10'];
       query2.close;
        query2.sql.clear;
        query2.sql.add('update sms5_1 set w66=ta26/ta10 where quduimingcheng=:quduimingcheng');
query2.params[0].datatype:=ftstring;
query2.params[1].datatype:=ftinteger;
query2.parambyname('quduimingcheng').asstring:=a;
query2.parambyname('ta10').asinteger:=b;
query2.execsql;
quwry1.next;
end;
.
.
.
大体就是这个样子，可我不能正确的运行啊，有哪个高手帮助啊！我会大大的加分的！不失言！！！！！！！！