delete from cad_log;

delete from vendaitem where vendaitem.nota_fiscal in
(select venda.nota_fiscal from venda
where venda.dt_venda<:pdata);


delete from cad_nfe where cad_nfe.venda_notafiscal in
(select venda.nota_fiscal from venda
where venda.dt_venda<:pdata);

delete from venda
where venda.dt_venda<:pdata;

delete from log_produtos where log_produtos.log_data<:pData;

delete from cad_fechamento where cad_fechamento.fechamento_data<:pData;

delete from caixa where caixa.dt_caixa<:pData;

delete from caixa_banco where caixa_banco.dt_caixa_banco<:pData;

delete from receber where receber.dt_venda<:pData and receber.bo_recebida='S';

delete from parcelas_pagar where parcelas_pagar.dt_contapagar<:pData and parcelas_pagar.bo_recebida='S'