Painel de líderes

Questão: "NT 2018.002 - idCSRT do responsavel técnico pelo aplicativo emissor. Onde adquirir esse codigo?" Resposta SEFAZ/MG em 18/09/2018:

Já notifiquei, aguardando retorno.

Bom dia Marcelo, O caminho é: 1. Instalar na sua maquina o certificado do emitente da NFS-e; 2. Configurar o programa exemplo com os dados do emitente; 3. Iniciar os testes. Não esqueça de altear o programa exemplo, mais precisamente a procedure que alimenta o componente com os dados do serviço, devemos alterar se necessário a alíquota e o código do Item (ItemListaServico), talvez mais algumas informações. Mas isso você vai descobrindo a medida que for realizando os testes. Depois de conseguir enviar o RPS e obter como resposta a NFS-e, Cancelar, Consultar, tudo através do programa exemplo, ai sim você parte para escrever a sua própria aplicação tomando como base o programa exemplo.

Bom dia.. a primeira coisa, que tu vai fazer, é o que a juliana falou, entre no site do acbrMonitor.html e depois entre no link do Gnre. https://acbr.sourceforge.io/ACBrMonitor/GNREGerarGuia.html A primeira coisa, é gerar o Ini.. com os dados. Comece a fazer isso, e va me passando ai como esta fazendo.. No que eu puder ir ajudando, so me falar.. o importante é comecar.. Vai me avisando ai.. Amarildo

Analisei os fontes, e a implementação parece correta... mas decidi não incorporar aos fontes do SVN, pelos seguintes motivos: - O método é exclusivo para a WinCrypt (e Capicom)... não funcionaria no OpenSSL ... Ok, isso também ocorre com o método "SelecionarCertificado", mas esse último método foi herdado do Trunk1 - O método é específico para CNPJ, e a ACBrDFeSSL também suporta Certificados com CPF - A rotina pode ser facilmente implementada na própria aplicação (usando o método: "LerCertificadosStore", e um Loop, e conforme demonstrado abaixo) Enfim... deixo aqui, trecho do código, onde o Loop é implementado, na sugestão proposta, para o caso de alguém tiver interesse de implementar o método na própria aplicação function TForm1.LocalizarNumeroSerieCertificado(ACNPJ: String): String; var I: Integer; ACNPJLocalizar, ACBPJCertificado: String; begin Result := ''; ACNPJLocalizar := OnlyNumber(ACNPJ); if (ACNPJLocalizar = '') then raise EACBrDFeException.Create('CNPJ não informado'); if (Length(ACNPJLocalizar) <> 14) then raise EACBrDFeException.Create('Informar CNPJ com 14 digitos'); ACBrNFe1.SSL.LerCertificadosStore; for I := 0 to ACBrNFe1.SSL.ListaCertificados.Count-1 do begin ACBPJCertificado := OnlyNumber(ACBrNFe1.SSL.ListaCertificados[I].CNPJ); if (ListaCertificados[I].DataVenc >= Date) then if (Copy(ACBPJCertificado, 1, 8) = Copy(ACNPJLocalizar, 1, 8)) then Result := ACBrNFe1.SSL.ListaCertificados[I].NumeroSerie; end; end;

Olá, Verifique: 1 - Se não houve a instalação de alguma nova impressora. 2 - Nas preferências da impressora, se não houve alteração do papel padrão. 3 - Se não houve instalação de algum programa que auxilia na criação de etiquetas.

Usem a impressão em EscPos... é mais rápida, gasta menos papel, é nunca terá esse problema.. Veja esse post com a configuração da impressão do extrato do SAT em Fortes

Opa.. Funciona assim..: tu vai ter um cadastro de Rps, onde sera colocados os dados do movimento da nota de servico. essa rps, tu vai ter um numero sequencial interno.. quando voce enviar a rps, voce recebera de volta os dados, como numero da nota de servico, protoco, etc.. e essa informacoes, tu adiciona na tua rps. Eu prefiro o Certificado em arquivo.

Bom dia.. Outra coisa..importante.. verifique com o webservice de porto alegre, se precisa pedir a homologacao para seu cliente. Algumas prefeituras, pedem que mande email, pedindo homologação e eles enviam alguns dados.. mas depente da prefeitura.. Outra coisa importante, é ter o certificado do seu cliente, em arquivo, pois ai , voce pode fazer os testes de homologação sem precisar estar na maquina do cliente.

Pessoal, o problema parou. Deve ter sido algo na receita. Resolvido.

O campo vOutro possui apenas duas casas decimais.

