PROW()
 Devuelve la posición de fila actual de la cabeza de impresión
------------------------------------------------------------------------------
 Sintaxis

     PROW() --> nFila

 Devuelve

     PROW() devuelve un valor numérico entero que representa la posición de
     la última fila impresa. La posición de fila inicial es cero.

 Descripción

     PROW() es una función de impresora que informa de la posición de fila
     de la cabeza de impresión después de la última operación. PROW() se
     actualiza solamente si se ha establecido SET DEVICE TO PRINTER o SET
     PRINTER ON. PROW() es similar a ROW(), excepto en que se aplica a la
     impresora, en vez de a la pantalla. PROW() se actualiza de las formas
     siguientes:

      Al arrancar la aplicación, PROW() se pone a cero

      Al ejecutar un EJECT, PROW() se pone a cero

      Cualquier operación de impresión hace que PROW() tome el valor
        de la posición de la última fila impresa

      La función SETPRC() permite establecer PROW() en la posición
        de fila especificada

     PROW() se utiliza normalmente con PCOL() para imprimir un valor
     relativo al último valor impreso en la misma línea. Si la cabeza de
     impresión se coloca en una nueva fila con un código de control, salto
     de línea (CHR(10)) o salto de página (CHR(12)), PROW() no se actualiza
     y, por tanto, no devuelve el valor previsto. Para evitar esta
     discrepancia, despúes de enviar cualquiera de estos valores a la
     impresora debe utilizar la función SETPRC() para reinicializar PROW()
     con el valor correcto.

 Ejemplos

      Este ejemplo utiliza PROW() y SETPRC() para crear un programa
        sencillo de etiquetas que se imprime con @...SAY, en vez de con ?:

        USE Cliente INDEX NombreCli NEW
        SET DEVICE TO PRINTER
        SETPRC(2, 0)
        DO WHILE !EOF()
           @ PROW(), 3 SAY NombreCli
           @ PROW() + 1, 3 SAY RTRIM(Ciudad) + ",";
                  + RTRIM(Provincia) + CodigoPost
           @ PROW() + 1, 3 SAY Telefono ;
                  PICTURE "@R (999) 999-9999"
           SETPRC(2, 0)
           SKIP
        ENDDO
        SET DEVICE TO SCREEN
        CLOSE

 Ficheros   La biblioteca asociada es CLIPPER.LIB.

 To download this example - click here.

See Also: ?|?? @...SAY EJECT PCOL() QOUT() ROW()