Clipper/FiveWin - SOLUCION...! Imprimir codigos de barras

Amigos CLIPPEROS..

Despues de varias noches, resolvi el problema de imprimir CODIGOS DE BARRAS en clipper y con impresora laser HP1020, pueden con esto probar en otras impresoras y me avisan si anda.

mas abajo les dejo todos los detalles y aprovecho para saludarlos a todos y que sigan aportando soluciones...

Un saludo y un abrazo desde CORDOBA Argentina. !

[email protected]

*****************************************************************************************
* // Para los que necesiten imprimir CODIGOS DE BARRAS en CLIPPER5.2
*
*
* Colaboracion de: " Carlos Ulloque "
*
* Aclaracion: Programo en CLIPPER5.2 y mi impresora es una Laser HP1020
* y esta conectada a puerto USB y en red.
* FUNCIONA perfecto..!
*
* Utilizo para imprimir, el programa DOSPRINTER.exe
*
* Pueden bajarlo de www.geocities.com/dosprinter

PRIMERO:
Deben con sentencias clipper como las del ejemplo, imprimir el codigo
deseado, con las coordenadas x,y del SAY (@ 10,10 SAY ......) y los
codigos de control del DOSPRINTER en un archivo con extencion (.txt)

IMPORTANTISIMO..!

El DOSPRINTER necesita comandos de control que se deben
enviar (en codigo ASCII) antes del "numero de codigo" que
se imprimira.

Estos comandos le indican a la impresora el alto, ancho,
tipo de etiqueta, cantidad de digitos enviados etc.
Y difieren segun sea la cantidad de digitos a imprimir y/o
el tipo de etiqueta (2 de 5, EAN-13,CODE 39. ETC)

Si quieren estudiar a fondo el tema bajen de la pagina
www.geocities.com/dosprinter los ejemplos y tutoriales.


// Las lineas de codigo siguientes son del programa con extencion (.prg)
// Uds pueden copiarlo y grabarlo como por ej: CodBar.prg, lo compilan y
// lo ejecutan.
//
// Con el ejecutable CodeBar.exe, crearan el archivo CodBarra.txt


* ---------------------------------------------------------------------------------
* Este es un ejemplo para impresion de etiqueta (tipo 2 de 5)
* ----------------------------------------------------------------------------------
*
//
cls
// Comandos de clipper para imprimir en archivo CodBara.txt y disponer
// de la impresora.
//
set printer to C:CodBarra.TXT
set device to printer
//
// Coordenadas del say, comandos para la impresora en ASCII, y el
// codigo que se imprimira como codigo de barras es: "456789456789"
//
@ 10,10 say chr(27)+chr(40)+chr(66)+chr(15)+chr(1)+chr(2)+;
chr(3)+chr(22)+chr(90)+chr(0)+chr(0)+;
"456789456789"
//
//Comandos para restaurar la pantalla y cerrar la salida de impresion
//
set device to screen
set printer to
return
//---------------------------------------------------------------------

SEGUNDO:
Ejecutan el programa DOSPRINTER.exe para que se imprima dicho archivo

Tienen dos opciones:

1)- En linea de comandos escriben: DOSPRINTER.EXE /TRAY/GON "C:CodBarra.txt"

2)- Dentro de una rutina escriben: RUN DOSPRINTER.EXE /TRAY/GON "C:CodBarra.txt"
y LISTO....!

No olvidar incluir la ruta donde se ubica el archivo a imprimir
Rutaarchivo.txt ejemplo: C:MISDOCCodBarra.txt

Si encuentran algun error en la confeccion del ejemplo, o no es claro,
por favor haganlo saber a [email protected] asi lo corrijo
y no confundimos a nadie.

Un saludo a todos y que lo disfruten....

VIVA CLIPPER POR SIEMPRE...!

Gracias por la ayuda
ahora si deseo imprimir codigos de barras a partir de una base de datos como
puedo hacer por ejemplo una tabla que contiene un campo :
Campo tipo long
invnum N 10

Hola Carlos.

Primero reciba mis agradecimientos, por contribuir con mis conocimientos en Clipper.

Soy una persona que apenas se inicia en éste precioso lenguaje, pero si muy interesado en el tema, recientemente me he interesado, en la generacion codigos de barra.

Asi que afortunadamente me encontré su aportación, consegui el Dosprinter en una versión de Evaluación, después de darle muchas vueltas al asunto y a su ejemplo logre imprimir el codigo de su ejemplo, sin embargo el resultado no fue satisfactorio, ya que dentro del codigo de barras en la esquina superior izquierda se imprimen los ultimos 3 caracteres(789) de la cadena que se envia y abajo del codigo de barras se imprimen el resto de la cadena del codigo, mas un caracter que el dosprinter genera.

Revisé el manual(abajo dejo el link) y la formula de Dosprinter para códigos de barra y encontré que en el ejemplo de usted el codigo de control enviado "chr(15)" no corresponde para éste ejemplo, ya que tiene que ser "CHR(18)".

link para ver el manual de uso para Dosprinter:

http://dosprinter.netfirms.com/#Examples

Probé su ejemplo y otro para el código EAN13 en una Impresora Laser Samsung ML 1660 y el resultado fué muy, muy satisfactorio(digo satisfactorios porque después de imprimir los códigos,los pasé por un lector de códigos y la cadena leída corresponde a la cadena que se envió a impresión.

Por cierto necesito saber como conseguir la licencia Dosprinter, ¿Usted o alguien más sabe cómo hacerlo?

Ya que la versión de Evaluación segun el documento sólo es por 30 días, solo que no sé si a partir del día 31 se deshabilitan las funciones del Dosprinter.

Saludos.

Hola Carlos,
Podrías por favor enviarme el dosprinter y un par de ejemplos para poder imprimir codigo de barra desde mi programa de facturación?
Desde ya muchas gracias.
Saludos cordiales.
Juan.

Hola Juan

Enviame tu correo para poder conectarme.

Saludos.

Hola Carlos: Por favor me podrías enviar el dosprinter y el programa para poder llamar al dosprinter desde mi programa clipper....muchas gracias

Buenas Gustavo.

Pudiste llamar al dosprinter desde el programa clipper?porque yo no puedo abrir y he buscado y nada aun..la sentencia lo ejecuto desde un bat y funciona correctamente cuando es por linea de comando o doble clic sobre el bat.

Mi codigo es:


saludos.

pd:utilizo clipper.