Hola,
Yo tengo una conectada a un pc con client acces, configurada de la siguiente
manera:
Descripción de dispositivo . . . . : DEVD PRT14
Opción . . . . . . . . . . . . . . : OPTION *ALL
Categoría de dispositivo . . . . . : *PRT
Clase de dispositivo . . . . . . . : DEVCLS *VRT
Tipo de dispositivo . . . . . . . : TYPE 3812
Modelo de dispositivo . . . . . . : MODEL 1
Funciones avanzadas impresión . . : AFP *NO
En línea en IPL . . . . . . . . . : ONLINE *NO
Controlador conectado . . . . . . : CTL QVIRCD0001
Font . . . . . . . . . . . . . . . : FONT
Identificador . . . . . . . . . : 011
Cuerpo . . . . . . . . . . . . . : *NONE
Cajón separador . . . . . . . . . : SEPDRAWER *FILE
Programa separador . . . . . . . . : SEPPGM *NONE
Biblioteca . . . . . . . . . . . :
Mensaje de error impresora . . . . : PRTERRMSG *INFO
Cola de mensajes . . . . . . . . . : MSGQ QSYSOPR
Biblioteca . . . . . . . . . . . : *LIBL
Transf impresión sist princ . . . : TRANSFORM *YES
Fabricante, tipo y modelo . . . . : MFRTYPMDL *IBM4212
Cargador de papel 1 . . . . . . . : PPRSRC1 *CONT80
Cargador de papel 2 . . . . . . . : PPRSRC2 *NONE
Cargador de sobres . . . . . . . . : ENVELOPE *NONE
Soporte pág códigos ASCII 899 . . : ASCII899 *NO
Configuración de imagen . . . . . : IMGCFG *NONE
Identificador de caracteres . . . : CHRID *SYSVAL
Objeto personaliz. est. trab. . . : WSCST *NONE
Objeto definido por usuario . . . : USRDFNOBJ *NONE
Tipo de objeto . . . . . . . . . : *NONE
Programa transformación datos . . : USRDTATFM *NONE
Progr. control. def. usuario . . . : USRDRVPGM *NONE
Nombre ubicación dependiente . . . : DEPLOCNAME *NONE
Asignado a:
Nombre de trabajo . . . . . . . . : *NONE
Usuario . . . . . . . . . . . . :
Número . . . . . . . . . . . . . :
Texto . . . . . . . . . . . . . . : TEXT Zebra
Opciones definidas por usuario . . : USRDFNOPT
Te adjunto tambien la etiqueta que yo imprimo, espero que te sirva.
Saludos.
----- Original Message -----
From: "Establiments Vidal" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Wednesday, September 07, 2005 12:58 PM
Subject: RE: programacion impresora zebra tlp2844
Gracias , ya lo he configurado de esta manera , pero no me funciona ,
alguien tiene un ejemplo de impresion en EPL2 ,
He instalado la impresora en un PC Windows con los drivers
correspondientes
, y con un programa de impression especifico que viene con el CD de
instalacion imprime correctamente pero he intentado imprimir con los
comandos EPL2 en un fichero de texto siguiendo las instrucciones del
manual
y tampoco lo consigo.
Agradeceria si alguien tuviera un ejemplo en EPL2 para AS400 o para PC.
Gracias.
Saludos.
-----Mensaje original-----
De: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] nombre de Chema Bueno
Enviado el: martes 6 de septiembre de 2005 19:40
Para: [email protected]
Asunto: RE: programacion impresora zebra tlp2844
Exactamente, pero recuerda que el mandato de creación es CRTWSCST
-----Mensaje original-----
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
En nombre de Establiments Vidal
Enviado el: martes, 06 de septiembre de 2005 17:05
Para: [email protected]
Asunto: RE: programacion impresora zebra tlp2844
Perdona mi ignorancia ,¿ el objeto personalizado pzebra ? , creo un
fichero
fisico con todas esas instrucciones que detallas y lo situo en una
biblioteca ?
Gracias.
-----Mensaje original-----
De: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] nombre de Chema Bueno Enviado
el:
martes 6 de septiembre de 2005 15:21
Para: [email protected]
Asunto: RE: programacion impresora zebra tlp2844
Yo la crearía como impresora remota:
Cola: PRZAI10 Biblioteca: QUSRSYS
Estado:
Transcriptor activo . . . . . . . . : Y
Nombre(s) de transcriptor si activo : PRZAI10
Cola de salida retenida . . . . . . : N
Tamaño máximo de archivo en spool:
Número de páginas . . . . . . . . . : *NONE
Hora de inicio . . . . . . . . . . . :
Hora de finalización . . . . . . . . :
Transcriptores de arranque automático : 1
Visualizar cualquier archivo . . . . . : *NO
Separadores de trabajos . . . . . . . : 0
Controlado por operador . . . . . . . : *YES
Orden de archivos en cola . . . . . . : *FIFO
Cola de datos . . . . . . . . . . . . : *NONE
Biblioteca . . . . . . . . . . . . . :
Autorización a comprobar . . . . . . . : *OWNER
Sistema remoto . . . . . . . . . . . . : *INTNETADR
Cola de impresora remota . . . . . . . : L1
Cola para mensajes de transcriptor . . : QSYSOPR
Biblioteca . . . . . . . . . . . . . : *LIBL
Tipo de conexión . . . . . . . . . . . : *IP
Dirección Internet . . . . . . . . . . : 192.168.61.150
Tipo de destino . . . . . . . . . . . : *OTHER
Clase VM/MVS . . . . . . . . . . . . . :
FCB . . . . . . . . . . . . . . . . . :
Transformación de impresión de sistema
principal . . . . . . . . . . . . . : *YES
Transformación de datos de usuario . . :
Biblioteca . . . . . . . . . . . . . :
Tipo y modelo de fabricante . . . . . : *WSCST
Objeto de personalización de estación
de trabajo . . . . . . . . . . . . . : PZEBRA
Biblioteca . . . . . . . . . . . . . : *LIBL
Configuración de imagen . . . . . . . : *NONE
Opciones de destino . . . . . . . . . : *NONE
El objeto personalizado PZEBRA es para conseguir que envíe los controles
correctos, el fuente es:
WSCST DEVCLASS=TRANSFORM.
:TRNSFRMTBL.
:SPACE
DATA ='20'X.
:CARRTN
DATA ='0D'X.
:FORMFEED
DATA ='0A'X.
:LINEFEED
DATA ='0A'X.
EWSCST.
Luego al spool le mandas un texto plano con los comandos EPL2.
^XA
^MCY
^XZ
^XA
^FWN^CFD,24^PW815^LH0,0
^CI10^PR2^MNY^MMT^MD0^PON^PMN^LRN
....
y ya está. Debería funcionarte
-----Mensaje original-----
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
En nombre de Establiments Vidal
Enviado el: martes, 06 de septiembre de 2005 13:57
Para: [email protected]
Asunto: programacion impresora zebra tlp2844
Hola a todos:
Tengo un problema , quiero programar etiquetas con una impresora zebra
TLP2844 , que funciona con el lenguaje EPL2 .
He configurado la impresora en el AS400 directamente desde una pantalla
tonta , como si de 4214 se tratara , he canviado a TRANSFORM *YES i le he
puesto una IBM 3812 , apara que no de mensaje de paginas truncadas.
He creado un PRTF
A R ETIQ01
A QD1 30A ....
A SKIPB(001)
A SPACEA(001)
i un RPG IV
FPRUEBASPR O E PRINTER OFLIND(*IN10)
DCRLF S 2A
EVAL CRLF = X'0D' + X'25'
EVAL QD1 = CRLF
WRITE ETIQ01
EVAL QD1 = 'N' + CRLF
WRITE ETIQ01
EVAL QD1 = 'A20,0,0,1,1,1,N,"ETIQUETA"' + CRLF
WRITE ETIQ01
EVAL QD1 = 'P1' + CRLF
WRITE ETIQ01
EVAL *INLR = *ON
Y no imprime , aparece en el spool pero cuando va a imprimir dice que esta
imprimiendo y el listado desaparece.
X'0D' y X'25' son CR y LF en EBCDIC , el resto son comando EPL2
¿ alguien ve que estamos haciendo mal ? , gracias de antemano Saludos.
__________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400
__________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400
__________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400
__________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400
__________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://coyote.combios.es/mailman/listinfo/forum.help400
5769PW1 V4R2M0 980228 LISTADO FUENTE SEU
08/09/05 10:
ARCHIVO FUENTE . . . . . LEMMASRC/QPRTSRC
MIEMBRO . . . . . . . . . L04020317
NUMSEC*...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7
...+... 8 ...+... 9 .
1
A*%%***********************************************************************
2 A*%%TS RD 20050811 125919 TEAM00 REL-V4R2M0 5769-PW1
3 A*%%FI+10660100000000000000000000000000000000000000000000000000
4 A*%%FI 0000000000000000000000000000000000000000000000000
5
A*%%***********************************************************************
6 A R CABE
7
A*%%***********************************************************************
8 A*%%RI 00000
9
A*%%***********************************************************************
10 A SKIPB(001)
11 A 1
12 A 'N'
13 A SPACEB(001)
14 A 1
15 A 'OD'
16 A SPACEB(001)
17 A 1
18 A 'q816'
19 A SPACEB(001)
20 A 1
21 A 'Q?'
22 A SPACEB(001)
23 A 1
24 A 'S3'
25 A SPACEB(001)
26 A 1
27 A 'D8'
28 A SPACEB(001)
29 A 1
30 A 'ZT'
31 A SPACEB(001)
32 A 1
33 A 'B800,25,1,1,4,4,256,B,'
34 A SPACEB(001)
35 A 23
36 A '"'
37 A CBRCBR 25A O 24
38 A 49
39 A '"'
40 A 1
41 A 'A676,925,1,2,2,2,R,'
42 A SPACEB(001)
43 A 20
44 A '"'
45 A 21
46 A '902 400 909'
47 A 32
48 A '"'
49 A 1
50 A 'A600,975,1,4,1,1,N,'
51 A SPACEB(001)
52 A +0
53 A '"'
5769PW1 V4R2M0 980228 LISTADO FUENTE SEU
08/09/05 10:
ARCHIVO FUENTE . . . . . LEMMASRC/QPRTSRC
MIEMBRO . . . . . . . . . L04020317
NUMSEC*...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7
...+... 8 ...+... 9 .
54 A +0
55 A 'Referencia:'
56 A +0
57 A '"'
58 A 1
59 A 'A550,975,1,4,1,1,N,'
60 A SPACEB(001)
61 A +0
62 A '"'
63 A NUMENVC R O +0
64 A REFFLD(DENVCAC/NUMENVC
TEAM/CENVCA)
65 A +0
66 A '"'
67 A 1
68 A 'A500,25,1,4,4,3,R,'
69 A SPACEB(001)
70 A 19
71 A '"'
72 A DESAGEX 24A O +0
73 A +0
74 A '"'
75 A 1
76 A 'A390,25,1,3,1,1,N,'
77 A SPACEB(001)
78 A +0
79 A '"'
80 A +0
81 A 'Fecha:'
82 A +0
83 A '"'
84 A 1
85 A 'A390,125,1,4,1,1,N,'
86 A SPACEB(001)
87 A +0
88 A '"'
89 A +0
90 A DATE(*SYS)
91 A EDTCDE(Y)
92 A +0
93 A '"'
94 A 1
95 A 'A390,300,1,3,1,1,N,'
96 A SPACEB(001)
97 A +0
98 A '"'
99 A +0
100 A 'Remitente:'
101 A +0
102 A '"'
103 A 1
104 A 'A390,820,1,4,1,1,N,'
105 A SPACEB(001)
106 A +0
5769PW1 V4R2M0 980228 LISTADO FUENTE SEU
08/09/05 10:
ARCHIVO FUENTE . . . . . LEMMASRC/QPRTSRC
MIEMBRO . . . . . . . . . L04020317
NUMSEC*...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7
...+... 8 ...+... 9 .
107 A '"'
108 A +0
109 A 'P.PAGADOS'
110 A +0
111 A '"'
112 A 1
113 A 'A350,25,1,3,1,1,N,'
114 A SPACEB(001)
115 A +0
116 A '"'
117 A +0
118 A 'Bultos:'
119 A +0
120 A '"'
121 A 1
122 A 'A350,125,1,4,1,1,N,'
123 A SPACEB(001)
124 A +0
125 A '"'
126 A BULENVC R O +0
127 A REFFLD(DENVCAC/BULENVC
TEAM/CENVCA)
128 A +0
129 A '"'
130 A 1
131 A 'A350,300,1,4,1,1,N,'
132 A SPACEB(001)
133 A +0
134 A '"'
135 A +0
136 A 'Team Fulfilment y
Distribucion'
137 A +0
138 A '"'
139 A 1
140 A 'A350,820,1,3,1,1,N,'
141 A SPACEB(001)
142 A +0
143 A '"'
144 A +0
145 A 'Reembolso'
146 A +0
147 A '"'
148 A 1
149 A 'A310,25,1,3,1,1,N,'
150 A SPACEB(001)
151 A +0
152 A '"'
153 A +0
154 A 'Kilos:'
155 A +0
156 A '"'
157 A 1
158 A 'A310,125,1,4,1,1,N,'
159 A SPACEB(001)
5769PW1 V4R2M0 980228 LISTADO FUENTE SEU
08/09/05 10:
ARCHIVO FUENTE . . . . . LEMMASRC/QPRTSRC
MIEMBRO . . . . . . . . . L04020317
NUMSEC*...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7
...+... 8 ...+... 9 .
160 A +0
161 A '"'
162 A PESENVX 5S 3O +0
163 A EDTCDE(1)
164 A +0
165 A '"'
166 A 1
167 A 'A310,300,1,4,1,1,N,'
168 A SPACEB(001)
169 A +0
170 A '"'
171 A +0
172 A 'Coslada'
173 A +0
174 A '"'
175 A 1
176 A 'A310,820,1,4,1,1,N,'
177 A SPACEB(001)
178 A +0
179 A '"'
180 A TOTALX1 R O +0
181 A REFFLD(DENVCAC/TOTALC
TEAM/CENVCA)
182 A +0
183 A '"'
184 A 1
185 A 'A270,820,1,3,1,1,N,'
186 A SPACEB(001)
187 A +0
188 A '"'
189 A +0
190 A 'Total Cobrar'
191 A +0
192 A '"'
193 A 1
194 A 'A230,820,1,4,1,1,R,'
195 A SPACEB(001)
196 A +0
197 A '"'
198 A TOTALX2 R O +0
199 A REFFLD(DENVCAC/TOTALC
TEAM/CENVCA)
200 A +0
201 A '"'
202 A 1
203 A 'A230,60,1,2,2,2,N,'
204 A SPACEB(001)
205 A +0
206 A '"'
207 A +0
208 A 'SERVICIO'
209 A +0
210 A '"'
211 A 1
212 A 'A180,100,1,4,4,3,R,'
5769PW1 V4R2M0 980228 LISTADO FUENTE SEU
08/09/05 10:
ARCHIVO FUENTE . . . . . LEMMASRC/QPRTSRC
MIEMBRO . . . . . . . . . L04020317
NUMSEC*...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7
...+... 8 ...+... 9 .
213 A SPACEB(001)
214 A +0
215 A '"'
216 A +0
217 A '24'
218 A +0
219 A '"'
220 A 1
221 A 'A270,300,1,3,1,1,N,'
222 A SPACEB(001)
223 A +0
224 A '"'
225 A +0
226 A 'Destinatario:'
227 A +0
228 A '"'
229 A 1
230 A 'B225,0990,1,1,3,3,150,B,'
231 A SPACEB(001)
232 A 25
233 A '"'
234 A CODAGEC R O +0
235 A REFFLD(DTDEAGC/CODAGEC
TEAM/CTDEAG)
236 A 32
237 A '"'
238 A 1
239 A 'A230,300,1,4,1,1,N,'
240 A SPACEB(001)
241 A +0
242 A '"'
243 A NOMDESX 30A O +0
244 A +0
245 A '"'
246 A 1
247 A 'A190,300,1,3,1,1,N,'
248 A SPACEB(001)
249 A +0
250 A '"'
251 A DIRDES1 40A O +0
252 A +0
253 A '"'
254 A 1
255 A 'A150,300,1,3,1,1,N,'
256 A SPACEB(001)
257 A +0
258 A '"'
259 A DIRDES2 40A O +0
260 A +0
261 A '"'
262 A 1
263 A 'A110,300,1,4,1,1,N,'
264 A SPACEB(001)
265 A +0
5769PW1 V4R2M0 980228 LISTADO FUENTE SEU
08/09/05 10:
ARCHIVO FUENTE . . . . . LEMMASRC/QPRTSRC
MIEMBRO . . . . . . . . . L04020317
NUMSEC*...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7
...+... 8 ...+... 9 .
266 A '"'
267 A POBDESX 30A O +0
268 A +0
269 A '"'
270 A 1
271 A 'A070,300,1,4,1,1,N,'
272 A SPACEB(001)
273 A +0
274 A '"'
275 A TELEFOX 30A O +0
276 A +0
277 A '"'
278 A 1
279 A 'A760,1540,2,4,1,1,N,'
280 A SPACEB(001)
281 A +0
282 A '"'
283 A LIN01X 50A O +0
284 A +0
285 A '"'
286 A 1
287 A 'A760,1500,2,4,1,1,N,'
288 A SPACEB(001)
289 A +0
290 A '"'
291 A LIN02X 50A O +0
292 A +0
293 A '"'
294 A 1
295 A 'A760,1460,2,4,1,1,N,'
296 A SPACEB(001)
297 A +0
298 A '"'
299 A LIN03X 50A O +0
300 A +0
301 A '"'
302 A 1
303 A 'A760,1420,2,4,1,1,N,'
304 A SPACEB(001)
305 A +0
306 A '"'
307 A LIN04X 50A O +0
308 A +0
309 A '"'
310 A 1
311 A 'A760,1380,2,4,1,1,N,'
312 A SPACEB(001)
313 A +0
314 A '"'
315 A LIN05X 50A O +0
316 A +0
317 A '"'
318 A 1
5769PW1 V4R2M0 980228 LISTADO FUENTE SEU
08/09/05 10:
ARCHIVO FUENTE . . . . . LEMMASRC/QPRTSRC
MIEMBRO . . . . . . . . . L04020317
NUMSEC*...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7
...+... 8 ...+... 9 .
319 A 'A760,1340,2,4,1,1,N,'
320 A SPACEB(001)
321 A +0
322 A '"'
323 A LIN06X 50A O +0
324 A +0
325 A '"'
326 A 1
327 A 'A760,1300,2,4,1,1,N,'
328 A SPACEB(001)
329 A +0
330 A '"'
331 A LIN07X 50A O +0
332 A +0
333 A '"'
334 A 1
335 A 'A760,1260,2,4,1,1,N,'
336 A SPACEB(001)
337 A +0
338 A '"'
339 A LIN08X 50A O +0
340 A +0
341 A '"'
342 A 1
343 A 'P1'
344 A SPACEB(001)
345 A 1
346 A 'N'
347 A SPACEB(001)
348
A*%%***********************************************************************
349 A*%%SS
350 A*%%CL 001
351 A*%%CL 001
352 A*%%CL 001
353 A*%%CL 001
354 A*%%CL 001
355 A*%%CL 001
356 A*%%CL 001
357 A*%%CL 001
358 A*%%CL 001
359 A*%%CL 001
360 A*%%CL 001
361 A*%%CL 001
362 A*%%CL 001
363 A*%%CL 001
364 A*%%CL 001
365 A*%%CL 001
366 A*%%CL 001
367 A*%%CL 001
368 A*%%CL 001
369 A*%%CL 001
370 A*%%CL 001
371 A*%%CL 001
5769PW1 V4R2M0 980228 LISTADO FUENTE SEU
08/09/05 10:
ARCHIVO FUENTE . . . . . LEMMASRC/QPRTSRC
MIEMBRO . . . . . . . . . L04020317
NUMSEC*...+... 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7
...+... 8 ...+... 9 .
372 A*%%CL 001
373 A*%%CL 001
374 A*%%CL 001
375 A*%%CL 001
376 A*%%CL 001
377 A*%%CL 001
378 A*%%CL 001
379 A*%%CL 001
380 A*%%CL 001
381 A*%%CL 001
382 A*%%CL 001
383 A*%%CL 001
384 A*%%CL 001
385 A*%%CL 001
386 A*%%CL 001
387 A*%%CL 001
388 A*%%CL 001
389 A*%%CL 001
390 A*%%CL 001
391 A*%%CL 001
392 A*%%CL 001
393 A*%%CL 001
394 A*%%CL 001
395 A*%%CP+999CRTPRTF
396 A*%%CP+ OVRFLW(47)
397 A*%%CP+ FILE(TEAM/L04020317)
398 A*%%CP+ DEVTYPE(*SCS)
399 A*%%CP PAGESIZE(51 090 *N )
400
A*%%***********************************************************************
* * * * F I N D E F U E N T E * * * *
