Sebastião Elivaldo

Estou tentando fazer a integração com a EFrete mas eles estão sobrecarregados. Tanto os servidores quanto o suporte. Não sei que caminho seguir...

Olá Wagner, boa noite. Curiosidade... você alterou o componente ACBrCIOT? Pergunto pois me informaram que a EFrete iria desativar a versão corrente da API dela e ativar uma nova API, acredito que com rotas diferentes. Sabe me dizer alguma coisa sobre isso? Obrigado!

Bom dia, Estou testando o exemplo do componente TACBrCIOT para emissão do CIOT. Ao chamar o método Enviar, recebo a exceção "TCIOTWClass.GerarXml, não implementado". Observei que ele é gerado na seguinte linha da unit ACBrCIOTContratos: function TContrato.GerarXML: String; begin .... FCIOTW.GerarXml; .... end; Alguma ideia do que pode estar provocando esse erro? Obrigado!

Sim, com o maior prazer, @Juliomar Marchetti! Segue anexo a unit completa com a implementação que falei. Assim que validá-la, por favor, me avise. Obrigado! ACBrCTeDACTEFR.pas

Olá pessoal, boa noite. Estou observando que na unit ACBrCTeDACTEFR (FastReport) não foi implementado o método ImprimirPDF(AStream: TStream); Existe alguma previsão de implementação? Obrigado!

Obrigado @valterpatrick, Eu também tinha visto essa matéria da FIEMG. Cheguei até mesmo a ligar para lá para obter mais informações, mas até agora não consegui nada. Não sei nem mesmo qual a legislação que (supostamente) acaba com o tíquete balança a partir de 01/04/2026. Caso você encontre alguma coisa, ficarei muito feliz se puder compartilhar comigo. Valeu!

Olá Pessoal, Recentemente recebi a informação de que o Tíquete Balança (aquele documento que a mineradora emite quando um caminhão é carregado de minério) em MG seria descontinuado. E que em seu lugar seria criado um documento digital. Alguém sabe me dizer se isso é verdade, e se for, em que é está? Obrigado!

Pessoal, Era problema na SEFAZ de MG mesmo. Hoje enviei exatamente o mesmo XML e passou.

No meu caso também é MG

Olá, Fiz a inclusão das tags abaixo no CTe. Ao transmitir em homologação, recebo a rejeição "Valor do IBS Municipal nao pode resultar negativo" Por favor, me ajudem a identificar o que estou fazendo de errado. Obrigado! <IBSCBS> <CST>000</CST> <cClassTrib>000001</cClassTrib> <gIBSCBS> <vBC>1000.00</vBC> <gIBSUF> <pIBSUF>0.1000</pIBSUF> <vIBSUF>1.00</vIBSUF> </gIBSUF> <gIBSMun> <pIBSMun>0.0000</pIBSMun> <vIBSMun>0.00</vIBSMun> </gIBSMun> <vIBS>1.00</vIBS> <gCBS> <pCBS>0.9000</pCBS> <vCBS>9.00</vCBS> </gCBS> </gIBSCBS> </IBSCBS>

Não, não... Eu estou assessorando uma softhouse a portar o sistema deles para uma versão mais nova do Delphi.

Realmente, Juliomar. Faz tempo que foi alterado. E o mais curioso é que esse meu cliente disse que matinha a ACBr sempre atualizada. Muito obrigado pela ajuda!

Obrigado, Juliomar!

Olá Pessoal, bom dia. Percebi que o método DescricaoRetorno não está mais presente na interface da classe TArquivoR_CNAB240 (ACBrPagFor). Alguém saberia me dizer se esse método foi migrado para outra unit/classe? TArquivoR_CNAB240 = class(TArquivoRClass) ... public ... function DescricaoRetorno(const ADesc: string): string; virtual; Obrigado!

Pessoal, Acabei de verificar o código fonte do componente e vi que temos que usar o objeto infCteComp10 em vez infCteComp.

Olá Pessoal, boa noite. Ao emitir um CTe complementar na versão 4.00 recebo o seguinte erro ao fazer a validação: 1871 - Element '{http://www.portalfiscal.inf.br/cte}infCte': Missing child element(s). Expected is one of ( {http://www.portalfiscal.inf.br/cte}infCTeNorm, {http://www.portalfiscal.inf.br/cte}infCteComp ). Ao analisar o conteúdo do XML, observei que realmente não existe a TAG <infCteComp>. Então fiz o seguinte teste: alterei para a versão 3.00 e gerei novamente o mesmo CTe. Para minha surpresa, emitindo na versão 3.00 ele cria corretamente a TAG <infCteComp>. Comparei os dois XML (versão 3 e 4) e a única diferença é realmente que na versão 4 não está sendo incluído a referida tag. Alguém já passou por isso e saberia me dizer o que estou fazendo errado? Obrigado!

Excelente! Muito obrigado, Italo.

Valeu!!! Muitíssimo obrigado!

Boa tarde, Italo. Concordo plenamente com você. A SEFAZ-MG está deixando a desejar. Mas se você me permite, gostaria de insistir naquela alteração sugerida. Observe que ela substituiria, inclusive, aquele "if" que hoje já existe. E funcionaria tanto em homologação quanto produção. Mas isso é apenas uma sugestão. Obrigado!

Talvez seja interessante forçar para sempre seja "CTe" fazendo assim: FPRetWS := StringReplace(FPRetWS, 'retConsStatServCte', 'retConsStatServCTe', [rfReplaceAll]); CTeRetorno := TRetConsStatServ.Create('CTe'); // if (FPConfiguracoesCTe.Geral.VersaoDF <= ve300) or // ((FPConfiguracoesCTe.WebServices.UFCodigo = 31) and // (FPConfiguracoesCTe.Geral.FormaEmissao = teNormal)) then // CTeRetorno := TRetConsStatServ.Create('Cte') // else // CTeRetorno := TRetConsStatServ.Create('CTe');

Olá Pessoal, Acredito que a função TratarResposta da unit ACBrCTeWebServices precisará de um pequeno ajuste. Na versão 4.00 do CT-e, o retorno do status do serviço (em MG) começa com "retConsStatServCTe" se estiver em Produção e "retConsStatServCte" se for no ambiente de Homologação. Trecho da função TratarResposta: if (FPConfiguracoesCTe.Geral.VersaoDF <= ve300) or ((FPConfiguracoesCTe.WebServices.UFCodigo = 31) and (FPConfiguracoesCTe.Geral.FormaEmissao = teNormal)) then CTeRetorno := TRetConsStatServ.Create('Cte') <------------------------- else CTeRetorno := TRetConsStatServ.Create('CTe');