4D Write v14

WR SAVE DOCUMENT

Inicio

 
4D Write v14
WR SAVE DOCUMENT

WR SAVE DOCUMENT 


 

WR SAVE DOCUMENT ( area ; doc ; tipo ) 
Parámetro Tipo   Descripción
area  Entero largo in Área 4D Write
doc  Cadena in Ruta de acceso del documento a guardar en disco
in Ruta de acceso del documento guardado en disco
tipo  Cadena in Tipo de documento a guardar (4 caracteres)
in Tipo de documento guardado (4 caracteres)

El comando WR SAVE DOCUMENT permite guardar el documento en el área 4D Write referenciada por area, utilizando la ruta de acceso pasada en nomArchivo.

nomArchivo es el nombre o la ruta de acceso completa del archivo documento. En Windows, debe incluir la extensión de archivo, con el fin de determinar el tipo de archivo.
Ejemplos:

  • En Windows o en el caso de una gestión multiplataforma, debe incluir el carácter "\" entre los directorios: "D:\directorio1\directorio2\file.4W7".
  • En Mac OS, debe incluir el carácter “:” entre carpetas: "MacintoshHD:carpeta:documento".

Si nomArchivo contiene sólo el nombre del archivo, WR SAVE DOCUMENT guarda el documento en la carpeta de archivo de estructura de la base.

Si nomArchivo es una cadena vacía, WR SAVE DOCUMENT muestra la caja de diálogo estándar Guardar.

Cuando el usuario hace clic en Guardar (Mac OS) o Aceptar (Windows), la variable sistema OK toma el valor 1 y la variable nomArchivo contendrá el archivo elegido por el usuario y la variable tipo contendrá su tipo.

Si el usuario hace clic en el botón Cancelar, la variable sistema OK toma el valor 0.

En Windows, el menú Tipo ofrece los formatos listados a continuación.

Por defecto, el documento se guarda en formato 4D Write. Si desea especificar un tipo diferente, debe pasar el tipo de archivo deseado en el parámetro tipo. Un tipo se compone de una cadena de 4 caracteres. Puede utilizar una de las siguientes constantes, ubicadas en el tema WR Tipos de documentos:

Constante Tipo Valor
wr 4D Write document Cadena 4WR7
wr 4D Write template Cadena 4WT7
wr HTML 3 document Cadena HTM3
wr HTML 4 document Cadena HTML
wr Macintosh text document Cadena ASCM
wr RTF document Cadena RTF
wr unicode document UTF16 Cadena ASCU
wr unicode document UTF8 Cadena ASC8
wr Windows text document Cadena ASCW

Notas:

  • Añada un espacio después de "RTF" con el fin de obtener los 4 caracteres necesarios.
  • Debe usar la exportación HTML 3.2 si quiere mostrar el documento como HTML en 4D Write (sólo HTML 3 es compatible con la importación en 4D Write). 

Nota de compatibilidad: por razones de compatibilidad con versiones anteriores, el tipo DOC8 (Documento Word 8) también es soportado.

El parámetro tipo se utiliza para la codificación del documento solamente. No representa a un tipo de archivo Mac OS, ni a una extensión de Windows.
Sin embargo, el parámetro es utilizado por 4D Write para determinar el valor apropiado para la extensión de archivo en Windows o para el creador/tipo del archivo en Mac OS:

  • Windows
    Formato 4D WriteExtensión
    4D Write document.4W7
    4D Write template.4WT
    RTF.RTF
    HTML 3.2 or 4.HTM
    ASCII PC/Mac.TXT
    ASCII unicode 8 or 16 bytes.TXT
    Word.DOC

La extensión del archivo se define de acuerdo al valor del parámetro tipo, incluso si el nombre ya cuenta con una extensión. Por ejemplo, si pasa "Report.RTF" en el parámetro nomArchivo  "HTML" en tipo, el archivo se llamará "report.htm".

  • Mac OS
    Formato 4D WriteCreadorTipo
    4D Write document4DW74WR7
    4D Write template4DW74WT7
    RTF4DW7RTF
    HTML 3.2 or 4MOSSTEXT
    ASCII PC/Mac4DW7TEXT
    ASCII unicode 8 or 16 bytes4DW7TEXT
    WordMSWDW8BN

Para guardar el documento 'LetterClient' en formato de archivo 4D Write. Este documento se guardará en la carpeta "WriteDocuments" ubicada en el mismo nivel que el archivo de estructura de la base:

  `Recuperación de la ruta de acceso a la estructura
 $Doc:=Structure file
 Doc:=$Doc
 $long:=0
  `Recuperación de la posición del último separador para eliminar el nombre de la estructura a la ruta de acceso
 While((Position(":";$Doc)#0)
    $Doc:=Substring($Doc;1+Position(":";$Doc);Length($Doc))
    $Long:=Length($Doc)
 End while
  `Concatenación de la ruta de acceso para guardar el documento
  `Añadir una extensión al documento permite una gestión multi plataforma
 Doc:=Substring(Doc;1;Length(Doc)-$Long)+"WriteDocuments:LetterClient.4W7"
 WR SAVE DOCUMENT(Area;doc;wr 4D Write document)

Usted quiere dar al usuario la posibilidad de elegir el nombre y tipo de documento a guardar. Luego, desea recuperar los valores elegidos:

 DocName:=""
 DocType:=""
 WR SAVE DOCUMENT(Area;NomDoc;TipoDoc)
 If(OK=1)
    ... `Utilizando los valores de NomDoc y TipoDoc
 End if

 
PROPIEDADES 

Producto: 4D Write
Tema: WR Documentos
Número 89218

Este comando modifica la variable sistema OK

 
HISTORIA 

Modificado: 4D Write v11

 
VER TAMBIÉN 

WR OPEN DOCUMENT

 
ARTICLE USAGE

4D Write - Lenguaje ( 4D Write v11.6)
4D Write - Lenguaje ( 4D Write v12)
4D Write - Lenguaje ( 4D v13)
4D Write - Lenguaje ( 4D Write v14 R2)
4D Write - Lenguaje ( 4D Write v14)
4D Write - Lenguaje ( 4D Write v14 R3)
4D Write - Lenguaje ( 4D Write v14 R4)