Valdeir Caires

Deu certo, mas olha o tamanho da gambiarra

Esse era meu medo, minha homologação é semana que vem. Eu poderia implementar essa validação usando o componente mas meu tempo está curto de mais. Vou tentar o seguinte então, as duas funções onde tenho o problema de atualização do arquivo são na sangria e suprimento, vou criar uma variável backup para armazenar os dados do AAC e desativar o componente antes de usar a função, assim que terminar vou atribuir o AAC do meu backup novamente no acbrECF.

Como desativar a atualização do arquivo criptografado com o AAC? Estou mesclando meu projeto com algumas funções próprias como por exemplo o arquivo criptografado gerado e atualizado com o AAC, emito cupom fiscal e cancelo cupom normalmente só que ao realizar um suprimento ou sangria aparece uma mensagem dizendo que o arquivo criptografado é invalido. Gostaria de desativar essa função.

Aparentemente como o arquivo está sendo gerado eu coloquei o comando Try para que mesmo se acontecer o erro não trave a aplicação, só que mesmo dentro do tratamento de erro a aplicação fechava. Depois de muita pesquisa resolvi o problema. Resumindo: Com a aplicação compilada usando o .NET 4.0, dentro do arquivo app.config criei a tag dentro de configuration Fica a dica para alguém com o mesmo problema. Fonte: http://stackoverflow.com/questions/3469368/how-to-handle-accessviolationexception

Pessoal estou desesperado, minha homologação é semana que vem e hoje me deparei um um erro que não estava acontecendo na minha pré homologação. Estou gerando relatórios em arquivos vindos da impressora, exemplo: acbrECF.PafMF_LMFC_Espelho(CDate(DataInicial), CDate(DataFinal), "C:\PAFECF\LMFC.txt") Tentei de tudo, atualizei via svn, recompilei, atualizei as dlls da bematech do svn 32 e 64 dentro da pasta bin do projeto. O arquivo é gerado na pasta porem o erro é apresentado. Segue em anexo o arquivo gerado e o arquivo de log. LMFC.txt acbrlog.txt

Olá pessoal, estou usando uma impressora bematech usb em um notebook, instalei o driver e o virtual serial disponibilizado pela bematech, não funcionava de maneira alguma até que eu mudei a velocidade da porta COM virtual para 115200, funcionou. A impressora imprime vários cupons mas do nada ela retorna uma mensagem de erro "Impressora Bematech não responde (ACK = 0)" Segue o log: -------------------------------------------------------------------------------- ATIVAR - 13/02/14 08:55:11:529 - Modelo: Bematech - Porta: COM3 - TimeOut: 15 Device: BAUD=9600 DATA=8 PARITY=N STOP=1 HANDSHAKE=RTS/CTS HARDFLOW MAXBANDWIDTH=0 -------------------------------------------------------------------------------- -- 08:55:11:894 TX -> [sTX][4][NUL][FS][19]/[NUL] 08:55:12:124 RX <- [NUL][NUL][NUL][NUL] -- 08:55:12:124 TX -> [sTX][ENQ][NUL][FS]#)h[NUL] 08:55:12:344 RX <- [sOH][sOH][sOH][NUL][NUL][NUL][NUL] -- 08:55:12:344 TX -> [sTX][ENQ][NUL][FS]#<{[NUL] 08:55:12:564 RX <- BEMATECH MP-2100 TH FI ECF-IF [NUL][NUL][NUL][NUL] -- 08:55:12:564 TX -> [sTX][ENQ][NUL][FS]#[11]J[NUL] 08:55:12:784 RX <- [NUL][sOH][NUL][NUL][NUL][NUL] -- 08:55:12:784 TX -> [sTX][ENQ][NUL][FS]#(g[NUL] 08:55:13:004 RX <- BE051372900000063166[NUL][NUL][NUL][NUL] -- 08:55:13:004 Estado TX -> [sTX][ENQ][NUL][FS]#[WAK]P[NUL] 08:55:13:224 RX <- [20][NUL][NUL][NUL][NUL] -- 08:55:13:224 TX -> [sTX][ENQ][NUL][FS]#A[128][NUL] 08:55:13:444 RX <- [NUL][NUL][NUL][NUL][NUL] -- 08:55:13:444 TX -> [sTX][ENQ][NUL][FS]#[ESC]Z[NUL] 08:55:13:664 RX <- [NUL][NUL][NUL][NUL][NUL][NUL][NUL] -- 08:55:13:669 IdentificaOperador() TX -> [sTX][ENQ][NUL][FS]#*i[NUL] 08:55:13:889 RX <- 07.007.940/0001-51 [NUL][NUL][NUL][NUL] -- 08:55:13:889 CNPJ TX -> [sTX][ENQ][NUL][FS]#*i[NUL] 08:55:14:109 RX <- 07.007.940/0001-51 [NUL][NUL][NUL][NUL] -- 08:55:14:109 Estado TX -> [sTX][ENQ][NUL][FS]#[WAK]P[NUL] 08:55:14:329 RX <- [20][NUL][NUL][NUL][NUL] -- 08:55:14:329 TX -> [sTX][ENQ][NUL][FS]#A[128][NUL] 08:55:14:549 RX <- [NUL][NUL][NUL][NUL][NUL] -- 08:55:14:549 TX -> [sTX][ENQ][NUL][FS]#[ESC]Z[NUL] 08:55:14:769 RX <- [NUL][NUL][NUL][NUL][NUL][NUL][NUL] -- 08:55:14:769 Estado TX -> [sTX][ENQ][NUL][FS]#[WAK]P[NUL] 08:55:14:989 RX <- [20][NUL][NUL][NUL][NUL] -- 08:55:14:989 =========================================================================

