Macro AHGtoLocal - Copia de archivo a local

Attention : Este código requiere privilegios de administrador.

La macro verifica la existencia del directorio de destino (y lo crea si es necesario a través de %AHGmkdir), extrae el nombre del archivo y utiliza el comando del sistema 'copy' (sintaxis de Windows) a través de la instrucción SYSTASK para realizar la copia. Ofrece una opción para abrir el archivo resultante.

Análisis de datos

Type : EXTERNE

Manipulación de archivos físicos a través del sistema operativo.

1 Bloque de código

MACRO

Explicación :
Definición de la macro: gestión de parámetros por defecto, creación condicional del directorio de destino, ejecución síncrona del comando de copia del SO (Windows) y apertura condicional del archivo.

¡Copiado!

1	%macro AHGtoLocal(from,to=,open=0,where=);
2
3	%IF %AHGblank(&to) %THEN %let to=%AHGtempdir;
4	%IF not %sysfunc(fileexist(&to)) %THEN %AHGmkdir(&to);
5	%local filename;
6	%let filename=%AHGfilename(&from);
7	option xsync;
8	systask command "copy &from &to /y" wait;
9
10	%IF &open=1 %THEN %AHGopenfile(&to\&filename,&where);
11
12	%mend;

Este material se proporciona "tal cual" por We Are Cas. No hay garantías, expresas o implícitas, en cuanto a la comerciabilidad o idoneidad para un propósito particular con respecto a los materiales o el código contenidos en este documento. We Are Cas no es responsable de los errores en este material tal como existe ahora o existirá, ni We Are Cas proporciona soporte técnico para el mismo.

Retour à la liste