Mario Inacio

Bom dia. Claro, sei que eles não permitem mais de um serviço, mas enviando o que quero de forma estruturada, a NFS é autorizada e devolvida conforme eu enviei. Então o LerXml da Fiorilli poderia ficar como o LerXml da Betha e emitir o DAMFSE corretamente? Ou estou errado?

Ola. Sim, foi pela Fiorilli. Mas a impressão não montada pelo componente? Pois com outros provedores, a tag Discriminacao é enviar da mesma forma, ou seja, estruturada, para comportar mais itens.

Boa tarde. Desculpe, esqueci de mencionar que é no Fortes.

Bom dia. Essa correção já havia sido feita anteriormente, mas agora na última versão, a impressão voltou a ficar bagunçada, e não formatando os itens. 4323033552428000011156000000000000343-nfse.xml

Bom dia. Depois de muitos dias esperando retorno da Fiorilli, pois precisaram cadastrar um setor na prefeitura, pois a ausência deste, estava retornando rejeição de qualquer NFS-e. Agora conseguimos validar NFS-e com a atual versão do componente. Apenas o cancelamento ainda estamos esperando um retorno, pois o WS retornou que o cancelamento por erro de digitação deve ser feito pelo site.

Boa tarde Italo. Atualizado e testado, mas ainda com o mesmo erro de assinatura. 160-env-lot-sinc.xml 160-lista-nfse-sinc.xml

Alterei a linha ProRecepcionar [4321667] ; Incluído em 28/09/2022 Nome=Tres Cachoeiras UF=RS Provedor=Fiorilli Versao=2.00 ProRecepcionar=http://trescachoeiras.msgestaopublica.com.br:8080/IssWeb-ejb/IssWebWS/IssWebWS ProLinkURL=http://trescachoeiras.msgestaopublica.com.br:8080/issweb/home.jsf?nroNota=%NumeroNFSe%&codVerificacao=%CodVerif%&cnpj=%Cnpj%&hash=%ChaveAcesso% Dai mudou o erro. <EnviarLoteRpsSincronoResposta> <DataRecebimento>2023-02-16T16:22:14</DataRecebimento> <ListaMensagemRetorno> <MensagemRetorno> <Codigo>E172</Codigo> <Mensagem>Arquivo enviado com erro na assinatura.</Mensagem> <Correcao>Acerte a assinatura do arquivo.</Correcao> </MensagemRetorno> </ListaMensagemRetorno> </EnviarLoteRpsSincronoResposta> 300-env-lot-sinc.xml 300-env-lot-sinc-soap.xml 300-lista-nfse-sinc.json 300-lista-nfse-sinc.xml 300-lista-nfse-sinc-soap.xml

[4321667] Nome=Tres Cachoeiras UF=RS Provedor=Fiorilli Versao=2.00 ProRecepcionar=http://trescachoeiras.msgestaopublica.com.br:8080/issweb ProLinkURL=http://trescachoeiras.msgestaopublica.com.br:8080/issweb/home.jsf?nroNota=%NumeroNFSe%&codVerificacao=%CodVerif%&cnpj=%Cnpj%&hash=%ChaveAcesso%

Seguem arquivos de soap. 300-env-lot-sinc.xml 300-env-lot-sinc-soap.xml 300-lista-nfse-sinc.json 300-lista-nfse-sinc-soap.xml

Baixei um XML gerado pelo portal e o mesmo não tem assinatura. NFSe_feita direto pelo portal.xml

Boa tarde. A cidade de Três Cachoeiras usava Betha e estava funcionando perfeitamente. Agora resolveram mudar pra Fiorilli (senhor nos ajude). Os erros de transmissão são muito aleatórios. Como vi em outro Post, já estou testando em ambiente de produção, mas não estou conseguindo validar nenhuma nota. Fiz uma transmissão e gerou o arquivo de remessa e retornou apenas um json. Notei que o lote gerado contem duas vezes a assinatura, e validando no site da Prefeitura acusa erro nesse sentido, não sei se é por isso que está recusando e não retornando nada. Já testei no Demo e gera da mesma forma. Alguma dica do que pode estar ocorrendo? 352-env-lot-sinc.xml 352-lista-nfse-sinc.json

