RenatoRicci

Sim, Paygo continua rodando.. Eu acabei refatorando meu código para inicializar a DLL apenas no inicio da aplicação e des-inicializar no final como voce havia sugerido.. Com isto acabou aqueles problemas de travamento.. Creio que da forma que eu estava fazendo antes, ou seja.. inicializando e desinicializando a cada processo, em algum momento estava ocorrendo um atropelamento de processos.. pois o pinpad demora alguns segundos para processar e liberar a comunicação.. Com a inicialização única no inicio do programa, acabou os problemas.. obrigado.. Renato

Olá @Pedro Frayman.. tudo bem! Obrigado.. Pedro.. mas chamando o método .DesInicializar, já libera a porta USB não? Olá José, não temos parceria TEF com o Projeto ACBr.. Na época nosso parceiro que revende nosso sistema negociou direto com a Paygo. Obrigado.

Olá Juliomar @Juliomar Marchetti.. de fato.. na versão anterior, eu inicializava o TEF no inicio da aplicação e desinicializava quando encerrava a aplicação.. Mas acontecia de por ventura da aplicação travar por algum processo interno, como falha na conexão de rede por exemplo, ai o usuário fechava o exe (no gerenciador de tarefas) e abria novamente, com isto, o FormClose da minha aplicação não era disparado e o TEF continuava preso. Com isto, na época mudamos a rotina para que a cada operação de tef, ou seja, ao finalizar a venda, caso o operador de caixa selecionasse alguma forma de pagamento que tinha tef habilitado, o sitema chamava a opção Inicializar, e no final da venda, era chamado a opção desinicializar. Este fluxo funciona (ou pelo menos funcionava) na dll antiga e nunca tivemos problemas quanto a isto. Depois que atualizamos para a nova DLL (4.1.43.1) para poder re-homologar o exe, passamos a perceber este travamento.. Ai veio minha dúvida.. não sei se está relacionado a nova DLL, ou se está relacionado ao hardware em sí, pelo fato do pinpad ter ficado alguns anos parado, ou até mesmo se tem relação com Warsaw..(apesar de que estamos utilizando a opção isDebug aqui em ambiente de homologação e apontando para a dll da pasta DEBUG). Só achei estranho esporadicamente a porta serial ficar aberta do nada e a tela do pinpad permanecer acesa.. Como se tivesse algo preso.. A tela só apaga se eu echar o exe e abrir novamente. Se não fechar o exe, mesmo chamando o método .DesInicializar, o pinpad não desocupa..

