Name _InstanceName; // The name of the variable to assign the class to.
// This variable can be used in expressions
// throughout the report.
public ReportClass(ReportDefn r, ReportLink p, XmlNode xNode) : base(r, p)
{
_ClassName=null;
_InstanceName = null;
// Loop thru all the child nodes
foreach(XmlNode xNodeLoop in xNode.ChildNodes)
{
if (xNodeLoop.NodeType != XmlNodeType.Element)
continue;
switch (xNodeLoop.Name)
{
case "ClassName":
_ClassName = xNodeLoop.InnerText;
break;
case "InstanceName":
_InstanceName = new Name(xNodeLoop.InnerText);
break;
default:
break;
}
}
if (_ClassName == null)
OwnerReport.rl.LogError(8, "Class ClassName is required but not specified.");
if (_InstanceName == null)
OwnerReport.rl.LogError(8, "Class InstanceName is required but not specified or invalid for " + _ClassName==null? "<unknown name>": _ClassName);
}
[NonSerialized] IDbConnection _ParseConnection; // while parsing we sometimes need to connect
public DataSourceDefn(ReportDefn r, ReportLink p, XmlNode xNode) : base(r, p)
{
_Name=null;
_Transaction=false;
_ConnectionProperties=null;
_DataSourceReference=null;
// Run thru the attributes
foreach(XmlAttribute xAttr in xNode.Attributes)
{
switch (xAttr.Name)
{
case "Name":
_Name = new Name(xAttr.Value);
break;
}
}
// Loop thru all the child nodes
foreach(XmlNode xNodeLoop in xNode.ChildNodes)
{
if (xNodeLoop.NodeType != XmlNodeType.Element)
continue;
switch (xNodeLoop.Name)
{
case "Transaction":
_Transaction = XmlUtil.Boolean(xNodeLoop.InnerText, OwnerReport.rl);
break;
case "ConnectionProperties":
_ConnectionProperties = new ConnectionProperties(r, this, xNodeLoop);
break;
case "DataSourceReference":
_DataSourceReference = xNodeLoop.InnerText;
break;
default:
// don't know this element - log it
OwnerReport.rl.LogError(4, "Unknown DataSource element '" + xNodeLoop.Name + "' ignored.");
break;
}
}
if (_Name == null)
OwnerReport.rl.LogError(8, "DataSource Name is required but not specified.");
else if (_ConnectionProperties == null && _DataSourceReference == null)
OwnerReport.rl.LogError(8, string.Format("Either ConnectionProperties or DataSourceReference must be specified for DataSource {0}.", this._Name.Nm));
else if (_ConnectionProperties != null && _DataSourceReference != null)
OwnerReport.rl.LogError(8, string.Format("Either ConnectionProperties or DataSourceReference must be specified for DataSource {0} but not both.", this._Name.Nm));
}
Expression _Value; // (Variant) An expression that evaluates to the value of
// this field. For example, =Fields!Price.Value+Fields!Tax.Value
// The expression cannot contain aggregates or references to report items.
public Field(ReportDefn r, ReportLink p, XmlNode xNode) : base(r, p)
{
_Name=null;
_DataField=null;
_Value=null;
_ColumnNumber = -1;
_Type = TypeCode.String;
// Run thru the attributes
foreach(XmlAttribute xAttr in xNode.Attributes)
{
switch (xAttr.Name)
{
case "Name":
_Name = new Name(xAttr.Value);
break;
}
}
// Loop thru all the child nodes
foreach(XmlNode xNodeLoop in xNode.ChildNodes)
{
if (xNodeLoop.NodeType != XmlNodeType.Element)
continue;
switch (xNodeLoop.Name)
{
case "DataField":
_DataField = xNodeLoop.InnerText;
break;
case "TypeName": // Extension !!!!!!!!!!!!!!!!!
case "rd:TypeName": // Microsoft Designer uses this extension
_Type = DataType.GetStyle(xNodeLoop.InnerText, this.OwnerReport);
break;
case "Value":
_Value = new Expression(r, this, xNodeLoop, ExpressionType.Variant);
break;
default:
// don't know this element - log it
OwnerReport.rl.LogError(4, "Unknown Field element '" + xNodeLoop.Name + "' ignored.");
break;
}
}
if (_DataField != null && _Value != null)
OwnerReport.rl.LogError(8, "Only DataField or Value may be specified in a Field element, not both.");
else if (_DataField == null && _Value == null)
OwnerReport.rl.LogError(8, "Either DataField or Value must be specified in a Field element.");
}
Expression _Value; // (Variant) An expression that evaluates to the value to
// hand in for the parameter to the Subreport.
public SubreportParameter(ReportDefn r, ReportLink p, XmlNode xNode) : base(r, p)
{
_Name=null;
_Value=null;
// Run thru the attributes
foreach(XmlAttribute xAttr in xNode.Attributes)
{
switch (xAttr.Name)
{
case "Name":
_Name = new Name(xAttr.Value);
break;
}
}
if (_Name == null)
{ // Name is required for parameters
OwnerReport.rl.LogError(8, "Parameter Name attribute required.");
}
// Loop thru all the child nodes
foreach(XmlNode xNodeLoop in xNode.ChildNodes)
{
if (xNodeLoop.NodeType != XmlNodeType.Element)
continue;
switch (xNodeLoop.Name)
{
case "Value":
_Value = new Expression(r, this, xNodeLoop, ExpressionType.Variant);
break;
default:
// don't know this element - log it
OwnerReport.rl.LogError(4, "Unknown Subreport parameter element '" + xNodeLoop.Name + "' ignored.");
break;
}
}
if (_Value == null)
{ // Value is required for parameters
OwnerReport.rl.LogError(8, "The Parameter Value element is required but was not specified.");
}
}
Expression _Value; // (Variant or Variant Array)
//An expression that evaluates to the value to
//hand to the data source. The expression can
//refer to report parameters but cannot contain
//references to report elements, fields in the data
//model or aggregate functions.
//In the case of a parameter to a Values or
//DefaultValue query, the expression can only
//refer to report parameters that occur earlier in
//the parameters list. The value for this query
//parameter is then taken from the user selection
//for that earlier report parameter.
public QueryParameter(ReportDefn r, ReportLink p, XmlNode xNode) : base(r, p)
{
_Name=null;
_Value=null;
// Run thru the attributes
foreach(XmlAttribute xAttr in xNode.Attributes)
{
switch (xAttr.Name)
{
case "Name":
_Name = new Name(xAttr.Value);
break;
}
}
// Loop thru all the child nodes
foreach(XmlNode xNodeLoop in xNode.ChildNodes)
{
if (xNodeLoop.NodeType != XmlNodeType.Element)
continue;
switch (xNodeLoop.Name)
{
case "Value":
_Value = new Expression(r, this, xNodeLoop, ExpressionType.Variant);
break;
default:
// don't know this element - log it
OwnerReport.rl.LogError(4, "Unknown QueryParameter element '" + xNodeLoop.Name + "' ignored.");
break;
}
}
if (_Name == null)
OwnerReport.rl.LogError(8, "QueryParameter name is required but not specified.");
if (_Value == null)
OwnerReport.rl.LogError(8, "QueryParameter Value is required but not specified or invalid for " + _Name==null? "<unknown name>": _Name.Nm);
}
TrueFalseAutoEnum _UsedInQuery; // Enum True | False | Auto (default)
// Indicates whether or not the parameter is
// used in a query in the report. This is
// needed to determine if the queries need
// to be re-executed if the parameter
// changes. Auto indicates the
// UsedInQuery setting should be
// autodetected as follows: True if the
// parameter is referenced in any query
// value expression.
public ReportParameter(ReportDefn r, ReportLink p, XmlNode xNode) : base(r, p)
{
_Name=null;
_dt = TypeCode.Object;
_Nullable = false;
_DefaultValue=null;
_AllowBlank=false;
_Prompt=null;
_ValidValues=null;
_UsedInQuery = TrueFalseAutoEnum.Auto;
// Run thru the attributes
foreach(XmlAttribute xAttr in xNode.Attributes)
{
switch (xAttr.Name)
{
case "Name":
_Name = new Name(xAttr.Value);
break;
}
}
// Loop thru all the child nodes
foreach(XmlNode xNodeLoop in xNode.ChildNodes)
{
if (xNodeLoop.NodeType != XmlNodeType.Element)
continue;
switch (xNodeLoop.Name)
{
case "DataType":
_dt = DataType.GetStyle(xNodeLoop.InnerText, this.OwnerReport);
_NumericType = DataType.IsNumeric(_dt);
break;
case "Nullable":
_Nullable = XmlUtil.Boolean(xNodeLoop.InnerText, OwnerReport.rl);
break;
case "DefaultValue":
_DefaultValue = new DefaultValue(r, this, xNodeLoop);
break;
case "AllowBlank":
_AllowBlank = XmlUtil.Boolean(xNodeLoop.InnerText, OwnerReport.rl);
break;
case "Prompt":
_Prompt = xNodeLoop.InnerText;
break;
case "Hidden":
_Hidden = XmlUtil.Boolean(xNodeLoop.InnerText, OwnerReport.rl);
OwnerReport.rl.LogError(4, "ReportParameter element Hidden is currently ignored."); // TODO
break;
case "MultiValue":
_MultiValue = XmlUtil.Boolean(xNodeLoop.InnerText, OwnerReport.rl);
break;
case "ValidValues":
_ValidValues = new ValidValues(r, this, xNodeLoop);
break;
case "UsedInQuery":
_UsedInQuery = TrueFalseAuto.GetStyle(xNodeLoop.InnerText, OwnerReport.rl);
break;
default:
// don't know this element - log it
OwnerReport.rl.LogError(4, "Unknown ReportParameter element '" + xNodeLoop.Name + "' ignored.");
break;
}
}
if (_Name == null)
OwnerReport.rl.LogError(8, "ReportParameter name is required but not specified.");
if (_dt == TypeCode.Object)
OwnerReport.rl.LogError(8, string.Format("ReportParameter DataType is required but not specified or invalid for {0}.", _Name==null? "<unknown name>": _Name.Nm));
}
List<Textbox> _HideDuplicates; // holds any textboxes that use this as a hideduplicate scope
public DataSetDefn(ReportDefn r, ReportLink p, XmlNode xNode) : base(r, p)
{
_Name=null;
_Fields=null;
_Query=null;
_CaseSensitivity=TrueFalseAutoEnum.True;
_Collation=null;
_AccentSensitivity=TrueFalseAutoEnum.False;
_KanatypeSensitivity=TrueFalseAutoEnum.False;
_WidthSensitivity=TrueFalseAutoEnum.False;
_Filters=null;
_HideDuplicates=null;
// Run thru the attributes
foreach(XmlAttribute xAttr in xNode.Attributes)
{
switch (xAttr.Name)
{
case "Name":
_Name = new Name(xAttr.Value);
break;
}
}
// Loop thru all the child nodes
foreach(XmlNode xNodeLoop in xNode.ChildNodes)
{
if (xNodeLoop.NodeType != XmlNodeType.Element)
continue;
switch (xNodeLoop.Name)
{
case "Fields":
_Fields = new Fields(r, this, xNodeLoop);
break;
case "Query":
_Query = new Query(r, this, xNodeLoop);
break;
case "Rows": // Extension !!!!!!!!!!!!!!!!!!!!!!!
case "fyi:Rows":
_XmlRowData = "<?xml version='1.0' encoding='UTF-8'?><Rows>" + xNodeLoop.InnerXml + "</Rows>";
foreach(XmlAttribute xA in xNodeLoop.Attributes)
{
if (xA.Name == "File")
_XmlRowFile = xA.Value;
}
break;
case "CaseSensitivity":
_CaseSensitivity = TrueFalseAuto.GetStyle(xNodeLoop.InnerText, OwnerReport.rl);
break;
case "Collation":
_Collation = xNodeLoop.InnerText;
break;
case "AccentSensitivity":
_AccentSensitivity = TrueFalseAuto.GetStyle(xNodeLoop.InnerText, OwnerReport.rl);
break;
case "KanatypeSensitivity":
_KanatypeSensitivity = TrueFalseAuto.GetStyle(xNodeLoop.InnerText, OwnerReport.rl);
break;
case "WidthSensitivity":
_WidthSensitivity = TrueFalseAuto.GetStyle(xNodeLoop.InnerText, OwnerReport.rl);
break;
case "Filters":
_Filters = new Filters(r, this, xNodeLoop);
break;
default:
OwnerReport.rl.LogError(4, "Unknown DataSet element '" + xNodeLoop.Name + "' ignored.");
break;
}
}
if (this.Name != null)
OwnerReport.LUAggrScope.Add(this.Name.Nm, this); // add to referenceable TextBoxes
else
OwnerReport.rl.LogError(4, "Name attribute must be specified in a DataSet.");
if (_Query == null)
OwnerReport.rl.LogError(8, "Query element must be specified in a DataSet.");
}
Type _CodeType; // used for parsing of expressions; DONT USE AT RUNTIME
// Constructor
public ReportDefn(XmlNode xNode, ReportLog replog, string folder, NeedPassword getpswd, int objcount) // report has no parents
{
rl = replog; // used for error reporting
_ObjectCount = objcount; // starting number for objects in this report; 0 other than for subreports
GetDataSourceReferencePassword = getpswd;
_ParseFolder = folder;
_Description = null;
_Author = null;
_AutoRefresh = -1;
_DataSourcesDefn = null;
_DataSetsDefn = null;
_Body = null;
_Width = null;
_PageHeader = null;
_PageFooter = null;
_PageHeight = null;
_PageWidth = null;
_LeftMargin = null;
_RightMargin = null;
_TopMargin = null;
_BottomMargin = null;
_EmbeddedImages = null;
_Language = null;
_CodeModules = null;
_Code = null;
_Classes = null;
_DataTransform = null;
_DataSchema = null;
_DataElementName = null;
_DataElementStyle = DataElementStyleEnum.AttributeNormal;
_LUReportItems = new Hashtable(); // to hold all the textBoxes
_LUAggrScope = new ListDictionary(); // to hold all dataset, dataregion, grouping names
_LUEmbeddedImages = new ListDictionary(); // probably not very many
_LUDynamicNames = new Hashtable();
_DataCache = new List<ICacheData>();
// Run thru the attributes
foreach(XmlAttribute xAttr in xNode.Attributes)
{
switch (xAttr.Name)
{
case "Name":
_Name = new Name(xAttr.Value);
break;
}
}
// Loop thru all the child nodes
foreach(XmlNode xNodeLoop in xNode.ChildNodes)
{
if (xNodeLoop.NodeType != XmlNodeType.Element)
continue;
switch (xNodeLoop.Name)
{
case "Description":
_Description = xNodeLoop.InnerText;
break;
case "Author":
_Author = xNodeLoop.InnerText;
break;
case "AutoRefresh":
_AutoRefresh = XmlUtil.Integer(xNodeLoop.InnerText);
break;
case "DataSources":
_DataSourcesDefn = new DataSourcesDefn(this, null, xNodeLoop);
break;
case "DataSets":
_DataSetsDefn = new DataSetsDefn(this, null, xNodeLoop);
break;
case "Body":
_Body = new Body(this, null, xNodeLoop);
break;
case "ReportParameters":
_ReportParameters = new ReportParameters(this, null, xNodeLoop);
break;
case "Width":
_Width = new RSize(this, xNodeLoop);
break;
case "PageHeader":
_PageHeader = new PageHeader(this, null, xNodeLoop);
break;
case "PageFooter":
_PageFooter = new PageFooter(this, null, xNodeLoop);
break;
case "PageHeight":
_PageHeight = new RSize(this, xNodeLoop);
break;
case "PageWidth":
_PageWidth = new RSize(this, xNodeLoop);
break;
case "LeftMargin":
_LeftMargin = new RSize(this, xNodeLoop);
break;
case "RightMargin":
_RightMargin = new RSize(this, xNodeLoop);
break;
case "TopMargin":
_TopMargin = new RSize(this, xNodeLoop);
break;
case "BottomMargin":
_BottomMargin = new RSize(this, xNodeLoop);
break;
case "EmbeddedImages":
_EmbeddedImages = new EmbeddedImages(this, null, xNodeLoop);
break;
case "Language":
_Language = new Expression(this, null, xNodeLoop, ExpressionType.String);
break;
case "Code":
_Code = new Code(this, null, xNodeLoop);
break;
case "CodeModules":
_CodeModules = new CodeModules(this, null, xNodeLoop);
break;
case "Classes":
_Classes = new Classes(this, null, xNodeLoop);
break;
case "DataTransform":
_DataTransform = xNodeLoop.InnerText;
break;
case "DataSchema":
_DataSchema = xNodeLoop.InnerText;
break;
case "DataElementName":
_DataElementName = xNodeLoop.InnerText;
break;
case "DataElementStyle":
_DataElementStyle = Oranikle.Report.Engine.DataElementStyle.GetStyle(xNodeLoop.InnerText, this.rl);
break;
default:
// don't know this element - log it
this.rl.LogError(4, "Unknown Report element '" + xNodeLoop.Name + "' ignored.");
break;
}
}
if (_Body == null)
rl.LogError(8, "Body not specified for report.");
if (_Width == null)
rl.LogError(4, "Width not specified for report. Assuming page width.");
if (rl.MaxSeverity <= 4) // don't do final pass if already have serious errors
{
FinalPass(folder); // call final parser pass for expression resolution
}
// Cleanup any dangling resources
if (_DataSourcesDefn != null)
_DataSourcesDefn.CleanUp(null);
}
bool _InMatrix; // true if reportitem is in a matrix
public ReportItem(ReportDefn r, ReportLink p, XmlNode xNode) : base(r, p)
{
_Name=null;
_Style=null;
_Action=null;
_Top=null;
_Left=null;
_Height=null;
_Width=null;
_ZIndex=0;
_Visibility=null;
_ToolTip=null;
_Label=null;
_LinkToChild=null;
_Bookmark=null;
_RepeatWith=null;
_Custom=null;
_DataElementName=null;
_DataElementOutput=DataElementOutputEnum.Auto;
// Run thru the attributes
foreach(XmlAttribute xAttr in xNode.Attributes)
{
switch (xAttr.Name)
{
case "Name":
_Name = new Name(xAttr.Value);
break;
}
}
}
