joemil

Bom dia @Italo Giurizzato Junior, Fiorilli alterou o endereco do webservice da cidade Agua Azul do Norte-PA. segue as configuracoes atualizadas [1500347] ; Incluído em 08/08/2024 ; Atualizado em 26/02/2025 - Joemil Nome=Agua Azul do Norte UF=PA Provedor=Fiorilli Versao=2.00 Params=Assinar:NaoAssinar ProRecepcionar=http://177.75.231.75:5661/IssWeb-ejb/IssWebWS/IssWebWS ProLinkURL=http://177.75.231.75:5661/IssWeb-ejb/IssWebWS/IssWebWS/formGerarNF.jsf?nroNota=%NumeroNFSe%&codVerificacao=%CodVerif%&cnpj=%Cnpj%&hash=%ChaveAcesso%

bom dia @Italo Giurizzato Junior, ele tem mesmo, mas eu q nao tava preenchendo as propriedades corretamente. mas ainda nao testei o token. vou fazer isso só depois do ano novo

Bom dia Italo, td bem? realmente o componente ta fazendo todas as fases do envio e cancelamento, era eu q nao tava preenchendo algumas propriedades corretamente depois q eu debuguei, fui achando o q precisa em especifico pra esse provedor. agora só falta fazer gerar o token, e to vendo quais propriedades ainda faltam. valeu galera pelo apoio. pode fechar este tópido, e obrigago

o envio eu consigo pegar o xml assinado, antes de enviar, mas no cancelamento nao. nao ta cancelando pelo ACBr, ai to fazendo a assinatura manual usando este codigo: function AssinarXML(AXml: String; ATag1, ATag2, ASerieCert: String): String; var SSL: TDFeSSL; begin SSL := TDFeSSL.Create; try SSL.SSLCryptLib := cryWinCrypt; SSL.SSLHttpLib := httpWinHttp; SSL.SSLXmlSignLib := xsLibxml2; SSL.NumeroSerie := ASerieCert; SSL.CarregarCertificadoSeNecessario; Result := SSL.Assinar(AXml, ATag1, ATag2); finally SSL.free; end; end; porem vem esta msg do provedor:

to tentando achar isso. e outra duvida: tem como pegar o xml de cancelamento assinado?

bom dia pessoal, to tendo dificuldades pra enviar e cancelar as NFSe pro provedor Softplano, em Floripa. nem envia e nem cancela. só gera o xml de envio, e nao faz mais nada alguem ai pode me dar um rumo por onde comecar a verificar?

esquece, vi q o ACBrNFSeX ja envia e cancela no provedor SoftPlan. eu achei q nao tinha ainda. ja arrumei e passei para os analistas de testes valeu a força pode trancar o post

ta assinando, mas diz q o hash é não é valido

reinstalei o certificado, marcando a opcao exportavel. agora ta assinando, mas nao reconhece a assinatura: CPF do representante: ***.497.489-** Nº de série de certificado emitente: 0x54e751a502f3d773 Data da assinatura: Assinatura reprovada. Hash incorreta

bom dia pessoal, pesquisei no forum, mas nao achei a solucao. to tentando assinar um xml, mas ocorre o erro raised exception class Exception with message 'CryptExportKey - len', e nao assina to usando a rotina abaixo function AssinarXML(AXml: RawByteString; ATag1, ATag2, ASerieCert: String): RawByteString; var SSL: TDFeSSL; begin SSL := TDFeSSL.Create; try //SSL.SSLCryptLib := libWinCrypt; //SSL.SelecionarCertificado; SSL.SSLCryptLib := cryWinCrypt; //cryOpenSSL; //cryWinCrypt; SSL.SSLHttpLib := httpWinHttp; //httpOpenSSL; //httpWinHttp; SSL.SSLXmlSignLib := xsLibxml2; //libWinCrypt;} //SSL.SSLType := LT_TLSv1_2; SSL.NumeroSerie := ASerieCert; SSL.CarregarCertificadoSeNecessario; Result := SSL.Assinar(AXml, ATag1, ATag2); finally SSL.free; end; end; ja conferi os parametros e parecem normais. o xml é este (provedor Softplan - NFSe) <?xml version="1.0" encoding="UTF-8"?> <xmlCancelamentoNfpse> <motivoCancelamento>1 - Erro de emissao TESTE DE ENVIO</motivoCancelamento> <nuAedf>1140619</nuAedf> <nuNotaFiscal>1828</nuNotaFiscal> <codigoVerificacao>C0DB03E288CB3119</codigoVerificacao> </xmlCancelamentoNfpse> alguem tem alguma rotina pra fazer a assinatura do XML?

