Re: Impresora Tickets

2014-11-11 Por tema Fernando Idem
Buenos días;

Muchas gracias Jesús por tu información, ya le estaba echando un vistazo, y
por supuesto intentando entenderlo.
Me supongo que las ordenes son las de la impresora y luego se traduce en
secuencia de escape.
Por ejemplo si algún campo le pongo negrita [HIGHLIGHT] tendré que poner
DATA = '21'X, que en código escape es ESC ! 8 , o eso creo todavia no lo
he podido probrar.

En cuanto a la apertura de cajón y corte de papel no tengo ningún problema,
me lo hace correctamente con los códigos que envio.

Un saludo





El 10 de noviembre de 2014, 18:01, Jesus Busquets jbusqu...@grespania.com
escribió:

  Hombre, para imprimir en una impresora especial, yo quizás jugaría con un
 objeto de personalización de impresora, que no es mas que definirte a mano
 los códigos de escape que quieres que la impresora reciba como traducción
 de la secuencia de impresión que se le manda a la misma desde el AS/400

 Es hacerte a mano el driver de la impresora, vamos. Pero no es tan
 complicado, si sabes las secuencias de escape que necesita la impresora
 para hacer cada cosa (para eso está el manual, si es que aún se envían
 manuales con las impresoras), y puedes editar sólo las secuencias que vayas
 a utilizar.


 El mandato es RTVWSCST  , creo

 y se obtiene un fuente con esta pinta:

  :WSCST DEVCLASS=TRANSFORM.

  :TRNSFRMTBL.
  :PRTDTASTRM
DATASTREAM=HPPCL5.
  :NOPRTBDR
OPTION=TOP
ORIENT=PORTRAIT
DATA =  144.
  :NOPRTBDR
OPTION=LEFT
ORIENT=PORTRAIT
DATA =  144.
  :NOPRTBDR
OPTION=RIGHT
ORIENT=PORTRAIT
DATA =  144.
  :NOPRTBDR

 etc

:RESETPRT
  DATA ='1B45'X.
:BELL
  DATA ='07'X.
:SPACE
  DATA ='20'X.
:BSP
  DATA ='08'X.
:CARRTN
  DATA ='0D'X.
:FORMFEED
  DATA ='0C'X.
:LINEFEED
  DATA ='0A'X.
:VERRMOV
  DIRECTION=UP
  VAROFFSET=4
  VARLEN=4
  VARTYPE=CHRDEC
  CNVNUM=1


 donde tienes las secuencias de escape para cada propiedad que se envía
 desde la cola de impresora.

 Hace muchos años que no toqué esto, pero recuerdo que podías partir de uno
 ya existente que mas o menos funcione, y modificarlo (por ejemplo, el de
 epson , que parece que te ha ido bien)  .  Luego compilas y te generas tu
 propio objeto de personalización que le asignas a  la cola de impresora.
 Así puede funcionar incluso conectada directamente a la red, sin que tengas
 que utilizar un pc con client access (ya que eres tú , o mas bien el
 iSeries,  el que controla directamente la impresora)

 Por ejemplo, si tienes una secuencia de escape para que se abra el cajón,
 igual puedes asociarlo al tag :BELL y cuando a la impresora le mandas hacer
 sonar la campanita, se abre el cajón (o debería decir, igual se abre)

 Un saludo, y que te diviertas experimentando.


 El 05/11/2014 17:28, Fernando Idem escribió:

  Buenas tardes;

  Por fin he conseguido imprimir tickets en la dichosa impresora. Tengo
 que agrader a Jesus Manuel por su inestimable ayuda.

  En las configuraciones me he encontrado con varias cosas;
 Los informes tienen que ser SCS, la negrita y subrayado no lo pilla o me
 duplica las palabras donde estan puestas.
 Me imagino que para reducir texto tendrá que ser por el CPI (todavía no lo
 he probado)
 Se puede mejorar metiendo códigos de escape. ¿Alguien ha trabajado en este
 concepto para indicarme alguna ayuda?






 
 Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
 Forum.Help400 © Publicaciones Help400, S.L.


 --

 *Jesús Busquets Mataix*

 *Dir. IT*

 GRESPANIA, S.A.

 jbusqu...@grespania.com

 Telf. 964 34 44 11

 www.grespania.com
   https://www.facebook.com/grespaniaceramica
 https://www.youtube.com/channel/UC5PnB8F2fZvMGqZ8au8X7Ig
 http://www.pinterest.com/Grespania/

 Este mensaje se dirige exclusivamente a su destinatario y puede contener
 información privilegiada o confidencial. Si no es Vd. el destinatario
 indicado, queda notificado de que la utilización, divulgación y/o copia sin
 autorización está prohibida en virtud de la legislación vigente. Si ha
 recibido este mensaje por error, le rogamos que nos lo comunique
 inmediatamente por esta misma vía y proceda a su destrucción.


  Para mas información: Grespania, S.A. http://www.grespania.com/

 
 Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
 Forum.Help400 © Publicaciones Help400, S.L.


Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: cpyfrmimpf con comodin

2014-11-11 Por tema Marcelo Diaz
algun cl que revise el directorio y le pase por parametro el nombre del
archivo...  es solo una sugerencia..
Marcelo

El 11 de noviembre de 2014, 10:12, A. N. iniadri1...@gmail.com escribió:

 Buenos días, tengo un pequeño problema, hasta ahora recuperaba todos los
 dias un fichero con el mismo nombre,  de la carpeta \\Servidor\CLiente\  ,
 lo recupero con cpyfrmimpf y todo va ok, ahora va a cambiar la dinamica de
 trabajo, voy a tener que recuperar  varios ficheros, Cxx.txt, donde
 xx son numeros diferentes, estoy intentando con el caracter comodin,
 pero me da error, y por Internet no encuentro nada,  ¿alguna sugerencia o
 documento que pueda leer?.

 Gracias

 
 Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
 Forum.Help400 © Publicaciones Help400, S.L.


Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: cpyfrmimpf con comodin

