André Medeiros - KRK

Olá Juliana, O site da prefeitura esta confuso, alguns links apontam para o provedor CONAM como este os que eu te mandei acima, alguns links apontam para um outro provedor, aparentemente GIAP, como este que você postou. Na realidade não haveria mudanças a fazer nem no arquivo ini nem no componente se o provedor for o CONAM. Dando uma boa pesquisada no site me parece que o novo provedor é o GIAP mesmo. (O ideal é conformar com a prefeitura) https://giap.com.br/apex/apoio/f?p=312:1: Se for este o novo provedor, será necessário implementa-lo no ACBr. Porém seria interessante aguardar o parecer de outros membros como o do @Italo Jurisato Junior que mantem esta parte do ACBr. O link para o manual é o https://pirassununga.giap.com.br/apex/pirassu/f?p=867:94 []s

Olá Acredito que seja um problema no servidor da prefeitura Veja o link abaixo https://nfe.etransparencia.com.br/sp.pirassununga/nfe/principal.aspx Compare com este https://nfe.etransparencia.com.br/sp.poa/nfe/principal.aspx E aparentemente eles fizeram um alteração no serviço http://pirassununga.sp.gov.br/nfe-nota-fiscal/ []s

Olá @julianamver Verifica no seu arquivo Cidades.ini se existe um bloco para Pirassununga. [3539301] Nome=Pirassununga UF=SP Provedor=CONAM NomeURL_H=sp.pirassununga NomeURL_P=sp.pirassununga []s

Olá @julianamver A principio o CONAM não implementa a pré-validação dos xmls por isso não há a necessidade de te-los em seu diretório.

Olá Italo Obrigado pela ajuda, consegui assinar o arquivo com sucesso. Grande abraço.

