seleccionar opsión de impresion

[Enrique]

Hola Grupo: Tengo que hacer lo siguiente y que nunca lo he visto:

Unos usuarios necesitan que al imprimir un Tiquet, este salga directo a la impresora y en otro lugar necesitan que al imprimir un Tiquet solamente se visualice.

Entonces la idea es que en algún lugar de un formulario establezca esta condición, como por ejemplo que atreves de un CheckBox pregunte “Visualizar Tiquet” y establecer si esta T o F imprimirá según lo indicado (directo a la impresora o solo Visualizar)  

Por otra parte, los Tiquet los mando a imprimir así

REPORT FORM report1 FOR Tiquet = mN1 to print

REPORT FORM report1 FOR Tiquet = mN1 preview

 

to print prompt noconsole   && Para seleccionar impresora. No lo puedo usar por que muchos quieren que se imprima sin estos mensajes o avisos.

Cualquier comentario y ayuda lo agradezco mucho.

Saludos.

[Alan Cybar]

Hola,

El VFP tiene un comando que te muestra todas las impresoras que tiene una pc. También podés incluir un set printer para decirle al sistema que imprima en una determinada impresora.

No recuerdo de memoria pero, cuando esté frente a la PC puedo ver esos comandos.

Saludos,

Alan Sanier.
Asunción - Paraguay

[Jairo Miranda]

EL primer paso seria colocar en ese pantalla un boton para seleccionar impresora por defecto.

SET PRINTER TO NAME GETPRINTER( )

en el boton previsualizar tiquet inmagio que tiene un campo previsualizar en .f. 

en ese caso

en el boton de imprimir 

do case

    CASE  ParametroVisualiar = .F.

             REPORT FORM report1 to print NOCONOLE  FOR Tiquet = mN1 

   OTHER 

         REPORT FORM report1 preview  NOCONOLE  FOR Tiquet = mN1 

  

endcase 

JM

[Enrique]

Hola Jairo, muchas gracias por tu respuesta. Respecto a la pregunta, solamente mando a imprimir con este comando;

REPORT FORM report1 FOR Tiquet = mN1 to print

Si esa es la  idea, que el sistema tenga la opción (a través de un parámetro que tenga la opsion de activar y desactivar según a elección ) por defecto los tiquet a la impresora inmediatamente y la otra opción de solo visualizar el tiquet. 

do case

    CASE  ParametroVisualiar = .F.

             REPORT FORM report1 to print NOCONOLE  FOR Tiquet = mN1 

   OTHER 

         REPORT FORM report1 preview  NOCONOLE  FOR Tiquet = mN1 

  

endcase

 

¿También puede ser con un IF / Else / ENDIF?

 

Llegando a la mí casa pruebo lo que me indicas y haber si tengo buenos resultados. 

Muchas gracias por tu respuesta.

saludos

 

Enrique

   Santiago de Chile

[Enrique]

Hola Jairo. resulto con tu idea, muchas gracias.

SELECT impri   // Tabla con un campo logico
                 do case
                    CASE  condicion = .F.     // Condicion es un capo de la tabla impri
                           REPORT FORM report1 to print NOCONSOLE  FOR Tiquet = mN1
                       OTHER
                          REPORT FORM report1 preview  NOCONSOLE  FOR Tiquet = mN1  
                endcase


Saludos nuevamente

Enrique
Santiago de Chile