Make a dir witth progress

[Cabral]

Hi, Talkers,

How i make a directory with a progress program?

Regards,
Cabral.

 

[Chris Kelleher]

Cabral-

You can use the OS-CREATE-DIR command to create a new directory:

DEFINE VARIABLE stat AS INTEGER.
DEFINE VARIABLE dir_name AS CHARACTER FORMAT "x(64)"
LABEL "Enter the name of the directory you want to create.".

UPDATE dir_name.
OS-CREATE-DIR VALUE(dir_name).
stat = OS-ERROR.
IF stat NE 0 THEN
   MESSAGE "Directory not created. System Error #" stat.

Hope this helps,
-Chris

 

[Cabral]

Tanks, ProgressTalk....

Kind Regards,
Cabral.

Originally posted by progresstalk
Cabral-

You can use the OS-CREATE-DIR command to create a new directory:

DEFINE VARIABLE stat AS INTEGER.
DEFINE VARIABLE dir_name AS CHARACTER FORMAT "x(64)"
LABEL "Enter the name of the directory you want to create.".

UPDATE dir_name.
OS-CREATE-DIR VALUE(dir_name).
stat = OS-ERROR.
IF stat NE 0 THEN
   MESSAGE "Directory not created. System Error #" stat.

Hope this helps,
-Chris