FAQ/LoadReportSet.md
... ...
@@ -1,10 +1,20 @@
1
-#The LoadReportSet() Method
1
+#LoadReportSet()
2
+
3
+[[_TOC_]]
4
+
5
+##About
6
+
7
+This method controls how the CurrentReportSet object is loaded into the application for use. You can use this method as-is and Izenda will load reports in the default manner, but if you want to use a custom location to load data from, you should override this method.
8
+
9
+##Sample C♯ Methods
10
+
11
+###DatabaseAdHocConfig Mode
2 12
3 13
```csharp
4 14
public override Izenda.AdHoc.ReportSet LoadReportSet(string reportName)
5 15
{
6 16
/* BEGIN Database Mode Code Sample */
7
- string sql = string.Format("SELECT Xml FROM {0} WHERE Name = '{1}'", SavedReportsTable, reportName);
17
+ string sql = string.Format("SELECT Xml FROM {0} WHERE Name = '{1}'", AdHocSettings.SavedReportsTable, reportName);
8 18
object oXml = Izenda.AdHoc.AdHocContext.Driver.GetScalar(sql);
9 19
if (oXml != DBNull.Value && oXml != null)
10 20
{
... ...
@@ -16,6 +26,8 @@ public override Izenda.AdHoc.ReportSet LoadReportSet(string reportName)
16 26
/* END Database Mode Code Sample */
17 27
```
18 28
29
+###FileSystemAdHocConfig Mode
30
+
19 31
```csharp
20 32
/* BEGIN Filesystem Mode Code Sample */
21 33
string fileName = GetFileName(reportName);
... ...
@@ -36,4 +48,46 @@ public override Izenda.AdHoc.ReportSet LoadReportSet(string reportName)
36 48
37 49
/* END Filesystem Mode Code Sample */
38 50
}
51
+```
52
+
53
+##Sample VB.NET Methods
54
+
55
+###DatabaseAdHocConfig Mode
56
+
57
+```visualbasic
58
+Public Overrides Function LoadReportSet(reportName As String) As ReportSet
59
+ 'BEGIN Database Mode Code Sample
60
+ Dim sql As String = String.Format("SELECT Xml FROM {0} WHERE Name = '{1}'", AdHocSettings.SavedReportsTable, reportName)
61
+ Dim oXml As Object = Izenda.AdHoc.AdHocContext.Driver.GetScalar(sql)
62
+ If oXml IsNot DBNull.Value AndAlso oXml IsNot Nothing Then
63
+ Dim ReportSet As ReportSet = New Izenda.AdHoc.ReportSet()
64
+ ReportSet.ReadXml(oXml.ToString())
65
+ Return ReportSet
66
+ End If
67
+ Return Nothing
68
+ 'END Database Mode Code Sample
69
+End Function
70
+```
71
+
72
+###FileSystemAdHocConfig Mode
73
+
74
+```visualbasic
75
+Public Overrides Function LoadReportSet(reportName As String) As ReportSet
76
+ ' BEGIN Filesystem Mode Code Sample
77
+ Dim fileName As String = GetFileName(reportName) 'your method to get
78
+ If fileName = Nothing Then Return Nothing
79
+
80
+ Dim file As FileInfo = New FileInfo(fileName)
81
+ If Not file.Exists Then Return Nothing
82
+
83
+ Dim reader As StreamReader = file.OpenText()
84
+ Dim xml As String = reader.ReadToEnd()
85
+ reader.Close()
86
+
87
+ Dim reportSet As New ReportSet()
88
+ reportSet.ReadXml(xml)
89
+ Return reportSet
90
+
91
+ ' END Filesystem Mode Code Sample
92
+End Function
39 93
```
... ...
\ No newline at end of file