Project

General

Profile

skeleton.6410a.patch

Marian Edu, 05/03/2023 12:57 PM

Download (82.3 KB)

View differences:

new/oo4gl/OpenEdge/Core/Collections/List.cls 2023-05-03 11:41:13 +0000
2 2
	inherits OpenEdge.Core.Collections.AbstractTTCollection
3 3
	implements OpenEdge.Core.Collections.IList, 
4 4
		OpenEdge.Core.Collections.ICollection, 
5
		OpenEdge.Core.Collections.IIterable:
5
		OpenEdge.Core.Collections.IIterable serializable:
6 6

  
7 7
	constructor public List ():
8 8
	end.
......
10 10
	constructor public List ( list as OpenEdge.Core.Collections.IList):
11 11
	end.
12 12

  
13
	constructor protected List ( poCol as OpenEdge.Core.Collections.ICollection, phtt as handle, pcField as character):
14
	end.
15

  
16 13
	constructor protected List ( phtt as handle, pcField as character):
17 14
	end.
18 15

  
19 16
	constructor protected List ( phtt as handle, hField as handle):
20 17
	end.
21 18

  
22
	method protected override void FindBufferUseObject ( findObject as Progress.Lang.Object):
19
	constructor protected List ( poCol as OpenEdge.Core.Collections.ICollection, phtt as handle, pcField as character):
23 20
	end.
24 21

  
25
	/* BUFFER PARAMETER *
26
	method protected void FindBufferUseObject ( findObject as Progress.Lang.Object,  pbList as buffer):
22
	method public override logical Add ( obj as Progress.Lang.Object):
27 23
	end.
28
	*/
29 24

  
30 25
	method public logical Add ( seq as integer, obj as Progress.Lang.Object):
31 26
	end.
32 27

  
33
	method public override logical Add ( obj as Progress.Lang.Object):
34
	end.
35

  
36 28
	method public override logical AddAll ( c as OpenEdge.Core.Collections.ICollection):
37 29
	end.
38 30

  
......
45 37
	method public override logical Equals ( o as Progress.Lang.Object):
46 38
	end.
47 39

  
40
	method protected override void FindBufferUseObject ( findObject as Progress.Lang.Object):
41
	end.
42

  
43
	/* BUFFER PARAMETER *
44
	method protected void FindBufferUseObject ( findObject as Progress.Lang.Object,  pbList as buffer):
45
	end.
46
	*/
47

  
48 48
	method public Progress.Lang.Object Get ( i as integer):
49 49
	end.
50 50

  
......
54 54
	method public override OpenEdge.Core.Collections.IIterator Iterator ():
55 55
	end.
56 56

  
57
	method public integer LastIndexOf ( obj as Progress.Lang.Object):
58
	end.
59

  
57 60
	method public OpenEdge.Core.Collections.IListIterator ListIterator ():
58 61
	end.
59 62

  
60 63
	method public OpenEdge.Core.Collections.IListIterator ListIterator ( i as integer):
61 64
	end.
62 65

  
63
	method public integer LastIndexOf ( obj as Progress.Lang.Object):
64
	end.
65

  
66 66
	method public override logical Remove ( oldObject as Progress.Lang.Object):
67 67
	end.
68 68

  
new/oo4gl/OpenEdge/Core/Collections/StringCollection.cls 2023-05-03 11:41:13 +0000
13 13
	method public logical Add ( newObject as OpenEdge.Core.String):
14 14
	end.
15 15

  
16
	method public logical Add ( pcElement as longchar):
17
	end.
18

  
19
	method public logical AddAll ( poCollection as OpenEdge.Core.Collections.IStringCollection):
20
	end.
21

  
16 22
	method public logical AddArray ( poArray as OpenEdge.Core.String extent ):
17 23
	end.
18 24

  
25
	method public logical AddArray ( pcElements as longchar extent ):
26
	end.
27

  
28
	method public logical Contains ( checkObject as OpenEdge.Core.String):
29
	end.
30

  
31
	method public logical Contains ( pcElement as longchar):
32
	end.
33

  
19 34
	method public logical Remove ( oldObject as OpenEdge.Core.String):
20 35
	end.
21 36

  
22
	method public logical AddAll ( poCollection as OpenEdge.Core.Collections.IStringCollection):
37
	method public logical Remove ( pcElement as longchar):
23 38
	end.
24 39

  
25 40
	method public logical RemoveAll ( poCollection as OpenEdge.Core.Collections.IStringCollection):
......
28 43
	method public logical RetainAll ( poCollection as OpenEdge.Core.Collections.IStringCollection):
29 44
	end.
30 45

  
31
	method public logical Contains ( checkObject as OpenEdge.Core.String):
32
	end.
33

  
34 46
	method public OpenEdge.Core.String extent ToStringArray ():
35 47
	end.
36 48

  
37
	method public logical Add ( pcElement as longchar):
38
	end.
39

  
40
	method public logical AddArray ( pcElements as longchar extent ):
41
	end.
42

  
43
	method public logical Contains ( pcElement as longchar):
44
	end.
45

  
46
	method public logical Remove ( pcElement as longchar):
47
	end.
48

  
49 49
end.
new/oo4gl/OpenEdge/Core/Memptr.cls 2023-05-03 11:38:30 +0000
5 5
	constructor protected Memptr ():
6 6
	end.
7 7

  
8
	constructor public Memptr ( piPtr as int64, piSize as int64):
9
	end.
10

  
11 8
	constructor public Memptr ( piSize as int64):
12 9
	end.
13 10

  
......
17 14
	constructor public Memptr ( prValue as raw):
18 15
	end.
19 16

  
17
	constructor public Memptr ( piPtr as int64, piSize as int64):
18
	end.
19

  
20 20
	define public property AutoDestroy as logical no-undo
21 21
		public get.
22 22
		public set.
23 23

  
24
	define public static property Empty as OpenEdge.Core.Memptr no-undo
25
		public get.
