Douglas Lieck
-
Total de ítens
13 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por Douglas Lieck
-
-
Bom dia,
Desculpe a demora.
Passos que segui:
Bematech
Com4
AbrePorta
AbreCupom
VendeitemDepartamento:
cod = 12345678901234
Descrição = MAT. ISENTO
Alíquota = II
Acréscimo de 1
Segue em anexo arquivo Acbrlog.txt
Obrigado
-
Boa tarde,
Ainda estou com o problema...
Alterei varias formas, mas não consegui resolver o mesmo.
Se alguém poder ajudar agradeço.
-
Boa tarde,
Estou com um problema ao dar um acréscimo de valor em um item com a impressora Bematech MP20.
Essa rotina na Bematech mp 4000 esta funcionando perfeitamente.
O comando enviado é o seguinte:
EnviaComando(#63 + AliquotaECF + ValorStr + QtdStr + DescontoStr +
AcrescimoStr + StringofChar('0',22) + Unidade + Codigo +
Descricao ) ;
Inicialmente pensei que fosse limitação do ecf, pois tem a limitação de não ser MFD,
Mas testei em um exemplo da bematech e consegui dar acréscimo no item.
O erro que dá através do acbr é:
[0][30][17]
15:46:27 RX <- [0][129]
----------------- ERRO -----------------
Erro retornado pela Impressora: Bematech
Comando não executado
Tipo de parâmetro de CMD inválido
----------------------------------------
Alguém já teve esse problema?
fico no aguardo de um retorno!
Obrigado desde já.
-
Foi resolvido.. havia um problema com a ECF
-
Bom dia a todos,
Estou com um problema no ECF Epson, ao tentar buscar os dados da ultima redução Z
o GT "grande total" está vindo zerado, fiz varios testes mas porém não consegui identificar o problema.
Segue em anexo Log do Acbr e o retorno da impressora.
Desde já agradeço.
-
recebeu as mensagens welkson?
-
Gostaria de saber se alguem conhece e me indique algum software que faz o mesmo que um conversor de USB/Serial,
Pesquisei e achei um monte de hardware mas gostaria de um software
Alguem conhece algum?
Obrigado desde já.
-
eu subi os fontes, agora se foi atualizado eu não sei te dizer
somente o Daniel pode dizer, ou verificar nos fontes se contém a implementação.
-
se funcionar ta valendo
-
Bom dia,
Para urano eu uso AcbrEcfFiscnet,
Implementei da seguinte maneira:
//Declaração
procedure EspelhoMFD_DLL(DataInicial, DataFinal: TDateTime;
NomeArquivo : String; Documentos : TACBrECFTipoDocumentoSet = [docTodos] ) ; overload ; override ;
procedure EspelhoMFD_DLL(COOInicial, COOFinal: Integer;
NomeArquivo : String; Documentos : TACBrECFTipoDocumentoSet = [docTodos] ) ; overload ; override ;
==================================================================================
procedure TACBrECFFiscNET.EspelhoMFD_DLL(DataInicial, DataFinal: TDateTime;
NomeArquivo: String; Documentos: TACBrECFTipoDocumentoSet = [docTodos]);
//Totall - Douglas
var
Linhas: TStringList;
begin
Linhas := TStringList.Create;
LeituraMFDSerial(DataInicial, DataFinal, Linhas, Documentos);
WriteToTXT(NomeArquivo, Linhas.Text, False);
end;
procedure TACBrECFFiscNET.EspelhoMFD_DLL(COOInicial, COOFinal: Integer;
NomeArquivo: String; Documentos: TACBrECFTipoDocumentoSet);
//Totall - Douglas
var
Linhas: TStringList;
begin
Linhas := TStringList.Create;
LeituraMFDSerial(COOInicial, COOFinal, Linhas, Documentos);
WriteToTXT(NomeArquivo, Linhas.Text, False);
end;
acredito que deve ter já implementado a função citada em vermelho,
caso não tenha avise que posto ela tbm.
para o funcionamento deve-se usar a dll leitura.dll que segue em anexo.
espero ter ajudado.
-
Muito obrigado pela atenção.
-
Bom dia,
Estou com um problemão, estou tentando usar a bematech MP 7000 em modo USB, instalei os drivers necessários e com o exemplo da bematech
consegui fazer a comunicação com a impressora, porém no Acbr não consegui, adicionei uma nova porta com nome USB, mas não deu muito certo.
Fui debugando e percebi que no Acbr tem um tratamento
if not fpDevice.IsSerialPort then
raise Exception.Create(ACBrStr('A impressora: '+fpModeloStr+' requer'+sLineBreak+
'Porta Serial: (COM1, COM2, COM3, ...)'));
função chamada pelo comando acima:
function TACBrDevice.IsSerialPort: Boolean;
begin
Result := (pos('COM', fsPorta) = 1)
{$IFDEF LINUX}
or (pos('/dev/tty', fsPorta) = 1)
{$ELSE}
or (copy(fsPorta,1,4) = '\\.\')
{$ENDIF}
end;
ou seja se não for COM retorna false ocasionando no raise..
como faço para conectar a impressora usando USB?
Alguem já passou por esse problema?
Desde já agradeço.
Vende Item Departamento
em ACBrSerial
Postado
Atualizei e Testei
Funcionou corretamente
Muito Obrigado pela ajuda..
Att.:
Douglas Lieck