FT_SAVEARR()
Save Clipper array to a disc file.
──────────────────────────────────────────────────────────────────────────────

Syntax

FT_SAVEARR( <aArray>, <cFileName>, <nErrorCode> ) -> lRet

Arguments

<aArray> is any Clipper array except those containing
compiled code blocks.

<cFileName> is a DOS file name.

<nErrorCode> will return any DOS file error.

All arguments are required.

Returns

.F. if there was a DOS file error or the array contained
code blocks, otherwise returns .T.

Description

FT_SAVEARR() saves any Clipper array, except those
containing compiled code blocks, to a disc file. The
array can be restored from the disc file using
FT_RESTARR().

[10/1/92 Librarian note:

This function does not appear to work with multi-dimensional
arrays. If you'd care to modify it to support this feature,
please do and send it to Glenn Scott 71620,1521.]


Examples

aArray := { {'Invoice 1',CTOD('04/15/91'),1234.32,.T.},;
{'Invoice 2',DATE(),234.98,.F.},;
{'Invoice 3',DATE() + 1,0,.T.} }
nErrorCode := 0
FT_SAVEARR(aArray,'INVOICE.DAT',@nErrorCode)
IF nErrorCode = 0
aSave := FT_RESTARR('INVOICE.DAT',@nErrorCode)
IF nErrorCode # 0
? 'Error restoring array'
ENDIF
ELSE
? 'Error writing array'
ENDIF


Source: SAVEARR.PRG

Author: David Barrett