New test.
[mono.git] / mcs / class / Mono.Data.SybaseClient / Mono.Data.SybaseClient / SybaseInfoMessageEventArgs.cs
1 //
2 // Mono.Data.SybaseClient.SybaseInfoMessageEventArgs.cs
3 //
4 // Author:
5 //   Tim Coleman (tim@timcoleman.com)
6 //
7 // Copyright (C) Tim Coleman, 2002
8 //
9
10 //
11 // Permission is hereby granted, free of charge, to any person obtaining
12 // a copy of this software and associated documentation files (the
13 // "Software"), to deal in the Software without restriction, including
14 // without limitation the rights to use, copy, modify, merge, publish,
15 // distribute, sublicense, and/or sell copies of the Software, and to
16 // permit persons to whom the Software is furnished to do so, subject to
17 // the following conditions:
18 // 
19 // The above copyright notice and this permission notice shall be
20 // included in all copies or substantial portions of the Software.
21 // 
22 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
23 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
24 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
25 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
26 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
27 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
28 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
29 //
30
31 using Mono.Data.Tds.Protocol;
32 using System;
33 using System.Data;
34
35 namespace Mono.Data.SybaseClient {
36         public sealed class SybaseInfoMessageEventArgs : EventArgs
37         {
38                 #region Fields
39
40                 SybaseErrorCollection errors = new SybaseErrorCollection ();
41
42                 #endregion // Fields
43
44                 #region Constructors
45
46                 internal SybaseInfoMessageEventArgs (TdsInternalErrorCollection tdsErrors)
47                 {
48                         foreach (TdsInternalError e in tdsErrors)
49                                 errors.Add (e.Class, e.LineNumber, e.Message, e.Number, e.Procedure, e.Server, "Mono SybaseClient Data Provider", e.State);
50                 }
51
52                 #endregion // Constructors
53
54                 #region Properties
55
56                 public SybaseErrorCollection Errors {
57                         get { return errors; }
58                 }       
59
60                 public string Message {
61                         get { return errors[0].Message; }
62                 }       
63
64                 public string Source {
65                         get { return errors[0].Source; }
66                 }
67
68                 #endregion // Properties
69
70                 #region Methods
71
72                 public override string ToString () 
73                 {
74                         return Message;
75                 }
76
77                 #endregion // Methods
78         }
79 }