imprimir pedido na elgin I-9

[dbdc5554]

Boa tarde

uso imprimir pedido em BOBINA

se for a bematec mp_4200 tenho um procedimento difereciado

como fazer na Elgin I-9 ?

com a opcao NORMAL para bobinas imprime + não condença
com a opcao B reduziu un 30% teria que reduzir ++++

sera se fizer @ prow()+1, 00 say mp_4200_INICIO + [ ]+ mp_4200_CONDENSA + [ ]+ mp_4200_CONDENSA
resolveria ?

Paiva

PRIVATE mp_4200_INICIO :=chr(29) + chr(249) + chr(32) + chr(0) + chr(27) + chr(116) + chr(8)
PRIVATE mp_4200_CONDENSA:=chr(15)

if tinte_15 = && Pedido em Bobina Mp_4200
*msgstop("apos feject 003")
@ prow()+1, 00 say mp_4200_INICIO + [ ]+ mp_4200_CONDENSA
else
@ prow()+1, 00 say chr(27)+chr(77)+[ ]+prt_15
endif

[Kapiaba]

Paiva, veja se ajuda:

Código: Selecionar todos

   DO CASE
   CASE OPCAOIMP = 1
      @ nLinha,01 SAY "A - M o d o  Condensado   com  6 Linhas Por Polegada"+CHR(15)                         OF oPrn
      nLinha := nLinha + 1
      @ nLinha, 00 SAY "."                                                                                   OF oPrn
      nLinha := nLinha + 1
   CASE OPCAOIMP = 2
      @ nLinha,01 SAY "B - M o d o  Carta  com    6   Linhas  Por  Polegada"+CHR(27)+"G"                     OF oPrn
      nLinha := nLinha + 1
      @ nLinha, 00 SAY "."                                                                                   OF oPrn
      nLinha := nLinha + 1
   CASE OPCAOIMP = 3
      @ nLinha,01 SAY "C - Modo Carta Condensado  com 6 Linhas por Polegada"+CHR(27)+"G"+CHR(15)             OF oPrn
      nLinha := nLinha + 1
      @ nLinha, 00 SAY "."                                                                                   OF oPrn
      nLinha := nLinha + 1
   CASE OPCAOIMP = 4
      @ nLinha,01 SAY "D - M o d o  Normal  com   8   Linhas  por  Polegada"+CHR(27)+"0"                     OF oPrn
      nLinha := nLinha + 1
      @ nLinha, 00 SAY "."                                                                                   OF oPrn
      nLinha := nLinha + 1
   CASE OPCAOIMP = 5
      @ nLinha,01 SAY "E - M o d o  Condensado   com  8 Linhas por Polegada"+CHR(15)+CHR(27)+"0"             OF oPrn
      nLinha := nLinha + 1
      @ nLinha, 00 SAY "."                                                                                   OF oPrn
      nLinha := nLinha + 1
   CASE OPCAOIMP = 6
      @ nLinha,01 SAY "F - M o d o  Carta  com    8  Linhas   por  Polegada"+CHR(27)+"G"+CHR(27)+"0"         OF oPrn
      nLinha := nLinha + 1
      @ nLinha, 00 SAY "."                                                                                   OF oPrn
      nLinha := nLinha + 1
   CASE OPCAOIMP = 7
      @ nLinha,01 SAY "G - Modo Carta Condensado  com 8 Linhas por Polegada"+CHR(15)+CHR(27)+"G"+CHR(27)     OF oPrn
      nLinha := nLinha + 1
      @ nLinha, 00 SAY "."                                                                                   OF oPrn
      nLinha := nLinha + 1
   CASE OPCAOIMP = 8
      @ nLinha,01 SAY "H - M o d o   Condensado   c o m   dupla   Impressao"+CHR(15)+CHR(27)+"E"             OF oPrn
      nLinha := nLinha + 1
      @ nLinha, 00 SAY "."                                                                                   OF oPrn
      nLinha := nLinha + 1
   CASE OPCAOIMP = 9
      @ nLinha,01 SAY "I - M o d o  N o r m a l  c o m  d u p l a Impressao"+CHR(27)+"E"                     OF oPrn
      nLinha := nLinha + 1
      @ nLinha, 00 SAY "."                                                                                   OF oPrn
      nLinha := nLinha + 1
   CASE OPCAOIMP = 10
      @ nLinha,01 SAY "J - V o l t a  ao  Normal  com 6 Linhas por Polegada"+CHR(18)+CHR(27)+"2"+CHR(27)+"H" OF oPrn
      nLinha := nLinha + 1
      @ nLinha, 00 SAY "."                                                                                   OF oPrn
      nLinha := nLinha + 1
   ENDCASE

abs

[Kapiaba]

Também:

Código: Selecionar todos

   chr(12) = 12 o FF. salto de pagina.         estandar
   chr(14) = letra ancho  60 cpl               estandar
   chr(18) = modo normal  80 cpl               estandar
   chr(15) = modo condensado 140 cpl           hibrido
   chr(16) = modo condensado 120 cpl           extendido
   chr(17) = modo semi condensado 96 cpl       extendido
   chr(19) = negrito                           extendido
   chr(20) = modo super condensado 160 cpl     extendido

abs