26

  
24 27
	define public property ExternalAllocation as logical no-undo
25 28
		public get.
26 29
		private set.
27 30

  
31
	define public property Size as int64 no-undo
32
		public get.
33
		public set.
34

  
28 35
	define public property Value as memptr no-undo
29 36
		public get.
30 37

  
31
	define public property Size as int64 no-undo
32
		public get.
33
		public set.
34

  
35
	define public static property Empty as OpenEdge.Core.Memptr no-undo
36
		public get.
37

  
38
	method public int64 GetPointerValue ():
39
	end.
40

  
41 38
	method public void Clear ():
42 39
	end.
43 40

  
41
	method public integer GetByte ( piPos as int64):
42
	end.
43

  
44
	method public OpenEdge.Core.Memptr GetBytes ( piStartPos as int64):
45
	end.
46

  
47
	method public OpenEdge.Core.Memptr GetBytes ( piStartPos as int64, piSliceSize as int64):
48
	end.
49

  
44 50
	method public raw GetHash ():
45 51
	end.
46 52

  
47 53
	method public raw GetHash ( poAlgorithm as OpenEdge.Core.HashAlgorithmEnum):
48 54
	end.
49 55

  
50
	method public integer GetByte ( piPos as int64):
56
	method public int64 GetPointerValue ():
51 57
	end.
52 58

  
53 59
	method public longchar GetString ( piStartPos as int64):
......
62 68
	method public longchar GetString ( piStartPos as int64, piSliceSize as int64, pcSourceCodepage as character, pcTargetCodepage as character):
63 69
	end.
64 70

  
65
	method public OpenEdge.Core.Memptr GetBytes ( piStartPos as int64):
66
	end.
67

  
68
	method public OpenEdge.Core.Memptr GetBytes ( piStartPos as int64, piSliceSize as int64):
69
	end.
70

  
71
	method public void PutBytes ( piPointerValue as int64, piSize as int64):
72
	end.
73

  
74 71
	method public void PutBytes ( pmData as memptr):
75 72
	end.
76 73

  
77 74
	method public void PutBytes ( prData as raw):
78 75
	end.
79 76

  
77
	method public void PutBytes ( piPointerValue as int64, piSize as int64):
78
	end.
79

  
80
	method public override character ToString ():
81
	end.
82

  
80 83
	method public void _Debug ():
81 84
	end.
82 85

  
83
	method public override character ToString ():
84
	end.
85

  
86 86
end.
new/oo4gl/OpenEdge/Core/String.cls 2023-05-03 11:39:39 +0000
1 1
class OpenEdge.Core.String
2 2
	implements Ccs.Common.Support.ILongcharHolder, 
3 3
		OpenEdge.Core.ISupportEncoding, 
4
		Ccs.Common.Support.IPrimitiveHolder:
4
		Ccs.Common.Support.IPrimitiveHolder serializable:
5 5

  
6 6
	constructor public String ():
7 7
	end.
......
16 16
		public get.
17 17
		public set.
18 18

  
19
	define public property Size as int64 no-undo
20
		public get.
21

  
19 22
	define public property Value as longchar no-undo
20 23
		public get.
21 24

  
22
	define public property Size as int64 no-undo
23
		public get.
24

  
25
	method public void Trim ():
25
	method public void Append ( pcValue as longchar):
26 26
	end.
27 27

  
28
	method public void Trim ( pCharacter as character):
28
	method public void Append ( poValue as OpenEdge.Core.String):
29 29
	end.
30 30

  
31 31
	method public static OpenEdge.Core.String Empty ():
......
34 34
	method public override logical Equals ( p0 as Progress.Lang.Object):
35 35
	end.
36 36

  
37
	method public logical IsNullOrEmpty ():
38
	end.
39

  
40
	method public static logical IsNullOrEmpty ( pcValue as longchar):
41
	end.
42

  
43
	method public static logical IsQuoted ( pcValue as longchar):
44
	end.
45

  
46
	method public static logical IsQuoted ( pcValue as longchar, pcQuote as character):
47
	end.
48

  
49
	method public static OpenEdge.Core.String Join ( poValue as OpenEdge.Core.Collections.Array, pcDelimiter as character):
50
	end.
51

  
52
	method public static OpenEdge.Core.String Join ( poValue as OpenEdge.Core.String extent , pcDelimiter as character):
53
	end.
54

  
55
	method public static longchar Join ( pcValue as character extent , pcDelimiter as character):
56
	end.
57

  
58
	method public void Prepend ( pcValue as longchar):
59
	end.
60

  
61
	method public void Prepend ( poValue as OpenEdge.Core.String):
62
	end.
63

  
64
	method public OpenEdge.Core.Collections.Array Split ():
65
	end.
66

  
37 67
	method public OpenEdge.Core.Collections.Array Split ( pcDelimiter as character):
38 68
	end.
39 69

  
40
	method public OpenEdge.Core.Collections.Array Split ():
41
	end.
42

  
43 70
	method public static OpenEdge.Core.Collections.Array Split ( poValue as OpenEdge.Core.String):
44 71
	end.
45 72

  
73
	method public static character extent Split ( pcValue as longchar):
74
	end.
75

  
46 76
	method public static OpenEdge.Core.Collections.Array Split ( poValue as OpenEdge.Core.String, pcDelimiter as character):
47 77
	end.
48 78

  
49
	method public static character extent Split ( pcValue as longchar):
50
	end.
51

  
52 79
	method public static character extent Split ( pcValue as longchar, pcDelimiter as character):
53 80
	end.
54 81

  
55
	method public static OpenEdge.Core.String Join ( poValue as OpenEdge.Core.Collections.Array, pcDelimiter as character):
56
	end.
57

  
58
	method public static OpenEdge.Core.String Join ( poValue as OpenEdge.Core.String extent , pcDelimiter as character):
59
	end.
60

  
61
	method public static longchar Join ( pcValue as character extent , pcDelimiter as character):
