unit ProductPlanWorkSchR; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, wRelation; type TProductPlanWorkSchR = class(TwRelation) private { Private declarations } FOrdNum: string; FStartDate: string; FStartTime: string; FEndDate: string; FEndTime: string; FStatus: string; FDescriptions: string; protected { Protected declarations } public { Public declarations } published { Published declarations } property OrdNum: string read FOrdNum write FOrdNum; property StartDate: string read FStartDate write FStartDate; property StartTime: string read FStartTime write FStartTime; property EndDate: string read FEndDate write FEndDate; property EndTime: string read FEndTime write FEndTime; property Status: string read FStatus write FStatus; property Descriptions: string read FDescriptions write FDescriptions; end; implementation end.