dbdef.pas

来自「详细说明:毕业论文中关于小型宾馆管理系统的详细设计毕 业论文中关于小型宾馆...」· PAS 代码 · 共 45 行

//
// Database definitions. This module contains the Pascal definitions
// for the database tables and user types in the PODMS database.
//
// NOTE: If you add a new table, then do the following:
//
//  1) Add any new user definable data types
//  2) Define the database definition
//  3) Add entries PODMS_KEYS (if primary keys is an auto-created integer)
//  4) Add entries to KeysRecord record (if step 3 was performed)
//  5) Update TDSThread.LoadKeys (if step 3 was performed)
//  6) Update TDSThread.GetNewIntegerKey (if step 3 was performed)
//  7) Update TDSThread.ReadLastKeyValue (if step 3 was performed)
//  8) Add the entry to EPODMS_TABLE_TYPE enum (PODMS Constants type library)
//  9) Add the entry to the PODMS_TABLE record
// 10) Update the TableName function (see dbfuncs.pas)
// 11) Update the PODMS Constants type library to add the columns to the
//     enumerator, e.g. see EAS_TRANSACTIONS
//
// (c) Chicony Software 2001
//
// When       Who  Why
// ---------  ---  ------------------------------------------------------------
// 2001.6.7   century Initial version
//
unit dbdef;

interface

uses dbtables, classes,
     // PODMS modules
     Constants_TLB;

//---------------------------------------------------------------------------
//
// PODMS database user-definable data types
//
type G_T_BIT = Boolean;                    // Leave as Boolean even if the RDBMS
                                           // does not support it - this is what
                                           // clients use
type DATETIME = TDateTime;                 // Leave as TDateTime even if the RDBMS
                                           // does not support it - this is what
                                           // clients use

type G_T_INT32 = LongInt;                  // 32-bits (signed,