Olá alguem poderia me dar uma luz? Temos uma integração com TEF Paygo através da lib PGWebLib.dll. Recentemente atualizamos a DLL para a última versão para poder re-homologar nossa aplicação(dll 4.1.43.1). Nos testes, notamos que em certos momentos, o PINPAD para de responder.. e fica com a tela acesa. Neste momento a aplicação demora a processar o comando enviado, neste exemplo de log abaixo, eu tinha acabado de fazer uma transação de pagamento e depois chamei uma rotina administrativa, neste momento, o pipad travou.. fui olhar no log, e constava nas últimas linhas o retorno: PP_iOpen - Erro na abertura da porta serial (06). Não consegui diagnosticar.. Visto que na última operação de pagamento foi chamado a instrução ACBrTEFAPI1.DesInicializar para liberar o pinpad. Não sei se é problema de hardware, visto que utilizamos o PINPAD pela última vez a uns 2 anos atráz, quando fizemos a primeira homologação com a Paygo. Engraçado é que ele funciona normalmente.. e repentinamente ocorre esses erros de comunicação.. Alguem já passou por este problema? ***Obs.: PINPAD Gertec PPC 930 - Lazarus 3.4 x32 11:23:33:249 select = 1 11:23:33:249 RX[000001] 11:23:33:255 PWSRV_iSendConfirmation OK 11:23:33:260 [w32_fil] iComputeCRC_FromFile - Arquivo vazio! iFileNum=[52] - PRINCIPAL 11:23:33:262 [PGWebLib.c] PWSRV_iVerifyAndSendConfirmation iRet (0) 11:23:33:262 [PWServer.c] #### PP_iClose ... 11:23:33:637 [PWServer.c] #### PP_iClose - FIM = [0] 11:23:33:637 [MODEMFUNCS] Disconnect 11:23:33:637 [PINpad.c] PP_EndComand (fConfirm=1)... 11:23:33:637 [PINpad.c] PP_EndComand - Thread ainda ativa! 11:23:37:705 [PGWebLib.c] PW_End 11:23:48:090 [PGWebLib.c] Num da Instancia [3] 11:23:48:545 [PGWebLib.c] PW_Init(): Ultima limpeza: 29/03/2025 10:29:26) 11:23:48:545 [PW_Pinpad] PP_iOpen CommPort (06) 11:23:48:929 [PW_Pinpad] PP_iOpen - PP_Open_=[33] 11:23:48:929 [PW_Pinpad] PP_iOpen Error #3! 33 11:23:49:052 [PGWebLib.c] PW_iInit <0> 11:23:49:052 [PGWebLib.c] PW_iNewTransac (bOper=0xFC)... 11:23:49:052 [PGWebLib.c]PGW_iCheckAndUpdateCertificate 11:23:49:052 [PGWebLib.c] NewTransac iRet[0] iNextTimer[1] CertUpdateTime[250401] 11:23:49:052 [MODEMFUNCS] Disconnect 11:23:49:053 [PGWebLib] - PP_iGetInfo - PP_iOpen(06) 11:23:49:053 [PW_Pinpad] PP_iOpen CommPort (06) 11:23:49:053 [PW_Pinpad] PP_iOpen - PP_Open_=[30] 11:23:49:053 [PW_Pinpad] PP_iOpen - Erro na abertura da porta serial (06) 11:23:49:053 [PW_Pinpad] PP_iOpen - PP_Open_(01) 11:24:09:163 [PW_Pinpad] PP_iOpen - PP_Open_=[31] #2 11:24:09:163 [PW_Pinpad] PP_iOpen - PP_Open_(02) 11:24:33:205 [PW_Pinpad] PP_iOpen - PP_Open_=[31] #2 11:24:33:205 [PW_Pinpad] PP_iOpen - PP_Open_(03) Obrigado, Renato

Olá Juliomar, eu até encontrei o tópico seguinte: Mas mesmo informando: MultaValorFixo := true; CodigoMulta := cmValorFixo; PercentualMulta := 2.00; o boleto sai com impressão errada. Sai R$2,00. Já se eu informar: MultaValorFixo := false; CodigoMulta := cmPercentual; PercentualMulta := 2.00; Ai o valor impresso no boleto sai correto. 2%. Creio que ao informar o percentual, e voce setar a propriedade MultaValorFixo := true e CodigoMulta := cmValorFixo; o sistema deveria converter o percentual passado na propriedade PercentualMulta para o valor equivalente. Igual eu mencionei no primeiro tópico. Att., Renato

Olá amigos, creio que a função GerarMensagemPadraoMulta esteja errada.. Vejam por favor: Tenho um boleto que eu informo o percentual da multa desejada na propriedade PercentualMulta, no caso 2%. E tambem informo a própriedade MultaValorFixo = TRUE; Na impressão do boleto está saindo como R$2,00 de forma errada, já que deveria calcular os 2% em cima do valor do documento. Fui ver como está no fonte do AcbrBoleto e está comentado a linha que faz o cálculo, veja o else: O exemplo acima está imprimindo o boleto conforme imagem a seguir.. Veja está saindo R$2,00 e não o valor correto que deveria ser 0,25 centavos(não está convertendo o percentual em $$). Alterando aquele bloco comentado acima para: if not ATitulo.MultaValorFixo then AValorMulta := ATitulo.PercentualMulta else AValorMulta := RoundABNT((ATitulo.PercentualMulta / 100) * ATitulo.ValorDocumento,2); e o resultado foi o que se espera.. convertendo para R$ da maneira correta. Por favor analisem para ver se é um bug, ou se aquelas linhas comentadas foram realmente comentadas por causa de algum outro problema. Obrigado, Renato Ricci

