Progress - Sentencia Output

Hola a todos,

Tengo un problema.

Quiero crear un archivo .txt con datos que recorro de una tabla. Este código me funciona correctamente, el problema es que cuando coloco una ruta a la que no tengo permiso de escritura me sale un error. Hay alguna forma de controlar esta excepción?

Muchas gracias y saludos.

Hola Mauro,

Puede utilizar la variable de sistema FILE-INFO de la siguiente manera

1. Se asigna la ruta del directorio que se desea evaluar

FILE-INFO:FILE-NAME = "C:directorioprueba".

2. Se verifica el atributo FILE-TYPE , para el cual se debe verificar que contenga lo siguiente

D = Identifica que es un directorio
R = Habilitada la Lectura
W = Habilitada la Escritura

IF INDEX(FILE-INFO:FILE-TYPE,"W") <> 0 THEN DO :
MESSAGE "No se puede escribbir"
VIEW-AS ALERT-BOX.
END.

Muchas gracias por la ayuda, voy a probarlo.

Hola Camilo, Muchas gracias por responder a mi consulta.

Te comento que estuve probando, pero no me funciona.

1º Error: siempre me sale el mensaje "No se puede escribir". Si le cambio por = 0, ahí no sale más.

2º Error: Yo mostré un mensaje con lo siguiente:

MESSAGE FILE-INFO:FILE-TYPE
VIEW-AS ALERT-BOX INFO BUTTONS OK.

y siempre me sale DRW, ya sea para un directorio donde tenga permisos o donde no.

Como puedo solucionarlo?

Muchas gracias y saludos,