Ir para conteúdo
  • Cadastre-se

Painel de líderes

Conteúdo popular

Showing content with the highest reputation on 02-07-2019 em todas as áreas

  1. Boa tarde, Quando o fornecedor emite uma nota fiscal, essa nota é enviada para SEFAZ do estado e a mesma se encarrega de enviar para o ambiente nacional*. Feito isso, o ambiente nacional criará um NSU com o resumo dessa nota fiscal e disponibiliza através do Web-Service de DistribuicaoDFe. O seu software irá localizar esse resumo através do método DistribuicaoDFePorUltNSU. Com o resumo em mãos seu software irá realizar a manifestação do destinatário... Ao fazer isso, o ambiente nacional irá criar um novo NSU, agora com a nota completa. E novamente você executará o método DistribuicaoDFePorUltNSU ou DistribuicaoDFePorChaveNFe. *O tempo entre a SEFAZ do estado enviar a nota e o Ambiente Nacional receber e disponibilizar varia muito... Aqui no Paraná vejo um média de 2 horas. mas já vi relatos aqui no fórum que pode levar até 24 horas. Vou deixar um tópico abaixo que detalha melhor o funcionamento:
    3 pontos
  2. José fiz o teste deu certo, realmente agora é necessário informar o xml de cancelamento, muito obrigado.
    3 pontos
  3. Bom dia a todos, Devido ao tamanho do projeto com que trabalho, eu possuia muitos problemas relacionados ao code insight (auto complete) do Delphi. Muitas vezes a IDE acabava parando de responder e por fim eu não utilizava esse recurso pelo fato dele mais atrasar a minha vida do que auxiliar. Nos últimos dias acabei tirando um tempo para tentar achar uma solução para este problema e descobri um pacote de correções de bugs que me ajudou bastante, acredito que também possa ajudar outras pessoas que passam pelo mesmo problema. Abaixo coloco dois links, o primeiro possuí uma demonstração de como a perfomance muda após a instalação do bug fix e o segundo que contém os links de download dos pacotes: http://www.delphifeeds.com/go/s/73508 https://www.idefixpack.de/blog/2019/03/ide-fix-pack-6-4-2-released-bugfix-release/
    3 pontos
  4. Bom dia, lailton. Veja o tópico abaixo:
    3 pontos
  5. Bom dia! [Resolvido...] Depois de pesquisar e entender o que estava acontencendo que consegui resolver. Acho que o problema era que as frx*.bpl do Fortes Report q estavam nas pastas do Windows (Sistem32 e SysWOW64 ). Fiz a substituição e funcionou normalmente. Para facilitar é bom apaga-las, executando os seguinte comando no cmd: cd\ del frx*.bpl /s O post que resolveu meu problema de vez foi o seguinte: Veja nas últimas 3 paginas finais.
    3 pontos
  6. Não uso MySQL, mas uso Firedac. Ele tem uma função para recuperar conexões que foram perdidas e isso dá para implementar de forma automática, verificando se a conexão quebrou e reestabelecer ela. Veja o link abaixo e tenho certeza que resolverá seu problema. http://docwiki.embarcadero.com/RADStudio/Rio/en/Recovering_Connection_(FireDAC)
    3 pontos
  7. Olá pessoal, Quem atualizou os fontes e reinstalou a Suite ACBr, pode ser que esteja recebendo essa mensagem de erro no momento que vai gerar a NF-e / CT-e / MDF-e / BP-e. Porque esta mensagem esta aparecendo para alguns e para outros não? Simples, quando o XML é gerado com base em alguns dados do documento fiscal é gerado a chave do mesmo. Essa mensagem de erro é devido a uma validação que foi implementada na função que gera a chave. Essa validação visa garantir que a sua Nota (por exemplo) não seja rejeitada pela regra de validação B03-10 que consta na Nota Técnica 2019/001. Como vocês podem ver na imagem acima, a aplicação dessa regra é obrigatória, ou seja, todas as SEFAZ-Autorizadoras devem implementar essa regra. Ela será implementada no dia 01/07/2019 no ambiente de Homologação e no dia 02/09/2019 no ambiente de Produção. A validação que foi implementada ao gerar a chave é exatamente a descrita na regra, ou seja, o valor de cNF não pode ser igual a nNF e a nenhum dos números listados na regra. Por curiosidade resolvi pegar o Manual da NF-e mais antigo que tenho (Março de 2009) veja o que esta escrito na definição do campo cNF: O Manual deixa claro que o numero atribuído a cNF tem que ser um numero aleatório. Portanto quem costuma atribuir a cNF o mesmo numero atribuído a nNF esta fazendo errado e agora não vai ter perdão, pois se insistir a SEFAZ não vai aceitar a nota. Mas a regra B03-10 da Nota Técnica 2019/001 não se refere apenas a NF-e / NFC-e? Sim, mas tenham certeza que essa regra de validação em breve vai ser implementada para os demais DF-e - Documentos Fiscais Eletrônicos. Alguém duvida disso? O que devo fazer para que a minha aplicação não pare com a mensagem de erro: Código Numérico inválido, Chave não Gerada ? Muito simples, vou dar como exemplo o fragmento de código da minha aplicação: Como é hoje, note que eu já gerava o código como sendo um numero aleatório: NotaFiscalVenda := (DM_VEN.NotasDocumento.AsInteger + 1); CodigoChave := Random(99999999) + 1; // +1 para garantir que não seja zero Como vai passar a ser, para ter uma garantia maior ainda: NotaFiscalVenda : =(DM_VEN.NotasDocumento.AsInteger + 1); CodigoChave := GerarCodigoDFe(NotaFiscalVenda); A função GerarCodigoDFe esta definida na Unit ACBrDFeUtil, logo você vai ter informar essa Unit em Uses do seu Form. Note que ela recebe como parâmetro o numero da nota, pois a função vai gerar o código aleatoriamente e vai validar o mesmo e pela regra o código não pode ser igual ao numero da nota. De forma semelhante você terão que fazer o mesmo nas suas aplicações que emitem CT-e, MDF-e e BP-e. É preferível fazer essa correção na aplicação agora do que receber dezenas ou até centenas de ligações de clientes que não estão conseguindo autorizar os seus documentos na SEFAZ. Fica ai a dica.
    2 pontos
  8. Boa tarde Dercide, Realmente parece que não esta obedecendo a configuração. Vou analisar o problema.
    2 pontos
  9. Pessoal uma dica que me tomou meu tempo e agora vou compartilhar com vocês pra não tomar o de vocês, pra resolver esse problema é só informar o Ide.cNF := 0 que o próprio ACBR gera uma chave com o código numérico válida, eu fiz aqui e deu certo.
    2 pontos
  10. Carlos bom dia. veja isso. aqui eu resolvi assim:
    2 pontos
  11. Bom dia, ultrasevenjundiai. A solução do seu problema está no tópico abaixo: Tópico movido para a área do SAC, para que o SLA de respostas seja considerado
    2 pontos
  12. 2 pontos
  13. Verificado os fontes e efetuado os testes, está correto. Eu quem agradeço, peço desculpas pela demora para o retorno!
    2 pontos
  14. Bom dia meu caro! Luciano de Oliveira, muito obrigado por este post, salvou minha vida, pois ja estava a 3 dias sem solução. Meus agradecimentos.
    2 pontos
  15. Ta valendo o que essa resposta ? "100 pi k" isso ?
    2 pontos
  16. Tatiane, Favor atualizar os fontes e faça novos testes.
    2 pontos
  17. Perfeito Marcelo, Resolveu meu problema. Muito obrigado.
    2 pontos
  18. Boa tarde, Segue alteração no registro P100 para gerar de acordo com o Leiaute e não mais pelo período, pois quando for situação especial o período de 2018 poderá ser gerado no leiaute 004, conforme destacado abaixo: Segue Fonte: ACBR.rar
    1 ponto
  19. Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.
    1 ponto
  20. Boa tarde Igor, Analisando o código abaixo que se encontra na unit ACBrCTeDACTeRLClass, o componente deveria salvar em disco os PDF de cada CT-e carregado no componente. O local onde será salvo é definido na propriedade de configuração PathPDF e os nomes dos PDF seguem o seguinte formato: <chave>-cte.pdf for i := 0 to TACBrCTe(ACBrCTe).Conhecimentos.Count - 1 do begin FPArquivoPDF := PathWithDelim(TACBrCTe(ACBrCTe).DACTE.PathPDF) + OnlyNumber(TACBrCTe(ACBrCTe).Conhecimentos.Items[i].CTe.infCTe.ID) + '-cte.pdf'; TACBrCTe(ACBrCTE).Conhecimentos.Items[i].NomeArqPDF := FPArquivoPDF; // if i < TACBrCTe(ACBrCTe).Conhecimentos.Count - 1 then // FPArquivoPDF := FPArquivoPDF + sLinebreak; case TamanhoPapel of tpA5: TfrmDACTeRLRetratoA5.SalvarPDF(Self, TACBrCTe(ACBrCTe).Conhecimentos.Items[i].CTe, FPArquivoPDF); else TfrmDACTeRLRetrato.SalvarPDF(Self, TACBrCTe(ACBrCTe).Conhecimentos.Items[i].CTe, FPArquivoPDF); end; end;
    1 ponto
  21. Use a força... leia os fontes function TACBrSAT.CancelarUltimaVenda: String ; var dadosCancelamento : string; begin CFe2CFeCanc; // Atualiza para chave carregada para o cancelamento dadosCancelamento := CFeCanc.GerarXML( true ); // True = Gera apenas as TAGs da aplicação Result := CancelarUltimaVenda( CFeCanc.infCFe.chCanc, dadosCancelamento); end ; ACBrSAT1.CFeCanc é o Objeto que contêm as informações de envio e recebimento do XML de Cancelamento O travamento pode ser algo errado na configuração da DLL... No Emulador do Sefaz, realmente ele trava quando em modo Debug... mas basta mandar continuar
    1 ponto
  22. Boa tarde sr @Italo Jurisato Junior. Primeiramente muito obrigado pela resposta e sua atenção. Realmente houve uma falha de minha parte. Faltou carregar as propriedades do componente! SSLCryptLib, tinha esquecido de alimentar essas informacoes antes de ler o certificado! Muito Obrigado!
    1 ponto
  23. 1 - Instale a impressora no Servidor... Teste a impressão do Windows 2 - Instale a impressora no Terminal, usando recurso de Impressora em Rede, do Windows... Teste a impressão... 3 - Em ambas as máquinas, acesse a impressora palo ACBr, usando nome da mesma no Windows "RAW:Nome_Impressora"
    1 ponto
  24. Gilvano, Muito obrigado pela colaboração, já enviei para o repositório.
    1 ponto
  25. Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.
    1 ponto
  26. Boa tarde Milton, Uma solução a custo zero existe sim. Em vez do Delphi você pode baixar e instalar o Lazarus que é gratuito. Como os DA - Documentos Auxiliares (DANFE, DACTE, etc) são feitos em Fortes Report, você baixar e instalar o Fortes Report CE que é gratuito. Os fontes do ACBr (que são gratuitos), você já baixar pelo Tortoise. Para você ter uma versão mais recente do Demo_ACBrNFSe compilado é muito simples. 1. Baixe e Instale o Lazarus; 2. Baixe e Instale o Fortes Report CE; 3. Atualize os Fontes do ACBr através do Tortoise; 4. Instale a Suite ACBr no Lazarus, essa é a parte mais trabalhosa, pois não existe um instalador, logo vai ter que instalar pacote por pacote. Para saber a ordem dos pacotes, basta seguir a ordem que consta no PDF - Bem_Vindo_ao_Trunk2. Por fim, basta abrir o projeto do Demo_ACBrNFSe no Lazarus e compilar o mesmo. Espero ter ajudado.
    1 ponto
  27. Se você está declarando a MidasLib, o seu aplicativo não vai usar a DLL como diz a documentação: Como algumas versões do Delphi costumam ter problemas na MidasLib sugiro você fazer um teste. Remova a declaração da MidasLib e coloque na mesma pasta do seu executável a Midas.DLL que veio com o seu Delphi. Se for possível, tente com uma versão mais nova.
    1 ponto
  28. Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.
    1 ponto
  29. Bom dia. Por favor anexe o arquivo alterado e um pdf com exemplo de como ficou após a alteração. Att.
    1 ponto
  30. Bom dia, NO momento não tem ninguém trabalhando nisso ou mesmo nos planos recentes (no que se refere ao time ACBr). Att.
    1 ponto
  31. Acho que não. quase certo que tem a ver com assinatura do executável. veja se o virus windows defender está rodando. também rode como administrador sua aplicação
    1 ponto
  32. Qual dataset esta usando? Foi mal, depois que postei a pergunta imaginei q deve ser o TClientDataset, mas como não tive contato com as versões mais novas do Delphi fiquei curioso... Att Ricardo
    1 ponto
  33. Não há o que possa ser feito do nosso lado... o problema está no serviço do SEFAZ... Tente você mesmo acessar a URL dos fontes, pelo navegador...
    1 ponto
  34. Boa tarde Milton, Vamos ver se eu entendi o que você deseja. Você deseja uma aplicação que emite Nota Fiscal de Serviço Eletrônica, já compilada para o Windows, correto? E não o arquivo ACBrNFeServicos.ini que contem as URLs de Homologação e de Produção dos Webservices de todas as SEFAZ?
    1 ponto
  35. Boa tarde, ok, agradeço por ser de verdade, porque como nunca tinha recebido e vivo acessando de maquinas diferentes e windows diferentes também fiquei com medo de tantos fork´s que depois roubam dados etc... tipo aqueles de bancos, valeu HASA
    1 ponto
  36. Creio que o recurso pode ser desativado no seu painel de controle do fórum
    1 ponto
  37. Boa tarde Oliveira, Note que essa tag é opcional logo precisamos de um valor para dizer que ela não deve ser gerada. Sendo assim acrescentei o enumerador: prpNenhum que vale zero. Se não é para gerar a tag você deve atribuir esse valor ao respectivo campo ou um dos outros 2 disponíveis. Mesmo assim, muito obrigado por informar que estava gerando de forma errada.
    1 ponto
  38. Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.
    1 ponto
  39. De forma semelhante ao material disponibilizado pela SEFAZ-MG, a SEFAZ-SP também publicou em seu portal a relação das regras de validação facultativas a UF da NT 2019.001 as quais a mesma exigirá. Clique aqui para visualizar a tabela publicada no portal da SEFAZ-SP.
    1 ponto
  40. Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.
    1 ponto
  41. Tópico fechado por falta de retorno do usuário
    1 ponto
  42. Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.
    1 ponto
  43. Douglas, segue código, sofri alguns dias aqui fazendo funcionar, graças a grande documentação fornecida pelo estado. o problema que você deve estar passando é que o requestbody não pode ser um TStringStream, mudei para TStream e começou aceitar, também deixa as configurações como está abaixo, se tiver alguma coisa diferente vai voltar ao erro que esta aparecendo ai, coloca o componente no formulário (idhttp), não coloca nenhuma propriedade e apenas seta como no código abaixo, suave amigo, abraço. var: RequestBody: TStream; lResponse : TStringStream; ZipEncode : String; begin .... // Codifica o zip: ZipEncode := '"' + EncodeFile(NomeZIP) + '"'; // deixa o idhttp dessa forma: lResponse := TStringStream.Create(); RequestBody := TStringStream.Create(ZipEncode, TEncoding.UTF8); try idHttp1.Request.ContentType := 'application/json'; IdHTTP1.Request.CustomHeaders.Clear; IdHttp1.Request.CustomHeaders.AddValue('Accept', 'application/json'); IdHttp1.Request.CustomHeaders.AddValue('Host', 'https://tributario.sef.sc.gov.br'); IdHttp1.Request.CustomHeaders.AddValue('Cache-Control', 'no-cache'); IdHttp1.Request.CustomHeaders.AddValue('Content-Type', 'application/json'); idHttp1.Post('https://tributario.sef.sc.gov.br/api/drcSt/arquivo/ValidarEstrutura', RequestBody, lResponse); lResponse.Position := 0; // Trata o retorno em um richedit: reResp.Lines.LoadFromStream(lResponse); finally lResponse.Free(); end;
    1 ponto
  44. Para programar, costumo ouvir os mortos.?
    1 ponto
  45. Luciano de Oliveira cara muito obg sua dica foi show vlw
    1 ponto
  46. Empresas que tem serviços como o Cosmos da BlueSoft, a MixFiscal ou semelhantes. Aqui no fórum já foi perguntado sobre esse assunto. Acho que se pesquisar por esses nomes você deve encontrar outros relatos ou empresas.
    1 ponto
  47. Bom dia, A final de contas o que você quer emitir, CT-e ou MDF-e? O CT-e é um documento fiscal cujo modelo é 57 e deve ser emitido para acobertar o transporte de cargas. Por outro lado temos o MDF-e - Manifesto Eletrônico de Documentos Fiscais, cujo modelo é 58 e deve ser emitido quando a carga for fracionada e cujo transporte será interestadual. Tem por finalidade agilizar o processo de fiscalização nos postos de fronteira. No Estado de São Paulo fizeram a besteira de obrigar a emissão para transporte intermunicipal também. Entre no Portal Nacional da NF-e, do lado direito temos o logo do MDF-e, clique nele para ter acesso ao Portal Nacional do MDF-e. Baixe a Nota Técnica mais recente para você poder se situar sobre o assunto e não ir na onda de contadores que costumam viajar na maionese e beber gasolina.
    1 ponto
×
×
  • 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...