COPY STRUCTURE EXTENDED
 Copia definiciones de campo en un fichero .dbf
------------------------------------------------------------------------------
 Sintaxis

     COPY STRUCTURE EXTENDED
        <xcBasedeDatosExtendida>

 Argumentos

     TO <xcBasedeDatosExtendida> es el nombre del fichero de base de
     datos de estructura extendida sobre el que se va a actuar. Este
     argumento puede especificarse como nombre de fichero en forma literal o
     como expresión de caracteres encerrada entre paréntesis.

 Descripción

     COPY STRUCTURE EXTENDED crea un fichero de base de datos cuyo contenido
     es la estructura del fichero actual, con un registro para la definición
     de cada campo. El fichero de base de datos de estructura extendida
     posee la siguiente estructura:

     Estructura del Fichero Extendido
     ------------------------------------------------------------------------
     Campo     Nombre           Tipo          Longitud      Decimales
     ------------------------------------------------------------------------
     1         Field_name       Carácter      10
     2         Field_type       Carácter      1
     3         Field_len        Numérico      3             0
     4         Field_dec        Numérico      4             0
     ------------------------------------------------------------------------

     Utilizado en programas de aplicación, COPY STRUCTURE EXTENDED permite
     crear o modificar la estructura de un fichero de base de datos desde un
     programa. Para crear un nuevo fichero de base de datos desde el fichero
     de estructura extendida, utilice CREATE FROM. Si necesita un fichero de
     estructura extendida vacío, utilice CREATE.

 Notas

     ■ Longitudes de campos de caracteres superiores a 255: En
        CA-Clipper, la longitud máxima de un campo de caracteres es de 64K.
        Por razones de compatibilidad, las longitudes de campo mayores de
        255 se representan como una combinación de campos Field_dec y
        Field_len. Después de copiar la estructura extendida (COPY STRUCTURE
        EXTENDED), puede utilizar la siguiente fórmula para determinar la
        longitud de cualquier campo de caracteres:

        nLonCampo := IF(Field_type = "C" .AND. ;
              Field_dec != 0, Field_dec * 256 + ;
              Field_len, Field_len)

 Ejemplos

      Este ejemplo crea Estruc.dbf desde Ventas.dbf como fichero de
        estructura extendida y, a continuación, lista el contenido de
        Estruc.dbf para mostrar el formato habitual de las definiciones de
        campo:

        USE Ventas NEW
        COPY STRUCTURE EXTENDED TO Estruc
        USE Estruc NEW
        LIST Field_name, Field_type, Field_len, Field_dec

        Resultado:

        1 SECCION         C        3        0
        2 VENDEDOR        C        4        0
        3 CLIENTE         C        4        0
        4 PRODUCTO        C       25        0
        5 IMPORTE         N        8        2
        6 NOTAS           C        0      125
        // La longitud del campo NOTAS es de 32.000 caracteres

 Ficheros   La biblioteca asociada es CLIPPER.LIB.

 To download this example - click here.

See Also: COPY STRUCTURE CREATE CREATE FROM FIELDNAME() TYPE()