Pra mim resolveu com o Code 850.

Que vergonha kkkk Eu copiei os eventos do C# fiz a conversão dos códigos para VB só que faltou adicionar um Handles em Private Sub tef_OnComandaECFPagamento(sender As Object, e As ComandaECFPagamentoEventArgs) Handles ACBrTEF.OnComandaECFPagamento Fiz em todos os outros menos neste. Obrigado mais uma vez Funcionando 100%

Rafael me desculpe, depois que encontrei uma "solução alternativa" não entrei mais nesse tópico. Meu ECF é físico mesmo, é uma impressora Bematech MP-2100 TH FI, estou utilizando a dll que você implementou a algum tempo para solucionar uma incompatibilidade de uma função MFD não implementada no .NET em 32 bits. Hoje estou encontrando outro problema por isso estou criando outro tópico respeitando assim as normas do forum. Segue o link com novo problema

Boa tarde pessoal, alguém já passou teve problema na função CRT no TEF? O senário é o seguinte: Estou implementando meu sistema TEF Dial em VB.NET, está funcionando quase que perfeitamente, o componente é ativado, o cupom é emitido, eu chamo a função CRT, ele abre o gerenciador para informar os dados do cartão, o problema começa quando a janela do gerenciador do cartão é fechada, acontece algo dentro da função que me retorna a exception: "An unhandled exception of type 'System.AccessViolationException' occurred in ACBrFramework.Net.dll Additional information: Tentativa de leitura ou gravação em memória protegida. Normalmente, isso é uma indicação de que outra memória está danificada." Oque me deixa maluco é que a mesma função funciona no exemplo em C#. Pesquisando no forum encontrei uma possível solução que seria mudar uma propriedade do projeto na aba Debug alterando "Enabled unmanaged code debugging", propriedade essa que não existe mais na versão do VS2012 e ou VS2013. Desde já agradeço a ajuda de todos.

