Global Data for PROGTOOL
----------------------------
ASCIIFileName        - CSTRING(80)
Glo:AppVersion       - DECIMAL(4,2)
Glo:FileDescription  - STRING(60)
Glo:FileName         - STRING(12)
Glo:OwnerFile        - STRING(3)
Glo:OwnerSysID       - LONG
Glo:TableTitle       - STRING(60)
GlobalRequest      - LONG(0),THREAD
GlobalResponse     - LONG(0),THREAD
PrintPreviewQueue  - QUEUE
PrintPreviewImage      STRING(80)
                     END

File Definitions for PROGTOOL
---------------------------------

Notes                  FILE,DRIVER('TOPSPEED'),RECLAIM,PRE(Nts)
AccessKey                KEY(Nts:OwnerFile,Nts:OwnerSysID,Nts:EditDate,Nts:EditTime),NOCASE
Notes                       MEMO(1200)   - Memo containing notes
Record                   RECORD
OwnerFile                   STRING(3)    - Prefix of Owner File
OwnerSysID                  LONG         - Sys ID of Owner file record
Title                       STRING(60)   - Title of Note
EditDate                    LONG         - Date Note was Edited
EditTime                    LONG         - Time Note was Edited
                         END
                       END

People                 FILE,DRIVER('TOPSPEED'),RECLAIM,PRE(Peo)
SysIDKey                 KEY(Peo:RolSysID),NOCASE,PRIMARY
NameKey                  KEY(Peo:LastName,Peo:FirstName),DUP,NOCASE
CompanyKey               KEY(Peo:Company,Peo:LastName,Peo:FirstName),DUP,NOCASE
Record                   RECORD
RolSysID                    LONG         - System ID
LastName                    STRING(20)   - Last Name
FirstName                   STRING(20)   - First Name
Company                     STRING(40)   - Company Name
Position                    STRING(40)   - Job Position
PbkSysID                    BYTE         - Phonebook for entry
                         END
                       END

Telephone              FILE,DRIVER('TOPSPEED'),RECLAIM,PRE(TEL)
SysIDKey                 KEY(TEL:RolSysID,TEL:Location),DUP,NOCASE
Record                   RECORD
RolSysID                    LONG         - Rolodex System ID
Location                    STRING(10)   - Location of Telephone
Area                        SHORT        - Area Code
Phone                       LONG         - Telephone Number
                         END
                       END

Phonebk                FILE,DRIVER('TOPSPEED'),RECLAIM,PRE(Pbk)
SysIDKey                 KEY(Pbk:SysID),NOCASE,PRIMARY
DescKey                  KEY(Pbk:Desc),NOCASE
Record                   RECORD
SysID                       LONG         - System ID
Desc                        STRING(20)   - Description
                         END
                       END