Olá Italo, tudo bem ? Fiz a atualização para a versão 13687, mas a falha continua. Se você quiser me passar alguma dica de como posso caminhar para auxiliar na solução, pode me passar e contar comigo. Mesmo assim vou listar algumas informações que acho relevante Na instrução infNode := XmlSecLookUpNode(rootNode, InfElement ); O parâmetro InfElement possui o valor "InfRps" e no xml, a string "InfRps" esta dentro da tag <!DOCTYPE test [<!ATTLIST InfRps Id ID #IMPLIED>]> Eu acho que é por isso que ele não encontra, mas eu não saberia como resolver isso, "se é que esse é o problemas mesmo" Abraços

Olá Amigos, tudo bem ? Estou tentando enviar uma NFSe para cidade de Cariacica/ES. Mas estou recebendo a mensagem "Erro: Falha ao localizar o nó Raiz." É a primeira vez que estou tentando enviar para o provedor SMARAPD. Estou usando a versão 13765 do ACBr. O meu ambiente é Linux 64, Lazarus 1.6.4, FPC 3.0.2 A falha ocorre na função XmlSecFindSignatureNode no momento de buscar o nós filhos do raiz. Estou enviando o arquivo XmlToSign caso precise de alguma avaliação. Fico a disposição caso precisem de alguma informação. Abraços, XmlToSign.xml

Olá Amigos, O tópico é mais uma observação do que um report de problemas, mas acredito que merece uma atenção para uma melhoria futura. Comparando a geração de PDFs da NFe com a geração de PDFs do Boleto, enfrentei a seguinte situação. Se eu utilizar a geração de PDF da NFe em maquinas linux que não possuem impressoras instaladas a geração e feita de forma correta. Já o boleto eu só consigo gerar o PDF se eu instalar alguma impressora seja ela virtual ou física. É possível que no futuro possamos gerar PDFs dos boletos sem a necessidade de instalação de impressoras ? Abraços

Olá @Juliomar Marchetti, td bem ? Quando criei a estrutura dos arquivos me espelhei em algum projeto do DFe, e por falta de experiencia devo ter criado este arquivo de forma equivocada. Vou remover este arquivo dos próximos envios. Obrigado

Olá pessoal, Estou enviando mais uma atualização do pacote do Recopi. Acredito que eu tenha encontrado o problema do erro 400 e o retorno em branco dos dados, porém, mesmo encontrando o problema, não sei como resolver. O erro 400 ocorre quando eu deixo o name space sem a barra, que a principio, entendo ser a forma correta conforme o wsdl do webservice Se deixo com a barra temos os xmls de retorno em branco ACBRRECOPI_NAMESPACE = 'http://www.fazenda.sp.gov.br/'; //Assim temos retorno de xml, mas sem valor ACBRRECOPI_NAMESPACE = 'http://www.fazenda.sp.gov.br'; //Assim temos erro 400 Para facilitar o entendimento segue o trecho do wsdl do método consulta publica. POST /recopiws/recopi.asmx HTTP/1.1 Host: webservices.fazenda.sp.gov.br Content-Type: text/xml; charset=utf-8 Content-Length: length SOAPAction: "http://www.fazenda.sp.gov.br/ConsultaPublica" <?xml version="1.0" encoding="utf-8"?> <soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"> <soap:Body> <ConsultaPublica xmlns="http://www.fazenda.sp.gov.br"> <xmlConsultaPublica>string</xmlConsultaPublica> </ConsultaPublica> </soap:Body> </soap:Envelope> Veja que na linha <ConsultaPublica xmlns="http://www.fazenda.sp.gov.br"> não tem a barra final, se enviar assim, recebemos erro 400. Se enviarmos <ConsultaPublica xmlns="http://www.fazenda.sp.gov.br/"> não recebemos erro 400, mas também não recebemos dados. Entrei em contato com o departamento do Recopi para solicitar algum tipo de ajuda, mas a resposta que obtive foi "Leia o manual", No inicio deste poste, menciono a criação deste componente usando a importação do wsdl no delphi 7, ele ainda funciona, mas gostaria de compatibiliza-lo com o DFe do ACBr. Acho que só falta resolver este problema para podermos colocar o ACBrRecopi em produção. O Recopi também fornece xsd para validação, mas não sei implementar, se alguém der alguma dica, acredito que seja capaz de finalizar esta parte também. Também fico a disposição caso precisem de qualquer informação. Obrigado a todos. acbr.zip

Olá @BigWings Fiz a alteração conforme sua sugestão e funcionou perfeitamente. Muito obrigado

Olá Pessoal, Fiz um update hoje para revisão 13511, e estou enfrentando uma dificuldade incomum. Utilizo Lazarus 1.6.4 com FPC 3.0.2 em Linux 64bits. No ACBrNFSeNotasFiscais.pas, precisei fazer a alteração abaixo, pois recebo falha no momento de executar o StrToFloat, informando que 2,00 é um float invalido. FNFSeW.NFSeWClass.VersaoDados := StrToFloat(Configuracoes.Geral.ConfigXML.VersaoDados); //FNFSeW.NFSeWClass.VersaoDados := StrToFloat(StringReplace(Configuracoes.Geral.ConfigXML.VersaoDados,'.',',',[rfReplaceAll, rfIgnoreCase])); Para evitar alterações no ACBr tentei configurar meu fonte passando DefaultFormatSettings.DecimalSeparator:='.'; Testei também com DefaultFormatSettings.DecimalSeparator:=','; Mas em nenhum dos casos tive sucesso. Acredito que a alteração que fiz no ACBr deva atender só a minha necessidade, ou de alguns, e não gostaria de continuar assim. Alguém poderia me ajudar com a solução deste problema ? Abraços,

Olá Italo, tudo bem ? Atualizei meu fonte e vi as alterações, obrigado. Precisei fazer a mesma alteração no pnfsNFSeG.pas conforme o bloco abaixo proCONAM: begin Gerador.Opcoes.DecimalChar := ','; Gerador.Prefixo := ''; Gerador.wGrupoNFSe('Sdt_processarpsin xmlns="NFe"'); Gerador.wGrupoNFSe('Login'); Gerador.wGrupoNFSe('CodigoUsuario>' + UserWeb + '</CodigoUsuario'); Gerador.wGrupoNFSe('CodigoContribuinte>' + SenhaWeb + '</CodigoContribuinte'); Gerador.wGrupoNFSe('/Login'); // Identificaçao do RPS Gerador.wGrupoNFSe('SDTRPS'); Gerador.wCampoNFSe(tcStr, '', 'Ano' , 01, 04, 0, FormatDateTime('yyyy', DataInicial) , ''); Gerador.wCampoNFSe(tcStr, '', 'Mes' , 01, 02, 0, FormatDateTime('mm', DataInicial) , ''); Gerador.wCampoNFSe(tcStr, '', 'CPFCNPJ', 01, 14, 0, CNPJ , ''); Gerador.wCampoNFSe(tcStr, '', 'DTIni' , 01, 10, 0, FormatDateTime('dd/mm/yyyy', DataInicial) , ''); Gerador.wCampoNFSe(tcStr, '', 'DTFin' , 01, 10, 0, FormatDateTime('dd/mm/yyyy', DataFinal) , ''); if OptanteSimples = snSim then begin Gerador.wCampoNFSe(tcInt, '', 'TipoTrib' , 01, 01, 0, 4 , ''); // Data de adesao ao simples nacional Gerador.wCampoNFSe(tcStr, '', 'DtAdeSN' , 01, 10, 0, FormatDateTime('dd/mm/yyyy', DataOptanteSimples) , ''); Gerador.wCampoNFSe(tcDe2, '', 'AlqIssSN_IP', 01, 06, 0, AliquotaIss, ''); end else begin case ExigibilidadeISS of exiExigivel: Gerador.wCampoNFSe(tcInt, '', 'TipoTrib', 001, 1, 0, 1 , ''); exiNaoIncidencia, exiIsencao, exiImunidade: Gerador.wCampoNFSe(tcInt, '', 'TipoTrib', 001, 1, 0, 2 , ''); exiSuspensaDecisaoJudicial, exiSuspensaProcessoAdministrativo: Gerador.wCampoNFSe(tcInt, '', 'TipoTrib', 001, 1, 0, 3 , ''); exiExportacao: Gerador.wCampoNFSe(tcInt, '', 'TipoTrib', 001, 1, 0, 5 , ''); end; // Data de adesao ao simples nacional Gerador.wCampoNFSe(tcStr, '', 'DtAdeSN' , 01, 10, 0, '', ''); Gerador.wCampoNFSe(tcStr, '', 'AlqIssSN_IP', 01, 06, 0, '' , ''); end; if RegimeEspecialTributacao = retMicroempresarioIndividual then Gerador.wCampoNFSe(tcStr, '', 'AlqIssSN_IP', 001, 6, 0, '' , ''); Gerador.wCampoNFSe(tcStr, '', 'Versao', 001, 4, 0, '2.00' , ''); Gerador.wGrupoNFSe('Reg20'); Gerador.ArquivoFormatoXML := Gerador.ArquivoFormatoXML + Notas; Gerador.wGrupoNFSe('/Reg20'); // Inicio do rodape registro 90 Gerador.wGrupoNFSe('Reg90'); Gerador.wCampoNFSe(tcStr, '', 'QtdRegNormal' , 01, 05, 1, QtdeNotas, ''); Gerador.wCampoNFSe(tcDe2, '', 'ValorNFS' , 01, 16, 2, ValorTotalServicos, ''); Gerador.wCampoNFSe(tcDe2, '', 'ValorISS' , 01, 16, 2, ValorIss, ''); Gerador.wCampoNFSe(tcDe2, '', 'ValorDed' , 01, 16, 2, ValorTotalDeducoes, ''); Gerador.wCampoNFSe(tcDe2, '', 'ValorIssRetTom', 01, 16, 2, ValorIssRetido, ''); Gerador.wCampoNFSe(tcDe2, '', 'ValorTributos' , 01, 16, 2, ValorTotalTributos, ''); Gerador.wCampoNFSe(tcStr, '', 'QtdReg30' , 01, 05, 1, QtdTributos, ''); Gerador.wGrupoNFSe('/Reg90'); // Fim do rodape registro 90 Gerador.wGrupoNFSe('/SDTRPS'); Gerador.wGrupoNFSe('/Sdt_processarpsin'); end; Estou enviando o arquivo alterado. No caso do arquivo do CONAM, por algum motivo que eu não consegui identificar, as vezes a configuração do DecimalChar no Crete não funcionou muitobem. Fiz vários testes deixando o Gerador.Opcoes.DecimalChar := ','; no método GerarXML_CONAM; e o comportamento foi bem melhor. Vou enviar o pnfsNFSeW_CONAM.pas também com esta pequena alteração. Obrigado mais uma vez []s pnfsNFSeG.pas pnfsNFSeW_CONAM.pas

Olá amigos ! Fiz algumas correções e melhorias no provedor conam. Lembrando que os valores decimais são separados por virgula no XML. Para isso fiz as seguintes alterações: 1) Mudei a formatação dos valores que estavam como tcStr no gerador com FormatFloat para tcDe2 Gerador.wCampoNFSe(tcDe2, '', 'AlqIssSN_IP', 01, 06, 0, NFSe.ValoresNfse.Aliquota, ''); 2) Adicionei a linha abaixo no Create do objeto para informar ao gerador que queremos usar ', ' no lugar de '.' Gerador.Opcoes.DecimalChar := ','; Segue anexo o arquivo alterado Abraços, pnfsNFSeW_CONAM.pas

