Erro instrução SQL

Prezados,
Fiz uma instrução sql para inserir dados na tabela balancopatrimonial das tabelas Lancamentos, lancamentosItens e PlanoContas, a seguir, mas o relatório aparece vazio. Alguem pode me ajudar a descobrir o erro:
Instrução SQL:CódigoDelphi:
procedure TPageBalanco.AtualizarBalancoPatrimonial;
begin
DMRelBalanco.qryBalanco.SQL.Text :=
'UPDATE BalancoPatrimonial SET TotalAtivo = (' +
' SELECT SUM(Lancamentoitens.valortotal)' +
' FROM Lancamentoitens' +
' JOIN Lancamento ON Lancamentoitens.Codigo_Lancamento = Lancamento.CODIGOL' +
' WHERE Lancamentoitens.Codigo_Conta BETWEEN 100 AND 703' +
' AND BalancoPatrimonial.Ano = strftime(''%Y'', Lancamento.dataemissao)' +
');' +
'UPDATE BalancoPatrimonial SET TotalPassivo = (' +
' SELECT SUM(Lancamentoitens.valortotal)' +
' FROM Lancamentoitens' +
' JOIN Lancamento ON Lancamentoitens.Codigo_Lancamento = Lancamento.CODIGOL' +
' WHERE Lancamentoitens.Codigo_Conta BETWEEN 800 AND 810' +
' AND BalancoPatrimonial.Ano = strftime(''%Y'', Lancamento.dataemissao)' +
');' +
'UPDATE BalancoPatrimonial SET PatrimonioLiquido = TotalAtivo - TotalPassivo;';

DMRelBalanco.qryBalanco.ExecSQL;
end;


procedure TPageBalanco.Button1Click(Sender: TObject);
begin
// AtualizarBalancoPatrimonial;
// Chama o relatório (Ainda não implementado)
var
lBalanco := TRelBalanco.Create(nil);
try
lBalanco.Preview;
finally
lBalanco.Free;
end;
AtualizarBalancoPatrimonial;
end;


Tabelas
CREATE TABLE Lancamento (
CODIGOL INTEGER PRIMARY KEY AUTOINCREMENT,
CPFCNPJ VARCHAR (18) REFERENCES Pessoa (CPFCNPJ) ON DELETE CASCADE
ON UPDATE CASCADE
NOT NULL,
Tipo CHAR (1),
dataemissao DATE DEFAULT CURRENT_DATE
NOT NULL
);
CREATE TABLE Lancamentoitens (
CodigoI INTEGER PRIMARY KEY AUTOINCREMENT,
Codigo_Lancamento INTEGER REFERENCES Lancamento (CODIGOL) ON DELETE CASCADE
ON UPDATE CASCADE,
Codigo_Produto INTEGER REFERENCES produto (CODIGO)
NOT NULL,
Codigo_Atividade INTEGER REFERENCES Atividade (CODIGO)
NOT NULL,
Codigo_Conta INTEGER REFERENCES PlanoContas (CodigoConta)
NOT NULL,
quantidade INTEGER NOT NULL,
valorunitario DECIMAL (17, 2) NOT NULL,
valortotal DECIMAL (17, 2)
);
CREATE TABLE PlanoContas (
CodigoConta INTEGER PRIMARY KEY
NOT NULL,
NomeConta VARCHAR (30) NOT NULL,
TipoConta CHAR (1) NOT NULL
);
CREATE TABLE BalancoPatrimonial (
CODIGO INTEGER PRIMARY KEY AUTOINCREMENT,
Ano INTEGER NOT NULL,
CODIGO_CONTA INTEGER REFERENCES PlanoContas (CodigoConta),
TotalPassivo DECIMAL (10, 2),
TotalAtivo DECIMAL (10, 2),
PatrimonioLiquido DECIMAL (10, 2)
);