Insert Sql ?duvida?

Tenho o código abaixo funcionando porém, é uma marreta a inclusão da validade com o update, alguém pode me dizer como incluo dentro do insert este campo validade (é um campo definido pelo usuário no form ou seja variável fora da tabela) e é o último campo da tabela.

DmDce.QDceCar.Sql.add(´insert into DceCar.db(nome,rg,mat,curso,unidade) select Dce.nome, Dce.rg, Dce.Mat, ´);
DmDce.QDceCar.Sql.add(´Curso.nomecu, Unidade.NomeUn from Dce, curso, Unidade ´);
DmDce.QDceCar.Sql.add(´where (Dce.codCurso = curso.codcurso) and (Dce.CodUn = Unidade.CodUn) and (Dce.mat = :mat) ´);
DmDce.QDceCar.ParamByName(´mat´).asstring := Sg2.Cells[0,cont];
DmDce.QDceCar.ExecSQL;
DmDce.QDceCar.close;
DmDce.QDceCar.Sql.clear;
DmDce.QDceCar.Sql.add(´update DceCar.db set Validade = :Validade where Mat = :mat ´);
DmDce.QDceCar.ParamByName(´Validade´).asstring := datetoStr(Frm_Prn_Car.Vence.Time);
DmDce.QDceCar.ParamByName(´mat´).asstring := Sg2.Cells[0,cont];
DmDce.QDceCar.ExecSQL;


ronangledson@yahoo.com.br