Obrigado @Italo Jurisato Junior Como eu disse não é uma critica, era apenar para entendimento. Espero que a NFSe (Nacional) resolva isso, para termos um padrão só !! Abraços,

Olá pessoal, Estou desenvolvendo um projeto envolvendo o ACBr_NFSe. Percebi que a classe TNFSe possui as propriedades Prestador do tipo (TIdentificacaoPrestador) e PrestadorServico TNFSe = class(TPersistent) . . . . property Prestador: TIdentificacaoPrestador read FPrestador write FPrestador; property PrestadorServico: TDadosPrestador read FPrestadorServico write FPrestadorServico; E a classe TDadosPrestador possui a propriedade IdentificacaoPrestador também do tipo (TIdentificacaoPrestador) TDadosPrestador = class(TPersistent) . . . property IdentificacaoPrestador: TIdentificacaoPrestador read FIdentificacaoPrestador write FIdentificacaoPrestador; Não é uma critica à arquiterura, apenas uma curiosidade, é assim mesmo a implementação destas propriedades ? Abraços,

Olá Pessoal. Estou enviando mais uma atualização do Recopi. Ainda não consegui resolver o problema do resgate dos dados, mas os XMLS para todos os métodos já estão sendo gerados de forma correta. Abraços, acbr.zip

