Rodrigo Cardilo

Bom dia Bruno, Você não prefere utilizar essas configurações pelo banco de dados? Fica mais simples e fácil de alterar. Eu tenho cliente que possuem carteira de até 5 bancos ao mesmo tempo e funciona perfeitamente. Fica a dica. Abraço

Galera, desculpe minha ignorância mas procurei vários exemplos no google para fazer esse método e não consegui achar nada que se enquadre em minha estrutura DataSnap (Firedac no servidor e DBX no cliente). Alguém aí tem alguma idéia ou um exemplo de como consigo fazer esse método? Grato

Entendi.. Vou pesquisar esse método e tentar aqui.. Obrigado a todos pelas dicas.

Mas como eu aplicaria o commit pela aplicação cliente?

Amigo xyberx, eu imaginei que seria isso, mas na tecnologia firedac não tenho a mínima noção de como acionar o commit após o comando. Você sabe de algum exemplo que possa me explicar melhor o uso do commit? Grato desde já

Agradeço a dica mas não resolve meu problema. Grato.

Galera, Estou tentando criar um servidor com firedac e os clientes com datasnap dbx. Tudo funciona perfeitamente. O único problema é quando tento enviar um comando sql para apagar registros via clientdataset. Segue o exemplo: CDS.CommandText := 'DELETE FROM TABELA WHERE CONTROLE = 1' ; CDS.Execute ; Não acontece o esperado, ou seja, não apagou o registro correspondente. Somente apagou o registro quando eu fechei a aplicação. Minha pergunta é: Existe alguma outra forma de resolver esse problema utilizando algum outro componente Firedac ou somente se eu mudar toda minha estrutura cliente? Grato desde já,

