muriloamaral

function TACBrTEFD.ECFAbreVinculado(COO, Indice : String; Valor : Double ) : Integer; Var Erro : String ; begin fTefClass.GravaLog( fTefClass.Name +' ECFAbreVinculado: COO: '+COO+' Indice: '+ Indice + ' Valor: '+FormatFloat('0.00',Valor) ) ; Result := -1 ; // -1 = Não tratado OnComandaECFAbreVinculado( COO, Indice, Valor, Result ) ; if Result < 1 then begin if Result = 0 then Erro := 'Erro ao executar "OnComandaECFAbreVinculado"' else Erro := '"OnComandaECFAbreVinculado" não tratado' ; fTefClass.GravaLog(Erro); raise EACBrTEFDECF.Create( ACBrStr( Erro ) ) end; end; acho que esta ocorrendo porque ele esta pegando COO do Intpos.001 que ja foi usado... gera uma Exeção e imprime com Relatório Gerencial a pergunta é como eu faço pra arrumar isso sem pesar o componente nem altera seu funcionamento?=D

Boa Tarde meu primero post no Forum sou iniciante em Programação aprendo muito vendo os fonts ACBr mais vamos la Estou com o mesmo problema do cara ali o log é o seguinte ----------------- ERRO ----------------- Impressora Daruma está desconectada ou desligada. ---------------------------------------- ----------------- ERRO ----------------- Impressora Daruma está desconectada ou desligada. ---------------------------------------- Obs: Ela nao esta nem desconectada nem desligada e eu almentei o tempo de Espera... Obrigado deis de ja Muito obrigado Daniel e toda equipe do ACBr por toda ajuda que voces tem prestado a maior parte dos Desenvolvedores do Brasil.