blob: 57eec212013fddb614eb276a334bf66b04370013 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
-- File: StepBasic_DocumentType.cdl
-- Created: Tue Jun 30 15:03:22 1998
-- Author: Christian CAILLET
-- <cky@heliox.paris1.matra-dtv.fr>
---Copyright: Matra Datavision 1998
class DocumentType from StepBasic inherits TShared from MMgt
uses
HAsciiString from TCollection
is
Create returns mutable DocumentType;
Init (me : mutable; apdt : HAsciiString);
ProductDataType (me) returns HAsciiString;
SetProductDataType (me : mutable; apdt : HAsciiString);
fields
thepdt : HAsciiString;
end DocumentType;
|