J Pereira

17 Fevereiro, 2016

Sim, tambem já fiz estas coisas todas, já segui os varios exemplos citados aqui e em outros foruns.

E nada... Somente o cliente desesperado sem poder emitir...

17 Fevereiro, 2016

Bom dia amigos

Não deu certo, continua com a mesma mensagem de Inativo ou Inoperante tente novamente

erro interno 12157

erro HTTP: 0

Erro: Requisição não enviada.

12157 - Erro no suporte a canais seguros.

Mais alguma sugestão?

16 Fevereiro, 2016

Régys já tinha verificado o horário, só não verifiquei se estava marcado horário de verão ou não. Vou checar. Grato.

16 Fevereiro, 2016

Vou testar nos clientes. Grato cbrodolfo

16 Fevereiro, 2016

Boa tarde amigos

De domingo zero horas (15/02/16) para cá tenho recebido diversas reclamações de clientes com o erro REQUISIÇÃO NÃO ENVIADA ERRO 12057 OU 12157

Depois de muito pesquisar, resolvi alguns problemas desmarcando a opção USAR REVOGAÇÃO DE CERTIFICADOS. (Internet Explorer/Opções de Internet/Avançadas)

Mantive marcado SSL 3.0 e TLS 1.0

Mantive desmarcado SSL 2.0 e TLS 1.1 e 1.2

Mas ainda tenho alguns clientes, tanto nf-e quanto nfc-e que continua o erro de requisição nao enviada.

Alguns clientes aconteceu domingo, outros segunda e outros hj, terça-feira. Simplesmente de um dia para outro parou de funcionar.

Vcs sabem alguma coisa? O que eu poderia fazer mais?

4 Fevereiro, 2016

Na bucha André. Vc é o kara...

Indaguei o cliente, e ele me disse que até o momento somente digitava cpf e nome avulsos, e que somente agora pegou dados do banco de dados. Então o erro já existia.

Grato pela ajuda de todos.

Bom feriado...

4 Fevereiro, 2016

Obrigado Agnaldo pela ajuda

No cliente instalado até semana passada (janeiro) emitindo normalmente, hoje ocorreu o erro, fiz meu testes e comigo tambem aconteceu. Realmente nao estou entendendo.

Sem cpf/cnpj emite ok, mas com dá erro

Até atualizei os fontes, recompilei, vi que os componentes nfe, escpos e danfecefortes estavam diferentes, reconfigurei e continua na mesma.

O interessantes é isto, debugando, quando assina pela primeira vez, o cnpj tá lá, mas quando assina novamente, dá como nulo, gerando o xml com tag emit vazios.

continuo testando.

Se o seu deu certo, então nao é componente, é sempre assim, o erro está entre a cadeira e o computador. kkkkkkkk

Grato

4 Fevereiro, 2016

Bom dia.

Preciso da ajuda dos amigos com NFC-e identificando destinatário.

Quando informo CPF ou CNPJ, ocorre erro de assinatura, dizendo que o CNPJ do certificado é diferente do cnpj do xml.

Debugando, verifiquei que ao assinar, ele recebe o cnpj correto, mas na rotina de assinar, ele manda gerarXML, que novamente assina, daí já recebe pela segunda vez sem este cnpj no xml.

Algué sabe dizer alguma coisa? Se, o destinatário está emitindo normalmente. Uso o trunk-2.

procedure NotaFiscal.Assinar;
var
XMLStr: String;
XMLUTF8: AnsiString;
Leitor: TLeitor;
CNPJEmitente, CNPJCertificado: String;
begin
// VErificando se pode assinar esse XML (O XML tem o mesmo CNPJ do Certificado ??)
CNPJEmitente := OnlyNumber(NFe.Emit.CNPJCPF);
CNPJCertificado := OnlyNumber(TACBrNFe(TNotasFiscais(Collection).ACBrNFe).SSL.CertCNPJ);