Bom dia. Você já estudou o manual do ACBrMonitorPlus? https://acbr.sourceforge.io/ACBrMonitor/ACBrMonitor.html Se ainda assim desejar suporte pago, acesse a lista de FreeLancers https://www.projetoacbr.com.br/forum/companies/category/2-consultores/ Att.

Olá... Notificou o problema ao SEFAZ ? Se SIM, obteve alguma resposta deles ?

Notei que a sugestão visa tornar Publica a propriedade ColCheque , que é exclusiva, da classe TACBrCHQImpressoraComum ... Isso pode confundir um pouco o usuário, que pensará que essa propriedade está disponível para todos os modelos... Observe Você pode acessar essa Propriedade com segurança, usando TypeCast... Exemplo: if ACBrCHQ1.CHQ is TACBrCHQImpressoraComum then TACBrCHQImpressoraComum( ACBrCHQ1.CHQ ).ColCheque := 10;

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

Boa tarde Ângelo, Esse provedor não segue o layout da ABRASF. Caso você queira colaborar com o projeto fique a vontade em implementar. Dica: tome como base o provedor Governa ou Equiplano, por exemplo.

Italo, Muito obrigado

Hugo, Favor entrar em contato com a SEFAZ, pois com certeza ela esta aplicando a regra N22b sem antes checar se o Tipo CTe é Complementar ou não.

Correção efetuada, conforme esse tópico:

6.3 - Mostre respeito pelo modo de escrever. Escreva de modo claro, gramaticalmente e semanticamente correto. Não escreva TUDO EM MAIÚSCULAS. Isso é lido como se estivesse gritando e é considerado rude. Favor leia as regras do fórum. Outra coisa, aqui estamos tratando de NFS-e e não MDF-e.

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

Boa tarde.. Me parecer ser problema no Sefaz.. Entre em contato com sefaz do seu estado, e verifique.. blz?

Bom dia, estou tendo o mesmo problema já faz alguns dias no estado do RS, não utilizo o ACBrMonitor.

Bom dia. Deve continuar vindo na tag também, como antes... Seus fontes estão atualizados? Ultima versão 1.2.0.18...

Vamos lá... muito obrigado pessoal pela ajuda inicial.... @Italo Jurisato Junior fiquei com uma dúvida (+ uma) eu sempre vou enviar uma RPS e ter de retorno uma NFSe ??? @Amarildo de Matos qual seria o melhor tipo de certificado ??

Bom dia. Contribuição incluída na fila de análise. Att.

Beleza então Daniel. Muito obrigado! Abraço!

Bom dia. Contribuições adicionadas a fila de análise. Att.

Sim isso mesmo.. lembro que quando escrevi nosso PAF-ECF, também passei por esse problema...

Bom dia.. Nesse caso, sugerio, pedir para o Contador, entrar em contato com o fiscal do Sefaz, e ver o que aconteceu.. mas se tu conseguiu inutilizar, é por que realmente a nota nao foi.. ou é bug do sefaz mesmo..

Bom dia, Eduardo Lins. Existe uma versão mais atualizada para usuários SAC. Para contribuir com o projeto, realizar o downloads, acesso a fórum privativo, conteúdo exclusivo de Vídeo Aulas, resposta no fórum em até 1 dia útil, ACBrMonitorPLUS compilado semanalmente, assine o ACBrSAC, vai estar ajudando o projeto e não é algo obrigatório ou mensal. https://www.projetoacbr.com.br/forum/sac/sobre/

Bom dia Mateus, Favor atualizar os fontes e faça novos testes.

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

Bom dia. Caso desejar implementar basta seguir o manual do banco e após a homologação, anexar os fontes aqui. Att.

Bom dia... Consegui resolver esse problema passando xmlns="http://www.abrasf.org.br/nfse.xsd" nas tags <InfDeclaracaoPrestacaoServico>, <Rps> e <LoteRps>

3.1 - Não faça flooding - Inundar o fórum com posts repetidos, com a mesma dúvida ou as mesmas palavras é chamado de flooding. Isso é proibido. Apenas um post feito no lugar certo é suficiente. Pesquise antes de postar, talvez sua dúvida já está respondida em outro post. Favor leia as regras do fórum. Tópico duplicado em Att.

Bom dia. Como está a propriedade LeCedenteRetorno? Se estiver false, vc deve informar o CNPJ referente a conta nas propriedades do componente. Att.

Amigo, Sugiro, você comprar o kit de cabo, tem no mercado livre. Porque a porta da balança é uma RS485 (igual citado pelo colega Joni) aquele cabo menor é um conversor e não simplesmente um cabo. Para fazer a ligação de 485 direto no computador, existe um kit da toledo que permite fazer essa ligação com uma limitação de até uns 100 metros(se não me engano). Dá uma ligada na Toledo de sua região e converse com alguém do comercial.