Olá @Juliomar Marchetti "desculpe a demora" Não se preocupe, estamos juntos para contribuir Como utilizo o Lazarus para desenvolvimento no dia-a-dia, meu acesso ao Delphi é um pouco mais restrito, mas vou deixar os exemplos e os pacotes Lazarus e Delphi na mesma "altura" e enviar as atualizações até a próxima semana. Fiquem a vontade para criticar, se for necessário ajustes para padronizar a codificação, permaneço a disposição. Muito obrigado, Abraços,

Olá Pessoal, Estou com algumas dúvidas. Será que vocês conseguem me ajudar !? Consultando o link abaixo https://webservices.fazenda.sp.gov.br/recopiws/recopi.asmx?op=ConsultaPublica Podemos ver o WS do método consulta publica do Recopi. Ai segue algumas características dos meus testes 1) Mesmo eu enviado a requisição no soap: ou soap12: sempre recebo o retorno em soap: 2) Estou configurando FPSoapAction := '*' para o soap12 e FPSoapAction := 'http://www.fazenda.sp.gov.br/ConsultaPublica' para o soap 3) Reconfigurei o envelope para ficar igual ao do webservice 4) No webservice tem uma tag <xmlConsultaPublica>. Se eu adiciono esta tag recebo erro 400, se eu não adiciono não ocorre erros, eu recebo o xml de retorno, mas o xml vem sem os dados Acredito que estou deixando passar alguma coisa simples e não estou obtendo o resultado correto. Grato pela ajuda

Obrigado @Juliomar Marchetti Estou tentando manter o mesmo padrão dos outros DFEs. Caso precise fazer alguma correção é só falar que eu vou fazer o melhor para deixar tudo certo neste componente. Abraços,

Olá Pessoal Segue mais uma atualização do Recopi. Criei um pcnRecopiConversao Obrigado pela dica @EMBarbosa mas a ideia era tentar manter o mesmo padrão dos objetos usados no DFE ai eu iniciei um pcnRecopi. Abraços. acbr.zip

