I3 SISTEMAS

Ok tudo testado aqui agora deu certo os retorno de baixa e liquidados.

Pessoal boa tarde! foi solicitado essa altera alteração aqui porem a correção não foi realizada corretamente por parte de vocês. fiz os testes aqui e a função usada na manutenção não é satisfatória peço a correção, caso queira podem acessa minha maquina e analisa o caso, já tinha feito todos os testes em produção agora vou ter que voltar para meus fontes corrigidos. minha alteração foi usa: if UpperCase(ARetornoWS.DadosRet.TituloRet.EstadoTituloCobranca).Contains(UpperCase('LIQUIDADO')) then foi colocado: if (Pos(UpperCase(ARetornoWS.DadosRet.TituloRet.EstadoTituloCobranca),'LIQUIDADO') > 0) then mas não funcionar, fico a disposição para qualquer informação.

Olá segue classes corrigidas ACBrBoletoRet_Santander_API.pas Alteração da procedure TBoletoW_Santander_API. GerarDados; Motivo: verbo errado na chamada "POST" Solução: foi alterado o verbo para "PATCH" no modo tpAltera e tpBaixa Alteração da procedure TBoletoW_Santander_API. RequisicaoBaixa; Motivo: estava incluindo um array de mensagens no metodo e não existe esse campo na rota, dai dava erro no envio do Json; Solução: foi removida a linha que gerada essa parte errada do Json. ACBrBoletoW_Santander_API.pas Alteração da function TRetornoEnvio_Santander_API. LerRetorno(const ARetornoWS: TACBrBoletoRetornoWS): Boolean; Motivo: Não tinha implementado a consulta detalhe, so tinha o retorno de criação de boleto emplementado. Solução: Foi criado e testando em produção a consultar detalhe com boletos abertos e boletos pagos; Conclusão: Foi gerado boletos e baixado e feito alteração de data e testes de liquidação, todos os testes em produção foram bem sucedidos. Solicito a inclusão dessas alterações nos fontes do acbr. ACBrBoletoRet_Santander_API.pas ACBrBoletoW_Santander_API.pas

A leitura do retorno santader essa classe ACBrBoletoW_Santander_API.pas não esta correta não, só ler poucas informações e tem dando que nem existem no json, preciso de ajuda pra entender. vou posta o json aqui pra darem uma olhada. json com os dois tipos de retorno: //settlement: Pesquisa para informações de baixas/liquidações do boleto // bankslip: Pesquisa para dados completos do boleto retorno santader.json

Com a ajuda do pessoal no discord deu certo a alteração da URL de https://trust-open.api.santander.com.br/collection_bill_management/v2/bills?{0385014.0000000000500}?tipoConsulta=bankslip para https://trust-open.api.santander.com.br/collection_bill_management/v2/bills/0385014.0000000000500?tipoConsulta=bankslip segue classe para ser publicada em produção ACBrBoletoW_Santander_API.pas

Olá pessoal por acaso já foi resolvido esse tópico da consulta de boleto do santander, estou com mesmo problema aqui nem a consulta tpConsulta nem tpConsultaDetalhe funciona componente atualizado hoje 10/10/2023. Usando a tpConsulta da esse erro aqui: Falha Envio: TRetornoEnvio_Santander_APIMetodo LerListaRetorno nao Implementado Retorna um objeto porem o componente não esta preparado Usando tpConsultaDetalhe da esse erro aqui: Retorno Envio: HTTPCode=400 Retorna uma lista vazia, percebi que na tpConsultaDetalhe a URL da rota esta com uns parenteces e no postmam não usa assim, talvez poderia ser essa a causa. componente: 'https://trust-open.api.santander.com.br/collection_bill_management/v2/bills?{0385014.0000000000500}?tipoConsulta=bankslip' postman: 'https://trust-open.api.santander.com.br/collection_bill_management/v2/bills?0385014.0000000000500?tipoConsulta=bankslip' caso alguém tenha conseguindo resolver me dê uma força ai nessa zica.

Opa tem outra correção a fazer quando é um boleto de baixa por solicitação está pegando a campo data da baixa errado. foi alterado para pega correto //alteração if ARetornoWS.DadosRet.TituloRet.CodigoEstadoTituloCobranca = '7' then begin ARetornoWS.DadosRet.TituloRet.DataBaixa := DateSicreditoDateTime(aJson.Values['dataBaixa'].AsString); end; segue fontes alterado e arquivo com Json do retorno ARQUIVO JSON SICREDI BAIXA.txt ACBrBoletoRet_Sicredi_APIV2.pas

