unit ULBType;
 { Baseline records owner }
interface
uses
  UlanType, ULRecTyp;{ULREC.LST}

const
  ULBID = ord('U') + 256*ord('L') + 256*256*ord('B');

type
  TULBRec = packed record {<ChildSorted=1 ChildRecIDs=ULBRID Uses=ULBRType
    RootChild=1 Caption="Baseline" Enabled=1 Visible=1 BrowseOnEdit=1
    SortedByNumber=1>}
    {old - Create="SetFlag(rfChildAllowed + rfChildSorted, true);"}
    Head: TULRecHead;
    Info: TULRecInfo;
    BaseLineName: TBaseLineName;{<Enabled=1>}
      { Name of the baseline definition. }
    BaseLineFileName: TULFileName;{<Enabled=1>}
      { Name of the file, where is the baseline definition stored. }
  end;
  PULBRec = ^TULBRec;

implementation

end.
