Ir para conteúdo
  • Cadastre-se

Mario Inacio

Membros Pro
  • Total de ítens

    361
  • Registro em

  • Última visita

  • Days Won

    1

Tudo que Mario Inacio postou

  1. Boa tarde. Vou relatar o ocorrido e posto o retorno.
  2. Bom dia Italo. Agora instalou certinho. Quando aos erros na impressão, ficou apenas com problema no Valor do ISS, que mesmo enviando está saindo zerado. O XML de retorno da Betha traz zerado o valor do ISS, mas na impressão pelo Fly, imprime o valor certinho. Poderia implementar no código que se percentual de ISS for diferente de zero e valor do ISS for zero, faz o calculo para impressão. Segue em anexo o DANFSE gerado pelo ACBr apos a aprovação e impresso pelo Fly, e o xml de retorno do Fly. Impressao Betha.pdf 92347887813973-lista-nfse-con-lot.xml Impressao ACBr.pdf
  3. Bom dia. Mesmo com a opção marcada, continua acusando erro.
  4. Bom dia. Removi toda a pasta ACBr, baixei novmente e apresenta esse erro de compilação. Compiling package Z:\dev\acbr\Pacotes\Delphi\ACBrDFe\ACBrNFSeX\ACBr_NFSeX.dpk "C:\Program Files\Borland\Delphi7\bin\dcc32.exe" "Z:\dev\acbr\Pacotes\Delphi\ACBrDFe\ACBrNFSeX\ACBr_NFSeX.dpk" Borland Delphi Version 15.0 Copyright (c) 1983,2002 Borland Software Corporation Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(80) Error: ')' expected but ',' found Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(82) Error: ';' expected but 'IF' found Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(86) Error: ')' expected but ',' found Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(89) Error: '.' expected but ';' found Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(91) Error: This form of method call only allowed in methods of derived types Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(94) Error: Undeclared identifier: 'xDiscriminacao' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(94) Error: Undeclared identifier: 'NFSe' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(94) Error: Missing operator or semicolon Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(95) Error: Undeclared identifier: 'J' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(99) Error: Undeclared identifier: 'xDescricao' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(99) Error: Undeclared identifier: 'ExtraiValorCampo' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(104) Error: Undeclared identifier: 'xItemServico' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(105) Error: Undeclared identifier: 'fQuantidade' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(105) Error: There is no overloaded version of 'StrToFloatDef' that can be called with these arguments Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(106) Error: Undeclared identifier: 'fValorUnitario' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(106) Error: There is no overloaded version of 'StrToFloatDef' that can be called with these arguments Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(107) Error: Undeclared identifier: 'fValorServico' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(107) Error: There is no overloaded version of 'StrToFloatDef' that can be called with these arguments Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(108) Error: Undeclared identifier: 'fValorBC' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(108) Error: There is no overloaded version of 'StrToFloatDef' that can be called with these arguments Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(109) Error: Undeclared identifier: 'fAliquota' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(109) Error: There is no overloaded version of 'StrToFloatDef' that can be called with these arguments Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(111) Error: 'DO' expected but identifier 'Servico' found Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(113) Error: Undeclared identifier: 'Descricao' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(114) Error: Undeclared identifier: 'ItemListaServico' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(115) Error: Undeclared identifier: 'Quantidade' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(116) Error: Undeclared identifier: 'ValorUnitario' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(117) Error: Undeclared identifier: 'ValorTotal' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(118) Error: Undeclared identifier: 'ValorBCINSS' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas(119) Error: Undeclared identifier: 'Aliquota' Z:\dev\acbr\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.Provider.pas(111) Fatal: Could not compile used unit '..\..\..\..\Fontes\ACBrDFe\ACBrNFSeX\Provedores\Betha.LerXml.pas'
  5. Bom dia. Estou implementando, usam Betha. [4321667] Nome=Tres Cachoeiras UF=RS Provedor=Betha
  6. Bom dia. Sombrio SC
  7. Boa tarde. Tambem me deparei com a mesma situação na cidade de Três Cachoeiras, em que o cliente pelo site insere varios itens e pelo acbr vai somente um.
  8. Ola Diego. Estou testando na cidade de Três Cachoeiras, Provider Betha. Sim, utilizo a collection erro e alertas, mas para verificar erros nos dados. Quando ficar pendente de aprovação o Erros[0].codigo será sempre 'E92' para todos os providers?
  9. Havia esquecido de ativar o PRO, agora finalizei o cadastro.
  10. Bom dia. Podem mover o tópico para o Fórum PRO ?
  11. Boa tarde. O método ConsultaSituacao examina o campo situação retornado no xml, ocorre que o xml não tem essa informação e a propriedade "situcao" fica sempre como vazio "". Nela, eu teria a informação de que o lote foi recebido e/ou processado. Dessa forma, não consigo analisar em que estágio o mesmo está. 38-env-lot.xml 38-rec.xml 142562155020261-con-sit.xml 142562155020261-sit.xml
  12. Bom dia. Estou emitindo o DANFSE com Fortes e algumas informações no mesmo, não estão saindo de acordo. 1) A Discriminação dos Serviços está num formato confuso, não respeitando as colunas de cada campo. 2) Incentivador Cultural, mesmo enviando como Não, na impressão emite como Sim 3) Valor do ISS sai zerado, mesmo enviando o valor corretamente. Estranho que o XML gerado pelo Fly, está com o valor zerado, mas a impressão no Fly, gera o imposto. Arquivos de log, xml e PDF, gerados tanto pelo Fly quanto pelo ACBR. log.rar Fly - 104.pdf Fly - LoteNfse_763582639_1664197552940.xml ACBR - 4222090463269600012056000000000000104-nfse.pdf ACBR - 4222090463269600012056000000000000104-nfse.xml
  13. Boa tarde Renato. Concluir os testes de emissão, cancelando e consulta, e como usam o Padrão Betha, tudo funcionando perfeitamente.
  14. Boa tarde Italo. Testado e aprovado. Obrigado pela atenção
  15. Claro, como mencionei, inclui a linha apenas para testar e ter certeza do local da exceção
  16. Ola Italo. O problema está no retorno da cidade atribuída pela BETHA como demonstração, alterei a função abaixo pra teste e finalizou corretamente. procedure TNFSeR_ABRASFv1.LerEnderecoPrestadorServico(const ANode: TACBrXmlNode; aTag: string); var AuxNode: TACBrXmlNode; xUF: string; CodigoIBGE: Integer; begin if not Assigned(ANode) or (ANode = nil) then Exit; AuxNode := ANode.Childrens.FindAnyNs(aTag); if AuxNode <> nil then begin with NFSe.Prestador.Endereco do begin Endereco := ObterConteudo(AuxNode.Childrens.FindAnyNs('Endereco'), tcStr); Numero := ObterConteudo(AuxNode.Childrens.FindAnyNs('Numero'), tcStr); Complemento := ObterConteudo(AuxNode.Childrens.FindAnyNs('Complemento'), tcStr); Bairro := ObterConteudo(AuxNode.Childrens.FindAnyNs('Bairro'), tcStr); CodigoMunicipio := ObterConteudo(AuxNode.Childrens.FindAnyNs('CodigoMunicipio'), tcStr); if CodigoMunicipio = '' then CodigoMunicipio := ObterConteudo(AuxNode.Childrens.FindAnyNs('Cidade'), tcStr); UF := ObterConteudo(AuxNode.Childrens.FindAnyNs('Uf'), tcStr); if UF = '' then UF := ObterConteudo(AuxNode.Childrens.FindAnyNs('Estado'), tcStr); CodigoPais := ObterConteudo(AuxNode.Childrens.FindAnyNs('CodigoPais'), tcInt); CEP := ObterConteudo(AuxNode.Childrens.FindAnyNs('Cep'), tcStr); {aqui a variavel CodigoIBGE está recebendo o conteudo DEMO retornado pela Betha} CodigoIBGE := StrToIntDef(CodigoMunicipio, 0); {Inclui a linha abaixo para testar e finalizou sem problemas, mostrando o preview correto} if CodigoIBGE = 1000001 then CodigoIBGE := 4217709; if CodigoIBGE > 0 then xMunicipio := ObterNomeMunicipio(CodigoIBGE, xUF); if UF = '' then UF := xUF; end; end; end;
  17. Analisando a ConsultaLote verifiquei que o mesmo inclui no XML, a tag OrgaoGerador, que provavelmente é alterada para CodigoMunicipio=1000001 por ser em homologação. Debugando, o erro de UF inválido é gerado na função TACBrIBGE.ObterCidades, pois chegou a UF como '10' 833180577837646-lista-nfse-con-lot.xml
  18. Bom dia. Alguem já passou por esse erro? Dessa forma, a NFS-e está registrada na Prefeitura mas no componente retornou erro e não gera o XML.
  19. O estranho é que consultando o portal da Betha, modo homologação, a Nota esta lá.
  20. Boa tarde. Estou executando testes pelo Demo e visualmente, o lote enviado está correto, mas gera esse erro ao consultar o Lote. Estou desde cedo a procura da solução, mas não encontrei nada no Fórum. O que pode ser? Requisição Ambiente: 2 Cidade : Sombrio/SC Provedor: Betha Versão: 1.00 Método Executado: Enviar Lote Parâmetros de Envio Numero do Lote: 56 Parâmetros de Retorno Data de Envio : 19/09/2022 Numero do Prot: 159459638270128 Numero da Nota: Link : Código Verif. : Sucesso : True Método Executado: ConsultarSituacao Parâmetros de Envio Numero do Prot: 159459638270128 Numero do Lote: 56 Parâmetros de Retorno Situação Lote : 4 Sucesso : True Método Executado: ConsultarLote Parâmetros de Envio Numero do Prot: 159459638270128 Numero do Lote: Parâmetros de Retorno Situação Lote : Sucesso : True Resumo(s): Numero Nota : 33 Código Verificação: XILLFCKYX Numero Rps : 56 Série Rps : NF --------- Erro(s): Código : X999 Mensagem: Erro de Conexão: Código da UF: 10 inválido Correção: --------- NFS-e Numero....: 33 Cod. Verificacao: XILLFCKYX Prestador.......: ALDUS INFORMATICA LTDA - ME Tomador.........: INSCRICAO DE TESTE 56-env-lot.xml 56-rec.xml 159459638270128-con-lot.xml 159459638270128-con-sit.xml 159459638270128-lista-nfse-con-lot.xml 159459638270128-sit.xml
  21. Boa tarde. Use a função Poem_zeros do ACBRUTIL para preencher a esquerda com zeros.
  22. Bom dia. A implementação ficou correta mas somente para quando o emitente for de SC. Num caso específico que tenho, a empresa é do RS e a abriu uma conta na Unicred de SC, então a regra criada não é executada. A regra deveria estar vinculada ao estado da Agência emissora, mas de qualquer forma contornei o problema, já preenchendo o campo com 15 caracteres.
  23. Bom dia. Isso, passei o NumeroDocumento com zeros a esquerda. Obrigado
  24. Bom dia. Recebi o Manual da Unicred, e na página 10 cita o alinhamento a direita. Cobexpess - Boleto padrao + Layout 240.pdf
×
×
  • 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.