@RogerioBusch, você tem o manual dessa balança? Se tem verifique na configuração da balança qual a velocidade que ela esta configurada. Outra coisa importante é verificar no manual ou na configuração dela, se ela esta configurada para trabalhar com impressora. Pois normalmente, esse setup, permite ela enviar o peso na porta serial. Caso não funcione, instale um scanner de porta serial e observe o que a balança esta enviando para a serial do micro. Verifique também se o cabo que esta usando é o da balança. Não é qualquer cabo serial que serve para balança, normalmente o RX e TX são diferente para cada fabricante. Depois desses, vale a pena usar o programa de testes de balança no ACBr, pois nele existe o debug que ajudará a identificar qual o protocolo que a balança esta usando. Att, Fabiano Cunha

Desculpe-me pela demora na resposta da analise de sua contribuição... Notei que os arquivos estão em um formato anterior ao último refactoring que fizemos... ou seja... não é possível incorporá-los aos fontes do SVN... Veja um exemplo, das declaração das novas classes: TACBrBALToledo2180 = class(TACBrBALClass) public constructor Create(AOwner: TComponent); procedure LeSerial( MillisecTimeOut : Integer = 500) ; override; function InterpretarRepostaPeso(aResposta: AnsiString): Double; override; end;

Isso aí não tem o escopo que você pretende não: "Sleep(1000)" - manda o programa tirar um soneca de 1000 clics, não sou bom nessa conta mas acho que dá 1 segundo. " Open "C:\ACBrMonitorPLUS\Projetos\ACBrMonitorPLUS\Lazarus\ENT.TXT" For Output As vNRFreeFilevOut + 1" - Abre o um espaço na memória chamado vNRFreeFilevOut + 1, nome não recomendável por sinal, para salvar no arquivo cujo path foi informado. "Print vNRFreeFilevOut + 1, "ACBr.lerini"" - Escreve no espaço aberto os dizeres Acbr.lerini Close vNRFreeFilevOut + 1 - Fecha o espaço aberto na memória e salva tudo em C:\ACBrMonitorPLUS\Projetos\ACBrMonitorPLUS\Lazarus\ENT.TXT Tem muito tempo que não mexo com vb mas você deve procurar pela net aí uma rotina pra ler/editar arquivos do tipo INI.

Essa é a resposta padrão, porque pelo menos em teoria, ao adicionar o TField, o Delphi deveria detectar o tipo e os tamanhos corretos. Assim essa diferença deixa de existir. Se isso resolveu, que ótimo! Só dois toques... Me parece que você está convertendo o campo para o mesmo tipo que ele já é... não faz muito sentido. Você também está usando o evento "onShow". Acho que teria mais sentido usar o evento "onCreate". Ao invés de adicionar o campo automaticamente (usando "Add fields..."), crie o campo manualmente selecionando o tipo e size correto (usando "New Field..."). Na tela de adicionar novo campo, você pode escolher o tipo que deseja e alterar o size, sem ter que alterar no código. Não se preocupe muito. Só não esqueça das nossas regras. Bom trabalho por aí.

Pessoal, para poder resolver para o meu cliente eu inutilizei a nota pois como disse no inicio ela não constava na Sefaz e nem na Receita. Agora só queria entender e saber o porque de não constar quando retornou como Denegada e sem protocolo. Se alguém tiver passado pelo mesmo problema e puder ajudar, agradeço muito. Agradeço a ajuda e atenção do Amarildo e do Felipe.

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

Boa tarde Adilson, O que lhe passei é como obter o retorno de envio de um evento, não importa se o evento é de encerramento, cancelamento ou outro qualquer. Quanto ao retorno do envio de um MDF-e, abra o programa exemplo do componente ACBrMDFe e veja o conteúdo do botão [Criar e Enviar] lá tem o que você deseja. Quanto ao retorno do consultar vide o botão [Consultar carregando XML] do programa exemplo.

Te agradeço pela dica Amarildo, mas utilizei as linhas de comando que Italo enviou e já deu certo. Muito Obrigado Italo, essas linhas trouxeram exatamente o retorno da forma que eu buscava, inclusive o arquivo xml e nome do arquivo. Muito obrigado pela informação. Só pra completar, quando esse retorno vem do encerramento, da consulta e do envio, passa pra mim uma linha de sintaxe de cada exemplo.

