Clarion - REPORTE DE ETIQUETAS

   
Vista:

REPORTE DE ETIQUETAS

Publicado por Diego (38 intervenciones) el 21/08/2010 17:32:08
Hola a todos! CONSULTA: necesito crear un reporte para imprimir unas etiquetas, las cuales en la misma hoja se pueden repetir. El usuario elige X cantidad a imprimir de una misma etiqueta en una hoja. Como puedo hacer para que se repita en la misma hora la cantidad de etiquetas a imprimir?

Saludos...

Diego
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
información
Otras secciones de LWP con contenido de Clarion
- Código fuente de Clarion
- Cursos de Clarion
información
Códigos de Clarion
- Llamar al form para insertar desde el menu

RE:REPORTE DE ETIQUETAS

Publicado por raxe (181 intervenciones) el 10/09/2010 10:08:50
Imprime etiquetas en A4 con 5 columnas. Las columnas en el report van con la asignacion de la matriz declarada a continuacion.

COLU BYTE
CODBAR STRING(12),DIM(5)
CODIGO STRING(13),DIM(5)
PEUROS REAL,DIM(5)
TITULO STRING(50),DIM(5)

Do Limpiar
!Proceso inicial

LOOP II# = 1 TO NumeroDeEtiquetas
COLU+= 1

CODBAR[COLU] = '*'& CLIP(Art:Codigo) &'*' !Codigo en barras 3of9
CODIGO[COLU] = Clip(Art:Codigo)
TITULO[COLU] = Art:Titulo
PEUROS[COLU] = Art:Precio

If Colu = 5
PRINT(RPT:detail)
DO LIMPIAR !LIMPIAR VARIABLES
End
End

IF COLU > 0 !SALIO DE LA TABLA Y QUEDAN ETIQUETAS PDTES.
PRINT(RPT:detail)
DO LIMPIAR !LIMPIAR VARIABLES
End

LIMPIAR ROUTINE
COLU = 0
CLEAR(CODBAR[])
CLEAR(CODIGO[])
CLEAR(TITULO[])
CLEAR(PEUROS[])
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar