DBFILEPUT()
 Inserta el contenido de un fichero en un campo.
------------------------------------------------------------------------------
 Sintaxis

     DBFILEPUT(<nPosCampo>, <cFicheroFuente>)
        --> lExito

 Argumentos

     <nPosCampo> es la posición del campo en la estructura del fichero.

     <cFicheroFuente> es el nombre del fichero con los datos que se van
     a insertar en el campo, incluidos opcionalmente la unidad, el
     directorio y la extensión. Consulte SETDEFAULT() y SETPATH() si desea
     información sobre las reglas de búsqueda de ficheros. No se asume
     ninguna extensión por defecto.

     Esta función intenta abrir <cFicheroFuente> en modo compartido. Si el
     fichero no existe, se produce un error durante la ejecución. Si el
     fichero se abre con éxito, se lleva a cabo la operación. En el caso de
     que se deniegue el acceso debido, por ejemplo, a que otro proceso está
     utilizando el fichero en modo exclusivo, NETERR() toma el valor
     verdadero (.T.).

     Nota: La única restricción que existe para el tamaño de
     <cFicheroFuente> es que el espacio libre del disco sea suficiente para
     realizar la copia.

 Devuelve

     Si tiene éxito, DBFILEPUT() devuelve verdadero (.T.); en caso contrario
     devuelve falso (.F.).

 Descripción

     DBFILEPUT() proporciona un mecanismo para copiar en un campo el
     contenido de un fichero. Por defecto, esta función opera en el área de
     trabajo seleccionada. Si desea utilizarla en otra área de trabajo, debe
     especificarla con una expresión de alias.

     DBFILEPUT() se utiliza junto con DBFILEGET() para transferir datos
     entre ficheros y campos de la base de datos. Es posible utilizar
     DBFILEPUT() con una gran variedad de tipos de fichero, incluidos
     ficheros de imágenes gráficas, ficheros de procesadores de texto y
     ficheros de fuentes de impresora. Estas dos funciones son muy
     adecuadas para la creación de bases de datos de documentos, gráficos,
     sonidos, etc.

     Nota: DBFIELDINFO(DBS_BLOB_TYPE), <nPosCampo>, devuelve "C" (cadena
     de caracteres) para los campos memo creados mediante DBFILEPUT().

 Ejemplos

      Este ejemplo inserta el contenido de un fichero de imagen en
        un campo de la base de datos:

        FUNCTION RellenarConDatos()
           USE Cliente NEW VIA "DBFCDX"
           DO WHILE .NOT. EOF()
              ObtenerImagen("Imag", Substr(Apellido, 1, 4)+;
              ClienteId)
              Cliente->DBSKIP()
           ENDDO

        FUNCTION ObtenerImagen (cCampoImag, cFichImag)
           LOCAL nPos
           nPos := FieldPos(cCampoImag)
           // Importa la imagen al campo indicado
           IF !DBFILEPUT(nPos, cFichImag)
              Alert("Fallo en la importación de la imagen " + ;
                  cFichImag)
           ENDIF

 Ficheros   La biblioteca asociada es CLIPPER.LIB.
 To download this example - click here.

See Also: DBFILEGET()