Elisângela Borato

olá, amigos... caso interesse... o arquivo SimplISS.ini atualmente disponibilizado em trunk2\Exemplos\ACBrDFe\ACBrNFSe\ArqINI esta incompleto no tocante a listagem de cidades/URL de produção: consta apenas 9 cidades enquanto que em versão anterior chegou a constar 27 cidades. também esta setado UseCertificado=1 ao invés de UseCertificado=0 (o provedor SimplISS por agora não exige certificado). em anexo o arquivo SimplISS.ini completo (ou o mais completo que encontrei em meus backups) SimplISS.INI

Boa tarde Italo, Valeu por me lembrar deste detalhe. Adicionado no arquivo Cidades.ini as linhas abaixo: [3510807] Nome=Casa Branca UF=SP Provedor=SimplISS Cidades.ini

Boa tarde, Segue link do WS da cidade de Casa Branca-SP, atendida pelo provedor SimplISS, como sugestão para atualização do arquivo SimplISS.ini contido nos exemplos do ACBr. ; Casa Branca RecepcaoLoteRPS_3510807=http://wscasabranca.simplissweb.com.br/nfseservice.svc?wsdl SimplISS.ini

Boa tarde, Segue link atualizado do WS da cidade de Vargem Grande do Sul-SP, atendida pelo provedor SimplISS, como sugestão para atualização do arquivo SimplISS.ini contido nos exemplos do ACBr. http://wsvargemgrandedosul.simplissweb.com.br/nfseservice.svc?wsdl SimplISS.ini

Boa tarde, Caso: certificado de cliente vencendo hoje, 02/05/2018, ao emitir nfe mensagem erro: "Data de Validade do Certificado já expirou" Segue sugestão de ajuste para que não dê mensagem de já expirado para Certificado vencido no dia. Em ACBrDFeWebService.pas Original: procedure TDFeWebService.EnviarDados; Var Tentar, Tratado, TemCertificadoConfigurado: Boolean; begin { Sobrescrever apenas se necessário } FPRetWS := ''; FPRetornoWS := ''; TemCertificadoConfigurado := (FPConfiguracoes.Certificados.NumeroSerie <> '') or (FPConfiguracoes.Certificados.DadosPFX <> '') or (FPConfiguracoes.Certificados.ArquivoPFX <> ''); if TemCertificadoConfigurado then if FPConfiguracoes.Certificados.VerificarValidade then if (FPDFeOwner.SSL.CertDataVenc < Now) then raise EACBrDFeException.Create('Data de Validade do Certificado já expirou: '+ FormatDateBr(FPDFeOwner.SSL.CertDataVenc)); Alterado: procedure TDFeWebService.EnviarDados; Var Tentar, Tratado, TemCertificadoConfigurado: Boolean; lCertData, lNow: TDateTime; begin { Sobrescrever apenas se necessário } FPRetWS := ''; FPRetornoWS := ''; TemCertificadoConfigurado := (FPConfiguracoes.Certificados.NumeroSerie <> '') or (FPConfiguracoes.Certificados.DadosPFX <> '') or (FPConfiguracoes.Certificados.ArquivoPFX <> ''); lCertData:= DateOf(FPDFeOwner.SSL.CertDataVenc); lNow:= DateOf(Now); if TemCertificadoConfigurado then if FPConfiguracoes.Certificados.VerificarValidade then if (lCertData < lNow) then raise EACBrDFeException.Create('Data de Validade do Certificado já expirou: '+ FormatDateBr(FPDFeOwner.SSL.CertDataVenc)); Abraço,

Olá Juliomar, Sim, li colegas mencionando problemas no ambiente de teste, então habilitei e enviei requisições para o ambiente de produção, porém em ambos obtive o mesmo retorno. No mais não encontrei outras instruções no forum que me possibilitasse seguir além, por isso da pergunta se o componente ou mesmo se o serviço da gnre esta operacional no estado de SP. Agradeço.

