Reginaldo Costa
-
Total de ítens
62 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por Reginaldo Costa
-
-
Bom dia,
Para mim já funciona a tempos, para qualquer certificado válido.
ok
Reginaldo.
-
2
-
-
Esta é minha rotina de buscar uma nota autorizada e perdida(como chamo).
procedure TF_GeracaoNotaFiscalServico.BuscarNotafiscalEmitida;
var
Reg: TIniFile;
xXml, xprotocolo: string;
seq: integer;
begin
Reg:=TIniFile.Create(Sistema.IniConfiguracao);
if Sistema.MultiEmpresa=1 then
Reg:=TIniFile.Create(ExtractFilePath(Application.ExeName)+Sistema.ApelidoAtual+'.ini');
Nota.NotasFiscais.Clear;
if TBXML.Locate('NumeroRPS', StrZero(TBSEminFiscalNumeroRPS.AsInteger, 10), []) then
begin
Nota.NotasFiscais.LoadFromString(TBXML.FieldByName('NotaFiscalXML').AsString);
if Nota.NotasFiscais.Count=0 then
begin
PreencherNF; //esta procedure só preenche os dados todos do rps na Nota(ACBrNFSe1), prestador/Tomador/Serviço, etc...
Nota.NotasFiscais.GerarNFSe;
end;
end
else
begin
if Nota.NotasFiscais.Count=0 then
begin
PreencherNF;
Nota.NotasFiscais.GerarNFSe;
end;
end;
if Nota.NotasFiscais.Count>0 then
begin
//esta é a chamada para consulta do RPS no provedor.
Nota.ConsultarNFSeporRps(Nota.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Numero,
Nota.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Serie, TipoRPSToStr(Nota.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Tipo));Mensagem('!!! Nota Fiscal Eletrônica Serviço recuperada com sucesso !!!'+#13+#13+'Número da Nota Fiscal: '+
Nota.NotasFiscais.Items[0].NFSe.Numero+#13+'Código Verificação..: '+
Nota.NotasFiscais.Items[0].NFSe.CodigoVerificacao, tmAviso, '');xXml:=Nota.WebServices.ConsNFSeRps.RetornoWS;
if TBXML.Locate('NumeroRPS', StrZero(StrToIntDef(Nota.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Numero, 0), 10), []) then
begin
TBXML.Edit;
end
else
begin
seq:=UltimoRegistro(TBXML.TableName, 'Sequencia', '');
IncluirRegistro(TBXML);
TBXML.FieldbyName('Sequencia').AsString:=StrZero(seq+1, 10);
TBXML.FieldbyName('NumeroRPS').AsString:=StrZero(StrToIntDef(Nota.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Numero, 0), 10);
TBXML.FieldByName('NumeroNfs').AsString:=Nota.NotasFiscais.Items[0].NFSe.Numero;
end;
TBXML.FieldbyName('CodigoVerificador').AsString:=Nota.NotasFiscais.Items[0].NFSe.CodigoVerificacao;
TBXML.FieldbyName('Data').AsDateTime:=date;
TBXML.FieldbyName('DataNFe').AsDateTime:=Nota.NotasFiscais.Items[0].NFSe.DataEmissao;
TBXML.FieldbyName('CNPJCIC').AsString:=TBSEminFiscalCGC.Value;
TBXML.FieldbyName('Nome').AsString:=TBSEminFiscalNOME.Value;
TBXML.FieldByName('NumeroNFS').AsString:=TBSEminFiscalNumeroOficialNF.Value;
TBXML.FieldbyName('ProtocoloNFe').AsString:=Nota.WebServices.EnvioWebService.Protocolo;
TBXML.FieldbyName('NotaFiscalXML').AsString:=xXml;
TBXML.FieldbyName('ReciboXML').AsString:=Nota.WebServices.ConsNFSeRps.RetWS;
TBXML.FieldbyName('Usuario').AsString:=Sistema.UsuarioAtual;
Gravartabela(TBXML);TBSEminFiscal.Edit;
TBSEminFiscalNumeroOficialNF.Value:=Nota.NotasFiscais.Items[0].NFSe.Numero;
TBSEminFiscal.Post;RadioGroup1.ItemIndex:=5;
BExecutar.Click;
end;
FreeAndNil(Reg);
end;espero ter ajudado.
-
Bom dia,
no meu caso quando acontece esta mensagem eu faço uma consulta no provedor e me retorna a nota autorizada, pois algumas prefeituras demoram muito a autorizar um RPS.
ai você tenta enviar novamente o mesmo RPS e retorna como RPS já existente.
porto alegre/RS, acontece direto, tenho que aumentar o tempo de resposta sempre.
espero ter ajudado.
-
Em 25/07/2017 at 08:36, Thales E. B. Oliveira disse:
Bom dia eu reverti as alterações do Acbr.inc pois as diretivas de compilação abaixo estava desmarcadas:
{.$DEFINE USE_DELAYED}
{.$DEFINE REMOVE_CAST_WARN}
quando comentei elas (que é o padrão) compilou normalmente.
Grato
Boa tarde,
para mim, mesmo procedendo como o Thales sugeriu, não rolou, continua com o mesmo problema, conforme abaixo:
Embarcadero Delphi for Win32 compiler version 23.0
Copyright (c) 1983,2011 Embarcadero Technologies, Inc.
Fatal: F2084 Internal Error: L2095
Compilation failure
Erro ao compilar o pacote "ACBr_DFeComum.dpk".Abortando... Ocorreram erros na compilação dos pacotes.
obrigado desde já.
-
13 horas atrás, renatojosecampos disse:
Bom dia!
Pessoal notei que dezenas de meus clientes estão com os problemas abaixo:
Erro: ACBR: 12043 -
Erro ACBR: 12045 -Muitos estão alegando que a SEFAZ RS esta fora do ar porém neste momento esta no ar e o problema persiste, o problema esta ocorrendo em outros estados também principalmente do ambiente SVAN.
Deixo aqui a forma que encontrei para resolver o problema:
Erro: ACBR: 12043 -
Solução:
- Feche todos os programas:
- Abra o internet explorer > Opções da internet > Avançado > role as configurações até o final
- Desabilite SSL 2.0
- Desabilite TLS 1.1 e 1.2
- Marque SSL 3.0
- Marque o TLS 1.0
Erro ACBR: 12045 -- Atualize o ACBR para a ultima versão
- Recompile seu projeto.
-
12045 - A autoridade de certificação não é válida ou está incorreta
Não sei porque mas este erro ocorre na versão antiga do ACBr, na versão atual não
Hoje mesmo alguns minutos atrás corrigimos este problema em vários clientes dos estados RS, DF , TO , RJ.
Espero ter ajudado.
Boa noite,
eu só atualizei meu sistema com a ultima versão do ACBr e tudo funcionou, mesmo sem instalar a certificação 5.
Clientes felizes e eu mais ainda.
Reginaldo.
-
Boa tarde, johnbh3,
retire o & (e comercial) que estará resolvido.
abraços,
-
Em 10/04/2017 at 11:17, agnaldo primo disse:
Bom dia!!
O que aconteceu ?Não conseguiu gerar o Id Token e CSC ?
Boa Noite, Agnaldo, Sim, segundo informações terceiras o sefaz do RS ainda não tem ou não vai ter isto. porque vc pode fazer pelo site, basta ter o certificado na máquina.
então criei um link em meu sistema apontando para a pagina do sefaz para geração dos CSCs. Paliativo mas funcionou.
abraços,
-
Em 10/03/2017 at 11:52, silvanoxr3 disse:
Foi anunciado pelo Ministro da Fazenda Henrique Meirelles no dia 15/12/2016
Nota Fiscal de Serviços Eletrônica (NFS-e) – Implementação nacional
- Instituir a NFS-e nacionalmente em todos os municípios inspirado no sucesso da nota fiscal eletrônica para mercadorias (fisco estaduais)
- Simplificação do documento fiscal de serviços eletrônicos e sua utilização em larga escala, buscando um padrão nacional; aumento na segurança da gestão tributária; melhoria da análise de restituição de créditos tributários.
Prazo: projeto-piloto em Belo Horizonte, Porto Alegre, São Paulo, Rio de Janeiro e Marabá até dez/2017 e ampliação para os demais municípios.
Bom dia, isto vai ser uma maravilha, acaba a festa das prefeituras com sistema cada, causando muito transtornos para nós. espero que as prefeituras aceitem...
abraços.
-
Eu já tive alguns clientes com certificado excluído, de um parque de 200 empresas, tive 6 até agora excluídos, sendo 2 este mês.
to preocupado, já estou recomendando aos clientes trocarem por A1, nunca tive problemas com estes.
mas tá complicado pois tem algumas certificadoras que convencem eles que A1 não é seguro.
-
Boa tarde, saberiam me dizer se o sefaz do RS está funcionando o AdministraCSC ?
não estou obtendo sucesso na implementação.
-
Obrigado pela resposta, vou verificar...
-
Boa tarde, meus caros,
to tentando implementar a Administração no sistema e ta ocorrendo erro de URL, segue: (alguém sabe se isso já está funcionando, sou do RS).
Inicio TAdministrarCSCNFCe
ERRO: URL não definida para: TAdministrarCSCNFCe
ERRO: WebService Administrar CSC da NFC-e:
- Inativo ou Inoperante tente novamente.
Parâmetro incorreto. - URL: - SOAPAction:http://www.portalfiscal.inf.br/nfe/wsdl/CscNFCe/admCscNFCe
-
Bom dia, gss200610,
tive este mesmo errro em um cliente meu, depois de colocar os perdigueiros, dalmatas, busdogs, etc.. atraz, constatei que
era uma erro de fechamento do cupom, as vezes acontecia de a impressora fiscal dar um total de arrendondamento diferente do sistema, ex: imp: 123,45 o sistema dava 123,44
quando chama o fechamento final do cupom e falta 1 centavo para receber ela da esta mensagem, que convenhamos nada esclarecedor.
espero ter ajudado.
-
Bom dia, Infoel,
eu tentaria por um tempo ajustado entre cada item, o teu problema pode ser o tempo de envio dos ítens.
está enviando um atras do outro, pode ser isso que a impressora ta se perdendo.
espero ter ajudado.
-
48 minutos atrás, Ess disse:
Olá Reginaldo Costa
Obrigado por sua ajuda é isso mesmo a solução!! Tem que configurar na mão pra essa velocidade de 115200 8bts.
ACBrECF1.Device.Baud:=115200.
ACBrECF1.Device.Data:=8.
Faço isso antes de ativar o acbrecf e agora funciona corretamente.
Ae pra quem usar essa daruma fs-700 fica a dica.
Muito Obrigado Reginaldo, Daniel pela Ajuda e Atenção!!
E desculpa a demora no retorno.
Não por isso, este é justamente o proposito deste forum, troca de experiencias. não imagina quantos dias me retorcendo e noites sem dormir até descobrir isto. hahahaha
que bom que resolveu. abraços.
-
1
-
-
Boa noite, Ess,
ja tive problemas com esta impressora, tem um defeito de fabrica, que muda a velocidade configurada do nada, se pedir uma leitura da memoria fiscal ou nota gaucha, etc ela passa sozinha para 115200,
eu configuro no braço no acbr para esta velocidade e funciona belezinha, mas a esta velocidade o acbr não encontra ela. tem que configurar manualmente.
vel.: 115200 8bts e fluxo por hardware.
espero ter ajudado, ate
Reginaldo.
-
1
-
-
eu tive contato com este tipo de tabela, é da linguagem CLARION, se não estou enganado.
tem um componente na internet que abre este tipo de tabela. chama-se: Desigydb
espero ter ajudado.
-
Bom dia, Italo,
que isso, não precisa pedir desculpas, as vezes não conseguimos escrever o que estamos pensando, precisamente.
obrigado.
-
1
-
-
Bom dia, Italo.
justamente, o que está na pagina da prefeitura de São Leopoldo é sem o "s"
tirei ele do ini e funcionou homologação, que estava dando erro de estouro de tempo.
com relação a atualização, faço toda a semana, pra evitar falar besteira. e nem atrapalhar o tempo de vcs, que como o meu é curtissimo, heheheh
o dia tinha que ter 48 hs.
-
o arquivo INI da cidade de São Leopoldo/RS provedor Thema está com link de homologação errado.
não tem o "s" no http
mas somente na homologação, na produção está correto.
segue anexo arquivo correto.
; Sao Leopoldo/RS
RecepcaoLoteRPS_4318705=http://nfehomologacao.saoleopoldo.rs.gov.br/thema-nfse/services/NFSEremessa
ConsultaSitLoteRPS_4318705=http://nfehomologacao.saoleopoldo.rs.gov.br/thema-nfse/services/NFSEconsulta
ConsultaLoteRPS_4318705=http://nfehomologacao.saoleopoldo.rs.gov.br/thema-nfse/services/NFSEconsulta
ConsultaNFSeRPS_4318705=http://nfehomologacao.saoleopoldo.rs.gov.br/thema-nfse/services/NFSEconsulta
ConsultaNFSe_4318705=http://nfehomologacao.saoleopoldo.rs.gov.br/thema-nfse/services/NFSEconsulta
CancelaNFSe_4318705=http://nfehomologacao.saoleopoldo.rs.gov.br/thema-nfse/services/NFSEcancelamento -
Bom dia, Thiago,
esta modificação estaria no FR3 e não nos fontes do ACBr, portanto somente se vc usa sempre o FR3 atualizado pelos fontes.
eu não atualizo estes FR3 nos meus clientes, somente quando uma alteração muito significativa. como foi esta ultima do truck para truck2.
de qualquer forma espero ter ajudado.
[]s,
-
Bom dia, Thiago,
se for no fast, eu uso o seguinte:
no evento beforeprint do formulário do relatório o seguinte código:
if <Servicos."Aliquota"><1 then
Memo112.Text:=formatfloat('#,##0.00',<Servicos.Aliquota>*100);
este quebra galho funciona com todos os provedores, acredito.
espero ter ajudado.
-
Boa noite,
da certo sim, eu ja fiz e funcionou, o programa da Valid converteu o certificado da Safeweb de 2048 bits para 1024 bits.
Reginaldo.
-
Boa tarde, Weber, segundo orientação que tenho, tambem não sei se é correta, me corrijam se tiver errado por favor.
meus clientes colocam este destaque nas informações adicionais, ICMS IPI etc... ainda não tive nenhum problema com fisco
pois a ordem é Simples Nacional não pode destacar ICMS IPI ...
espero ter ajudado.
Testar ACBrBal sem balança
em ACBrSerial
Postado
Bom dia, Antonino,
tem um post aqui no forun, que tem um simulador de balança,
este programinha simula balanças toledo e filizola, funciona muito bem.
de uma pesquisada, voce tem que instalar um emulador de porta tipo o Com0com ou virtual port da eltima.
segue anexo.
EmuladorBalanca.zip