// verificar somente os 8 primeiros digitos, para evitar problemas quando
// a filial estiver utilizando o certificado da matriz
if (CNPJCertificado <> '') and (Copy(CNPJEmitente, 1, 8) <> Copy(CNPJCertificado, 1, 8)) then
raise EACBrNFeException.Create('Erro ao Assinar. O XML informado possui CNPJ diferente do Certificado Digital' + #13+
'CNPJ NOTA ='+ Copy(CNPJEmitente, 1, 8) +#13+
'CNPJ CERTIFICADO='+Copy(CNPJCertificado, 1, 8) );

// Gera novamente, para processar propriedades que podem ter sido modificadas
XMLStr := GerarXML;

// XML já deve estar em UTF8, para poder ser assinado //
XMLUTF8 := ConverteXMLtoUTF8(XMLStr);

with TACBrNFe(TNotasFiscais(Collection).ACBrNFe) do
begin
FXMLAssinado := SSL.Assinar(String(XMLUTF8), 'NFe', 'infNFe');
FXMLOriginal := FXMLAssinado;

Leitor := TLeitor.Create;
try
leitor.Grupo := FXMLAssinado;
NFe.signature.URI := Leitor.rAtributo('Reference URI=');
NFe.signature.DigestValue := Leitor.rCampo(tcStr, 'DigestValue');
NFe.signature.SignatureValue := Leitor.rCampo(tcStr, 'SignatureValue');
NFe.signature.X509Certificate := Leitor.rCampo(tcStr, 'X509Certificate');
finally
Leitor.Free;
end;

// Se for NFCe, deve gera o QR-Code para adicionar no XML após ter a
// assinatura, e antes de ser salvo.
// Homologação: 01/10/2015
// Produção: 03/11/2015

if (NFe.Ide.modelo = 65) and (Configuracoes.Geral.IncluirQRCodeXMLNFCe) then
begin
with TACBrNFe(TNotasFiscais(Collection).ACBrNFe) do
begin
NFe.infNFeSupl.qrCode := GetURLQRCode(NFe.Ide.cUF, NFe.Ide.tpAmb,
onlyNumber(NFe.infNFe.ID), IfThen(NFe.Dest.idEstrangeiro <> '', NFe.Dest.idEstrangeiro, NFe.Dest.CNPJCPF),
NFe.Ide.dEmi, NFe.Total.ICMSTot.vNF,
NFe.Total.ICMSTot.vICMS, NFe.signature.DigestValue);
GerarXML;
end;
end;

if Configuracoes.Arquivos.Salvar and
(not Configuracoes.Arquivos.SalvarApenasNFeProcessadas) then
begin
if NaoEstaVazio(NomeArq) then
Gravar(NomeArq, FXMLAssinado)
else
Gravar(CalcularNomeArquivoCompleto(), FXMLAssinado);
end;
end;
end;

NFCE.XML

rotina destinatario.txt

rotina emitente.txt

20 Janeiro, 2016

Oi amigo.

Não sei se é isto, experimente copiar as dlls para o C;\windows\system32 (mesmo sendo 64bits), mantendo tb na pasta local. Experimente tb registrar no system32.

Tb estou tendo muitas dificuldades com estas dlls. Algumas vezes dá erro de windows e nem mostra qual o erro.

5 Janeiro, 2016

Boa noite:

A quem interessar, disponho a rotina abaixo para aqueles que desejarem incorporar a tabela cest disponibilizada por Carlos Cantu da Firebase, postado no blog do Regys Silveira (lembrando pelo Carlos Cantú que não é uma tabela oficial).

Não sei se é a melhor forma de fazer, mas como tenho clientes executando preciso atualizar de forma automatiza, se o arquivo txt for encontrado, ele cria e inclui os registros no banco de dados.

Não consegui executar através de comandos script, pois uso o Delphi 7, então fiz "na unha" mesmo.

