Painel de líderes

Voltou a funcionar hoje 13/08.

Sim, pode usar o método ACBrNFe.Consultar informando apenas a chave. Veja exemplo no demo.

Boa tarde, Obrigada pela contribuição, adicionada para validação. Att.

Boa tarde pessoal, encontrei a solução aqui. Aumentei o Time Out e tirei a prioridade no envio. Funcionou corretamente agora com o G-mail.

Boa tarde. Aparentemente ninguém teve este problema, sugiro testar o fortes report. Att.

Bom dia! Depois de alguns bons dias, a SEFAZ-MG está operacional agora (homologação e produção). Obrigado.

Bom dia! Nestes casos é melhor ver com o escritório de contabilidade e eles devem te dizer como proceder para fazer a correção. Ai quando você for fazer a nota conforme a instrução da contabilidade e não conseguir preencher os campos conforme a orientação, neste caso fica melhor de ajudar. Estes assuntos são complexos portanto é muito importante a ajuda de um profissional em tributação.

Aproveitando o post, segue outra correção relacionada... O AcBr está preenchendo obrigatoriamente o campo indSitPJ mesmo quando trata-se de um CPF. pcnReinfR1000.pas

obrigado, sugeri eles a fazer a leitura pelo Código do evento e não pela descrição, enviei o xsd e o link do site da receita. pode fechar o topico abs.

Boa tarde Windel, Por favor abra o XML com-lot.xml Note que na razão social consta o carácter "&". Talvez seja ele que esteja causando o erro. Tente novamente sem esse carácter.

[3529302] Nome=Matao UF=SP Provedor=GINFES URL produção=https://producao.ginfes.com.br/ServiceGinfesImpl?wsdl URL homologação=https://homologacao.ginfes.com.br/ServiceGinfesImpl?wsdl Obs: para cancelamento fui informado pelo suporte do provedor que deve ser usado o schemas v2.0 e para envio schemas v3.0 (em anexo) schemas_v300.zip schemas_v200.zip

Bom dia, Segue uma correção para análise da unit pcnGeradorReinf... A função TReinfEvento.GerarIdeContri está gerando o campo nrInsc de maneira errada quando se trata de um CPF. pcnGeradorReinf.pas

Boa tarde Paulo, Muito obrigado pela colaboração, já enviei para o repositório.

Veja o tópico abaixo:

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Se estivesse utilizando uma versão muito antiga do Lazarus, talvez poderia ser esse o motivo, por algum motivo pode ter alterado essa propriedade... Obrigado por reportar...

Esse erro específico é porque foi introduzida nas versões mais recentes do Delphi as "unit scope names". Agora a unit Graphics não existe mais, sendo substituída por VCL.Graphics ou pela FMX.Graphics. Então é preciso tratar isso...

Novamente obrigado pela ajuda, Atualizei meu lazarus para a versão 2.4. De fato, não sei exatamento o que resolveu o problema, ontem fiz algumas tentativas de descritas a seguir, porém, na versão 1.2.0.71 sem sucesso. Exclui o diretorio Trunk 2, baixei o Power PDF v 0.9.15, baixei o Fortes Report, baixei a Trunk2, veio a versão 1.2.0.74 no txt e 1.2.0.75 no executável, compilei e Instalei os pacotes 1 a 1 conforme o manual, compilei o ACBrMonitor.lpi, Compilei o setup e instalei como ADM, e abriu normalmente.

Depois de ficar fuçando, a solução para usar o MFE Elgin com o driver direto é informar a porta COM no arquivo c:\comunicador\coo-ser.ini na chave [SERIAL] na linha COM_PORT = Informar a porta com do MFE. Precisa parar o serviço COMUNICADOR, alterar o ini e iniciar o serviço novamente, com isso o Monitor MFe fica branco e o programa consegue a comunicação direta como explicado neste link

Infelizmente, esse arquivo fr3 não funciona com essa versão porque faz uso dos scripts... Veja esse post em que explico essa diferença:

Esta alteração que enviei, pode desconsiderar. Liguei para o provedor INFISC que me repassaram que existe cidades com web services diferentes. Então, a alteração que eu fiz iria parar de funcionar em outros provedores. Acho que a solução vai ser informar manualmente em cada cidade. Algumas utilizam RecepcaoLoteRPS=https://%NomeURL_P%/portal/Servicos?wsdl outras, RecepcaoLoteRPS=https://%NomeURL_P%/services/nfse/ws/Servicos Solicitei a lista de cidades com os devidos endereços;

