Daniel Paixão-Cascavel

Caros colegas, consegui resolver o problema falando com o pessoal autorizado da Argox aqui na minha cidade. Eles instalaram outro drive e fizeram algumas configurações e depois, montaram um modelo de etiqueta num aplicativo da Argox chamado BarTender e quando mando uma impressão desse aplicativo, sai beleza, só que daí, só pra me ferrar mesmo de vez, depois que eu mando uma impressao do Bartender, se eu mandar uma do meu sistema sai certinho mas... na segunda já dá errado dinovo. Parece que ele perder a configuração. Detalhe, se vou no Bartender e mando outra, dai vou no sistema, a primeira sai certo dinovo. É como se o Bartender "setasse" a configuração e o ACBrETQ tirasse a mesma. Vou até anexar aqui a unit que faço a impressão para que fique mais claro: Acho que estamos quase.... vamos lá. impressaoEtiquetas.pas

Então Juliomar, na verdade esse componente não tem log (ao menos que eu saiba) mas, eu fiz o debug completo do componente e, sim, ele está enviando o comando correto porém, eu vi que ele manda umas quebras de linha, será que pode isso? Veja trecho de código referente ao avanço de etiqueta na ACBrETQPpla.pas Cmd := ''; if AvancoEtq = 0 then AvancoEtq := Avanco; if (AvancoEtq < 0) or (AvancoEtq > 779) then Raise Exception.Create(ACBrStr('O Valor máximo para o Avanço de Etiquetas é 779')); AvancoEtq := AvancoEtq + 220; Cmd := 'E' + CRLF + // Ends the job and exit from label formatting mode STX + 'f' + IntToStrZero(AvancoEtq,3) + CRLF ; // Ajusta o avanço para corte da etiqueta

Galera, já vi esse tópico sendo debatido aqui mas abri criei um novo por que não sei mais o que fazer: Meu cliente tem um tamanho diferenciado de etiqueta e tem uma impressora Argox OS-214Plus. Já fiz a etiqueta no modelo que ele quer e, se eu imprimo duas etiquetas seguidas, fica certinho porém, se eu imprimo apenas uma, parece que a impressora não obedece o avanço de corte especifico em "ACBrETQ.Imprimir(1,2)", ficando a etiqueta fora do ponto de corte, ou seja, ainda embaixo da cabeça de impressão. Já fiz reset na impressora, já fiz a calibragem mas mesmo assim não resolveu o problema. Será que existe algo mais que eu possa fazer pra resolver isso? Estou indo pro meu cliente instalar a etiqueta hoje, as 09:00 e não consegui fazer esse avanço funcionar. Já vi uns vídeos no Youtube a respeito de reset e calibragem também, inclusive, um citado pelo Daniel Simões mas.... até agora... nada. Agradeço se alguem puder me dar uma atençao nisso ai.

Então Daniel, segundo o manual PPLA, que eu já havia estudado, na página 7, fala que pra imprimir as fontes Smooth, tem que enviar no parametro Fonte o valor '9' e no parâmetro subFonte valores de '000'~'007', dependendo do modelo da fonte que quiser imprimir. Acontece que eu estou enviado o comando assim ao ACBrETQ: ACBrETQ.Impressora.ImprimirTexto(orNormal,9,2,2,210,20,Texto,1); Porém, ele sai uma fonte enorme, e não a que sai indicado como "SD Smooth Font (6 points)" no teste de impressão. Espero ter sido claro. Já consegui fazer a impressão do jeito que eu quero mas.... preciso urgente ajeitar essa fonte ai e não estou conseguindo. Obrigado.

Galera, seguinte, estou apanhando aqui da Argox OS-214Plus. Eu consegui resolver a maioria dos "pepinos" porém, me sobrou um ultimo: Quando eu ligo a impressora com o botao FEED pressionado, ela me imprime um teste de impressao com todos os modelos de fonte disponíveis. A fonte que eu preciso usar sai como "ASD Smooth font (6 points) ...". Pergunta: Qual o comando eu devo enviar pra impressora para poder mudar a fonte que desejo imprimir? Seria o SubFonte do ACBrETQ? Pelo que percebi o parametro Fonte do comando ImprimeTexto do ACBrETQ só muda o tamanho da fonte. Obrigado.

Galera, meu cliente comprou uma impressora de etiquetas Argox OS-214plus. Só que ele mandou fazer umas etiquetas de 10/8 cm. Alguem aí sabe como definir esse tamanho de etiqueta na impressora ou no ACBrETQ? Abraco

Boa tarde galera. Seguinte, eu tenho um sistema para Delivery em geral (Restaurantes, Pizzarias, Disk Gaz, etc). Acontece que agora meus clientes estão pedindo a integração com o bina. Dai me vieram as dúvidas: Que tipo de bina ele deve comprar? Alguem recomenda um modelo que seja fácil e claro a integração? Abraco a todos.