if fileexists(frm_principal.cPathWin+'\dados\cest.sql') then
begin
try
try
DmsisStock.IbqAux.sql.clear;
DmsisStock.IbqAux.sql.Add('CREATE TABLE CEST (CEST VARCHAR(7) NOT NULL,NCM VARCHAR(8),DESCRICAO VARCHAR(512) ) ');
DmsisStock.IbqAux.ExecSql;
DmsisStock.IBTransactionSisStock.CommitRetaining;
except
end;
try
DmsisStock.IbqAux.sql.clear;
DmsisStock.IbqAux.sql.Add('CREATE INDEX IDXCEST ON CEST (NCM)');
DmsisStock.IbqAux.ExecSql;
DmsisStock.IBTransactionSisStock.CommitRetaining;
except
end;
AssignFile(arq,frm_principal.cPathWin+'\dados\cest.sql' );
Reset(arq);
Linha := '';
Linha2 := '';
while (not eof(arq)) do
begin
readln(arq, linha);
Linha := StringReplace(Linha, 'TAB_CEST', 'CEST', [rfReplaceAll, rfIgnoreCase]);
if copy(linha,1,6) = 'INSERT' then
begin
readln(arq, linha2);
Linha2 := StringReplace(Linha2, ';', '', [rfReplaceAll, rfIgnoreCase]);
Linha := Linha + ' '+ Linha2;
try
DmsisStock.IbqAux.sql.clear;
DmsisStock.IbqAux.sql.Add(Linha);
DmsisStock.IbqAux.ExecSql;
except
end;
end;
end;
CloseFile(arq);
DeleteFile(frm_principal.cPathWin+'\dados\cest.sql');
except
end;
end;

CEST.SQL

23 Dezembro, 2015

Legal sua ajuda leandroaoa.

Me ajudou bastante.

Boas festas e um 2016 de excelência.

23 Dezembro, 2015

Desculpe, ainda em tempo...

Quanto a cancelamento.

Esta nota pode ser cancelada antes de transmitir para o sefaz, ou precisa transmitir e depois então cancelar? O prazo de cancelamento é após a impressão off line, ou 24 horas depois da autorização sefaz?

23 Dezembro, 2015

Grato leandroaoa pela pronta resposta.

2-Se é obrigatória a via do estabelecimento, vc sabe em que que o estabelecimento usa esta via, já que possue os dados e o xml?

2.1 - comi mosca no geral.formaemissao.

Outra coisa:

Qual a diferença de EM CONTIGENCIA e OFF LINE? Emitindo off line, sai impresso EMITIDA EM CONTINGENCIA

Grato

23 Dezembro, 2015

Boa tarde a todos.

Desejo um 2016 excelente para a equipe do AcBr e assinantes deste forum.

Me ajudem numa coisa:

Para emitir nfc-e Off Line li que precisa ser impresso em Via do Consumidor a informação de EMITIDA EM OFF LINE, e imprimir em duas vias.

1-É isso mesmo que entendi?

2-Estou usando trunk2 e no ESCPOS só encontrei a propriedade viaconsumidor=true ou false. Como informar este texto? Uso informações adicionais?

2.1-Como informar CONSULTA NO SEFAZ DISPONIVEL DENTRO DE 24HS?

3-É obrigatória a impressão da via do estabelecimento?

Grato pela ajuda.

24 Novembro, 2015

Grato Regys pela resposta.

e.t. Como vcs estão aí em MG, afetado pela lama? Precisa de alguma coisa? Posso ajudar em algo? Minha igreja tem orado pelas pessoas nesta calamidade.

Abcs

23 Novembro, 2015

Boa tarde amigos.

Eu de novo por aqui, tenham paciencia comigo kkkk

Estou conseguindo compilar trunk2 com Seattle, depois de uma cansativa migração do Delphi 7 com trunk1, mas com a ajuda dos amigos estou evoluindo.

Não consigo a impressão do logo

ACBrNFe1.DANFE := ACBrNFeDANFeESCPOS1;
ACBrNFe1.DANFE.Name := 'ACBrNFeDANFeESCPOS1';
ACBrNFe1.DANFE.Logo := frm_nfe2.edtLogoMarca.Text;
ACBrNFeDANFeESCPOS1.Logo := frm_nfe2.edtLogoMarca.Text;

ACBrNFeDANFeESCPOS1.PosPrinter := ACBrPosPrinter1

Alguém tem uma dica:

23 Novembro, 2015

Grato a todos.

Consegui compilar informando {$DEFINE DFE_SEM_OPENSSL} NO ACBR.INV

17 Novembro, 2015

Desculpe Juliomar pela repetição do post. Infelizmente é o desespero de resolver a questão, pois ainda não consegui sucesso seguindo as instruções colhidas em diversos posts.

