1 TYPE BODY ST_ANNOTATIONTEXTELEMENT IS
2 MEMBER FUNCTION Value Return VARCHAR2 is
3 BEGIN
4 RETURN SELF.privateValue;
5 END;
6
7 MEMBER FUNCTION Value(Value VARCHAR2) RETURN ST_ANNOTATIONTEXTELEMENT IS
8 BEGIN
9 RETURN ST_ANNOTATIONTEXTELEMENT(value, SELF.PRIVATELOCATION,
10 SELF.PRIVATELEADERLINE, SELF.PRIVATETEXTATTRIBUTES);
11 END;
12
13 MEMBER FUNCTION Location Return SDO_GEOMETRY is
14 BEGIN
15 RETURN SELF.privateLocation;
16 END;
17
18 MEMBER FUNCTION Location(Location SDO_GEOMETRY)
19 RETURN ST_ANNOTATIONTEXTELEMENT IS
20 BEGIN
21 RETURN ST_ANNOTATIONTEXTELEMENT(SELF.Value, LOCATION,
22 SELF.PRIVATELEADERLINE, SELF.PRIVATETEXTATTRIBUTES);
23 END;
24
25 MEMBER FUNCTION LeaderLine Return SDO_GEOMETRY is
26 BEGIN
27 RETURN SELF.privateLeaderLine;
28 END;
29
30 MEMBER FUNCTION LeaderLine(LeaderLine SDO_GEOMETRY)
31 RETURN ST_ANNOTATIONTEXTELEMENT IS
32 BEGIN
33 RETURN ST_ANNOTATIONTEXTELEMENT(SELF.Value, SELF.PRIVATELOCATION,
34 LEADERLINE, SELF.PRIVATETEXTATTRIBUTES);
35 END;
36
37 MEMBER FUNCTION TextAttributes Return VARCHAR2 is
38 BEGIN
39 RETURN SELF.privateTextAttributes;
40 END;
41
42 MEMBER FUNCTION TextAttributes(TextAttributes VARCHAR2)
43 RETURN ST_ANNOTATIONTEXTELEMENT IS
44 BEGIN
45 RETURN ST_ANNOTATIONTEXTELEMENT(SELF.Value, SELF.PRIVATELOCATION,
46 SELF.PRIVATELEADERLINE, TEXTATTRIBUTES);
47 END;
48 END;