SET DEVICE
 Envia os comandos @...SAY à tela ou à impressora
------------------------------------------------------------------------------

 Sintaxe

     SET DEVICE TO SCREEN | printer

 Argumentos

     SCREEN envia todos os comandos @...SAY à tela e independe de como
     os comandos SET PRINTER e CONSOLE estejam ajustados.

     PRINTER envia todos os comandos @...SAY ao dispositivo ajustado em
     SET PRINTER TO.  Isto pode incluir um port de impressora local, um
     spooler de rede, ou um arquivo.

 Descriçao

     O comando SET DEVICE envia a saída dos comandos @...SAY para a tela ou
     para a impressora.  Quando DEVICE está em SET TO PRINTER, os comandos
     @...SAY sao enviados à impressora e nao sao repetidos para a tela.  Os
     comandos @...GET sao ignorados.

     Ao enviar os comandos @...SAY à impressora, o Clipper executa um EJECT
     automático sempre que a posiçao da cabeça da impressora estiver numa
     linha menor do que a última linha impressa.  Um EJECT reajusta os
     valores das funçoes PCOL() e PROW() para zero.  Para reajustar PCOL() e
     PROW() para novos valores, use a funçao SETPRC().

     Para enviar comandos @...SAY para um arquivo, use SET PRINTER TO
     <xcArquivo> juntamente com o comando SET DEVICE TO PRINTER.

 Exemplos

       Este exemplo simples envia comandos @...SAY à impressora:

        SET DEVICE TO PRINTER
        @ 2,10 SAY "Alo pessoal"
        EJECT

       Este exemplo, por outro lado, envia comandos @...SAYs a um
        arquivo:

        SET PRINTER TO Output.txt
        SET DEVICE TO PRINTER
        @ 10, 10 SAY "Arquivo: Output.txt"
        @ 11, 10 SAY DATE()
        SET PRINTER TO                  // Fecha o arquivo
        SET DEVICE TO SCREEN

 Arquivos:  Biblioteca CLIPPER.LIB.
 To download this example - click here.

See Also: @...SAY EJECT SET PRINTER PCOL() PROW() SETPRC()