O campo inscrição estadual não aceita RG. Vide página 181 e 182 do Manual (http://www.nfe.fazenda.gov.br/portal/exibirArquivo.aspx?conteudo=URCYvjVMIzI=)

Utilize a opção SVC-SP. Sugiro ler melhor sobre o assunto de contigência no portal MG http://portalcte.fazenda.mg.gov.br/.

Algum moderador pode olhar esse problema por favor?

Boa tarde, O Código de Mora/Juros do Sicoob (Bancoob) está errado no fonte: Segundo o manual deles os códigos corretos seriam 0 - Isento; 1 - Valor por dia; 2 - Taxa Mensal Estou enviando o o arquivo fonte alterado e o manual para atualização o SVN. // Codigo Anterior constructor TACBrBancoob.create(AOwner: TACBrBanco); begin inherited create(AOwner); fpDigito := 0; fpNome := 'SICOOB'; fpNumero := 756; fpTamanhoMaximoNossoNum := 7; fpTamanhoCarteira := 1; fpTamanhoConta := 8; fpCodigosMoraAceitos:= '123'; end; // Código Alterado constructor TACBrBancoob.create(AOwner: TACBrBanco); begin inherited create(AOwner); fpDigito := 0; fpNome := 'SICOOB'; fpNumero := 756; fpTamanhoMaximoNossoNum := 7; fpTamanhoCarteira := 1; fpTamanhoConta := 8; fpCodigosMoraAceitos:= '012'; end; Grato, ACBrBancoBancoob.pas Layouts+para+troca+de+informações+01072015 (1) BANCOOB COM REGISTRO.xls

Oi Arnaldo, Eu tive um problema parecido a um tempo atrás. O que eu fiz foi o seguinte. Filtrei os registros na tabela depois utilizei a rotina abaixo e deu certinho. // Depois de filtrar os registros Tabela.First ; While Not Tabela.Eof do begin GeraBoleto ; // rotina que adiciona os dados no componente ACBRBoleto ACBrBoletoFCFortes1.NomeArquivo := 'NomedoArquivo.pdf' ; ACBrBoleto1.GerarPDF ; Tabela.Next; end ; Atenciosamente,

Bom dia, Estou mandando anexo layout alterado e diminuído caso queira aproveitar. (Fortes Report) O Boleto de impressão "normal" eu também alterei. Atc, ACBrBoletoFCFortesFr.pas ACBrBoletoFCFortesFr.dfm

Oi amigos, Eu criei uma rotina chamada gravacedente sempre antes de gerar o boleto ou a remessa e funciona perfeitamente. Segue exemplo do código: procedure TDM1.GravaCedenteCobranca(CodCarteira: integer); begin // Grava Configurações do Cedente e Cobrança ACBrBoleto1.ListadeBoletos.Clear; DM1.TB03600.Refresh; DM1.TB03600.Locate('CONTROLE', CodCarteira, []); with ACBrBoleto1 do begin case DM1.TB03600BANCO.Value of 1: Banco.TipoCobranca := cobBancoDoBrasil; 104: Banco.TipoCobranca := cobCaixaEconomica; 237: Banco.TipoCobranca := cobBradesco; 341: Banco.TipoCobranca := cobItau; 756: begin Banco.TipoCobranca := cobBancoob; Cedente.Modalidade := '01'; end; end; Cedente.Agencia := DM1.TB03600AGENCIA.Value; Cedente.AgenciaDigito := ' '; if DM1.TB03600DIGAGENCIA.Value <> '' then Cedente.AgenciaDigito := DM1.TB03600DIGAGENCIA.Value; Cedente.Conta := DM1.TB03600CONTA.Value; Cedente.ContaDigito := DM1.TB03600DIGCONTA.Value; Cedente.Nome := DM1.TB03600NOMECEDENTE.Value; Cedente.Logradouro := DM1.TB03600ENDCEDENTE.Value; Cedente.NumeroRes := DM1.TB03600ENDNUMCEDENTE.Value; Cedente.Cidade := DM1.TB03600CIDADECEDENTE.Value; Cedente.Bairro := DM1.TB03600BAIRROCEDENTE.Value; Cedente.UF := DM1.TB03600UFCEDENTE.Value; Cedente.CEP := DM1.TB03600CEPCEDENTE.Value; if Length(FRC_Funcoes.DesformataCNPJ_CPF(DM1.TB03600CPFCEDENTE.Value)) = 11 then Cedente.TipoInscricao := pFisica else if Length(FRC_Funcoes.DesformataCNPJ_CPF(DM1.TB03600CPFCEDENTE.Value)) = 14 then Cedente.TipoInscricao := pJuridica; Cedente.CNPJCPF := FRC_Funcoes.DesformataCNPJ_CPF(DM1.TB03600CPFCEDENTE.Value); Cedente.CodigoCedente := DM1.TB03600CODCEDENTE.Value; Cedente.Convenio := DM1.TB03600CONVENIO.AsString; // Cedente.Modalidade := DM1.TB03600MODALIDADE.Value; ACBrBoletoFC.DirLogo := ExtractFilePath(Application.ExeName) + '\Boleto'; Cedente.ResponEmissao := tbCliEmite; case DM1.TB03600TIPOIMPRESSAO.Value of 1: ACBrBoletoFC.LayOut := lPadrao; 2: ACBrBoletoFC.LayOut := lFatura; 3: ACBrBoletoFC.LayOut := lCarne; 99: Cedente.ResponEmissao := tbBancoEmite; end; Cedente.CaracTitulo := tcSimples; case DM1.TB03600TIPOMOD.Value of 1: Cedente.CaracTitulo := tcSimples; 2: Cedente.CaracTitulo := tcVinculada; 3: Cedente.CaracTitulo := tcCaucionada; 4: Cedente.CaracTitulo := tcDescontada; 5: Cedente.CaracTitulo := tcVendor; end; if DM1.TB03600CNAB.Value = 240 then LayoutRemessa := c240 else LayoutRemessa := c400; end; end;

Amigos, De forma não explicada consegui enviar. Os parâmetros que utilizei foram: CSOSN: 102 idDest: 2=Operação interestadual; ndFinal: 0=Normal; indIEDest: 9=Não Contribuinte, que pode ou não possuir Inscrição Estadual no Cadastro de Contribuintes do ICMS. A UF do destinatário era SP e a do remetente era MG Uma dica que já tinha visto a um tempo atrás: Fiquem atento ao CSOSN. Segundo a regra não se pode utilizar 101 ou 201 para não contribuintes. Isso pode acarretar problemas. Mas sinceramente não sei porque aconteceu o problema justamente hoje. Notei que o sistema estava lento para receber os dados do retorno da nota fiscal. Creio que pode estar havendo alguma falha no sistema. No mais qualquer novidade aviso vocês. Boa sorte

Bom dia, Meu sistema que até ontem, 30/06/2016 emitia notas para fora da minha UF normalmente hoje começou a dar o mesmo erro citado pelo amigo Ariboni. A diferença é que os dados informados por mim são diferentes: O meu cliente e Simples Nacional, o destinatario tem CPF , 9 = Nao Contribuinte; 1 = Consumidor Final ; 2 = Interestadual ; o CFOP = 6101 e CST = 101. Alguém sabe dizer se mudou alguma regra a partir de 01/07? Grato desde já,

Bom dia Fábio, A única maneira de você fazer testes com NFe é tendo uma inscrição estadual. Eu mesmo passei por isso (a 6 anos atrás) e tive que ter IE para resolver fazer meus testes. Lembrando que a empresa desenvolvedora não é impedida de ter IE. Atc,

Oi amigo, Seu post é muito vago.. Você está preenchendo o compontente ACBRNFe corretamente? No envie o xml gerado para analisarmos. Pelo erro, aparentemente, seu sistema não está gerando o xml. Atc,

Oi Filipe, Atualize seu fonte e tente enviar a nota novamente. Automaticamente o grupo de informações acima citados serão criados. Quanto a obrigatoriedade das informações o nosso amigo Gildenor já explicou. As empresas SIMPLES NACIONAL possuem uma liminar do STF (ADI 5464) desobrigando as informações. Portanto você só precisa atender ao layout e já basta. Atc,

Oi Mateus. Cada estado tem uma legislação específica para a nota fiscal eletrônica de produtor Rural. Só é possível emissão de nota fiscal se o produtor possuir CNPJ e não somente CPF. http://www.nfe.fazenda.gov.br/portal/perguntasFrequentes.aspx?tipoConteudo=LnhDJy3Fl+g= O ACBRNFe só vai emitir notas para CNPJ's. Verifique junto ao seu estado a possibilidade de emissão desse tipo de nota. Só uma dica: Se seu estado permitir que a nota seja emitida pelo Emissor Gratuito você também consegue emitir pelo ACBRNFe, caso contrário não será possível. Espero ter ajudado. Atc,

Oi amigo, Você consegue fazer toda a parte de desenvolvimento sem necessidade do certificado digital (vide exemplos). Porém, o teste propriamente dito, utilizando o ambiente de homologação é obrigatório o uso do certificado. No começo eu adquiri um certificado tipo A1, pois o custo é menor e é possível instalar em vários computadores. Sugiro utilizar o capicom para o desenvolvimento. Boa sorte,

Perfeito Rafael, Era isso mesmo. Fiz o que você me sugeriu e está funcionando perfeitamente. Muito obrigado pela atenção e pelo tempo dispensado. Abraço

Oi Juliomar. Bem, estou tentando. Na verdade sempre desenvolvi nos windows server anteriores (2000, 2003). Tenho um cliente em especial onde desenvolvo dentro da empresa dele. E como ele adquiriu um servidor novo com o windows 2008 vi a possibilidade de usar uma maquina virtual para desenvolver. Eu já tinha visto programadores em Visual Studio utilizarem essa técnica daí pensei em usar também. Segue anexo o erro Renato. Grato desde já

Oi Juliomar, Usando o Hyper-V eu consegui um melhor desempenho no Windows Server.. E também por ser a versão que meu cliente comprou as licenças.

Oi amigos,Estou tentando instalar o delphi XE3 no windows server 2008 r2 (hyper V) e após a instalação o delphi simplesmente abre e dá erro carregando os pacotes de componente do próprio delphi.Alguém já passou por isso? Será que tenho que configurar algo diferente na permissões do windows server para rodar o delphi corretamente? Já instalei como Administrador e etc e nada. Já tentei o XE5 e aconteceu a mesma coisa.Grato desde já,