[<<Previous Entry]
[^^Up^^]
[Next Entry>>]
[Menu]
[About The Guide]
R_CPName()
Determines the original name of a compressed file
------------------------------------------------------------------------------
Syntax
cFileName := R_CPName ( cCmpFile )
Arguments
cCmpFile File specification of a compressed file
Format : [drive:][\path\]filename[.ext]
Example : C:\INVOICE\INVOICE.#BF
Returns
cFileName Original name of the compressed file.
If an error is detected (p.e. the specified input
file doesn't exist) a NIL pointer will be returned.
The error can be examined using the R_LastErr ()
function.
Description
Determines what the file name of a file was before it was
compressed by R_Compress ().
Example
*-- Compresses the file INVOICE.DBF => INVOICE.#BF and determines
*-- the original file name
*-- header file of RCmpLib
#include "RCmpLib.CH"
LOCAL nRetCode && Return code R_Compress
nRetCode := R_Compress ( 'INVOICE.DBF', 'INVOICE.#BF' )
IF nRetCode = CP_OKAY
*-- Compression okay : delete the original file
FErase ( 'INVOICE.DBF' )
?'The original name of INVOICE.#BF was : ', ;
R_CPName ( 'INVOICE.#BF' )
*-- Results to : 'INVOICE.DBF'
ENDIF
See Also:
R_Compress()
R_CPSize()
R_LastErr()
This page created by ng2html v1.05, the Norton guide to HTML conversion utility.
Written by Dave Pearson