home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload
/
ShartewareOverload.cdr
/
busi
/
fc4.zip
/
FC4TECH.DOC
< prev
next >
Wrap
Text File
|
1989-04-11
|
3KB
|
94 lines
(* 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;
*)