Clarion - Problema con asignación de impresoras

 
Vista:
sin imagen de perfil
Val: 403
Oro
Ha mantenido su posición en Clarion (en relación al último mes)
Gráfica de Clarion

Problema con asignación de impresoras

Publicado por Marcelo Madelón (369 intervenciones) el 29/08/2024 12:57:39
No toma el cambio de impresora cuando lo hago por código.
En C6 no tengo problemas pero si en C8.
El código es el siguiente y es el que muestra el help
La cuestión es que no cambia l de impresora, siempre toma la por defecto.
Este es el código que uso:

! Cambio la Impresora
! Lee el archivo donde tengo guardado el nombre de la impresora. (Es el que Windows toma)

IMP:CodigoImpresora = 8
IF Access:Impresor.Fetch(IMP:KeyCodigoImpresora) ! Leo y la lectura es satisfactoria
message('no lee impresora')
END


Message(PRINTER{PROPPRINT:Device}) ! Muestro un mensaje con la impresora por defecto


LOC:DefaultPrinter = PRINTER{PROPPRINT:Device} ! la muevo a una variable
LOC:ReceiptPrinter = CLIP(IMP:NombreImpresora) ! La paso a una variable por la que figura en el archivo
PRINTER{PROPPRINT:Device}=CLIP(LOC:ReceiptPrinter) ! La cambio, pero no la toma sigue imprimiendo por la de defecto
IF ERRORCODE() ! controlo el error y no reporta error
MESSAGE('No se pudo asignar la impresora especificada: ' & ERROR(), 'Error')
END


! Cuando sale del la rutina devuelvo la impresora

PRINTER{PROPPRINT:Device}=CLIP(LOC:DefaultPrinter) ! Devuelvo la impresora predeterminada



Gracias y saludos.
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
sin imagen de perfil
Val: 403
Oro
Ha mantenido su posición en Clarion (en relación al último mes)
Gráfica de Clarion

Problema con asignación de impresoras

Publicado por Marcelo Madelón (369 intervenciones) el 01/09/2024 01:52:09
Hola foro

He consultado a la gente de Clarion y me respondió que ese es un bug.
Así que en C8 no se pueden manejar las impresoras por código.

Saludos.
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