adilsonpazzini

Estou tento problemas com alguns NCMs ao emitir NF e o complicado e que existe na tabela da IBPT porem agora consultando no site http://www4.receita.fazenda.gov.br/simulador/PesquisarNCM.jsp O mesmo código já não existe mais, e esta na tabela atualizada da IBPT , isso só esta ocorrendo no estado de SP por enquanto , alguém mais esta tendo este problema , Conforme exemplo abaixo : Um exemplo de NCM é o 3910

No firebird 3.0 Ja ta dando pra criar as próprias fuctions .

Tenho esse mesmo problema para o Provedor 4R .. vi aqui que tem outros 2 tópicos falando sobre isso . Ate tentei ajudar pra ver se conseguia resolver . mais além de não conseguir também não tive muito tempo ainda pra ver melhor sobre isso . mais segue ai os outros 2 tópicos que tratam sobre isso pra ver se te ajuda . esse problema só acontece quando se faz assinatura utilizando a biblioteca OpenSSL . com capicom funciona legal . http://www.projetoacbr.com.br/forum/topic/29820-betha-openssl-erro-falha-ao-assinar-o-documento/ http://www.projetoacbr.com.br/forum/topic/19010-erro-signature-failed/

Uso Lazarus . www.dmssistemas.com.br

Vc mesmo pode se inscrever . incluindo uma conta no gmail e pedindo pra se adicionar . Vc mesmo pode se inscrever . incluindo uma conta no gmail e pedindo pra se adicionar .

ref ao Trecho ... Foi mau Juliomar ... Ref ao Datamodule , sim eu uso dentro de um Datamodule

var F1: TextFile; vPath1: String; ResultTemp: Boolean; CAMINHO : String ; Ini : TIniFile ; varBD_ALIAS:string; varBD_PATH :String; varBD_HOST :String; varBD_USER :String; varBD_PASS :String; varBD_PORTA:String; begin varBD_ALIAS := 'DB'; ResultTemp := False; CONEX01.Show ; CONEX01.Repaint; //-----------> acertando alias <------------------------------ Caminho := IncludeTrailingPathDelimiter(ExtractFileDir(application.ExeName))+'ARQCONEXAO.INI'; if not(fileexists(CAMINHO)) then begin Showmessage('Arquivo inexistente => '+CAMINHO); APPLICATION.Terminate ; Abort ; end else begin Application.CreateForm(TSISINI,SISINI); if SISINI.LoadAlias > 1 then begin SISINI.ShowModal; if SISINI.ModalResult = MROK then varBD_ALIAS := SISINI.ALIAS_SELEC; end; freeAndNil(SISINI); end; //############################################################################# //###################> lendo paramentros do ARQUIVO INI <###################### //############################################################################# Ini := TIniFile.Create(Caminho); try varBD_PATH := Ini.ReadString( varBD_ALIAS, 'PATH', '' ); varBD_HOST := Ini.ReadString( varBD_ALIAS, 'HOST', '' ); varBD_USER := Ini.ReadString( varBD_ALIAS, 'USER', '' ); varBD_PORTA:= Ini.ReadString( varBD_ALIAS, 'PORTA', '' ); if trim(Ini.ReadString( varBD_ALIAS, 'PASSWORD', '')) <> '' then varBD_PASS := Decrypt(HextoAscii(Ini.ReadString( varBD_ALIAS, 'PASSWORD', ''))) else varBD_PASS := 'masterkey'; finally Ini.Free; end; try DM.DATABASE.Connected := False ; DM.DATABASE.HostName := varBD_HOST ; DM.DATABASE.Database := varBD_PATH ; DM.DATABASE.User := varBD_USER; DM.DATABASE.Password := varBD_PASS; if trim(textotonum(varBD_PORTA)) <> '' then DM.DATABASE.Port := strtoint(textotonum(varBD_PORTA)); DM.DATABASE.LoginPrompt := False; DM.DATABASE.Connected := true; ResultTemp := True; Except On E: Exception do begin ShowMessage('Não foi possível conectar ao Banco de Dados !!!'+E.Message); end; end; CONEX01.Close; Result := ResultTemp; end;

