Antonio Gomes

Vou testar, isso foi desespero, peguei com um parceiro, a solução dele, eu migrei do componente antigo, e não tive como testar em produção, o cliente que pegou o erro. Irei testar a sua ideia, eu havia pensando, se pudesse ser pela cidade, mas aguarda, eu darei retorno aqui, se resolveu.

@Italo Giurizzato Juniorolá, ao enviar o rps, foi preciso ativar essas opções, é possível agregar aos fontes? Cidade 3169901, provedor versatecnologia. VersaTecnologia.GravarXml.pas Outra coisa Italo, sempre que tenho uma lista de rps para enviar, eu carrego uma por uma, e vou enviando e atualizando minha lista, e sempre no segundo rps, acontece isso X800-Erro de Validação: --> 1824 - Element '{http://nfe.uba.mg.gov.br/schema/nfse_v201.xsd}CodigoMunicipio': '' is not a valid value of the atomic type '{http://nfe.uba.mg.gov.br/schema/nfse_v201.xsd}tsCodigoMunicipioIbge'. E pula pro próximo, e vai de boa, depois repete o erro. Suspeita de algo que pode ser? Se algum campo nao carregou:? Nota, so deu isso quando tem retenção, alias, a unit ali, foi devido a rps com retencao de issqn.

Deu certo sim, agora, estamos com outro dilema, de ir o comando, e o timeout nao deixar vir retorno, nisso, a gente tenta enviar de novo, e devolve o erro que já existe o boleto com o meu numero, uma solução paliativa que fiz, foi colocar o timeout em 999999, parece que esses dias, os 5000 padrão, esteja sendo pouco, testes em sandbox isso, seria possível avaliar, se o retorno nao sendo sucesso, do componente capturar o numero do boleto e consultar e assim normalizar os dados do boleto? Nota: Não vem no retorno, aquele primeiro número que a gente usa no comando, "numero correspondente". Segue aviso da segunda tentativa. [Content] Rejeições: Campo: https://developers.c6bank.com.br/v1/error/invalid_request Código: 400 Versão: Correlation_id:92687b1b218ea17b-GRU Ocorrência: [BoletoClient]: Erro ao inserir registro: Já existe o título 9825391 com o seu número XR4013 cadastrado . Bad Request Mensagem: Requisi��o inv�lida. XR4013 = é meu identificador único.

Tive que corrigir outra linha mais abaixo. ACBrBoletoRet_C6.pas

Muda para o acbr, quase igual, vai ser melhor, eu ja usei esse projeto, foi descontinuado né.

@Victor H. Gonzales - Panda ACBrBoletoRet_C6.pas

olá, a tag foi alterada, segue codigo fonte alterado. Nosso numero vinha nisso: NossoNum := LJsonObject.AsString['internal_id'];. Agora é our_number.

Boa tarde Mano, acabei de testar, top, resolvido. Obs: aquela herança ficou linda. Grato.

sim, mas lá que vi que tem como intermediar servico, ate entao, de prefeitura, so sei o feijao com arroz mesmo. Nao com os 3 atores, prestador, tomador e intermediador... fiz uma analogia.

Cara, acho que vou desistir de entender os manuais... olha lá, 1 e 2, tomador e intermediário. https://abrasf.org.br/biblioteca/arquivos-publicos/nfs-e/versao-2-01

eu sou mei, e parece que está meio que atendendo os numeros de lá, mas, devemos pensar no todo né... complicado, esses projetos nada falam com nada.

@Juliomar Marchettie esse bug, tem solução mano?

@Italo Giurizzato Junior Anterior NFS-e, atender abrasf2: function ResponsavelRetencaoToStr(const t: TnfseResponsavelRetencao): String; begin result := EnumeradoToStr(t, ['1', '2'], [ptTomador, rtPrestador]); end; function StrToResponsavelRetencao(out ok: boolean; const s: String): TnfseResponsavelRetencao; begin result := StrToEnumerado(ok, s, ['1', '2', ''], [ptTomador, rtPrestador, rtPrestador]); end; ----------------------------------------------------------------- Na NFS-eX: function TACBrNFSeXProvider.ResponsavelRetencaoToStr( const t: TnfseResponsavelRetencao): string; begin Result := EnumeradoToStr(t, ['1', '', '2', ''], [rtTomador, rtPrestador, rtIntermediario, rtNenhum]); end; function TACBrNFSeXProvider.StrToResponsavelRetencao(out ok: boolean; const s: string): TnfseResponsavelRetencao; begin Result := StrToEnumerado(ok, s, ['1', '', '2', ''], [rtTomador, rtPrestador, rtIntermediario, rtNenhum]); end; function TACBrNFSeXProvider.ResponsavelRetencaoDescricao( const t: TnfseResponsavelRetencao): String; begin case t of rtTomador : Result := '1 - Tomador'; rtIntermediario : Result := '2 - Intermediário'; rtPrestador : Result := '3 - Prestador'; else Result := ''; end; end; Como prestador, anterior ia 2 agora está ficando vazio no xml. Tem como corrigir, ou eu estender essa função, para atender ao provedor, está dando problema no schema: X800-Erro de Validação: --> 1824 - Element '{http://nfe.uba.mg.gov.br/schema/nfse_v201.xsd}ResponsavelRetencao': '' is not a valid value of the atomic type '{http://nfe.uba.mg.gov.br/schema/nfse_v201.xsd}tsResponsavelRetencao'. no schema: <xsd:simpleType name="tsResponsavelRetencao"> <xsd:restriction base="xsd:byte"> <xsd:pattern value="1|2" /> </xsd:restriction> </xsd:simpleType>

