Gutierres

destructor TRegistro0001.Destroy; begin FRegistro0035.Free; FRegistro0100.Free; FRegistro0110.Free; FRegistro0120.Free; //Implementado por Fábio Gabriel - 29/11/2012 FRegistro0140.Free; FRegistro0500.Free; FRegistro0600.Free; FRegistro0900.Free; // Falta adicionar esse inherited; end; acbr leak.diff

Boa noite, Fiz as atualizações estou deixando o Schemas D:\ACBr\Exemplos\ACBrDFe\ACBrNFSe\Schemas\ABRASFv2, mudou a mensagem de validação. tentei também com o schema que esta na documentação http://tributacao.smarapd.com.br/abrasf/loginWeb.jsp?execobj=ABRASFAcessoWS&hostProducao=201.48.3.165:9083/tbw&rpsSincrono=10&rpsAssincrono=50&titulo=Prefeitura%20Municipal%20de%20Ituiutaba mas da erro de schema inválido. com o schema dos fontes ABRASFv2 da este erro

Infelizmente fiz várias tentativas e não consigo enviar pelo demo. troquei o arquivo ini fiz tentativa com D:\ACBr\Exemplos\ACBrDFe\ACBrNFSe\Schemas\SmarAPD\ABRASFv204 D:\ACBr\Exemplos\ACBrDFe\ACBrNFSe\Schemas\ABRASFv2 copiei os que eles mandam usar neste link http://tributacao.smarapd.com.br/abrasf/loginWeb.jsp?execobj=ABRASFAcessoWS&hostProducao=201.48.3.165:9083/tbw&rpsSincrono=10&rpsAssincrono=50&titulo=Prefeitura%20Municipal%20de%20Ituiutaba

Bom dia, deu certo de ver algo , se procede o que eles disseram

Ele me responderam dizendo que falta o cabeçalho version='1.0' encoding='UTF-8'?><cabecalho xmlns="http://www.abrasf.org.br/nfse.xsd" versao="2.04"><versaoDados>2.04</versaoDados></cabecalho>

Fiz os 2 teste com schema do ACBR. Schemas\SmarAPD\ABRASFv204, e o Schema novo ambos deu o mesmo retorno Inicio TNFSeGerarNFSe Método..... : Gerar Código Erro : E160 Mensagem... : Arquivo em desacordo com o XML Schema. Correção... : Consulte o Manual da NFS-e para saber quais são as versões de XML Schema suportadas pelo sistema. Provedor... : SmarAPDABRASF ERRO: Arquivo em desacordo com o XML Schema. Consulte o Manual da NFS-e para saber quais são as versões de XML Schema suportadas pelo sistema. 50-lista-nfse.xml50-ger-nfse.xml

Bom dia Italo Giurizzato Junior Só uma dúvida vou usar o schema que já vem no ABCr ou o schema que eles passaram. Obrigado.

Bom dia. Conforme o link que da SMARAPD http://tributacao.smarapd.com.br/tbwhomolog/downloads/ManualNFSEAbrasf.pdf Seque o arquivos de exemplo da smarapd e o que eu gerei no ACBrNFSe Obrigado exemplosXmlSite-smarapd.zip arquivos-ACBRNFSe.zip

Boa noite, estou usando o ACBRNFse para fazer teste e conhecer o processo de utilização da NFSe Estou usando essas informações com Schema e outros arquivos para testar Estou usando o Schema ACBrNFSe\Schemas\SmarAPD\ABRASFv204 e retorna o erro da imagem abaixo. Também tentei o Schema que vem no manual http://www.abrasf.org.br/arquivos/publico/NFS-e/Versao_2.04/schema_nfse_v2.04.zip As NFS-e geradas estão em anexo e foram validada com ok no site: http://tributacao.smarapd.com.br/abrasf/loginWeb.jsp?execobj=ABRASFValidaXml Alguém já passou por este erro. Desde já agradeço. 13-ger-nfse.xml13-lista-nfse.xml

Boa noite estou fazendo teste com ACBrNFSe para implementar em nosso sistema o nota de serviço, a cidade usa SMARAPD conforme manual tenho que criar um certificado http://tributacao.smarapd.com.br/tbwhomolog/downloads/ManualNFSEAbrasf.pdf Comando para criar Keystore do client keytool -genkeypair -alias clientkey -keyalg RSA -dname "CN=client,OU=Application Development,O=Highwinds,L=Winter Park,S=FL,C=US" -keypass password -storepass password -keystore C:/client.jks Comando para inserir certificado do server no keystore do client keytool -importcert -keystore C:/client.jks -alias servercert -file C:/server-public.cer -storepass password -noprompt Comando para exportar certificado público do client keytool -exportcert -alias clientkey -file C:/client-public.cer -keystore C:/client.jks -storepass password Não estou tendo sucesso em fazer os teste já tentei colocar client.jks e o client-public.cer com a senha sugerida à cima password O Que posso estar errando, Obrigado

ACBrNFeDANFEFRDM.pas