Olá comunidade, não sei se esta é a maneira correta para enviar sugestões/melhorias.. Segue em anexo alteração no arquivo ACBrSATExtratoESCPOS.pas para respeitar a propriedade ImprimeMsgOlhoNoImposto. O Efeito da alteração é apenas visual. ACBrSATExtratoESCPOS.pas

Olá @Juliomar Marchetti.. obrigado por responder.. por ser certificado em nuvem (NEOID), creio que o cliente não tenha o PFX.. no caso voce quer dizer: ir lá no gerenciador do windows e exportar o PFX do certificado?

Olá amigos.. estamos tentando assinar um XML através de um certificado em núvem fornecido pela SERPRO e estamos obtendo o seguinte erro: ACBrNFe.Configuracoes.Geral.SSLLib := libWinCrypt; ACBrNFe.Configuracoes.Geral.VersaoDF := ve400; ACBrNFe.Configuracoes.Certificados.NumeroSerie := 'XXXXXX' ACBrNFe.Configuracoes.Certificados.Senha := 'XXXX'; ACBrNFe.SSL.CarregarCertificado; o metodo ACBrNFe.SSL.CertTipo está retornando: tpcDesconhecido e ao assinar, está retornando o seguinte erro: ACBrNFe.NotasFiscais.Assinar; GetCSPProviderParamDWord. Erro: 0000007F Temos outros clientes com certificado Certsign e o mesmo está assinando normalmente. Este da serpro é o primeiro que pegamos.. Alguem já passou por esta situação? Obrigado Renato

Por hora vou deixar comentado meu codigo.. Ainda preciso testar/homologar com calma a versão 2.0.12 no nosso sistema.. Agradecido!

Boa tarde meus caros.. sinto abrir este tópico novamente.. Utilizo Lazarus v 2.0.8 FPC 3.0.4 e o WriteBOM não é reconhecido.. No meu caso também consegui compilar com sucesso depois de comentar a linha //Result.WriteBOM := False; ou então até mesmo apenas comentado a diretiva no cabeçalho do arquivo: //{$IFDEF FPC} // {$DEFINE HAS_BOM} //{$ENDIF} No caso comentando a diretiva FPC não precisou comentar a linha do Result abaixo...

Olá, estamos utilizando layout cnab240 e precisando implementar o campo C010(Identificação da Distribuição) para identificar a distribuição do boleto e não encontrei essa implementação no layout do Santander.. Encontrei apenas no banco do brasil algo parecido.. Alguém chegou a implementar este registro no layout do Santander e poderia compartilhar a unit? Obrigado. Renato

Olá.. o método que eu estava tendo problema na época é o OnGetNumeroSessao.. e não no OnGetCodigoAtivacao... meu método OnGetCodigoAtivacao está assim: begin f_executa_query('select sat_codigo_ativacao from tab_sat where sat_id = ' + IntToStr(getIdSATEstacao)); if v_ro_query.IsEmpty then begin ShowMessage('Nenhum Sat Cadastrado/Definido para esta estação de trabalho'); abort; end; Chave := ansistring(v_ro_query.FieldByName('sat_codigo_ativacao').AsString); end;

Perfeito André! Salvou meu dia! Abraço meu amigo. Renato

