Is the timetrans class code inside of the timesheet.prg file?

If so, what you have should work.

>Steve,
> The book supplied the following .pgm to test the class, that is where I am getting the error. "Class Definition "timetrans" is not found".
>
>

SET CLASSLIB TO timesheet
>
>ox = CreateObject("TimeTrans")
>
>ox.Add()
>ox.cEmployee = "MB"
>ox.dDate = {^1998-08-01}
>ox.cClient = "SAMS"
>ox.cService = "PROGRAM"
>ox.cDescription = "Work on the book"
>ox.nHours = 8.25
>ox.Save()
>
>ox.Add()
>ox.cEmployee = "MB"
>ox.dDate = {^1998-08-02}
>ox.cClient = "SAMS"
>ox.cService = "USERDOC"
>ox.cDescription = "Write on the book"
>ox.nHours = 8
>ox.Save()
>