Platform

x64, Win32

Purpose

To set the current directory.

Syntax

SUBROUTINE ATTACH@(PATH,ERROR_CODE)
CHARACTER (LEN=*) PATH
INTEGER (KIND=2) ERROR_CODE

Description

PATH should be the path name of a directory (e.g. C:\PROJECT). ATTACH@ makes this the current directory, switching disks if necessary. ERROR_CODE is returned with a non-zero system error code if it fails.

Example

CHARACTER (LEN=50)::PATH
CALL COUA@('Where do you want to be? ')
READ(*,'(A)')PATH
CALL ATTACH@(PATH,ERROR_CODE)
CALL DOSERR@(ERROR_CODE)
CALL COU@('OK - that is where you are! '). . .