Te env�o un fuente creado por RLU que imprime etiquetas con c�digos de barras EAN13.
Espero que te ayude. Saludos. Juan Carlos. <<etiean13.txt>> > -----Mensaje original----- > De: [EMAIL PROTECTED] [SMTP:[EMAIL PROTECTED] > Enviado el: lunes, 10 de enero de 2005 15:22 > Para: [email protected] > Asunto: CODIGO DE BARRAS EN RLU > > ALGUIEN TIENE ALGUN EJEMPLO DE UTILIZACION DE CODIGO DE BARRAS EN UN > RLU??? > > GRACIAS > > > Saludos > > Jose Manuel Navarro > > Departamento Inform�tica > E-mail: [EMAIL PROTECTED] > Tlfno: 966.54.10.00 > Fax : 966.55.40.15 > > > > > > > _____________________________________________________ > 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, env�a el mensaje resultante de pulsar > mailto:[EMAIL PROTECTED] > > -- > No virus found in this incoming message. > Checked by AVG Anti-Virus. > Version: 7.0.300 / Virus Database: 265.6.10 - Release Date: 10/01/2005 > > -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.6.10 - Release Date: 10/01/2005
A*%%***********************************************************************
A*%%TS RD 20041130 114019 JCPC REL-V5R3M0 5722-WDS
A*%%FI+20661100000000000000000000000000000000000000000000000000
A*%%FI 0000000000000000000000000000000000000000000000000
A*%%***********************************************************************
A R DETA01
A*%%***********************************************************************
A*%%RI 00000
A*%%FS 001
A*%%***********************************************************************
A SKIPB(002)
A 50 6
A 'C�d.:'
A N50 6
A 'ISBN:'
A WPCDG1 13A O 11
A 50 35
A 'C�d.:'
A N50 35
A 'ISBN:'
A WPCDG2 13A O 40
A 50 65
A 'C�d.:'
A N50 65
A 'ISBN:'
A WPCDG3 13A O 70
A 50 96
A 'C�d.:'
A N50 96
A 'ISBN:'
A WPCDG4 13A O 101
A WPEAN1 12S O 6
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A SPACEB(001)
A WPEAN2 12S O 35
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN3 12S O 65
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN4 12S O 96
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A 50 6
A 'C�d.:'
A SPACEB(005)
A N50 6
A 'ISBN:'
A SPACEB(005)
A WPCDG5 13A O 11
A 50 35
A 'C�d.:'
A N50 35
A 'ISBN:'
A WPCDG6 13A O 40
A 50 65
A 'C�d.:'
A N50 65
A 'ISBN:'
A WPCDG7 13A O 70
A 50 96
A 'C�d.:'
A N50 96
A 'ISBN:'
A WPCDG8 13A O 101
A WPEAN5 12S O 6
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A SPACEB(001)
A WPEAN6 12S O 35
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN7 12S O 65
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN8 12S O 96
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A 50 6
A 'C�d.:'
A SPACEB(005)
A N50 6
A 'ISBN:'
A SPACEB(005)
A WPCDG9 13A O 11
A 50 35
A 'C�d.:'
A N50 35
A 'ISBN:'
A WPCDG10 13A O 40
A 50 65
A 'C�d.:'
A N50 65
A 'ISBN:'
A WPCDG11 13A O 70
A 50 96
A 'C�d.:'
A N50 96
A 'ISBN:'
A WPCDG12 13A O 101
A WPEAN9 12S O 6
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A SPACEB(001)
A WPEAN10 12S O 35
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN11 12S O 65
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN12 12S O 96
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A 50 6
A 'C�d.:'
A SPACEB(005)
A N50 6
A 'ISBN:'
A SPACEB(005)
A WPCDG13 13A O 11
A 50 35
A 'C�d.:'
A N50 35
A 'ISBN:'
A WPCDG14 13A O 40
A 50 65
A 'C�d.:'
A N50 65
A 'ISBN:'
A WPCDG15 13A O 70
A 50 96
A 'C�d.:'
A N50 96
A 'ISBN:'
A WPCDG16 13A O 101
A WPEAN13 12S O 6
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A SPACEB(001)
A WPEAN14 12S O 35
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN15 12S O 65
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN16 12S O 96
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A 50 6
A 'C�d.:'
A SPACEB(005)
A N50 6
A 'ISBN:'
A SPACEB(005)
A WPCDG17 13A O 11
A 50 35
A 'C�d.:'
A N50 35
A 'ISBN:'
A WPCDG18 13A O 40
A 50 65
A 'C�d.:'
A N50 65
A 'ISBN:'
A WPCDG19 13A O 70
A 50 96
A 'C�d.:'
A N50 96
A 'ISBN:'
A WPCDG20 13A O 101
A WPEAN17 12S O 6
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A SPACEB(001)
A WPEAN18 12S O 35
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN19 12S O 65
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN20 12S O 96
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A 50 6
A 'C�d.:'
A SPACEB(005)
A N50 6
A 'ISBN:'
A SPACEB(005)
A WPCDG21 13A O 11
A 50 35
A 'C�d.:'
A N50 35
A 'ISBN:'
A WPCDG22 13A O 40
A 50 65
A 'C�d.:'
A N50 65
A 'ISBN:'
A WPCDG23 13A O 70
A 50 96
A 'C�d.:'
A N50 96
A 'ISBN:'
A WPCDG24 13A O 101
A WPEAN21 12S O 6
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A SPACEB(001)
A WPEAN22 12S O 35
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN23 12S O 65
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN24 12S O 96
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A 50 6
A 'C�d.:'
A SPACEB(005)
A N50 6
A 'ISBN:'
A SPACEB(005)
A WPCDG25 13A O 11
A 50 35
A 'C�d.:'
A N50 35
A 'ISBN:'
A WPCDG26 13A O 40
A 50 65
A 'C�d.:'
A N50 65
A 'ISBN:'
A WPCDG27 13A O 70
A 50 96
A 'C�d.:'
A N50 96
A 'ISBN:'
A WPCDG28 13A O 101
A WPEAN25 12S O 6
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A SPACEB(001)
A WPEAN26 12S O 35
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN27 12S O 65
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN28 12S O 96
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A 50 6
A 'C�d.:'
A SPACEB(005)
A N50 6
A 'ISBN:'
A SPACEB(005)
A WPCDG29 13A O 11
A 50 35
A 'C�d.:'
A N50 35
A 'ISBN:'
A WPCDG30 13A O 40
A 50 65
A 'C�d.:'
A N50 65
A 'ISBN:'
A WPCDG31 13A O 70
A 50 96
A 'C�d.:'
A N50 96
A 'ISBN:'
A WPCDG32 13A O 101
A WPEAN29 12S O 6
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A SPACEB(001)
A WPEAN30 12S O 35
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN31 12S O 65
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN32 12S O 96
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A 50 6
A 'C�d.:'
A SPACEB(005)
A N50 6
A 'ISBN:'
A SPACEB(005)
A WPCDG33 13A O 11
A 50 35
A 'C�d.:'
A N50 35
A 'ISBN:'
A WPCDG34 13A O 40
A 50 65
A 'C�d.:'
A N50 65
A 'ISBN:'
A WPCDG35 13A O 70
A 50 96
A 'C�d.:'
A N50 96
A 'ISBN:'
A WPCDG36 13A O 101
A WPEAN33 12S O 6
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A SPACEB(001)
A WPEAN34 12S O 35
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN35 12S O 65
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN36 12S O 96
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A 50 6
A 'C�d.:'
A SPACEB(005)
A N50 6
A 'ISBN:'
A SPACEB(005)
A WPCDG37 13A O 11
A 50 35
A 'C�d.:'
A N50 35
A 'ISBN:'
A WPCDG38 13A O 40
A 50 65
A 'C�d.:'
A N50 65
A 'ISBN:'
A WPCDG39 13A O 70
A 50 96
A 'C�d.:'
A N50 96
A 'ISBN:'
A WPCDG40 13A O 101
A WPEAN37 12S O 6
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A SPACEB(001)
A WPEAN38 12S O 35
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN39 12S O 65
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN40 12S O 96
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A 50 6
A 'C�d.:'
A SPACEB(005)
A N50 6
A 'ISBN:'
A SPACEB(005)
A WPCDG41 13A O 11
A 50 35
A 'C�d.:'
A N50 35
A 'ISBN:'
A WPCDG42 13A O 40
A 50 65
A 'C�d.:'
A N50 65
A 'ISBN:'
A WPCDG43 13A O 70
A 50 96
A 'C�d.:'
A N50 96
A 'ISBN:'
A WPCDG44 13A O 101
A WPEAN41 12S O 6
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A SPACEB(001)
A WPEAN42 12S O 35
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN43 12S O 65
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A WPEAN44 12S O 96
A BARCODE(EAN13 4 *HRZ *HRI X'00' (*W-
A IDTH 0,015))
A*%%***********************************************************************
A*%%SS
A*%%SN WPCDG1 XXXXXXXXXXXX
A*%%SN WPCDG2 XXXXXXXXXXXX
A*%%SN WPCDG3 XXXXXXXXXXXX
A*%%SN WPCDG4 XXXXXXXXXXXX
A*%%CL 001
A*%%CL 005
A*%%CL 001
A*%%CL 005
A*%%CL 001
A*%%CL 005
A*%%CL 001
A*%%CL 005
A*%%CL 001
A*%%CL 005
A*%%CL 001
A*%%CL 005
A*%%CL 001
A*%%CL 005
A*%%CL 001
A*%%CL 005
A*%%CL 001
A*%%CL 005
A*%%CL 001
A*%%CL 005
A*%%CL 001
A*%%CP+999CRTPRTF
A*%%CP+ FILE(EVE60PGM/ALM390P)
A*%%CP+ DEVTYPE(*IPDS)
A*%%CP+ PAGESIZE(70 132)
A*%%CP+ CPI(15)
A*%%CP+ OVRFLW(70)
A*%%CP+ FORMFEED(*CUT)
A*%%CP+ FONT(*CPI)
A*%%CP+ PAGRTT(0)
A*%%CP+ UOM(*CM)
A*%%CP+ OUTQ(CFABRICA)
A*%%CP+ FORMTYPE(ETI_EAN13)
A*%%CP+ HOLD(*YES)
A*%%CP SAVE(*YES)
A*%%CS+999CRTPRTF
A*%%CS+ FILE(QTEMP/QPRDRPT)
A*%%CS+ DEVTYPE(*IPDS)
A*%%CS+ PAGESIZE(*N 132)
A*%%CS CPI(15)
A*%%***********************************************************************