Bom dia. Já vi casos de bancos que o validador não validava mesmo conforme o manual, o ideal seria enviar o arquivo para o suporte dos mesmos. Att.

Bom dia. Precisamos rever este tópico, fazendo a troca seu boleto foi validado? Att.

O que parece é que esse webservice não foi atualizado pra versão 4.00 do XML e ainda está esperando um XML SOAP no formato antigo. Você configurou o componente pra versão 3.10?

Eu sugiro desabilitar o "Error Insight". Infelizmente esse é um recurso do Delphi que não funciona muito bem. Esse é o caminho: Menu Tools -> Options -> Editor Options -> Code Insight -> Source file type: escolha "Pascal" -> Error insight (desmarque a opção) Veja a imagem: O problema desse recurso (Error Insight) é que ele trabalha de forma independente do compilador. Então nem tudo que o compilador consegue "compreender", essa ferramenta entende... Parece que há uma previsão no roadmap para a versão 10.4 em que isso vai ser corrigido. Mas até lá, assim que instalo o Delphi eu desabilito essa opção. Recomendo a todos a fazerem o mesmo.

Bom dia, Obrigada pela análise, nosso colega @Italo Jurisato Junior analisará. Att.

Bom dia, Obrigada pela contribuição, adicionada para validação. Att.

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Bom dia Experimente remover o arquivo ACBrMonitor1.lfm e ACBrMonitor1.pas e atualizar novamente pelo SVN. Por aqui não está apresentando problemas, mas atualizei os fontes no repositório novamente...

Bom dia! Seria possível anexar o XM? Ajuda muito na procura do erro.

Boa tarde Felipe, As notas que o seu cliente perdeu, são notas que ele emitiu? Se sim, a única solução é entrar em contato com a SEFAZ e chorar muito para convencer eles a fornecer os XMLs das notas dentro de um determinado período. Agora se o seu cliente tem costume de enviar os XMLs das notas para o Contador e se este não deletou, basta entrar em contato com ele e solicitar os XMls.

Boa tarde Cleiver, Por favor entre em contato com essa empresa de Software contábil e diga que quem esta errado são eles, uma vez que a definição do conteúdo da tag descEvento que consta no schema usando para validar o evento em questão as palavras estão sem acento e sem o cedilha. Veja o fragmento do Schema: e110112_v1.00.xsd <xs:element name="descEvento"> <xs:annotation> <xs:documentation>Descrição do Evento - “Cancelamento por substituição”</xs:documentation> </xs:annotation> <xs:simpleType> <xs:restriction base="xs:string"> <xs:whiteSpace value="preserve"/> <xs:enumeration value="Cancelamento por substituicao"/> </xs:restriction> </xs:simpleType> </xs:element> Resumindo: o XML gerado pelo componente ACBrNFe esta em conformidade com o Schema e que por sinal esta sendo aceito (autorizado) pela SEFAZ. Eles que consertem a rotina do Software deles.

Boa tarde Natanael, A consulta que o BigWings se refere é o método DistribuicaoDFe do componente ACBrCTe. Lembre-se que esse método do ACBrCTe não serve para baixar da SEFAZ os XMLs dos CT-e emitidos pela transportadora que por algum motivo ela tenha perdido. Agora se a ideia é obter o XML para poder dar entrada no contas a pagar do tomador do serviço de transporte de carga ai você vai conseguir baixar os XMLs usando o método DistribuicaoDFe do ACBrCTe. Vamos a um exemplo: Uma Industria compra matéria prima. Com o DistribuicaoDFe do ACBrNFe ela obtém um resumo da nota, para ter a nota completa se faz necessário enviar o evento de manifestação do destinatário e depois com o DistrubuicaoDFe do ACBrNFe obter o XML completo. Favor ler o seguinte artigo: Como obter o XML do Fornecedor. Com o DistribuicaoDFe do ACBrCTe ela obtém o XML completo do CT-e (não se faz necessário o envio de evento de manifestação do destinatário). O DistribuicaoDFe do ACBrCTe funciona de forma semelhante ao do ACBrNFe.

Boa tarde Leandro, Se não me falha a memória o erro 500 é quando o XML enviado não esta em conformidade com o que o webservice espera receber.

Boa tarde Douglas, Favor entrar em contato com o provedor e relatar o problema que esta ocorrendo no ambiente de homologação.

Obrigado, funcionou bzlinha. Esta imprimindo o qrcode ...

Boa tarde Danilo, Muito obrigado pela colaboração, ainda hoje estarei enviando para o repositório.

