Saldo Acumulado (MovimentoConta)

Bom dia a todos!
Peguei como base o MovimentoConta para fazer o controle de lotes de aves, fazendo o saldo em acumulado de ovos, kg rações entre outras variáveis. No frmNotaProducao tem o controle de acordo com sistema de criação (avicultura corte, postura) e número de lotes (Lote 1, 2,...). No subformulário Detalhe_Nota_Produção Consulta faz o acumulo das variáveis citadas anteriormente porém está acumulando as quantidades de todos os lotes e sistema de criação.

Tem como incluir comando para selecionar o Número do Lote e Sistema de Criação antes de passar o saldo para a tabela ou subformulário para que no final mostre os valores acumulados para cada lote e sistema de criação?

Exemplo

If fncCriarTabela(strsql, tblTemp, 102030) Then
'---------------------------------------------------------------------------------------------------------------------------------
'Passa o Saldo do Caixa para o campo txSaldo
'O Saldo final ? composto do saldo acumulado, que fica armazenado na tabela tblConfig, mais o saldo residual da tabela tblMovimento
'Este procedimento evita ter que somar os valores desde o primeiro registro lan?ado
'---------------------------------------------------------------------------------------------------------------------------------
Me!txSaldo = Nz(DLookup("Animais_Lote", "tblNr_Animais"), 0) + DSum("[N_Aves_Alojada] - [Morte]", "tblManejo")
Me!Animais_alojados = Me!txSaldo - DSum("[N_Aves_Alojada] - [Morte]", tblTemp)
Acumulado = Me!Animais_alojados

Posta as tabelas envolvidas.
Abraços

Boa tarde!
Pensei q tivesse anexado anteriormente! Anexei o arquivo com o que fiz até agora. As tabelas envolvidas são tbl_Nota_Producao, Detalhe_Nota_Producao, tblNr_Animais e Lotes.

Obrigado

Bom dia a todos! Alguém entendeu o que estou precisando? Tem como me ajudar?

Abraços