2014-11-11 Por tema Alex Martínez
Hola

Pues probar con algo similar a esto en un CL

CRTPF QTEMP/TEST RCDLEN(100)
OVRDBF FILE(STDOUT) TOFILE(QTEMP/TEST)
QSH CMD('ls /directorio/*.txt')

y luego leer el archivo QTEMP/TEST

El 11 de noviembre de 2014, 14:12, A. N. iniadri1...@gmail.com escribió:

 Buenos días, tengo un pequeño problema, hasta ahora recuperaba todos los
 dias un fichero con el mismo nombre,  de la carpeta \\Servidor\CLiente\  ,
 lo recupero con cpyfrmimpf y todo va ok, ahora va a cambiar la dinamica de
 trabajo, voy a tener que recuperar  varios ficheros, Cxx.txt, donde
 xx son numeros diferentes, estoy intentando con el caracter comodin,
 pero me da error, y por Internet no encuentro nada,  ¿alguna sugerencia o
 documento que pueda leer?.

 Gracias

 
 Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
 Forum.Help400 © Publicaciones Help400, S.L.


Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: Impresora Tickets

2014-11-11 Por tema Jesus Busquets

  
  
Se trata de que definas para cada una de las rdenes que puede
enviar el archivo de impresin a la impresora, exactamente el cdigo
hexadecimal ascii que hace que la impresora lo ejecute, tanto
caracteres especiales (el caracter que se utilice como escape en ese
modelo de impresora) como el resto de caracteres que indican la
orden tambin en hexadecimal. 
Por ejemplo, en una impresora Kyocera, que la secuencia de escape no
es un caracter especial ascii, sino el texto ascii  !R! , debo
incluir en el DATA al menos 215221 al principio (los caracteres
ascii de '!' 'R' y '!' y luego el resto de texto, en hexa.

Ej: Seleccionar un cajn
 :DWRSLT 
 DRAWER=DRAWER1 
 /* '!R! CASS 1;EXIT; */ 
 DATA =''X. 

En el caso en que sea, por ejemplo, una impresora de etiquetas de
Zebra, los cdigos empezarn por el ascii correspondiente a '^' ,
en el caso de una impresora HP empezaran por '1B' que es el
caracter de escape que utiliza este protocolo, etc.



El 11/11/2014 10:57, Fernando Idem escribi:

  
Buenos
  das;


Muchas
  gracias Jess por tu informacin, ya le estaba echando un
  vistazo, y por supuesto intentando entenderlo.
Me
  supongo que las ordenes son las de la impresora y luego se
  traduce en secuencia de escape.
Por
  ejemplo si algn campo le pongo negrita [HIGHLIGHT] tendr que
  poner DATA = ''X,que
  en cdigo escape es "ESC ! 8" , o eso creo todavia no lo he
  podido probrar.


En
  cuanto a la apertura de cajn y corte de papel no tengo ningn
  problema, me lo hace correctamente con los cdigos que envio.


Un
  saludo



  


-- 
  
  
  
  Jess Busquets
  Mataix
  Dir. IT
  GRESPANIA,
  S.A.
  
jbusqu...@grespania.com
  Telf.
  964 34 44 11
  www.grespania.com

  

  
  
  
  

  
  Este
  mensaje se dirige exclusivamente a su destinatario y puede
  contener
  informacin privilegiada o confidencial. Si no es Vd. el
  destinatario indicado, queda notificado de que la
  utilizacin,
  divulgacin y/o copia sin autorizacin est
  prohibida en virtud de la legislacin vigente. Si ha
  recibido
  este mensaje por error, le rogamos que nos lo comunique
  inmediatamente por esta misma va y proceda a su
  destruccin.
  
  
  Para
mas informacin: Grespania,
  S.A.

  


Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Re: cpyfrmimpf con comodin

2014-11-11 Por tema Marti Riera
Buenissimo !

Deberias colgarlo en Recursos/400:
https://www.ibm.com/developerworks/community/groups/service/html/communityview?communityUuid=81e67f1a-3698-4109-b043-06fd5bbb8acb


Saludos

Martí Riera

2014-11-11 14:34 GMT+01:00 Alex Martínez ajut...@gmail.com:

 Hola

 Pues probar con algo similar a esto en un CL

 CRTPF QTEMP/TEST RCDLEN(100)
 OVRDBF FILE(STDOUT) TOFILE(QTEMP/TEST)
 QSH CMD('ls /directorio/*.txt')

 y luego leer el archivo QTEMP/TEST

 El 11 de noviembre de 2014, 14:12, A. N. iniadri1...@gmail.com escribió:

 Buenos días, tengo un pequeño problema, hasta ahora recuperaba todos los
 dias un fichero con el mismo nombre,  de la carpeta \\Servidor\CLiente\  ,
 lo recupero con cpyfrmimpf y todo va ok, ahora va a cambiar la dinamica de
 trabajo, voy a tener que recuperar  varios ficheros, Cxx.txt, donde
 xx son numeros diferentes, estoy intentando con el caracter comodin,
 pero me da error, y por Internet no encuentro nada,  ¿alguna sugerencia o
 documento que pueda leer?.

 Gracias

 
 Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
 Forum.Help400 © Publicaciones Help400, S.L.



 
 Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
 Forum.Help400 © Publicaciones Help400, S.L.


Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.