62
	end.
63

  
64 82
	method public override character ToString ():
65 83
	end.
66 84

  
67
	method public void Append ( pcValue as longchar):
68
	end.
69

  
70
	method public void Append ( poValue as OpenEdge.Core.String):
71
	end.
72

  
73
	method public void Prepend ( pcValue as longchar):
74
	end.
75

  
76
	method public void Prepend ( poValue as OpenEdge.Core.String):
77
	end.
78

  
79
	method public static logical IsQuoted ( pcValue as longchar):
80
	end.
81

  
82
	method public static logical IsQuoted ( pcValue as longchar, pcQuote as character):
83
	end.
84

  
85
	method public logical IsNullOrEmpty ():
86
	end.
87

  
88
	method public static logical IsNullOrEmpty ( pcValue as longchar):
85
	method public void Trim ():
86
	end.
87

  
88
	method public void Trim ( pCharacter as character):
89 89
	end.
90 90

  
91 91
end.
new/oo4gl/OpenEdge/Core/TimeStamp.cls 2023-05-03 11:40:13 +0000
1
class OpenEdge.Core.TimeStamp:
1
class OpenEdge.Core.TimeStamp serializable:
2

  
3
	constructor public TimeStamp ():
4
	end.
2 5

  
3 6
	constructor public TimeStamp ( ptTimeStamp as date):
4 7
	end.
......
12 15
	constructor public TimeStamp ( pcTimeStamp as character):
13 16
	end.
14 17

  
15
	constructor public TimeStamp ():
16
	end.
17

  
18 18
	define public property Format as character no-undo
19 19
		public get.
20 20
		private set.
......
22 22
	method public override logical Equals ( p0 as Progress.Lang.Object):
23 23
	end.
24 24

  
25
	method public static date ToABLDateFromISO ( pcValue as character):
26
	end.
27

  
28
	method public static datetime ToABLDateTimeFromISO ( pcValue as character):
29
	end.
30

  
31
	method public static datetime-tz ToABLDateTimeTzFromHttp ( pcValue as character):
32
	end.
33

  
34
	method public static datetime-tz ToABLDateTimeTzFromISO ( pcValue as character):
35
	end.
36

  
37
	method public date ToDate ():
38
	end.
39

  
40
	method public datetime ToDateTime ():
41
	end.
42

  
43
	method public datetime-tz ToDateTimeTz ():
44
	end.
45

  
46
	method public character ToHttpDate ():
47
	end.
48

  
49
	method public static character ToHttpDateFromABL ( ptValue as datetime-tz):
50
	end.
51

  
25 52
	method public character ToISODate ():
26 53
	end.
27 54

  
......
34 61
	method public static character ToISODateFromABL ( ptValue as datetime-tz):
35 62
	end.
36 63

  
37
	method public static date ToABLDateFromISO ( pcValue as character):
38
	end.
39

  
40
	method public static datetime ToABLDateTimeFromISO ( pcValue as character):
41
	end.
42

  
43
	method public static datetime-tz ToABLDateTimeTzFromISO ( pcValue as character):
44
	end.
45

  
46
	method public static datetime-tz ToABLDateTimeTzFromHttp ( pcValue as character):
47
	end.
48

  
49
	method public static character ToHttpDateFromABL ( ptValue as datetime-tz):
50
	end.
51

  
52
	method public character ToHttpDate ():
53
	end.
54

  
55
	method public datetime-tz ToDateTimeTz ():
56
	end.
57

  
58
	method public datetime ToDateTime ():
59
	end.
60

  
61
	method public date ToDate ():
62
	end.
63

  
64 64
	method public integer ToTime ():
65 65
	end.
66 66

  
new/oo4gl/OpenEdge/Net/HTTP/Credentials.cls 2023-05-03 11:42:01 +0000
10 10
		public get.
11 11
		public set.
12 12

  
13
	define public property Password as character no-undo
14
		public get.
15
		public set.
16

  
13 17
	define public property UserName as character no-undo
14 18
		public get.
15 19
		public set.
16 20

  
17
	define public property Password as character no-undo
18
		public get.
19
		public set.
20

  
21 21
end.
new/oo4gl/OpenEdge/Net/ServerConnection/ClientSocket.cls 2023-05-03 11:42:24 +0000
2 2
	implements OpenEdge.Core.ServerConnection.IServerConnection, 
3 3
		OpenEdge.Logging.ISupportLogging:
4 4

  
5
	constructor public ClientSocket ():
6
	end.
7

  
5 8
	constructor public ClientSocket ( poConnectionParameters as OpenEdge.Net.ServerConnection.ClientSocketConnectionParameters):
6 9
	end.
7 10

  
8
	constructor public ClientSocket ():
9
	end.
11
	define public property Connected as logical no-undo
12
		public get.
13

  
14
	define public property ConnectionParameters as OpenEdge.Core.ServerConnection.IConnectionParameters no-undo
15
		public get.
16
		private set.
17

  
18
	define public property DefaultReadTimeout as integer no-undo
19
		public get.
20
		public set.
21

  
22
	define public property KeepAlive as logical no-undo
23
		public get.
24
		public set.
25

  
26
	define public property LingerTime as integer no-undo
27
		public get.
28
		public set.
10 29

  
11 30
	define public property LocalHost as character no-undo
12 31
		public get.
......
16 35
		public get.
17 36
		private set.
18 37

  
38
	define public property Logger as OpenEdge.Logging.ILogWriter no-undo
39
		public get.
40
		public set.
41

  
42
	define public property NoDelay as logical no-undo
43
		public get.
44
		public set.
45

  
46
	define public property ReadBufferSize as integer no-undo
47
		public get.
48
		public set.
49

  
50
	define public property ReceiveBufferSize as integer no-undo
51
		public get.
52
		public set.
53

  
54
	define public property ReceiveTimeout as integer no-undo
55
		public get.
56
		public set.
