joemil

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;

bom dia pessoal, atualizei o ACBr, e nele tem a pasta ACBrNFCom, q o Ítalo disponibilizou, mas ainda nao ta completo. comecei a fazer uns testes nele, e tive q alterar o tipo do campo cClass de integer para String. agora ta gerando o XML e validando porem nao ta assinando este é o xml q to gerando nfcom.xml e este o código q to usando sPath := ExtractFilePath(ParamStr(0))+'NFCom'; NFCom := TACBrNFCom.Create(Self); DANFeCom := TACBrNFComDANFComClass.Create(Self); //NFCom.Configuracoes.Arquivos.DownloadDFe.; NFCom.Configuracoes.Arquivos.PathArquivoMunicipios := sPath+'/Municipios'; NFCom.Configuracoes.Arquivos.PathEvento := sPath+'/Eventos'; NFCom.Configuracoes.Arquivos.PathNFCom := sPath; NFCom.Configuracoes.Arquivos.PathSalvar := sPath+'/Salvar'; NFCom.Configuracoes.Arquivos.PathSchemas := sPath+'/Schemas'; NFCom.Configuracoes.Certificados.NumeroSerie := 'xxxxxx'; //4EC40C1EDC33DD22FB394B41CF3D005358E6BEAE'; NFCom.Configuracoes.Certificados.VerificarValidade := true; NFCom.Configuracoes.Geral.FormaEmissao := teNormal; NFCom.Configuracoes.Geral.CSC := 'tokencsc'; NFCom.Configuracoes.Geral.ExibirErroSchema := True; //NFCom.Configuracoes.Geral.FormatoAlerta := ''; NFCom.Configuracoes.Geral.IdCSC := 'idcsc'; NFCom.Configuracoes.Geral.IdentarXML := True; NFCom.Configuracoes.Geral.RetirarAcentos := True; NFCom.Configuracoes.Geral.Salvar := True; 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; NFCom.Configuracoes.RespTec.CSRT := '';; NFCom.Configuracoes.RespTec.IdCSRT := 0; NFCom.Configuracoes.WebServices.Ambiente := taHomologacao; NFCom.Configuracoes.WebServices.IntervaloTentativas := 5; NFCom.Configuracoes.WebServices.Salvar := true; //NFCom.Configuracoes.WebServices.SSLType := LT_TLSv1_2; NFCom.Configuracoes.WebServices.Tentativas := 3; NFCom.Configuracoes.WebServices.TimeOut := 3000; NFCom.Configuracoes.WebServices.UF := ''; NFCom.Configuracoes.WebServices.Visualizar := True; NFCom.DANFCom := DANFeCom; NFCom.NotasFiscais.Clear; with NFCom.NotasFiscais.Add do begin with NFCom.Ide do begin cDV := 1; cMunFG := 5107909; cNF := 1; cUF := 51; dhCont := Now; dhEmi := Now; finNFCom := fnNormal; indCessaoMeiosRede := tiSim; {???} indNotaEntrada := tiNao; {???} indPrePago := tiNao; modelo := 62; nNF := 1; nSiteAutoriz := sa0; {???} //tpAmb := taHomologacao; //tpEmis := teNormal; 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 := '0495553xxxxxxx'; CRT := crtSimplesNacional; IE := '61161686917'; //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.xBairro :='bairro emitente'; EnderEmit.xCpl := ''; EnderEmit.xLgr := 'logradouro emitente'; EnderEmit.xMun := 'Sinop'; 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.xBairro :='bairro destinatario'; EnderDest.xCpl := ''; EnderDest.xLgr := 'logradouro destinatario'; EnderDest.xMun := 'Sinop'; 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 //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.infNFComSupl.qrCodNFCom := '1'; 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;; end; NFCom.NotasFiscais.GerarNFCom; NFCom.NotasFiscais.Assinar; NFCom.NotasFiscais.GravarXML('.\nfcom.xml'); NFCom.NotasFiscais.Validar; //NFCom.Cancelamento('justificativa', 1 {lote}); //NFCom.Consultar('chave', True); NFCom.Enviar(True); //NFCom.Gravar('filename', 'xml', 'path'); //NFCom.NotasFiscais.Imprimir; //NFCom.NotasFiscais.ImprimirPDF; // NFCom.SSL := LT_TLSv1_2; // NFCom.Status.; // NFCom.WebServices.Consulta.ArqEnv; // NFCom.WebServices.Consulta.ArqResp; {NFCom.WebServices.Enviar.; NFCom.WebServices.Retorno; NFCom.WebServices.StatusServico;} alguem mais ja iniciou os teste do componente?