Category : Financial and Statistics
Archive   : FC4.ZIP
Filename : FC4TECH.DOC

 
Output of file : FC4TECH.DOC contained in archive : FC4.ZIP

(* intended for reference only not to compile or run

Fred's Checkbook!
Technical Specifications
of file structures

History

The original Fred's was written in Microsoft BASIC in 1984.
It was published by a company called U.S. Digital Corp. under
the name Personal Revenue Enhancement Program or PREP. The
publisher had some financial problems and went chapter 11.

I released it as Shareware in 1986, while I was working
on a rewrite in Turbo Pascal ver. 2.0. Fred's has always
been a back burner project though it was something I really
wanted to do, it was only worked on in my spare time.

The Turbo Pascal version was finally released in early 1988
as Financial Consultant 3.0. Some minor changes were made
during the year to version 3.2. That was the latest version
which had been upgraded twice because of compiler changes
from Turbo Pascal 3.0 to 4.0 and now 5.0. Although Borland
is pretty good about compatibility between versions, many
hours were spent switching from one version to the next.

You may notice a few extra bytes that are unused in some
of the records. Those are for future versions & features.

Data file record structures for Fred's Checkbook! ver 4.0:

type

EntryRec = record
NA1, { To be announced }
NA2, { To be announced }
NA3, { To be announced }
NA4, { To be announced }
NA5, { To be announced }
Chart : word; {seek record number in FC4CHART.DTA}
Entry : string[8];
Date : string[8];
Description : string[35];
Amount : real;
Expense : string[5];
Cleared : char;
end;

ExpnsRec = record
IdStatus : char;
Family,
ID : string[5];
IdDef : string[25];
NextID,

PrevID : word;
end;

AcctRec = record
AcctName : string[37];
NextCheck,
Balance : real;
NA6, { To be announced }
NA7, { To be announced }
reserved1,
reserved2 : word;
end;

UserAttr = record
DataDrivePath : str30;
PrnNum : 1..3;
HelpDrivePath : str30;
WindowColor : array [1..6] of byte;
CheckPrintPos : array [1..2,1..8] of byte;
Calc,Cndr : char;
MakeNoise : boolean;
CalcDecimal,
PgLen,
RtMgn,LtMgn,
TpMgn,BmMgn : integer;
end;

ChartRec = record
AcctNum : string[25];
Name,
Addr1,
Addr2,
City,
Phone,
Memo : string[35];
ID : string[5];
Amount : real;
end;
*)