funcion _ReEjecutandoReal ():booleano;

 

Comprueba si el script se está ejecutando en modo silencioso no debido a una auto-recuperación a raíz de una finalización inesperada.


 

Permite discriminar el caso de las re-ejecuciones silenciosas habituales debidas a que la operadora retrocede a una pregunta anterior, o bien debidas a la ejecución de un botón, de cualquier otro caso (modo normal o modo silencioso debido a una auto-recuperación).

 

Es decir, esta función devuelve el mismo resultado que la función incorporada ReEjecutando excepto en el caso de que se esté ejecutando el script en modo silencioso debido a una auto-recuperación a raíz de una finalización inesperada, para el que ReEjecutando devuelve Cierto mientras que _ReEjecutandoReal devuelve Falso.

 

En particular, para el código previo a la realización de cualquier pregunta si esta función devuelve Falso sabremos con certeza que el script es la primera vez que se ejecuta, mientras que si devuelve Cierto sabremos que ya no es la primera vez que se ejecuta, lo cual es útil principalmente para ejecutar ciertas inicializaciones sólo una vez.

Módulo

G77_FUNCIONES_STD

Parámetros

Ninguno.

Valor devuelto

Cierto si el script se está ejecutando en modo silencioso pero lo mismo no ha sido causada por una recuperación a raíz de una finalización inesperada. Falso en cualquier otro caso.

Temas relacionados

·         Tutorial >> Cómo ejecuta OriGn los scripts >> Re-ejecuciones silenciosas, funcionamiento

·         Tutorial >> Cómo ejecuta OriGn los scripts >> Auto-recuperación de prospecciones

·         Tutorial >> Cómo ejecuta OriGn los scripts >> Controlar las auto-recuperaciones: RecuperandoScript()

Ver también

Ejemplo

(...)
 
INICIO
    Si (NO _ReEjecutandoReal()) entonces
    inicio
    // Es la primera vez que se ejecuta el script, llevamos a cabo las inicializaciones
    // pertinentes
 
        // Inicializamos el máximo de registros
        InicializaMaximoRegistros(MaxRegistros);
 
        // Cargamos el registro de configuración en memoria
        Si (NO CargarRegConfig(RC)) entonces levanta Exception.Create(TXT_EXC_02);
    fin; 
 
    (...)
 
    Preguntar('P1');
    (...)  
FIN.