Eu fiz uma adaptação temporária (pt-br "Cabrito") em meu projeto criando uma herança do objeto ACBrECF da forma a baixo. Quando instancio o objeto uso minha classe e até agora resolve o problema Public Class MeuACBrECF Inherits ACBrFramework.ECF.ACBrECF Private xDataMovimento As Date = New Date(1, 1, 1) Public Overloads ReadOnly Property DataMovimento As Date Get If MyBase.DataMovimento = New Date(1899, 12, 30) Then If xDataMovimento.Year = 1 Then xDataMovimento = MyBase.DataHora Return xDataMovimento Else Return MyBase.DataMovimento End If End Get End Property Public Overloads Sub ReducaoZ(Data As Date) MyBase.ReducaoZ(Data) xDataMovimento = New Date(1, 1, 1) End Sub End Class

Bom dia, Alguma novidade?

Poderia me indica algum livro sobre Lazarus para estudo?

Boa tarde Rafael, conseguiu ver alguma coisa?

Tem alguma novidade? É que eu não tenho o Delphi aqui para testar a sugestão do Juliomar.

Eu testei as duas formas, sem movimento e depois de emitir um cupom fiscal, em ambas condições a data veio com o mesmo formato. Antes da compilação nova não tinha problema com essa função, nem antes ou depois de emitir um cupom fiscal. Estou usando essa função para gravar no banco de dados a data do movimento do ECF, somente para resolver um problema com relatórios fiscais em estabelecimentos 24h, sofria com a diferença do Relatório de vendas e Redução Z do dia.

Boa tarde Estou com problema na obtenção da data do movimento do ECF, não sei se tem relação à compilação nova do ACBrFramework, compilação que apanhei um bocado, Juliomar e Rafael que o digam (Riso), mas antes dessa compilação a função estava perfeita. Alguém está com o mesmo problema?

Nossa que beleza!!! Parabéns Rafael... Ótimo trabalho, funcionou perfeitamente. Muitíssimo obrigado, salvou meu feriado

Quanto a compilação no Lazarus realmente era a versão 1.0.12 que estava errada, atualizei para a versão 1.3 como a que você está usando e funcionou perfeitamente. O arquivo ACBrPAFRegistrosR1.cs do post anterior não existe na pasta, eu criei um arquivo com o mesmo nome e compilou, porem na execução do meu projeto segue a mensagem de erro em anexo Desde já muito obrigado.

Está com erro na compilação do projeto ACBrFramework.NET Error 1 Source file 'C:\ACBrFramework\ACBrFramework.Net\ACBrFramework.Net\PAF\Registros\PAF_R\ACBrPAFRegistrosR1.cs' could not be opened ('Erro não especificado ') ACBrFramework.Net

Rafael, está bem parecido porem eu estou usando Lazarus com a versão 1.0.12 e você está com 1.3, estou baixando a ultima versão e vou testar. Fiz a implementação na unit em anexo, estou doido pra testar no Visual Studio mas enquanto não compilar ficarei na expectativa. Obrigado pela atenção ACBrECFDll.pas

Segue imagem do erro na compilação.

Estou homologando o PAF pesquisei uma solução para o requisito VII item 4 e 5 achei esse tópico dizendo para usar essas funções. Disseram que ainda não estava implementada no ACBrFramework, pelo que andei lendo o framework seria uma espécie de interface que usa as funções existentes no ACBr, "acho" que deve ser fácil implementar mas não consigo compilar o projeto no Lazarus Desculpe a ignorância só estou tentando ajudar mas parece que estou atrapalhando ainda mais, sou programador IDE Visual Studio, não estou mais habituado com DELPHI que na época de faculdade (10 anos atrás) gostava muito.

Segue anexo com tela e arquivos da instalação. ACBrInstall.ini log_Delphi_7.txt

Bom dia Rafael Segui suas instruções agora estou mais animado, os erros de compilação iniciais não existem mais, porem agora com o avanço do compilador estou com outro erro "C:\ACBr\Fontes\ACBrSerial\ACBrECFClass.pas(1439,39) Error: Identifier not found "FormMsgFonte", O erro citado a cima pode estar ocorrendo devido erro na instalação do ACBrInstall.exe?