Veja esse Topico la no forum do lazarus ref a dll https://groups.google.com/forum/#!topic/lazarus-br/0ik5HwTTzOs ref a utf8 https://groups.google.com/forum/#!topic/lazarus-br/AZMXv-uEfYE Talvez um desses te ajude .

Resolvido Manual abrasf 2.2 Código de identificação do regime especial de tributação 1 – Microempresa municipal 2 – Estimativa 3 – Sociedade de profissionais 4 – Cooperativa 5 – Microempresário Individual (MEI) 6 – Microempresário e Empresa de Pequeno Porte (ME EPP) Quando a empresa prestadora do serviço for optante pelo simples nacional informe "05" MEI ou "06" ME/EPP. No caso informei 06 e agora ta passando . Obrigado .

Estou tentando enviar um RPS para o Provedor 4R para empresa do tipo SIMPLES NACIONAL . e estou tento o seguinte retorno : Para Empresas diferente de Simples nacional . estou enviando normal . estou setando as seguintes propriedades NaturezaOperacao := no1; RegimeEspecialTributacao := retMicroempresaMunicipal; OptanteSimplesNacional := iif(QNFSECab.fieldbyname('REGIME_TRIBUTARIO').AsString='S',snSim,snNao); //==S=Simples / R-Lucro real / P-Presumido E mesmo preenchido dessas forma me retorna a Rejeição em anexo . se alguém puder me ajudar agradeço . Adilson Pazzini .

Também uso Lazarus já a uns 2 anos . Realmente, se não insistir, não vai conseguir usar mesmo , mais hj temos vários fóruns . que o pessoal sempre ajuda . pra mim funciona bem .

Ítalo . Em modo CAPICOM testado as alterações e tudo OK .. ate agora esta funcionando tudo certinho . ref ao problema em assinar o RPS no modo OpenSSL esta com problemas. eu tentei mapear aqui. nao sei como resolver . mais vou te passar o que eu vi . veja se tem algum que possa me ajudar a resolver esse problema de erro de assinatura no Openssl . UNIT AcbrDFEOpenSSL Primeiro , qndo chama essa funcao abaixo : function TDFeOpenSSL.Assinar(const ConteudoXML, docElement, infElement: String; SignatureNode: String; SelectionNamespaces: String; IdSignature: String): String; ai executa o comando abaixo : XmlAss := XmlSecSign(AXml, AnsiString(SignatureNode), AnsiString(SelectionNamespaces)); Que direciona para a Function abaixo : function TDFeOpenSSL.XmlSecSign(const ConteudoXML: AnsiString; SignatureNode, SelectionNamespaces: AnsiString): AnsiString; Onde nessa linha abaixo aconte o erro : Falha ao Assinar o Documento { sign the template } if (xmlSecDSigCtxSign(FdsigCtx, node) < 0) then raise EACBrDFeException.Create(cErrDSigSign); //**** o erro acontece aqui gerado por essa Raise . ai acaba que nao assina o rps . pois consultando o xml nao esta gravando a assinatura .

OK . VALEU . vou atualizar e testar e posto aqui qualquer problema obrigado .

Italo , Bom dia , vi que hj saiu algumas aualizações ref a algumas bibliotecas do Capicom e Openssl e tambem daqueles aquivos que vc havia me enviado para testes, essa atualizacao que aconteceu hj . ja estao com aquelas suas alteracoes ? sem mais, Adilson Pazzini

Ja sim , esta atualizado e funcionando o arquivo INI . So que pra funcionar mesmo a parte de conexao . vai precisar dos arquivos que o Italo deixou ai num post anterior , pois sem eles nao vai conseguir funcionar o envioRPSSincrono para Capicom

Sim . vou iniicar os testes . aparentemente ele reclama de que o RPS nao pode ser encontrado . nao sei se ta tendo algum problema em passagem dos arquivo gerados de uma funcao pra outra . mais da impressao que seria algo nesse sentido .