Boa tarde. O tipo TpcnCstPis estava desordenado, conforme print abaixo. Então modifiquei a Unit pcnConversao. Corrigido: TpcnCstPis = (pis01, pis02, pis03, pis04, pis05, pis06, pis07, pis08, pis09, pis49, pis50, pis51, pis52, pis53, function CSTIPIToStr(const t: TpcnCstIpi): string; begin result := EnumeradoToStr(t, ['00', '01', '02', '03', '04', '05', '49', '50', '51', '52', '53', '54', '55', '99'], [ipi00, ipi01, ipi02, ipi03, ipi04, ipi05, ipi49, ipi50, ipi51, ipi52, ipi53, ipi54, ipi55, ipi99]); end; function StrToCSTIPI(out ok: boolean; const s: string): TpcnCstIpi; begin result := StrToEnumerado(ok, s, ['00', '01', '02', '03', '04', '05', '49', '50', '51', '52', '53', '54', '55', '99'], [ipi00, ipi01, ipi02, ipi03, ipi04, ipi05, ipi49, ipi50, ipi51, ipi52, ipi53, ipi54, ipi55, ipi99]); end; pcnConversao.pas

Boa tarde Italo. Atualizado e funcionando liso. Bom natal e ano novo pra vcs ai. Abraço

Boa tarde. No caso do Provedor Betha, ao informar os itens na forma estruturada na Tag Discriminacao, está emitindo errado quando há casas decimais na quantidade ou valorunitario. Segue em anexo, dois exemplos. xml - Item com centavos.xml xml - Quantidade com centavos.xml

Boa tarde. Consegui fazer a impressão inserindo de forma estruturada no campo "Discrimanacao" mesmo. Forma errada de fazer a forma correta. Obrigado pela atenção

Bom dia Italo. Consegui um XML da Tecnospeed. 89e3c4c9b94a5180818f6b7b73eb4f10f4eca93d.xml

Bom dia. Solicitei a Prefeitura, um questionamento junto a Betha sobre múltiplos serviços em WS, segue a resposta: Betha : Esta questão de web service e schema, possui manual em todas as informações. É possível enviar múltiplos serviços na mesma nota, sim. O manual está disponível na página de acesso ao sistema. https://e-gov.betha.com.br/e-nota-test/ambienteteste.faces

Ola. Claro, vou solicitar pra prefeitura questionar a Betha e reporto a resposta após.

Boa tarde. Estou implementando agora a NFS-e, já funcionando normalmente com Betha e IPM. Ocorre que alguns clientes Betha, que antes emitiam pelo Portal, estão nos questionando sobre a inserção de vários serviços na mesma NFS-e. Consultando o fórum, não encontrei resposta deste questionamento. Até tentei fazer o componente inserir itens, através de "Servico.ItemServico.New", como tem no Demo para alguns provedores, mas o componente não gera novos itens. Consultando outras fontes, verifiquei que a tecnospeed tem uma tabela informando como cada provedor funciona, inclusive, na página de exemplo da Betha, eles tratam da inserção de vários itens. https://atendimento.tecnospeed.com.br/hc/pt-br/articles/360007587853-Documentação-base-dos-padrões-homologados-pela-Tecnospeed https://atendimento.tecnospeed.com.br/hc/pt-br/articles/360007788134-Documentação-Técnica-Padrão-BETHA Tem alguma sugestão para inserir vários itens?

Boa tarde. Sei que o tópico é antigo, mas a dúvida continua atual. Apesar de estar usando ACBrNFSeX, não é possível inserir mais de um serviço na NFS-e com a Betha? A sugestão do amigo schrsistemas funciona? Pois o sistema de recepção do RPS receberá na verdade somente um item, sendo a sugestão inseri uma string com todos os itens no único item recepcionado pela Betha.

Ola Italo. Ia fazer essa colocação agora sobre isso. Vou fazer a inserção manual do Prestador. Obrigado

Ola Italo. Realmente, limpando a lista de Notas funcionou corretamente. Criei uma regra apenas para eles no momento. O único problema que ainda persiste é que não esta emitindo os dados do Prestador no DANFSE. NFS-e 54.pdf 4222107994642200010456000000000000054-nfse.xml

Ola Italo. Debugando: NumRps está vazio Response.NumeroNota contem 47 segue anexo conteudo vindo em Response.ArquivoRetorno ResponseArquivoRetorno.txt

Bom dia Italo. Mesmo já estando tudo atualizado, refiz novamente agora, apaguei toda a pasta do componente, marquei a opção de limpar ao reinstalar e continua duplicando a Nota Fiscal no mesmo local.

Bom dia. Debugando, notei que duplica no trecho mencionado no código em anexo. procedure TACBrNFSeXProvider.ConsultaLoteRps; var AService: TACBrNFSeXWebservice; AErro: TNFSeEventoCollectionItem; begin TACBrNFSeX(FAOwner).SetStatus(stNFSeConsulta); PrepararConsultaLoteRps(ConsultaLoteRpsResponse); if (ConsultaLoteRpsResponse.Erros.Count > 0) then begin TACBrNFSeX(FAOwner).SetStatus(stNFSeIdle); Exit; end; AssinarConsultaLoteRps(ConsultaLoteRpsResponse); if (ConsultaLoteRpsResponse.Erros.Count > 0) then begin TACBrNFSeX(FAOwner).SetStatus(stNFSeIdle); Exit; end; ValidarSchema(ConsultaLoteRpsResponse, tmConsultarLote); if (ConsultaLoteRpsResponse.Erros.Count > 0) then begin TACBrNFSeX(FAOwner).SetStatus(stNFSeIdle); Exit; end; AService := nil; try try TACBrNFSeX(FAOwner).SetStatus(stNFSeEnvioWebService); AService := CriarServiceClient(tmConsultarLote); AService.Prefixo := ConsultaLoteRpsResponse.Protocolo; ConsultaLoteRpsResponse.ArquivoRetorno := AService.ConsultarLote(ConfigMsgDados.DadosCabecalho, ConsultaLoteRpsResponse.ArquivoEnvio); ConsultaLoteRpsResponse.Sucesso := True; ConsultaLoteRpsResponse.EnvelopeEnvio := AService.Envio; ConsultaLoteRpsResponse.EnvelopeRetorno := AService.Retorno; except on E:Exception do begin AErro := ConsultaLoteRpsResponse.Erros.New; AErro.Codigo := Cod999; AErro.Descricao := Desc999 + E.Message; end; end; finally FreeAndNil(AService); end; if not ConsultaLoteRpsResponse.Sucesso then begin TACBrNFSeX(FAOwner).SetStatus(stNFSeIdle); Exit; end; TACBrNFSeX(FAOwner).SetStatus(stNFSeAguardaProcesso); TratarRetornoConsultaLoteRps(ConsultaLoteRpsResponse); //Aqui duplicou a notafiscal TACBrNFSeX(FAOwner).SetStatus(stNFSeIdle); end;