with ServerMethods do
          begin
            cdsOrcamentos_Vendas_Dados := GetOrcamentoVenda(aOrcamento.FNumero, __ImpactoWebCompany, __ImpactoWebBranch);
            cdsOrcamentos_Vendas_Itens.DataSetField := cdsOrcamentos_Vendas_Dados.FieldByName('sqlOrcamentos_Vendas_Itens') as TDataSetField;
            cdsOrcamentos_Vendas_Historicos.DataSetField := cdsOrcamentos_Vendas_Dados.FieldByName('sqlOrcamentos_Vendas_Historicos') as TDataSetField;

            while not cdsOrcamentos_Vendas_Historicos.Eof do
             begin
               cdsOrcamentos_Vendas_Historicos.Delete;
             end;

            while not cdsOrcamentos_Vendas_Itens.Eof do
             begin
              cdsOrcamentos_Vendas_Itens.Delete;
             end;
            cdsOrcamentos_Vendas_Dados.Delete;
            cdsOrcamentos_Vendas_Dados.ApplyUpdates(0);
            cdsOrcamentos_Vendas_Dados.Close;
          end;