-
Total de ítens
11 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por cbsistem
-
-
Na App1 (NFSe) que estava enviando
SSLLib := libWinCrypt;
SSLCryptLib := cryWinCrypt;
SSLHttpLib := httpWinHttp;
SSLXmlSignLib := xsMsXml;
Na App2 (NFe) onde houve a exclusão:
provavelmente estava compilada com uma versao mais antiga do acbr.
não tinha essas configurações (não exigia)
att
Cristiano
-
SSLLib := libWinCrypt;
SSLCryptLib := cryWinCrypt;
SSLHttpLib := httpWinHttp;
SSLXmlSignLib := xsMsXml;
-
Ola relato que a exclusão do certificado A3 continua.
Estava utilizando o certificado o A3 o dia todo assinando notas ficais de serviço no App1.
Sem fechar o App1 e após ter assinado e transmitidos notas de serviço, alternei para o App2, e ao enviar uma nota fiscal de produtos, perguntou a senha digitei e ZAAAP;;;
erro... acessei o administrador de token e o certificado ja não esta no cartão.
Isso ja ocorreu antes comigo e o que eu percebo é que se vc tiver 2 apps assinando documentos isso vai ocorrer.
Então na duvida sempre feche o App1 para depois Assinar no App2.
Eu sempre uso assim, fecho o App1 e somente depois transmito no App2, sempre funciona. Mas hoje estava corrido e esqueci de fechar o App1.
Pelo que parece, esta ficando alguma coisa carregada no App1 e se você não fechar ele por completo, e usar um segundo App ocorre a exclusão.
Fica a dica.
Att
Cristiano
-
Faça upgrade no seu FastReport ou no marque as os pacotes que usam o fastreport.
- 1
-
Ola .. Meu certificado A3 acabou de ser excluido.
E justamamente foi após um loop de assinatura de xml. Apos dar uma pausa... e tentar assinar outro xml.. a surpresa.
E realmente foi excluido.
-
Raudus.com pode ser usando no Delphi 7 ... XE 10 Berlin e Lazarus 1.6
Versão comercial estará disponível em 01/03/2017
-
usando o RLBoleto;
{Dados do titulo}with gbTitulo1 dobeginNumeroDocumento := cdsTitulosNUMERODOCUMENTO.AsString+'/'+cdsTitulosPARCELA.AsString;SeuNumero := cdsTitulosNUMERODOCUMENTO.AsString;EspecieDocumento := edFatura;NossoNumero := cdsTitulosBOL_NUMERO.AsString;Carteira := cdsCedentesCARTEIRA.AsString;DataDocumento := cdsTitulosDATAEMISSAO.AsDateTime;DataVencimento := cdsTitulosDATAVENCIMENTO.AsDateTime;DataProcessamento := cdsTitulosDATADIGITACAO.AsDateTime;ValorDocumento := cdsTitulosVALORORIGINAL.AsCurrency;vInstrucoes := 'dados da instruções para pagamento';Instrucoes.Text := vInstrucoes;{Dados do cedente}with Cedente dobeginif AnsiUpperCase(cdsCedentesTIPOINSCRICAO.Value) = 'F' thenTipoInscricao := tiPessoaFisica {CPF}else if AnsiUpperCase(cdsCedentesTIPOINSCRICAO.Value) = 'J' thenTipoInscricao := tiPessoaJuridica {CNPJ}elseTipoInscricao := tiOutro;NumeroCPFCGC := cdsCedentesNUMEROINSCRICAO.Value;Nome := cdsCedentesNOMECEDENTE.Value;CodigoCedente := cdsCedentesCODIGOCEDENTE.Value; //33 a 52 - Código do convênio no bancoDigitoCodigoCedente := cdsCedentesDIGITOCEDENTE.Value;{Endereço do cedente}with Endereco dobeginRua := cdsCedentesRUA.AsString;Endereco.Numero := cdsCedentesNUMERO.AsString;Complemento := cdsCedentesCOMPLEMENTO.AsString;Bairro := cdsCedentesBAIRRO.AsString;Cidade := cdsCedentesCIDADE.AsString;Estado := cdsCedentesESTADO.AsString;CEP := stringreplace(cdsCedentesCEP.AsString,'-','',[rfReplaceAll]);Email := cdsCedentesEMAIL.AsString;end; {with Endereco}{Dados bancários do cedente}with ContaBancaria dobeginBanco.Codigo := cdsCedentesNUMBANCO.AsString;CodigoAgencia := cdsCedentesNUMAGENCIA.AsString;DigitoAgencia := cdsCedentesDIGITOAGENCIA.AsString;NumeroConta := cdsCedentesNROCONTA.AsString;DigitoConta := cdsCedentesDIGITOCONTA.AsString;// B.B.Convenio := cdsCedentesNUMCONVENIO.AsString;end; {with Banco}end; {with Cedente}{Dados do sacado do título}with Sacado dobeginif AnsiUpperCase(qryClientesPESSOAFISJUR.AsString) = 'F' thenTipoInscricao := tiPessoaFisicaelse if AnsiUpperCase(qryClientesPESSOAFISJUR.AsString) = 'J' thenTipoInscricao := tiPessoaJuridicaelseTipoInscricao := tiOutro;NumeroCPFCGC := LimpaCGCCPF(qryClientesCGCCFO.AsString);Nome := qryClientesNOME.AsString + ' (' + qryClientesNOMEFANTASIA.AsString + ' ' + qryClientesCODCFO.AsString + ')';{Endereço do sacado do título}with Endereco dobeginif not Empty(qryClientesRUAPGTO.AsString) thenbeginRua := qryClientesRUAPGTO.AsString;Numero := qryClientesNUMEROPGTO.AsString;Complemento := qryClientesCOMPLEMENTOPGTO.AsString;Bairro := qryClientesBAIRROPGTO.AsString;Cidade := qryClientesCIDADEPGTO.AsString;Estado := qryClientesCODETDPGTO.AsString;CEP := stringreplace(qryClientesCEPPGTO.AsString,'-','',[rfReplaceAll]);endelsebeginRua := qryClientesRUA.AsString;Numero := qryClientesNUMERO.AsString;Complemento := qryClientesCOMPLEMENTO.AsString;Bairro := qryClientesBAIRRO.AsString;Cidade := qryClientesCIDADE.AsString;Estado := qryClientesCODETD.AsString;CEP := stringreplace(qryClientesCEP.AsString,'-','',[rfReplaceAll]);end;Email := qryClientesEMAIL.AsString;end; {with Endereco}{Dados bancários do sacado do título}with ContaBancaria dobeginBanco.Codigo := '';CodigoAgencia := '';DigitoAgencia := '';NumeroConta := '';DigitoConta := '';end; {with Banco}end; {with Sacado}end; {with Titulo}gbTitulo1.InsertRecord;
gbTitulo1.SalvarPDF(NomeArquivoPDF);
----------------
-
Ola... algum link para download do projeto ??
-
Pegue o conversor.
Resolvido nesse post. :
Cristiano Barbosa
-
Motivo do erro: Ele foi gerado com criptografia 2048 bits.
Solução: Converte o certificado para criptografia 1024 bit´s.
Passos:
Faça download do instalador : http://www.onlinecertificadora.com.br/arquivo/suporte/validcertificadora.zip ou anexo
Execute, Seleciona o Modelo A1, Selecione o Certificado e Pronto.
Fonte: Alessando - OnlineCerificadora
Outra Solução:
Instalar no WinXP, Exportar a chave.
Xp nao aceita criptografia 2048, ira converter automaticamente para 1024 e ao ser exportado ira manter a criptografia 1024.
Cristiano Barbosa
- 5
NFSe - Tangara da Serra MT - Novo Provedor
em ACBrNFSe
Postado
aqui Nó transmitimos todas as noas no dia 04/04 com sucesso.
Os problemas encontrado foi:
Enviamos a TAG <IssRetido>2</IssRetido> e ao processa as notas, o webservice alterou tudo pra <IssRetido>1</IssRetido> (com retenção de ISS)
outro erro é que ao alterar o iss para retido ele não alterou o valor liquido das notas. Por final, ajustaram os XML direto na base de dados pra ficar certo.
O suporte me falou que eles podem alterar o conteúdo do meu XML, eu achei absurdo, ou ele processa como eu envio ou ele recusa. Mas ele ainda bateu o pé dizendo que pode alterar sim.
Quando ele alterou meu xml, causou erros em todos... devido ao bug no webservice.
o que acham disso?? podem alterar ?