CBL_RENAME_FILE

The CBL_RENAME_FILE library routine renames a file.

FILE-PREFIX settings are ignored by this routine.

Syntax:

CALL "CBL_RENAME_FILE" USING oldName                                newName                        GIVING returnCode

Parameters:

oldName	PIC X(n)	Specifies the name of the file that you want to rename. If no path is given, then the current directory is assumed.   The name can be partially or entirely changed through configuration properties if iscobol.file.env_naming (boolean) is set to true. If the name is a relative path and iscobol.file.prefix is set, then FILE-PREFIX paths are used to locate the file.
newName	PIC X(n)	Specifies the new name for the file. If no path is given, then the current directory is assumed.   The name can be partially or entirely changed through configuration properties if iscobol.file.env_naming (boolean) is set to true. If the name is a relative path and iscobol.file.prefix is set, then FILE-PREFIX paths are used to locate the file.

Return code:

returnCode can be any numeric data item and provides additional information:

0	Operation successful.
14605	Not found.
14613	Directory.
14628	Exists.
14629	No permission.

Examples:

Example - Rename file to append the date it was generated

*> define curr-date as pic x(6) *> new-name and old-name as pic x(n) accept curr-date from date initialize new-name string "c:\app1\reps\cust-report-"        curr-date        ".lst"   into new-name end-string move "c:\app1\reps\cust-report.lst" to old-name call "cbl_rename_file" old-name new-name if return-code not = 0    display message "Rename operation failed" end-if