| Class TSkillSetsDM (unit SkillSet) |
TDataModule
| Constructors |
| Functions |
procedure Mny2MnySQLNewRecord(DataSet: TDataSet);
procedure ByPeople;
procedure BySkills;Set view indicator
procedure CheckAutoAdd;Reset view indicator
| Properties |
| Events |
| Variables |
DetailDS : TDataSource;
MasterDS : TDataSource;
Mny2MnyDS : TDataSource;
Mny2MnySQL : TQuery;
PeopleTB : TTable;
PeopleTBEmpID : TStringField;
PeopleTBFirstName : TStringField;
PeopleTBLastName : TStringField;
PersonSkillsSQL : TQuery;
PersonSkillsSQLACQUIRED : TDateField;
PersonSkillsSQLCERTIFIED : TStringField;
PersonSkillsSQLDESCRIP : TStringField;
PersonSkillsSQLEMPID : TStringField;
PersonSkillsSQLSKILLID : TStringField;
PersonSkillsSQLSKILLTYPE : TStringField;
SkilledPeopleSQL : TQuery;
SkilledPeopleSQLEMPID : TStringField;
SkilledPeopleSQLFIRSTNAMELASTNAME : TStringField;
SkilledPeopleSQLSKILLID : TStringField;
SkillsTB : TTable;
SkillsTBDescrip : TStringField;
SkillsTBDuration : TSmallintField;
SkillsTBRenewable : TStringField;
SkillsTBSkillID : TStringField;
SkillsTBSkillType : TStringField;
ViewingByPeople : Boolean;| Constructors |
| Functions |
procedure Mny2MnySQLNewRecord(DataSet: TDataSet);
procedure ByPeople;Maintains Many-to-many viewing perspective
procedure BySkills;To view by People
Set view indicator
procedure CheckAutoAdd;To view by Skills
Reset view indicator
| Properties |
| Events |
| Variables |
DetailDS : TDataSource;
MasterDS : TDataSource;
Mny2MnyDS : TDataSource;
Mny2MnySQL : TQuery;
PeopleTB : TTable;
PeopleTBEmpID : TStringField;
PeopleTBFirstName : TStringField;
PeopleTBLastName : TStringField;
PersonSkillsSQL : TQuery;
PersonSkillsSQLACQUIRED : TDateField;
PersonSkillsSQLCERTIFIED : TStringField;
PersonSkillsSQLDESCRIP : TStringField;
PersonSkillsSQLEMPID : TStringField;
PersonSkillsSQLSKILLID : TStringField;
PersonSkillsSQLSKILLTYPE : TStringField;
SkilledPeopleSQL : TQuery;
SkilledPeopleSQLEMPID : TStringField;
SkilledPeopleSQLFIRSTNAMELASTNAME : TStringField;
SkilledPeopleSQLSKILLID : TStringField;
SkillsTB : TTable;
SkillsTBDescrip : TStringField;
SkillsTBDuration : TSmallintField;
SkillsTBRenewable : TStringField;
SkillsTBSkillID : TStringField;
SkillsTBSkillType : TStringField;
ViewingByPeople : Boolean;