diff --git a/components/tvplanit/source/addons/zeos/vpzeosds.pas b/components/tvplanit/source/addons/zeos/vpzeosds.pas index f26f1aeac..75237f218 100644 --- a/components/tvplanit/source/addons/zeos/vpzeosds.pas +++ b/components/tvplanit/source/addons/zeos/vpzeosds.pas @@ -89,20 +89,35 @@ begin FConnection.ExecuteDirect( 'CREATE TABLE Contacts ('+ 'RecordID INTEGER NOT NULL PRIMARY KEY AUTOINCREMENT, '+ - 'ResourceID INTEGER,' + - 'FirstName VARCHAR(50) ,'+ - 'LastName VARCHAR(50) , '+ + 'ResourceID INTEGER, ' + + 'FirstName VARCHAR(50), '+ + 'LastName VARCHAR(50), '+ + 'Title VARCHAR(20) ,'+ + 'Category INTEGER, '+ + 'PathToPhoto VARCHAR(255), '+ 'Birthdate DATE, '+ 'Anniversary DATE, '+ - 'Title VARCHAR(50) ,'+ 'Company VARCHAR(50) ,'+ 'Job_Position VARCHAR(30), '+ - 'Address VARCHAR(100), '+ - 'City VARCHAR(50), '+ - 'State VARCHAR(25), '+ - 'Zip VARCHAR(10), '+ - 'Country VARCHAR(25), '+ + 'AddressType1 INTEGER, '+ + 'Address1 VARCHAR(100), '+ + 'City1 VARCHAR(50), '+ + 'State1 VARCHAR(25), '+ + 'Zip1 VARCHAR(10), '+ + 'Country1 VARCHAR(25), '+ + 'AddressType2 INTEGER, '+ + 'Address2 VARCHAR(100), '+ + 'City2 VARCHAR(50), '+ + 'State2 VARCHAR(25), '+ + 'Zip2 VARCHAR(10), '+ + 'Country2 VARCHAR(25), '+ 'Notes VARCHAR(1024), '+ + 'EMail1 VARCHAR(100), '+ + 'EMail2 VARCHAR(100), '+ + 'EMail3 VARCHAR(100), '+ + 'EMailType1 INTEGER, '+ + 'EMailType2 INTEGER, '+ + 'EMailType3 INTEGER, '+ 'Phone1 VARCHAR(25), '+ 'Phone2 VARCHAR(25), '+ 'Phone3 VARCHAR(25), '+ @@ -113,8 +128,10 @@ begin 'PhoneType3 INTEGER, '+ 'PhoneType4 INTEGER, '+ 'PhoneType5 INTEGER, '+ - 'Category INTEGER, '+ - 'EMail VARCHAR(100), '+ + 'Website1 VARCHAR(100), '+ + 'Website2 VARCHAR(100), '+ + 'WebsiteType1 INTEGER, '+ + 'WebsiteType2 INTEGER, '+ 'Custom1 VARCHAR(100), '+ 'Custom2 VARCHAR(100),'+ 'Custom3 VARCHAR(100), '+