Olá amigos, alguém poderia me informar se o valor retornado pelo aparelho SAT referente a PIS e COFINS é correto? Estou enviando o XML conforme abaixo, por exemplo: base de cálculo do PIS 1000.00 com 0.6500 e o aparelho sat está me retornando a tag VPIS = 650.00, ou seja.. dá a entender que o valor calculado pelo sat retornou 650 reais.. é assim mesmo ou o sat está calculando errado? xml enviado ao sat: <PIS> <PISAliq> <CST>01</CST> <vBC>1000.00</vBC> <pPIS>0.6500</pPIS> </PISAliq> </PIS> valor retornado: <PIS> <PISAliq> <CST>01</CST> <vBC>1000.00</vBC> <pPIS>0.6500</pPIS> <vPIS>650.00</vPIS> </PISAliq> </PIS> Obrigado Renato

Olá amigos, desculpe reabrir esta discussão.. Estou tendo o mesmo problema ao tentar migrar meu projeto do Lazarus 1.4.4(FPC 2.6.4) para Lazarus mais recente com FPC 3.x. Tenho em vários campos com o displayformat setado para #,###,##0.00, e quando compilo meu projeto na versão mais recente do lazarus, os valores monetários ao invés de ficar por exemplo: 15.300,99, aparecem como 15300,99, ou seja, ele não está exibindo a pontuação do milhar. Sei que a solução seria alterar a máscara para ,0.00(como citado acima), porém tenho um projeto muito grande, onde uso a máscara #,###,##0.00 em vários locais do projeto, inclusive, nem sempre está como #,###,##0.00, pois alguns campos eu uso apenas #,##0.00 e outros #,##0.0000, sem contar os formatfloats da vida com máscaras diferentes.., ou seja, o padrão de máscara nem sempre é o mesmo. Se fosse, ficaria fácil dar um 'replace' global no projeto, porém não é bem simples assim(pois além de alterar a máscara, iria requerer também testes de todas funções. telas, relatórios, etc). Há alguma forma menos 'dolorosa' de migrar para Lazarus 1.8 e manter a compatibilidade de máscaras sem que eu tenha que alterar todas máscaras para ',0.00'? Obrigado, Renato

Exatamente isso.. porem, como agora o Governo está exigindo a tag vDesc, mesmo sendo 0.00. acontece o erro com rejeição 905..

Aqui mesma coisa.. eu gero o XML com a tag vDesc = 0.00 mas ao assinar o xml, a tag vDesc é removida.. não descobri o porque ainda..

Olá amigos, uso acbrNFe em alguns clientes e funciona perfeitamente.. Porém, em um novo cliente, está aprensentando o erro: Erro: Falha ao Definir PIN do Certificado. Erro: 80090029 Pesquisei aqui no fórum e tem algumas mensagens parecidas, porém o código do erro não é 80090029.. Alguém já passou por este erro? Estou usando a configurações: ACBrNFe.Configuracoes.Geral.SSLLib := libWinCrypt; e demais configurações DEFAULT. Certificado A3 Certificadora: AC Imprensa Oficial SP RFB G4 Obrigado

Olá amigos, tenho uma rotina no meu sistema onde o usuário seleciona o certificado desejado através de uma stringgrid populada através do comando: ACBrNFe.SSL.ListaCertificados (etc...)... Após o usuário escolher o certificado eu mostro um form para ele digitar a senha do certificado para que a senha possa ser gravada no banco de dados para utilizações futuras. Minha dúvida é: existe algum método/função para saber se a senha que o usuário digitou está correta? Obs.: Sei que ao assinar o XML se a senha estiver errada, o gerenciador do próprio certificado irá aparecer automaticamente solicitando a senha, mas antes disso acontecer, eu gostaria de assegurar que a senha gravada no banco está correta para evitar essas telas do próprio software do certificado.. Obrigado, Renato

De acordo com o manual da Argox, o padrão é 10.. e máximo 20.. Sendo o recomendado 16. Segue imagem:

Andrade, se seu SAT for Elgin, veja esse comunicado abaixo:

Sucesso aqui também!

Tentei hoje pela manhã.. nada.. sem sucesso..

Mesma coisa aqui. Acabei de tentar Ativar um Elgin Linker II, e o retorno é exatamente o relatado acima.. Aguardando.....