-
Total de ítens
149 -
Registro em
-
Última visita
Sobre IgorAcertSoft

Contact Methods
-
Website URL
http://www.acertsoft.com.br
Últimos Visitantes
2.081 visualizações
IgorAcertSoft's Achievements
-
Acbr e FMX erro a partir da reposição 37078
IgorAcertSoft replied to IgorAcertSoft's tópico in Dúvidas sobre TEF
Sim FMX e Windows..... Não, estou reproduzindo em uma aplicação do zero FMX Windows. Você avisa aqui mesmo quando estiver subido a reposição? -
Boa tarde, @Fabrício G. Araújo. Até o momento, a última informação que recebemos da equipe do ACBr é que a homologação junto ao C6 Bank ainda não havia sido concluída, o que impede a comercialização. Eles mencionaram que o processo estava em andamento e que nos informariam assim que estivesse finalizado. No entanto, até agora, não tivemos nenhuma atualização sobre o assunto. Sigo no aguardo de um retorno do time do ACBr sobre a homologação. Caso você já tenha conseguido colocar em produção, seria muito útil se pudesse compartilhar os passos para a geração das chaves em produção, além do contato responsável por esse processo. Até o momento, todas as tentativas de obter essa informação, tanto com o C6 Bank quanto com o ACBr, não tiveram sucesso. Nosso cliente precisa saber como proceder para gerar as chaves em ambiente de produção. Agradeço desde já pela sua ajuda!
-
Acbr e FMX erro a partir da reposição 37078
um tópico no fórum postou IgorAcertSoft Dúvidas sobre TEF
Após feitas algumas alterações na reposição https://svn.code.sf.net/p/acbr/code/?r=37078 pelo time do Acbr para incluir novas funcionalidades, acabou gerando algumas inconsistências nas classes após dar build em FMX. As aplicações em VCL funcionam normalmente porém as aplicações em FMX acabam gerando erros de classe que não existe ou não foi declarada. Para encontrar o erro basta criar uma aplicação em branco com FMX e somente adicionar o componente ACBRTEFApi e fazer um build, logo as classes do componente começaram a apresentar os erros..... As alterações sugeridas pelo Daniela neste tópico Fontes ACBr agora são compatíveis com linux e FMX, já foram realizadas e o erro persiste. Gostaria de verificar com vocês se existe alguma alteração que eu deva fazer em meu delphi para rodar estas novas alterações ou se deverá ser revisto o componente ref. está alteração? Aguardo um retorno. -
Instalação PGWebLib 4.1.25.x com atualizador automático e proteção contra fraudes
um tópico no fórum postou IgorAcertSoft Dúvidas sobre TEF
Bom dia, seguimos as instruções relativas a instalação em modo silencioso do novo pgweb, e constatamos mesmo em modo /verysilent a exibição de telas de instalação inclusive pedindo a tela para informar os dados para instalação do ponto de captura, tem alguma instrução diferente que precisa ser executada para evitar a exibição destas telas? estouprocurando aqui no formum mas ainda não localizei algo a respeito, pode ser que estaja fazendo a pergunta errada. se tiver alguma instrução ou forum que fale a respeito, desde já agradeço. -
Estávamos com o mesmo problema em um cliente, no meu caso o cliente estava tentando emitir a nota como indFinal = 0 e gerando a rejeição, no nosso caso como foi uma venda para consumidor final, foi alterado o indFinal e emitido a nota. Pelo que percebi essa validação está sendo feita somente quando for material para revenda, mesmo sendo do Simples.
-
Resolvido, foi alterado para qrUTF8oBOM. Pode fechar o tópico. Obrigado.
-
Boa tarde pessoal, Estou com um problema a alguns dias sobre a visualização do QRCode na tela, acaba que alguns bancos ele funciona e outros não. Gostaria de ver com vocês se teriam algum outro relato sobre isso ou se meu código estaria com algum parâmetro incorreto, segue o código a baixo: procedure TDadosTefApi.ACBrTEFAPI1QuandoExibirQRCode( const DadosQRCode: String); var QRCode: TDelphiZXingQRCode; QRCodeBitmap: TBitmap; Row, Column: Integer; begin if not (StatusVenda in [stsAguardandoTEF, stsOperacaoTEF]) then StatusVenda := stsAguardandoTEF; if (TefConfiguracaoQRCODE.AsInteger = 4) then // 4 - Imprimir begin if (DadosQRCode <> '') then ImprimirRelatorio( '</ce>'+ '<qrcode_largura>8</qrcode_largura>'+ '<qrcode>'+DadosQRCode+'</qrcode>'+ '</lf>'); Exit; end; if (DadosQRCode = '') and (FProcessando.pQRCode.Visible) then begin FProcessando.pQRCode.Visible := False; FProcessando.Pix := False; FProcessando.AjustaTela; Application.ProcessMessages; Exit; end; QRCode := TDelphiZXingQRCode.Create; QRCodeBitmap := TBitmap.Create; try QRCode.Encoding := qrUTF8NoBOM; QRCode.QuietZone := 2; QRCode.Data := widestring(DadosQRCode); QRCodeBitmap.Width := QRCode.Columns; QRCodeBitmap.Height := QRCode.Rows; for Row := 0 to QRCode.Rows - 1 do begin for Column := 0 to QRCode.Columns - 1 do begin if (QRCode.IsBlack[Row, Column]) then QRCodeBitmap.Canvas.Pixels[Column, Row] := clBlack else QRCodeBitmap.Canvas.Pixels[Column, Row] := clWhite; end; end; FProcessando.LabValorPix.Caption := FormatFloat('R$ 0.00',DadosVendaBalcao.VendasVALOR1.AsCurrency); FProcessando.imgQRCode.Picture.Bitmap.Assign(QRCodeBitmap); FProcessando.pQRCode.Visible := True; FProcessando.Pix := True; FProcessando.AjustaTela; finally QRCode.Free; QRCodeBitmap.Free; end; Abaixo segue uma foto do erro:
-
IgorAcertSoft started following Acbr e FMX erro a partir da reposição 37078
-
Integração Delphi+iFood+RestClient
um tópico no fórum postou IgorAcertSoft Object Pascal - Delphi & Lazarus
Olá pessoal! Estou há alguns dias com um problema sem solução, realizando a integração do meu sistema em Delphi com o iFood estou me deparando com um erro no método de Atualizar um Item do cardápio. Segue a rotina que estou utilizando e logo abaixo o erro apresentado: restClient := TRESTClient.Create(nil); restClient.Accept:='application/json, text/plain; q=0.9, text/html;q=0.8,'; restClient.AcceptCharset:='utf-8, *;q=0.8'; RESTClient.BaseURL:='https://pos-api.ifood.com.br/v1.0/skus/'+externalCode; restRequest:=TRESTRequest.Create(nil); restRequest.Client := restClient; restRequest.Method := rmPATCH; RESTResposta:=TRESTResponse.Create(Self); restRequest.Response := RESTResposta; restRequest.AddParameter('Content-Type','multipart/form-data',pkHTTPHEADER,[poDoNotEncode]); RESTRequest.AddParameter('Authorization','bearer '+aToken,pkHTTPHEADER,[poDoNotEncode]); RESTRequest.AddParameter('Accept','application/json',pkHTTPHEADER,[poDoNotEncode]); jsonObject := TJSONObject.Create; jsonObject.AddPair(TJSONPair.Create('merchantId',TJSONNumber.Create(dados.FDDadosiFoodMERCHANT_ID.value))); jsonObject.AddPair(TJSONPair.Create('name',TJSONString.Create(dados.FDProdutosNOME_PROD.AsString))); jsonObject.AddPair(TJSONPair.Create('price',TJSONObject.Create(TJSONPair.Create('value',TJSONNumber.Create(dados.FDProdutosPRECO1.AsString))))); restRequest.AddBody(jsonObject); restRequest.Execute; if(RESTResposta.StatusCode=202)then begin MemoStatus.Lines.Add('Produto alterado com sucesso!'); Result:=true; end else begin MemoStatus.Lines.Add(RESTResposta.Content); Result:=false; end; Erro apresentado: "500 - Internal Server Error" '{"timestamp":"2020-03-31T13:59:27.583+0000","status":500,"error":"Internal Server Error","exception":"org.springframework.web.multipart.MultipartException","message":"org.springframework.web.util.NestedServletException: Request processing failed; nested exception is org.springframework.web.multipart.MultipartException: Could not parse multipart servlet request; nested exception is java.io.IOException: Missing initial multi part boundary","path":"/skus/1"}' Se alguém puder me auxiliar ou já tenha implementado isso ou passado por esse erro, fico no aguardo. Obrigado! -
Nova Santa Rita/RS
-
Olá, estou enfrentando um problema com o provedor IPM. A nota autoriza tudo certo, imprime, gera pdf no momento do envio, mas ao salvar o xml de retorno este não possui as tags de protocolo e código de verificação, assim como acontece com outros provedores. Então não consigo reimprimir a nota, como posso proceder?
-
Erro ao Gerar arquivo - Registro C175 Valor de ALIQ_PIS
IgorAcertSoft replied to IgorAcertSoft's tópico in ACBrSPEDPisCofins
Apaguei os meus arquivos e atualizei novamente e realmente não tinha aquele try execpt. Resolvido, obrigado! -
Erro ao Gerar arquivo - Registro C175 Valor de ALIQ_PIS
um tópico no fórum postou IgorAcertSoft ACBrSPEDPisCofins
Ao usar o seguinte comando: ACBrSPEDPisCofins1.SaveFileTXT; Está dando um erro "Erro ao converter", tentei buscar o problema e está no arquivo "ACBrEPCBloco_C_Class" na linha 1198 onde passa: Eu estou passando o valor 0,65 nesse campo, só que essa função VLFill está tentando converter esse valor para inteiro por isso gera a exception, como segue na imagem : E isso pode acontecer nos outros campos desse registro também, se eu passar algum valor que não seja um inteiro, o que pode ser feito para corrigir isso?