paradox 11 and creating a database

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

spyregyre@gmail.com - 24 Aug 2008 00:41 GMT

I've asked a few questions before and the answers were really helpful.

I'm an attorney who does a large number (>500) of cases every year.
These cases are short from beginning to end, about 60 days. Because I
use Wordperfect for most of my documents, I'd like to set up a paradox
database to use for merging my WP docs and also for billing. The
billing is not very complicated. It is usually a flat fee and no
hourly charges.

I need to keep track of about 6-10 billing events and up to 6 persons
on each case.

I learn quickly and have a basic understanding at this point. I've
already created a database for the client information but want to
expand it.

Any information would be helpful. I also anticipate handing this off
to a programmer for more complicated issues.

To start I would like some help on the following issues.

I need a record number that is related to the year and the actual file
number (e.g. 08-0001) how do I have that show up and advance one for
each record I create?

I have some vista machines but plan on running the db on an xp box.
What is a good front end program for Vista?

thanks.

j.

Reply to this Message

Bill McCray - 24 Aug 2008 01:43 GMT

> I've asked a few questions before and the answers were really helpful.
>
[quoted text clipped - 20 lines]
> number (e.g. 08-0001) how do I have that show up and advance one for
> each record I create?

I may not get the syntax exactly right; I don't write in OPAL that
often. I'm sure we'll get corrections if I'm wrong.

Create a table (say CaseNum), with one integer field (say CaseNo), and
one record. At the start of each year, initialize the field to the
value of 1.

Var
    Yr, Case    String
    I                    Integer
    TC                TCursor
EndVar

Yr = Year(Today())
Yr = Yr.Substr(Yr.Size() - 1, 2) ; extracts last two digits of year
TC.Open("CaseNum")        ; might want some error checking here
TC.Edit()
I = TC."CaseNo"
TC."CaseNo" = I + 1 ; increment case number for the next case
TC.Close()
Case = "000" + string(I)    ; adds leading zeroes
Case = Case.Substr(Case.Size() - 3, 4) ; extracts last four digits

Your case number then is Yr + "-" + Case

Afterthought: you could put another field in your table in which the
year is stored. Don't get the year from there, but after opening the
table and turning Edit on, compare the year stored there with the year
you got in the first two statements. If they are the same, continue
as above. If they are different, set the year field to the current
year and set the case number to 1. Then continue with the rest of the
statements.

Bill

----------------------------------------------------------------
Reverse parts of the user name and ISP name for my e-address

Reply to this Message

Dennis Santoro - 25 Aug 2008 16:49 GMT

To get started I suggest you consider looking at my Database Basics
paper and my Normalization primer (link in my signature) before you go
too far. These will help you with basics and keep you looking to best
practices and help you avoid common pitfalls.

The incrementation is fairly easy and there are a number of threads on
doing it yourself (search for increment). There is also a fairly full
set of code in the faqs if you want to figure it out and there is the
full featured AutoKey available on our Products page if you would rather
just learn how to plug it in There is also a demo program available to
help there in the deluxe version). In this case you wold need to use the
prefix and padding features. It also can generate all your other table keys.

Not sure what you mean about front end program for vista. Why not just
use paradox if you are already going that way for XP?

HTH

Denn Santoro
President
Resource Development Associates
http://www.RDAWorldWide.Com
Offices in the United States and Germany
Providing solutions to health care, business, governments and
non-profits since 1982

> I've asked a few questions before and the answers were really helpful.
>
[quoted text clipped - 27 lines]
>
> j.

Reply to this Message