bom dia! segue em anexo unit alterada e testada. na função function TRetornoEnvio_Sicredi_APIV2.LerRetorno(const ARetornoWS: TACBrBoletoRetornoWS): Boolean; ACBrBoletoRet_Sicredi_APIV2.pas

Olá pessoal! foi Implementado a operação tpConsultaDetalhe para o Banco Sicredi API V2. porem tem um erro na classe que impede de retorna algumas informação da liquidação por não cai na condição CodigoEstadoTituloCobranca = 6 são elas: ARetornoWS.DadosRet.TituloRet.ValorPago ARetornoWS.DadosRet.TituloRet.ValorMoraJuros ARetornoWS.DadosRet.TituloRet.ValorAbatimento ARetornoWS.DadosRet.TituloRet.DataBaixa ARetornoWS.DadosRet.TituloRet.ValorDesconto veja o trecho dos fontes ACBrBoletoRet_Sicredi_APIV2 na linha 166 function TRetornoEnvio_Sicredi_APIV2.LerRetorno(const ARetornoWS: TACBrBoletoRetornoWS): Boolean; . . . if UpperCase(ARetornoWS.DadosRet.TituloRet.EstadoTituloCobranca) = ('LIQUIDADO') then ARetornoWS.DadosRet.TituloRet.CodigoEstadoTituloCobranca := '6'; //Multa/Juros ARetornoWS.DadosRet.TituloRet.PercentualMulta := aJson.Values['valorMulta'].AsNumber; ARetornoWS.DadosRet.TituloRet.ValorAbatimento := aJson.Values['abatimento'].AsNumber; ARetornoWS.DadosRet.TituloRet.ValorMoraJuros := aJson.Values['juros'].AsNumber; ARetornoWS.DadosRet.TituloRet.DiasDeProtesto := aJson.Values['diasProtesto'].AsInteger; ARetornoWS.DadosRet.TituloRet.TxId := aJson.Values['txId'].AsString; ARetornoWS.DadosRet.TituloRet.EMV := aJson.Values['codigoQrCode'].AsString; ARetornoWS.DadosRet.TituloRet.PercentualMulta := aJson.Values['valorMulta'].AsNumber; if ARetornoWS.DadosRet.TituloRet.CodigoEstadoTituloCobranca = '6' then begin ARetornoWS.DadosRet.TituloRet.ValorPago := AJson.Values['dadosLiquidacao'].AsObject.Values['valor'].AsNumber; ARetornoWS.DadosRet.TituloRet.ValorMoraJuros := AJson.Values['dadosLiquidacao'].AsObject.Values['juros'].AsNumber; ARetornoWS.DadosRet.TituloRet.ValorAbatimento := AJson.Values['dadosLiquidacao'].AsObject.Values['abatimento'].AsNumber; ARetornoWS.DadosRet.TituloRet.DataBaixa := DateSicreditoDateTime(AJson.Values['dadosLiquidacao'].AsObject.Values['data'].AsString); ARetornoWS.DadosRet.TituloRet.ValorDesconto := AJson.Values['dadosLiquidacao'].AsObject.Values['desconto'].AsNumber; end; solicito a alteração dos fontes do ACBrBoletoRet_Sicredi_APIV2 na linha 166 de: if UpperCase(ARetornoWS.DadosRet.TituloRet.EstadoTituloCobranca) = ('LIQUIDADO') then para: if UpperCase(ARetornoWS.DadosRet.TituloRet.EstadoTituloCobranca).Contains(UpperCase('LIQUIDADO')) then para solucionar o caso. segue arquivo JSON do retorno em anexo. ARQUIVO JSON RETORNO SICREDI.txt

@Daniel InfoCotidiano desculpa a demora, vou testar aqui e te dou um retorno.

@Daniel InfoCotidiano email enviado, aguardando retorno

ArqBoletoWS.log @Daniel InfoCotidiano

Estou com problema no envio de Alteração do AcbrBoleto sicredi API, "Tamanho de campo nosso numero inválido" porém eu alimento o título da mesma forma para todas as outras funções (Envio, solicitação de baixa) e apenas a "Alteração" está dando esse erro.

No carregamento do objeto de retorno, a propriedade "dataliquidacao" está convertendo errado e trazendo sempre a data "30/12/1899" analisei que a data da API do sicredi vem o padrão americano, no arquivo ACBRBoletoRet_SicredAPI utiliza uma função que faz apenas um "StringReplace". alguém sabe sobre esse caso ?