Boa tarde Marcelo, O que você acha de contribuir com o projeto? Adicione os enumeradores que são necessários, faça os testes e estando tudo OK, anexe a unit alterada para que possamos analisar a sua contribuição. Se estiver tudo OK, enviaremos para o repositório.

Boa tarde Armando, Pela URL me parece que mudaram da versão 1 para a versão 2 do layout da ABRASF. Por favor confirme se ocorreu a mudança de versão. Se sim, será necessário incluir essas URLs no Pronimv2.ini e remover essa cidade do Pronim.ini e alterar o arquivo Cidades.ini

Boa tarde Maiquel, Muito obrigado pela colaboração, ainda hoje estarei enviando para o repositório.

Boa tarde João, Rejeição 999 - Erro não catalogado, é problema na SEFAZ. Favor entrar em contato com eles e relatar o problema.

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Consegui fazer como vc disse, muito obrigado!

foi exatamente o que falei também. esse é o problema de pegar os fontes do ACBr e sair fazendo diversas cópias dentro do micro.

Boa tarde será necessário fazer um trabalho para o Fortes trabalhar em FMX e linux ainda por cima. não será tão trivial

Olá pessoal, O que vem a ser o Evento EPEC? O EPEC permite à empresa solicitar o registro do "Evento Prévio de Emissão em Contingência" anterior à emissão do documento em si com um layout mínimo de informações. O EPEC deve ser enviado para o Ambiente Nacional (AN), utilizando-se o Web Service de Eventos genérico, criado para este fim. Vamos lá, como a coisa funciona. Supondo que o emitente é do Amazonas, temos duas situações. 1. A SEFAZ-AM parou, neste caso o emitente tem que enviar a sua nota para a SVC-RS (SEFAZ Virtual de Contingência do RS), esta por sua vez se encarrega de replica a nota para a SEFAZ-AM assim que ela voltar a funcionar. 2. A internet do emitente parou, neste caso o emitente pode enviar o evento EPEC para a SEFAZ-AN (Ambiente Nacional) através de uma conexão 3G ou 4G (por exemplo) e quando o problema for sanado deve enviar a nota para a SEFAZ-AM. A emissão do EPEC poderá ser adotada por qualquer emissor que esteja impossibilitado de transmissão e/ou recepção das autorizações de uso de suas NF-e, adotando os seguintes passos:  Gerar a NF-e com “tpEmis = 4”, mantendo também a informação do motivo de entrada em contingência com data e hora do início da contingência, com número diferente de qualquer NF-e que tenha sido transmitida com outro “tpEmis”;  Como alimentar o componente para gerar o arquivo XML do EPEC: ACBrNFe1.EventoNFe.Evento.Clear; with ACBrNFe1.EventoNFe.Evento.New do begin infEvento.nSeqEvento := 1; infEvento.chNFe := chaveNFe; infEvento.CNPJ := sCNPJEmitente; infEvento.dhEvento := now; infEvento.tpEvento := teEPECNFe; InfEvento.detEvento.cOrgaoAutor := codUF; // Código do Órgão do Autor do Evento. Nota: Informar o código da UF do Emitente para este evento InfEvento.detEvento.tpAutor := taEmpresaEmitente; // Outras opções: taEmpresaDestinataria, taEmpresa, taFisco, taRFB, taOutros InfEvento.detEvento.verAplic := '2.30'; //Versão do aplicativo do emitente (2.30 é um exemplo) InfEvento.detEvento.dhEmi := dhEmissaodaNota; InfEvento.detEvento.tpNF := tnSaida; // Outras opções: tnEntrada InfEvento.detEvento.IE := sIE; // Inscrição Estadual do Emitente da Nota InfEvento.detEvento.dest.UF := SiglaUF; // Sigla da UF do Destinatário (EX se Operação com Exterior) InfEvento.detEvento.dest.CNPJCPF := sCNPJCPF; // CNPJ ou CPF do Destinatário (Se for estrangeiro atribuir string vazia) InfEvento.detEvento.dest.idEstrangeiro := sEstr; // informar o número do passaporte, ou outro documento legal (Se não for estrangeiro atriburi string vazia) InfEvento.detEvento.dest.IE := sIEDest; // Inscrição estadual do destinatário, se Isento ou não possuir atribuir string vazia InfEvento.detEvento.vNF := valNota; // Valor total da nota InfEvento.detEvento.vICMS := valICMS; // Valor total do ICMS InfEvento.detEvento.vST := valST; // Valor total do ICMS de Substituição Tributária end; iLote := 1; // Numero do Lote do Evento ACBrNFe1.EnviarEvento(iLote); O método EnviarEvento se encarrega de gerar o XML do evento, assinar e enviar para o Webservice de Registro de Eventos do AN - Ambiente Nacional. Se tudo ocorrer conforme esperado será gerado 3 arquivos XML em disco: *-ped-eve.xml (pedido de evento), *-eve.xml (retorno da SEFAZ) e *-procEventoNFe.xml (Processamento do Evento da NF-e). Impressão do DANFE da NF-e que consta do EPEC, em papel comum, constando no corpo a expressão “DANFE impresso em contingência - EPEC regularmente recebida pela Receita Federal do Brasil”. Obtida a autorização do Evento (Número do Protocolo: 891xxxxxxxxxxxx), a exemplo do que ocorre com outros eventos da NF-e, este evento também será distribuído para as UF envolvidas na operação, inclusive para a própria UF do emitente. Após a cessação dos problemas técnicos que impediam a transmissão da NF-e para UF de origem, a NF-e que deu origem a necessidade de uso da Contingência Eletrônica “EPEC” deverá ser transmitida para a SEFAZ de origem, observando o prazo limite de transmissão na legislação, bem como outros procedimentos constantes na legislação caso ocorra rejeição na autorização de uso. Nota: A Chave de Acesso desta NF-e é exatamente a mesma Chave de Acesso do EPEC autorizado anteriormente. Como é utilizado o Web Service genérico de registro de evento é possível registrar os eventos de EPEC para até 20 NF-e diferentes em uma mesma conexão, sendo um EPEC para cada NF-e.