Galera, acabei de atualizar o pacote ACBr e agora, quando vou compilar, ele informa que não encontrou a função FloatToIntStr, na linha 1228 da unit ACBrECFEscECF.pas. Essa função existem em alguma unit ou, quem escreveu queria dizer FloatToStr?

Alguem aí sabe o comando pra imprimir Negrito na impressora MP 4200 TH Não Fiscal? Obrigado.

Na verdade assim Daniel, hoje eu uso o componente ACBrECF pra imprimir um ticket, porém, a única forma que achei pra fazer isso usando o componente, foi através de um relatório gerencial. Só que o relatório gerencial já faz um pré cabeçalho e imprime o Texto "RELATORIO GERENCIAL" no meu ticket. O que queria era imprimir um texto sem ser um relatório gerencial. Eu tava fazendo isso com comando direto na porta (writeLn), só que tive alguns problemas, por isso, optei pelo ACBrECF. Tem como eu fazer isso que eu quero sem ser através de um relatório gerencial e usando o componente ACBrECF?

Olá galera, gostaria de saber se é possível imprimir um texto livre em uma impressora Bematech 4200 TH Nao Fiscal, sem ter que abrir um relatório gerencial. Preciso apenas imprimir um ticket de vale compra mas... sem o cabeçalho e tals.

Então Regys, eu tenho duas opções, uma delas é enviar a impressão pra uma impressora comum. Com isso que você me disse ai, então eu poderia simplesmente instalar uma impressora, apontando pra porta dessa bematech e enviar esse relatório que eu tenho ( com os devidos ajustes de tamanho) para esta impresssora, certo?

Galera, seguinte: Eu tenho um cliente que é uma pizzaria Delivery. Ele tem duas impressoras Bematech MP 4200 TH Não Fiscal, uma fica no balcão onde os entregadores pegam a pizza pra sair pra entrega e a outra fica dentro da cozinha. Quando o usuário emite o cupom fiscal, eu tenho um programinha a parte que fica minimizado na bandeija, esse programa lê o banco, verifica que tem um registro novo e, através do ACBrECF, emite a guia de entrega porém, agora, preciso que ele imprima também, na impressora da cozinha, a ordem de produção. Então, eu instancio outro objeto TACBrECF e faço da seguinte maneira: procedure TFrmRotRestaurante.VerificaImpressaoComanda(Id: Integer); var Query:TFirebirdQuery; Setor:String; Lista:TStringList; Ptr:TACBrECF; begin Setor := ''; Lista := TStringList.Create; Query := TFirebirdQuery.Create; Ptr := TACBrECF.Create(Self); Ptr.Modelo := ecfNaoFiscal; Ptr.Porta := 'C:\Cupom2.txt'; try Ptr.Ativar; Except on e:exception do Mensagem(e.Message,mtError); end; try if (Query.OpenSQLQuery(Format('SELECT ' + ' PRO.IDSETOR||''-''||STR.DESCRICAO AS SETOR,' + ' ITE.IDSEQUENCIA,' + ' ITE.IDPRODUTO,' + ' PRO.DESCRICAO AS DESCRICAPRODUTO,' + ' ITE.QUANTIDADE ' + 'FROM ' + ' RESCOMANDAITEM ITE LEFT OUTER JOIN ESTPRODUTOS PRO ON (PRO.ID=ITE.IDPRODUTO) ' + ' LEFT OUTER JOIN ESTSETORES STR ON (STR.ID=PRO.IDSETOR) ' + 'WHERE ' + ' ITE.CANCELADO = ''N'' AND ' + ' ITE.ORDEMPRODUCAOIMPRESSA = ''N'' AND ' + ' STR.IMPRIMEORDEMPRODUCAO = 1 AND ' + ' ITE.IDCOMANDA = %d ' + 'ORDER BY PRO.IDSETOR ',[Id]))) then begin Query.SQLQuery.First; while not Query.eof do begin if ((Setor='') or (Query.FieldByName('Setor').AsString<>Setor)) then begin Lista.Add('Setor'+Query.FieldByName('Setor').AsString); end; Query.Next; end; Ptr.RelatorioGerencial(Lista); end; finally Query.Free; Lista.Free; Ptr.Desativar; Ptr.Free; end; end. Veja que eu conecto na outra impressora e, pra questão de testes, estou mandando em 'C:\Cupom2.txt'. Porém, não imprime, me retorna I/O error 102. Alguem pode me dar uma luz?

