Tutorial ACBRMonitorPlus

[rubens]

Olha aí no log que você colocou...
Cadê o arquivo ??

NFE.EnviarNFe()
ERRO: Arquivo n?o encontrado.

Está fazendo algum procedimento que está limpando o conteúdo da variável cXml...


Rubens

[lugab]

Isso mesmo, Rubens e Quintas, eu comi mosca e num trecho qq eu zerava o conteúdo de cXml...
Obrigado...

Aproveitando, acredito que, em modo "Homologação" qualquer ConsultarNFe() retornará sempre o Erro

Rejeicao: NF-e nao consta na base de dados da SEFAZ

Estou certo ?

[JoséQuintas]

Se consultar uma NFE que não está no ambiente homologação... é assim mesmo.

Se emitir uma NFE em homologação e consultar, ok.

Mas isso pode testar diretamente no ambiente oficial.

Não tenham medo de usar o ambiente oficial.
O que não pode é fazer algo assim:

Código: Selecionar todos

FOR nCont = 1 TO 1000000
   ConsultaNfe( x )
NEXT

De resto, é à vontade.

[lugab]

Quintas, não é o inverso não ? Agora eu fiquei confuso..

Achei que por estar em ambiente de "homologação" (em vez de "produção"), as consultas que fiz às notas que enviei resultaram nesse erro

Rejeicao: NF-e nao consta na base de dados da SEFAZ

Achava que, pela lógica, uma Nota só poderia entrar de verdade na base de dados do SEFAZ se ela fosse uma "Nota de Verdade", gerada em modo produção, em vez das que mandei como "simulação" enquanto desenvolvia o meu programa num ambiente de homologação...

[Makom]

Olá todos,
Estou desenvolvendo a integração com o ACBR para emissão de NFe como serviço para outras empresas, porém a minha empresa não possui Inscrição Estadual e todas as notas são rejeitadas no Ambiente de Testes por esse motivo. É possível conseguir o credenciamento para este ambiente de testes sem a IE?

Grato!

[rossine]

Olá pessoal,

Uso o AcbrMonitor para ECF e minha versão é muito antiga. Tentei baixar o novo AcbrMonitorPlus e ele é de dezembro de 2015 e está dando alguns problemas.
Me lembro de baixar os fontes do Acbr através do SVN mas na hora de compilar com o Lazarus, ocorre uns erros falando que não encontrou certos pacotes.

Alguém saberia me dizer como compilar a nova versão do no AbcrMonitor ou teria alguma versão mais recente já compilada ?

Obrigado,

[Jairo Maia]

Olá Makom,

É possível conseguir o credenciamento para este ambiente de testes sem a IE?

Infelizmente não. Para você poder testar NF-e no ambiente de homologação você tem que estar autorizado a emitir NF-e. Para ser autorizado necessariamente precisa ter Inscrição Estadual.

[JoséQuintas]

Acabei não respondendo uma pergunta anterior, e aproveitar pra complementar.

Todo webservice da Fazenda só funciona com certificado.
O certificado não é apenas pra assinar, mas também pra fazer a conexão.

Nota emitida em ambiente de homologação, a consulta também é em homologação.

A consulta é pública, pode consultar qualquer nota, de qualquer um.
Na minha consulta eu faço rodízio de certificado, qualquer certificado pra qualquer nota.

Se quiser também brincar com a classe Sefaz pra consultas....

Código: Selecionar todos

oSefaz := SefazClass():New()
? oSefaz:NfeConsultaProtocolo( "chavedeacesso", "certificado", "1" ) // ou "2" se for homologação

Não precisa informar UF, a classe sabe qual é através da chave de acesso.
A consulta não precisa assinatura, mas precisa certificado pra comunicação funcionar.

[ricardo-barros]

Enviei NFE.StatusServico como teste e obtive o seguinte resultado, apesar da internet estar conectada (abre qualquer site):