57

  
19 58
	define public property RemoteHost as character no-undo
20 59
		public get.
21 60
		private set.
......
24 63
		public get.
25 64
		private set.
26 65

  
27
	define public property SslServerName as character no-undo
28
		public get.
29
		private set.
30

  
31
	define public property Logger as OpenEdge.Logging.ILogWriter no-undo
32
		public get.
33
		public set.
34

  
35
	define public property Server as Progress.Lang.Object no-undo
36
		public get.
37
		private set.
38

  
39
	define public property ConnectionParameters as OpenEdge.Core.ServerConnection.IConnectionParameters no-undo
40
		public get.
41
		private set.
42

  
43
	define public property ReadBufferSize as integer no-undo
44
		public get.
45
		public set.
46

  
47
	define public property DefaultReadTimeout as integer no-undo
48
		public get.
49
		public set.
50

  
51
	define public property KeepAlive as logical no-undo
52
		public get.
53
		public set.
54

  
55
	define public property NoDelay as logical no-undo
56
		public get.
57
		public set.
58

  
59 66
	define public property ReuseAddress as logical no-undo
60 67
		public get.
61 68
		public set.
62 69

  
63
	define public property ReceiveBufferSize as integer no-undo
64
		public get.
65
		public set.
66

  
67 70
	define public property SendBufferSize as integer no-undo
68 71
		public get.
69 72
		public set.
70 73

  
71
	define public property ReceiveTimeout as integer no-undo
72
		public get.
73
		public set.
74

  
75
	define public property LingerTime as integer no-undo
76
		public get.
77
		public set.
78

  
79
	define public property Connected as logical no-undo
80
		public get.
74
	define public property Server as Progress.Lang.Object no-undo
75
		public get.
76
		private set.
77

  
78
	define public property SslServerName as character no-undo
79
		public get.
80
		private set.
81

  
82
	method public void Connect ():
83
	end.
81 84

  
82 85
	method public void Connect ( poURI as OpenEdge.Net.URI):
83 86
	end.
......
85 88
	method public void Connect ( poParams as OpenEdge.Net.ServerConnection.ClientSocketConnectionParameters):
86 89
	end.
87 90

  
88
	method public void Connect ():
89
	end.
90

  
91
	method public void Disconnect ():
92
	end.
93

  
94 91
	method public void CreateServer ():
95 92
	end.
96 93

  
97 94
	method public void DestroyServer ():
98 95
	end.
99 96

  
97
	method public void Disconnect ():
98
	end.
99

  
100
	method protected logical IsConnected ():
101
	end.
102

  
103
	method protected void OnDataReceived ( poEventArgs as OpenEdge.Net.ServerConnection.SocketReadEventArgs):
104
	end.
105

  
106
	method protected void OnReadTerminated ( poEventArgs as OpenEdge.Net.ServerConnection.SocketReadEventArgs):
107
	end.
108

  
109
	method protected void OnReadTimeout ( poEventArgs as OpenEdge.Net.ServerConnection.SocketReadEventArgs):
110
	end.
111

  
112
	method public void ReadResponseHandler ():
113
	end.
114

  
115
	method public void StartTls ( pCertificatSubjectName as character):
116
	end.
117

  
100 118
	method public void WaitForResponse ():
101 119
	end.
102 120

  
......
106 124
	method public void WaitForResponseAsync ( pdTimeout as decimal):
107 125
	end.
108 126

  
109
	method public void ReadResponseHandler ():
110
	end.
111

  
112
	method protected void OnDataReceived ( poEventArgs as OpenEdge.Net.ServerConnection.SocketReadEventArgs):
113
	end.
114

  
115
	method protected void OnReadTerminated ( poEventArgs as OpenEdge.Net.ServerConnection.SocketReadEventArgs):
116
	end.
117

  
118
	method protected void OnReadTimeout ( poEventArgs as OpenEdge.Net.ServerConnection.SocketReadEventArgs):
119
	end.
120

  
121 127
	method public void WriteData ( poData as OpenEdge.Core.Memptr):
122 128
	end.
123 129

  
124
	method protected logical IsConnected ():
125
	end.
126

  
127
	method public void StartTls ( pCertificatSubjectName as character):
128
	end.
129

  
130 130
	define public event DataReceived void ( poSender as OpenEdge.Net.ServerConnection.ClientSocket, poEventArgs as OpenEdge.Net.ServerConnection.SocketReadEventArgs).
131 131

  
132
	define public event ReadTerminated void ( poSender as OpenEdge.Net.ServerConnection.ClientSocket, poEventArgs as OpenEdge.Net.ServerConnection.SocketReadEventArgs).
133

  
132 134
	define public event ReadTimeout void ( poSender as OpenEdge.Net.ServerConnection.ClientSocket, poEventArgs as OpenEdge.Net.ServerConnection.SocketReadEventArgs).
133 135

  
134
	define public event ReadTerminated void ( poSender as OpenEdge.Net.ServerConnection.ClientSocket, poEventArgs as OpenEdge.Net.ServerConnection.SocketReadEventArgs).
135

  
136 136
end.
new/oo4gl/OpenEdge/Net/ServerConnection/ClientSocketConnectionParameters.cls 2023-05-03 11:42:49 +0000
1 1
class OpenEdge.Net.ServerConnection.ClientSocketConnectionParameters
2 2
	implements OpenEdge.Core.ServerConnection.IConnectionParameters:
3 3

  
4
	constructor public ClientSocketConnectionParameters ():
5
	end.
6

  
4 7
	constructor public ClientSocketConnectionParameters ( poURI as OpenEdge.Net.URI):
5 8
	end.
6 9

  
7 10
	constructor public ClientSocketConnectionParameters ( pScheme as character, pHost as character, pPort as integer):
8 11
	end.
9 12

  
10
	constructor public ClientSocketConnectionParameters ():
11
	end.
12

  
13 13
	define public property FormatMask as OpenEdge.Core.ServerConnection.FormatMaskEnum no-undo
