unit OrderMstProdPlanR;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  wRelation, OrderMst;

type
  TOrderMstProdPlanR = class(TwRelation)
  private
    { Private declarations }
  protected
    { Protected declarations }
  public
    { Public declarations }
    constructor Create(AOwner: TObject);// override;
    destructor Destroy; override;
  published
    { Published declarations }
  end;

implementation

uses
  ProductPlan;

{ TOrderMstProdPlanR }

constructor TOrderMstProdPlanR.Create(AOwner: TObject);
begin
  Name := '';
  wClassName := 'OrderMstProdPlanR';
  CreateDate := FormatDateTime('yyyy-MM-dd',Now);
  CreateTime := FormatDateTime('HH:nn:ss',Now);
  IsValid := 't';
  LClassName := 'OrderMst';
  RClassName := 'ProductPlan';
end;

destructor TOrderMstProdPlanR.Destroy;
begin

  inherited;
end;

end.