Desculpa uso sim GExpert força do hábito function TACBrNFeFRClass.Split(const ADelimiter, AString: string): TSplitResult; var vRows: TStrings; vI: Integer; begin vRows := TStringList.Create; try vRows.Delimiter := ADelimiter[1]; vRows.StrictDelimiter := True; vRows.DelimitedText := AString; SetLength(Result, vRows.Count); for vI := 0 to vRows.Count - 1 do Result[vI] := vRows.Strings[vI]; finally FreeAndNil(vRows); end; end;

Companheiros como estava precisando utilizar em versão 64bits, fiz esse ajuste nos fontes para mim funcionou. ACBrNFeDANFEFRDM.pas

Boa tarde estou tendo um problema ao compilar meu projeto para 64 bits, percebi que no método Split da unit ACBrNFeDANFEFRDM esta tento um erro de conversão, quando compilo em 32 bits funciona. Conteúdo de exemplo ADelimiter = ; AString = 'MD-5:A6C08B76C773BFA72347A2F902D8CFB7;DOCUMENTO EMITIDO POR ME OU EPP OPTANTE PELO SIMPLES NACIONAL;NACIONAL CONF. LC 123/2006.;NAO GERA DIREITO A CREDITO FISCAL DE IPI.'

Resolvido, Fiz os teste agora foi blz Muito obrigado.

Function Assinar if (not LibXmlEstaAssinado(aXML, SignatureNode, SelectionNamespaces, infElement)) then aXML := AdicionarSignatureElement(aXML, True, docElement, IdSignature, IdAttr); ACBrDFeXsLibXml2.pas Só um detalhe não é só no meu computador, na programação com 6 computadores e em 3 clientes que atualizei

Fiz uma manobra aqui não sei se esta correto Veja modificação em vermelho // Inserindo Template da Assinatura digital if (not LibXmlEstaAssinado(aXML, SignatureNode, SelectionNamespaces, infElement)) then aXML := AdicionarSignatureElement(aXML, True, docElement, IdSignature, IdAttr);

Boa noite no meu caso quando chega aqui esta o AddX509Data esta como false e não cria function TDFeSSLXmlSignClass.AdicionarSignatureElement(ConteudoXML: String; AddX509Data: Boolean; docElement, IdSignature: String; IdAttr: String = ''): String;

No Demo funcionou na minha aplicação não vai Minha aplicação é Distribuida no Servidor de Aplicação eu mando fazer o LoadStream do Arquivo o Validar quando fecho meu servidor de aplicação e envio a primeira vez ele funciona. etão fecho minha aplicação cliente deixando o servidor aberto reconecto com servidor e envio novamente então vem o erro '1871 - Element ''{http://www.w3.org/2000/09/xmldsig#}KeyInfo'': Missing child element(s). Expected is ( {http://www.w3.org/2000/09/xmldsig#}X509Data ).'#$A no procedure NotaFiscal.Validar; NotaEhValida := SSL.Validar(AXML, GerarNomeArqSchema(ALayout, VerServ), Erro); ---Retorna False 66309-env-lot.xml

Boa tarde. no Demo do ACBrNFe Passo 1 - Gerar NFE 2 - Carregar XML e Enviar (carro o XML Gerado no Passo 1) 3 - Erro. Obrigado

Sim os Fontes estão atualizados procedure LibXmlInit; begin if (LibXMLLoaded) then Exit; // --Inicializar funções das units do libxml2 libxml2.Init; { Init libxml and libxslt libraries } xmlInitThreads(); xmlInitParser(); xmlSubstituteEntitiesDefault(1); __xmlLoadExtDtdDefaultValue^ := XML_DETECT_IDS or XML_COMPLETE_ATTRS; __xmlIndentTreeOutput^ := 1; __xmlSaveNoEmptyTags^ := 1; LibXMLLoaded := True; end;

Segue arquivo em anexo. 31171201620245000184550010000470741000085086-nfe.xml

Bom a Todos Estou tendo um problema com uso do libWinCrypt quando assino uma nota e envio pela primeira vez ele faz normal então fecho o sistema abro novamente e tento assinar retorna o erro Minha configuração Geral.SSLCryptLib := cryWinCrypt; Geral.SSLHttpLib := httpWinINet; Geral.SSLXmlSignLib := xsLibXml2; [18:19, 26/12/2017] Fernando Moreira: Mensagem 1 Falha na validação dos dados da nota: 47074 1871 - Element '{http://www.w3.org/2000/09/xmldsig#}KeyInfo': Missing child element(s). Expected is ( {http://www.w3.org/2000/09/xmldsig#}X509Data ). acho que o problema esta nessa tag <KeyInfo> <X509Data> <X509Certificate>MIIFtDCCBJygAwIBAg(...)AhA0oDjO/oaDeEC</X509Certificate> </X509Data> </KeyInfo> Obrigado

Boa noite, estamos com dificuldade de Criar o ini do NFSe para Cidade de Itumbiara o link do métodos estão em http://189.113.5.182/integracao/services As implementações no código já esta feita, estamos precisando ajustar o ini para comunicar com servidor mas esta dando http 500 Segue em anexo o arquivo de ini que estamos tentando configura para uso do Sistema da Sigep. Obrigado Sigep.ini

Foi só teste no meu sistema estou usando a 310 esta dando o mesmo erro