Olá amigos O problema que causava o "erro -2" era a configuração do SSLType, fixei na V3 e agora esta transmitindo normalmente. Estou enviando um anexo com pacotes Lazaros e Delphi(7) e exemplos também. Os métodos(WebServices) implementados até o momento foram o "Obter versão" e o "Consulta publica". Gostaria de uma dica de vocês para implementar os próximos métodos. Cada um deles tem dados bem específicos, sendo assim pensei em criar um objeto para cada método ficando assim TAtualizarNFLote TConfirmaOperacaoLote TControlarEstoque TSolicitarOperacaoLote Se for este mesmo o caminho só estou um pouco confuso de como organizar estes objetos da forma correta. Se vocês me derem uma ajuda com a organização, acredito que consigo dar mais um passo. Abraços, acbr.zip

Olá Amigos, Estou tentando emitir minha primeira NFSe para cidade de Porto Alegre. Estou usando a revisão 13228 do ACBr. Mas estou recebendo a mensagem Falha ao localizar o nó de Assinatura. Anexo segue um exemplo do XML que esta sendo gerado 1=Através da ação gerar lote de rps 2=Através da ação enviar um rps Não sei se ajuda, mas quando debugo na linha 2200 do ACBrNFSeWebServices.pas FPDadosMsg := FNotasFiscais.AssinarLote(FPDadosMsg, FTagGrupo, TagElemento, FPConfiguracoesNFSe.Geral.ConfigAssinar.Lote, xSignatureNode, xDSIGNSLote, xIdSignature); O Parâmetro FTagGrupo está com o valor "EnviarLoteRpsEnvio" O Parâmetro TagElemento está com o valor "LoteRps" Mas no XML não tem estes valores. O problema ocorre tanto no ação de "Gerar e Enviar Lote RPS" quanto na ação "Gerar e Enviar um RPS" 1UNICA-rps.xml 2UNICA-rps.xml

Olá Pessoal, Troquei uma mensagem com o @Daniel Simoes a respeito deste projeto e ele me pediu para postar aqui no fórum para que outros também possam participar se desejar. Ha alguns anos atras fiz um componente para consumir o WS Recopi. E sempre achei que este projeto tem tudo há ver com o DFE do ACBr. (XML, Consumo de WS, Assinatura e certificado digital) https://www.fazenda.sp.gov.br/RECOPI/ A principio fiz apenas com Capicom e ainda hoje funciona normalmente. Logo que o trunk2 foi disponibilizado aqui no ACBr, senti o desejo de compartilhar o componente, mas antes eu queria deixa-lo mais próximo do ACBr. Enfim o tempo passou, e o ACBr sofreu outra grande mudança que foi o fim da Capicom. E agora acho que o componente ficou mais distante ainda do ACBr. Inicie o projeto novamente e estou compartilhando com vocês minha codificação inicial. No Zip Recopi tem um projeto em Lazarus para testar as funções e no Zip tem o componente inicial só em Lazarus ainda. Implementei um método chamado consulta publica, é o método que pode ser consumido por qualquer pessoa, pois os demais métodos só podem ser consumidos por CNPJs cadastrados no Recopi. O método obter versão também pode ser consumido por qualquer um, mas achei ele muito simples. Segue abaixo o link do manual atualizado https://www.fazenda.sp.gov.br/RecopiNacional/Manual RECOPI Nacional - Web Service.pdf Outra observação importante é o link de homologação que deve ser este abaixo https://webhomolog2.fazenda.sp.gov.br/RecopiNacionalWS/RECOPI.asmx Outra observação importante é que apesar da minha implementação, recebo um erro "-2" no momento de enviar os dados. Passei alguns dias tentando resolver isso, mas acredito que não tenho conhecimento suficiente para resolve-lo sozinho, se alguém puder dar alguma dica ou precisar de alguma informação estou a disposição. Abraços acbr.zip Recopi.zip

Olá @cloudcon Resolvi adicionando as linhas abaixo na configuração do componente ACBrNFe.Configuracoes.Geral.SSLLib:=libOpenSSL; ACBrNFe.Configuracoes.Geral.SSLCryptLib:=cryOpenSSL; ACBrNFe.Configuracoes.Geral.SSLHttpLib:=httpOpenSSL; ACBrNFe.Configuracoes.Geral.SSLXmlSignLib:=xsXmlSec; Lembrando que esta configuração é baseada no meu ambiente, veja o link abaixo para maiores detalhes Abraços,