CREATE ALIAS
CREATE ALIAS ( rutaObjetivo ; rutaAlias )
| Parámetro | Tipo | Descripción | |
|---|---|---|---|
| rutaObjetivo | Cadena | 🡒 | Nombre o ruta de acceso al objetivo del alias/atajo |
| rutaAlias | Cadena | 🡒 | Nombre o ruta de acceso completa del alias/del atajo a crear |
Descripción
El comando CREATE ALIAS crea un alias (llamado “atajo” en Windows) del archivo o carpeta objetivo pasado en rutaObjetivo. El nombre y la ubicación son definidos por el parámetro rutaAlias.
Puede crear un alias de todo tipo de documento o de carpeta. El icono del alias será idéntico al del elemento objetivo. El icono contiene una pequeña flecha en la parte inferior izquierda. Bajo Mac OS, el nombre del icono se muestra en caracteres en itálica.
Este comando no asigna un nombre por defecto, el nombre tiene que pasarse en el parámetro rutaAlias. Si sólo pasa un nombre en este parámetro, el alias se crea en la carpeta activa actual (generalmente la carpeta que contiene el archivo de estructura).
Nota: bajo Windows, los atajos son archivos con extensión “.LNK” (invisible). Si esta extensión no se pasa, es añadida automáticamente por el comando.
Si se pasa una cadena vacía en rutaObjetivo, el comando no hace nada.
Ejemplo
Su base genera archivos de texto llamados “InformeNúmero” almacenados en la carpeta de la base. El usuario quiere crear atajos a estos informes y almacenarlos en una ubicación conveniente:
//Método CREAR_INFORME
var $vtInf : Text
C_STRING(250;$vtruta)
C_STRING(80;$vanombre)
var vDoc : Time
C_INTEGER($NumInforme)
$vtInf:=... //Crear informe
$NumInforme:=... //Calculo del número del informe
$vanombre:="Informe"+String($NumInforme)+".txt" //Nombre del archivo
vDoc:=Create document($vanombre)
If(OK=1)
SEND PACKET(vDoc;$vtInf)
CLOSE DOCUMENT(vDoc)
//Añadir el alias
CONFIRM("¿Crear un alias para este informe?")
If(OK=1)
$vtRuta:=Select folder("¿Dónde quiere crear el alias?")
If(OK=1)
CREATE ALIAS($vaNombre;$vtRuta+$vanombre)
If(OK=1)
SHOW ON DISK($vtRuta+$vanombre)
//Mostrar la ubicación del alias
End if
End if
End if
End if
Variables y conjuntos del sistema
La variable sistema OK toma el valor 1 si el comando se ejecuta correctamente, si no toma el valor 0.