ola pessoal, passei dias procurando os enderecos dos WS, para o MT e, de quebra, achei os do MS (somente de homologacao) vou deixar aqui no post (arquivo ACBrNFComServicos.ini) ainda nao fiz os testes [NFCom_MS_P] Usar=NFCom_SVRS_P [NFCom_MS_H] ; https://www.sefaz.ms.gov.br/lista-de-webservices-nfcom/ URL-QRCode_1.00= URL-ConsultaNFCom_1.00= ; NFComRecepcao_1.00=https://hom.nfcom.sefaz.ms.gov.br/ws/NFComRecepcao NFComRecepcaoEvento_1.00=https://hom.nfcom.sefaz.ms.gov.br/ws/NFComRecepcaoEvento NFComConsulta_1.00=https://hom.nfcom.sefaz.ms.gov.br/ws/NFComConsulta NFComStatusServico_1.00=https://hom.nfcom.sefaz.ms.gov.br/ws/NFComStatusServico [NFCom_MT_P] Usar=NFCom_SVRS_P [NFCom_MT_H] ; [email protected] URL-QRCode_1.00=https://homologacao.sefaz.mt.gov.br/nfcom-ext-fe/qrcode ; consulta resumida URL-ConsultaNFCom_1.00=https://homologacao.sefaz.mt.gov.br/nfcom-ext-fe/resumo ; NFComRecepcao_1.00=https://homologacao.sefaz.mt.gov.br/nfcom/services/NFComRecepcao NFComRecepcaoEvento_1.00=https://homologacao.sefaz.mt.gov.br/nfcom/services/NFComRecepcaoEvento NFComConsulta_1.00=https://homologacao.sefaz.mt.gov.br/nfcom/services/NFComConsulta NFComStatusServico_1.00=https://homologacao.sefaz.mt.gov.br/nfcom/services/NFComStatusServico

ola pessoal, segue as configuracoes para a cidade mencionada na descricao do topico [1500347] Nome=Agua Azul do Norte UF=PA Provedor=Fiorilli Versao=2.00 Params=Assinar:NaoAssinar ProRecepcionar=http://177.23.225.106:5661/IssWeb-ejb/IssWebWS/IssWebWS ProLinkURL=http://177.23.225.106:5661/IssWeb-ejb/IssWebWS/IssWebWS/formGerarNF.jsf?nroNota=%NumeroNFSe%&codVerificacao=%CodVerif%&cnpj=%Cnpj%&hash=%ChaveAcesso%

aproveitando, ele ta enviando o nome do municipio do tomador, q no caso de nao extrangeiro, nao deveria enviar

bom dia pessoal, to testando o envio das nfse para o provedor softplan, e esta normal. mas a consulta e o cancelamento nao estão funcionando. ja dei uma pesquisa no form e vi q foram feitas em 2022, mas atualizei agora de novo e continua sem funcionar. alguma dica?

boa tarde pessoal, retomando o teste pra NF Com. alguem sabe me dizer se ja tem como "cadastrar" a empresa pra emissao da NFCom no MT? tem o link? por estas bandas ninguem sabe de nada

atualizei agora e deu certo. valeu. aguardando o usuario do sistema passar os dados pra iniciar os testes em homologacao

to usando assim: MinhaNFCom.NotasFiscais.Assinar; MinhaNFCom.NotasFiscais.GravarXML('.\nfcom2.xml'); MinhaNFCom.NotasFiscais.Validar; MinhaNFCom.Enviar(True);

o problema q to tendo aqui é se vc assinar, nao pode usar a procedure GerarXML, ta dando erro, por isso comentei essa linha mas pode usar o GarvarXML q funciona

atualizei novamente, mas ja tinha atualizado ontem (18/01). acho q ainda nao foi disponiblizad as alteracoes

agora sim hehehe agora so falta os links, eu tô testando com uma empresa do MT. ainda nao tenho ninguem do RS ou SC pra testar alguem ai tem o link pra MT? e onde devo alterar?

fui validar o xml no portal da nfcom, ta dando este erro: provavelmente pq nao gerou o qrCode. nas alteracoes, eu tirei a geracao da nota, depois q assina, e o codigo só é gerado apos a assinatura, pq da erro gerar a nota apos assinar