Opa blz, também estou passando pelo o mesmo caso, pelo que pude perceber em testes nos dois cenários que apresentou é que independente em coloca o "indSomaCOFINSST" igual à 1 ou "indSomaCOFINSST" igual à 0 se preenche as tags do total do pis "Total.ICMSTot.vPIS" e totais do Cofins "Total.ICMSTot.vCOFINS" causa essa rejeição 610, então a dica é essa só zera os totais de Pis e Cofins quando o CST for "05" que vai autorizar a nota. pelo menos pra mim funcionou abraços.

Vir la sua classe e eu tinha o mesmo problema de memory leek quando consumia qualquer API via rest, a solução foi passa a memorar o código usando Interfaces. No delphi usando interface o agenciamento de memoria é automático. eu tenho uma classe pronta de consumo de Json que eu mesmo fiz usando TRestClient com intefaces, vou publica no git se quiser posso de enviar, porem o Thulio tem um curso de solid que fala justamente isso seria melhor faze-lo Thulio Bittencourt - Interfaces meu git com a classe que uso para consumir API JsonRestClient

Resolvido aqui o arquivo ACBr_TEF_DIAL_001.tef não foi apagado automaticamente devido o travamento na finalização, colocamos o sEstadoECFTEF := 'L' sempre o inicio da aplicação e fizemos uma função para verificar se a venda esta realmente pendente e se não colocamos pra confirma com esse função ACBrTEFD1.ConfirmarTransacoesPendentes(true);

Obrigado pela dica vou marca aqui no nosso também, o nosso apos o travamento fica querendo cancelar um transação já autorizada e mesmo o usuário clicando em não ele fica em looop.

O nosso TEF (getcard) também esta ocorrendo um travamento parecido, só que é durante a impressão do TEF, ele ate chegar a imprimir o comprovante mas trava toda a aplicação e quando fecha forçadamente ele tenta cancelar uma transação já autorizada e fica em loop se não cancelar a venda, estamos tentando resolver aqui já ate colocamos esse comando ACBrTEFD1.ConfirmarTransacoesPendentes(true) mas ainda sem sucesso.

Atenção houve uma nova alteração hoje 26/04/2019 por parte da sefaz TO a Sefaz aqui solicitou a volta da URL antiga só que no pedido incluir a extensão .jsf deve ser feito uma nova correção para que ta emitindo para o estado TO altera o aquivo: ACBrNFeServicos.ini na linha: [NFCe_TO_H] Usar=NFCe_SVRS_H URL-QRCode=http://apps.sefaz.to.gov.br/portal-nfce-homologacao/qrcodeNFCe URL-ConsultaNFCe=http://apps.sefaz.to.gov.br/portal-nfce-homologacao/consultarNFCe.jsf URL-QRCode_2.00=http://homologacao.sefaz.to.gov.br/nfce/qrcode URL-ConsultaNFCe_2.00=http://homologacao.sefaz.to.gov.br/nfce/consulta.jsf depois compilar o exe Compila_RES.BAT

Ola tudo joia em produção esta fazendo normalmente aqui no TO, só homologação mesmo que mudou, porque em produção já era da forma correta. só que ta pegando foi a remoção do http:\\ quando é em homologação.

Correção para que ta emitindo para o estado TO altera o aquivo: ACBrNFeServicos.ini na linha: [NFCe_TO_H] URL-ConsultaNFCe_2.00=http://homologacao.sefaz.to.gov.br/nfce/consulta Mudar a ulr para www.sefaz.to.gov.br/nfce/consulta sem o http:// depois compilar o exe Compila_RES.BAT

opa aqui no tocantins para dando a mesma rejeição mudanos o ini e resolveu [NFCe_TO_H] URL-ConsultaNFCe_2.00=http://homologacao.sefaz.to.gov.br/nfce/consulta mudamos para https://www.sefaz.to.gov.br/nfce/consulta

Opa passei pelo mesmo problema e no meu sistema resolveu assim: alíquota FCP = 2,00 ICMS.vBCFCP = 10,00 ICMS.vFCP = 0,20 ICMS.vBCFCPST= 12,80 ICMS.vFCPST = 0,25 ------------------------------------------------ Resultado: ICMS.vFCPST = ICMS.vFCPST - ICMS.vFCP ; ICMS.vFCPST= 0,05;

Ola, pelo que eu sei os aquivos a serem gerados são os registros R do requisito do PAF. segue site da sefaz-TO com pagina especifica do CDF para duvidas. http://www.sefaz.to.gov.br/empresa/documentos-fiscais-eletronicos/ecf---emissor-de-cupom-fiscal/-conexao-digital-fiscal---cdf/