Bom dia Adilson, Para obter os dados de retorno de envio de um evento é da seguinte forma: sProtocolo := ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[ 0 ].RetInfEvento.nProt; sStat := ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[ 0 ].RetInfEvento.cStat; sMotivo := ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[ 0 ].RetInfEvento.xMotivo; dhEvento := ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[ 0 ].RetInfEvento.dhRegEvento;

O serial do POS vc cria um cadastro no seu sistema porque em produção será fixo, o estabelecimento terá que ter cadastrado todos os POS para poder selecionar em qual será realizada a transação. Somente em homologação que precisa ser aleatório. Inclusive na homologação tive que mostrar a janela onde cadastra os POS Espero ter ajudado a voce e outros colegas que visualizarem este post, pq no inicio também tive dificuldade de entender, as informações a respeito do MFE estão muito truncadas, mas acaba no final sendo mais simples do que se imagina, ainda mais com o componente ACBr , fica tranquilo.

Na teoria, o POS vai se comunicar com o servidor do SEFAZ para fazer esse cruzamento, ai seu aplicativo vai receber o retorno, com os dados enviados pelo POS ao servidor do SEFAZ. Não sei como vc fez com o simulador, mas os passos corretos são: -enviapagamento, -abre simulador e cola no numero serial o serial aleatório que vc enviou no enviapagamento, -clica em 1-VFP-e,depois em 2-Pagar -Volte no seu aplicativo e faça o verificastatus, -emita o CF-e -envie a respostafiscal com a chave de acesso do CF-e e armazena o IDrespostafiscal no banco de dados. Um detalhe que vale avisar, durante a homologação, foi forçado que houvesse o retorno "queue", isto é, o integrador não conseguiu verificar o retorno do POS, o que pode acontecer na prática, e nesse caso deve ser mostrada na tela uma janela com os dados para o usuário digitar, sendo o NSU, Qtd de parcelas e Bandeira são obrigatórios. Com esses dados digitados pelo usuário prossegue a impressão do CF-e e respostafiscal normalmente.

Bom dia a todos, Vocês chegaram a notar que existe um arquivo chamado DistribuicaoDFe.txt dentro da pasta: ...\Exemplos\ACBrDFe\ACBrNFe ? Vocês leram a NT que mencionei em postagens anteriores? Você entenderam que ao executar pela primeira vez o DistribuicaoDFe o que se obtêm são os resumos das notas (semelhante ao ConsultarNFeDest)? E que ao executar o DistribuicaoDFe pela segunda (ou terceira) vez o que se obtêm são os XML completos das notas manifestadas (semelhante ao Download)? Exemplo pratico: Suponha que foram emitidas 70 notas contra o seu CNPJ. UltNSU = 0 DistribuicaoDFe( cUF, CNPJ, UltNSU, '' ); // onde cUF e CNPJ são do destinatário da mercadoria Teremos como resposta 50 resumos de notas UltSU = ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.ultNSU; DistribuicaoDFe( cUF, CNPJ, UltNSU, '' ); Teremos como resposta os 20 resumos de notas restantes, uma vez que foram emitidas 70 notas contra o seu CNPJ, lembra? UltSU = ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.ultNSU; Note que toda vez que executamos o DitribuicaoDFe devemos ler o valor de UltNSU pois sempre vamos usar essa informação na próxima vez que ele for executado. Como eu sei que não tem mais resumos de notas, simples: if ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.cStat = 137 then sTemMais := 'N' else sTemMais := 'S'; Se o Status for 137 significa que não tem mais documentos a serem lidos, logo devemos esperar por 1 hora para executar novamente o DistribuicaoDFe. Bom, agora você deve realizar a manifestação das 70 notas cujos resumos foram retornados pelo DistribuicaoDFe. Manifestado todas eles devemos executar: DistribuicaoDFe( cUF, CNPJ, UltNSU, '' ); // lembre-se o valor de UltNSU se refere a última execução do DistribuicaoDFe, pois este sempre retorna o um novo valor para UltNSU, veja a linha abaixo. UltSU = ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.ultNSU; As duas linhas acima deve-se serem executadas até que o Status seja 137. Depois de manifestar as 70 notas (segundo o nosso exemplo) nessas ultimas execuções do DistribuicaoDFe podemos obter os XMLs completos dessas notas, bem como novos resumos de mais notas, resumos de eventos e até o XML completo de Eventos dessas notas manifestadas. Os XML completos das notas, serão salvos em disco desde que a propriedade: Configuracoes.Arquivos.Salvar tenha o valor True e esses XML serão salvos na pasta pré definida em PathDownload. Bom agora é com vocês, arregace as mangas e bom trabalho.