14 14
		public get.
15 15

  
16
	define public property ReuseSession as logical no-undo
17
		public get.
18
		public set.
19

  
20
	define public property ServerNameIndicator as character no-undo
21
		public get.
22
		public set.
23

  
24
	define public property SslCiphers as character extent no-undo
25
		public get.
26
		public set.
27

  
28
	define public property SslProtocols as character extent no-undo
29
		public get.
30
		public set.
31

  
16 32
	define public property URI as OpenEdge.Net.URI no-undo
17 33
		public get.
18 34
		public set.
19 35

  
20
	define public property ReuseSession as logical no-undo
21
		public get.
22
		public set.
23

  
24 36
	define public property VerifyHost as logical no-undo
25 37
		public get.
26 38
		public set.
27 39

  
28
	define public property SslProtocols as character extent no-undo
29
		public get.
30
		public set.
31

  
32
	define public property SslCiphers as character extent no-undo
33
		public get.
34
		public set.
35

  
36
	define public property ServerNameIndicator as character no-undo
37
		public get.
38
		public set.
39

  
40 40
	method public character GetConnectionString ():
41 41
	end.
42 42

  
new/oo4gl/OpenEdge/Net/ServerConnection/SocketReadEventArgs.cls 2023-05-03 11:42:49 +0000
1 1
class OpenEdge.Net.ServerConnection.SocketReadEventArgs:
2 2

  
3
	constructor public SocketReadEventArgs ():
4
	end.
5

  
3 6
	constructor public SocketReadEventArgs ( pdTimeoutOffset as decimal):
4 7
	end.
5 8

  
......
9 12
	constructor public SocketReadEventArgs ( poData as OpenEdge.Core.Memptr):
10 13
	end.
11 14

  
12
	constructor public SocketReadEventArgs ():
13
	end.
15
	define public property BytesRead as int64 no-undo
16
		public get.
17
		public set.
18

  
19
	define public property Data as OpenEdge.Core.Memptr no-undo
20
		public get.
21
		public set.
14 22

  
15 23
	define public property ReadComplete as logical no-undo
16 24
		public get.
17 25
		public set.
18 26

  
27
	define public property ReadTerminated as logical no-undo
28
		public get.
29
		public set.
30

  
19 31
	define public property ReadTimeout as logical no-undo
20 32
		public get.
21 33
		public set.
22 34

  
23
	define public property ReadTerminated as logical no-undo
24
		public get.
25
		public set.
26

  
27
	define public property Data as OpenEdge.Core.Memptr no-undo
28
		public get.
29
		public set.
30

  
31 35
	define public property TimeoutEnd as datetime-tz no-undo
32 36
		public get.
33 37
		private set.
34 38

  
35
	define public property BytesRead as int64 no-undo
36
		public get.
37
		public set.
38

  
39 39
end.
new/oo4gl/OpenEdge/Net/URI.cls 2023-05-03 11:41:41 +0000
1
class OpenEdge.Net.URI:
1
class OpenEdge.Net.URI serializable:
2 2

  
3 3
	constructor public URI ( pcHost as character):
4 4
	end.
......
15 15
	constructor public URI ( pcScheme as character, pcHost as character, piPort as integer, pcPath as character, poQueryMap as OpenEdge.Core.Collections.IStringStringMap, pcFragment as character):
16 16
	end.
17 17

  
18
	define public static property SCHEME_PART_IDX as integer no-undo
19
		public get.
20

  
21 18
	define public static property AUTHORITY_PART_IDX as integer no-undo
22 19
		public get.
23 20

  
24
	define public static property PATH_PART_IDX as integer no-undo
21
	define public property BaseURI as character no-undo
25 22
		public get.
23
		private set.
26 24

  
27
	define public static property QUERY_PART_IDX as integer no-undo
25
	define public property Fragment as character no-undo
28 26
		public get.
27
		public set.
29 28

  
30 29
	define public static property FRAGMENT_PART_IDX as integer no-undo
31 30
		public get.
32 31

  
33
	define public property Scheme as character no-undo
34
		public get.
35
		private set.
36

  
37 32
	define public property Host as character no-undo
38 33
		public get.
39 34
		private set.
40 35

  
41
	define public property User as character no-undo
42
		public get.
43
		public set.
44

  
45 36
	define public property Password as character no-undo
46 37
		public get.
47 38
		public set.
48 39

  
40
	define public property Path as character no-undo
41
		public get.
42
		public set.
43

  
44
	define public static property PATH_PART_IDX as integer no-undo
45
		public get.
46

  
49 47
	define public property Port as integer no-undo
50 48
		public get.
51 49
		public set.
52 50

  
53
	define public property Path as character no-undo
54
		public get.
55
		public set.
56

  
57
	define public property Fragment as character no-undo
58
		public get.
59
		public set.
60

  
61
	define public property BaseURI as character no-undo
62
		public get.
63
		private set.
64

  
65
	define public property RelativeURI as character no-undo
66
		public get.
67
		private set.
68

  
69
	define public property QueryString as character no-undo
70
		public get.
71
		private set.
72

  
73 51
	define protected property QueryMap as OpenEdge.Core.Collections.IStringStringMap no-undo
74 52
		protected get.
75 53
		private set.
76 54

  
77
	method public static OpenEdge.Net.URI Parse ( pcURI as character):
78
	end.
79

  
80
	method public character extent Split ():
81
	end.
82

  
83
	method public static character extent SplitUri ( pData as character):
84
	end.
85

  
86
	method protected void SetPath ( pPath as character):
87
	end.
88

  
89
	method protected void SetAuthority ( pAuthority as character, pDecode as logical):
90
	end.
91

  
92
	method public void AddQueryString ( pQuery as character, pDecode as logical):
93
	end.
94

  
95
	method public static OpenEdge.Net.URI Parse ( pcURI as character, pDecode as logical):
96
	end.