Grato.

4 Novembro, 2015

Boa noite a todos.

Atualizei meu aplicativo para o truck2 com delphi 10 seattle.

Ao compilar, ocorre o seguintes erro:

[dcc32 Error] OpenSSLExt.pas(69): E1030 Invalid compiler directive: 'MODE'
[dcc32 Error] OpenSSLExt.pas(70): E1030 Invalid compiler directive: 'Packrecords'
[dcc32 Fatal Error] OpenSSLExt.pas(82): F2613 Unit 'DynLibs' not found.

Já configurei conforme instrucao acima configuracoes.gerais.ssllib := LibCapicom

coloquei o acbr.inc (pasta AcBr\Fontes\ACBrComum) como:

{$DEFINE DFE_SEM_OPENSSL}
{.$DEFINE DFE_SEM_CAPICOM}

Recompilei com o installtrunk2 e nada de sucesso.

O que mais preciso fazer?

Grato pela ajuda.

4 Novembro, 2015

Boa tarde

Estou tendo problemas pra compilar meu aplicativo no Delphi 10 Seattle em windows 10. Acontece o mesmo dos amigos acima:

[dcc32 Error] OpenSSLExt.pas(69): E1030 Invalid compiler directive: 'MODE'
[dcc32 Error] OpenSSLExt.pas(70): E1030 Invalid compiler directive: 'Packrecords'
[dcc32 Fatal Error] OpenSSLExt.pas(82): F2613 Unit 'DynLibs' not found.

Eu usava trunck1 com delphi 7. desinstalei tudo, removi o acbr.

nao encontrei esse dynlibs em nenhum lugar das pastas acbr.

Como vcs resolveram isto?

Grato pela ajuda.

2 Novembro, 2015

Gratos pelas dicas.

Instalei Seattle e trunck2 sem problemas.

Ao compilar meu aplicativo, ocorrer o seguinte erro:

synautil.pas(609) E2003 Undeclared indentifier: 'TimeSeparator'

synautil.pas(2062) E2003 Undeclared indentifier: 'ShortMonthNames''

Este fonte está na pasta de terceiros\synalist, e pelo que entendi, estas variaveis não são encontradas no system.SysUtil, mas na verdade estão lá.

Estou tendo problemas tb com o Indy10 do Seattle.

Grato pela ajuda.

5 Outubro, 2015

Grato pelas respostas Juliomar e Regys

5 Outubro, 2015

Grato

5 Outubro, 2015

Boa tarde amigos.

Tenho um sistema em Delphi 7 com firebird 2.5 usando os componentes do Acbr.

Declaro aqui a minha total satisfação com o AcBr e o atendimento desta equipe de excelencia.

Vou migrar para um Delphi mais atualizado. O que os amigos sugerem para uso com o AcBr: XE3, XE8 ou o 10 que saiu agora junto com o Windows10?

Já que vou ralar nesta transição, prefiro já fazer fazer de uma vez só.

Grato pelas indicações e sugestões.

Abcs

25 Setembro, 2015

Eu de novo... rsrsrsrsrs, desculpe ser chato, é falta de conhecimento mesmo...

Verificando o Util, vi que consta no historico das versoes até 2012, mas pelo que pesquisei a url está atualizada. É isso mesmo? realmente preciso saber se são as urls corretas no trunk1. Grato pela paciencia...

Historico:

{*******************************************************************************
|* Historico
|*
|* 16/12/2008: Wemerson Souto
|* - Doação do componente para o Projeto ACBr
|* 10/02/2009: André Ferreira de Moraes
|* - Adicionado URL de todos os estados
|* 18/02/2009: André Ferreira de Moraes
|* - Criado Assinatura baseado em código passado por Daniel Simões
|* - Criado Validação do XML da NFE baseado em código passado por Daniel Simões
|* 24/09/2012: Italo Jurisato Junior
|* - Alterações para funcionamento com NFC-e
*******************************************************************************}

Urls:

Entrar

Sobre nós...

Blocks

Notes ACBrLibNFe

Fóruns

Downloads

Calendário

Posts postados por J Pereira

Sobre nós...

Informação Importante