//Somente os anos dos Recebimentos e Pagamentos

// QRY_Clone_Dup_Receber

SELECT DISTINCT
Left(duplicata_receber.data_pagamento,4) AS ano
FROM duplicata_receber
WHERE duplicata_receber.id_empresa={PARAM_ID_EMPRESA}
ORDER by ano DESC

// QRY_Clone_Dup_Pagar

SELECT DISTINCT
Left(duplicata_pagar.data_pagamento,4) AS ano
FROM duplicata_pagar
WHERE duplicata_pagar.id_empresa={PARAM_ID_EMPRESA}
ORDER by ano DESC


//Codigo da Janela

//Recebimentos
QRY_Clone_Dup_Receber.PARAM_ID_EMPRESA=gnEmpresaCodigo // Que Sera igual a 1
TableDisplay(TABLE_QRY_Clone_Dup_Receber,taReExecuteQuery) // Vou Mostrar conteudo Tabela

//Pagamentos
QRY_Clone_Dup_Pagar.PARAM_ID_EMPRESA=gnEmpresaCodigo
TableDisplay(TABLE_QRY_Clone_Dup_Pagar,taReExecuteQuery)