ERRO: WebService Consulta Status serviço:
- Inativo ou Inoperante tente novamente.
Erro Interno: 12029
Erro HTTP: 0
Erro: Requisição não enviada.
12029 - Uma conexão com o servidor não pôde ser estabelecida
ERRO: WebService Consulta Status serviço:
- Inativo ou Inoperante tente novamente.
Erro Interno: 12029
Erro HTTP: 0
Erro: Requisição não enviada.
12029 - Uma conexão com o servidor não pôde ser estabelecida
ERRO: WebService Consulta Status serviço:
- Inativo ou Inoperante tente novamente.
Erro Interno: 12029
Erro HTTP: 0
Erro: Requisição não enviada.
12029 - Uma conexão com o servidor não pôde ser estabelecida
ERRO: WebService Consulta Status serviço:
- Inativo ou Inoperante tente novamente.
Erro Interno: 12157
Erro HTTP: 0
Erro: Requisição não enviada.
12157 - Erro no suporte a canais seguros
ERRO: WebService Consulta Status serviço:
- Inativo ou Inoperante tente novamente.
Erro Interno: 12157
Erro HTTP: 0
Erro: Requisição não enviada.
12157 - Erro no suporte a canais seguros

[fladimir]

Vai no Painel de Controle Opções da Internet Aba Avançadas e vai até o final e deixe marcado somente o seguinte

SSL 2.0
TLS 1.0

Verificar se há assinaturas em programas baixados
Verificar se há certificados revoados do fornecedor...

Ok e teste... acredito q resolva...

Aproveitando se alguém tiver um link de como deixar isso configurado/setado via programação seria menos 1 trabalho manual. (assunto pra outro tópico)

[ricardo-barros]

O meu é Windows 10. Eu marquei TSL 1.0 e SSL 3.0 pois 2.0 não tem. Marquei também as outras 2 caixas que você recomendou. Testei e o erro continua.
As outras caixas (mais pra cima) na seção Segurança da aba Avançado da Opções da Internet devem ficar como estavam?

[HASA]

Desmarque SSL 3.0.

HASA

[ricardo-barros]

Não adiantou desmarcar SSL 3.0

Na seção segurança ficaram marcados:
*Avisar quando houver incompatibilidade de endereços de certificado
*Avisar se o envio POST for redirecionado...
*Enviar solicitações Não enviar a sites...
*Habilitar a autenticação integrada do Windows
*Habilitar Armazenamento DOM
*Habilitar filtro smartscreen
*Habilitar proteção da memória p/ ajudar a reduzir ataques
*Habilitar suporte a XMLHTTP
*Usar TLS 1.0
*Verificar se há assinaturas em programas baixados
*Verificar se há certificados revogados do fornecedor

[HASA]

Então pode ser outra coisa, eu uso assim:


Se não tem o 3.0 desconsidere ok. De mais informações se possível.
:xau
HASA

[JoséQuintas]

Vejam se ficou interessante

Código: Selecionar todos

oSefaz := SefazClass():New()

// opcional fazer separado

oSefaz:cCertificado := "nome do certificado"
oSefaz:cAmbiente := "1" // produção
oSefaz:cUF  := "SP"

cXml := "aqui vai o conteúdo do seu xml"

oSefaz:NfeLoteEnvia( cXml, "1" )

hb_MemoWrit( "arquivo.xml", oSefaz:cXmlAutorizado )
oSefaz:SaveDaNFe( "arquivo.pdf" )

Pra curiosidade ou pra resolver algum problema, pode contar com muitas variáveis da classe

Código: Selecionar todos

oSefaz:cStatus
oSefaz:cXmlDocumento
oSefaz:cXmlProtocolo
oSefaz:cXmlRecibo
oSefaz:cXmlEnvio
oSefaz:cXmlRetorno
oSefaz:cXmlSoap
oSefaz:cRecibo
oSefaz:cMotivo
oSefaz:cSoapService
oSefaz:cSoapAction
oSefaz:cSoapURL

É igual pra tudo.
Mas só precisa XML em NFeLoteEnvia(), CTeLoteEnvia(), MDFeLoteEnvia()

É só isso mesmo. É só pegar o que quiser direto das variáveis.