97

  
98
	method public integer GetPathSegments ( output pSegments as character extent ):
99
	end.
100

  
101
	method public void SetPath ( pcSegments as character extent ):
102
	end.
55
	define public property QueryString as character no-undo
56
		public get.
57
		private set.
58

  
59
	define public static property QUERY_PART_IDX as integer no-undo
60
		public get.
61

  
62
	define public property RelativeURI as character no-undo
63
		public get.
64
		private set.
65

  
66
	define public property Scheme as character no-undo
67
		public get.
68
		private set.
69

  
70
	define public static property SCHEME_PART_IDX as integer no-undo
71
		public get.
72

  
73
	define public property User as character no-undo
74
		public get.
75
		public set.
103 76

  
104 77
	method public void AddPathSegment ( pcSegment as character):
105 78
	end.
......
110 83
	method public void AddQuery ( pcName as character, pcValue as character):
111 84
	end.
112 85

  
113
	method public logical RemoveQuery ( pcName as character):
114
	end.
115

  
116
	method public character GetQueryValue ( pcName as character):
117
	end.
118

  
119
	method public OpenEdge.Core.Collections.IStringStringMap GetQueryMap ():
120
	end.
121

  
122
	method public void SetQueryMap ( pQueryMap as OpenEdge.Core.Collections.IStringStringMap):
123
	end.
124

  
125
	method public override character ToString ():
86
	method public void AddQueryString ( pQuery as character, pDecode as logical):
87
	end.
88

  
89
	method public character Decode ():
90
	end.
91

  
92
	method public static character Decode ( pcEncodedString as character):
93
	end.
94

  
95
	method public static character Decode ( pString as OpenEdge.Core.String):
96
	end.
97

  
98
	method public static character Decode ( pEncodedString as character, pTargetCodepage as character):
126 99
	end.
127 100

  
128 101
	method public character Encode ():
......
131 104
	method public static character Encode ( poURI as OpenEdge.Net.URI):
132 105
	end.
133 106

  
134
	method public static character EncodeURI ( poURI as OpenEdge.Net.URI):
135
	end.
136

  
137
	method public character EncodeScheme ():
138
	end.
139

  
140
	method public static character EncodeScheme ( pcString as character):
141
	end.
142

  
143
	method public static character EncodeScheme ( pString as OpenEdge.Core.String):
107
	method public static character Encode ( pcString as character, poEncodingType as OpenEdge.Net.UriEncodingTypeEnum):
108
	end.
109

  
110
	method public static character Encode ( pString as character, pEncodingType as OpenEdge.Net.UriEncodingTypeEnum, pReEncode as logical):
111
	end.
112

  
113
	method public static character EncodeCookie ( pcString as character):
114
	end.
115

  
116
	method public static character EncodeCookie ( pString as OpenEdge.Core.String):
117
	end.
118

  
119
	method public character EncodeFragment ():
120
	end.
121

  
122
	method public static character EncodeFragment ( pcString as character):
123
	end.
124

  
125
	method public static character EncodeFragment ( pString as OpenEdge.Core.String):
126
	end.
127

  
128
	method public character EncodeHost ():
144 129
	end.
145 130

  
146 131
	method public static character EncodeHost ( pcString as character):
147 132
	end.
148 133

  
149
	method public character EncodeHost ():
150
	end.
151

  
152
	method public static character EncodeUserinfo ( pString as OpenEdge.Core.String):
153
	end.
154

  
155
	method public static character EncodeUserinfo ( pcString as character):
156
	end.
157

  
158
	method public character EncodeUserinfo ():
159
	end.
160

  
161 134
	method public static character EncodeHost ( pString as OpenEdge.Core.String):
162 135
	end.
163 136

  
......
179 152
	method public static character EncodeQuery ( pString as OpenEdge.Core.String):
180 153
	end.
181 154

  
182
	method public character EncodeFragment ():
183
	end.
184

  
185
	method public static character EncodeFragment ( pcString as character):
186
	end.
187

  
188
	method public static character EncodeFragment ( pString as OpenEdge.Core.String):
189
	end.
190

  
191
	method public static character EncodeCookie ( pcString as character):
192
	end.
193

  
194
	method public static character EncodeCookie ( pString as OpenEdge.Core.String):
155
	method public character EncodeScheme ():
156
	end.
157

  
158
	method public static character EncodeScheme ( pcString as character):
159
	end.
160

  
161
	method public static character EncodeScheme ( pString as OpenEdge.Core.String):
195 162
	end.
196 163

  
197 164
	method public static character EncodeString ( pcString as character):
......
200 167
	method public static character EncodeString ( pString as OpenEdge.Core.String):
201 168
	end.
202 169

  
203
	method public static character Encode ( pcString as character, poEncodingType as OpenEdge.Net.UriEncodingTypeEnum):
204
	end.
205

  
206
	method public static character Encode ( pString as character, pEncodingType as OpenEdge.Net.UriEncodingTypeEnum, pReEncode as logical):
207
	end.
208

  
209
	method public character Decode ():
210
	end.
211

  
212
	method public static character Decode ( pcEncodedString as character):
213
	end.
214

  
215
	method public static character Decode ( pString as OpenEdge.Core.String):
216
	end.
217

  
218
	method public static character Decode ( pEncodedString as character, pTargetCodepage as character):
170
	method public static character EncodeURI ( poURI as OpenEdge.Net.URI):
171
	end.
172

  
173
	method public character EncodeUserinfo ():
174
	end.
175

  
176
	method public static character EncodeUserinfo ( pString as OpenEdge.Core.String):
177
	end.
178

  
179
	method public static character EncodeUserinfo ( pcString as character):
180
	end.
181

  
182
	method public integer GetPathSegments ( output pSegments as character extent ):
183
	end.
184

  
185
	method public OpenEdge.Core.Collections.IStringStringMap GetQueryMap ():
186
	end.
187

  
188
	method public integer GetQueryNames ( output pcNames as character extent ):
