CBL_COPY_FILE

The CBL_COPY_FILE library routine copies a file.

FILE-PREFIX settings are ignored by this routine.

Syntax:

CALL "CBL_COPY_FILE" USING sourceFile                             destFile                            [flagPreserve]                      GIVING returnCode

Parameters:

sourceFile	PIC X(n)	Specifies the filename to be copied.   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.
destFile	PIC X(n)	Specifies the destination filename.   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.
flagPreserve	PIC 9	Optional parameter. If set to "1" applies the source file last modification date and time to the destination file. If set to "0" or omitted, the destination file is created with the current date and time.

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 - Copy a report from main reports folder to users folder

*> Define src-file and dest-file as pic x(n) move "c:\app1\reports\repcustomers.lst" to src-file move "c:\users\adam\reports\repcustomers.lst" to dest-file call "cbl_copy_file" using src-file dest-file if return-code not = 0    display message "Copy failed" end-if