1 -- Created on: 1994-06-16
2 -- Created by: EXPRESS->CDL V0.2 Translator
3 -- Copyright (c) 1994-1999 Matra Datavision
4 -- Copyright (c) 1999-2014 OPEN CASCADE SAS
6 -- This file is part of Open CASCADE Technology software library.
8 -- This library is free software; you can redistribute it and / or modify it
9 -- under the terms of the GNU Lesser General Public version 2.1 as published
10 -- by the Free Software Foundation, with special exception defined in the file
11 -- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
12 -- distribution for complete text of the license and disclaimer of any warranty.
14 -- Alternatively, this file may be used under the terms of Open CASCADE
15 -- commercial license or contractual agreement.
17 class FileName from HeaderSection
19 inherits TShared from MMgt
23 HAsciiString from TCollection,
24 HArray1OfHAsciiString from Interface
27 Create returns mutable FileName;
28 ---Purpose: Returns a FileName
31 aName : mutable HAsciiString from TCollection;
32 aTimeStamp : mutable HAsciiString from TCollection;
33 aAuthor : mutable HArray1OfHAsciiString from Interface;
34 aOrganization : mutable HArray1OfHAsciiString from Interface;
35 aPreprocessorVersion : mutable HAsciiString from TCollection;
36 aOriginatingSystem : mutable HAsciiString from TCollection;
37 aAuthorisation : mutable HAsciiString from TCollection);
39 -- Specific Methods for Field Data Access --
41 SetName(me : mutable; aName : mutable HAsciiString);
42 Name (me) returns mutable HAsciiString;
43 SetTimeStamp(me : mutable; aTimeStamp : mutable HAsciiString);
44 TimeStamp (me) returns mutable HAsciiString;
45 SetAuthor(me : mutable; aAuthor : mutable HArray1OfHAsciiString);
46 Author (me) returns mutable HArray1OfHAsciiString;
47 AuthorValue (me; num : Integer) returns mutable HAsciiString;
48 NbAuthor (me) returns Integer;
49 SetOrganization(me : mutable; aOrganization : mutable HArray1OfHAsciiString);
50 Organization (me) returns mutable HArray1OfHAsciiString;
51 OrganizationValue (me; num : Integer) returns mutable HAsciiString;
52 NbOrganization (me) returns Integer;
53 SetPreprocessorVersion(me : mutable; aPreprocessorVersion : mutable HAsciiString);
54 PreprocessorVersion (me) returns mutable HAsciiString;
55 SetOriginatingSystem(me : mutable; aOriginatingSystem : mutable HAsciiString);
56 OriginatingSystem (me) returns mutable HAsciiString;
57 SetAuthorisation(me : mutable; aAuthorisation : mutable HAsciiString);
58 Authorisation (me) returns mutable HAsciiString;
62 name : HAsciiString from TCollection;
63 timeStamp : HAsciiString from TCollection;
64 author : HArray1OfHAsciiString from Interface;
65 organization : HArray1OfHAsciiString from Interface;
66 preprocessorVersion : HAsciiString from TCollection;
67 originatingSystem : HAsciiString from TCollection;
68 authorisation : HAsciiString from TCollection;