189
	end.
190

  
191
	method public character GetQueryValue ( pcName as character):
219 192
	end.
220 193

  
221 194
	method public logical HasQueryName ( pName as character):
222 195
	end.
223 196

  
224
	method public integer GetQueryNames ( output pcNames as character extent ):
197
	method public static OpenEdge.Net.URI Parse ( pcURI as character):
198
	end.
199

  
200
	method public static OpenEdge.Net.URI Parse ( pcURI as character, pDecode as logical):
201
	end.
202

  
203
	method public logical RemoveQuery ( pcName as character):
225 204
	end.
226 205

  
227 206
	method public static OpenEdge.Net.URI ResolveRelativeReference ( pBaseUri as OpenEdge.Net.URI, pRelativeRef as character):
228 207
	end.
229 208

  
209
	method protected void SetAuthority ( pAuthority as character, pDecode as logical):
210
	end.
211

  
212
	method protected void SetPath ( pPath as character):
213
	end.
214

  
215
	method public void SetPath ( pcSegments as character extent ):
216
	end.
217

  
218
	method public void SetQueryMap ( pQueryMap as OpenEdge.Core.Collections.IStringStringMap):
219
	end.
220

  
221
	method public character extent Split ():
222
	end.
223

  
224
	method public static character extent SplitUri ( pData as character):
225
	end.
226

  
227
	method public override character ToString ():
228
	end.
229

  
230 230
end.
new/oo4gl/Progress/Json/JsonError.cls 2023-05-03 11:24:30 +0000
1 1

  
2 2
class Progress.Json.JsonError
3
   inherits Progress.Lang.SysError:
3
   inherits Progress.Lang.SysError
4
   serializable:
4 5

  
5 6
   constructor private JsonError():
6 7
   end constructor.
new/oo4gl/Progress/Json/JsonParserError.cls 2023-05-03 11:24:51 +0000
1 1

  
2 2
class Progress.Json.JsonParserError
3
   inherits Progress.Json.JsonError:
3
   inherits Progress.Json.JsonError
4
   serializable:
4 5

  
5 6
   constructor private JsonParserError():
6 7
   end constructor.
new/oo4gl/Progress/Json/ObjectModel/JsonArray.cls 2023-04-28 12:13:39 +0000
1

  
2 1
class Progress.Json.ObjectModel.JsonArray
3
   inherits Progress.Json.ObjectModel.JsonConstruct:
4

  
5
   constructor public JsonArray():
6
   end constructor.
7
   
8
   constructor public JsonArray(input sz as integer):
9
   end constructor.
10
   
11
   constructor public JsonArray(input val as character extent):
12
   end constructor.
13
   
14
   constructor public JsonArray(input val as com-handle extent):
15
   end constructor.
16
   
17
   constructor public JsonArray(input val as date extent):
18
   end constructor.
19
   
20
   constructor public JsonArray(input val as datetime extent):
21
   end constructor.
22
   
23
   constructor public JsonArray(input val as datetime-tz extent):
24
   end constructor.
25
   
26
   constructor public JsonArray(input val as decimal extent):
27
   end constructor.
28
   
29
   constructor public JsonArray(input val as handle extent):
30
   end constructor.
31
   
32
   constructor public JsonArray(input val as int64 extent):
33
   end constructor.
34
   
35
   constructor public JsonArray(input val as integer extent):
36
   end constructor.
37
   
38
   constructor public JsonArray(input val as logical extent):
39
   end constructor.
40
   
41
   constructor public JsonArray(input val as longchar extent):
42
   end constructor.
43
   
44
   constructor public JsonArray(input val as memptr extent):
45
   end constructor.
46
   
47
   constructor public JsonArray(input val as raw extent):
48
   end constructor.
49
   
50
   constructor public JsonArray(input val as recid extent):
51
   end constructor.
52
   
53
   constructor public JsonArray(input val as rowid extent):
54
   end constructor.
55
   
56
   constructor public JsonArray(input val as Progress.Json.ObjectModel.JsonObject extent):
57
   end constructor.
58
   
59
   constructor public JsonArray(input val as Progress.Json.ObjectModel.JsonArray extent):
60
   end constructor.
61
   
62
   define public static property END_OF_ARRAY as integer
63
      get.
64
      
65
   define public property Length as integer
66
      get.
67
      set.
68
      
69
   method public integer Add(input val as character):
70
   end method.
71
   
72
   method public integer Add(input val as com-handle ):
73
   end method.
74
   
75
   method public integer Add(input val as date):
76
   end method.
77
   
78
   method public integer Add(input val as datetime):
79
   end method.
80
   
81
   method public integer Add(input val as datetime-tz):
82
   end method.
83
   
84
   method public integer Add(input val as decimal):
85
   end method.
86
   
87
   method public integer Add(input val as handle):
88
   end method.
89
   
90
   method public integer Add(input val as int64):
91
   end method.
92
   
93
   method public integer Add(input val as integer):
94
   end method.
95
   
96
   method public integer Add(input val as logical):
97
   end method.
98
   
99
   method public integer Add(input val as longchar):
100
   end method.
101
   
102
   method public integer Add(input val as memptr):
103
   end method.
104
   
105
   method public integer Add(input val as raw):
106
   end method.
107
   
108
   method public integer Add(input val as recid):
109
   end method.
110
   
111
   method public integer Add(input val as rowid):
112
   end method.
113
   
114
   method public integer Add(input val as class Progress.Json.ObjectModel.JsonArray):
115
   end method.
116
   
117
   method public integer Add(input val as class Progress.Json.ObjectModel.JsonObject):
118
   end method.
119
   
120
   method public integer Add(input val as character extent):
121
   end method.
122
   
123
   method public integer Add(input val as com-handle extent):
124
   end method.
125
   
126
   method public integer Add(input val as date extent):
127
   end method.
128
   
129
   method public integer Add(input val as datetime extent):
130
   end method.
131
   
