Cleber Ferreira

Parabéns Rafa! Deve ter tirado um peso grande das costas. Eu ainda vou levar um bom tempo. Mas conta aí como foi? Precisou realizar muitas alterações na hora?

Aproveitando a deixa Regys, fui gerar o XML eECFc e apareceu a mensagem com os seguintes dizeres: "Metodo CalcularModuloExpoente ainda não é compatível com OpenSSL 1.0.0 ou superior." A principio é versão de dll's openssl. Destaco que estou usando a libeay32.dll e ssleay32.dll da pasta de DLL's. Não sei se tem algo a ver. Debuguei o EAD e vi que o comando Ver := OpenSSL_Version retorna a versão 1.0.0d de Fevereiro de 2011. Grato

me refiro ao DadosReducaoZ.

Sim Elton Foi o erro que citei acima. Segue o trecho do log: TX -> [sTX][ENQ][NUL][FS]>7[145][NUL] 11:13:25:898 RX <- [NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][sOH][143][NUL] ----------------- ERRO ----------------- Erro retornado pela Impressora: Bematech Dados da última RZ corrompidos ----------------------------------------

Bom dia Daniel! O erro foi redução z corrompida. Até aí tudo bem pois estou usando emulador mesmo. O que se destaca é a questão citada acima. de não obedecer o except;

Vivendo e aprendo Elton! Muito obrigado pelas dicas.... Abraço

Bom dia! Estou enfrentando outro problema. Quando ocorre algo de errado no DadosReducaoZ, minha aplicação não entra no except. Já desabilitei o ACBrECF.ExibeMensagem mas mesmo assim não entra. try Resp := DMACBr.ECF.DadosReducaoZ; ReducaoZ := DMACBr.ECF.DadosReducaoZClass; cooZ := ReducaoZ.COO + 1; except on E : exception do begin MessageDlg(E.Message, mtError, [mbOK], 0); Result := False; end; end; Grato. Opa, perdão. É exceção.

Problema resolvido pessoal. A questão era um try e except dentro de outro. Obrigado pela ajuda

Bom dia Elton. Esqueci de citar. Estou usando o ACBrECF. Levantei a hipótese de que seria problema de memória mesmo. Mas não entendo porque com o executável debug (não estou debugando) o problema não acontece e com o executável release sim. Quando estou debugando, também não acontece nada de errado. Vou dando mais uma olhada aqui para tentar descobrir. Mas quem puder arriscar algum palpite, agradeço muito...rsrsrs Att.

Boa tarde a todos! Estou realizando alguns testes no emulador da Bematech e Sweda e quando fui registrar um item FF é retornada a tela de mensagem anexada. Vai aqui algumas condições. - Somente com produtos FF. Tributados registram normalmente. - Estou usando Delphi XE2. Com o executavel debug, o erro não acontece. Somente com o release. Estou anexando também o log caso alguém deseje analisar. Obrigado desde já! ecf.txt

É o melhor a fazer. Fica mais seguro.

Estou enviando as listadas a baixo. Lembrando que não tem todas as marcas de ecf, somente bematech, daruma, sweda. Apenas as que uso. N3AX6R32.DLL 907B8916BB27B356EFBFF5FCF7F87931 N3BEMAFI32.DLL E3311B82C38F603BACF23A2E76C6FFCF N3BEMAMFD.DLL 8896B9D8ADF0D083DF025E0F9BFCFA59 N3BEMAMFD2.DLL 45F66DE58FDE725846B4204AE9A1B361 N3BEMAMFD2_MP4000THFI.DLL 45F66DE58FDE725846B4204AE9A1B361 N3BEMATECH.DLL 7C96DC7F9AE8C41A7A076B0B754B469D N3CONVECF.DLL 5B0D6D1BC993B0AEE849A1875FA53125 N3DAO2535.TLB 6CD1AE8EAC6A7377329AF15E1C493BA5 N3DAO350.DLL 8888BDBD4E118D915D40A11748282BCA N3DARUMAFRAMEWORK.DLL 334DE25C2D0B3B470FDD83ED34D76670 N3EFICAZPAF.EXE 6DECAEB3543CA1C100AF8C26B579C1F7 N3FBCLIENT.DLL A7E39B57256D6E35091E73E4D230341C N3LEBIN.DLL 31E27F5D92261BCE7B08BA22426F884A N3LEITURAMFDBIN.DLL 7B1E9D4A19C0B7CD5BCE3F9521BFED88 N3LIBEAY32.DLL 1966C992DC4A5B50BE3E58FC26B8B0D7 N3MSJET35.DLL 9F6FAF209BEC2362523A0E9509F78964 N3SIGN_BEMA.DLL 1FBBFBF2BEC44924B44D9B29274DD3D1 N3SSLEAY32.DLL FE51AF337B27B5A2B404129DD22B25E7 N3SWMFD.DLL 5B6AFB39D95CD4CA2A27C3472188B755

