PROCLINE( )
Devuelve el número de la línea del módulo fuente de la activación actual o de cualquiera de las anteriores
Sintaxis
PROCLINE([<nActivación>]) –> nLíneaFuente
Argumentos
<nActivación> es un valor numérico que especifica la activación que se va a examinar. Cero indica la activación actual, uno la activación anterior, etc. Si no se especifica, el valor por defecto es cero.
Devuelve
PROCLINE() devuelve, como valor numérico entero, el número de la última línea ejecutada en el procedimiento, función o bloque de código que se está ejecutando. Si la opción de compilador /L suprime la información del número de línea, PROCLINE() siempre devuelve cero.
Descripción
PROCLINE() examina la pila de activaciones de DPXBASE para determinar la última línea ejecutada en el procedimiento, función o bloque de código que se está ejecutando actualmente. La pila de activación es una estructura interna que mantiene un registro de cada invocación de procedimiento, función o bloque de código. La numeración de las líneas comienza al principio del módulo fuente original. Cada línea incluye un comentario, una línea en blanco, una directiva de preprocesador y una continuación de línea. Una línea de varias sentencias se cuenta como una sola línea.
En la activación actual, PROCLINE() devuelve el número de la línea actual. En una activación anterior, PROCLINE() devuelve el número de la línea que invocó al procedimiento o función que, a su vez, invoca a PROCLINE().
Si la activación que se examina es una evaluación de bloque de código, PROCLINE() devuelve el número de línea del procedimiento en el que se definió originalmente el bloque de código.
PROCLINE() se utiliza con PROCNAME() para generar la información de depuración.
Ejemplos
¦ En este ejemplo, PROCLINE() devuelve el número de línea de la activación actual, seguido del número de línea de la activación anterior:
// Primera línea del fichero fuente
MiFuncion()
RETURN
FUNCTION MiFuncion
? PROCLINE() // Resultado: 6 (activación actual)
? PROCLINE(1) // Resultado: 2 (activación anterior)
RETURN NIL
Ficheros: La biblioteca asociada es DPXBASE.CH.