1 = NF-e normal. 2 = NF-e complementar. 3 = NF-e de ajuste. 4 = Devolução de mercadoria. No seu Xml a tag <FinNfe> esta com o valor 3. A NFe de Ajuste serve para ser utilizada em operações sem circulação de produtos, como uma NF de transferência de crédito, crédito de ativo permanente, entre outros, conforme definições do RICMS. Por exemplo, o balanço da empresa no fim do mês não bate, falta ou sobra uma quantia, por isso é preciso que seja feita a NFe de Ajuste do valor que faltou ou que sobrou. Geralmente, a nota de ajuste é emitida no período de análise da contabilidade para gerar as guias de pagamento dos impostos. Texto explicativo completo Se esta nota esta vinculada a uma outra nota de devolução emitida anteriormente, o mais certo e emitir como complementar se no caso estiver o valor do imposto faltando... agora se o imposto declarado na nota estiver acima do real, ai acho melhor fazer isso no fechamento da apuração do mês na contabilidade solicitando o estorno do valor como credito a ser usado no mês sequente.

Modifiquei o Demo... além do "cast" sem teste, ainda havia um "Memory Leak"... eu particularmente, não gosto de métodos que criam e retornam Objetos... (mas foi implementado dessa maneira) procedure TForm1.btMFEEnviarPagamentoClick(Sender: TObject); var PagamentoMFe : TEnviarPagamento; RespostaPagamentoMFe : TRespostaPagamento; begin RespostaPagamentoMFe := Nil; PagamentoMFe := TEnviarPagamento.Create; try with PagamentoMFe do begin Clear; ChaveAcessoValidador := '25CFE38D-3B92-46C0-91CA-CFF751A82D3D'; ChaveRequisicao := '26359854-5698-1365-9856-965478231456'; Estabelecimento := '10'; SerialPOS := InputBox('SerialPOS','Informe o Serial do POS','ACBr-'+RandomName(8)); CNPJ := edtEmitCNPJ.Text; IcmsBase := 0.23; ValorTotalVenda := 1530; HabilitarMultiplosPagamentos := True; HabilitarControleAntiFraude := False; CodigoMoeda := 'BRL'; EmitirCupomNFCE := False; OrigemPagamento := 'Mesa 1234'; end; if ACBrSAT1.SAT is TACBrSATMFe_integrador_XML then RespostaPagamentoMFe := TACBrSATMFe_integrador_XML(ACBrSAT1.SAT).EnviarPagamento(PagamentoMFe) else RespostaPagamentoMFe := ACBrIntegrador1.EnviarPagamento(PagamentoMFe); if Assigned(RespostaPagamentoMFe) then ShowMessage(IntToStr(RespostaPagamentoMFe.IDPagamento)); finally PagamentoMFe.Free; if Assigned(RespostaPagamentoMFe) then RespostaPagamentoMFe.Free; end; end;

Não necessariamente... quem faz a escrita do XML é a Unit pcnCFeW.pas Mas pode confundir o usuário, achar uma propriedade onde ela não deveria estar... Enviei a modificação para o SVN...