@Italo Giurizzato Junior Teria como analisar: unit: ACBrNFSeXClass: Erro de acesso violado, classe declarada errada. Inclusive, ta toda incorreta a declaração de TtotCIBSSel tá tudo com F antes. Create e Destroy

voce pode anexar seu modelo no sistema. Eu mesmo tenho solucao propria, uso no modo carne, 3 por paginas, nao do mesmo.

Isso já está ok não? Todos bancos estão mandando esse aviso, pelo teste meu, está ok já

Não é apenas visual? Tem o manual da caixa? Posta aqui.

Então, como disse antes, o gerente daqui da cidade, agência 1558, passou para o cliente meu, após a remessa ser recusada, detalhe importante, recusa sem mostrar o erro. Só o erro 03, entrada nao confirmada. O que fiz, foi pegar a remessa anterior, antes de eu ter subido versão, e detectado diferença no registro tipo 7. Cliente gerou, e enviou, resposta ok do processamento. Logo, esse registro tipo 7, nao presta mais.

Então, li, re-li, e não achei no manual, nada relacionado com versão, assim como tem em outro banco, onde, a numeração, definia os dados enviados. Por hora, o gerente do cliente que mandou isso. Agencia 1558. Mas, se você puxar no site do Itaú, vem esse manual de 2017 tambem. Sabe? Eu penso assim, nem eles dão conta do balaio de gatos que eles mesmos arrumam.

Opa, @Daniel InfoCotidiano Solicitação de revisão desse commit, ao adicionar a linha segmento 7, baseado em um manual da 2017, nos dias atuais, gerente mandou o manual, de 2023, essas linhas nao existem mais. Logo, vimos isso, após recusa da entrada da remessa no site do itaú. A carteira em questão, é a 109 2017, como era: 2023, como está: Segue manual em anexo Como podemos convergir isso, 2017 com 2023 ? Segue manuais, nao deixou vincular aqui na msg, maior que 2 mb Link 2023: https://mega.nz/file/9RdzFSoJ#AaOozQNvygWTZ8zFXlxCHCaSN6PaBp4irg0ptOrXRvs Link 2017: https://mega.nz/file/AVUDAYwK#kPvhqSvTCLeP_M5LOuWLLa6dRmTZd8Ned62lGHZ4UZo Linhas com o problema:

fala comigo, rodando até hoje com unidac?

está certo, alguns casos, aquele negocio das 13 hs, se o cliente pagar, eles colocam no mesmo dia disponível já para ser quitado no cliente.

em produção, no cliente mesmo, mas, vou testar de novo, recordo de fato, que o pix, já na conta, acontecia do titulo nao vir com aquela situacao = PAGO.

Interessante, usei isso ontem, com fontes atualizados no cliente, não tinha dado a falha. Testou ai francisco ?

Sim, vc pode personalizar, até colocar salvar no cliente, o modelo do boleto, eu tenho dessa forma, o cara quer algo diferente, edito, salvo no banco e vida que segue. Abstraia o código: procedure TDMBoleto.ConfigurarFastReport; var ST: TMemoryStream; begin frxReport1.Clear; frxReport1.Report.Clear; frxDBReceber.RangeBegin := rbFirst; frxDBReceber.RangeEnd := reLast; frxReport1.EnabledDataSets.Clear; frxReport1.DataSets.Clear; frxReport1.DataSets.Add(frxDBReceber); frxReport1.EnabledDataSets.Add(frxDBReceber); ST := TMemoryStream.Create; try if FDSCfgMod.FieldByName('ARQUIVO_CFGBLMOD').IsNull then // Quando for atualizado, em Novembro de 2018, esse campo vai ficar vazio na tabela begin case FDSCfgMod.FieldByName('LAYOUT_CFGBLMOD').AsInteger of 1: begin TFuncoesSistemaOperacional.LerRecursoDLL('BOLETO_1PP_PIX', sNomeDaDLL, ST); end; 2: TFuncoesSistemaOperacional.LerRecursoDLL('BOLETO_2PP', sNomeDaDLL, ST); 3: TFuncoesSistemaOperacional.LerRecursoDLL('BOLETO_3PP_CARNE', sNomeDaDLL, ST); else // 3 raise Exception.Create('Tipo de Documento: Boleto ou carnê não selecionado na configuração.'); end; end else TBlobField(FDSCfgMod.FieldByName('ARQUIVO_CFGBLMOD')).SaveToStream(ST); ST.Position := 0; frxReport1.LoadFromStream(ST); finally FreeAndNil(ST); end; // desnecessário, mantido pois tem modelo salvo no cliente, e gera erro Var S: string; with frxReport1 do begin S := 'procedure INICIALIZA()'; if Script.FindLocal(S) = nil then Script.AddMethod(S, CallMethod); end; end; OnSaveReport, do Designer: function TDMBoleto.frxDesignerBoleto_SaveReport(Report: TfrxReport; SaveAs: Boolean): Boolean; var Stream: TStream; begin Stream := TMemoryStream.Create; try Report.SaveToStream(Stream); Stream.Position := 0; IBQryCfgMod.Edit; TBlobField(IBQryCfgMod.FieldByName('ARQUIVO_CFGBLMOD')).LoadFromStream(Stream); IBQryCfgMod.Post; finally Stream.Free; end; Result := True; end;