Bom dia, Estou iniciando com ACBrGNRe e necessito entender se o componente esta operacional para emitente de SP e MG. Pergunto por testando pelo Demo_ACBrGNRE com emitente de SP (solicitei e obtive a habilitação para uso do webservice em http://www.testegnre.pe.gov.br/gnre/portal/automacao.jsp# e http://www.gnre.pe.gov.br/gnre/portal/automacao.jsp# ) Em ambos os ambientes, ao consultar configuração UF ou enviar guia, retorna "Erro interno: 10091 Erro HTTP: 500" .

Bom dia, Na impressão da Danfe em formato retrato pelo Fortes esta cortando o último dígito do cnpj do Destinatário e do Transportador. Segue em anexo .dfm alterado para de forma a não cortar o último digito desses campos. Abraço, Elisângela ACBrNFeDANFeRLRetrato.dfm

Ficou perfeito. Agradeço.

Sim, comentando este trecho o comando ACBrNFe.ImprimirInutilizacaoPDF salva perfeito o pdf da inutilização. ------- Quanto ao comando ACBrNFe.ImprimirInutilizacao, ele esta perfeito, imprime corretamente, comentando ou não o trecho de código mencionado.

Boa tarde, Estou testando a impressão da inutilização para pdf através do Fortes. Observei que comando ACBrNFe.ImprimirInutilizacaoPDF esta gerando exceção de "Access Violation" ao passar bloco de código reproduzido abaixo (linhas 221 a 229 do arquivo ACBrNFeDAInutRL.pas, class procedure TfrmNFeDAInutRL.SavePDF): with RLPDFFilter1.DocumentInfo do begin Title := ACBrStr('Inutilização - Nota fiscal nº ' + FormatFloat('000,000,000', FNFe.Ide.nNF)); KeyWords := ACBrStr('Número:' + FormatFloat('000,000,000', FNFe.Ide.nNF) + '; Data de emissão: ' + FormatDateTime('dd/mm/yyyy', FNFe.Ide.dEmi) + '; Destinatário: ' + FNFe.Dest.xNome + '; CNPJ: ' + FNFe.Dest.CNPJCPF ); end; Pelo que entendi esta tentando carregar informações da nfe, no entanto carrego apenas dados do inutilização ( ACBrNFe.InutNFe.LerXML(lcPathFileName); ) Se comento o bloco de código mencionado, roda ok, sem exceções. Minha questão é se faltou eu setar algo antes de disparar o comando ImprimirInutilizacaoPDF ou se o trecho acima necessita de alguns ajustes. Agradeço pela atenção, Abraço.

Bom dia, Reporto ajustes no arquivo ACBrNFSeNotasFiscais para carga de informações do cancelamento da NFSe. Os testes foram realizados com o provedor SimplISS (não tenho conhecimento se aplica-se outros provedores) . O SimplISS retorna o xml no seguinte formato: <Nfse> ... dados da nfse </Nfse> <NfseCancelamento> ... dados do cancelamento </NfseCancelamento> Por virem em nó a parte, as informações de cancelamento não estavam sendo repassadas para a variável de leitura do xml (AXML). Para a variável AXML conter também os dados de cancelamento, ajustei da seguinte forma a function TNotasFiscais.LoadFromString: Na linha 814 inseri o código abaixo (linhas 814 a 819): //provedor SimplISS function PosNFSeCancelamento: Integer; begin TamTAG := 18; Result := Pos('</NfseCancelamento>', AXMLString); end; e na, agora, linha 862, inseri (linhas 862 a 869): //provedor SimplISS N:= PosNFSeCancelamento; if N > 0 then begin //copia tag NfseCancelamento AXML:= AXML + copy(AXMLString, 1, N + TamTAG); AXMLString := Trim(copy(AXMLString, N + TamTAG + 1, length(AXMLString))); end; Em anexo fonte alterado. Agradeço pela atenção, Abraço. ACBrNFSeNotasFiscais.pas

Bom dia, Tem razão, falha minha. Segue em anexo o fonte alterado. Grata. pnfsConversao.pas

Boa tarde, No arquivo pnfsConversao.pas, função nfseRegimeEspecialTributacaoDescricao (linha 18128), acrescentei 3 itens ao case (linhas de 18138 a 18140): //Código Original: function nfseRegimeEspecialTributacaoDescricao( const t: TnfseRegimeEspecialTributacao ): String; begin case t of retNenhum : Result := '0 - Nenhum'; retMicroempresaMunicipal : Result := '1 - Microempresa municipal'; retEstimativa : Result := '2 - Estimativa'; retSociedadeProfissionais : Result := '3 - Sociendade de profissionais'; retCooperativa : Result := '4 - Cooperativa'; retMicroempresarioIndividual : Result := '5 - Microempresário Individual (MEI)'; retMicroempresarioEmpresaPP : Result := '6 - Microempresário e Empresa de Pequeno Porte (ME EPP)'; end; end; //Código Alterado: function nfseRegimeEspecialTributacaoDescricao( const t: TnfseRegimeEspecialTributacao ): String; begin case t of retNenhum : Result := '0 - Nenhum'; retMicroempresaMunicipal : Result := '1 - Microempresa municipal'; retEstimativa : Result := '2 - Estimativa'; retSociedadeProfissionais : Result := '3 - Sociendade de profissionais'; retCooperativa : Result := '4 - Cooperativa'; retMicroempresarioIndividual : Result := '5 - Microempresário Individual (MEI)'; retMicroempresarioEmpresaPP : Result := '6 - Microempresário e Empresa de Pequeno Porte (ME EPP)'; retLucroReal : Result := '7 - Lucro Real'; retLucroPresumido : Result := '8 - Lucro Presumido'; retSimplesNacional : Result := '9 - Simples Nacional'; end; end; Segue fonte em anexo. pnfsConversao.pas

Update: Com base no post do colega Roger, ajustei o leitor NFSe para quando o provedor SimpISS, carregar a listagem ItemServico. Alterações no arquivo pnfsNFSeR.pas, function TNFSeR.LerNFSe_ABRASF_V1: Boolean, inseridas linhas 1086 a 1100: //Provedor SimplISS permite varios itens servico if FProvedor = proSimplISS then begin i := 1; while (Leitor.rExtrai(4, 'ItensServico', 'ItensServico', i) <> '') do begin with NFSe.Servico.ItemServico.Add do begin Descricao := Leitor.rCampo(tcStr, 'Descricao'); Quantidade := Leitor.rCampo(tcInt, 'Quantidade'); ValorUnitario := Leitor.rCampo(tcDe2, 'ValorUnitario'); end; i := i + 1; end; end; Segue em anexo o arquivo alterado. pnfsNFSeR.pas

Bom dia, Abri os fontes do Fortes e verifiquei que no dataset correspondente aos itens esta sendo alimentado com a discriminação do serviço: cdsItens.Append; cdsItens.FieldByName('DISCRIMINACAO').AsString := FNFSe.Servico.Discriminacao; cdsItens.Post; Modifiquei a estrutura do dataset e alimentação dos dados para efetivamente pegar informações dos itens: for i:=0 to FNFSe.Servico.ItemServico.Count-1 do begin cdsItens.Append; cdsItens.FieldByName('ITEM').AsString := FNFSe.Servico.ItemServico.Items[i].Descricao; if FNFSe.Servico.ItemServico.Items[i].Tributavel = snSim then cdsItens.FieldByName('TRIBUTAVEL').AsString := 'Sim' else cdsItens.FieldByName('TRIBUTAVEL').AsString := 'Não'; cdsItens.FieldByName('QUANTIDADE').AsString := FormatFloat(',0.00', FNFSe.Servico.ItemServico.Items[i].Quantidade); cdsItens.FieldByName('UNITARIO').AsString := FormatFloat(',0.0000', FNFSe.Servico.ItemServico.Items[i].ValorUnitario); cdsItens.FieldByName('TOTAL').AsString := FormatFloat(',0.00', FNFSe.Servico.ItemServico.Items[i].ValorTotal); cdsItens.Post; end; No entanto a listagem ItemServico esta vindo vazia ( FNFSe.Servico.ItemServico.Count = 0 ). Aparentemente o componente ACBrNFSe não esta carregando os dados referentes ao itens de serviço (tag "ItensServico"), visto que após a carga do xml de nfse a listagem ItemServico permanece zerada: ACBrNFSe1.NotasFiscais.LoadFromFile(lcPathFileName); lnTeste:= ACBrNFSe1.NotasFiscais.Items[0].NFSe.Servico.ItemServico.Count; O teste foi realizado com o provedor SimplISS e o xml esta em anexo. Agradeço caso alguém possa me dizer se me esqueci de algo ou se posso acessar estes dados de outra forma ou ainda por onde melhorar o código caso seja algo a ser ajustado no ACBrNFSe. Abraço. 00_000_000000044-nfse.xml

Atualizando: O pessoal do SimplISS me retornou. Sobre o ambiente de produção o erro era por conta da senha de usuário do ws que continha carácter &. Alterei para uma senha somente com números e aparentemente esta Ok (transmiti um lote, recebi o protocolo e consultei o lote pelo protocolo (comandos "gerar e enviar lote RPS" e "consultar situação do Lote"). Sobre o homologação, também alterei a senha para somente números, mas continuo sem sucesso, obtendo os mesmo retornos de antes... segundo o SimplISS a OS 16185 continua em andamento. Agradeço Italo por dizer q outros conseguiram. Informo qualquer novidade sobre o homologação.

Acrescento que realizei os mesmos testes* no ws de produção ( http://wssaojoao.simplissweb.com.br/nfseservice.svc ) e obtive idênticos retornos. <?xml version="1.0" encoding="UTF-8"?> <s:Envelope xmlns:s="http://schemas.xmlsoap.org/soap/envelope/"> <s:Body> <s:Fault> <faultcode xmlns:a="http://schemas.microsoft.com/net/2005/12/windowscommunicationfoundation/dispatcher"> a:InternalServiceFault </faultcode> <faultstring xml:lang="pt-BR"> The server was unable to process the request due to an internal error. For more information about the error, either turn on IncludeExceptionDetailInFaults (either from ServiceBehaviorAttribute or from the &lt;serviceDebug&gt; configuration behavior) on the server in order to send the exception information back to the client, or turn on tracing as per the Microsoft .NET Framework SDK documentation and inspect the server trace logs. </faultstring> </s:Fault> </s:Body> </s:Envelope> *testes realizados: comando "gerar e enviar lote rps" e comando "consultar nfse por período" (consultei informando apenas período e também informando numero e demais dados de uma nfse que emiti pelo site). Notifiquei o SimplISS sobre. Pergunto: alguém já conseguiu implementar e usa o serviço com o provedor SimplISS? Grata. 62-env-lot.xml 2016030620160306-lista-nfse-soap.xml 62-rec-soap.xml

Olá, João. Entrei em contato com o suporte do SimplISS também, na sexta feira... a resposta foi a mesma que a sua (inclusive o numero da OS): "Bom dia, Foi aberta a Ordem de Serviço 16185 para verificar e corrigir o problema apresentado. Assim que finalizada entraremos em contato." Ontem no final do dia contatei novamente pedindo posicionamento, se os servidores deles realmente estão com problemas (estes erros podem ser por eu ter deixado de ajustar algo) e a resposta persiste: "Boa tarde! A ordem de serviço 16185 ainda está em andamento e assim que finalizada entraremos em contato!" Abri este tópico para entender se eu deixei de ajustar, setar algo... mas pelo visto o problema é com o SimplISS mesmo... Tendo algum retorno do provedor informo também. Agradeço pela atenção, Abraço!

Italo, Atualizei, mas persiste (arquivos anexo). Detalhe: não setei certificado. Por o provedor Simpliiss não usar muitos dos meus clientes nem tem certificado. Mais uma vez agradeço, Abraço. 34-rec-soap.xml 34-env-lot-soap.xml

Bom dia, Italo. Sim, acontece o mesmo. Em anexo os xmls gerados em um teste no "Demo ACBrNFSe", comando "Gerar e enviar Lote RPS". Agradeço pela sua atenção. 26-env-lot.xml 26-rec.xml

Boa tarde, Por favor, alguém já implementou o serviço de NFS-e para o município de São João da Boa Vista/SP, Provedor Simpliss? Estou fazendo testes com Demo ACBrNFSe sem sucesso. Em anexo as telas retornadas, na sequencia (teste do comando "Consultar NFSe por Período") Debugando o código, interceptei o seguinte xml de retorno: <s:Envelope xmlns:s="http://schemas.xmlsoap.org/soap/envelope/"> <s:Body> <s:Fault> <faultcode xmlns:a="http://schemas.microsoft.com/net/2005/12/windowscommunicationfoundation/dispatcher"> a:InternalServiceFault </faultcode> <faultstring xml:lang="pt-BR">The server was unable to process the request due to an internal error. For more information about the error, either turn on IncludeExceptionDetailInFaults (either from ServiceBehaviorAttribute or from the &lt;serviceDebug&gt; configuration behavior) on the server in order to send the exception information back to the client, or turn on tracing as per the Microsoft .NET Framework SDK documentation and inspect the server trace logs. </faultstring> </s:Fault> </s:Body> </s:Envelope> Fiz os testes de consulta no servidor de homologação ( http://wshomologacao.simplissweb.com.br/nfseservice.svc ) e também no de produção ( http://wssaojoao.simplissweb.com.br/nfseservice.svc ), retornando o mesmo resultado. Alguém já passou por esta situação ou tem ideia do que faltou eu ajustar? Desde já agradeço, Abraço!

Boa tarde, A URL do webservice para São João Boa Vista/SP(SimplISS) mudou: Produção: http://wssaojoao.simplissweb.com.br/nfseservice.svc Homologação: http://wshomologacao.simplissweb.com.br/nfseservice.svc [ ]'s

Olá, Agradeço por responder. Você conhece alguém que registrou, que já esteja em operação? Meu contato é [email protected] , fico a disposição no q puder ajudar.

Boa tarde, Estamos usando o monitor em conjunto com nosso aplicativo comercial de frente de caixa. Vamos realizar o registro junto a sefaz para iniciar operações. Nossa dúvida é quais programas devemos registrar na sefaz: só o frente de caixa, só o monitor ou os dois. Grata