... LOCAL aArray := { {'Invoice 1', CTOD('04/15/91'), 1234.32, .T.},; {'Invoice 2', DATE(), 234.98, .F.},; {'Invoice 3', DATE() + 1, 0, .T.} }, aSave LOCAL nErrorCode := 0 FT_SAVEARR(aArray,'INVOICE.DAT',@nErrorCode) IF nErrorCode = 0 CLS DispArray(aArray) aSave := FT_RESTARR('INVOICE.DAT',@nErrorCode) ...