1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

  2. Anuncie Aqui ! Entre em contato fdantas@4each.com.br

Duvida Gerar etiquetas graficamente

Discussão em 'Progress 4GL' iniciado por brunoowr, Agosto 1, 2016.

  1. lucasiam

    lucasiam Membro Participativo

    magsoa, o problema é que a Datamax não suporta o ZPL.
    Imprimindo pra arquivo com o BarTender (similar ao Zebra Designer, só que pra impressoras Datamax), ele transforma a imagem em um texto cheio de caracteres especiais.
    Estou mandando um exemplo em anexo pra terem uma ideia.

    Arquivos Anexados:

  2. brunoowr

    brunoowr Membro Participativo

    Você deve carregar a imagem para a memória da impressora.
    Segue trecho de código de um programa que tenho, lembrando que o arquivo CARREGA.exe não funciona em windows 64bits.

    Código:
       if avail (imprsor_usuar) then do:
          run pi-acompanhar in h-acomp (input "GERANDO CAMINHAMENTO").
    
          find first ord-prod
               where ord-prod.nr-ord-produ = tt-param.nr-ord-produ no-lock no-error.
    
          assign arquivo     = substring(trim(ord-prod.it-codigo),1,5) + ".bmp"
                 nr-prod     = substring(trim(ord-prod.it-codigo),1,5) + "XXXXXXXXXXXXXXXXXXXX"
                 imagen      = "\\servidor\geracao$\Etiquetas\Produtos\" + arquivo
                 imagen-loc  = "\\servidor\geracao$\Etiquetas\Produtos\semimagem.bmp"
                 carregador  = "\\servidor\geracao$\Etiquetas\CargaImg\CARREGA.exe"
                 bmp-gerado  = "\\servidor\geracao$\Etiquetas\CargaImg\" + substring(nr-prod,1,8) + ".bmp"
                 bmp-gerado  = "\\servidor\geracao$\Etiquetas\CargaImg\smig.bmp".
    
          assign arquivo-apont = "\\servidor\geracao$\Etiquetas\Apontadores\" + trim(tt-param.usuario) + ".bat".
          output to value(arquivo-apont).
    
          if (imprsor_usuar.nom_disposit_so <> "lpt2") then do:
             put unformatted "C:" chr(10) .
             put unformatted "net use lpt2 " + imprsor_usuar.nom_disposit_so                            chr(10).
          end.
    
          if search(carregador) <> ? and search(imagen) <> ? then do:
             put unformatted "C:"                                                                       chr(10).
             put unformatted "net use I: /delete /y"                                                    chr(10).
             put unformatted "net use I: \\servidor\Geracao$\Etiquetas"                                   chr(10).
             put unformatted "I:"                                                                       chr(10).
             put unformatted "cd\Produtos"                                                              chr(10).
             put unformatted "copy " + arquivo + " I:\CargaImg\" + substring(nr-prod,1,8) + ".bmp /y"   chr(10).
             put unformatted "cd\CargaImg"                                                              chr(10).
             put unformatted "carrega lpt2 a " + substring(nr-prod,1,8) + ".bmp"                        chr(10).
    
             if (imprsor_usuar.nom_disposit_so <> "lpt2") then do:
                put unformatted "net use lpt2 /delete /y"                                              chr(10) .
             end.
             put unformatted "net use I: /delete /y".
    
             output close.
    
             run pi-acompanhar in h-acomp  (input "CARREGANDO IMAGEM").
    
             if search(bmp-gerado) <> ? then
                dos silent del value(bmp-gerado).
             dos silent        value(arquivo-apont) . /* imagem etiqueta*/
             /*dos silent del    value(arquivo-apont) .*/
             dos silent del    value(bmp-gerado).
    
             assign img-loc = 1.
          end.

    Arquivos Anexados:

  3. Paulo_agr

    Paulo_agr Membro Participativo

    Rafael,

    Nosso sistema roda no LINUX emulado, e estou precisando emitir um código de barras numa impressora matricial.
    É possível isso pelo vpxprint?
  4. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Mas as máquinas clientes que acessam o servidor em linux também são linux?
  5. Paulo_agr

    Paulo_agr Membro Participativo

    Não, são todas windows...usamos um emulador (powerTerm)
  6. Paulo_agr

    Paulo_agr Membro Participativo

    rafael,
    Precisava de umas aulas de vpxprint, de tudo que dá pra fazer com ele...
    Qual teu telefone ou email????

Compartilhe esta Página