Ir para conteúdo
  • Cadastre-se

gutembergscosta

Membros
  • Total de ítens

    149
  • Registro em

  • Última visita

Tudo que gutembergscosta postou

  1. Olá EMBarbosa, segue anexo o arquivo de retorno, ondem contem as guias para impressão. Conforme exemplo no DEMO, sigo as mesmas instruções para impressão, carrego o respectivo arquivo e ao emitir, mesmo tendo Mais uma guia (como é o caso, são três), apresenta apenas a ultima. Observando o comportamento da unit ACBrGNREGuiasRetorno.pas , é percorrido todas as guias do arquivo corretamente, mas apenas adiciona/alimenta no componente/função de retorno a ultima guia. OpenDialog1.Title := 'Selecione a Guia'; OpenDialog1.DefaultExt := '*-gnre.txt'; OpenDialog1.Filter := 'Arquivos GNRE (*-gnre.txt)|*-gnre.txt|Arquivos TXT (*.txt)|*.txt|Todos os Arquivos (*.*)|*.*'; OpenDialog1.InitialDir := ACBrGNRE1.Configuracoes.Arquivos.PathSalvar; if OpenDialog1.Execute then begin ACBrGNRE1.GuiasRetorno.Clear; ACBrGNRE1.GuiasRetorno.LoadFromFile(OpenDialog1.FileName); ACBrGNRE1.GuiasRetorno.Imprimir; end; 1876836790.txt
  2. Olá, gostaria de reportar um problema. Quando o retorno consta mais de uma guia, apenas é apresentado ou gerado a ultima guia do arquivo retorno. No exemplo que usei, o meu retorno consta três guias, mas só adicionado / considerado no relatório (Fortes) apenas a ultima guia.
  3. No meu caso eu preenchi pois não estava funcionando com ele apenas zerado (a tag era suprimida)
  4. Ao informar apenas 0.00, o componente acaba por não passar a respectiva tag zerada, o que está fazendo rejeitar pela falta da tag. Aqui apenas inserinndo a tag vDesc := 0.0001, como o campo são duas casas decimais, logo acaba por ficar zeros e assim passando normal. Nesse caso independe da configuração - ACBrNFe.Configuracoes.Geral.CamposFatObrigatorios, podendo ser true ou false que passa normalmente. Acredito ser necessário modificação no componente para aceitar/passar a tag mesmo quando for apenas ZEROS (vDesc :=0);
  5. Olá, Nos deparamos com a seguinte situação (erro abaixo), mas isso só acontece quando configurado Lib = xsLibXml2 Com essa Lib e sinalizando no componente para VALIDAR XML, retorna o seguinte erro e não envia a NFe. Os schemas estão devidamente atualizados. O curioso é que usando a Lib = xsMsXml, nas mesmas condições (validando Xml) o erro não se apresenta.
  6. Olá, realizando a consulta no estado de Minas Gerais (que não é SVRS) também não funciona e o retorno é o seguinte: <?xml version="1.0" encoding="UTF-8"?> <soap:Envelope xmlns:soap="http://www.w3.org/2003/05/soap-envelope"> <soap:Body> <soap:Fault> <soap:Code> <soap:Value>soap:Sender</soap:Value> </soap:Code> <soap:Reason> <soap:Text xml:lang="en">Message part {http://www.portalfiscal.inf.br/nfe/wsdl/CadConsultaCadastro4}nfeDadosMsg was not recognized. (Does it exist in service WSDL?)</soap:Text> </soap:Reason> </soap:Fault> </soap:Body> </soap:Envelope>
  7. Olá BigWings, Isso mesmo, mas acreditava que a validação de estrutura, dados do XML (XSD) poderia ocorrer sem a utilização do certificado visando sua assinatura antes. Muitas vezes não dispomos do certificado momentaneamente. Obrigado.
  8. Olá Pessoal, Fazendo alguns testes com a NFe 4, e marcando a propriedade de validar XML, é gerado a exceção abaixo. Content for element '{http://www.portalfiscal.inf.br/nfe}NFe' is incomplete according to the DTD/Schema. Expecting: {http://www.portalfiscal.inf.br/nfe}infNFeSupl, {http://www.w3.org/2000/09/xmldsig#}Signature. Mas olhando a documentação correspondente, essa validação (de preenchimento) pelo que entendi, deve ocorrer apenas quando se tratar NFeC, e no caso citado trata-se de uma NFe. A NT 2015.002 v1.40 definiu o novo grupo " infNFeSupl ", que deve receber as informações do QRCode das notas, porém, este grupo deve ser utilizado apenas para a emissão de NFC-e (Nota Fiscal do Consumidor Eletrônica), e caso este grupo esteja presente no XML de envio de umaNF-e , será retornada a rejeição 393, informando que foi emitida a nota com o grupo de Informações Suplementares.
  9. gutembergscosta

    Erro Suporte xsXMLSec

    Bom dia, Ao mudar as propriedades do tipo SSLib = libWinCrypt, apresenta o erro abaixo (imagens), percebi que só NÃO apresenta quando colocado em LibCustom. Qual a configuração correta para quem NÃO vai usar OpenSSL nem Capicom para as propriedades ? Estou usando o ACBR.inc padrão da atualização do SVN.. // Descomente a linha abaixo, se você quer que seu Executável NÃO dependa das DLLs LibXML2, LibXMLSEC, {.$DEFINE DFE_SEM_OPENSSL} // Descomente a linha abaixo, se você quer que seu Executável NÃO dependa das DLLs LibXMLSEC, mas continue suportando a LibXML2 {.$DEFINE DFE_SEM_XMLSEC} // Descomente a linha abaixo, se você quer que seu Executável NÃO dependa das DLLs LibXML2, mas continue suportando LibXMLSEC {.$DEFINE DFE_SEM_LIBXML2} // Descomente a linha abaixo, se você não utiliza a obsoleta Capicom para Criptografia (recomendado) {.$DEFINE DFE_SEM_CAPICOM} // Descomente a linha abaixo, se você não utiliza a obsoleta MSXML para Assinatura de XML(recomendado) {.$DEFINE DFE_SEM_MSXML} // Descomente a linha abaixo, se você não deseja adicionar a Dependência da INDY nos seus Projetos {.$DEFINE DFE_SEM_INDY}
  10. Olá, efetuei ontem uma atualização,. Refiz toda a compilação e instalação via ACBrInstall_Trunk2, contudo ao rodar a aplicação apresenta o erro abaixo. Error reading ACBrNFe1.Configuracoes.Geral.SSLLib: Suporte a "xsXmlSec" foi desativado por compilação {$DEFINE DFE_SEM_OPENSSL} Já exclui e inserir o componente novamente na aplicação. Essa diretriz realmente esta desativada pois o uso com openssl nem capicom. O que pode ser ? Obrigado.
  11. Adicione na sua clausula USES a unit abaixo: pcnConversao
  12. Obrigado pela dica, com isso cheguei a Linha Digitável, adicionando mais uma instrução. strCodBarras := ACBrBoleto1.Banco.MontarCodigoBarras(Titulo); strLinhaDigitavel := ACBrBoleto1.Banco.MontarLinhaDigitavel(strCodBarras, Titulo);
  13. Olá, Tem alguma forma de obter a linha digitavel gerada pelo componente? As vezes precisamos apenas apresentar essa informação, ao invés do PDF do boleto. Obrigado
  14. Sim Italo, havia feito isso, mas não resolveu. Olá Waldir, Perfeito, resolvido, obrigado.
  15. Olá Pessoal, Após ultima atualização está apresentando erros na definição do tipo CST IPI, CST PIS e CST COFINS, onde os tipos abaixo não estão mais definidos. CST_IPI := ipiEntradaIsenta; CST_COFINS := cofinsOutrasOperacoes; CST_PIS := pisOutrasOperacoes; [Error] Undeclared identifier: 'ipiEntradaIsenta' Foi refeita toda a compilação/instalação dos componentes via ACBrInstall_Trunk2, mas persiste. Alguém com a solução?
  16. Estou sem certificado no momento para poder fazer testes, mas acredito que a solução seja, após envio/retorno processado, o componente já carregar o arquivo, assim já estará alimentado quando solicitado a impressão.
  17. Pra falar bem a verdade eu não uso a impressão ... Pego o arquivo de pagamento (retorno) e submeto ao software do banco do brasil (a empresa tem conta) paga realizar o pagamento em lote e de forma automatizada ... O próprio software do banco do Brasil faz a impressão com a autenticação. Mas acho que tem o relatório em dois tipos via Fortes e Fast ...
  18. Terá de enviar seus testes em produção mesmo, homologação não funciona ... Até onde sei, caso envie e não efetue o pagamento posteriormente o ambiente de deles exclui a Guia ... Outra, coisa caso envie a mesma Nota verá que sempre será gerado um novo numero de recibo e protocolo ...
  19. Na verdade não deveria ser necessário pois o método enviar já invoca o GerarGNRE, vide trecho abaixo; Acontece que o método deve ser chamado antes de checar as quantidades, logo após o begin. OS commiteres poderiam efetuar a alteração e disponibilizar para atualizar. Obrigado! . function TACBrGNRE.Enviar(Imprimir: Boolean): Boolean; var i: Integer; begin if Guias.Count <= 0 then GerarException(ACBrStr('ERRO: Nenhuma GNRE adicionada ao Lote')); if Guias.Count > 50 then GerarException(ACBrStr('ERRO: Conjunto de GNRE transmitidas (máximo de 50 GNRE)' + ' excedido. Quantidade atual: ' + IntToStr(Guias.Count))); Guias.GerarGNRE; Result := WebServices.Envia; if FGNREGuia <> nil then begin for i := 0 to Guias.Count - 1 do begin if Guias.Items.Confirmada and Imprimir then Guias.Items.Imprimir; end; end; end;
  20. Trunk2 ... Tinha feito a limpeza / instalação completa semana passada para instalar a atualização da GNRE ... Refiz tudo novamente e funcionou ... Tinha feito a limpeza / instalação completa semana passada para instalar a atualização da GNRE ... Refiz tudo novamente e funcionou ... Não tinha tentado pois imaginava não precisar refazer tudo do zero ... Obrigado!
  21. Fiz atualização dos pacotes e instalação via Instalador, durante sua execução deu erro de compilação do pacote DANFERL, retirei a marcação o restante passou normal. Ao tentar instalar manualmente apresenta a incompatibilidade de compilação do pacote ACBr_DFeComum, [Fatal Error] ACBrNFeDANFeRL.pas(111): Never-build package 'ACBr_DFeComum' must be recompiled Ao tentar compilar o pacote ACBr_DFeComum, apresenta o erro abaixo [Error] ACBrDFeOpenSSL.pas(297): Undeclared identifier: 'NativeStringToUTF8' Alguém passou por isso ou está tendo o mesmo problema e encontrou a solução. Obrigado!
  22. Obrigado, eu havia feito a compilação quando atualizei os fontes Obrigado ... Reporte de um outro erro ... .
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...
The popup will be closed in 10 segundos...