Daniel Simoes

Devo subir essa alteração até o fim do dia... (espero que essa mudança não cause incompatibilidade em outras classes)

Na porta Serial o funcionamento é identico a antiga... Pela USB, vc precisará instalar um Driver da Epson... e mapear uma porta COM para a USB com este mesmo aplicativo...

Juliomar, Experimente modificar para: procedure TACBrTEFDArquivo.GravaInformacao(const Chave, Informacao : AnsiString) ; var I, IndChave : Integer ; begin IndChave := -1 ; I := 0 ; while (IndChave begin if copy(fStringList[I],1,Length(Chave)+3) = Chave + ' = ' then IndChave := I else Inc( I ) ; end; if IndChave >= 0 then fStringList.Delete(I); // Remove o Antigo if Informacao '' then fStringList.Add( Chave + ' = '+ Informacao ) end ; .... .... function TACBrTEFDArquivo.AchaLinha(const Identificacao : Integer; const Sequencia : Integer = 0 ) : Integer; Var Campo : String; I : Integer; begin Campo := NomeCampo(Identificacao, Sequencia); Result := -1 ; I := 0 ; while (Result begin if copy(fStringList[I],1,Length(Campo)+3) = Campo + ' = ' then Result := I; Inc( I ) ; end; end; [/code]

Apenas para a leitura da MFD e geração do Ato Cotepe... e a carga da DLL é dinâmica (apenas quando necessário) O Motivo... nem todos os fabricantes possuem comendos (abertos) para baixar a MFD e interpreta-la não é tarefa simples

Para resolvermos... em primeiro lugar, é bom termos certeza de que não há nada de errado com as DLLs do Fabricante... Use o programa Demo do Fabricante, e instale as DLLs conforme as intruções do mesmo, e faça os testes..

Acho que isso é configurável apenas por Intervenção Técnica... O Ideal é ler do ECF como ele opera (Arredonda ou Trunca)... e replicar o calculo no lado do Software.... algo como: if Trunca then TotalItem := Trunc(Itens[I].Qtd * Itens[I].Preco_Unit * 100) / 100 else TotalItem := RoundTo(Itens[I].Qtd * Itens[I].Preco_Unit, -2); [/code]

Provavelmente é problema do driver com 64 bits... O recomendado é instalar uma Placa Serial... USB é uma eterna fonte de dor de cabeça...

O trecho do LOG acima não mostra o verdadeiro retorno... pois o método usa uma variável de buffer... Por favor insira um BkPoint em: function TACBrECFFiscNET.GetArredonda: Boolean; e observe o valor de fsArredonda na primeira leitura do método...

Sim pode ser... o que sempre observei, é que o ECF fica "mudo" por alguns instantes após o acionamento da gaveta... por isso o Sleep(500) após a abertura deve resolver...

Verifique com o suporte da Dataregis, ou no manual da DLL o que é o erro -8

Notei que usando... C_ON = #1 ; C_OFF = #0 ; // cExpandidoOn = ESC + SO; cExpandidoOff = #20;[/code] O Expandido funciona no emulador.. porém apenas uma vez dentro do gerencial... Mesmo seguindo as orientações desta página.. http://partners.bematech.com.br/2011/05 ... ns-no-ecf/ não obtive sucesso... Aprentemente esse comando (Expandido) nunca funcionou adequadamente na Bametech

Está com as DLLs atualizadas ? https://acbr.svn.sourceforge.net/svnroo ... /DLLs/ECF/

Experimente mudar as linhas: C_ON = #1; C_OFF = #0; para C_ON = '1'; C_OFF = '0';

Pode faltar um Sleep(500) após o acionamento da gaveta... vou verificar

Oi Marcio, Bom ver você por aqui novamente Devo terminar o merge em breve... não fiz uma analise detalhada... pois como vc disse já estar homologado, acredito que esteja quase tudo certo... Preciso depois verificar com você algumas mudanças em ACBrTEFDClass.pas... assim que subir pro SVN, posto por aqui novamente...

Gobbo, A DLL da Bamatech gera um Log... você poderia anexa-lo ? Talvez no Log da DLL contenha informações mais detelhadas sobre o problema... Em todo caso, se houver um Bug na DLL precisamos reporta-lo para eles corrigirem...

Tudo OK, o ACBrECF enviou o comando de Ativar/Desativar Expandido.. - 12:42:59 LinhaRelatorioGerencial( "[ESC]W[1]IDENTIFICACAO DO PAF-ECF[ESC]W[CR][LF]", 0 ) TX -> [STX]"[NUL][FS][20][ESC]W[1]IDENTIFICACAO DO PAF-ECF[ESC]W[LF]g[BEL] 12:43:00 RX [/code] [ESC]W[1] Tem certeza de que o Expandido já funcionava antes ?

O ACBr é OpenSource.. apenas abra os fontes e veja...

OK... Resolvi dar andamento no Patch do Marcio... as modificações dele são significativas... Para auxiliar no suporte (futuro), gostaria de ter os manuais das novas Operadoras: gpCliDTEF, gpTefPetrocard, gpCrediShop, gpTicketCar

Estou aplicando os Patchs... notei a falta da Unit: ACBrTEFDPetroCard.pas

A DLL deveria ler isso do cliche do ECF... Não há como informar isso para o ACBrECF... mas vc poderia editar o .INI da DLL

Sim... isso é uma tarefa aberta para mim... mas só terei tempo de analisa-la após duas semanas... estou na corrida para minha re-homologação... Nesse meio tempo você pode efetuar novamente um "merge" dos fontes do tópico citado...

Fiz um teste rápido com o emulador... e o ACBrECF está interpretando as TAGs corretamente... veja: -- 10:07:02 LinhaRelatorioGerencial( "[CR][LF]IDENTIFICACAO DO PAF-ECF[CR][LF][CR][LF]LAUDO NUMERO: ABC1234567890[CR][LF][CR][LF][CR][LF]EMPRESA DESENVOLVEDORA[CR][LF][CR][LF]CNPJ........: 01222333000019[CR][LF]Razao Social: Razao social Empresa[CR][LF]Endereco....: Rua da Felicidade, 1[CR][LF]Cidade/UF...: SAO PAULO/SP[CR][LF]CEP.........: 99.999-999[CR][LF]Telefone....: (99)1111.2222[CR][LF]Contato.....: Nome do Contato[CR][LF]e-mail......: [CR][LF][CR][LF]IDENTIFICACAO DO PAF-ECF[CR][LF][CR][LF]Nome Comerc.: DemoECF[CR][LF]Versao......: v01.01.01[CR][LF]Laudo.......: ABC1234567890[CR][LF]ER-PAF-ECF..: 01.06[CR][LF]Princ. Exec.: ECFTESTE.EXE[CR][LF]MD5.........: XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX[CR][LF][CR][LF]OUTROS ARQUIVOS UTILIZADOS[CR][LF][CR][LF]Arquivo 001[CR][LF]MD5: XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX[CR][LF]Arquivo 002[CR][LF]MD5: XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX[CR][LF]Arquivo 003[CR][LF]MD5: XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX[CR][LF]Arquivo 004[CR][LF]MD5: XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX[CR][LF]Arquivo 005[CR][LF]MD5: XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX[CR][LF][CR][LF]ARQ. LISTA AUTENTICADOS[CR][LF][CR][LF]lista_arquivos.txt[CR][LF]MD5: AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA[CR][LF][CR][LF]ECFS AUTORIZADOS[CR][LF][CR][LF]AAAAAAAAAAAAAAA[CR][LF]AAAAAAAAAAAAAAA[CR][LF]AAAAAAAAAAAAAAA[CR][LF]", 0 ) TX -> [STX]l[STX][FS][20][LF][ESC]W[1]IDENTIFICACAO DO PAF-ECF[ESC]W[NUL][LF]================================================[LF]LAUDO NUMERO: [ESC]EABC1234567890[ESC]F[LF]================================================[LF][LF][ESC]EEMPRESA DESENVOLVEDORA[ESC]F[LF]------------------------------------------------[LF]CNPJ........: 01222333000019[LF]Razao Social: Razao social Empresa[LF]Endereco....: Rua da Felicidade, 1[LF]Cidade/UF...: SAO PAULO/SP[LF]CEP.........: 99.999-999[LF]Telefone....: (99)1111.2222[LF]Contato.....: Nome do Contato[LF]e-mail......: [LF][LF][ESC]EIDENTIFICACAO DO PAF-ECF[ESC]F[LF]------------------------------------------------[LF]Nome Comerc.: DemoECF[LF]Versao......: v01.01.01[LF]Laudo.......: ABC1234567890[LF]l[149] 10:07:02 RX [/code] Mais precisamente em: [ESC]W[1]IDENTIFICACAO DO PAF-ECF[ESC]W[NUL]

As tags tem siginificado diferentes.. = Expandido e = Centralizado... Se possível, por favor anexe um LOG do ECF com os comandos enviados (antes da alteração)

Não compreendi... Você altera o Path do Arquivo a cada execução ?