​Filter(

    tMovimentos;
    CodigoProduto = TabelaDadosProdutos_1.Selected.CodigoProduto

)