Olá galera. Tenho um cliente que usa uma impressora Bematech MP 4000 TH não fiscal e tem gaveta de dinheiro. Acontece que a gaveta nem sempre abre, a menos que fique pressionando várias vezes o atalho do meu sistema para abrir gaveta. Já tentei várias coisas com o comando direto do ACbr (ACBrECF.AbreGaveta) e enviando o comando direto (ECF.Impressora.EnviaComando(Chr(27)+Chr(118)+Chr(140)), porém, nenhum dos dois me resolveu. Falei com o pessoal da Bematech, e eles me falaram que tenho que aumentar o TimeOut para abertura da gaveta. Aí eu pergunto: Esse timeout seria aquele configurado no Device do ACBrECF? Onde eu informo isso? Tem isso no ACBrECF? Abraço.

Uai, não entendi. Eu tenho vários clientes que utilizam a impressora Bematech em USB e o sistema é todo desenvolvido com o ACBr. Eu apenas instalo o simulador de porta serial virtual. OU não entendi a pergunta...??

Seguinte Italo, eu debuguei o envio de evento de cancelamento de NFE e pude perceber o seguinte: La na unit ACBrNFEWebServices, na linha 3931, quando está sendo feita a leitura do retorno, a variavel RetWS fica com o seguinte valor: '<retEnvEvento versao='1.00' xmlns='http://www.portalfiscal.inf.br/nfe'><idLote>5075</idLote><tpAmb>2</tpAmb><verAplic>PR-Evt-1_2_6</verAplic><cOrgao>41</cOrgao><cStat>128</cStat><xMotivo>Lote de Evento Processado</xMotivo><retEvento versao='1.00'><infEvento><tpAmb>2</tpAmb><verAplic>PR-Evt-1_2_6</verAplic><cOrgao>41</cOrgao><cStat>573</cStat><xMotivo>Duplicidade de Evento. ID1101114113060553076800019055001000005075100005075801</xMotivo><chNFe>41130605530768000190550010000050751000050758</chNFe><tpEvento>110111</tpEvento><dhRegEvento>2013-06-05T18:51:03-03:00</dhRegEvento></infEvento></retEvento></retEnvEvento>' Veja que ali em <cStat> da terceira linha temos o valor 573 e em xMotivo, temos o valor: Duplicidade de evento. Eu não entendi por que os campos cStat e xMotivo aparecem duas vezes com valores diferentes nesse XML de retorno mas, o fato é que o componente XML, independente da resposta ser Lote de evento processado ou Duplicidade de evento, ele retorna apenas o Lote de evento processado, fica errado a mensagem de retorno para o usuário. Seria isso um erro no componente?

Muito obrigado, meu caro Italo Jr. mas, só mais uma pergunta: Como eu faço pra salvar o XML do cancelamento?

Galera, me ocorreram algumas dúvidas que, com certeza os senhores poderão me ajudar: 1-Quando eu envio um cancelamento de NF-e, é obrigatório atualizar o XML original com os dados do cancelamento ou o XML original deve permanecer inalterado? 2-Fiz as alterações referente a lei da transparência porém, ta dando erro de schema no modo homologação, como faço pra saber se meus schemas estão ok? Os schemas do ACBr são atualizados regularmente? 3-Eu uso a impressão do DANFE em QuickReport, nesse modelo de impressão já estão ok as questões da transparência? 4-Quando eu envio um evento de cancelamento da NFE, se a mesma já está cancelada, o servidor da Receita não critica o evento duplicado? Abraço a todos.

Primeiro quero parabenizar pelo componente, ficou ótimo. Uma última idéia, seria colocar as propriedades de retorno em public, ao invés de em published. Apenas para não ficarem aparecendo no Object inspector.

Olá, sei que perguntou ao Regys mas vou dar minha opinião: Depois de muito lutar pra tentar ancorar, fazer redimensionamento automático e mais um monte de coisas, tomei uma decisão bem mais difícil porém, com 100% de do objetivo alcançado. Eu fiz uma tela de PDV totalmente configurável, ou seja, eu posso montar a tela, tanto em tamanho, fonte, componentes, modelo de Grid e tudo mais que o cliente quiser, do jeito que ele quiser.

Cara, na boa, eu passei pelo mesmo problema que você está passando. Tentei terceirizar, gerar com outros sistemas mas... fumo! Só me deu dor de cabeça. Depois, peguei os componentes ACBr e em 15 dias fiz o SPED. Acabaram as dores de cabeça. Vai por mim, por mais doloroso que seja, trabalhe umas 12 horas por dia e faça você mesmo, é minha dica.

Comecei um sistema Fiscal (Emissao de NFE, Entrada de NOta por XML e pela Web, TEF, PAF, SPED FISCAL, Sintegra PR, Formação de preço de vendas, comissão de vendedores, Contas a receber, contas a Pagar, integração do PDV com outros sistemas) faz um ano, agora que to conseguindo instalar nos primeiros clientes. A coisa não é tão simples assim. Você precisa de tempo, dedicação, dinheiro e pessoal. Meu sistema é todo orientado a objetos e tem ferramentas de personalização a nível de usuário.

Desculpa Regys. Já achei o problema.

Ops, desculpa, é a função FloatToString.

Galera, estou tendo problemas ao instalar o IBPTax. Ta dizendo que a função IntToString não existe. Onde fica essa funcao?