pessoal, eu nao tenho ninguem no RS ou SC pra fazer os testes, mas aparentemente ta funcionando. só os probleminhas acima q nao resolvi ainda vou enviar as alteracoes q fiz aqui, caso alguem queira testar ACBrNFCom.rar to usando o código abaixo pra gerar a nota procedure TForm40.Button1Click(Sender: TObject); var MinhaNFCom: TACBrNFCom; //DANFeCom: TACBrNFComDANFComClass; sPath: String; begin sPath := ExtractFilePath(ParamStr(0))+'NFCom'; MinhaNFCom := TACBrNFCom.Create(Self); //DANFeCom := TACBrMinhaNFComDAMinhaNFComClass.Create(Self); //MinhaNFCom.DAMinhaNFCom := DANFeCom; MinhaNFCom.Configuracoes.Arquivos.PathArquivoMunicipios := sPath+'/Municipios'; MinhaNFCom.Configuracoes.Arquivos.PathEvento := sPath+'/Eventos'; MinhaNFCom.Configuracoes.Arquivos.PathNFCom := sPath; MinhaNFCom.Configuracoes.Arquivos.PathSalvar := sPath+'/Salvar'; MinhaNFCom.Configuracoes.Arquivos.PathSchemas := sPath+'/Schemas'; MinhaNFCom.Configuracoes.Certificados.NumeroSerie := 'xxxx'; MinhaNFCom.Configuracoes.Certificados.Senha := 'xxxx'; MinhaNFCom.Configuracoes.Certificados.VerificarValidade := true; MinhaNFCom.Configuracoes.Geral.FormaEmissao := teNormal; MinhaNFCom.Configuracoes.Geral.CSC := 'tokencsc'; MinhaNFCom.Configuracoes.Geral.ExibirErroSchema := True; //MinhaNFCom.Configuracoes.Geral.FormatoAlerta := ''; MinhaNFCom.Configuracoes.Geral.IdCSC := 'idcsc'; MinhaNFCom.Configuracoes.Geral.IdentarXML := True; MinhaNFCom.Configuracoes.Geral.Salvar := True; MinhaNFCom.Configuracoes.Geral.SSLCryptLib := cryWinCrypt; MinhaNFCom.Configuracoes.Geral.SSLHttpLib := httpWinHttp; MinhaNFCom.Configuracoes.Geral.SSLLib := libWinCrypt; MinhaNFCom.Configuracoes.Geral.SSLXmlSignLib := xsMsXml; //xsLibXml2; MinhaNFCom.Configuracoes.Geral.RetirarAcentos := True; MinhaNFCom.SSL.SSLType := LT_TLSv1_2;//LT_ALL; MinhaNFCom.Configuracoes.RespTec.CSRT := ''; MinhaNFCom.Configuracoes.RespTec.IdCSRT := 0; MinhaNFCom.Configuracoes.WebServices.Ambiente := taHomologacao; MinhaNFCom.Configuracoes.WebServices.IntervaloTentativas := 5; MinhaNFCom.Configuracoes.WebServices.Salvar := true; //MinhaNFCom.Configuracoes.WebServices.SSLType := LT_TLSv1_2; MinhaNFCom.Configuracoes.WebServices.Tentativas := 3; MinhaNFCom.Configuracoes.WebServices.TimeOut := 3000; MinhaNFCom.Configuracoes.WebServices.UF := ''; MinhaNFCom.Configuracoes.WebServices.Visualizar := True; MinhaNFCom.NotasFiscais.Clear; with MinhaNFCom.NotasFiscais.Add do begin with NFCom.Ide do begin cDV := 1; cMunFG := 5107909; cNF := 1; cUF := 51; //dhCont := Now; dhEmi := Now; finNFCom := fnNormal; indPrePago := tiNao; modelo := 62; nNF := 1; indCessaoMeiosRede := tiSim; {???} indNotaEntrada := tiNao; {???} nSiteAutoriz := sa0; {???} NFCom.Ide.tpFat := tfNormal; NFCom.Ide.verProc := '1.00'; end; //NFCom.Ide.xJust := 'nada a informar'; NFCom.infNFCom.ID := '1'; NFCom.infNFCom.Versao := 1.00; with NFCom.Emit do begin CNPJ := 'xxxx'; CRT := crtSimplesNacional; IE := 'xxx'; //IEUFDest := ''; xFant := 'NOME FANTASIA EMISSOR'; xNome := 'RAZAO SOCIAL EMISSOR'; EnderEmit.CEP := 78555000; EnderEmit.cMun := 5107909; EnderEmit.email := '[email protected]'; EnderEmit.fone := '66123123123'; EnderEmit.nro := '123'; EnderEmit.UF := 'MT'; EnderEmit.xCpl := ''; EnderEmit.xLgr := 'logradouro emitente'; EnderEmit.xMun := 'Sinop'; EnderEmit.xBairro :='bairro emitente'; end; with NFCom.Dest do begin CNPJCPF := '34589014009'; //IE := ''; //IM := '123456'; indIEDest := inNaoContribuinte; xNome := 'TESTE DE NOTA FISCAL'; idOutros := ''; EnderDest.CEP := 78555000; EnderDest.cMun := 5107909; EnderDest.email := '[email protected]'; EnderDest.fone := '66987987987'; EnderDest.nro := '987'; EnderDest.UF := 'MT'; EnderDest.xCpl := ''; EnderDest.xLgr := 'logradouro destinatario'; EnderDest.xMun := 'Sinop'; EnderDest.xBairro :='bairro destinatario'; end; with NFCom.assinante do begin cUFPrinc := 56; dContratoFim := Now; dContratoIni := Now; iCodAssinante := '123'; nContrato := '12345'; NroTermPrinc := ''; tpAssinante := taResidencial; tpServUtil := suAcessoInternet; {with NFCom.assinante.TermAdic.new do begin cUFAdic := 96; NroTermAdic := ''; end;} end; with NFCom.Det.New do begin nItem := 1; //chNFComAnt := ''; {Imposto.COFINS; Imposto.FUNTTEL; Imposto.FUST; Imposto.ICMS; Imposto.ICMSUFDest; Imposto.PIS;} //infAdProd := ''; Prod.cClass := '0100401'; // https://dfe-portal.svrs.rs.gov.br/NFCOM/tabelacclass Prod.CNPJLD := ''; Prod.cProd := '1234'; Prod.indDevolucao := tiNao; {???} Prod.qFaturada := 1; Prod.uMed := umMB; Prod.vDesc := 0; Prod.vItem := 10; Prod.vOutro := 0; Prod.vProd := 10; Prod.xProd := 'DESCRICAO DO SERVICO'; end; NFCom.infRespTec.CNPJ := '37848330000141'; NFCom.infRespTec.email := '[email protected]'; NFCom.infRespTec.fone := '66123456789'; NFCom.infRespTec.hashCSRT := 'asfafafdasf'; NFCom.infRespTec.idCSRT := 1; NFCom.infRespTec.xContato := 'contato resptec'; NFCom.Total.vBC := 10; NFCom.Total.vCOFINS := 0; NFCom.Total.vDesc := 0; NFCom.Total.vFCP := 0; NFCom.Total.vFUNTTEL := 0; NFCom.Total.vFUST := 0; NFCom.Total.vICMS := 0; NFCom.Total.vICMSDeson := 0; NFCom.Total.vIRRF := 0; NFCom.Total.vNF := 10; NFCom.Total.vOutro := 0; NFCom.Total.vPIS := 0; NFCom.Total.vProd := 10; NFCom.Total.vRetCOFINS := 0; NFCom.Total.vRetCSLL := 0; NFCom.Total.vRetPIS := 0;; //NFCom.infNFComSupl.qrCodNFCom := MinhaNFCom.GetURLQRCode(51, taHomologacao, teNormal, ; end; MinhaNFCom.NotasFiscais.GerarNFCom; //AssinarXML; //MinhaNFCom.NotasFiscais.LoadFromFIle('.\nfcom.xml'); MinhaNFCom.NotasFiscais.Assinar; MinhaNFCom.NotasFiscais.GravarXML('.\nfcom2.xml'); //MinhaNFCom.NotasFiscais.Validar; //MinhaNFCom.Cancelamento('justificativa', 1 {lote}); //MinhaNFCom.Consultar('chave', True); MinhaNFCom.Enviar(True); //MinhaNFCom.Gravar('filename', 'xml', 'path'); //MinhaNFCom.NotasFiscais.Imprimir; //MinhaNFCom.NotasFiscais.ImprimirPDF; // NFCom.Status.; // NFCom.WebServices.Consulta.ArqEnv; // NFCom.WebServices.Consulta.ArqResp; {NFCom.WebServices.Enviar.; NFCom.WebServices.Retorno; NFCom.WebServices.StatusServico;} ShowMessage('OK'); end; se alguem tiver os links pro MT (e para as outras UFs tb), me envia q ja vou fazer os testes.

pelos meus testes aqui, o problema esta em gerar o xml novamente depois q ele é assinado, mas parece q ta enviando normal este foi o retorno q recebi <retNFCom versao="1.00"> <tpAmb>2</tpAmb> <cUF>43</cUF> <verAplic>RS20230912133943</verAplic> <cStat>209</cStat> <xMotivo>Rejeição: IE do emitente inválida</xMotivo> </retNFCom> vou pegar uns dados originais pra enviar um xml de teste e tb quando manda validar, dá erro

tb to removendo esta unit. nao encontrei ela nos fontes

aqui onde ocorre o erro NFCom.Configuracoes.Geral.SSLCryptLib := cryWinCrypt; NFCom.Configuracoes.Geral.SSLHttpLib := httpWinHttp; NFCom.Configuracoes.Geral.SSLLib := libWinCrypt; NFCom.Configuracoes.Geral.SSLXmlSignLib := xsLibXml2; NFCom.SSL.SSLType := LT_TLSv1_2;//LT_ALL;