blob: 202b26254709e3fb939c268c8bb71c38a887d109 (
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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
|
-- File: Person.cdl
-- Created: Fri Dec 1 11:11:24 1995
-- Author: EXPRESS->CDL V0.2 Translator
-- Copyright: Matra-Datavision 1993
class Person from StepBasic
inherits TShared from MMgt
uses
HAsciiString from TCollection,
HArray1OfHAsciiString from Interface,
Boolean from Standard
is
Create returns mutable Person;
---Purpose: Returns a Person
Init (me : mutable;
aId : mutable HAsciiString from TCollection;
hasAlastName : Boolean from Standard;
aLastName : mutable HAsciiString from TCollection;
hasAfirstName : Boolean from Standard;
aFirstName : mutable HAsciiString from TCollection;
hasAmiddleNames : Boolean from Standard;
aMiddleNames : mutable HArray1OfHAsciiString from Interface;
hasAprefixTitles : Boolean from Standard;
aPrefixTitles : mutable HArray1OfHAsciiString from Interface;
hasAsuffixTitles : Boolean from Standard;
aSuffixTitles : mutable HArray1OfHAsciiString from Interface) is virtual;
-- Specific Methods for Field Data Access --
SetId(me : mutable; aId : mutable HAsciiString);
Id (me) returns mutable HAsciiString;
SetLastName(me : mutable; aLastName : mutable HAsciiString);
UnSetLastName (me:mutable);
LastName (me) returns mutable HAsciiString;
HasLastName (me) returns Boolean;
SetFirstName(me : mutable; aFirstName : mutable HAsciiString);
UnSetFirstName (me:mutable);
FirstName (me) returns mutable HAsciiString;
HasFirstName (me) returns Boolean;
SetMiddleNames(me : mutable; aMiddleNames : mutable HArray1OfHAsciiString);
UnSetMiddleNames (me:mutable);
MiddleNames (me) returns mutable HArray1OfHAsciiString;
HasMiddleNames (me) returns Boolean;
MiddleNamesValue (me; num : Integer) returns mutable HAsciiString;
NbMiddleNames (me) returns Integer;
SetPrefixTitles(me : mutable; aPrefixTitles : mutable HArray1OfHAsciiString);
UnSetPrefixTitles (me:mutable);
PrefixTitles (me) returns mutable HArray1OfHAsciiString;
HasPrefixTitles (me) returns Boolean;
PrefixTitlesValue (me; num : Integer) returns mutable HAsciiString;
NbPrefixTitles (me) returns Integer;
SetSuffixTitles(me : mutable; aSuffixTitles : mutable HArray1OfHAsciiString);
UnSetSuffixTitles (me:mutable);
SuffixTitles (me) returns mutable HArray1OfHAsciiString;
HasSuffixTitles (me) returns Boolean;
SuffixTitlesValue (me; num : Integer) returns mutable HAsciiString;
NbSuffixTitles (me) returns Integer;
fields
id : HAsciiString from TCollection;
lastName : HAsciiString from TCollection; -- OPTIONAL can be NULL
firstName : HAsciiString from TCollection; -- OPTIONAL can be NULL
middleNames : HArray1OfHAsciiString from Interface; -- OPTIONAL can be NULL
prefixTitles : HArray1OfHAsciiString from Interface; -- OPTIONAL can be NULL
suffixTitles : HArray1OfHAsciiString from Interface; -- OPTIONAL can be NULL
hasLastName : Boolean from Standard;
hasFirstName : Boolean from Standard;
hasMiddleNames : Boolean from Standard;
hasPrefixTitles : Boolean from Standard;
hasSuffixTitles : Boolean from Standard;
end Person;
|
