Jump to content

wrgoncalves2008

Membros
  • Posts

    109
  • Joined

  • Last visited

Contact Methods

  • Website URL
    http://www.wsac.com.br/

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

wrgoncalves2008's Achievements

Enthusiast

Enthusiast (6/14)

  • First Post
  • Collaborator Rare
  • Conversation Starter
  • Week One Done
  • One Month Later

Recent Badges

0

Reputation

  1. Obrigado pelas respostas! Estamos migrando aos poucos, na medida do possível. ?
  2. Boa Tarde! O ACBr ainda está compatível com o Delphi 7? Se não, poderiam me informar até que data eles estava compatível para eu tentar baixar e instalar aqui. Obrigado.
  3. Boa Tarde! Estou testando esse comando com uma impressora Sweda SI-300s mas não corta o papel. Já tentei o [Chr(27)+'v'+Chr(150)] tentei [Chr(27)+'v'+Chr(109)] e também não foi. Teria mais alguma coisa para fazer? Obrigado
  4. Bom Dia! Verifiquei aqui os ajustes realizados, ainda estou sem a impressora, mas pelos arquivos txt vi que está gerando os comando na sequencia correta. Obrigado pela atenção e alterações realizadas!
  5. Isso sim Daniel, eu já fiz isso e verifiquei que ficou como deveria ser, o que estou pensando é nos comandos de Iniciar e Finalizar que estão sendo enviados sem necessidade quando mando imprimir, no arquivo de texto sempre vai dar certo. Como disse anteriormente aqui pra mim deu erro da outra vez, então quero ver esse ajustes funcionando na impressora, apenas quero garantir que vai continuar funcionando e evitar mandar o sistema com erro para um cliente, acredito que é uma preocupação que qualquer programador teria nessa situação
  6. Daniel, verifiquei aqui as alterações, confesso que não concordei totalmente com a forma que ficou, pois se eu utilizo o IniciarEtiqueta e o FinalizarEtiqueta, quando eu mando imprimir os mesmo são chamados novamente passando os comandos para a impressora, que é onde eu estava tendo problemas, infelizmente estou sem a impressora aqui nesse momento pra testar pra ver se resolveu, assim que pegar a impressora novamente vou testar pra ver,de momento vou manter as minhas alterações. Sobre a minha alteração poderia me explicar, por favor, em qual ponto ela "iria quebrar o código de quem não usa os métodos: "IniciarEtiqueta" e "FinalizarEtiqueta"", pois eu havia testado aqui utilizando o Iniciar/FinalizarEtiqueta e sem utilizar eles e funcionou, pode ser que eu tenha esquecido de alguma situação... . Desde já agradeço a atenção!
  7. Coloquei o sistema para salvar os comando em txt, acho que mais fácil para explicar. Estou simulando a impressão de etiquetas em duas colunas, dei uma reduzida na qtde de etiquetas pra simplicar, no caso aqui eu inicio a etiqueta passo dois produtos e finalizo, depois inicio passo mais dois produtos e finalizo, e assim sucessivamente, Antes da alteração no componente o sistema montava os comandos assim: D10 N R0,0 ZB A4,120,0,2,1,1,N,"0000000000017" A4,136,0,3,1,1,N,"SPRAY PROPOLIS 01" A480,120,0,2,1,1,N,"0000000000024" A480,136,0,3,1,1,N,"KAIX GUARD PAPEL 20X21,5 CM FLOR PINK C/25" P1 D10 N R0,0 ZB A4,120,0,2,1,1,N,"0000000000031" A4,136,0,3,1,1,N,"ACHOC. LIQ. CHOCOMIL 200ML UN." A480,120,0,2,1,1,N,"0000000000048" A480,136,0,3,1,1,N,"KAIX GUARD PAPEL 20X21,5 CM FLOR LILAS C/25" P1 Após a atualização do componente os comandos estão ficando assim: D10 N R0,0 ZB D10 N R0,0 ZB D10 N R0,0 ZB A4,120,0,2,1,1,N,"0000000000017" A4,136,0,3,1,1,N,"SPRAY PROPOLIS 01" A480,120,0,2,1,1,N,"0000000000024" A480,136,0,3,1,1,N,"KAIX GUARD PAPEL 20X21,5 CM FLOR PINK C/25" P1 A4,120,0,2,1,1,N,"0000000000031" A4,136,0,3,1,1,N,"ACHOC. LIQ. CHOCOMIL 200ML UN." A480,120,0,2,1,1,N,"0000000000048" A480,136,0,3,1,1,N,"KAIX GUARD PAPEL 20X21,5 CM FLOR LILAS C/25" P1 P1 E gerando dessa forma, pelo menos aqui pra mim, está dando problema na impressão, usando esse exemplo aqui sairia impresso +- 8 etiquetas, as vezes dobra, as vezes sai menos, mas de qualquer forma está saindo sempre a mais do que o necessário, acho que pode ser os P1 que fica no final. Com a minha sugestão, vai ficar assim quando utilizar o InciaEtiqueta e o FinalizaEtiqueta: D10 N R0,0 ZB A4,120,0,2,1,1,N,"0000000000017" A4,136,0,3,1,1,N,"SPRAY PROPOLIS 01" A480,120,0,2,1,1,N,"0000000000024" A480,136,0,3,1,1,N,"KAIX GUARD PAPEL 20X21,5 CM FLOR PINK C/25" P1 D10 N R0,0 ZB A4,120,0,2,1,1,N,"0000000000031" A4,136,0,3,1,1,N,"ACHOC. LIQ. CHOCOMIL 200ML UN." A480,120,0,2,1,1,N,"0000000000048" A480,136,0,3,1,1,N,"KAIX GUARD PAPEL 20X21,5 CM FLOR LILAS C/25" P1 *Vai ficar igual ao primeiro caso onde estava funcionando normalmente. Se não utiliza o IniciarEtiqueta e FinalizarEtiqueta a impressão fica normal. Com a minha sugestão vai ser possível, manter tudo funcionando, para quem usa o Iniciar/FinalizarEtiqueta e pra quem não usa. Espero ter conseguido exemplificar o problema.
  8. Alguém? Alguma posição sobre a alteração??
  9. A solução sugerida pelo DonizeteFalcon, não funcionou aqui, na realidade causou um problema no que estava funcionando perfeitamente, pelo menos aqui pra mim... Estou utilizando um zebra GC420t Eu mando imprimir utilizando o iniciarEtiqueta e o finalizarEtiqueta, porém faço da seguinte forma: While .... do begin IniciarEtiqueta; envio uma certa qtde de etiquetas ( 50 por exemplo); ... FinalizarEtiqueta end; Imprimir; Com a solução sugerida e implementada no componente, quando mando imprimir está duplicando a qtde de etiquetas impressas, se mando 2 está sendo impresso 4. Gostaria de sugerir uma alteração, que pelo menos nos meus testes não daria problema pra quem usa ou nao o IniciarEtiqueta e o FinalizarEtiqueta 1 - Na procedure IniciarEtiqueta remover a linha fpEtqFinalizada := False; 2 - No FinalizarEtiqueta remover a linha: fpEtqInicializada := False; 3 - Na procedure Imprimir adicionar as linhas: fpEtqFinalizada := False; fpEtqInicializada := False; Gostaria que avaliassem a sugestão e a possibilidade de implementação. Obrigado.
  10. EMBarbosa, o problema está na alteração realizada na revisão 7720 onde foram adicionadas as rotinas IniciaVendeItem e FinalizaVendeItem. O problema ocorre apenas na FinalizaVendeItem, e a sua sugestão resolve o problema!!!! Entendo o posicionamento seu e o do Daniel sobre o uso do componente, porém é uma coisa que sempre funcionou e nunca tivemos problemas com mesmo, ainda tenho um ou outro cliente que tem uma ECF matricial já no fim da vida, e por isso não posso simplesmente remover o componente do sistema, e acredito que deva ter mais alguém por aí que utilize utilize o ACBr e possa vir a passar pelo mesmo problema após efetuar a atualização do componente. Já que temos o componente e ele é funcional, apenas gostaríamos que o mesmo continuasse assim, até que possamos remover ele de nossos sistemas. Se for possível adicionar a alteração ao projeto seria de grande valia para nós. Desde já agradeço a atenção.
  11. Daniel, eu também utilizo ACBrRFD faz muito tempo, ele sempre funcionou perfeitamente independente da impressora, até essa ultima alteração. Sei que no caso das impressoras térmicas não haveria a necessidade dele, vou ver a possibilidade de remover ele do sistema . Agora sobre o erro que está ocorrendo infelizmente foi devido as ultimas alterações que foram realizadas no componente, nos testes que fiz apenas como uma linha na rotina VendeItem é possível resolver todo o problema. Adicionar a linha abaixo antes do comando FinalizaVendeItem() resolvi o problema. AliquotaECF := AliquotaICMS; Seria possivel adicionar essa linha a procedure VendeItem?? Desde já agradeço.
  12. Olá pessoal, Bom Dia! Estou com o mesmo problema no meu sistema, algumas vezes ele trava sem nenhuma explicação ou simplesmente fecha. No meu computador tem o gbplugin, mas já testei nos em outros micros que não tem nada relacionado a banco ou o gbplugin, e o sistema simplesmente fecha do nada. Estou tentando achar alguma coisa mas não consegui nada até o momento, estou depurando o sistema mas não consigui identificar. Aqui executando pelo delphi me dá uma acess violation, porém quando vou pelo F7/F8 não acontece o erro, lembrando que isso não é constante, algumas vezes da erro outras não. Alguém tem alguma idéia do que possa ser ou que possa me ajudar a identificar?
  13. Bom Dia! Então EMBarbosa, realmente é possível instalar o SQLCLientDataSet no Delphi 7 eu até instalei, mas quando tentamos rodar o sistema no D7 começou a aparecer erros, não me recorde de momento o que era pois já faz algum tempo que fizemos esse teste, assim que me sobrar um tempo vou tentar novamente e post aqui os problemas que tivemos. Tirando esses problemas, tem outra coisa também quem utilizou esse componente não tinha conhecimento suficiente para configura-lo (ProviderFlags, UpdateMode,...) e o componente começou a não funcionar corretamente, ai tiveram a brilhante ideia de ficar colocando SQLquery no sistema pra rodar updates e inserts, isso em diversos pontos do sistema. Se fosse somente trocar o componente e colocar um trio (SQLQuery+DataSetProvider+ClientDataSet) não seria tão dificil, mas também temos que revirar o sistema pra achar todas essas querys, o que vai levar um tempo considerável, coisa que não temos hoje. E a história é essa, Já inciamos uma nova versão no XE2, para melhorar os recursos do sistema e corrigir problemas como o acima, mas ainda não finalizamos essa versão, e enquanto isso estamos no D6... ... Dos links que você passou somente o ultimo eu ainda não havia visto, vou dar uma olhada quem sabe me dá uma luz...rs Felizmente o problema foi resolvido e agora nosso sistema está rodando perfeitamente!! Obrigado a todos pela colaboração e empenho para encontramos a solução do problema!!!!!!!!
  14. Bom Dia pessoal EMBarbosa, o principal problema seria componentes, um desses componentes que tenho problema é o SQLCLientDataSet, ele é nativo no Delphi 6, porém já no Delphi 7 ele nem vem mais instalado, já tentamos instalar ele mas ai começa a aparecer erros no sistema. Se não fosse por esse componente a gente já teria saído do Delphi 6 faz tempo, mas ele foi utilizado em grande quantidade no sistema, e devido a falta de conhecimento de quem estava utilizando ele, fizeram várias "gambiarras" para corrigir alguns problemas que apresentava no sistema. Agora pra gente remover esses componentes vá levar um tempo considerável e teremos que retestar praticamente o sistema todo. Por isso não fizemos a migração ainda, e agora estamos aqui com esse probleminha...rs Agora EMBarbosa / Daniel / Anizair / Juliomar, sobre o nosso problema para gente tentar finalizar esse post , vamos colocar algo no ACBr oficial para resolvermos o problema ou teremos que manter o fonte separado aqui para trocarmos quando fizermos a atualização? Como citei anteriormente a última opção funciona, porém pode gerar erros, lógicamente que para nós que ainda estamos no delphi 6, e digo isso por experiência própria... ...
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.