Daniel, copiei as duas dll's da openssl e deu certo. A manota foi o seguinte. É que na pasta das dll's de ecf não consta a ssleay32.dll para os modelos que vou utilizar, então não me preocupei com ela. Vou implanta-la na listagem de executáveis e distribui-la tbm. Obrigado pela luz

Boa noite a todos. Só por curiosidade, no ACBrCTe.EnviarEmail, no parâmetro mensagem, tem como passar as linhas com tags html, ou seja formatado? Ou é possível de ser implementado? As vezes os clientes me questionam sobre mandar uma mensagem mais formal, bem apresentável. Grato..

Já testei tbm da pasta openssl e já vasculhei todas as pastas (delphi, system32...) para ver se tinha alguma. Só para destacar, todas as dll's utilizadas ficam no mesmo diretório com o executável. Não mantive nenhuma na pasta system32

Boa tarde a todos. Eu implantei o componente ACBrCNIEE e agora toda vez que inicio minha aplicação, apresenta a seguinte mensagem: "Não foi possível localizar o número ordinal 4540 na biblioteca de vínculo dinâmico LIBEAY32.dll." To usando a dll da pasta DLLS\BEMATECH\. Também já tentei várias outras versões da dll mas apresenta a mesma mensagem. As units que ele adiciona são ACBrCNIEE e ACBrSocket. Há, lembrando que utilizo o Delphi XE2. Se alguém puder me ajudar. Desde já, obrigado...

Compreendo sua posição. Eu tentei realizar uns testes com o automático aqui, mas não obtive sucesso. Você utiliza o LerPeso com um componente Timer?

Porque da sua escolha pelo manual Marcelo? Estou implementando também no meu PAF. Eu particularmente prefiro o manual, pois creio que se deixar automático, um dedo q for colocado na balança vai atrapalhar o processo. O que vc acha?

Boa tarde! O formato do CPF do motorista no DACT-e está com máscara de CNPJ. Está: qrlCPFMotorista2.Caption := DFeUtil.FormatarCNPJ(FCTe.Rodo.moto.Items[0].CPF); Mudar para : qrlCPFMotorista2.Caption := DFeUtil.FormatarCPF(FCTe.Rodo.moto.Items[0].CPF); Arquivo: ACBrCTeDACTeQRRetrato.pas - Linha : 1857

Puxa, mas com um grande volume de transações, vai ficar bem complicado, não?

Pessoal, continuando a utilização desse tópico... Estou trabalhando na venda e itens e me deparei com a seguinte situação. Sempre que eu vender um item eu tenho que ir na tabela de produtos e alterar o MD5? levando em conta que realizo a baixa de estoque, sendo assim alterei meu registro no banco de dados. Obrigado...

Bom, estou realizando testes com bematech e sweda por possuírem emuladores. Eu vou tentar dessa forma, e posto aqui para o pessoal contando da experiencia. Obrigado pela ajuda!!!

entendi Regys. Então posso retornar o status atual do ecf para verificar essa questão uai. Se for estLivre (dia normal) utilizo o DadosReducaoZ e depois dou o ACBr.ReducaoZ. Agora, se o status for estRequerZ, posso dar o ACBr.ReducaoZ e depois utilizar o DadosUltimaReducaoZ. Daria certo também. O que acha? Ou a comparação seria o caminho mais confiável?

Pelo que vejo daniel o DadosReducaoZ a primeira vista é bem melhor do que o DadosUltimaReducaoZ. Você chegou a ver o exemplo que o regys disponibilizou hoje? no dele veio DadosUltimaReducaoZ. Aí modifiquei para DadosReducaoZ e retornou tudo que eu precisava com excessão do coo inicial, mas que pode ser facilmente tratado. Aí, me pergunto. Que merge de informações você realiza? Obrigado desde já

Bom dia! Estou realizando uns testes de controle de emissão de ReduçãoZ e posterior gravação no banco. Estou utilizando os emuladores da Sweda e da Bematech. Essas reduções que estou gravando não tem nenhuma movimentação fiscal, então os valores de venda bruta e liquida estão zerados. Da redução da Sweda, os dois campos citados estão retornando zerado, como tem que ser. Já da Bematech, eles estão vindo com o valor de "-1". Só para orientação: Estou utilizando o ACBrECF.DadosDaUltimaReducaoZ e o ACBrECF.DadosReducaoZClass. Aproveitando o momento, nos totalizadores não fiscais, utilizo o seguinte código para pegar SUPRIMENTO e SANGRIA: for i := 0 to TotalizadoresNaoFiscais.Count - 1 do begin if UpperCase(TotalizadoresNaoFiscais.Objects[i].Descricao) = 'SANGRIA' then ParamByName('RED_VL_SANGRIA').AsCurrency := TotalizadoresNaoFiscais.Objects[i].Total; if UpperCase(TotalizadoresNaoFiscais.Objects[i].Descricao) = 'SUPRIMENTO' then ParamByName('RED_VL_SUPRIMENTO').AsCurrency := TotalizadoresNaoFiscais.Objects[i].Total; end; Utilizando ECF Bematech, consigo retornar os valores certinhos. Já com a Sweda não consigo. Grato