umpsysenv.pas

Software Requirements1. Delphi 6 SP22. Oracle 8i R33. Raize 3.0.94. ExpressQuantumGrid 4.505. Expres

unit UMPSysEnv;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, UPersistModel,
  MyTools;

type
  TMPSysEnv = class(TPersistModel)
  private
    FEmployeeKey: IIntegerKey;
  public
    property EmployeeKey: IIntegerKey read FEmployeeKey write FEmployeeKey;
  end;

var
  MPSysEnv: TMPSysEnv;

implementation

{$R *.dfm}

end.