Italo . Funcionou aqui . agora toda a parte Capicom ta rolando .. consegui funcionar todos os itens ref ao provedor 4R . isso após atualização dos fontes que vc me enviou pra testes . mais uma vez te agradeço .. So pra OpenSSL que a parte do enviodoRPS ainda não esta funcionando, ele me parece não estar conseguindo assinar o documento Mais ja o Capicom funcionando 100% ja quebra um baixa galhao .. Muito obrigado pela Força . Adilson Pazzini

Valeu Italo .. vou testar e ja posto . obrigadooooo

Italo , Bom dia , se não for te pedir muito ., teria como vc me disponibilizar as alteracoes somente pra eu poder testar e ver se o que vc fez de alteracão resolveria meu problema , pois ai . se resolver eu te falo e se nao resolver eu vou tentar garimpar mais um pouco aqui , ref ao erro da assinarura no modo envioSincrono e aqueles problemas de estou de tempo de envio ref ao Capicom . ref ao fonte ACBrNFSeWebServices.pas . se nao tiver como sem problemas tambem . seria mais pra adiantar aqui caso nao der certo . Adilson Pazzini

Beleza então , vamos aguardar . obrigado pelos retornos . Adilson Pazzini

Italo , recompilei os fontes e usei o proprio demo para testes e continuar com o erro de tempo , vc havia me comentado acima que tinha feito algumas alteracoes na unit ACBrNFSeWebServices.pas , sera que tem haver com esse erro que estou tento .

Entao . o Erro de assinatura da somente no EnvioSincrono para com OpenSSL , no capicom esta dando o erro interno 12002 . mais deixa eu vou limpar aqui e recompilar novamente pra ver . qualquer coisa ja posto aqui mesmo . obrigado

Atualizei conforme vc comentou , porem ainda pra EnvioSincrono continuar dando o mesmo problema que antes Modo OpenSSL : Falha ao assinar o Documento agora para envio do cancelamento e consultarNFSeporRPS ta funcionando certinho . ja para Capicom . ja nao da mais o erro de Não foi possível carregar XML Agora o erro da é Erro Interno: 12002 Erro HTTP: 0 Erro: Requisição não enviada. 12002 - O tempo limite da operação foi atingido E esse erro para capicom esta dando em todos os processos , No cancelamento , consultadenfseporRPS .

Beleza Italo . vou testar . eu ate havia trocado para VersaoXML=2 pois estava assim na Trunk1 e estava funcionando . mais blz . vou testar aqui e te aviso . Tambem fiz ai acima , mais algumas alteracoes no pnfsNFSeG.pas . qndo puder subir agradeço . MAIS UMA VEZ MUITO OBRIGADOOOO Adilson PAzzini

Italo . fiz mais umas alterações aqui . no pnfsNFSeG.pas . se puder analisar pra commitar agradeço. E estou com um problema pra enviar um Lote Síncrono . na hora da assinatura . da erro . tanto no OpenSSL quando no Capicom . dizendo que o RPS não foi carregado ta dando a seguinte Mensagem : Modo Capicom : Não foi possível carregar XML <?xml version="1.0" encoding="UTF-8"?><EnviarLoteRpsSincronoEnvio xmlns="http://www.abrasf.org.br/nfse.xsd"><LoteRps Id="10074" versao="2.00"><NumeroLote>10074</NumeroLote><CpfCnpj><Cnpj>72883051000209</Cnpj></CpfCnpj><InscricaoMunicipal>2560300</InscricaoMunicipal><QuantidadeRps>1</QuantidadeRps><ListaRps><Rps><InfRps</Signature></Rps></ListaRps></LoteRps><Signature xmlns="http://www.w3.org/2000/09/xmldsig#"><SignedInfo><CanonicalizationMethod Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315" /><SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1" /><Reference URI="#10074"><Transforms><Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature" /><Transform Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315" /></Transforms><DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" /><DigestValue></DigestValue></Reference></SignedInfo><SignatureValue></SignatureValue><KeyInfo></KeyInfo></Signature></EnviarLoteRpsSincronoEnvio> Modo OpenSSL : Falha ao assinar o Documento Ref. a alteração que vc falou que vai fazer no ACBrNFSeWebServices.pas , sera que tem haver com esse erro que estou tento ? Sem mais, Adilson Pazzini . pnfsNFSeG.pas