wfj

Boa noite! Após realizar a atualização do ACBr via SVN verifiquei que a pasta do ACBrFramework foi excluída da pasta Projetos, não sendo, entretanto, recriada na diretório raiz, conforme registrado no log do dia 10/10/2012. Sds. Wilson

Olá Batiati! O erro no retorno de ECF_GetSubTotal na realidade foi um erro meu, na função abaixo: Public Function LeSubTotalCupom() As Long Double On Error GoTo Erro Dim varSubTotal As Double resp = ECF_GetSubTotal(cHandle, varSubTotal) Sair: LeSubTotalCupom = varSubTotal Exit Function Erro: resp = -1 Resume Sair End Function O exemplo que encaminhei em anexo, na mensagem anterior, agora está funcionando corretamente. Abraços. Wilson

Obrigado Batiati e Elton! Vamos ver se o arquivo agora vai Abraços. Wilson TesteACBr32.zip

Olá Elton e Batiati! Com Zip tambem não deu certo. O seguinte erro está ocorrendo: "Desculpe, o limite de quota de anexos foi alcançado." Isto significa limite na quantidade de anexos ou no tamanho de anexos? Sds. Wilson

Olá Batiati! Maravilha o exemplo postado, assim como as dicas. Era o que eu estava precisando para dar continuidade ao meu projeto. Fiz um pequeno programa em Access/VBA 2007, cópia anexa, para ir me familiarizando com a DLL. Utilizei a versão que você recompilou para o padrão VB6. As declarações das funções que não constavam no exemplo eu converti para VB a partir do original em Delphi, portanto, não tenho certeza se estão totalmente corretas. Está tudo funcionando bem, só um pequeno bug que não consegui resolver: quando vou efetuar o pagamento, após a subtotalização, primeiro obtenho o SubTotal atraves da função ECF_GetSubTotal e depois chamo ECF_EfetuaPagamento. O SubTotal retornado está sendo, sempre, um valor inteiro, apesar do valor impresso no cupom estar correto. Por exemplo, no cupom SubTotal = 10,50 o retorno de ECF_GetSubTotal = 10,00. A função ECF_EfetuaPagamento imprime "Dinheiro 10,00" e ECF_FechaCupom imprime "Dinheiro 0,50" e "Soma 10,50". Estou utilizando o Emulador Bematech da impressora MP-2100 TH FI. Abraços. Wilson Não estou conseguindo enviar o arquivo (TesteACBr32.rar - 48 KB) como anexo. Tentei criar um outro tópico para enviar o anexo porém sem sucesso.

Olá Batiati, obrigado mais uma vez! Apesar de conhecer muito pouco de Delphi resolvi verificar como foram implementadas as funções, propriedades e métodos da ACBr32.dll. Abri a versão atualizada do projeto, no Delphi 2010, porem surgiram algumas dúvidas: 1 - as Units ACBrCommonDll, ACBrECFDll, ACBrBALDll e ACBrLCBDll não foram carregadas automaticamente no projeto; é alguma opção de inicialização do Delphi? 2 - Ao compilar o projeto, com ou sem as Units carregadas, o arquivo gerado (ACBr32.DLL) foi bem maior do que o disponível no projeto ACBr; aproximadamente 2 MB contra os 900 KB do original. Na conversão para VBA tenho usado o tipo Long para ecfHandle, PCHAR e bufferLen, conforme abaixo. Está correto? [DllImport int ECF_GetUltimoErro(const ACBR_HANDLE ecfHandle, PCHAR buffer, const int bufferLen); Public Declare Function GetUltimoErro Lib "ACBr32" (ByRef handle As Long, ByRef buffer As Long, ByVal bufferLen As Long) As Integer Amanhã começarei a testar a DLL. Sds. Wilson

Olá Batiati! Mais uma vez obrigado pela sua atenção. Conforme mencionei em post anterior, pretendo atualizar meu Aplicativo Comercial, desenvolvido em Access/VBA, de modo a atender a legislação do PAF-ECF; para tanto, pretendo utilizar a ACBr32.dll. No momento estou convertendo o ACBr.h nas declarações compatíveis com o VBA; terei imenso prazer em realimentá-lo com informações, na medida em que for desenvolvendo a atualização do meu A.C. Com relação ao arquivo ACBr.h, fiz hoje a atualização do projeto ACBr via SVN, entretanto, a versão do ACBr.h ainda é a de 21/09/2010, ou seja, não contempla a Balança, conforme pode ser observado no arquivo com as declarações convertidas, em anexo Sds. Wilson Declarações para ACBr32.txt

Olá Batiati! Você poderia disponibilizar no forum o arquivo ACBr.h para Balança e Leitor de Códigos de Barras? Sds. Wilson

Caro Batiati. Em primeiro lugar gostaria de parabenizá-lo, bem como aos demais colaboradores do Projeto ACBr, pelo brilhante trabalho realizado na implementação da tão esperada ACBr.DLL! O Projeto ACBr é realmente fantástico! A ACBr.DLL me motivou a reativar o projeto de atualizar meu A.C. (desenvolvido em Access/VBA) para atender a legislação do PAF-ECF, projeto este que andava meio parado. Portanto, se não for abusar da sua boa vontade, gostaria de solicitar um pequeno exemplo de utilização da ACBr32.DLL com o VB6/VBA? Sds. Wilson Ferreira Jr