Convierte una cadena de fecha en un valor de tipo fecha

Sintaxis

     CTOD() –> fFecha

Argumentos

es una cadena de caracteres que consiste en números que representan el mes, día y año, separados por un carácter no numérico. Las cifras del mes, día y año deben especificarse de acuerdo con el formato SET DATE. Si no se especifican cifras para el siglo, éste se determina por las reglas de SET EPOCH.

Devuelve

CTOD() devuelve un valor de fecha. Si no es una fecha válida, CTOD() devuelve una fecha vacía.

Descripción

CTOD() es una función de conversión de caracteres que convierte una cadena de caracteres en una fecha. Para inicializar una fecha vacía para la introducción de la fecha, especifique como cadena nula (“”), SPACE(8) o ”  /  /  “.

CTOD() se utiliza siempre que necesite un valor de fecha en forma literal. A continuación se dan algunos ejemplos:

     ¦  Inicializar una variable en un valor de fecha

     ¦  Especificar una cadena de fecha en forma literal como

        argumento de una cláusula RANGE de @…GET

     ¦  Especificar una cadena de fecha en forma literal para realizar cálculos aritméticos con la fecha

     ¦  Comparar el resultado de una expresión de fecha con una cadena de fecha en forma literal

     ¦  Sustituir un campo de fecha por una cadena de fecha en forma literal

CTOD() es la función inversa de DTOC(), la cual convierte un valor de fecha en una cadena de caracteres con el formato especificado por SET DATE y SET CENTURY. DTOS() convierte asimismo un valor de fecha en una cadena de caracteres con el formato aaaammdd.

 Ejemplos

     ¦  Este ejemplo utiliza CTOD() para inicializar dos variables de fecha, utilizando una como GET y la otra para la validación RANGE:

        SET CENTURY ON

        dInicio := CTOD(“01-26-1876”)

        dActual := CTOD(“”)

        @ 10, 10 SAY “Introduzca la fecha:” GET dActual ;

              RANGE dInicio, DATE()

        READ

     ¦  El ejemplo siguiente utiliza CTOD() para crear un valor de fecha dentro de una condición FOR:

        USE Inventario NEW

        REPLACE ALL Inventario->Precio WITH ;

           Inventario->Precio * 1.1 FOR ;

           Inventario->FechaInv < CTOD(“10/10/90”)

 Ficheros: La biblioteca asociada es DPXBASE.CH.