132
   method public integer Add(input val as datetime-tz extent):
133
   end method.
134
   
135
   method public integer Add(input val as decimal extent):
136
   end method.
137
   
138
   method public integer Add(input val as handle extent):
139
   end method.
140
   
141
   method public integer Add(input val as int64 extent):
142
   end method.
143
   
144
   method public integer Add(input val as integer extent):
145
   end method.
146
   
147
   method public integer Add(input val as logical extent):
148
   end method.
149
   
150
   method public integer Add(input val as longchar extent):
151
   end method.
152
   
153
   method public integer Add(input val as memptr extent):
154
   end method.
155
   
156
   method public integer Add(input val as raw extent):
157
   end method.
158
   
159
   method public integer Add(input val as recid extent):
160
   end method.
161
   
162
   method public integer Add(input val as rowid extent):
163
   end method.
164
   
165
   method public integer Add(input val as class Progress.Json.ObjectModel.JsonArray extent):
166
   end method.
167
   
168
   method public integer Add(input val as class Progress.Json.ObjectModel.JsonObject extent):
169
   end method.
170
   
171
   method public integer Add(input idx as int, input val as character):
172
   end method.
173
   
174
   method public integer Add(input idx as int, input val as com-handle ):
175
   end method.
176
   
177
   method public integer Add(input idx as int, input val as date):
178
   end method.
179
   
180
   method public integer Add(input idx as int, input val as datetime):
181
   end method.
182
   
183
   method public integer Add(input idx as int, input val as datetime-tz):
184
   end method.
185
   
186
   method public integer Add(input idx as int, input val as decimal):
187
   end method.
188
   
189
   method public integer Add(input idx as int, input val as handle):
190
   end method.
191
   
192
   method public integer Add(input idx as int, input val as int64):
193
   end method.
194
   
195
   method public integer Add(input idx as int, input val as integer):
196
   end method.
197
   
198
   method public integer Add(input idx as int, input val as logical):
199
   end method.
200
   
201
   method public integer Add(input idx as int, input val as longchar):
202
   end method.
203
   
204
   method public integer Add(input idx as int, input val as memptr):
205
   end method.
206
   
207
   method public integer Add(input idx as int, input val as raw):
208
   end method.
209
   
210
   method public integer Add(input idx as int, input val as recid):
211
   end method.
212
   
213
   method public integer Add(input idx as int, input val as rowid):
214
   end method.
215
   
216
   method public integer Add(input idx as int, input val as class Progress.Json.ObjectModel.JsonArray):
217
   end method.
218
   
219
   method public integer Add(input idx as int, input val as class Progress.Json.ObjectModel.JsonObject):
220
   end method.
221
   
222
   method public integer Add(input idx as int, input val as character extent):
223
   end method.
224
   
225
   method public integer Add(input idx as int, input val as com-handle extent ):
226
   end method.
227
   
228
   method public integer Add(input idx as int, input val as date extent):
229
   end method.
230
   
231
   method public integer Add(input idx as int, input val as datetime extent):
232
   end method.
233
   
234
   method public integer Add(input idx as int, input val as datetime-tz extent):
235
   end method.
236
   
237
   method public integer Add(input idx as int, input val as decimal extent):
238
   end method.
239
   
240
   method public integer Add(input idx as int, input val as handle extent):
241
   end method.
242
   
243
   method public integer Add(input idx as int, input val as int64 extent):
244
   end method.
245
   
246
   method public integer Add(input idx as int, input val as integer extent):
247
   end method.
248
   
249
   method public integer Add(input idx as int, input val as logical extent):
250
   end method.
251
   
252
   method public integer Add(input idx as int, input val as longchar extent):
253
   end method.
254
   
255
   method public integer Add(input idx as int, input val as memptr extent):
256
   end method.
257
   
258
   method public integer Add(input idx as int, input val as raw extent):
259
   end method.
260
   
261
   method public integer Add(input idx as int, input val as recid extent):
262
   end method.
263
   
264
   method public integer Add(input idx as int, input val as rowid extent):
265
   end method.
266
   
267
   method public integer Add(input idx as int, input val as class Progress.Json.ObjectModel.JsonArray extent):
268
   end method.
269
   
270
   method public integer Add(input idx as int, input val as class Progress.Json.ObjectModel.JsonObject extent):
271
   end method.
272
   
273
   method public integer AddNull():
274
   end method.
275
   
276
   method public integer AddNull(input count as int):
277
   end method.
278
   
279
   method public integer AddNull(input idx as int, input count as int):
280
   end method.
281
   
282
   method public integer AddNumber(input val as char):
283
   end method.
284
   
285
   method public integer AddNumber(input val as char extent):
286
   end method.
287
   
288
   method public integer AddNumber(input idx as int, input val as char):
289
   end method.
290
   
291
   method public integer AddNumber(input idx as int, input val as char extent):
292
   end method.
293
   
294
   method public override Progress.Lang.Object Clone():
295
   end method.
296
   
297
   method public character GetCharacter(input idx as int):
298
   end method.
299
   
300
   method public character extent GetCharacter(input idx as int, input count as int):
301
   end method.
302
   
303
   method public com-handle GetCOMHandle(input idx as int):
304
   end method.
305
   
306
   method public com-handle extent GetCOMHandle(input idx as int, input count as int):
307
   end method.
308
   
309
   method public date GetDate(input idx as int):
310
   end method.
311
   
312
   method public date extent GetDate(input idx as int, input count as int):
313
   end method.
314
   
315
   method public datetime GetDatetime(input idx as int):
316
   end method.
317
   
318
   method public datetime extent GetDatetime(input idx as int, input count as int):
319
   end method.
320
   
321
   method public datetime-tz GetDatetimeTZ(input idx as int):
322
   end method.
323
   
324
   method public datetime-tz extent GetDatetimeTZ(input idx as int, input count as int):
325
   end method.
... This diff was truncated because it exceeds the maximum size that can be displayed.