AppCustom/WISAG_EBCreator
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

MS

Browse Source
This commit is contained in:
SchreiberM
2020-08-20 15:36:45 +02:00
parent add39755e6
commit f803b39d0c
40 changed files with 13043 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

25
WISAG_PM_REPORT.sln Normal file
View File

@@ -0,0 +1,25 @@
Microsoft Visual Studio Solution File, Format Version 12.00
# Visual Studio 15
VisualStudioVersion = 15.0.27703.2018
MinimumVisualStudioVersion = 10.0.40219.1
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "WISAG_PM_REPORT", "WISAG_PM_REPORT\WISAG_PM_REPORT.vbproj", "{2F07AD56-B8BF-40EC-B19E-D714CE8F5191}"
EndProject
Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution
Debug|Any CPU = Debug|Any CPU
Release|Any CPU = Release|Any CPU
EndGlobalSection
GlobalSection(ProjectConfigurationPlatforms) = postSolution
{2F07AD56-B8BF-40EC-B19E-D714CE8F5191}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{2F07AD56-B8BF-40EC-B19E-D714CE8F5191}.Debug|Any CPU.Build.0 = Debug|Any CPU
{2F07AD56-B8BF-40EC-B19E-D714CE8F5191}.Release|Any CPU.ActiveCfg = Release|Any CPU
{2F07AD56-B8BF-40EC-B19E-D714CE8F5191}.Release|Any CPU.Build.0 = Release|Any CPU
EndGlobalSection
GlobalSection(SolutionProperties) = preSolution
HideSolutionNode = FALSE
EndGlobalSection
GlobalSection(ExtensibilityGlobals) = postSolution
SolutionGuid = {0990A84F-90CB-4E08-B7A5-83B7BA6D2C85}
EndGlobalSection
EndGlobal

59
WISAG_PM_REPORT/App.config Normal file
View File

@@ -0,0 +1,59 @@
<?xml version="1.0" encoding="utf-8" ?>
<configuration>
<configSections>
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
<section name="WISAG_PM_REPORT.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
</sectionGroup>
<sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
<section name="WISAG_PM_REPORT.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" />
</sectionGroup>
</configSections>
<connectionStrings>
<add name="WISAG_PM_REPORT.My.MySettings.MySSConnectionString"
connectionString="Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd"
providerName="System.Data.SqlClient" />
<add name="MySSConnectionString" connectionString="XpoProvider=MSSqlServer;data source=172.24.12.41\tests;user id=sa;password=dd;initial catalog=DD_ECM_TEST;Persist Security Info=true" />
<add name="DD_ECM_ReportConnection" connectionString="XpoProvider=MSSqlServer;data source=SDD-VMP04-SQL17\DD_DEVELOP01;user id=sa;password=dd;initial catalog=DD_ECM_TEST;Persist Security Info=true" />
</connectionStrings>
<startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.1" />
</startup>
<userSettings>
<WISAG_PM_REPORT.My.MySettings>
<setting name="MyDocID" serializeAs="String">
<value />
</setting>
<setting name="PDFTK_TEST" serializeAs="String">
<value />
</setting>
</WISAG_PM_REPORT.My.MySettings>
</userSettings>
<applicationSettings>
<WISAG_PM_REPORT.My.MySettings>
<setting name="CONF_SQLSERVER" serializeAs="String">
<value>Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd</value>
</setting>
<setting name="CONCAT_TEMPFolder" serializeAs="String">
<value>\\dd-gan.local.digitaldata.works\DD-DFSR01\UserObjects\UserFiles\schreiberm\Desktop\GDP\TEMP</value>
</setting>
<setting name="oSQLGetDocId" serializeAs="String">
<value>select DISTINCT DOC_ID from VWCUST_RPTPM_UNION WHERE DOC_ID NOT IN (SELECT DocID FROM TBCUST_PM_RPT_CREATED)</value>
</setting>
<setting name="Path2PDFTK" serializeAs="String">
<value>T:\Software\Anwendungen - Portable\Grafik-Programme\PDFTKCommand\pdftk.exe</value>
</setting>
<setting name="Concatted_File_Suffix" serializeAs="String">
<value>_CC</value>
</setting>
<setting name="Path_ConcattedFile" serializeAs="String">
<value>\\dd-gan.local.digitaldata.works\DD-DFSR01\UserObjects\UserFiles\schreiberm\Desktop\GDP</value>
</setting>
<setting name="XDistance" serializeAs="String">
<value>380</value>
</setting>
<setting name="YDistance" serializeAs="String">
<value>720</value>
</setting>
</WISAG_PM_REPORT.My.MySettings>
</applicationSettings>
</configuration>

1394
WISAG_PM_REPORT/Form1.Designer.vb generated Normal file
View File

File diff suppressed because it is too large Load Diff

227
WISAG_PM_REPORT/Form1.resx Normal file
View File

@@ -0,0 +1,227 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="MyDataset.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<metadata name="VWCUST_RPTPM_UNIONBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>127, 17</value>
</metadata>
<metadata name="VWCUST_RPTPM_UNIONTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>394, 17</value>
</metadata>
<metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>656, 17</value>
</metadata>
<metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>829, 17</value>
</metadata>
<metadata name="TimerMinute.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>946, 17</value>
</metadata>
<metadata name="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1067, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="ToolStripButton1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAACrSURBVDhPY/j27dt/IH7/9evXhvfv3wswkApABgTM8Pm/
/txa8gwCGWDRZQLGZBmEbABZBhEwgCDG6oXNmzf/j4yM/O/k5IQXww1AdjKID5L88P4jXoxiAEgjzK/4
DGhubgFjEBtuAHog4TLg1s3bYHEQjWIAOsBlALLtIEyUAefPXwCzjx45CqZhthNtAAiDbAXxkW0nyQB0
v5NsAC5M0ABiME4DiMff/gMA5YhPSShFYD4AAAAASUVORK5CYII=
</value>
</data>
<data name="ToolStripButton4.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAALySURBVDhPpdLrT1tlHMBx/o/FzcXFZNGss6AY1AWRO8hl
4DoupWuBduVYoEAZm5uIQCjIgDBuwizaAmEKymUhhDCzrUSuLdu4lAyYrhO8zKBRsxgIfj30ifLGxBc+
ye/NSb6f55Lj97/X1OLP2Ee8tA+sU9t9j3JHD5ar5UhNRRgb8zA25XK2PgedNRtdlZ4zlZm09Ley+fg7
fIDVsYr99p98fBNKe6DZVU3dZAUfTLxP5c1LlN24wKWxcxSPmDEPmkhsjqPCVoPjepcAzG3guL3rA0o6
kQMLhm4N+q4MsrrUaO1pqG0qNJ2pGPqyULUl43TPcdnWIACpETneoX18F1PLjm/HvbVwf9M3TtfXDH7p
8X3LvHaG+Po3cXtWaOvqEIC2epvW0T+oH94mw/rkH+DfVkaPmoiqcFxLHhptzQJIOP871s9/o6z3CbGW
LR9wcayYcyMFFAznYhqQMPYb0H+a5ZvgsmDmFpeoabksgBDjD7zj+IVC26+cMGz8JxBUEsT03QVKa8sE
EKT1YvrwJ7KvbOGfvo5lJI/8IQnpCznqy0TXq0Hdnc7pT1Qk2ZIJNAfylXuewveKBKBMW0Pb8D0q648c
TVjGPCxiw14sP9revVPsKSR3JhPXkYjSFMDErAt9oUEAzyV5SKrcIOrdTQ5HzoudPxOxuiddxLa3iO9I
IKo1luM5/jhnZsmQNAJ4JuYOERe9nCj2cuCNaRH3yvHese2nfceOaxdx2JVIFDlKbk3NkKpPE8DBiDlC
Sr7hNYuXp8Jm5Z3/vrMcf7Qfh8pxcEMoz0sKbk1Oc0qnEsChKBfK7FVelB7wdIybhKZ4omujeb0ihJeL
glCYlCgkJcfeVsjzAscMCpzTszJwSgCHY93U9W0yNCH/dfMbrDzYwLP+7f6sPWJ51cuSPIv3H7Ky5uX6
+A1Oqk8KYNQ5RWXrVYpraskvL8V4IR9dkZ70XA0pxlQStUmEq8J5NfYVAkNfwj/4OM8GHOGsOVsG/Pz+
AkjbVHdeA2eyAAAAAElFTkSuQmCC
</value>
</data>
<data name="ToolStripButton2.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAABdSURBVDhPtY5BCsAwCAT3bf7/L20uXhssBMSYoILCEAPu
KKSY+avwh6XkQ0QpXMH7jBBXwdrgERJEuArk1djwmum/wAvpmfQFJYEN6b5PYAdPfZ8gwlGQYRNUAIAJ
He+r3Wp/V0QAAAAASUVORK5CYII=
</value>
</data>
<data name="ToolStripButton3.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAD/SURBVDhPlZK7DcIwFEU9AiMwAgUFJUpNpGySNiyQgi4d
RSQmQIzABvRAwQApDMqvNFzLz3nYDihPulJk5x7nyBFd1ymkrutH27aJmDooJ/uNOl2OGvSBnJumWZjt
/4PSarfUcUAHKeUMz2PxAAGQxH4URV4mAQjylC9bRjxASKHv+3kIgHUL4MVfASDLtqosS32ABSB0jXjG
KW4IcLveVRzHqqoqfMVaQ/gQECXXmQPzPNdXbmrDjDnzMgXrpjYM3OAIV+6cpulXuSgK/wvgBDc4wtV1
JhUTaW+CBkS48ZMoo858QA6VKdg3r4YHJ8AtVA46u2NuwP6+TnxnIcQbslEjsjqi7CwAAAAASUVORK5C
YII=
</value>
</data>
<data name="ToolStripButton6.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAIDSURBVDhPpZLrS5NhGMb3j4SWh0oRQVExD4gonkDpg4hG
YKxG6WBogkMZKgPNCEVJFBGdGETEvgwyO9DJE5syZw3PIlPEE9pgBCLZ5XvdMB8Ew8gXbl54nuf63dd9
0OGSnwCahxbPRNPAPMw9Xpg6ZmF46kZZ0xSKzJPIrhpDWsVnpBhGkKx3nAX8Pv7z1zg8OoY/cITdn4fw
bf/C0kYAN3Ma/w3gWfZL5kzTKBxjWyK2DftwI9tyMYCZKXbNHaD91bLYJrDXsYbrWfUKwJrPE9M2M1Oc
VzOOpHI7Jr376Hi9ogHqFIANO0/MmmmbmSmm9a8ze+I4MrNWAdjtoJgWcx+PSzg166yZZ8xM8XvXDix9
c4jIqFYAjoriBV9AhEPv1mH/sonogha0afbZMMZz+yreTGyhpusHwtNNCsA5U1zS4BLxzJIfg299qO32
Ir7UJtZfftyATqeT+8o2D8JSjQrAJblrncYL7ZJ2+bfaFnC/1S1NjL3diRat7qrO7wLRP3HjWsojBeCo
mDEo5mNjuweFGvjWg2EBhCbpkW78htSHHwRyNdmgAFzPEee2iFkzayy2OLXzT4gr6UdUnlXrullsxxQ+
kx0g8BTA3aZlButjSTyjODq/WcQcW/B/Je4OQhLvKQDnzN1mp0nnkvAhR8VuMzNrpm1mpjgkoVwB/v8D
TgDQASA1MVpwzwAAAABJRU5ErkJggg==
</value>
</data>
<metadata name="VWCUST_RPTPM_INV_RPT_STAMPBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 56</value>
</metadata>
<metadata name="VWCUST_RPTPM_INV_RPT_STAMPTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>335, 56</value>
</metadata>
<metadata name="DocumentViewerBarManager1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>647, 56</value>
</metadata>
<assembly alias="DevExpress.Utils.v18.1" name="DevExpress.Utils.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<data name="DocumentViewerBarManager1.ImageStream" type="DevExpress.Utils.ImageCollectionStreamer, DevExpress.Utils.v18.1" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFpEZXZFeHByZXNzLlV0aWxzLnYxOC4xLCBWZXJzaW9uPTE4LjEu
NS4wLCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI4OGQxNzU0ZDcwMGU0OWEFAQAAAChE
ZXZFeHByZXNzLlV0aWxzLkltYWdlQ29sbGVjdGlvblN0cmVhbWVyAAAAAAIAAAAL
</value>
</data>
<metadata name="VWCUST_STAMPBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>865, 56</value>
</metadata>
<metadata name="VWCUST_STAMPTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1088, 56</value>
</metadata>
</root>

612
WISAG_PM_REPORT/Form1.vb Normal file
View File

@@ -0,0 +1,612 @@
Imports DigitalData.Modules.Logging
Imports DigitalData.Modules.Database
Imports System.IO
Imports System.ComponentModel
Imports GdPicture14
Public Class Form1
Dim MyLogger As LogConfig
Dim Logger As Logger
Dim MySQLSDB As MSSQLServer
Dim MyFreigabebericht As String
Dim MyStempel As String
Dim MyOriginStamped As String
Dim MyEndResult As String
Dim DEBUG As Boolean = False
Dim GDPICTURE_LICENSE As String
Private _licenseManager As New GdPicture14.LicenseManager()
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
MyLogger = New LogConfig(LogConfig.PathType.CustomPath, Application.StartupPath & "\log", Nothing, "Digital Data", "WISAGErgReport")
Logger = MyLogger.GetLogger()
MySQLSDB = New MSSQLServer(MyLogger, My.Settings.CONF_SQLSERVER,)
If MySQLSDB.DBInitialized = False Then
MsgBox("Could not initialize database. Check the ConfigString My.Settings.CONF_SQLSERVER!", MsgBoxStyle.Critical)
Me.Close()
End If
Dim oSql = "Select * from TBDD_3RD_PARTY_MODULES"
Dim oDT As DataTable = MySQLSDB.GetDatatable(oSql)
For Each oROW As DataRow In oDT.Rows
If oROW.Item("NAME") = "GDPICTURE" Then
Try
GDPICTURE_LICENSE = oROW.Item("LICENSE")
_licenseManager.RegisterKEY(GDPICTURE_LICENSE)
Catch ex As Exception
Logger.Error(ex)
End Try
End If
Next
Me.TimerMinute.Start()
txtDocID.Text = My.Settings.MyDocID
End Sub
Dim Run_Active As Boolean = False
Private Sub TimerMinute_Tick(sender As Object, e As EventArgs) Handles TimerMinute.Tick
Logger.Debug($"Tick---Hour: {My.Computer.Clock.LocalTime.Hour}")
If DEBUG = True Then Exit Sub
If Run_Active = True Then Exit Sub
If My.Computer.Clock.LocalTime.Hour > 6 And My.Computer.Clock.LocalTime.Hour < 23 Then
Try
Dim oDT As DataTable = MySQLSDB.GetDatatable(My.Settings.oSQLGetDocId)
If Not IsNothing(oDT) Then
If oDT.Rows.Count > 0 Then
Run_Active = True
For Each oRow As DataRow In oDT.Rows
Dim oSQL = $"select count(*) from VWCUST_RPTPM_INV_RPT_STAMP_CHECK WHERE docID = {oRow.Item(0).ToString}"
If MySQLSDB.GetScalarValue(oSQL) >= 1 Then
Create_Report(oRow.Item(0).ToString, 0)
Else
Logger.Info($"ATTENTION - No FinalFreigabe for DocID: {oRow.Item(0).ToString}")
End If
Next
End If
ToolStripStatusLabel1.Text = $"Last Run: {Now.ToString}"
Run_Active = False
End If
Catch ex As Exception
Run_Active = False
End Try
Else
ToolStripStatusLabel1.Text = $"In Sleep Mode 19-06: {Now.ToString}"
End If
End Sub
Sub Create_Report(DocID As String, ReportOption As Integer)
MyFreigabebericht = ""
MyStempel = ""
MyOriginStamped = ""
Logger.Info($"Trying to create report for DocID: {DocID}...")
Dim errortext As String
Try
If DEBUG = True Then
DocumentViewer1.DocumentSource = Nothing
End If
' Me.MyDataset.VWCUST_RPTPM_UNION.Clear()
' VWCUST_RPTPM_UNIONTableAdapter.Connection.ConnectionString = My.Settings.CONF_SQLSERVER
' Me.VWCUST_RPTPM_UNIONTableAdapter.Fill(Me.MyDataset.VWCUST_RPTPM_UNION, DocID)
' Logger.Debug($"---VWCUST_RPTPM_UNION.Rows.Count = [{MyDataset.VWCUST_RPTPM_UNION.Rows.Count}]!---")
' If Me.MyDataset.VWCUST_RPTPM_UNION.Rows.Count = 0 Then
' Logger.Debug($"no rows for UnionView VWCUST_RPTPM_UNION for DocID {DocID}")
' Logger.Debug("My.Settings.CONF_SQLSERVER: " & My.Settings.CONF_SQLSERVER)
' Dim oSQL = $"SELECT GroupTypeID, GroupType, DOC_ID, KreditorNummer, KreditorName_Lang, KreditorName, RechnungNr, Referenz, Nettobetrag, Bruttobetrag, Zahlungsziel, Mandant, [Mandant Name], Kostenstelle, [Erhalten wann], Belegdatum,
' FG_Email, FG_Freigabe, FG_Wann, WHO, [WHEN], DELEGATION
'FROM VWCUST_RPTPM_UNION
'WHERE (DOC_ID = {DocID}) AND (LEN(RechnungNr) > 0)"
' Dim oCHECKDT As DataTable = MySQLSDB.GetDatatable(oSQL)
' Dim oMsg
' If oCHECKDT.Rows.Count <> 0 Then
' Logger.Debug("Now trying to add rows from regular select row by row...")
' Try
' For Each oRow As DataRow In oCHECKDT.Rows
' MyDataset.VWCUST_RPTPM_UNION.ImportRow(oRow)
' Next
' MyDataset.VWCUST_RPTPM_UNION.AcceptChanges()
' Logger.Debug($"Added {MyDataset.VWCUST_RPTPM_UNION.Rows.Count} rows!!")
' Catch ex As Exception
' Logger.Debug($"Ups: Unexpected error in Adding rows row by row: {ex.Message}")
' Logger.Warn($"Unexpected error in Adding rows row by row: {ex.Message}")
' End Try
' If Me.MyDataset.VWCUST_RPTPM_UNION.Rows.Count <> 0 Then
' oMsg = $"...BUT REGULAR SELECT [{oSQL}] returned {oCHECKDT.Rows.Count} rows!!!!"
' Logger.Warn(oMsg)
' End If
' Else
' Logger.Warn($"no rows for UnionView VWCUST_RPTPM_UNION for DocID {DocID}")
' Logger.Debug("My.Settings.CONF_SQLSERVER: " & My.Settings.CONF_SQLSERVER)
' End If
' If DEBUG = True And Me.MyDataset.VWCUST_RPTPM_UNION.Rows.Count = 0 Then
' If oCHECKDT.Rows.Count <> 0 Then
' MsgBox($"No rows for UnionView VWCUST_RPTPM_UNION for DocID {DocID}! " & vbNewLine & oMsg)
' Else
' MsgBox($"No rows for UnionView VWCUST_RPTPM_UNION for DocID {DocID}")
' End If
' Exit Sub
' End If
'End If
Catch ex As Exception
If DEBUG = True Then
MsgBox(ex.Message, MsgBoxStyle.Critical, "Error in 1:")
End If
Logger.Error(ex)
Exit Sub
End Try
Try
Dim report As New XtraReport2()
report.ReportPrintOptions.PrintOnEmptyDataSource = False
report.FilterString = "DocID = " + DocID
'report.ObjectDataSource1.Parameters(0).Value = Convert.ToInt64(TextBox1.Text)
report.CreateDocument(False)
If DEBUG = True Then
DocumentViewer1.DocumentSource = report
End If
Dim oMyErgebnisbericht As String = Path.Combine(My.Settings.CONCAT_TEMPFolder, DocID & "_ERPT.pdf")
If File.Exists(oMyErgebnisbericht) Then
Try
File.Delete(oMyErgebnisbericht)
Catch ex As Exception
If DEBUG = True Then
MsgBox($"Could not delete existing Reportfile: {oMyErgebnisbericht}", MsgBoxStyle.Critical)
End If
Exit Sub
End Try
End If
report.ExportToPdf(oMyErgebnisbericht)
If File.Exists(oMyErgebnisbericht) Then
If ReportOption = 1 Then
Exit Sub
End If
MyFreigabebericht = oMyErgebnisbericht
Dim oOriginFile As String
Dim osql = $"select dbo.FNDD_GET_WINDREAM_FILE_PATH ({DocID},1)"
oOriginFile = MySQLSDB.GetScalarValue(osql)
If File.Exists(oOriginFile) = False Then
Logger.Warn($"File {oOriginFile} is not existing. Check the pathconfiguration!")
Exit Sub
End If
If Not IsNothing(oOriginFile) Then
If File.Exists(My.Settings.Path2PDFTK) Then
If Create_MyStempel(DEBUG, DocID) = True Then
'Jetzt Stempeln des OriginakBeleges mit dem Stamp-Report
Dim oStampedResult = CreateStampedPDF(oOriginFile, DocID)
If oStampedResult <> "" Then
If Concat_Files(DocID, oOriginFile) = True Then
If DEBUG Then
MsgBox($"The ResultReport has been created: {MyEndResult}", MsgBoxStyle.Information)
End If
If DEBUG = False Then
Dim oInsert = $"INSERT INTO TBCUST_PM_RPT_CREATED (DocID) VALUES ({Convert.ToInt64(DocID)})"
MySQLSDB.ExecuteNonQuery(oInsert)
End If
Logger.Info($"Concatted file [{oStampedResult}] created!")
End If
End If
End If
End If
Else
Logger.Warn("OriginFile is nothing!!")
If DEBUG Then
MsgBox("OriginFile is nothing", MsgBoxStyle.Critical)
End If
End If
End If
Catch ex As Exception
errortext = "ex.message: " & ex.Message & vbNewLine & "ex.StackTrace: " & ex.StackTrace.ToString & vbNewLine & "ex.InnerException: " & ex.InnerException.Message
If DEBUG = True Then
MsgBox(errortext, MsgBoxStyle.Critical, "Error in 2:")
Clipboard.SetText(errortext)
End If
Logger.Error(ex)
End Try
End Sub
Private Function Create_MyStempel(istest As Boolean, DocID As String)
MyStempel = ""
Logger.Info($"Trying to create Stampreport for DocID: {DocID}...")
Dim errortext As String
Try
If istest = True Then
DocumentViewer1.DocumentSource = Nothing
End If
Catch ex As Exception
If istest = True Then
MsgBox(ex.Message, MsgBoxStyle.Critical, "Error in 1:")
End If
Logger.Error(ex)
Return False
End Try
Try
Dim myReport As New RptStampIcon()
myReport.ReportPrintOptions.PrintOnEmptyDataSource = False
myReport.FilterString = "DocID = " + DocID
'report.ObjectDataSource1.Parameters(0).Value = Convert.ToInt64(TextBox1.Text)
myReport.CreateDocument(False)
If istest = True Then
DocumentViewer1.DocumentSource = myReport
End If
Dim oTempStempel As String = Path.Combine(My.Settings.CONCAT_TEMPFolder, DocID & "_Stamp.jpg")
If File.Exists(oTempStempel) Then
Try
File.Delete(oTempStempel)
Catch ex As Exception
If istest = True Then
MsgBox($"Could not delete existing Reportfile: {oTempStempel}", MsgBoxStyle.Critical)
End If
Return False
End Try
End If
'myReport.ExportToPdf(oTempStempel)
Dim oExportOptions As New DevExpress.XtraPrinting.ImageExportOptions
oExportOptions.Resolution = 400
oExportOptions.Format = Imaging.ImageFormat.Jpeg
oExportOptions.ExportMode = DevExpress.XtraPrinting.ImageExportMode.SingleFile
myReport.ExportToImage(oTempStempel, oExportOptions)
If File.Exists(oTempStempel) Then
MyStempel = oTempStempel
Logger.Info($"Stampreport created for DocID: {DocID}!")
If istest = True Then
MsgBox($"Stampreport [{oTempStempel}] created for DocID [{DocID}]!", MsgBoxStyle.Information)
End If
Return True
Else
MyStempel = ""
Return False
End If
Catch ex As Exception
errortext = "ex.message: " & ex.Message & vbNewLine & "ex.StackTrace: " & ex.StackTrace.ToString & vbNewLine & "ex.InnerException: " & ex.InnerException.Message
If istest = True Then
MsgBox(errortext, MsgBoxStyle.Critical, "Error in Create_StampReport:")
Clipboard.SetText(errortext)
End If
Logger.Error(ex)
Return False
End Try
End Function
Private Function CreateStampedPDF(oOriginFile As String, DocID As Integer)
Try
Logger.Info($"Trying to create stamp on OriginWMFile for DocID: {DocID}...")
Logger.Debug($"Now in CreateStampedPDF")
Dim myProcess As New Process
Dim ProcID
myProcess.StartInfo.FileName = My.Settings.Path2PDFTK
myProcess.StartInfo.CreateNoWindow = False
'Dim oOutputFile As String
'oOutputFile = Path.GetFileNameWithoutExtension(oOriginFile) & My.Settings.Concatted_File_Suffix
'oOutputFile = Path.Combine(My.Settings.CONCAT_TEMPFolder, oOutputFile + "_BG.pdf")
Dim oStampedOriginWithPicture As String
oStampedOriginWithPicture = Path.GetFileNameWithoutExtension(oOriginFile) & My.Settings.Concatted_File_Suffix
oStampedOriginWithPicture = Path.Combine(My.Settings.CONCAT_TEMPFolder, oStampedOriginWithPicture + "_StampedOriginal.pdf")
'Using oBackPDF As New GdPicturePDF
' If oBackPDF.LoadFromFile(oOriginFile, False) = GdPictureStatus.OK Then
' Using oOverlayPDF As New GdPicturePDF
' If oOverlayPDF.LoadFromFile(MyStempel, False) = GdPictureStatus.OK Then
' oBackPDF.DrawPage(oOverlayPDF, 1, 0, 0, oBackPDF.GetPageWidth, oBackPDF.GetPageHeight)
' oBackPDF.SaveToFile(oOutputFile1, True)
' End If
' End Using
' End If
'End Using
Dim oGdPicturePDF As New GdPicturePDF()
Dim oGdPictureImaging As New GdPictureImaging()
'Creating a new empty PDF document.
If oGdPicturePDF.LoadFromFile(oOriginFile, False) = GdPictureStatus.OK Then
Dim oYDistance = oGdPicturePDF.GetPageHeight
'Just to remind you that units are set to points and the origin is set to bottom left by default.
'Loading an image from a file.
Dim imageID As Integer = oGdPictureImaging.CreateGdPictureImageFromFile(MyStempel)
If oGdPictureImaging.GetStat() = GdPictureStatus.OK Then
'Adding an image as a resource into the PDF document - we decided not to draw the image in this moment.
Dim imageResName As String = oGdPicturePDF.AddImageFromGdPictureImage(imageID, False, False)
If System.IO.File.Exists(oStampedOriginWithPicture) Then
System.IO.File.Delete(oStampedOriginWithPicture)
End If
Dim oStempelHEight = oGdPictureImaging.GetHeight(imageID) / 5
oYDistance = (oYDistance - oStempelHEight) - 10
'Drawing the image resource onto the current page and saving the PDF document.
If (oGdPicturePDF.GetStat() <> GdPictureStatus.OK) OrElse
(oGdPicturePDF.DrawImage(imageResName, My.Settings.XDistance, oYDistance, oGdPictureImaging.GetWidth(imageID) / 5, oGdPictureImaging.GetHeight(imageID) / 5) <> GdPictureStatus.OK) OrElse
(oGdPicturePDF.SaveToFile(oStampedOriginWithPicture) <> GdPictureStatus.OK) Then
Logger.Warn("The example has NOT been followed successfully. Error: " + oGdPicturePDF.GetStat().ToString())
'MessageBox.Show("The example has NOT been followed successfully. Error: " + oGdPicturePDF.GetStat().ToString(), "Adding an image Example", MessageBoxButtons.OK, MessageBoxIcon.Error)
Return ""
End If
'Releasing the image.
oGdPictureImaging.ReleaseGdPictureImage(imageID)
Else
Logger.Warn("The image can't be loaded. Error: " + oGdPictureImaging.GetStat().ToString())
Return ""
'MessageBox.Show("The image can't be loaded. Error: " + oGdPictureImaging.GetStat().ToString(), "Adding an image Example", MessageBoxButtons.OK, MessageBoxIcon.Error)
End If
oGdPicturePDF.CloseDocument()
Else
Logger.Warn("The new PDF document can't be created. Error: " + oGdPicturePDF.GetStat().ToString())
'MessageBox.Show("The new PDF document can't be created. Error: " + oGdPicturePDF.GetStat().ToString(), "Adding an image Example", MessageBoxButtons.OK, MessageBoxIcon.Error)
Return ""
End If
oGdPictureImaging.Dispose()
oGdPicturePDF.Dispose()
'###### OLD VERSION WITH PDF TK
'Dim _argument As String = """" & oOriginFile & """" & " background " & """" & MyStempel & """" _
' & " output " & """" & oOutputFile & """"
'myProcess.StartInfo.Arguments = _argument
'Logger.Debug("Arguments: " & _argument)
'myProcess.Start()
'ProcID = myProcess.Id
'Dim p As Process
'p = Process.GetProcessById(ProcID)
Dim sw As Stopwatch = New Stopwatch()
'sw.Start()
'Do While p.HasExited = False
' If sw.Elapsed.TotalSeconds = 30 Then
' Logger.Info("Still waiting (30 sec) for ending of process-id: " & ProcID.ToString)
' ElseIf sw.Elapsed.TotalMinutes = 1 Then
' Logger.Info("Still waiting (60 sec) for ending of process-id: " & ProcID.ToString & " - Exit now")
' Exit Do
' End If
'Loop
Dim oSuccess As Boolean = True
'Logger.Debug("...process has exited: ")
'sw.Stop()
sw.Start()
Logger.Debug("Waiting for file: " & oStampedOriginWithPicture)
Do While File.Exists(oStampedOriginWithPicture) = False
If sw.Elapsed.TotalSeconds = 30 Then
Logger.Info("ATTENTION: Still waiting (30 sec) for file: " & oStampedOriginWithPicture)
ElseIf sw.Elapsed.TotalMinutes = 1 Then
Logger.Info("ATTENTION: Still waiting (60 sec) for file: " & oStampedOriginWithPicture)
oSuccess = False
Exit Do
End If
Loop
sw.Stop()
Try
File.Delete(MyStempel)
Logger.Debug($"Deleted StempelFile [{MyStempel}]!")
Catch ex As Exception
Logger.Warn($"Could not delete reportfile after creating concatted file: {ex.Message}")
End Try
If oSuccess = True Then
MyOriginStamped = oStampedOriginWithPicture
Return oStampedOriginWithPicture
Else
MyOriginStamped = ""
Return ""
End If
Catch ex As Exception
Logger.Error(ex) '("Unexpected error: " & ex.Message, "clsProfil.Profil_Durchlauf(Concat Files to one pdf)")
Return ""
End Try
End Function
Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click
My.Settings.Save()
If txtDocID.Text = "" Then Exit Sub
DEBUG = True
MyLogger.Debug = True
Create_Report(txtDocID.Text, 0)
End Sub
Private Function Concat_Files(DocID As String, oOriginFile As String)
Dim oConcatSuccessfull As Boolean = True
Try
Dim oFile2Concat As String = Path.GetFileNameWithoutExtension(oOriginFile) & My.Settings.Concatted_File_Suffix
oFile2Concat = Path.Combine(My.Settings.Path_ConcattedFile, oFile2Concat + ".pdf")
If File.Exists(My.Settings.Path2PDFTK) Then
If File.Exists(oFile2Concat) Then
Try
File.Delete(oFile2Concat)
Catch ex As Exception
Logger.Warn($"Could not delete ConcattedFile {oFile2Concat}: {ex.Message}")
Return False
End Try
End If
Try
Dim myProcess As New Process
Dim ProcID
myProcess.StartInfo.FileName = My.Settings.Path2PDFTK
myProcess.StartInfo.CreateNoWindow = False
Dim _argument As String = """" & MyOriginStamped & """" & " " & """" & MyFreigabebericht & """"
myProcess.StartInfo.Arguments = _argument & " cat output " & oFile2Concat
Logger.Debug("Arguments: " & _argument & " cat output " & oFile2Concat)
myProcess.Start()
ProcID = myProcess.Id
Dim p As Process
p = Process.GetProcessById(ProcID)
Dim sw As Stopwatch = New Stopwatch()
sw.Start()
Do While p.HasExited = False
If sw.Elapsed.TotalSeconds = 30 Then
Logger.Info("Still waiting (30 sec) for ending of process-id: " & ProcID.ToString)
ElseIf sw.Elapsed.TotalMinutes = 1 Then
Logger.Info("Still waiting (60 sec) for ending of process-id: " & ProcID.ToString & " - Exit now")
Exit Do
End If
Loop
Logger.Debug("...process has exited: ")
sw.Stop()
Logger.Debug("Waiting for file: " & oFile2Concat)
sw.Start()
Do While File.Exists(oFile2Concat) = False
If sw.Elapsed.TotalSeconds = 30 Then
Logger.Info("ATTENTION: Still waiting (30 sec) for file: " & oFile2Concat)
ElseIf sw.Elapsed.TotalMinutes = 1 Then
Logger.Info("ATTENTION: Still waiting (60 sec) for file: " & oFile2Concat)
oConcatSuccessfull = False
Exit Do
End If
Loop
sw.Stop()
If oConcatSuccessfull = True Then
MyEndResult = oFile2Concat
End If
Try
File.Delete(MyOriginStamped)
Logger.Debug($"Deleted file [{MyOriginStamped}]!")
File.Delete(MyFreigabebericht)
Logger.Debug($"Deleted file [{MyFreigabebericht}]!")
Catch ex As Exception
Logger.Warn($"Could not delete reportfile after creating concatted file: {ex.Message}")
End Try
Return oConcatSuccessfull
Catch ex As Exception
Logger.Error(ex) '("Unexpected error: " & ex.Message, "clsProfil.Profil_Durchlauf(Concat Files to one pdf)")
Return False
End Try
Else
Logger.Warn("pdftk is not existing")
Return False
End If
Catch ex As Exception
End Try
End Function
Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click
If txtDocID.Text = "" Then Exit Sub
My.Settings.Save()
Create_MyStempel(True, txtDocID.Text)
End Sub
Private Sub Form1_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
My.Settings.Save()
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim myProcess As New Process
Dim ProcID
myProcess.StartInfo.FileName = My.Settings.Path2PDFTK
myProcess.StartInfo.CreateNoWindow = True
Dim _argument As String = txtPDFTKRun.Text
myProcess.StartInfo.Arguments = _argument
Logger.Debug("Arguments: " & _argument)
myProcess.Start()
ProcID = myProcess.Id
Dim p As Process
p = Process.GetProcessById(ProcID)
Dim sw As Stopwatch = New Stopwatch()
sw.Start()
Do While p.HasExited = False
If sw.Elapsed.TotalSeconds = 30 Then
Logger.Info("Still waiting (30 sec) for ending of process-id: " & ProcID.ToString)
ElseIf sw.Elapsed.TotalMinutes = 1 Then
Logger.Info("Still waiting (60 sec) for ending of process-id: " & ProcID.ToString & " - Exit now")
Exit Do
End If
Loop
Logger.Debug("...process has exited: ")
sw.Stop()
End Sub
Private Sub ToolStripButton3_Click(sender As Object, e As EventArgs) Handles ToolStripButton3.Click
If ToolStripButton3.CheckState = CheckState.Checked Then
DEBUG = True
ToolStripButton3.BackColor = Color.Yellow
MyLogger.Debug = True
Me.Text = "Report-Generator (beta) in DebugMode - all Automatic stopped"
Else
DEBUG = False
MyLogger.Debug = False
ToolStripButton3.BackColor = Color.WhiteSmoke
Me.Text = "Report-Generator (beta) - AutoMode"
End If
If My.Settings.CONF_SQLSERVER.Contains("_TEST") Then
Me.Text &= " - TESTSystem"
End If
My.Settings.Save()
End Sub
Private Sub ToolStripButton4_Click(sender As Object, e As EventArgs) Handles ToolStripButton4.Click
If txtDocID.Text = "" Then Exit Sub
My.Settings.Save()
DEBUG = True
MyLogger.Debug = True
Create_Report(txtDocID.Text, 1)
End Sub
Private Sub ToolStripButton5_Click(sender As Object, e As EventArgs)
Dim report As New RpStampTable()
report.ReportPrintOptions.PrintOnEmptyDataSource = False
report.FilterString = "DocID = " + txtDocID.Text
'report.DocID.Value = txtDocID.Text
'report.ObjectDataSource1.Parameters(0).Value = Convert.ToInt64(TextBox1.Text)
report.CreateDocument(False)
If DEBUG = True Then
DocumentViewer1.DocumentSource = report
End If
End Sub
Private Sub ToolStripButton6_Click(sender As Object, e As EventArgs) Handles ToolStripButton6.Click
Dim report As New RptStampIcon()
report.ReportPrintOptions.PrintOnEmptyDataSource = False
report.FilterString = "DocID = " + txtDocID.Text
'report.DocID.Value = txtDocID.Text
'report.ObjectDataSource1.Parameters(0).Value = Convert.ToInt64(TextBox1.Text)
report.CreateDocument(False)
If DEBUG = True Then
DocumentViewer1.DocumentSource = report
End If
End Sub
End Class

38
WISAG_PM_REPORT/My Project/Application.Designer.vb generated Normal file
View File

@@ -0,0 +1,38 @@
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:4.0.30319.42000
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Namespace My
'NOTE: This file is auto-generated; do not modify it directly. To make changes,
' or if you encounter build errors in this file, go to the Project Designer
' (go to Project Properties or double-click the My Project node in
' Solution Explorer), and make changes on the Application tab.
'
Partial Friend Class MyApplication
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Public Sub New()
MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
Me.IsSingleInstance = false
Me.EnableVisualStyles = true
Me.SaveMySettingsOnExit = true
Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
End Sub
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Protected Overrides Sub OnCreateMainForm()
Me.MainForm = Global.WISAG_PM_REPORT.Form1
End Sub
End Class
End Namespace

11
WISAG_PM_REPORT/My Project/Application.myapp Normal file
View File

@@ -0,0 +1,11 @@
<?xml version="1.0" encoding="utf-8"?>
<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
<MySubMain>true</MySubMain>
<MainForm>Form1</MainForm>
<SingleInstance>false</SingleInstance>
<ShutdownMode>0</ShutdownMode>
<EnableVisualStyles>true</EnableVisualStyles>
<AuthenticationMode>0</AuthenticationMode>
<ApplicationType>0</ApplicationType>
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
</MyApplicationData>

35
WISAG_PM_REPORT/My Project/AssemblyInfo.vb Normal file
View File

@@ -0,0 +1,35 @@
Imports System
Imports System.Reflection
Imports System.Runtime.InteropServices
' Allgemeine Informationen über eine Assembly werden über die folgenden
' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
' die einer Assembly zugeordnet sind.
' Werte der Assemblyattribute überprüfen
<Assembly: AssemblyTitle("WISAG_PM_REPORT")>
<Assembly: AssemblyDescription("")>
<Assembly: AssemblyCompany("")>
<Assembly: AssemblyProduct("WISAG_PM_REPORT")>
<Assembly: AssemblyCopyright("Copyright © 2019")>
<Assembly: AssemblyTrademark("")>
<Assembly: ComVisible(False)>
'Die folgende GUID bestimmt die ID der Typbibliothek, wenn dieses Projekt für COM verfügbar gemacht wird.
<Assembly: Guid("af0a02ec-1846-4566-97d1-8955ce5830c1")>
' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
'
' Hauptversion
' Nebenversion
' Buildnummer
' Revision
'
' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("2.0.0")>
<Assembly: AssemblyFileVersion("1.0.0.0")>

62
WISAG_PM_REPORT/My Project/Resources.Designer.vb generated Normal file
View File

@@ -0,0 +1,62 @@
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:4.0.30319.42000
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Namespace My.Resources
'This class was auto-generated by the StronglyTypedResourceBuilder
'class via a tool like ResGen or Visual Studio.
'To add or remove a member, edit your .ResX file then rerun ResGen
'with the /str option, or rebuild your VS project.
'''<summary>
''' A strongly-typed resource class, for looking up localized strings, etc.
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
Friend Module Resources
Private resourceMan As Global.System.Resources.ResourceManager
Private resourceCulture As Global.System.Globalization.CultureInfo
'''<summary>
''' Returns the cached ResourceManager instance used by this class.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
Get
If Object.ReferenceEquals(resourceMan, Nothing) Then
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("WISAG_PM_REPORT.Resources", GetType(Resources).Assembly)
resourceMan = temp
End If
Return resourceMan
End Get
End Property
'''<summary>
''' Overrides the current thread's CurrentUICulture property for all
''' resource lookups using this strongly typed resource class.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Friend Property Culture() As Global.System.Globalization.CultureInfo
Get
Return resourceCulture
End Get
Set(ByVal value As Global.System.Globalization.CultureInfo)
resourceCulture = value
End Set
End Property
End Module
End Namespace

117
WISAG_PM_REPORT/My Project/Resources.resx Normal file
View File

@@ -0,0 +1,117 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
</root>

184
WISAG_PM_REPORT/My Project/Settings.Designer.vb generated Normal file
View File

@@ -0,0 +1,184 @@
'------------------------------------------------------------------------------
' <auto-generated>
' Dieser Code wurde von einem Tool generiert.
' Laufzeitversion:4.0.30319.42000
'
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Namespace My
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "15.7.0.0"), _
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Partial Friend NotInheritable Class MySettings
Inherits Global.System.Configuration.ApplicationSettingsBase
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
#Region "Automatische My.Settings-Speicherfunktion"
#If _MyType = "WindowsForms" Then
Private Shared addedHandler As Boolean
Private Shared addedHandlerLockObject As New Object
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
If My.Application.SaveMySettingsOnExit Then
My.Settings.Save()
End If
End Sub
#End If
#End Region
Public Shared ReadOnly Property [Default]() As MySettings
Get
#If _MyType = "WindowsForms" Then
If Not addedHandler Then
SyncLock addedHandlerLockObject
If Not addedHandler Then
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
addedHandler = True
End If
End SyncLock
End If
#End If
Return defaultInstance
End Get
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property MyDocID() As String
Get
Return CType(Me("MyDocID"),String)
End Get
Set
Me("MyDocID") = value
End Set
End Property
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.SpecialSettingAttribute(Global.System.Configuration.SpecialSetting.ConnectionString), _
Global.System.Configuration.DefaultSettingValueAttribute("Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Secu"& _
"rity Info=True;User ID=sa;Password=dd")> _
Public ReadOnly Property MySSConnectionString() As String
Get
Return CType(Me("MySSConnectionString"),String)
End Get
End Property
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Secu"& _
"rity Info=True;User ID=sa;Password=dd")> _
Public ReadOnly Property CONF_SQLSERVER() As String
Get
Return CType(Me("CONF_SQLSERVER"),String)
End Get
End Property
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("\\dd-gan.local.digitaldata.works\DD-DFSR01\UserObjects\UserFiles\schreiberm\Deskt"& _
"op\GDP\TEMP")> _
Public ReadOnly Property CONCAT_TEMPFolder() As String
Get
Return CType(Me("CONCAT_TEMPFolder"),String)
End Get
End Property
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("select DISTINCT DOC_ID from VWCUST_RPTPM_UNION WHERE DOC_ID NOT IN (SELECT DocID "& _
"FROM TBCUST_PM_RPT_CREATED)")> _
Public ReadOnly Property oSQLGetDocId() As String
Get
Return CType(Me("oSQLGetDocId"),String)
End Get
End Property
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("T:\Software\Anwendungen - Portable\Grafik-Programme\PDFTKCommand\pdftk.exe")> _
Public ReadOnly Property Path2PDFTK() As String
Get
Return CType(Me("Path2PDFTK"),String)
End Get
End Property
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("_CC")> _
Public ReadOnly Property Concatted_File_Suffix() As String
Get
Return CType(Me("Concatted_File_Suffix"),String)
End Get
End Property
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("\\dd-gan.local.digitaldata.works\DD-DFSR01\UserObjects\UserFiles\schreiberm\Deskt"& _
"op\GDP")> _
Public ReadOnly Property Path_ConcattedFile() As String
Get
Return CType(Me("Path_ConcattedFile"),String)
End Get
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property PDFTK_TEST() As String
Get
Return CType(Me("PDFTK_TEST"),String)
End Get
Set
Me("PDFTK_TEST") = value
End Set
End Property
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("380")> _
Public ReadOnly Property XDistance() As Integer
Get
Return CType(Me("XDistance"),Integer)
End Get
End Property
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("720")> _
Public ReadOnly Property YDistance() As Integer
Get
Return CType(Me("YDistance"),Integer)
End Get
End Property
End Class
End Namespace
Namespace My
<Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
Friend Module MySettingsProperty
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
Friend ReadOnly Property Settings() As Global.WISAG_PM_REPORT.My.MySettings
Get
Return Global.WISAG_PM_REPORT.My.MySettings.Default
End Get
End Property
End Module
End Namespace

44
WISAG_PM_REPORT/My Project/Settings.settings Normal file
View File

@@ -0,0 +1,44 @@
<?xml version='1.0' encoding='utf-8'?>
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" GeneratedClassNamespace="My" GeneratedClassName="MySettings" UseMySettingsClassName="true">
<Profiles />
<Settings>
<Setting Name="MyDocID" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="MySSConnectionString" Type="(Connection string)" Scope="Application">
<DesignTimeValue Profile="(Default)">&lt;?xml version="1.0" encoding="utf-16"?&gt;
&lt;SerializableConnectionString xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema"&gt;
&lt;ConnectionString&gt;Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd&lt;/ConnectionString&gt;
&lt;ProviderName&gt;System.Data.SqlClient&lt;/ProviderName&gt;
&lt;/SerializableConnectionString&gt;</DesignTimeValue>
<Value Profile="(Default)">Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd</Value>
</Setting>
<Setting Name="CONF_SQLSERVER" Type="System.String" Scope="Application">
<Value Profile="(Default)">Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd</Value>
</Setting>
<Setting Name="CONCAT_TEMPFolder" Type="System.String" Scope="Application">
<Value Profile="(Default)">\\dd-gan.local.digitaldata.works\DD-DFSR01\UserObjects\UserFiles\schreiberm\Desktop\GDP\TEMP</Value>
</Setting>
<Setting Name="oSQLGetDocId" Type="System.String" Scope="Application">
<Value Profile="(Default)">select DISTINCT DOC_ID from VWCUST_RPTPM_UNION WHERE DOC_ID NOT IN (SELECT DocID FROM TBCUST_PM_RPT_CREATED)</Value>
</Setting>
<Setting Name="Path2PDFTK" Type="System.String" Scope="Application">
<Value Profile="(Default)">T:\Software\Anwendungen - Portable\Grafik-Programme\PDFTKCommand\pdftk.exe</Value>
</Setting>
<Setting Name="Concatted_File_Suffix" Type="System.String" Scope="Application">
<Value Profile="(Default)">_CC</Value>
</Setting>
<Setting Name="Path_ConcattedFile" Type="System.String" Scope="Application">
<Value Profile="(Default)">\\dd-gan.local.digitaldata.works\DD-DFSR01\UserObjects\UserFiles\schreiberm\Desktop\GDP</Value>
</Setting>
<Setting Name="PDFTK_TEST" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="XDistance" Type="System.Int32" Scope="Application">
<Value Profile="(Default)">380</Value>
</Setting>
<Setting Name="YDistance" Type="System.Int32" Scope="Application">
<Value Profile="(Default)">720</Value>
</Setting>
</Settings>
</SettingsFile>

3
WISAG_PM_REPORT/My Project/licenses.licx Normal file
View File

@@ -0,0 +1,3 @@
DevExpress.XtraReports.UI.XtraReport, DevExpress.XtraReports.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraEditors.Repository.RepositoryItemProgressBar, DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
DevExpress.XtraPrinting.Preview.DocumentViewer, DevExpress.XtraPrinting.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a

4780
WISAG_PM_REPORT/MyDataset.Designer.vb generated Normal file
View File

File diff suppressed because it is too large Load Diff

4
WISAG_PM_REPORT/MyDataset.vb Normal file
View File

@@ -0,0 +1,4 @@
Partial Class MyDataset
Partial Public Class VWCUST_RPTPM_UNION1DataTable
End Class
End Class

9
WISAG_PM_REPORT/MyDataset.xsc Normal file
View File

@@ -0,0 +1,9 @@
<?xml version="1.0" encoding="utf-8"?>
<!--<autogenerated>
This code was generated by a tool.
Changes to this file may cause incorrect behavior and will be lost if
the code is regenerated.
</autogenerated>-->
<DataSetUISetting Version="1.00" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TableUISettings />
</DataSetUISetting>

414
WISAG_PM_REPORT/MyDataset.xsd Normal file
View File

@@ -0,0 +1,414 @@
<?xml version="1.0" encoding="utf-8"?>
<xs:schema id="MyDataset" targetNamespace="http://tempuri.org/MyDataset.xsd" xmlns:mstns="http://tempuri.org/MyDataset.xsd" xmlns="http://tempuri.org/MyDataset.xsd" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata" xmlns:msprop="urn:schemas-microsoft-com:xml-msprop" attributeFormDefault="qualified" elementFormDefault="qualified">
<xs:annotation>
<xs:appinfo source="urn:schemas-microsoft-com:xml-msdatasource">
<DataSource DefaultConnectionIndex="0" FunctionsComponentName="QueriesTableAdapter" Modifier="AutoLayout, AnsiClass, Class, Public" SchemaSerializationMode="IncludeSchema" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<Connections>
<Connection AppSettingsObjectName="MySettings" AppSettingsPropertyName="MySSConnectionString" ConnectionStringObject="" IsAppSettingsProperty="true" Modifier="Assembly" Name="MySSConnectionString (MySettings)" ParameterPrefix="@" PropertyReference="ApplicationSettings.WISAG_PM_REPORT.My.MySettings.GlobalReference.Default.MySSConnectionString" Provider="System.Data.SqlClient" />
</Connections>
<Tables>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="VWCUST_RPTPM_UNIONTableAdapter" GeneratorDataComponentClassName="VWCUST_RPTPM_UNIONTableAdapter" Name="VWCUST_RPTPM_UNION" UserDataComponentName="VWCUST_RPTPM_UNIONTableAdapter">
<MainSource>
<DbSource ConnectionRef="MySSConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.VWCUST_RPTPM_UNION" DbObjectType="View" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="false" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT GroupTypeID, GroupType, DOC_ID, KreditorNummer, KreditorName_Lang, KreditorName, RechnungNr, Referenz, Nettobetrag, Bruttobetrag, Zahlungsziel, Mandant, [Mandant Name], Kostenstelle, [Erhalten wann], Belegdatum,
FG_Email, FG_Freigabe, FG_Wann, WHO, [WHEN], DELEGATION
FROM VWCUST_RPTPM_UNION
WHERE (DOC_ID = @DocID) AND (LEN(RechnungNr) &gt; 0)</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="DocID" ColumnName="DOC_ID" DataSourceName="DD_ECM_TEST.dbo.VWCUST_RPTPM_UNION" DataTypeServer="bigint" DbType="Int64" Direction="Input" ParameterName="@DocID" Precision="0" ProviderType="BigInt" Scale="0" Size="8" SourceColumn="DOC_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
</DbSource>
</MainSource>
<Mappings>
<Mapping SourceColumn="GroupTypeID" DataSetColumn="GroupTypeID" />
<Mapping SourceColumn="GroupType" DataSetColumn="GroupType" />
<Mapping SourceColumn="DOC_ID" DataSetColumn="DOC_ID" />
<Mapping SourceColumn="KreditorNummer" DataSetColumn="KreditorNummer" />
<Mapping SourceColumn="KreditorName_Lang" DataSetColumn="KreditorName_Lang" />
<Mapping SourceColumn="KreditorName" DataSetColumn="KreditorName" />
<Mapping SourceColumn="RechnungNr" DataSetColumn="RechnungNr" />
<Mapping SourceColumn="Referenz" DataSetColumn="Referenz" />
<Mapping SourceColumn="Nettobetrag" DataSetColumn="Nettobetrag" />
<Mapping SourceColumn="Bruttobetrag" DataSetColumn="Bruttobetrag" />
<Mapping SourceColumn="Zahlungsziel" DataSetColumn="Zahlungsziel" />
<Mapping SourceColumn="Mandant" DataSetColumn="Mandant" />
<Mapping SourceColumn="Mandant Name" DataSetColumn="Mandant Name" />
<Mapping SourceColumn="Kostenstelle" DataSetColumn="Kostenstelle" />
<Mapping SourceColumn="Erhalten wann" DataSetColumn="Erhalten wann" />
<Mapping SourceColumn="Belegdatum" DataSetColumn="Belegdatum" />
<Mapping SourceColumn="FG_Email" DataSetColumn="FG_Email" />
<Mapping SourceColumn="FG_Freigabe" DataSetColumn="FG_Freigabe" />
<Mapping SourceColumn="FG_Wann" DataSetColumn="FG_Wann" />
<Mapping SourceColumn="WHO" DataSetColumn="WHO" />
<Mapping SourceColumn="WHEN" DataSetColumn="WHEN" />
<Mapping SourceColumn="DELEGATION" DataSetColumn="DELEGATION" />
</Mappings>
<Sources />
</TableAdapter>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="VWCUST_RPTPM_UNION1TableAdapter" GeneratorDataComponentClassName="VWCUST_RPTPM_UNION1TableAdapter" Name="VWCUST_RPTPM_UNION1" UserDataComponentName="VWCUST_RPTPM_UNION1TableAdapter">
<MainSource>
<DbSource ConnectionRef="MySSConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.VWCUST_STAMP" DbObjectType="View" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="false" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT FG_TYP, DocID, Email, Freigabe, Wann
FROM VWCUST_STAMP
WHERE (DocID = @DocID)</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="DocID" ColumnName="DocID" DataSourceName="DD_ECM_TEST.dbo.VWCUST_STAMP" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@DocID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="DocID" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
</DbSource>
</MainSource>
<Mappings>
<Mapping SourceColumn="FG_TYP" DataSetColumn="FG_TYP" />
<Mapping SourceColumn="DocID" DataSetColumn="DocID" />
<Mapping SourceColumn="Email" DataSetColumn="Email" />
<Mapping SourceColumn="Freigabe" DataSetColumn="Freigabe" />
<Mapping SourceColumn="Wann" DataSetColumn="Wann" />
</Mappings>
<Sources />
</TableAdapter>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="VWCUST_RPTPM_INV_RPT_STAMPTableAdapter" GeneratorDataComponentClassName="VWCUST_RPTPM_INV_RPT_STAMPTableAdapter" Name="VWCUST_RPTPM_INV_RPT_STAMP" UserDataComponentName="VWCUST_RPTPM_INV_RPT_STAMPTableAdapter">
<MainSource>
<DbSource ConnectionRef="MySSConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.FNCUST_PM_GET_RPT_STAMP_FOR_DocID" DbObjectType="Function" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="false" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT DocID, STATE, WHO, CREATED_WHEN
FROM dbo.FNCUST_PM_GET_RPT_STAMP_FOR_DocID(@DocID) AS FNCUST_PM_GET_RPT_STAMP_FOR_DocID_1</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="DocID" ColumnName="" DataSourceName="" DataTypeServer="bigint" DbType="Int64" Direction="Input" ParameterName="@DocID" Precision="0" Scale="0" Size="0" SourceColumn="" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
</DbSource>
</MainSource>
<Mappings>
<Mapping SourceColumn="STATE" DataSetColumn="STATE" />
<Mapping SourceColumn="WHO" DataSetColumn="WHO" />
<Mapping SourceColumn="DocID" DataSetColumn="DocID" />
<Mapping SourceColumn="CREATED_WHEN" DataSetColumn="CREATED_WHEN" />
</Mappings>
<Sources />
</TableAdapter>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="VWCUST_STAMPTableAdapter" GeneratorDataComponentClassName="VWCUST_STAMPTableAdapter" Name="VWCUST_STAMP" UserDataComponentName="VWCUST_STAMPTableAdapter">
<MainSource>
<DbSource ConnectionRef="MySSConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.VWCUST_STAMP" DbObjectType="View" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="false" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT FG_TYP, DocID, Email, Freigabe, Wann
FROM VWCUST_STAMP
WHERE (DocID = @DocID)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="DocID" ColumnName="DocID" DataSourceName="DD_ECM_TEST.dbo.VWCUST_STAMP" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@DocID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="DocID" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
</DbSource>
</MainSource>
<Mappings>
<Mapping SourceColumn="FG_TYP" DataSetColumn="FG_TYP" />
<Mapping SourceColumn="DocID" DataSetColumn="DocID" />
<Mapping SourceColumn="Email" DataSetColumn="Email" />
<Mapping SourceColumn="Freigabe" DataSetColumn="Freigabe" />
<Mapping SourceColumn="Wann" DataSetColumn="Wann" />
</Mappings>
<Sources />
</TableAdapter>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="FNCUST_PM_GET_RPT_STAMP_FOR_DocIDTableAdapter" GeneratorDataComponentClassName="FNCUST_PM_GET_RPT_STAMP_FOR_DocIDTableAdapter" Name="FNCUST_PM_GET_RPT_STAMP_FOR_DocID" UserDataComponentName="FNCUST_PM_GET_RPT_STAMP_FOR_DocIDTableAdapter">
<MainSource>
<DbSource ConnectionRef="MySSConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.FNCUST_PM_GET_RPT_STAMP_FOR_DocID" DbObjectType="Function" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="false" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT * FROM [dbo].FNCUST_PM_GET_RPT_STAMP_FOR_DocID (@DocID)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="DocID" ColumnName="" DataSourceName="" DataTypeServer="bigint" DbType="Int64" Direction="Input" ParameterName="@DocID" Precision="0" Scale="0" Size="0" SourceColumn="" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
</DbSource>
</MainSource>
<Mappings>
<Mapping SourceColumn="DocID" DataSetColumn="DocID" />
<Mapping SourceColumn="STATE" DataSetColumn="STATE" />
<Mapping SourceColumn="WHO" DataSetColumn="WHO" />
<Mapping SourceColumn="CREATED_WHEN" DataSetColumn="CREATED_WHEN" />
<Mapping SourceColumn="COMMENT" DataSetColumn="COMMENT" />
<Mapping SourceColumn="SequentialOrder" DataSetColumn="SequentialOrder" />
</Mappings>
<Sources />
</TableAdapter>
</Tables>
<Sources />
</DataSource>
</xs:appinfo>
</xs:annotation>
<xs:element name="MyDataset" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="true" msprop:Generator_DataSetName="MyDataset" msprop:Generator_UserDSName="MyDataset">
<xs:complexType>
<xs:choice minOccurs="0" maxOccurs="unbounded">
<xs:element name="VWCUST_RPTPM_UNION" msprop:Generator_TableClassName="VWCUST_RPTPM_UNIONDataTable" msprop:Generator_TableVarName="tableVWCUST_RPTPM_UNION" msprop:Generator_TablePropName="VWCUST_RPTPM_UNION" msprop:Generator_RowDeletingName="VWCUST_RPTPM_UNIONRowDeleting" msprop:Generator_RowChangingName="VWCUST_RPTPM_UNIONRowChanging" msprop:Generator_RowEvHandlerName="VWCUST_RPTPM_UNIONRowChangeEventHandler" msprop:Generator_RowDeletedName="VWCUST_RPTPM_UNIONRowDeleted" msprop:Generator_UserTableName="VWCUST_RPTPM_UNION" msprop:Generator_RowChangedName="VWCUST_RPTPM_UNIONRowChanged" msprop:Generator_RowEvArgName="VWCUST_RPTPM_UNIONRowChangeEvent" msprop:Generator_RowClassName="VWCUST_RPTPM_UNIONRow">
<xs:complexType>
<xs:sequence>
<xs:element name="GroupTypeID" msprop:Generator_ColumnVarNameInTable="columnGroupTypeID" msprop:Generator_ColumnPropNameInRow="GroupTypeID" msprop:Generator_ColumnPropNameInTable="GroupTypeIDColumn" msprop:Generator_UserColumnName="GroupTypeID" type="xs:int" />
<xs:element name="GroupType" msprop:Generator_ColumnVarNameInTable="columnGroupType" msprop:Generator_ColumnPropNameInRow="GroupType" msprop:Generator_ColumnPropNameInTable="GroupTypeColumn" msprop:Generator_UserColumnName="GroupType">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="250" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="DOC_ID" msprop:Generator_ColumnVarNameInTable="columnDOC_ID" msprop:Generator_ColumnPropNameInRow="DOC_ID" msprop:Generator_ColumnPropNameInTable="DOC_IDColumn" msprop:Generator_UserColumnName="DOC_ID" type="xs:long" minOccurs="0" />
<xs:element name="KreditorNummer" msprop:Generator_ColumnVarNameInTable="columnKreditorNummer" msprop:Generator_ColumnPropNameInRow="KreditorNummer" msprop:Generator_ColumnPropNameInTable="KreditorNummerColumn" msprop:Generator_UserColumnName="KreditorNummer" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="255" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="KreditorName_Lang" msprop:Generator_ColumnVarNameInTable="columnKreditorName_Lang" msprop:Generator_ColumnPropNameInRow="KreditorName_Lang" msprop:Generator_ColumnPropNameInTable="KreditorName_LangColumn" msprop:Generator_UserColumnName="KreditorName_Lang" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="255" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="KreditorName" msprop:Generator_ColumnVarNameInTable="columnKreditorName" msprop:Generator_ColumnPropNameInRow="KreditorName" msprop:Generator_ColumnPropNameInTable="KreditorNameColumn" msprop:Generator_UserColumnName="KreditorName" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="255" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="RechnungNr" msprop:Generator_ColumnVarNameInTable="columnRechnungNr" msprop:Generator_ColumnPropNameInRow="RechnungNr" msprop:Generator_ColumnPropNameInTable="RechnungNrColumn" msprop:Generator_UserColumnName="RechnungNr" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="128" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Referenz" msprop:Generator_ColumnVarNameInTable="columnReferenz" msprop:Generator_ColumnPropNameInRow="Referenz" msprop:Generator_ColumnPropNameInTable="ReferenzColumn" msprop:Generator_UserColumnName="Referenz" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="512" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Nettobetrag" msprop:Generator_ColumnVarNameInTable="columnNettobetrag" msprop:Generator_ColumnPropNameInRow="Nettobetrag" msprop:Generator_ColumnPropNameInTable="NettobetragColumn" msprop:Generator_UserColumnName="Nettobetrag" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="30" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Bruttobetrag" msprop:Generator_ColumnVarNameInTable="columnBruttobetrag" msprop:Generator_ColumnPropNameInRow="Bruttobetrag" msprop:Generator_ColumnPropNameInTable="BruttobetragColumn" msprop:Generator_UserColumnName="Bruttobetrag" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="30" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Zahlungsziel" msprop:Generator_ColumnVarNameInTable="columnZahlungsziel" msprop:Generator_ColumnPropNameInRow="Zahlungsziel" msprop:Generator_ColumnPropNameInTable="ZahlungszielColumn" msprop:Generator_UserColumnName="Zahlungsziel" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="30" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Mandant" msprop:Generator_ColumnVarNameInTable="columnMandant" msprop:Generator_ColumnPropNameInRow="Mandant" msprop:Generator_ColumnPropNameInTable="MandantColumn" msprop:Generator_UserColumnName="Mandant" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="128" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Mandant_x0020_Name" msprop:Generator_ColumnVarNameInTable="columnMandant_Name" msprop:Generator_ColumnPropNameInRow="Mandant_Name" msprop:Generator_ColumnPropNameInTable="Mandant_NameColumn" msprop:Generator_UserColumnName="Mandant Name" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="64" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Kostenstelle" msprop:Generator_ColumnVarNameInTable="columnKostenstelle" msprop:Generator_ColumnPropNameInRow="Kostenstelle" msprop:Generator_ColumnPropNameInTable="KostenstelleColumn" msprop:Generator_UserColumnName="Kostenstelle" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="128" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Erhalten_x0020_wann" msprop:Generator_ColumnVarNameInTable="columnErhalten_wann" msprop:Generator_ColumnPropNameInRow="Erhalten_wann" msprop:Generator_ColumnPropNameInTable="Erhalten_wannColumn" msprop:Generator_UserColumnName="Erhalten wann" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="30" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Belegdatum" msprop:Generator_ColumnVarNameInTable="columnBelegdatum" msprop:Generator_ColumnPropNameInRow="Belegdatum" msprop:Generator_ColumnPropNameInTable="BelegdatumColumn" msprop:Generator_UserColumnName="Belegdatum" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="30" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="FG_Email" msprop:Generator_ColumnVarNameInTable="columnFG_Email" msprop:Generator_ColumnPropNameInRow="FG_Email" msprop:Generator_ColumnPropNameInTable="FG_EmailColumn" msprop:Generator_UserColumnName="FG_Email" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="FG_Freigabe" msprop:Generator_ColumnVarNameInTable="columnFG_Freigabe" msprop:Generator_ColumnPropNameInRow="FG_Freigabe" msprop:Generator_ColumnPropNameInTable="FG_FreigabeColumn" msprop:Generator_UserColumnName="FG_Freigabe" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="FG_Wann" msprop:Generator_ColumnVarNameInTable="columnFG_Wann" msprop:Generator_ColumnPropNameInRow="FG_Wann" msprop:Generator_ColumnPropNameInTable="FG_WannColumn" msprop:Generator_UserColumnName="FG_Wann" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="WHO" msprop:Generator_ColumnVarNameInTable="columnWHO" msprop:Generator_ColumnPropNameInRow="WHO" msprop:Generator_ColumnPropNameInTable="WHOColumn" msprop:Generator_UserColumnName="WHO">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="100" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="WHEN" msprop:Generator_ColumnVarNameInTable="columnWHEN" msprop:Generator_ColumnPropNameInRow="_WHEN" msprop:Generator_ColumnPropNameInTable="WHENColumn" msprop:Generator_UserColumnName="WHEN">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="19" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="DELEGATION" msprop:Generator_ColumnVarNameInTable="columnDELEGATION" msprop:Generator_ColumnPropNameInRow="DELEGATION" msprop:Generator_ColumnPropNameInTable="DELEGATIONColumn" msprop:Generator_UserColumnName="DELEGATION">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="250" />
</xs:restriction>
</xs:simpleType>
</xs:element>
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="VWCUST_RPTPM_UNION1" msprop:Generator_TableClassName="VWCUST_RPTPM_UNION1DataTable" msprop:Generator_TableVarName="tableVWCUST_RPTPM_UNION1" msprop:Generator_RowChangedName="VWCUST_RPTPM_UNION1RowChanged" msprop:Generator_TablePropName="VWCUST_RPTPM_UNION1" msprop:Generator_RowDeletingName="VWCUST_RPTPM_UNION1RowDeleting" msprop:Generator_RowChangingName="VWCUST_RPTPM_UNION1RowChanging" msprop:Generator_RowEvHandlerName="VWCUST_RPTPM_UNION1RowChangeEventHandler" msprop:Generator_RowDeletedName="VWCUST_RPTPM_UNION1RowDeleted" msprop:Generator_RowClassName="VWCUST_RPTPM_UNION1Row" msprop:Generator_UserTableName="VWCUST_RPTPM_UNION1" msprop:Generator_RowEvArgName="VWCUST_RPTPM_UNION1RowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="FG_TYP" msprop:Generator_ColumnVarNameInTable="columnFG_TYP" msprop:Generator_ColumnPropNameInRow="FG_TYP" msprop:Generator_ColumnPropNameInTable="FG_TYPColumn" msprop:Generator_UserColumnName="FG_TYP" default="">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="DocID" msprop:Generator_ColumnVarNameInTable="columnDocID" msprop:Generator_ColumnPropNameInRow="DocID" msprop:Generator_ColumnPropNameInTable="DocIDColumn" msprop:Generator_UserColumnName="DocID" type="xs:int" minOccurs="0" />
<xs:element name="Email" msprop:Generator_ColumnVarNameInTable="columnEmail" msprop:Generator_ColumnPropNameInRow="Email" msprop:Generator_ColumnPropNameInTable="EmailColumn" msprop:Generator_UserColumnName="Email" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="26" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Freigabe" msprop:Generator_ColumnVarNameInTable="columnFreigabe" msprop:Generator_ColumnPropNameInRow="Freigabe" msprop:Generator_ColumnPropNameInTable="FreigabeColumn" msprop:Generator_UserColumnName="Freigabe" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Wann" msprop:Generator_ColumnVarNameInTable="columnWann" msprop:Generator_ColumnPropNameInRow="Wann" msprop:Generator_ColumnPropNameInTable="WannColumn" msprop:Generator_UserColumnName="Wann" type="xs:dateTime" minOccurs="0" />
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="VWCUST_RPTPM_INV_RPT_STAMP" msprop:Generator_TableClassName="VWCUST_RPTPM_INV_RPT_STAMPDataTable" msprop:Generator_TableVarName="tableVWCUST_RPTPM_INV_RPT_STAMP" msprop:Generator_TablePropName="VWCUST_RPTPM_INV_RPT_STAMP" msprop:Generator_RowDeletingName="VWCUST_RPTPM_INV_RPT_STAMPRowDeleting" msprop:Generator_RowChangingName="VWCUST_RPTPM_INV_RPT_STAMPRowChanging" msprop:Generator_RowEvHandlerName="VWCUST_RPTPM_INV_RPT_STAMPRowChangeEventHandler" msprop:Generator_RowDeletedName="VWCUST_RPTPM_INV_RPT_STAMPRowDeleted" msprop:Generator_UserTableName="VWCUST_RPTPM_INV_RPT_STAMP" msprop:Generator_RowChangedName="VWCUST_RPTPM_INV_RPT_STAMPRowChanged" msprop:Generator_RowEvArgName="VWCUST_RPTPM_INV_RPT_STAMPRowChangeEvent" msprop:Generator_RowClassName="VWCUST_RPTPM_INV_RPT_STAMPRow">
<xs:complexType>
<xs:sequence>
<xs:element name="STATE" msprop:Generator_ColumnVarNameInTable="columnSTATE" msprop:Generator_ColumnPropNameInRow="STATE" msprop:Generator_ColumnPropNameInTable="STATEColumn" msprop:Generator_UserColumnName="STATE" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="20" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="WHO" msprop:Generator_ColumnVarNameInTable="columnWHO" msprop:Generator_ColumnPropNameInRow="WHO" msprop:Generator_ColumnPropNameInTable="WHOColumn" msprop:Generator_UserColumnName="WHO" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="100" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="DocID" msprop:Generator_ColumnVarNameInTable="columnDocID" msprop:Generator_ColumnPropNameInRow="DocID" msprop:Generator_ColumnPropNameInTable="DocIDColumn" msprop:Generator_UserColumnName="DocID" type="xs:long" minOccurs="0" />
<xs:element name="CREATED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCREATED_WHEN" msprop:Generator_ColumnPropNameInRow="CREATED_WHEN" msprop:Generator_ColumnPropNameInTable="CREATED_WHENColumn" msprop:Generator_UserColumnName="CREATED_WHEN" type="xs:dateTime" minOccurs="0" />
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="VWCUST_STAMP" msprop:Generator_TableClassName="VWCUST_STAMPDataTable" msprop:Generator_TableVarName="tableVWCUST_STAMP" msprop:Generator_TablePropName="VWCUST_STAMP" msprop:Generator_RowDeletingName="VWCUST_STAMPRowDeleting" msprop:Generator_RowChangingName="VWCUST_STAMPRowChanging" msprop:Generator_RowEvHandlerName="VWCUST_STAMPRowChangeEventHandler" msprop:Generator_RowDeletedName="VWCUST_STAMPRowDeleted" msprop:Generator_UserTableName="VWCUST_STAMP" msprop:Generator_RowChangedName="VWCUST_STAMPRowChanged" msprop:Generator_RowEvArgName="VWCUST_STAMPRowChangeEvent" msprop:Generator_RowClassName="VWCUST_STAMPRow">
<xs:complexType>
<xs:sequence>
<xs:element name="FG_TYP" msprop:Generator_ColumnVarNameInTable="columnFG_TYP" msprop:Generator_ColumnPropNameInRow="FG_TYP" msprop:Generator_ColumnPropNameInTable="FG_TYPColumn" msprop:Generator_UserColumnName="FG_TYP">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="DocID" msprop:Generator_ColumnVarNameInTable="columnDocID" msprop:Generator_ColumnPropNameInRow="DocID" msprop:Generator_ColumnPropNameInTable="DocIDColumn" msprop:Generator_UserColumnName="DocID" type="xs:int" />
<xs:element name="Email" msprop:Generator_ColumnVarNameInTable="columnEmail" msprop:Generator_ColumnPropNameInRow="Email" msprop:Generator_ColumnPropNameInTable="EmailColumn" msprop:Generator_UserColumnName="Email">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="26" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Freigabe" msprop:Generator_ColumnVarNameInTable="columnFreigabe" msprop:Generator_ColumnPropNameInRow="Freigabe" msprop:Generator_ColumnPropNameInTable="FreigabeColumn" msprop:Generator_UserColumnName="Freigabe" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Wann" msprop:Generator_ColumnVarNameInTable="columnWann" msprop:Generator_ColumnPropNameInRow="Wann" msprop:Generator_ColumnPropNameInTable="WannColumn" msprop:Generator_UserColumnName="Wann" type="xs:dateTime" minOccurs="0" />
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="FNCUST_PM_GET_RPT_STAMP_FOR_DocID" msprop:Generator_TableClassName="FNCUST_PM_GET_RPT_STAMP_FOR_DocIDDataTable" msprop:Generator_TableVarName="tableFNCUST_PM_GET_RPT_STAMP_FOR_DocID" msprop:Generator_TablePropName="FNCUST_PM_GET_RPT_STAMP_FOR_DocID" msprop:Generator_RowDeletingName="FNCUST_PM_GET_RPT_STAMP_FOR_DocIDRowDeleting" msprop:Generator_RowChangingName="FNCUST_PM_GET_RPT_STAMP_FOR_DocIDRowChanging" msprop:Generator_RowEvHandlerName="FNCUST_PM_GET_RPT_STAMP_FOR_DocIDRowChangeEventHandler" msprop:Generator_RowDeletedName="FNCUST_PM_GET_RPT_STAMP_FOR_DocIDRowDeleted" msprop:Generator_UserTableName="FNCUST_PM_GET_RPT_STAMP_FOR_DocID" msprop:Generator_RowChangedName="FNCUST_PM_GET_RPT_STAMP_FOR_DocIDRowChanged" msprop:Generator_RowEvArgName="FNCUST_PM_GET_RPT_STAMP_FOR_DocIDRowChangeEvent" msprop:Generator_RowClassName="FNCUST_PM_GET_RPT_STAMP_FOR_DocIDRow">
<xs:complexType>
<xs:sequence>
<xs:element name="DocID" msprop:Generator_ColumnVarNameInTable="columnDocID" msprop:Generator_ColumnPropNameInRow="DocID" msprop:Generator_ColumnPropNameInTable="DocIDColumn" msprop:Generator_UserColumnName="DocID" type="xs:long" minOccurs="0" />
<xs:element name="STATE" msprop:Generator_ColumnVarNameInTable="columnSTATE" msprop:Generator_ColumnPropNameInRow="STATE" msprop:Generator_ColumnPropNameInTable="STATEColumn" msprop:Generator_UserColumnName="STATE" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="20" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="WHO" msprop:Generator_ColumnVarNameInTable="columnWHO" msprop:Generator_ColumnPropNameInRow="WHO" msprop:Generator_ColumnPropNameInTable="WHOColumn" msprop:Generator_UserColumnName="WHO" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="100" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="CREATED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCREATED_WHEN" msprop:Generator_ColumnPropNameInRow="CREATED_WHEN" msprop:Generator_ColumnPropNameInTable="CREATED_WHENColumn" msprop:Generator_UserColumnName="CREATED_WHEN" type="xs:dateTime" minOccurs="0" />
<xs:element name="COMMENT" msprop:Generator_ColumnVarNameInTable="columnCOMMENT" msprop:Generator_ColumnPropNameInRow="COMMENT" msprop:Generator_ColumnPropNameInTable="COMMENTColumn" msprop:Generator_UserColumnName="COMMENT" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="500" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="SequentialOrder" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnSequentialOrder" msprop:Generator_ColumnPropNameInRow="SequentialOrder" msprop:Generator_ColumnPropNameInTable="SequentialOrderColumn" msprop:Generator_UserColumnName="SequentialOrder" type="xs:int" />
</xs:sequence>
</xs:complexType>
</xs:element>
</xs:choice>
</xs:complexType>
</xs:element>
</xs:schema>

16
WISAG_PM_REPORT/MyDataset.xss Normal file
View File

@@ -0,0 +1,16 @@
<?xml version="1.0" encoding="utf-8"?>
<!--<autogenerated>
This code was generated by a tool to store the dataset designer's layout information.
Changes to this file may cause incorrect behavior and will be lost if
the code is regenerated.
</autogenerated>-->
<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="532" ViewPortY="20" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
<Shapes>
<Shape ID="DesignTable:VWCUST_RPTPM_UNION" ZOrder="5" X="641" Y="95" Height="305" Width="290" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:VWCUST_RPTPM_UNION1" ZOrder="4" X="1213" Y="252" Height="305" Width="297" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:VWCUST_RPTPM_INV_RPT_STAMP" ZOrder="3" X="1210" Y="53" Height="210" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
<Shape ID="DesignTable:VWCUST_STAMP" ZOrder="2" X="942" Y="91" Height="172" Width="243" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="121" />
<Shape ID="DesignTable:FNCUST_PM_GET_RPT_STAMP_FOR_DocID" ZOrder="1" X="869" Y="446" Height="191" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="140" />
</Shapes>
<Connectors />
</DiagramLayout>

462
WISAG_PM_REPORT/RpStampTable.Designer.vb generated Normal file
View File

@@ -0,0 +1,462 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Public Class RpStampTable
Inherits DevExpress.XtraReports.UI.XtraReport
'XtraReport overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()>
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
MyBase.Dispose(disposing)
End Sub
'Required by the Designer
Private components As System.ComponentModel.IContainer
'NOTE: The following procedure is required by the Designer
'It can be modified using the Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim SelectQuery1 As DevExpress.DataAccess.Sql.SelectQuery = New DevExpress.DataAccess.Sql.SelectQuery()
Dim Column1 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression1 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Table1 As DevExpress.DataAccess.Sql.Table = New DevExpress.DataAccess.Sql.Table()
Dim Column2 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression2 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column3 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression3 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column4 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression4 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column5 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression5 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(RpStampTable))
Me.SqlDataSource1 = New DevExpress.DataAccess.Sql.SqlDataSource(Me.components)
Me.TopMarginBand1 = New DevExpress.XtraReports.UI.TopMarginBand()
Me.BottomMarginBand1 = New DevExpress.XtraReports.UI.BottomMarginBand()
Me.ReportHeaderBand1 = New DevExpress.XtraReports.UI.ReportHeaderBand()
Me.GroupHeaderBand1 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.XrPanel2 = New DevExpress.XtraReports.UI.XRPanel()
Me.XrTable1 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow1 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell2 = New DevExpress.XtraReports.UI.XRTableCell()
Me.GroupHeaderBand2 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.XrPanel1 = New DevExpress.XtraReports.UI.XRPanel()
Me.XrTable2 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow2 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell3 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell5 = New DevExpress.XtraReports.UI.XRTableCell()
Me.DetailBand1 = New DevExpress.XtraReports.UI.DetailBand()
Me.XrPanel3 = New DevExpress.XtraReports.UI.XRPanel()
Me.XrTable3 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow3 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell6 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell7 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell8 = New DevExpress.XtraReports.UI.XRTableCell()
Me.Title = New DevExpress.XtraReports.UI.XRControlStyle()
Me.GroupCaption3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.GroupData3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailCaption3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailData3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailData3_Odd = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailCaptionBackground3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.PageInfo = New DevExpress.XtraReports.UI.XRControlStyle()
Me.ReportFooter = New DevExpress.XtraReports.UI.ReportFooterBand()
Me.XrPanel5 = New DevExpress.XtraReports.UI.XRPanel()
Me.VwcusT_STAMPTableAdapter1 = New WISAG_PM_REPORT.MyDatasetTableAdapters.VWCUST_STAMPTableAdapter()
CType(Me.XrTable1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XrTable2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XrTable3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'SqlDataSource1
'
Me.SqlDataSource1.ConnectionName = "DD_ECM_ReportConnection"
Me.SqlDataSource1.Name = "SqlDataSource1"
ColumnExpression1.ColumnName = "FG_TYP"
Table1.Name = "VWCUST_STAMP"
ColumnExpression1.Table = Table1
Column1.Expression = ColumnExpression1
ColumnExpression2.ColumnName = "DocID"
ColumnExpression2.Table = Table1
Column2.Expression = ColumnExpression2
ColumnExpression3.ColumnName = "Email"
ColumnExpression3.Table = Table1
Column3.Expression = ColumnExpression3
ColumnExpression4.ColumnName = "Freigabe"
ColumnExpression4.Table = Table1
Column4.Expression = ColumnExpression4
ColumnExpression5.ColumnName = "Wann"
ColumnExpression5.Table = Table1
Column5.Expression = ColumnExpression5
SelectQuery1.Columns.Add(Column1)
SelectQuery1.Columns.Add(Column2)
SelectQuery1.Columns.Add(Column3)
SelectQuery1.Columns.Add(Column4)
SelectQuery1.Columns.Add(Column5)
SelectQuery1.Name = "VWCUST_STAMP"
SelectQuery1.Tables.Add(Table1)
Me.SqlDataSource1.Queries.AddRange(New DevExpress.DataAccess.Sql.SqlQuery() {SelectQuery1})
Me.SqlDataSource1.ResultSchemaSerializable = resources.GetString("SqlDataSource1.ResultSchemaSerializable")
'
'TopMarginBand1
'
Me.TopMarginBand1.HeightF = 0!
Me.TopMarginBand1.Name = "TopMarginBand1"
'
'BottomMarginBand1
'
Me.BottomMarginBand1.HeightF = 19.0!
Me.BottomMarginBand1.Name = "BottomMarginBand1"
'
'ReportHeaderBand1
'
Me.ReportHeaderBand1.HeightF = 0!
Me.ReportHeaderBand1.Name = "ReportHeaderBand1"
Me.ReportHeaderBand1.Visible = False
'
'GroupHeaderBand1
'
Me.GroupHeaderBand1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPanel2})
Me.GroupHeaderBand1.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.GroupHeaderBand1.GroupFields.AddRange(New DevExpress.XtraReports.UI.GroupField() {New DevExpress.XtraReports.UI.GroupField("FG_TYP", DevExpress.XtraReports.UI.XRColumnSortOrder.Ascending)})
Me.GroupHeaderBand1.GroupUnion = DevExpress.XtraReports.UI.GroupUnion.WithFirstDetail
Me.GroupHeaderBand1.HeightF = 25.0!
Me.GroupHeaderBand1.Name = "GroupHeaderBand1"
Me.GroupHeaderBand1.StylePriority.UseFont = False
'
'XrPanel2
'
Me.XrPanel2.BackColor = System.Drawing.Color.White
Me.XrPanel2.BorderColor = System.Drawing.Color.Red
Me.XrPanel2.Borders = CType((DevExpress.XtraPrinting.BorderSide.Left Or DevExpress.XtraPrinting.BorderSide.Right), DevExpress.XtraPrinting.BorderSide)
Me.XrPanel2.BorderWidth = 3.0!
Me.XrPanel2.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable1})
Me.XrPanel2.LocationFloat = New DevExpress.Utils.PointFloat(373.2084!, 0!)
Me.XrPanel2.Name = "XrPanel2"
Me.XrPanel2.SizeF = New System.Drawing.SizeF(262.5!, 25.0!)
Me.XrPanel2.StylePriority.UseBackColor = False
Me.XrPanel2.StylePriority.UseBorderColor = False
Me.XrPanel2.StylePriority.UseBorders = False
Me.XrPanel2.StylePriority.UseBorderWidth = False
'
'XrTable1
'
Me.XrTable1.LocationFloat = New DevExpress.Utils.PointFloat(12.08344!, 0!)
Me.XrTable1.Name = "XrTable1"
Me.XrTable1.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow1})
Me.XrTable1.SizeF = New System.Drawing.SizeF(240.4164!, 25.0!)
'
'XrTableRow1
'
Me.XrTableRow1.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell2})
Me.XrTableRow1.Name = "XrTableRow1"
Me.XrTableRow1.Weight = 1.0R
'
'XrTableCell2
'
Me.XrTableCell2.BackColor = System.Drawing.Color.LightGray
Me.XrTableCell2.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[FG_TYP]")})
Me.XrTableCell2.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell2.Multiline = True
Me.XrTableCell2.Name = "XrTableCell2"
Me.XrTableCell2.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell2.StyleName = "GroupData3"
Me.XrTableCell2.StylePriority.UseBackColor = False
Me.XrTableCell2.StylePriority.UseFont = False
Me.XrTableCell2.Text = "XrTableCell2"
Me.XrTableCell2.Weight = 0.92685330904447116R
'
'GroupHeaderBand2
'
Me.GroupHeaderBand2.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPanel1})
Me.GroupHeaderBand2.GroupUnion = DevExpress.XtraReports.UI.GroupUnion.WithFirstDetail
Me.GroupHeaderBand2.HeightF = 38.00001!
Me.GroupHeaderBand2.Level = 1
Me.GroupHeaderBand2.Name = "GroupHeaderBand2"
'
'XrPanel1
'
Me.XrPanel1.BackColor = System.Drawing.Color.White
Me.XrPanel1.BorderColor = System.Drawing.Color.Red
Me.XrPanel1.Borders = CType(((DevExpress.XtraPrinting.BorderSide.Left Or DevExpress.XtraPrinting.BorderSide.Top) _
Or DevExpress.XtraPrinting.BorderSide.Right), DevExpress.XtraPrinting.BorderSide)
Me.XrPanel1.BorderWidth = 3.0!
Me.XrPanel1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable2})
Me.XrPanel1.LocationFloat = New DevExpress.Utils.PointFloat(373.2084!, 0!)
Me.XrPanel1.Name = "XrPanel1"
Me.XrPanel1.SizeF = New System.Drawing.SizeF(262.5!, 38.00001!)
Me.XrPanel1.StyleName = "DetailCaptionBackground3"
Me.XrPanel1.StylePriority.UseBackColor = False
Me.XrPanel1.StylePriority.UseBorderColor = False
Me.XrPanel1.StylePriority.UseBorders = False
Me.XrPanel1.StylePriority.UseBorderWidth = False
'
'XrTable2
'
Me.XrTable2.LocationFloat = New DevExpress.Utils.PointFloat(10.00009!, 10.00001!)
Me.XrTable2.Name = "XrTable2"
Me.XrTable2.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow2})
Me.XrTable2.SizeF = New System.Drawing.SizeF(242.4998!, 28.0!)
'
'XrTableRow2
'
Me.XrTableRow2.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell3, Me.XrTableCell5})
Me.XrTableRow2.Name = "XrTableRow2"
Me.XrTableRow2.Weight = 1.0R
'
'XrTableCell3
'
Me.XrTableCell3.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell3.Multiline = True
Me.XrTableCell3.Name = "XrTableCell3"
Me.XrTableCell3.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell3.StyleName = "DetailCaption3"
Me.XrTableCell3.StylePriority.UseFont = False
Me.XrTableCell3.Text = "Freigabe Wer"
Me.XrTableCell3.Weight = 0.3130061130404363R
'
'XrTableCell5
'
Me.XrTableCell5.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell5.Multiline = True
Me.XrTableCell5.Name = "XrTableCell5"
Me.XrTableCell5.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell5.StyleName = "DetailCaption3"
Me.XrTableCell5.StylePriority.UseFont = False
Me.XrTableCell5.Text = "Wann"
Me.XrTableCell5.Weight = 0.25187628329644896R
'
'DetailBand1
'
Me.DetailBand1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPanel3})
Me.DetailBand1.HeightF = 21.875!
Me.DetailBand1.Name = "DetailBand1"
'
'XrPanel3
'
Me.XrPanel3.BackColor = System.Drawing.Color.White
Me.XrPanel3.BorderColor = System.Drawing.Color.Red
Me.XrPanel3.Borders = CType((DevExpress.XtraPrinting.BorderSide.Left Or DevExpress.XtraPrinting.BorderSide.Right), DevExpress.XtraPrinting.BorderSide)
Me.XrPanel3.BorderWidth = 3.0!
Me.XrPanel3.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable3})
Me.XrPanel3.LocationFloat = New DevExpress.Utils.PointFloat(373.2084!, 0!)
Me.XrPanel3.Name = "XrPanel3"
Me.XrPanel3.SizeF = New System.Drawing.SizeF(262.5!, 21.875!)
Me.XrPanel3.StylePriority.UseBackColor = False
Me.XrPanel3.StylePriority.UseBorderColor = False
Me.XrPanel3.StylePriority.UseBorders = False
Me.XrPanel3.StylePriority.UseBorderWidth = False
'
'XrTable3
'
Me.XrTable3.BorderColor = System.Drawing.Color.Transparent
Me.XrTable3.LocationFloat = New DevExpress.Utils.PointFloat(12.08344!, 0!)
Me.XrTable3.Name = "XrTable3"
Me.XrTable3.OddStyleName = "DetailData3_Odd"
Me.XrTable3.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow3})
Me.XrTable3.SizeF = New System.Drawing.SizeF(240.4164!, 14.99999!)
Me.XrTable3.StylePriority.UseBorderColor = False
'
'XrTableRow3
'
Me.XrTableRow3.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell6, Me.XrTableCell7, Me.XrTableCell8})
Me.XrTableRow3.Name = "XrTableRow3"
Me.XrTableRow3.Weight = 11.5R
'
'XrTableCell6
'
Me.XrTableCell6.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Email]")})
Me.XrTableCell6.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell6.Multiline = True
Me.XrTableCell6.Name = "XrTableCell6"
Me.XrTableCell6.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell6.StyleName = "DetailData3"
Me.XrTableCell6.StylePriority.UseFont = False
Me.XrTableCell6.Text = "XrTableCell6"
Me.XrTableCell6.Weight = 0.19488106682586714R
'
'XrTableCell7
'
Me.XrTableCell7.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Freigabe]")})
Me.XrTableCell7.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell7.Multiline = True
Me.XrTableCell7.Name = "XrTableCell7"
Me.XrTableCell7.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell7.StyleName = "DetailData3"
Me.XrTableCell7.StylePriority.UseFont = False
Me.XrTableCell7.Text = "XrTableCell7"
Me.XrTableCell7.Weight = 0.060387894641143414R
'
'XrTableCell8
'
Me.XrTableCell8.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Wann]")})
Me.XrTableCell8.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell8.Multiline = True
Me.XrTableCell8.Name = "XrTableCell8"
Me.XrTableCell8.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell8.StyleName = "DetailData3"
Me.XrTableCell8.StylePriority.UseFont = False
Me.XrTableCell8.Text = "XrTableCell8"
Me.XrTableCell8.TextFormatString = "{0:dd.MM.yyyy HH:mm}"
Me.XrTableCell8.Weight = 0.20865012676184647R
'
'Title
'
Me.Title.BackColor = System.Drawing.Color.Transparent
Me.Title.BorderColor = System.Drawing.Color.Black
Me.Title.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.Title.BorderWidth = 1.0!
Me.Title.Font = New System.Drawing.Font("Tahoma", 14.0!)
Me.Title.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.Title.Name = "Title"
'
'GroupCaption3
'
Me.GroupCaption3.BackColor = System.Drawing.Color.FromArgb(CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer))
Me.GroupCaption3.BorderColor = System.Drawing.Color.White
Me.GroupCaption3.Borders = DevExpress.XtraPrinting.BorderSide.Bottom
Me.GroupCaption3.BorderWidth = 2.0!
Me.GroupCaption3.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.GroupCaption3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(228, Byte), Integer), CType(CType(228, Byte), Integer), CType(CType(228, Byte), Integer))
Me.GroupCaption3.Name = "GroupCaption3"
Me.GroupCaption3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 2, 0, 0, 100.0!)
Me.GroupCaption3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'GroupData3
'
Me.GroupData3.BackColor = System.Drawing.Color.FromArgb(CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer))
Me.GroupData3.BorderColor = System.Drawing.Color.White
Me.GroupData3.Borders = DevExpress.XtraPrinting.BorderSide.Bottom
Me.GroupData3.BorderWidth = 2.0!
Me.GroupData3.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.GroupData3.ForeColor = System.Drawing.Color.White
Me.GroupData3.Name = "GroupData3"
Me.GroupData3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 2, 0, 0, 100.0!)
Me.GroupData3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailCaption3
'
Me.DetailCaption3.BackColor = System.Drawing.Color.Transparent
Me.DetailCaption3.BorderColor = System.Drawing.Color.Transparent
Me.DetailCaption3.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.DetailCaption3.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.DetailCaption3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.DetailCaption3.Name = "DetailCaption3"
Me.DetailCaption3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailCaption3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailData3
'
Me.DetailData3.Font = New System.Drawing.Font("Tahoma", 8.0!)
Me.DetailData3.ForeColor = System.Drawing.Color.Black
Me.DetailData3.Name = "DetailData3"
Me.DetailData3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailData3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailData3_Odd
'
Me.DetailData3_Odd.BackColor = System.Drawing.Color.FromArgb(CType(CType(231, Byte), Integer), CType(CType(231, Byte), Integer), CType(CType(231, Byte), Integer))
Me.DetailData3_Odd.BorderColor = System.Drawing.Color.Transparent
Me.DetailData3_Odd.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.DetailData3_Odd.BorderWidth = 1.0!
Me.DetailData3_Odd.Font = New System.Drawing.Font("Tahoma", 8.0!)
Me.DetailData3_Odd.ForeColor = System.Drawing.Color.Black
Me.DetailData3_Odd.Name = "DetailData3_Odd"
Me.DetailData3_Odd.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailData3_Odd.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailCaptionBackground3
'
Me.DetailCaptionBackground3.BackColor = System.Drawing.Color.Transparent
Me.DetailCaptionBackground3.BorderColor = System.Drawing.Color.FromArgb(CType(CType(206, Byte), Integer), CType(CType(206, Byte), Integer), CType(CType(206, Byte), Integer))
Me.DetailCaptionBackground3.Borders = DevExpress.XtraPrinting.BorderSide.Top
Me.DetailCaptionBackground3.BorderWidth = 2.0!
Me.DetailCaptionBackground3.Name = "DetailCaptionBackground3"
'
'PageInfo
'
Me.PageInfo.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.PageInfo.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.PageInfo.Name = "PageInfo"
Me.PageInfo.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
'
'ReportFooter
'
Me.ReportFooter.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPanel5})
Me.ReportFooter.HeightF = 18.75!
Me.ReportFooter.Name = "ReportFooter"
'
'XrPanel5
'
Me.XrPanel5.BackColor = System.Drawing.Color.White
Me.XrPanel5.BorderColor = System.Drawing.Color.Red
Me.XrPanel5.Borders = DevExpress.XtraPrinting.BorderSide.Top
Me.XrPanel5.BorderWidth = 3.0!
Me.XrPanel5.LocationFloat = New DevExpress.Utils.PointFloat(373.2084!, 0!)
Me.XrPanel5.Name = "XrPanel5"
Me.XrPanel5.SizeF = New System.Drawing.SizeF(262.5!, 12.5!)
Me.XrPanel5.StylePriority.UseBackColor = False
Me.XrPanel5.StylePriority.UseBorderColor = False
Me.XrPanel5.StylePriority.UseBorders = False
Me.XrPanel5.StylePriority.UseBorderWidth = False
'
'VwcusT_STAMPTableAdapter1
'
Me.VwcusT_STAMPTableAdapter1.ClearBeforeFill = True
'
'RpStampTable
'
Me.Bands.AddRange(New DevExpress.XtraReports.UI.Band() {Me.TopMarginBand1, Me.BottomMarginBand1, Me.ReportHeaderBand1, Me.GroupHeaderBand1, Me.GroupHeaderBand2, Me.DetailBand1, Me.ReportFooter})
Me.ComponentStorage.AddRange(New System.ComponentModel.IComponent() {Me.SqlDataSource1})
Me.DataMember = "VWCUST_STAMP"
Me.DataSource = Me.SqlDataSource1
Me.Margins = New System.Drawing.Printing.Margins(107, 2, 0, 19)
Me.PageHeight = 1169
Me.PageWidth = 827
Me.PaperKind = System.Drawing.Printing.PaperKind.A4
Me.StyleSheet.AddRange(New DevExpress.XtraReports.UI.XRControlStyle() {Me.Title, Me.GroupCaption3, Me.GroupData3, Me.DetailCaption3, Me.DetailData3, Me.DetailData3_Odd, Me.DetailCaptionBackground3, Me.PageInfo})
Me.Version = "18.1"
CType(Me.XrTable1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.XrTable2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.XrTable3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
Friend WithEvents SqlDataSource1 As DevExpress.DataAccess.Sql.SqlDataSource
Friend WithEvents TopMarginBand1 As DevExpress.XtraReports.UI.TopMarginBand
Friend WithEvents BottomMarginBand1 As DevExpress.XtraReports.UI.BottomMarginBand
Friend WithEvents ReportHeaderBand1 As DevExpress.XtraReports.UI.ReportHeaderBand
Friend WithEvents GroupHeaderBand1 As DevExpress.XtraReports.UI.GroupHeaderBand
Friend WithEvents XrTable1 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow1 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell2 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents GroupHeaderBand2 As DevExpress.XtraReports.UI.GroupHeaderBand
Friend WithEvents XrPanel1 As DevExpress.XtraReports.UI.XRPanel
Friend WithEvents XrTable2 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow2 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell3 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell5 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents DetailBand1 As DevExpress.XtraReports.UI.DetailBand
Friend WithEvents XrTable3 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow3 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell6 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell7 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell8 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents Title As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents GroupCaption3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents GroupData3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailCaption3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailData3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailData3_Odd As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailCaptionBackground3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents PageInfo As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents VwcusT_STAMPTableAdapter1 As MyDatasetTableAdapters.VWCUST_STAMPTableAdapter
Friend WithEvents XrPanel2 As DevExpress.XtraReports.UI.XRPanel
Friend WithEvents XrPanel3 As DevExpress.XtraReports.UI.XRPanel
Friend WithEvents ReportFooter As DevExpress.XtraReports.UI.ReportFooterBand
Friend WithEvents XrPanel5 As DevExpress.XtraReports.UI.XRPanel
End Class

129
WISAG_PM_REPORT/RpStampTable.resx Normal file
View File

@@ -0,0 +1,129 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="SqlDataSource1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<data name="SqlDataSource1.ResultSchemaSerializable" xml:space="preserve">
<value>PERhdGFTZXQgTmFtZT0iU3FsRGF0YVNvdXJjZTEiPjxWaWV3IE5hbWU9IlZXQ1VTVF9TVEFNUCI+PEZpZWxkIE5hbWU9IkZHX1RZUCIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJEb2NJRCIgVHlwZT0iSW50MzIiIC8+PEZpZWxkIE5hbWU9IkVtYWlsIiBUeXBlPSJTdHJpbmciIC8+PEZpZWxkIE5hbWU9IkZyZWlnYWJlIiBUeXBlPSJTdHJpbmciIC8+PEZpZWxkIE5hbWU9Ildhbm4iIFR5cGU9IkRhdGVUaW1lIiAvPjwvVmlldz48L0RhdGFTZXQ+</value>
</data>
<metadata name="VwcusT_STAMPTableAdapter1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 56</value>
</metadata>
</root>

3
WISAG_PM_REPORT/RpStampTable.vb Normal file
View File

@@ -0,0 +1,3 @@
Public Class RpStampTable
End Class

985
WISAG_PM_REPORT/RptErgebnisbericht.Designer.vb generated Normal file
View File

@@ -0,0 +1,985 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Public Class RptErgebnisbericht
Inherits DevExpress.XtraReports.UI.XtraReport
'XtraReport overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()>
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
MyBase.Dispose(disposing)
End Sub
'Required by the Designer
Private components As System.ComponentModel.IContainer
'NOTE: The following procedure is required by the Designer
'It can be modified using the Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim SelectQuery1 As DevExpress.DataAccess.Sql.SelectQuery = New DevExpress.DataAccess.Sql.SelectQuery()
Dim Column1 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression1 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Table1 As DevExpress.DataAccess.Sql.Table = New DevExpress.DataAccess.Sql.Table()
Dim Column2 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression2 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column3 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression3 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column4 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression4 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column5 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression5 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column6 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression6 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column7 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression7 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column8 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression8 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column9 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression9 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column10 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression10 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column11 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression11 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column12 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression12 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column13 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression13 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column14 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression14 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column15 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression15 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column16 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression16 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column17 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression17 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column18 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression18 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column19 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression19 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column20 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression20 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column21 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression21 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column22 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression22 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(RptErgebnisbericht))
Me.Detail = New DevExpress.XtraReports.UI.DetailBand()
Me.XrTable4 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow4 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell36 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell37 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell38 = New DevExpress.XtraReports.UI.XRTableCell()
Me.TopMargin = New DevExpress.XtraReports.UI.TopMarginBand()
Me.BottomMargin = New DevExpress.XtraReports.UI.BottomMarginBand()
Me.XrPageInfo1 = New DevExpress.XtraReports.UI.XRPageInfo()
Me.XrPageInfo2 = New DevExpress.XtraReports.UI.XRPageInfo()
Me.SqlDataSource1 = New DevExpress.DataAccess.Sql.SqlDataSource(Me.components)
Me.ReportHeaderBand1 = New DevExpress.XtraReports.UI.ReportHeaderBand()
Me.XrLabel18 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLine1 = New DevExpress.XtraReports.UI.XRLine()
Me.XrLabel10 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel9 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel8 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel7 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel6 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel5 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel4 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel3 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel16 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel17 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel11 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel12 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel13 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel14 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel15 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel1 = New DevExpress.XtraReports.UI.XRLabel()
Me.GroupHeaderBand1 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.XrTable1 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow1 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell1 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell2 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell5 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell6 = New DevExpress.XtraReports.UI.XRTableCell()
Me.GroupHeaderBand2 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.XrTable2 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow2 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell3 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell4 = New DevExpress.XtraReports.UI.XRTableCell()
Me.GroupHeaderBand3 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.XrPanel1 = New DevExpress.XtraReports.UI.XRPanel()
Me.XrTable3 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow3 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell19 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell20 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell21 = New DevExpress.XtraReports.UI.XRTableCell()
Me.GroupFooterBand1 = New DevExpress.XtraReports.UI.GroupFooterBand()
Me.XrLabel2 = New DevExpress.XtraReports.UI.XRLabel()
Me.Title = New DevExpress.XtraReports.UI.XRControlStyle()
Me.GroupCaption3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.GroupData3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailCaption3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailData3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailData3_Odd = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailCaptionBackground3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.PageInfo = New DevExpress.XtraReports.UI.XRControlStyle()
Me.GroupHeader1 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.DetailReport = New DevExpress.XtraReports.UI.DetailReportBand()
Me.Detail1 = New DevExpress.XtraReports.UI.DetailBand()
Me.XrLabel21 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel20 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel19 = New DevExpress.XtraReports.UI.XRLabel()
CType(Me.XrTable4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XrTable1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XrTable2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XrTable3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'Detail
'
Me.Detail.BackColor = System.Drawing.Color.Yellow
Me.Detail.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable4})
Me.Detail.HeightF = 27.16669!
Me.Detail.Name = "Detail"
Me.Detail.Padding = New DevExpress.XtraPrinting.PaddingInfo(0, 0, 0, 0, 100.0!)
Me.Detail.StylePriority.UseBackColor = False
Me.Detail.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
'
'XrTable4
'
Me.XrTable4.BackColor = System.Drawing.Color.Transparent
Me.XrTable4.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 0!)
Me.XrTable4.Name = "XrTable4"
Me.XrTable4.OddStyleName = "DetailData3_Odd"
Me.XrTable4.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow4})
Me.XrTable4.SizeF = New System.Drawing.SizeF(611.0!, 25.0!)
Me.XrTable4.StylePriority.UseBackColor = False
'
'XrTableRow4
'
Me.XrTableRow4.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell36, Me.XrTableCell37, Me.XrTableCell38})
Me.XrTableRow4.Name = "XrTableRow4"
Me.XrTableRow4.Weight = 11.5R
'
'XrTableCell36
'
Me.XrTableCell36.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[FG_Email]")})
Me.XrTableCell36.Font = New System.Drawing.Font("Arial", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell36.Multiline = True
Me.XrTableCell36.Name = "XrTableCell36"
Me.XrTableCell36.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell36.StyleName = "DetailData3"
Me.XrTableCell36.StylePriority.UseFont = False
Me.XrTableCell36.Text = "XrTableCell36"
Me.XrTableCell36.Weight = 0.072235621703670289R
'
'XrTableCell37
'
Me.XrTableCell37.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[FG_Freigabe]")})
Me.XrTableCell37.Font = New System.Drawing.Font("Arial", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell37.Multiline = True
Me.XrTableCell37.Name = "XrTableCell37"
Me.XrTableCell37.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell37.StyleName = "DetailData3"
Me.XrTableCell37.StylePriority.UseFont = False
Me.XrTableCell37.Text = "XrTableCell37"
Me.XrTableCell37.Weight = 0.026664891578518712R
'
'XrTableCell38
'
Me.XrTableCell38.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[FG_Wann]")})
Me.XrTableCell38.Font = New System.Drawing.Font("Arial", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell38.Multiline = True
Me.XrTableCell38.Name = "XrTableCell38"
Me.XrTableCell38.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell38.StyleName = "DetailData3"
Me.XrTableCell38.StylePriority.UseFont = False
Me.XrTableCell38.Text = "XrTableCell38"
Me.XrTableCell38.TextFormatString = "{0:dd.MM.yyyy HH:mm}"
Me.XrTableCell38.Weight = 0.036902460293284575R
'
'TopMargin
'
Me.TopMargin.Name = "TopMargin"
Me.TopMargin.Padding = New DevExpress.XtraPrinting.PaddingInfo(0, 0, 0, 0, 100.0!)
Me.TopMargin.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
'
'BottomMargin
'
Me.BottomMargin.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPageInfo1, Me.XrPageInfo2})
Me.BottomMargin.Name = "BottomMargin"
Me.BottomMargin.Padding = New DevExpress.XtraPrinting.PaddingInfo(0, 0, 0, 0, 100.0!)
Me.BottomMargin.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
'
'XrPageInfo1
'
Me.XrPageInfo1.LocationFloat = New DevExpress.Utils.PointFloat(6.0!, 6.0!)
Me.XrPageInfo1.Name = "XrPageInfo1"
Me.XrPageInfo1.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrPageInfo1.PageInfo = DevExpress.XtraPrinting.PageInfo.DateTime
Me.XrPageInfo1.SizeF = New System.Drawing.SizeF(313.0!, 23.0!)
Me.XrPageInfo1.StyleName = "PageInfo"
Me.XrPageInfo1.TextFormatString = "{0:dd.MM.yyyy HH:mm' Uhr'}"
'
'XrPageInfo2
'
Me.XrPageInfo2.LocationFloat = New DevExpress.Utils.PointFloat(331.0!, 6.00001!)
Me.XrPageInfo2.Name = "XrPageInfo2"
Me.XrPageInfo2.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrPageInfo2.SizeF = New System.Drawing.SizeF(285.9999!, 23.0!)
Me.XrPageInfo2.StyleName = "PageInfo"
Me.XrPageInfo2.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopRight
Me.XrPageInfo2.TextFormatString = "Seite {0} von {1}"
'
'SqlDataSource1
'
Me.SqlDataSource1.ConnectionName = "MySSConnectionString"
Me.SqlDataSource1.Name = "SqlDataSource1"
ColumnExpression1.ColumnName = "GroupTypeID"
Table1.MetaSerializable = "<Meta X=""30"" Y=""30"" Width=""125"" Height=""476"" />"
Table1.Name = "VWCUST_RPTPM_UNION"
ColumnExpression1.Table = Table1
Column1.Expression = ColumnExpression1
ColumnExpression2.ColumnName = "GroupType"
ColumnExpression2.Table = Table1
Column2.Expression = ColumnExpression2
ColumnExpression3.ColumnName = "DOC_ID"
ColumnExpression3.Table = Table1
Column3.Expression = ColumnExpression3
ColumnExpression4.ColumnName = "KreditorNummer"
ColumnExpression4.Table = Table1
Column4.Expression = ColumnExpression4
ColumnExpression5.ColumnName = "KreditorName_Lang"
ColumnExpression5.Table = Table1
Column5.Expression = ColumnExpression5
ColumnExpression6.ColumnName = "KreditorName"
ColumnExpression6.Table = Table1
Column6.Expression = ColumnExpression6
ColumnExpression7.ColumnName = "RechnungNr"
ColumnExpression7.Table = Table1
Column7.Expression = ColumnExpression7
ColumnExpression8.ColumnName = "Referenz"
ColumnExpression8.Table = Table1
Column8.Expression = ColumnExpression8
ColumnExpression9.ColumnName = "Nettobetrag"
ColumnExpression9.Table = Table1
Column9.Expression = ColumnExpression9
ColumnExpression10.ColumnName = "Bruttobetrag"
ColumnExpression10.Table = Table1
Column10.Expression = ColumnExpression10
ColumnExpression11.ColumnName = "Zahlungsziel"
ColumnExpression11.Table = Table1
Column11.Expression = ColumnExpression11
ColumnExpression12.ColumnName = "Mandant"
ColumnExpression12.Table = Table1
Column12.Expression = ColumnExpression12
ColumnExpression13.ColumnName = "Mandant Name"
ColumnExpression13.Table = Table1
Column13.Expression = ColumnExpression13
ColumnExpression14.ColumnName = "Kostenstelle"
ColumnExpression14.Table = Table1
Column14.Expression = ColumnExpression14
ColumnExpression15.ColumnName = "Erhalten wann"
ColumnExpression15.Table = Table1
Column15.Expression = ColumnExpression15
ColumnExpression16.ColumnName = "Belegdatum"
ColumnExpression16.Table = Table1
Column16.Expression = ColumnExpression16
ColumnExpression17.ColumnName = "FG_Email"
ColumnExpression17.Table = Table1
Column17.Expression = ColumnExpression17
ColumnExpression18.ColumnName = "FG_Freigabe"
ColumnExpression18.Table = Table1
Column18.Expression = ColumnExpression18
ColumnExpression19.ColumnName = "FG_Wann"
ColumnExpression19.Table = Table1
Column19.Expression = ColumnExpression19
ColumnExpression20.ColumnName = "WHO"
ColumnExpression20.Table = Table1
Column20.Expression = ColumnExpression20
ColumnExpression21.ColumnName = "WHEN"
ColumnExpression21.Table = Table1
Column21.Expression = ColumnExpression21
ColumnExpression22.ColumnName = "DELEGATION"
ColumnExpression22.Table = Table1
Column22.Expression = ColumnExpression22
SelectQuery1.Columns.Add(Column1)
SelectQuery1.Columns.Add(Column2)
SelectQuery1.Columns.Add(Column3)
SelectQuery1.Columns.Add(Column4)
SelectQuery1.Columns.Add(Column5)
SelectQuery1.Columns.Add(Column6)
SelectQuery1.Columns.Add(Column7)
SelectQuery1.Columns.Add(Column8)
SelectQuery1.Columns.Add(Column9)
SelectQuery1.Columns.Add(Column10)
SelectQuery1.Columns.Add(Column11)
SelectQuery1.Columns.Add(Column12)
SelectQuery1.Columns.Add(Column13)
SelectQuery1.Columns.Add(Column14)
SelectQuery1.Columns.Add(Column15)
SelectQuery1.Columns.Add(Column16)
SelectQuery1.Columns.Add(Column17)
SelectQuery1.Columns.Add(Column18)
SelectQuery1.Columns.Add(Column19)
SelectQuery1.Columns.Add(Column20)
SelectQuery1.Columns.Add(Column21)
SelectQuery1.Columns.Add(Column22)
SelectQuery1.Name = "VWCUST_RPTPM_UNION"
SelectQuery1.Tables.Add(Table1)
Me.SqlDataSource1.Queries.AddRange(New DevExpress.DataAccess.Sql.SqlQuery() {SelectQuery1})
Me.SqlDataSource1.ResultSchemaSerializable = resources.GetString("SqlDataSource1.ResultSchemaSerializable")
'
'ReportHeaderBand1
'
Me.ReportHeaderBand1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrLabel18, Me.XrLine1, Me.XrLabel10, Me.XrLabel9, Me.XrLabel8, Me.XrLabel7, Me.XrLabel6, Me.XrLabel5, Me.XrLabel4, Me.XrLabel3, Me.XrLabel16, Me.XrLabel17, Me.XrLabel11, Me.XrLabel12, Me.XrLabel13, Me.XrLabel14, Me.XrLabel15, Me.XrLabel1})
Me.ReportHeaderBand1.HeightF = 312.0833!
Me.ReportHeaderBand1.Name = "ReportHeaderBand1"
'
'XrLabel18
'
Me.XrLabel18.Font = New System.Drawing.Font("Arial", 12.0!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel18.LocationFloat = New DevExpress.Utils.PointFloat(0!, 279.0833!)
Me.XrLabel18.Multiline = True
Me.XrLabel18.Name = "XrLabel18"
Me.XrLabel18.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel18.SizeF = New System.Drawing.SizeF(395.4604!, 23.0!)
Me.XrLabel18.StylePriority.UseFont = False
Me.XrLabel18.Text = "Zusammenfassung:"
'
'XrLine1
'
Me.XrLine1.LineWidth = 2.0!
Me.XrLine1.LocationFloat = New DevExpress.Utils.PointFloat(0!, 256.0833!)
Me.XrLine1.Name = "XrLine1"
Me.XrLine1.SizeF = New System.Drawing.SizeF(627.0!, 23.0!)
'
'XrLabel10
'
Me.XrLabel10.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Mandant Name]")})
Me.XrLabel10.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel10.LocationFloat = New DevExpress.Utils.PointFloat(416.1523!, 120.0001!)
Me.XrLabel10.Multiline = True
Me.XrLabel10.Name = "XrLabel10"
Me.XrLabel10.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel10.SizeF = New System.Drawing.SizeF(200.8477!, 22.99998!)
Me.XrLabel10.StylePriority.UseFont = False
Me.XrLabel10.Text = "XrLabel10"
'
'XrLabel9
'
Me.XrLabel9.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Mandant]")})
Me.XrLabel9.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel9.LocationFloat = New DevExpress.Utils.PointFloat(416.1523!, 83.95837!)
Me.XrLabel9.Multiline = True
Me.XrLabel9.Name = "XrLabel9"
Me.XrLabel9.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel9.SizeF = New System.Drawing.SizeF(140.8081!, 23.0!)
Me.XrLabel9.StylePriority.UseFont = False
Me.XrLabel9.Text = "XrLabel9"
'
'XrLabel8
'
Me.XrLabel8.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[RechnungNr]")})
Me.XrLabel8.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel8.LocationFloat = New DevExpress.Utils.PointFloat(416.1523!, 44.74999!)
Me.XrLabel8.Multiline = True
Me.XrLabel8.Name = "XrLabel8"
Me.XrLabel8.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel8.SizeF = New System.Drawing.SizeF(140.8083!, 23.0!)
Me.XrLabel8.StylePriority.UseFont = False
Me.XrLabel8.Text = "XrLabel8"
'
'XrLabel7
'
Me.XrLabel7.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[KreditorName_Lang]")})
Me.XrLabel7.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel7.LocationFloat = New DevExpress.Utils.PointFloat(124.9569!, 213.7501!)
Me.XrLabel7.Multiline = True
Me.XrLabel7.Name = "XrLabel7"
Me.XrLabel7.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel7.SizeF = New System.Drawing.SizeF(492.0431!, 23.0!)
Me.XrLabel7.StylePriority.UseFont = False
Me.XrLabel7.Text = "XrLabel7"
'
'XrLabel6
'
Me.XrLabel6.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[KreditorNummer]")})
Me.XrLabel6.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel6.LocationFloat = New DevExpress.Utils.PointFloat(124.9569!, 154.2084!)
Me.XrLabel6.Multiline = True
Me.XrLabel6.Name = "XrLabel6"
Me.XrLabel6.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel6.SizeF = New System.Drawing.SizeF(145.8333!, 23.0!)
Me.XrLabel6.StylePriority.UseFont = False
Me.XrLabel6.Text = "XrLabel6"
'
'XrLabel5
'
Me.XrLabel5.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Referenz]")})
Me.XrLabel5.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel5.LocationFloat = New DevExpress.Utils.PointFloat(124.9569!, 120.0001!)
Me.XrLabel5.Multiline = True
Me.XrLabel5.Name = "XrLabel5"
Me.XrLabel5.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel5.SizeF = New System.Drawing.SizeF(145.8333!, 23.0!)
Me.XrLabel5.StylePriority.UseFont = False
Me.XrLabel5.Text = "XrLabel5"
'
'XrLabel4
'
Me.XrLabel4.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Belegdatum]")})
Me.XrLabel4.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel4.LocationFloat = New DevExpress.Utils.PointFloat(124.9569!, 85.00004!)
Me.XrLabel4.Multiline = True
Me.XrLabel4.Name = "XrLabel4"
Me.XrLabel4.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel4.SizeF = New System.Drawing.SizeF(145.8333!, 23.0!)
Me.XrLabel4.StylePriority.UseFont = False
Me.XrLabel4.Text = "XrLabel4"
Me.XrLabel4.TextFormatString = "{0:dd.MM.yyyy}"
'
'XrLabel3
'
Me.XrLabel3.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Erhalten wann]")})
Me.XrLabel3.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel3.LocationFloat = New DevExpress.Utils.PointFloat(124.9569!, 44.74999!)
Me.XrLabel3.Multiline = True
Me.XrLabel3.Name = "XrLabel3"
Me.XrLabel3.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel3.SizeF = New System.Drawing.SizeF(145.8334!, 23.0!)
Me.XrLabel3.StylePriority.UseFont = False
Me.XrLabel3.Text = "XrLabel3"
Me.XrLabel3.TextFormatString = "{0:dd.MM.yyyy}"
'
'XrLabel16
'
Me.XrLabel16.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel16.LocationFloat = New DevExpress.Utils.PointFloat(295.4604!, 44.74999!)
Me.XrLabel16.Multiline = True
Me.XrLabel16.Name = "XrLabel16"
Me.XrLabel16.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel16.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel16.StylePriority.UseFont = False
Me.XrLabel16.Text = "Belegnummer:"
'
'XrLabel17
'
Me.XrLabel17.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel17.LocationFloat = New DevExpress.Utils.PointFloat(295.4604!, 83.95837!)
Me.XrLabel17.Multiline = True
Me.XrLabel17.Name = "XrLabel17"
Me.XrLabel17.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel17.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel17.StylePriority.UseFont = False
Me.XrLabel17.Text = "Mandant:"
'
'XrLabel11
'
Me.XrLabel11.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel11.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 44.74999!)
Me.XrLabel11.Multiline = True
Me.XrLabel11.Name = "XrLabel11"
Me.XrLabel11.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel11.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel11.StylePriority.UseFont = False
Me.XrLabel11.Text = "Eingang:"
'
'XrLabel12
'
Me.XrLabel12.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel12.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 85.00004!)
Me.XrLabel12.Multiline = True
Me.XrLabel12.Name = "XrLabel12"
Me.XrLabel12.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel12.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel12.StylePriority.UseFont = False
Me.XrLabel12.Text = "Belegdatum:"
'
'XrLabel13
'
Me.XrLabel13.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel13.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 120.0001!)
Me.XrLabel13.Multiline = True
Me.XrLabel13.Name = "XrLabel13"
Me.XrLabel13.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel13.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel13.StylePriority.UseFont = False
Me.XrLabel13.Text = "Referenz:"
'
'XrLabel14
'
Me.XrLabel14.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel14.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 154.2084!)
Me.XrLabel14.Multiline = True
Me.XrLabel14.Name = "XrLabel14"
Me.XrLabel14.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel14.SizeF = New System.Drawing.SizeF(118.9569!, 23.0!)
Me.XrLabel14.StylePriority.UseFont = False
Me.XrLabel14.Text = "Kreditornummer:"
'
'XrLabel15
'
Me.XrLabel15.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel15.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 213.7501!)
Me.XrLabel15.Multiline = True
Me.XrLabel15.Name = "XrLabel15"
Me.XrLabel15.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel15.SizeF = New System.Drawing.SizeF(118.9569!, 23.0!)
Me.XrLabel15.StylePriority.UseFont = False
Me.XrLabel15.Text = "Kreditorname:"
'
'XrLabel1
'
Me.XrLabel1.Font = New System.Drawing.Font("Arial", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel1.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 6.00001!)
Me.XrLabel1.Multiline = True
Me.XrLabel1.Name = "XrLabel1"
Me.XrLabel1.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel1.SizeF = New System.Drawing.SizeF(611.0!, 25.55338!)
Me.XrLabel1.StyleName = "Title"
Me.XrLabel1.StylePriority.UseFont = False
Me.XrLabel1.Text = "Ergebnisbericht des WISAG e-invoice Portal"
'
'GroupHeaderBand1
'
Me.GroupHeaderBand1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable1})
Me.GroupHeaderBand1.GroupFields.AddRange(New DevExpress.XtraReports.UI.GroupField() {New DevExpress.XtraReports.UI.GroupField("GroupTypeID", DevExpress.XtraReports.UI.XRColumnSortOrder.Ascending)})
Me.GroupHeaderBand1.GroupUnion = DevExpress.XtraReports.UI.GroupUnion.WithFirstDetail
Me.GroupHeaderBand1.HeightF = 30.0!
Me.GroupHeaderBand1.Name = "GroupHeaderBand1"
'
'XrTable1
'
Me.XrTable1.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0!)
Me.XrTable1.Name = "XrTable1"
Me.XrTable1.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow1})
Me.XrTable1.SizeF = New System.Drawing.SizeF(627.0!, 30.0!)
'
'XrTableRow1
'
Me.XrTableRow1.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell1, Me.XrTableCell2, Me.XrTableCell5, Me.XrTableCell6})
Me.XrTableRow1.Name = "XrTableRow1"
Me.XrTableRow1.Weight = 1.0R
'
'XrTableCell1
'
Me.XrTableCell1.Multiline = True
Me.XrTableCell1.Name = "XrTableCell1"
Me.XrTableCell1.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell1.StyleName = "GroupCaption3"
Me.XrTableCell1.StylePriority.UseTextAlignment = False
Me.XrTableCell1.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
Me.XrTableCell1.Weight = 0.016107705923227147R
'
'XrTableCell2
'
Me.XrTableCell2.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[GroupType]")})
Me.XrTableCell2.Multiline = True
Me.XrTableCell2.Name = "XrTableCell2"
Me.XrTableCell2.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell2.StyleName = "GroupData3"
Me.XrTableCell2.StylePriority.UseTextAlignment = False
Me.XrTableCell2.Text = "XrTableCell2"
Me.XrTableCell2.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
Me.XrTableCell2.Weight = 2.8491731450234843R
'
'XrTableCell5
'
Me.XrTableCell5.BackColor = System.Drawing.Color.FromArgb(CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer))
Me.XrTableCell5.BorderColor = System.Drawing.Color.White
Me.XrTableCell5.Borders = DevExpress.XtraPrinting.BorderSide.Bottom
Me.XrTableCell5.BorderWidth = 2.0!
Me.XrTableCell5.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell5.ForeColor = System.Drawing.Color.White
Me.XrTableCell5.Multiline = True
Me.XrTableCell5.Name = "XrTableCell5"
Me.XrTableCell5.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell5.StylePriority.UseBackColor = False
Me.XrTableCell5.StylePriority.UseBorderColor = False
Me.XrTableCell5.StylePriority.UseBorders = False
Me.XrTableCell5.StylePriority.UseBorderWidth = False
Me.XrTableCell5.StylePriority.UseFont = False
Me.XrTableCell5.StylePriority.UseForeColor = False
Me.XrTableCell5.StylePriority.UsePadding = False
Me.XrTableCell5.StylePriority.UseTextAlignment = False
Me.XrTableCell5.Text = "Freigabe"
Me.XrTableCell5.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
Me.XrTableCell5.Weight = 1.0389501415011511R
'
'XrTableCell6
'
Me.XrTableCell6.BackColor = System.Drawing.Color.FromArgb(CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer))
Me.XrTableCell6.BorderColor = System.Drawing.Color.White
Me.XrTableCell6.Borders = DevExpress.XtraPrinting.BorderSide.Bottom
Me.XrTableCell6.BorderWidth = 2.0!
Me.XrTableCell6.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell6.ForeColor = System.Drawing.Color.White
Me.XrTableCell6.Multiline = True
Me.XrTableCell6.Name = "XrTableCell6"
Me.XrTableCell6.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell6.StylePriority.UseBackColor = False
Me.XrTableCell6.StylePriority.UseBorderColor = False
Me.XrTableCell6.StylePriority.UseBorders = False
Me.XrTableCell6.StylePriority.UseBorderWidth = False
Me.XrTableCell6.StylePriority.UseFont = False
Me.XrTableCell6.StylePriority.UseForeColor = False
Me.XrTableCell6.StylePriority.UsePadding = False
Me.XrTableCell6.StylePriority.UseTextAlignment = False
Me.XrTableCell6.Text = "Wann"
Me.XrTableCell6.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
Me.XrTableCell6.Weight = 1.5256522791576401R
'
'GroupHeaderBand2
'
Me.GroupHeaderBand2.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable2})
Me.GroupHeaderBand2.GroupFields.AddRange(New DevExpress.XtraReports.UI.GroupField() {New DevExpress.XtraReports.UI.GroupField("DOC_ID", DevExpress.XtraReports.UI.XRColumnSortOrder.Ascending)})
Me.GroupHeaderBand2.GroupUnion = DevExpress.XtraReports.UI.GroupUnion.WithFirstDetail
Me.GroupHeaderBand2.HeightF = 25.0!
Me.GroupHeaderBand2.Level = 1
Me.GroupHeaderBand2.Name = "GroupHeaderBand2"
Me.GroupHeaderBand2.Visible = False
'
'XrTable2
'
Me.XrTable2.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0!)
Me.XrTable2.Name = "XrTable2"
Me.XrTable2.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow2})
Me.XrTable2.SizeF = New System.Drawing.SizeF(616.9999!, 25.0!)
'
'XrTableRow2
'
Me.XrTableRow2.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell3, Me.XrTableCell4})
Me.XrTableRow2.Name = "XrTableRow2"
Me.XrTableRow2.Weight = 1.0R
'
'XrTableCell3
'
Me.XrTableCell3.Multiline = True
Me.XrTableCell3.Name = "XrTableCell3"
Me.XrTableCell3.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell3.StyleName = "GroupCaption3"
Me.XrTableCell3.Text = "DOC ID"
Me.XrTableCell3.Weight = 0.076042996920072117R
'
'XrTableCell4
'
Me.XrTableCell4.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[DOC_ID]")})
Me.XrTableCell4.Multiline = True
Me.XrTableCell4.Name = "XrTableCell4"
Me.XrTableCell4.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell4.StyleName = "GroupData3"
Me.XrTableCell4.Text = "XrTableCell4"
Me.XrTableCell4.Weight = 0.87318763384396236R
'
'GroupHeaderBand3
'
Me.GroupHeaderBand3.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPanel1})
Me.GroupHeaderBand3.GroupUnion = DevExpress.XtraReports.UI.GroupUnion.WithFirstDetail
Me.GroupHeaderBand3.HeightF = 38.00001!
Me.GroupHeaderBand3.Level = 2
Me.GroupHeaderBand3.Name = "GroupHeaderBand3"
'
'XrPanel1
'
Me.XrPanel1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable3})
Me.XrPanel1.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0!)
Me.XrPanel1.Name = "XrPanel1"
Me.XrPanel1.SizeF = New System.Drawing.SizeF(617.0!, 38.00001!)
Me.XrPanel1.StyleName = "DetailCaptionBackground3"
'
'XrTable3
'
Me.XrTable3.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 3.750006!)
Me.XrTable3.Name = "XrTable3"
Me.XrTable3.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow3})
Me.XrTable3.SizeF = New System.Drawing.SizeF(601.0!, 29.0417!)
'
'XrTableRow3
'
Me.XrTableRow3.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell19, Me.XrTableCell20, Me.XrTableCell21})
Me.XrTableRow3.Name = "XrTableRow3"
Me.XrTableRow3.Weight = 1.0R
'
'XrTableCell19
'
Me.XrTableCell19.Font = New System.Drawing.Font("Arial", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell19.Multiline = True
Me.XrTableCell19.Name = "XrTableCell19"
Me.XrTableCell19.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell19.StyleName = "DetailCaption3"
Me.XrTableCell19.StylePriority.UseFont = False
Me.XrTableCell19.Text = "Email-Adresse"
Me.XrTableCell19.Weight = 0.072235612817611247R
'
'XrTableCell20
'
Me.XrTableCell20.Font = New System.Drawing.Font("Arial", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell20.Multiline = True
Me.XrTableCell20.Name = "XrTableCell20"
Me.XrTableCell20.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell20.StyleName = "DetailCaption3"
Me.XrTableCell20.StylePriority.UseFont = False
Me.XrTableCell20.Text = "Ja/Nein"
Me.XrTableCell20.Weight = 0.026664912202107805R
'
'XrTableCell21
'
Me.XrTableCell21.Font = New System.Drawing.Font("Arial", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell21.Multiline = True
Me.XrTableCell21.Name = "XrTableCell21"
Me.XrTableCell21.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell21.StyleName = "DetailCaption3"
Me.XrTableCell21.StylePriority.UseFont = False
Me.XrTableCell21.Text = "Datum Uhrzeit"
Me.XrTableCell21.Weight = 0.041894447347321118R
'
'GroupFooterBand1
'
Me.GroupFooterBand1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrLabel2})
Me.GroupFooterBand1.GroupUnion = DevExpress.XtraReports.UI.GroupFooterUnion.WithLastDetail
Me.GroupFooterBand1.HeightF = 6.00001!
Me.GroupFooterBand1.Name = "GroupFooterBand1"
Me.GroupFooterBand1.Visible = False
'
'XrLabel2
'
Me.XrLabel2.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.XrLabel2.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0!)
Me.XrLabel2.Multiline = True
Me.XrLabel2.Name = "XrLabel2"
Me.XrLabel2.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel2.SizeF = New System.Drawing.SizeF(610.0!, 2.08!)
Me.XrLabel2.StyleName = "GroupCaption3"
Me.XrLabel2.StylePriority.UseBorders = False
'
'Title
'
Me.Title.BackColor = System.Drawing.Color.Transparent
Me.Title.BorderColor = System.Drawing.Color.Black
Me.Title.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.Title.BorderWidth = 1.0!
Me.Title.Font = New System.Drawing.Font("Tahoma", 14.0!)
Me.Title.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.Title.Name = "Title"
'
'GroupCaption3
'
Me.GroupCaption3.BackColor = System.Drawing.Color.FromArgb(CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer))
Me.GroupCaption3.BorderColor = System.Drawing.Color.White
Me.GroupCaption3.Borders = DevExpress.XtraPrinting.BorderSide.Bottom
Me.GroupCaption3.BorderWidth = 2.0!
Me.GroupCaption3.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.GroupCaption3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(228, Byte), Integer), CType(CType(228, Byte), Integer), CType(CType(228, Byte), Integer))
Me.GroupCaption3.Name = "GroupCaption3"
Me.GroupCaption3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 2, 0, 0, 100.0!)
Me.GroupCaption3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'GroupData3
'
Me.GroupData3.BackColor = System.Drawing.Color.FromArgb(CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer))
Me.GroupData3.BorderColor = System.Drawing.Color.White
Me.GroupData3.Borders = DevExpress.XtraPrinting.BorderSide.Bottom
Me.GroupData3.BorderWidth = 2.0!
Me.GroupData3.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.GroupData3.ForeColor = System.Drawing.Color.White
Me.GroupData3.Name = "GroupData3"
Me.GroupData3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 2, 0, 0, 100.0!)
Me.GroupData3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailCaption3
'
Me.DetailCaption3.BackColor = System.Drawing.Color.Transparent
Me.DetailCaption3.BorderColor = System.Drawing.Color.Transparent
Me.DetailCaption3.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.DetailCaption3.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.DetailCaption3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.DetailCaption3.Name = "DetailCaption3"
Me.DetailCaption3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailCaption3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailData3
'
Me.DetailData3.Font = New System.Drawing.Font("Tahoma", 8.0!)
Me.DetailData3.ForeColor = System.Drawing.Color.Black
Me.DetailData3.Name = "DetailData3"
Me.DetailData3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailData3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailData3_Odd
'
Me.DetailData3_Odd.BackColor = System.Drawing.Color.FromArgb(CType(CType(231, Byte), Integer), CType(CType(231, Byte), Integer), CType(CType(231, Byte), Integer))
Me.DetailData3_Odd.BorderColor = System.Drawing.Color.Transparent
Me.DetailData3_Odd.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.DetailData3_Odd.BorderWidth = 1.0!
Me.DetailData3_Odd.Font = New System.Drawing.Font("Tahoma", 8.0!)
Me.DetailData3_Odd.ForeColor = System.Drawing.Color.Black
Me.DetailData3_Odd.Name = "DetailData3_Odd"
Me.DetailData3_Odd.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailData3_Odd.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailCaptionBackground3
'
Me.DetailCaptionBackground3.BackColor = System.Drawing.Color.Transparent
Me.DetailCaptionBackground3.BorderColor = System.Drawing.Color.FromArgb(CType(CType(206, Byte), Integer), CType(CType(206, Byte), Integer), CType(CType(206, Byte), Integer))
Me.DetailCaptionBackground3.Borders = DevExpress.XtraPrinting.BorderSide.Top
Me.DetailCaptionBackground3.BorderWidth = 2.0!
Me.DetailCaptionBackground3.Name = "DetailCaptionBackground3"
'
'PageInfo
'
Me.PageInfo.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.PageInfo.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.PageInfo.Name = "PageInfo"
Me.PageInfo.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
'
'GroupHeader1
'
Me.GroupHeader1.HeightF = 0!
Me.GroupHeader1.Level = 3
Me.GroupHeader1.Name = "GroupHeader1"
Me.GroupHeader1.Visible = False
'
'DetailReport
'
Me.DetailReport.Bands.AddRange(New DevExpress.XtraReports.UI.Band() {Me.Detail1})
Me.DetailReport.Level = 0
Me.DetailReport.Name = "DetailReport"
'
'Detail1
'
Me.Detail1.BackColor = System.Drawing.Color.DarkOrange
Me.Detail1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrLabel21, Me.XrLabel20, Me.XrLabel19})
Me.Detail1.HeightF = 21.875!
Me.Detail1.Name = "Detail1"
Me.Detail1.StylePriority.UseBackColor = False
'
'XrLabel21
'
Me.XrLabel21.BackColor = System.Drawing.Color.Transparent
Me.XrLabel21.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[VWCUST_RPTPM_UNION].[DELEGATION]")})
Me.XrLabel21.Font = New System.Drawing.Font("Arial", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel21.LocationFloat = New DevExpress.Utils.PointFloat(195.0245!, 0!)
Me.XrLabel21.Multiline = True
Me.XrLabel21.Name = "XrLabel21"
Me.XrLabel21.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel21.SizeF = New System.Drawing.SizeF(244.487!, 18.12505!)
Me.XrLabel21.StylePriority.UseBackColor = False
Me.XrLabel21.StylePriority.UseFont = False
Me.XrLabel21.Text = "XrLabel21"
'
'XrLabel20
'
Me.XrLabel20.BackColor = System.Drawing.Color.Transparent
Me.XrLabel20.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[VWCUST_RPTPM_UNION].[WHEN]")})
Me.XrLabel20.Font = New System.Drawing.Font("Arial", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel20.LocationFloat = New DevExpress.Utils.PointFloat(450.9698!, 0!)
Me.XrLabel20.Multiline = True
Me.XrLabel20.Name = "XrLabel20"
Me.XrLabel20.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel20.SizeF = New System.Drawing.SizeF(166.0301!, 18.12502!)
Me.XrLabel20.StylePriority.UseBackColor = False
Me.XrLabel20.StylePriority.UseFont = False
Me.XrLabel20.Text = "XrLabel20"
'
'XrLabel19
'
Me.XrLabel19.BackColor = System.Drawing.Color.Transparent
Me.XrLabel19.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[VWCUST_RPTPM_UNION].[WHO]")})
Me.XrLabel19.Font = New System.Drawing.Font("Arial", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel19.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 0!)
Me.XrLabel19.Multiline = True
Me.XrLabel19.Name = "XrLabel19"
Me.XrLabel19.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel19.SizeF = New System.Drawing.SizeF(176.2486!, 18.12502!)
Me.XrLabel19.StylePriority.UseBackColor = False
Me.XrLabel19.StylePriority.UseFont = False
Me.XrLabel19.Text = "XrLabel19"
'
'RptErgebnisbericht
'
Me.Bands.AddRange(New DevExpress.XtraReports.UI.Band() {Me.Detail, Me.TopMargin, Me.BottomMargin, Me.ReportHeaderBand1, Me.GroupHeaderBand1, Me.GroupHeaderBand2, Me.GroupHeaderBand3, Me.GroupFooterBand1, Me.GroupHeader1, Me.DetailReport})
Me.ComponentStorage.AddRange(New System.ComponentModel.IComponent() {Me.SqlDataSource1})
Me.DataMember = "VWCUST_RPTPM_UNION"
Me.DataSource = Me.SqlDataSource1
Me.PageHeight = 1169
Me.PageWidth = 827
Me.PaperKind = System.Drawing.Printing.PaperKind.A4
Me.StyleSheet.AddRange(New DevExpress.XtraReports.UI.XRControlStyle() {Me.Title, Me.GroupCaption3, Me.GroupData3, Me.DetailCaption3, Me.DetailData3, Me.DetailData3_Odd, Me.DetailCaptionBackground3, Me.PageInfo})
Me.Version = "18.1"
CType(Me.XrTable4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.XrTable1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.XrTable2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.XrTable3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
Friend WithEvents Detail As DevExpress.XtraReports.UI.DetailBand
Friend WithEvents TopMargin As DevExpress.XtraReports.UI.TopMarginBand
Friend WithEvents BottomMargin As DevExpress.XtraReports.UI.BottomMarginBand
Friend WithEvents XrTable4 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow4 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell36 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell37 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell38 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrPageInfo1 As DevExpress.XtraReports.UI.XRPageInfo
Friend WithEvents XrPageInfo2 As DevExpress.XtraReports.UI.XRPageInfo
Friend WithEvents SqlDataSource1 As DevExpress.DataAccess.Sql.SqlDataSource
Friend WithEvents ReportHeaderBand1 As DevExpress.XtraReports.UI.ReportHeaderBand
Friend WithEvents XrLabel1 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents GroupHeaderBand1 As DevExpress.XtraReports.UI.GroupHeaderBand
Friend WithEvents XrTable1 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow1 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell1 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell2 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents GroupHeaderBand2 As DevExpress.XtraReports.UI.GroupHeaderBand
Friend WithEvents XrTable2 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow2 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell3 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell4 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents GroupHeaderBand3 As DevExpress.XtraReports.UI.GroupHeaderBand
Friend WithEvents XrPanel1 As DevExpress.XtraReports.UI.XRPanel
Friend WithEvents XrTable3 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow3 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell19 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell20 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell21 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents GroupFooterBand1 As DevExpress.XtraReports.UI.GroupFooterBand
Friend WithEvents XrLabel2 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents Title As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents GroupCaption3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents GroupData3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailCaption3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailData3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailData3_Odd As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailCaptionBackground3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents PageInfo As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents XrLabel11 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel12 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel13 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel14 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel15 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel10 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel9 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel8 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel7 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel6 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel5 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel4 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel3 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel16 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel17 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents GroupHeader1 As DevExpress.XtraReports.UI.GroupHeaderBand
Friend WithEvents DetailReport As DevExpress.XtraReports.UI.DetailReportBand
Friend WithEvents Detail1 As DevExpress.XtraReports.UI.DetailBand
Friend WithEvents XrLabel21 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel20 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel19 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel18 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLine1 As DevExpress.XtraReports.UI.XRLine
Friend WithEvents XrTableCell5 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell6 As DevExpress.XtraReports.UI.XRTableCell
End Class

126
WISAG_PM_REPORT/RptErgebnisbericht.resx Normal file
View File

@@ -0,0 +1,126 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="SqlDataSource1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<data name="SqlDataSource1.ResultSchemaSerializable" xml:space="preserve">
<value>PERhdGFTZXQgTmFtZT0iU3FsRGF0YVNvdXJjZTEiPjxWaWV3IE5hbWU9IlZXQ1VTVF9SUFRQTV9VTklPTiI+PEZpZWxkIE5hbWU9Ikdyb3VwVHlwZUlEIiBUeXBlPSJJbnQzMiIgLz48RmllbGQgTmFtZT0iR3JvdXBUeXBlIiBUeXBlPSJTdHJpbmciIC8+PEZpZWxkIE5hbWU9IkRPQ19JRCIgVHlwZT0iSW50NjQiIC8+PEZpZWxkIE5hbWU9IktyZWRpdG9yTnVtbWVyIiBUeXBlPSJTdHJpbmciIC8+PEZpZWxkIE5hbWU9IktyZWRpdG9yTmFtZV9MYW5nIiBUeXBlPSJTdHJpbmciIC8+PEZpZWxkIE5hbWU9IktyZWRpdG9yTmFtZSIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJSZWNobnVuZ05yIiBUeXBlPSJTdHJpbmciIC8+PEZpZWxkIE5hbWU9IlJlZmVyZW56IiBUeXBlPSJTdHJpbmciIC8+PEZpZWxkIE5hbWU9Ik5ldHRvYmV0cmFnIiBUeXBlPSJTdHJpbmciIC8+PEZpZWxkIE5hbWU9IkJydXR0b2JldHJhZyIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJaYWhsdW5nc3ppZWwiIFR5cGU9IlN0cmluZyIgLz48RmllbGQgTmFtZT0iTWFuZGFudCIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJNYW5kYW50IE5hbWUiIFR5cGU9IlN0cmluZyIgLz48RmllbGQgTmFtZT0iS29zdGVuc3RlbGxlIiBUeXBlPSJTdHJpbmciIC8+PEZpZWxkIE5hbWU9IkVyaGFsdGVuIHdhbm4iIFR5cGU9IlN0cmluZyIgLz48RmllbGQgTmFtZT0iQmVsZWdkYXR1bSIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJGR19FbWFpbCIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJGR19GcmVpZ2FiZSIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJGR19XYW5uIiBUeXBlPSJTdHJpbmciIC8+PEZpZWxkIE5hbWU9IldITyIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJXSEVOIiBUeXBlPSJTdHJpbmciIC8+PEZpZWxkIE5hbWU9IkRFTEVHQVRJT04iIFR5cGU9IlN0cmluZyIgLz48L1ZpZXc+PC9EYXRhU2V0Pg==</value>
</data>
</root>

73
WISAG_PM_REPORT/RptErgebnisbericht.vb Normal file
View File

@@ -0,0 +1,73 @@
Public Class RptErgebnisbericht
Private Sub GroupHeaderBand1_BeforePrint(sender As Object, e As Printing.PrintEventArgs) Handles GroupHeaderBand1.BeforePrint
Dim oGroupType As String = GetCurrentColumnValue("GroupType")
Dim oGroupTypeID As Integer = GetCurrentColumnValue("GroupTypeID")
If oGroupType = "HEAD" Then
e.Cancel = True
ElseIf oGroupType.Contains("Freigabe") Then
XrTableCell5.Text = "Ja/Nein"
XrTableCell2.Text = oGroupType
ElseIf oGroupType.Contains("Abgelehnt") Then
XrTableCell5.Text = "Ja/Nein"
XrTableCell2.Text = oGroupType
ElseIf oGroupType.Contains("Weiterleitung") Then
XrTableCell5.Text = ""
XrTableCell2.Text = "Weiterleitung/Weiterleitung durch: An:"
Else
XrTableCell2.Text = "none"
End If
End Sub
Private Sub Detail_BeforePrint(sender As Object, e As Printing.PrintEventArgs) Handles Detail.BeforePrint
Dim oGroupType As String = GetCurrentColumnValue("GroupType")
Dim oGroupTypeID As Integer = GetCurrentColumnValue("GroupTypeID")
If oGroupType = "HEAD" Then
e.Cancel = True
End If
End Sub
Private Sub GroupHeader1_BeforePrint(sender As Object, e As Printing.PrintEventArgs) Handles GroupHeader1.BeforePrint
End Sub
Private Sub DetailReport_BeforePrint(sender As Object, e As Printing.PrintEventArgs) Handles DetailReport.BeforePrint
Dim oGroupType As String = GetCurrentColumnValue("GroupType")
Dim oGroupTypeID As Integer = GetCurrentColumnValue("GroupTypeID")
'XrLabel24.Text = oGroupType
If oGroupType.Contains("Abgelehnt") Then
Detail.Visible = False
End If
End Sub
Private Sub GroupHeaderBand2_BeforePrint(sender As Object, e As Printing.PrintEventArgs) Handles GroupHeaderBand2.BeforePrint
e.Cancel = True
End Sub
Private Sub GroupHeaderBand3_BeforePrint(sender As Object, e As Printing.PrintEventArgs) Handles GroupHeaderBand3.BeforePrint
e.Cancel = True
End Sub
Private Sub Detail1_BeforePrint(sender As Object, e As Printing.PrintEventArgs) Handles Detail1.BeforePrint
Dim oGroupType As String = GetCurrentColumnValue("GroupType")
'XrLabel25.Text = oGroupType
If oGroupType = "HEAD" Then
Detail1.Visible = False
ElseIf oGroupType.Contains("Abgelehnt") Then
Detail1.Visible = False
End If
If oGroupType.Contains("Weiterleitung") Then
Detail1.Visible = True
'XrLabel25.Text = oGroupType
' e.Cancel = True
End If
End Sub
Private Sub GroupHeaderBand1_AfterPrint(sender As Object, e As EventArgs) Handles GroupHeaderBand1.AfterPrint
Dim oGroupType As String = GetCurrentColumnValue("GroupType")
If oGroupType.Contains("Weiterleitung") Then
XrTableCell5.Text = ""
XrTableCell2.Text = "Weiterleitung/Weiterleitung durch: An:"
End If
End Sub
End Class

462
WISAG_PM_REPORT/RptStampIcon.Designer.vb generated Normal file
View File

@@ -0,0 +1,462 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Public Class RptStampIcon
Inherits DevExpress.XtraReports.UI.XtraReport
'XtraReport overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()>
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
MyBase.Dispose(disposing)
End Sub
'Required by the Designer
Private components As System.ComponentModel.IContainer
'NOTE: The following procedure is required by the Designer
'It can be modified using the Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim SelectQuery1 As DevExpress.DataAccess.Sql.SelectQuery = New DevExpress.DataAccess.Sql.SelectQuery()
Dim Column1 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression1 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Table1 As DevExpress.DataAccess.Sql.Table = New DevExpress.DataAccess.Sql.Table()
Dim Column2 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression2 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column3 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression3 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column4 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression4 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column5 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression5 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(RptStampIcon))
Me.SqlDataSource1 = New DevExpress.DataAccess.Sql.SqlDataSource(Me.components)
Me.TopMarginBand1 = New DevExpress.XtraReports.UI.TopMarginBand()
Me.BottomMarginBand1 = New DevExpress.XtraReports.UI.BottomMarginBand()
Me.ReportHeaderBand1 = New DevExpress.XtraReports.UI.ReportHeaderBand()
Me.GroupHeaderBand1 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.XrPanel2 = New DevExpress.XtraReports.UI.XRPanel()
Me.XrTable1 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow1 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell2 = New DevExpress.XtraReports.UI.XRTableCell()
Me.GroupHeaderBand2 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.XrPanel1 = New DevExpress.XtraReports.UI.XRPanel()
Me.XrTable2 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow2 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell3 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell5 = New DevExpress.XtraReports.UI.XRTableCell()
Me.DetailBand1 = New DevExpress.XtraReports.UI.DetailBand()
Me.XrPanel3 = New DevExpress.XtraReports.UI.XRPanel()
Me.XrTable3 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow3 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell6 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell7 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell8 = New DevExpress.XtraReports.UI.XRTableCell()
Me.Title = New DevExpress.XtraReports.UI.XRControlStyle()
Me.GroupCaption3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.GroupData3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailCaption3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailData3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailData3_Odd = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailCaptionBackground3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.PageInfo = New DevExpress.XtraReports.UI.XRControlStyle()
Me.ReportFooter = New DevExpress.XtraReports.UI.ReportFooterBand()
Me.XrPanel5 = New DevExpress.XtraReports.UI.XRPanel()
Me.VwcusT_STAMPTableAdapter1 = New WISAG_PM_REPORT.MyDatasetTableAdapters.VWCUST_STAMPTableAdapter()
CType(Me.XrTable1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XrTable2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XrTable3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'SqlDataSource1
'
Me.SqlDataSource1.ConnectionName = "DD_ECM_ReportConnection"
Me.SqlDataSource1.Name = "SqlDataSource1"
ColumnExpression1.ColumnName = "FG_TYP"
Table1.Name = "VWCUST_STAMP"
ColumnExpression1.Table = Table1
Column1.Expression = ColumnExpression1
ColumnExpression2.ColumnName = "DocID"
ColumnExpression2.Table = Table1
Column2.Expression = ColumnExpression2
ColumnExpression3.ColumnName = "Email"
ColumnExpression3.Table = Table1
Column3.Expression = ColumnExpression3
ColumnExpression4.ColumnName = "Freigabe"
ColumnExpression4.Table = Table1
Column4.Expression = ColumnExpression4
ColumnExpression5.ColumnName = "Wann"
ColumnExpression5.Table = Table1
Column5.Expression = ColumnExpression5
SelectQuery1.Columns.Add(Column1)
SelectQuery1.Columns.Add(Column2)
SelectQuery1.Columns.Add(Column3)
SelectQuery1.Columns.Add(Column4)
SelectQuery1.Columns.Add(Column5)
SelectQuery1.Name = "VWCUST_STAMP"
SelectQuery1.Tables.Add(Table1)
Me.SqlDataSource1.Queries.AddRange(New DevExpress.DataAccess.Sql.SqlQuery() {SelectQuery1})
Me.SqlDataSource1.ResultSchemaSerializable = resources.GetString("SqlDataSource1.ResultSchemaSerializable")
'
'TopMarginBand1
'
Me.TopMarginBand1.HeightF = 0!
Me.TopMarginBand1.Name = "TopMarginBand1"
'
'BottomMarginBand1
'
Me.BottomMarginBand1.HeightF = 1.0!
Me.BottomMarginBand1.Name = "BottomMarginBand1"
'
'ReportHeaderBand1
'
Me.ReportHeaderBand1.HeightF = 0!
Me.ReportHeaderBand1.Name = "ReportHeaderBand1"
Me.ReportHeaderBand1.Visible = False
'
'GroupHeaderBand1
'
Me.GroupHeaderBand1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPanel2})
Me.GroupHeaderBand1.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.GroupHeaderBand1.GroupFields.AddRange(New DevExpress.XtraReports.UI.GroupField() {New DevExpress.XtraReports.UI.GroupField("FG_TYP", DevExpress.XtraReports.UI.XRColumnSortOrder.Ascending)})
Me.GroupHeaderBand1.GroupUnion = DevExpress.XtraReports.UI.GroupUnion.WithFirstDetail
Me.GroupHeaderBand1.HeightF = 25.0!
Me.GroupHeaderBand1.Name = "GroupHeaderBand1"
Me.GroupHeaderBand1.StylePriority.UseFont = False
'
'XrPanel2
'
Me.XrPanel2.BackColor = System.Drawing.Color.White
Me.XrPanel2.BorderColor = System.Drawing.Color.Red
Me.XrPanel2.Borders = CType((DevExpress.XtraPrinting.BorderSide.Left Or DevExpress.XtraPrinting.BorderSide.Right), DevExpress.XtraPrinting.BorderSide)
Me.XrPanel2.BorderWidth = 3.0!
Me.XrPanel2.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable1})
Me.XrPanel2.LocationFloat = New DevExpress.Utils.PointFloat(9.999847!, 0!)
Me.XrPanel2.Name = "XrPanel2"
Me.XrPanel2.SizeF = New System.Drawing.SizeF(279.0001!, 25.0!)
Me.XrPanel2.StylePriority.UseBackColor = False
Me.XrPanel2.StylePriority.UseBorderColor = False
Me.XrPanel2.StylePriority.UseBorders = False
Me.XrPanel2.StylePriority.UseBorderWidth = False
'
'XrTable1
'
Me.XrTable1.LocationFloat = New DevExpress.Utils.PointFloat(12.08344!, 0!)
Me.XrTable1.Name = "XrTable1"
Me.XrTable1.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow1})
Me.XrTable1.SizeF = New System.Drawing.SizeF(256.9166!, 25.0!)
'
'XrTableRow1
'
Me.XrTableRow1.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell2})
Me.XrTableRow1.Name = "XrTableRow1"
Me.XrTableRow1.Weight = 1.0R
'
'XrTableCell2
'
Me.XrTableCell2.BackColor = System.Drawing.Color.LightGray
Me.XrTableCell2.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[FG_TYP]")})
Me.XrTableCell2.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell2.Multiline = True
Me.XrTableCell2.Name = "XrTableCell2"
Me.XrTableCell2.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell2.StyleName = "GroupData3"
Me.XrTableCell2.StylePriority.UseBackColor = False
Me.XrTableCell2.StylePriority.UseFont = False
Me.XrTableCell2.Text = "XrTableCell2"
Me.XrTableCell2.Weight = 0.92685330904447116R
'
'GroupHeaderBand2
'
Me.GroupHeaderBand2.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPanel1})
Me.GroupHeaderBand2.GroupUnion = DevExpress.XtraReports.UI.GroupUnion.WithFirstDetail
Me.GroupHeaderBand2.HeightF = 38.00001!
Me.GroupHeaderBand2.Level = 1
Me.GroupHeaderBand2.Name = "GroupHeaderBand2"
'
'XrPanel1
'
Me.XrPanel1.BackColor = System.Drawing.Color.White
Me.XrPanel1.BorderColor = System.Drawing.Color.Red
Me.XrPanel1.Borders = CType(((DevExpress.XtraPrinting.BorderSide.Left Or DevExpress.XtraPrinting.BorderSide.Top) _
Or DevExpress.XtraPrinting.BorderSide.Right), DevExpress.XtraPrinting.BorderSide)
Me.XrPanel1.BorderWidth = 3.0!
Me.XrPanel1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable2})
Me.XrPanel1.LocationFloat = New DevExpress.Utils.PointFloat(9.999847!, 0!)
Me.XrPanel1.Name = "XrPanel1"
Me.XrPanel1.SizeF = New System.Drawing.SizeF(279.0001!, 38.00001!)
Me.XrPanel1.StyleName = "DetailCaptionBackground3"
Me.XrPanel1.StylePriority.UseBackColor = False
Me.XrPanel1.StylePriority.UseBorderColor = False
Me.XrPanel1.StylePriority.UseBorders = False
Me.XrPanel1.StylePriority.UseBorderWidth = False
'
'XrTable2
'
Me.XrTable2.LocationFloat = New DevExpress.Utils.PointFloat(10.0001!, 10.00001!)
Me.XrTable2.Name = "XrTable2"
Me.XrTable2.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow2})
Me.XrTable2.SizeF = New System.Drawing.SizeF(258.9999!, 28.0!)
'
'XrTableRow2
'
Me.XrTableRow2.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell3, Me.XrTableCell5})
Me.XrTableRow2.Name = "XrTableRow2"
Me.XrTableRow2.Weight = 1.0R
'
'XrTableCell3
'
Me.XrTableCell3.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell3.Multiline = True
Me.XrTableCell3.Name = "XrTableCell3"
Me.XrTableCell3.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell3.StyleName = "DetailCaption3"
Me.XrTableCell3.StylePriority.UseFont = False
Me.XrTableCell3.Text = "Freigabe Wer"
Me.XrTableCell3.Weight = 0.34481248786626795R
'
'XrTableCell5
'
Me.XrTableCell5.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell5.Multiline = True
Me.XrTableCell5.Name = "XrTableCell5"
Me.XrTableCell5.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell5.StyleName = "DetailCaption3"
Me.XrTableCell5.StylePriority.UseFont = False
Me.XrTableCell5.Text = "Wann"
Me.XrTableCell5.Weight = 0.22006990847061733R
'
'DetailBand1
'
Me.DetailBand1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPanel3})
Me.DetailBand1.HeightF = 21.875!
Me.DetailBand1.Name = "DetailBand1"
'
'XrPanel3
'
Me.XrPanel3.BackColor = System.Drawing.Color.White
Me.XrPanel3.BorderColor = System.Drawing.Color.Red
Me.XrPanel3.Borders = CType((DevExpress.XtraPrinting.BorderSide.Left Or DevExpress.XtraPrinting.BorderSide.Right), DevExpress.XtraPrinting.BorderSide)
Me.XrPanel3.BorderWidth = 3.0!
Me.XrPanel3.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable3})
Me.XrPanel3.LocationFloat = New DevExpress.Utils.PointFloat(9.999847!, 0!)
Me.XrPanel3.Name = "XrPanel3"
Me.XrPanel3.SizeF = New System.Drawing.SizeF(279.0001!, 21.875!)
Me.XrPanel3.StylePriority.UseBackColor = False
Me.XrPanel3.StylePriority.UseBorderColor = False
Me.XrPanel3.StylePriority.UseBorders = False
Me.XrPanel3.StylePriority.UseBorderWidth = False
'
'XrTable3
'
Me.XrTable3.BorderColor = System.Drawing.Color.Transparent
Me.XrTable3.LocationFloat = New DevExpress.Utils.PointFloat(12.08344!, 0!)
Me.XrTable3.Name = "XrTable3"
Me.XrTable3.OddStyleName = "DetailData3_Odd"
Me.XrTable3.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow3})
Me.XrTable3.SizeF = New System.Drawing.SizeF(256.9166!, 14.99999!)
Me.XrTable3.StylePriority.UseBorderColor = False
'
'XrTableRow3
'
Me.XrTableRow3.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell6, Me.XrTableCell7, Me.XrTableCell8})
Me.XrTableRow3.Name = "XrTableRow3"
Me.XrTableRow3.Weight = 11.5R
'
'XrTableCell6
'
Me.XrTableCell6.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Email]")})
Me.XrTableCell6.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell6.Multiline = True
Me.XrTableCell6.Name = "XrTableCell6"
Me.XrTableCell6.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell6.StyleName = "DetailData3"
Me.XrTableCell6.StylePriority.UseFont = False
Me.XrTableCell6.Text = "XrTableCell6"
Me.XrTableCell6.Weight = 0.20052354564978331R
'
'XrTableCell7
'
Me.XrTableCell7.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Freigabe]")})
Me.XrTableCell7.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell7.Multiline = True
Me.XrTableCell7.Name = "XrTableCell7"
Me.XrTableCell7.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell7.StyleName = "DetailData3"
Me.XrTableCell7.StylePriority.UseFont = False
Me.XrTableCell7.Text = "XrTableCell7"
Me.XrTableCell7.Weight = 0.081193868433615618R
'
'XrTableCell8
'
Me.XrTableCell8.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Wann]")})
Me.XrTableCell8.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell8.Multiline = True
Me.XrTableCell8.Name = "XrTableCell8"
Me.XrTableCell8.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell8.StyleName = "DetailData3"
Me.XrTableCell8.StylePriority.UseFont = False
Me.XrTableCell8.Text = "XrTableCell8"
Me.XrTableCell8.TextFormatString = "{0:dd.MM.yyyy HH:mm}"
Me.XrTableCell8.Weight = 0.1822016741454581R
'
'Title
'
Me.Title.BackColor = System.Drawing.Color.Transparent
Me.Title.BorderColor = System.Drawing.Color.Black
Me.Title.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.Title.BorderWidth = 1.0!
Me.Title.Font = New System.Drawing.Font("Tahoma", 14.0!)
Me.Title.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.Title.Name = "Title"
'
'GroupCaption3
'
Me.GroupCaption3.BackColor = System.Drawing.Color.FromArgb(CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer))
Me.GroupCaption3.BorderColor = System.Drawing.Color.White
Me.GroupCaption3.Borders = DevExpress.XtraPrinting.BorderSide.Bottom
Me.GroupCaption3.BorderWidth = 2.0!
Me.GroupCaption3.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.GroupCaption3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(228, Byte), Integer), CType(CType(228, Byte), Integer), CType(CType(228, Byte), Integer))
Me.GroupCaption3.Name = "GroupCaption3"
Me.GroupCaption3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 2, 0, 0, 100.0!)
Me.GroupCaption3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'GroupData3
'
Me.GroupData3.BackColor = System.Drawing.Color.FromArgb(CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer))
Me.GroupData3.BorderColor = System.Drawing.Color.White
Me.GroupData3.Borders = DevExpress.XtraPrinting.BorderSide.Bottom
Me.GroupData3.BorderWidth = 2.0!
Me.GroupData3.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.GroupData3.ForeColor = System.Drawing.Color.White
Me.GroupData3.Name = "GroupData3"
Me.GroupData3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 2, 0, 0, 100.0!)
Me.GroupData3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailCaption3
'
Me.DetailCaption3.BackColor = System.Drawing.Color.Transparent
Me.DetailCaption3.BorderColor = System.Drawing.Color.Transparent
Me.DetailCaption3.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.DetailCaption3.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.DetailCaption3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.DetailCaption3.Name = "DetailCaption3"
Me.DetailCaption3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailCaption3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailData3
'
Me.DetailData3.Font = New System.Drawing.Font("Tahoma", 8.0!)
Me.DetailData3.ForeColor = System.Drawing.Color.Black
Me.DetailData3.Name = "DetailData3"
Me.DetailData3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailData3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailData3_Odd
'
Me.DetailData3_Odd.BackColor = System.Drawing.Color.FromArgb(CType(CType(231, Byte), Integer), CType(CType(231, Byte), Integer), CType(CType(231, Byte), Integer))
Me.DetailData3_Odd.BorderColor = System.Drawing.Color.Transparent
Me.DetailData3_Odd.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.DetailData3_Odd.BorderWidth = 1.0!
Me.DetailData3_Odd.Font = New System.Drawing.Font("Tahoma", 8.0!)
Me.DetailData3_Odd.ForeColor = System.Drawing.Color.Black
Me.DetailData3_Odd.Name = "DetailData3_Odd"
Me.DetailData3_Odd.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailData3_Odd.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailCaptionBackground3
'
Me.DetailCaptionBackground3.BackColor = System.Drawing.Color.Transparent
Me.DetailCaptionBackground3.BorderColor = System.Drawing.Color.FromArgb(CType(CType(206, Byte), Integer), CType(CType(206, Byte), Integer), CType(CType(206, Byte), Integer))
Me.DetailCaptionBackground3.Borders = DevExpress.XtraPrinting.BorderSide.Top
Me.DetailCaptionBackground3.BorderWidth = 2.0!
Me.DetailCaptionBackground3.Name = "DetailCaptionBackground3"
'
'PageInfo
'
Me.PageInfo.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.PageInfo.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.PageInfo.Name = "PageInfo"
Me.PageInfo.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
'
'ReportFooter
'
Me.ReportFooter.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPanel5})
Me.ReportFooter.HeightF = 12.5!
Me.ReportFooter.Name = "ReportFooter"
'
'XrPanel5
'
Me.XrPanel5.BackColor = System.Drawing.Color.White
Me.XrPanel5.BorderColor = System.Drawing.Color.Red
Me.XrPanel5.Borders = DevExpress.XtraPrinting.BorderSide.Top
Me.XrPanel5.BorderWidth = 3.0!
Me.XrPanel5.LocationFloat = New DevExpress.Utils.PointFloat(9.999847!, 0!)
Me.XrPanel5.Name = "XrPanel5"
Me.XrPanel5.SizeF = New System.Drawing.SizeF(279.0001!, 12.5!)
Me.XrPanel5.StylePriority.UseBackColor = False
Me.XrPanel5.StylePriority.UseBorderColor = False
Me.XrPanel5.StylePriority.UseBorders = False
Me.XrPanel5.StylePriority.UseBorderWidth = False
'
'VwcusT_STAMPTableAdapter1
'
Me.VwcusT_STAMPTableAdapter1.ClearBeforeFill = True
'
'RptStampIcon
'
Me.Bands.AddRange(New DevExpress.XtraReports.UI.Band() {Me.TopMarginBand1, Me.BottomMarginBand1, Me.ReportHeaderBand1, Me.GroupHeaderBand1, Me.GroupHeaderBand2, Me.DetailBand1, Me.ReportFooter})
Me.ComponentStorage.AddRange(New System.ComponentModel.IComponent() {Me.SqlDataSource1})
Me.DataMember = "VWCUST_STAMP"
Me.DataSource = Me.SqlDataSource1
Me.Margins = New System.Drawing.Printing.Margins(10, 104, 0, 1)
Me.PageHeight = 583
Me.PageWidth = 413
Me.PaperKind = System.Drawing.Printing.PaperKind.A6
Me.StyleSheet.AddRange(New DevExpress.XtraReports.UI.XRControlStyle() {Me.Title, Me.GroupCaption3, Me.GroupData3, Me.DetailCaption3, Me.DetailData3, Me.DetailData3_Odd, Me.DetailCaptionBackground3, Me.PageInfo})
Me.Version = "18.1"
CType(Me.XrTable1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.XrTable2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.XrTable3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
Friend WithEvents SqlDataSource1 As DevExpress.DataAccess.Sql.SqlDataSource
Friend WithEvents TopMarginBand1 As DevExpress.XtraReports.UI.TopMarginBand
Friend WithEvents BottomMarginBand1 As DevExpress.XtraReports.UI.BottomMarginBand
Friend WithEvents ReportHeaderBand1 As DevExpress.XtraReports.UI.ReportHeaderBand
Friend WithEvents GroupHeaderBand1 As DevExpress.XtraReports.UI.GroupHeaderBand
Friend WithEvents XrTable1 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow1 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell2 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents GroupHeaderBand2 As DevExpress.XtraReports.UI.GroupHeaderBand
Friend WithEvents XrPanel1 As DevExpress.XtraReports.UI.XRPanel
Friend WithEvents XrTable2 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow2 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell3 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell5 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents DetailBand1 As DevExpress.XtraReports.UI.DetailBand
Friend WithEvents XrTable3 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow3 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell6 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell7 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell8 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents Title As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents GroupCaption3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents GroupData3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailCaption3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailData3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailData3_Odd As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailCaptionBackground3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents PageInfo As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents VwcusT_STAMPTableAdapter1 As MyDatasetTableAdapters.VWCUST_STAMPTableAdapter
Friend WithEvents XrPanel2 As DevExpress.XtraReports.UI.XRPanel
Friend WithEvents XrPanel3 As DevExpress.XtraReports.UI.XRPanel
Friend WithEvents ReportFooter As DevExpress.XtraReports.UI.ReportFooterBand
Friend WithEvents XrPanel5 As DevExpress.XtraReports.UI.XRPanel
End Class

129
WISAG_PM_REPORT/RptStampIcon.resx Normal file
View File

@@ -0,0 +1,129 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="SqlDataSource1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<data name="SqlDataSource1.ResultSchemaSerializable" xml:space="preserve">
<value>PERhdGFTZXQgTmFtZT0iU3FsRGF0YVNvdXJjZTEiPjxWaWV3IE5hbWU9IlZXQ1VTVF9TVEFNUCI+PEZpZWxkIE5hbWU9IkZHX1RZUCIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJEb2NJRCIgVHlwZT0iSW50MzIiIC8+PEZpZWxkIE5hbWU9IkVtYWlsIiBUeXBlPSJTdHJpbmciIC8+PEZpZWxkIE5hbWU9IkZyZWlnYWJlIiBUeXBlPSJTdHJpbmciIC8+PEZpZWxkIE5hbWU9Ildhbm4iIFR5cGU9IkRhdGVUaW1lIiAvPjwvVmlldz48L0RhdGFTZXQ+</value>
</data>
<metadata name="VwcusT_STAMPTableAdapter1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 56</value>
</metadata>
</root>

3
WISAG_PM_REPORT/RptStampIcon.vb Normal file
View File

@@ -0,0 +1,3 @@
Public Class RptStampIcon
End Class

450
WISAG_PM_REPORT/RptStampSingle.Designer.vb generated Normal file
View File

@@ -0,0 +1,450 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Public Class RptStampSingle
Inherits DevExpress.XtraReports.UI.XtraReport
'XtraReport overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
MyBase.Dispose(disposing)
End Sub
'Required by the Designer
Private components As System.ComponentModel.IContainer
'NOTE: The following procedure is required by the Designer
'It can be modified using the Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim SelectQuery1 As DevExpress.DataAccess.Sql.SelectQuery = New DevExpress.DataAccess.Sql.SelectQuery()
Dim Column1 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression1 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Table1 As DevExpress.DataAccess.Sql.Table = New DevExpress.DataAccess.Sql.Table()
Dim Column2 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression2 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column3 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression3 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column4 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression4 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim Column5 As DevExpress.DataAccess.Sql.Column = New DevExpress.DataAccess.Sql.Column()
Dim ColumnExpression5 As DevExpress.DataAccess.Sql.ColumnExpression = New DevExpress.DataAccess.Sql.ColumnExpression()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(RptStampSingle))
Me.Detail = New DevExpress.XtraReports.UI.DetailBand()
Me.XrTable2 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow2 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell5 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell6 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell7 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell8 = New DevExpress.XtraReports.UI.XRTableCell()
Me.TopMargin = New DevExpress.XtraReports.UI.TopMarginBand()
Me.BottomMargin = New DevExpress.XtraReports.UI.BottomMarginBand()
Me.XrPageInfo1 = New DevExpress.XtraReports.UI.XRPageInfo()
Me.XrPageInfo2 = New DevExpress.XtraReports.UI.XRPageInfo()
Me.SqlDataSource1 = New DevExpress.DataAccess.Sql.SqlDataSource(Me.components)
Me.ReportHeaderBand1 = New DevExpress.XtraReports.UI.ReportHeaderBand()
Me.XrPanel2 = New DevExpress.XtraReports.UI.XRPanel()
Me.XrLabel3 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel2 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel1 = New DevExpress.XtraReports.UI.XRLabel()
Me.GroupHeaderBand1 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.XrPanel1 = New DevExpress.XtraReports.UI.XRPanel()
Me.XrTable1 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow1 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell1 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell2 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell3 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell4 = New DevExpress.XtraReports.UI.XRTableCell()
Me.Title = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailCaption3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailData3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailData3_Odd = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailCaptionBackground3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.PageInfo = New DevExpress.XtraReports.UI.XRControlStyle()
CType(Me.XrTable2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XrTable1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'Detail
'
Me.Detail.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable2})
Me.Detail.HeightF = 25.0!
Me.Detail.Name = "Detail"
Me.Detail.Padding = New DevExpress.XtraPrinting.PaddingInfo(0, 0, 0, 0, 100.0!)
Me.Detail.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
Me.Detail.Visible = False
'
'XrTable2
'
Me.XrTable2.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0!)
Me.XrTable2.Name = "XrTable2"
Me.XrTable2.OddStyleName = "DetailData3_Odd"
Me.XrTable2.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow2})
Me.XrTable2.SizeF = New System.Drawing.SizeF(603.125!, 25.0!)
'
'XrTableRow2
'
Me.XrTableRow2.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell5, Me.XrTableCell6, Me.XrTableCell7, Me.XrTableCell8})
Me.XrTableRow2.Name = "XrTableRow2"
Me.XrTableRow2.Weight = 11.5R
'
'XrTableCell5
'
Me.XrTableCell5.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[DocID]")})
Me.XrTableCell5.Multiline = True
Me.XrTableCell5.Name = "XrTableCell5"
Me.XrTableCell5.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell5.StyleName = "DetailData3"
Me.XrTableCell5.StylePriority.UseTextAlignment = False
Me.XrTableCell5.Text = "XrTableCell5"
Me.XrTableCell5.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleRight
Me.XrTableCell5.Weight = 0.20881915752704328R
'
'XrTableCell6
'
Me.XrTableCell6.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[STATE]")})
Me.XrTableCell6.Multiline = True
Me.XrTableCell6.Name = "XrTableCell6"
Me.XrTableCell6.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell6.StyleName = "DetailData3"
Me.XrTableCell6.Text = "XrTableCell6"
Me.XrTableCell6.Weight = 0.19597096369816708R
'
'XrTableCell7
'
Me.XrTableCell7.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[WHO]")})
Me.XrTableCell7.Multiline = True
Me.XrTableCell7.Name = "XrTableCell7"
Me.XrTableCell7.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell7.StyleName = "DetailData3"
Me.XrTableCell7.Text = "XrTableCell7"
Me.XrTableCell7.Weight = 0.16842295720027042R
'
'XrTableCell8
'
Me.XrTableCell8.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[CREATED_WHEN]")})
Me.XrTableCell8.Multiline = True
Me.XrTableCell8.Name = "XrTableCell8"
Me.XrTableCell8.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell8.StyleName = "DetailData3"
Me.XrTableCell8.Text = "XrTableCell8"
Me.XrTableCell8.Weight = 0.3546715839092548R
'
'TopMargin
'
Me.TopMargin.HeightF = 138.5417!
Me.TopMargin.Name = "TopMargin"
Me.TopMargin.Padding = New DevExpress.XtraPrinting.PaddingInfo(0, 0, 0, 0, 100.0!)
Me.TopMargin.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
'
'BottomMargin
'
Me.BottomMargin.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPageInfo1, Me.XrPageInfo2})
Me.BottomMargin.Name = "BottomMargin"
Me.BottomMargin.Padding = New DevExpress.XtraPrinting.PaddingInfo(0, 0, 0, 0, 100.0!)
Me.BottomMargin.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
Me.BottomMargin.Visible = False
'
'XrPageInfo1
'
Me.XrPageInfo1.LocationFloat = New DevExpress.Utils.PointFloat(6.0!, 6.0!)
Me.XrPageInfo1.Name = "XrPageInfo1"
Me.XrPageInfo1.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrPageInfo1.PageInfo = DevExpress.XtraPrinting.PageInfo.DateTime
Me.XrPageInfo1.SizeF = New System.Drawing.SizeF(313.0!, 23.0!)
Me.XrPageInfo1.StyleName = "PageInfo"
'
'XrPageInfo2
'
Me.XrPageInfo2.LocationFloat = New DevExpress.Utils.PointFloat(263.1136!, 29.00003!)
Me.XrPageInfo2.Name = "XrPageInfo2"
Me.XrPageInfo2.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrPageInfo2.SizeF = New System.Drawing.SizeF(313.0!, 23.0!)
Me.XrPageInfo2.StyleName = "PageInfo"
Me.XrPageInfo2.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopRight
Me.XrPageInfo2.TextFormatString = "Seite {0} von {1}"
'
'SqlDataSource1
'
Me.SqlDataSource1.ConnectionName = "MySSConnectionString"
Me.SqlDataSource1.Name = "SqlDataSource1"
ColumnExpression1.ColumnName = "DocID"
Table1.MetaSerializable = "<Meta X=""30"" Y=""30"" Width=""125"" Height=""153"" />"
Table1.Name = "VWCUST_RPTPM_INV_RPT_STAMP"
ColumnExpression1.Table = Table1
Column1.Expression = ColumnExpression1
ColumnExpression2.ColumnName = "STATE"
ColumnExpression2.Table = Table1
Column2.Expression = ColumnExpression2
ColumnExpression3.ColumnName = "WHO"
ColumnExpression3.Table = Table1
Column3.Expression = ColumnExpression3
ColumnExpression4.ColumnName = "CREATED_WHEN"
ColumnExpression4.Table = Table1
Column4.Expression = ColumnExpression4
ColumnExpression5.ColumnName = "COMMENT"
ColumnExpression5.Table = Table1
Column5.Expression = ColumnExpression5
SelectQuery1.Columns.Add(Column1)
SelectQuery1.Columns.Add(Column2)
SelectQuery1.Columns.Add(Column3)
SelectQuery1.Columns.Add(Column4)
SelectQuery1.Columns.Add(Column5)
SelectQuery1.Name = "VWCUST_RPTPM_INV_RPT_STAMP"
SelectQuery1.Tables.Add(Table1)
Me.SqlDataSource1.Queries.AddRange(New DevExpress.DataAccess.Sql.SqlQuery() {SelectQuery1})
Me.SqlDataSource1.ResultSchemaSerializable = resources.GetString("SqlDataSource1.ResultSchemaSerializable")
'
'ReportHeaderBand1
'
Me.ReportHeaderBand1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPanel2})
Me.ReportHeaderBand1.HeightF = 213.125!
Me.ReportHeaderBand1.Name = "ReportHeaderBand1"
'
'XrPanel2
'
Me.XrPanel2.BackColor = System.Drawing.Color.Empty
Me.XrPanel2.BorderColor = System.Drawing.Color.FromArgb(CType(CType(109, Byte), Integer), CType(CType(177, Byte), Integer), CType(CType(55, Byte), Integer))
Me.XrPanel2.Borders = CType((((DevExpress.XtraPrinting.BorderSide.Left Or DevExpress.XtraPrinting.BorderSide.Top) _
Or DevExpress.XtraPrinting.BorderSide.Right) _
Or DevExpress.XtraPrinting.BorderSide.Bottom), DevExpress.XtraPrinting.BorderSide)
Me.XrPanel2.BorderWidth = 3.0!
Me.XrPanel2.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrLabel3, Me.XrLabel2, Me.XrLabel1})
Me.XrPanel2.LocationFloat = New DevExpress.Utils.PointFloat(230.5236!, 66.25001!)
Me.XrPanel2.Name = "XrPanel2"
Me.XrPanel2.SizeF = New System.Drawing.SizeF(241.2917!, 101.4583!)
Me.XrPanel2.StylePriority.UseBackColor = False
Me.XrPanel2.StylePriority.UseBorderColor = False
Me.XrPanel2.StylePriority.UseBorders = False
Me.XrPanel2.StylePriority.UseBorderWidth = False
'
'XrLabel3
'
Me.XrLabel3.BorderColor = System.Drawing.Color.Empty
Me.XrLabel3.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.XrLabel3.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[CREATED_WHEN]")})
Me.XrLabel3.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel3.ForeColor = System.Drawing.Color.Red
Me.XrLabel3.LocationFloat = New DevExpress.Utils.PointFloat(10.00001!, 67.12497!)
Me.XrLabel3.Multiline = True
Me.XrLabel3.Name = "XrLabel3"
Me.XrLabel3.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel3.SizeF = New System.Drawing.SizeF(194.7917!, 23.0!)
Me.XrLabel3.StylePriority.UseBorderColor = False
Me.XrLabel3.StylePriority.UseBorders = False
Me.XrLabel3.StylePriority.UseFont = False
Me.XrLabel3.StylePriority.UseForeColor = False
Me.XrLabel3.Text = "XrLabel3"
Me.XrLabel3.TextFormatString = "{0:dd.MM.yyyy}"
'
'XrLabel2
'
Me.XrLabel2.BorderColor = System.Drawing.Color.Empty
Me.XrLabel2.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.XrLabel2.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[WHO]")})
Me.XrLabel2.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel2.ForeColor = System.Drawing.Color.Red
Me.XrLabel2.LocationFloat = New DevExpress.Utils.PointFloat(9.999969!, 44.12498!)
Me.XrLabel2.Multiline = True
Me.XrLabel2.Name = "XrLabel2"
Me.XrLabel2.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel2.SizeF = New System.Drawing.SizeF(217.7083!, 23.0!)
Me.XrLabel2.StylePriority.UseBorderColor = False
Me.XrLabel2.StylePriority.UseBorders = False
Me.XrLabel2.StylePriority.UseFont = False
Me.XrLabel2.StylePriority.UseForeColor = False
Me.XrLabel2.Text = "XrLabel2"
'
'XrLabel1
'
Me.XrLabel1.BorderColor = System.Drawing.Color.Empty
Me.XrLabel1.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.XrLabel1.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[STATE]")})
Me.XrLabel1.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel1.ForeColor = System.Drawing.Color.Red
Me.XrLabel1.LocationFloat = New DevExpress.Utils.PointFloat(10.00005!, 10.00001!)
Me.XrLabel1.Multiline = True
Me.XrLabel1.Name = "XrLabel1"
Me.XrLabel1.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel1.SizeF = New System.Drawing.SizeF(217.7082!, 23.0!)
Me.XrLabel1.StylePriority.UseBorderColor = False
Me.XrLabel1.StylePriority.UseBorders = False
Me.XrLabel1.StylePriority.UseFont = False
Me.XrLabel1.StylePriority.UseForeColor = False
Me.XrLabel1.Text = "XrLabel1"
'
'GroupHeaderBand1
'
Me.GroupHeaderBand1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPanel1})
Me.GroupHeaderBand1.GroupUnion = DevExpress.XtraReports.UI.GroupUnion.WithFirstDetail
Me.GroupHeaderBand1.HeightF = 48.00002!
Me.GroupHeaderBand1.Name = "GroupHeaderBand1"
Me.GroupHeaderBand1.Visible = False
'
'XrPanel1
'
Me.XrPanel1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable1})
Me.XrPanel1.LocationFloat = New DevExpress.Utils.PointFloat(0!, 10.00001!)
Me.XrPanel1.Name = "XrPanel1"
Me.XrPanel1.SizeF = New System.Drawing.SizeF(603.125!, 38.00001!)
Me.XrPanel1.StyleName = "DetailCaptionBackground3"
'
'XrTable1
'
Me.XrTable1.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 10.00001!)
Me.XrTable1.Name = "XrTable1"
Me.XrTable1.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow1})
Me.XrTable1.SizeF = New System.Drawing.SizeF(554.6666!, 28.0!)
'
'XrTableRow1
'
Me.XrTableRow1.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell1, Me.XrTableCell2, Me.XrTableCell3, Me.XrTableCell4})
Me.XrTableRow1.Name = "XrTableRow1"
Me.XrTableRow1.Weight = 1.0R
'
'XrTableCell1
'
Me.XrTableCell1.Multiline = True
Me.XrTableCell1.Name = "XrTableCell1"
Me.XrTableCell1.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell1.StyleName = "DetailCaption3"
Me.XrTableCell1.StylePriority.UseTextAlignment = False
Me.XrTableCell1.Text = "Doc ID"
Me.XrTableCell1.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleRight
Me.XrTableCell1.Weight = 0.20881915752704328R
'
'XrTableCell2
'
Me.XrTableCell2.Multiline = True
Me.XrTableCell2.Name = "XrTableCell2"
Me.XrTableCell2.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell2.StyleName = "DetailCaption3"
Me.XrTableCell2.Text = "STATE"
Me.XrTableCell2.Weight = 0.19597096369816708R
'
'XrTableCell3
'
Me.XrTableCell3.Multiline = True
Me.XrTableCell3.Name = "XrTableCell3"
Me.XrTableCell3.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell3.StyleName = "DetailCaption3"
Me.XrTableCell3.Text = "WHO"
Me.XrTableCell3.Weight = 0.16842295720027042R
'
'XrTableCell4
'
Me.XrTableCell4.Multiline = True
Me.XrTableCell4.Name = "XrTableCell4"
Me.XrTableCell4.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell4.StyleName = "DetailCaption3"
Me.XrTableCell4.Text = "CREATED WHEN"
Me.XrTableCell4.Weight = 0.42678692157451925R
'
'Title
'
Me.Title.BackColor = System.Drawing.Color.Transparent
Me.Title.BorderColor = System.Drawing.Color.Black
Me.Title.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.Title.BorderWidth = 1.0!
Me.Title.Font = New System.Drawing.Font("Tahoma", 14.0!)
Me.Title.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.Title.Name = "Title"
'
'DetailCaption3
'
Me.DetailCaption3.BackColor = System.Drawing.Color.Transparent
Me.DetailCaption3.BorderColor = System.Drawing.Color.Transparent
Me.DetailCaption3.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.DetailCaption3.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.DetailCaption3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.DetailCaption3.Name = "DetailCaption3"
Me.DetailCaption3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailCaption3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailData3
'
Me.DetailData3.Font = New System.Drawing.Font("Tahoma", 8.0!)
Me.DetailData3.ForeColor = System.Drawing.Color.Black
Me.DetailData3.Name = "DetailData3"
Me.DetailData3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailData3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailData3_Odd
'
Me.DetailData3_Odd.BackColor = System.Drawing.Color.FromArgb(CType(CType(231, Byte), Integer), CType(CType(231, Byte), Integer), CType(CType(231, Byte), Integer))
Me.DetailData3_Odd.BorderColor = System.Drawing.Color.Transparent
Me.DetailData3_Odd.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.DetailData3_Odd.BorderWidth = 1.0!
Me.DetailData3_Odd.Font = New System.Drawing.Font("Tahoma", 8.0!)
Me.DetailData3_Odd.ForeColor = System.Drawing.Color.Black
Me.DetailData3_Odd.Name = "DetailData3_Odd"
Me.DetailData3_Odd.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailData3_Odd.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailCaptionBackground3
'
Me.DetailCaptionBackground3.BackColor = System.Drawing.Color.Transparent
Me.DetailCaptionBackground3.BorderColor = System.Drawing.Color.FromArgb(CType(CType(206, Byte), Integer), CType(CType(206, Byte), Integer), CType(CType(206, Byte), Integer))
Me.DetailCaptionBackground3.Borders = DevExpress.XtraPrinting.BorderSide.Top
Me.DetailCaptionBackground3.BorderWidth = 2.0!
Me.DetailCaptionBackground3.Name = "DetailCaptionBackground3"
'
'PageInfo
'
Me.PageInfo.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.PageInfo.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.PageInfo.Name = "PageInfo"
Me.PageInfo.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
'
'RptStampSingle
'
Me.Bands.AddRange(New DevExpress.XtraReports.UI.Band() {Me.Detail, Me.TopMargin, Me.BottomMargin, Me.ReportHeaderBand1, Me.GroupHeaderBand1})
Me.ComponentStorage.AddRange(New System.ComponentModel.IComponent() {Me.SqlDataSource1})
Me.DataMember = "VWCUST_RPTPM_INV_RPT_STAMP"
Me.DataSource = Me.SqlDataSource1
Me.Margins = New System.Drawing.Printing.Margins(100, 100, 139, 100)
Me.PageHeight = 1169
Me.PageWidth = 827
Me.PaperKind = System.Drawing.Printing.PaperKind.A4
Me.StyleSheet.AddRange(New DevExpress.XtraReports.UI.XRControlStyle() {Me.Title, Me.DetailCaption3, Me.DetailData3, Me.DetailData3_Odd, Me.DetailCaptionBackground3, Me.PageInfo})
Me.Version = "18.1"
CType(Me.XrTable2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.XrTable1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
Friend WithEvents Detail As DevExpress.XtraReports.UI.DetailBand
Friend WithEvents TopMargin As DevExpress.XtraReports.UI.TopMarginBand
Friend WithEvents BottomMargin As DevExpress.XtraReports.UI.BottomMarginBand
Friend WithEvents XrTable2 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow2 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell5 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell6 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell7 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell8 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrPageInfo1 As DevExpress.XtraReports.UI.XRPageInfo
Friend WithEvents XrPageInfo2 As DevExpress.XtraReports.UI.XRPageInfo
Friend WithEvents SqlDataSource1 As DevExpress.DataAccess.Sql.SqlDataSource
Friend WithEvents ReportHeaderBand1 As DevExpress.XtraReports.UI.ReportHeaderBand
Friend WithEvents GroupHeaderBand1 As DevExpress.XtraReports.UI.GroupHeaderBand
Friend WithEvents XrPanel1 As DevExpress.XtraReports.UI.XRPanel
Friend WithEvents XrTable1 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow1 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell1 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell2 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell3 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell4 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents Title As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailCaption3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailData3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailData3_Odd As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailCaptionBackground3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents PageInfo As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents XrPanel2 As DevExpress.XtraReports.UI.XRPanel
Friend WithEvents XrLabel3 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel2 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel1 As DevExpress.XtraReports.UI.XRLabel
End Class

126
WISAG_PM_REPORT/RptStampSingle.resx Normal file
View File

@@ -0,0 +1,126 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="SqlDataSource1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<data name="SqlDataSource1.ResultSchemaSerializable" xml:space="preserve">
<value>PERhdGFTZXQgTmFtZT0iU3FsRGF0YVNvdXJjZTEiPjxWaWV3IE5hbWU9IlZXQ1VTVF9SUFRQTV9JTlZfUlBUX1NUQU1QIj48RmllbGQgTmFtZT0iRG9jSUQiIFR5cGU9IkludDMyIiAvPjxGaWVsZCBOYW1lPSJTVEFURSIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJXSE8iIFR5cGU9IlN0cmluZyIgLz48RmllbGQgTmFtZT0iQ1JFQVRFRF9XSEVOIiBUeXBlPSJTdHJpbmciIC8+PEZpZWxkIE5hbWU9IkNPTU1FTlQiIFR5cGU9IlN0cmluZyIgLz48L1ZpZXc+PC9EYXRhU2V0Pg==</value>
</data>
</root>

17
WISAG_PM_REPORT/RptStampSingle.vb Normal file
View File

@@ -0,0 +1,17 @@
Public Class RptStampSingle
Private Sub ReportHeaderBand1_BeforePrint(sender As Object, e As Printing.PrintEventArgs) Handles ReportHeaderBand1.BeforePrint
Dim oSTATE As String = GetCurrentColumnValue("STATE")
Dim oGroupTypeID As Integer = GetCurrentColumnValue("GroupTypeID")
Dim myRgbColor As Color = New Color()
If oSTATE = "Genehmigt" Then
myRgbColor = Color.FromArgb(109, 177, 51)
XrPanel2.BorderColor = Color.Red 'myRgbColor
XrLabel1.ForeColor = Color.Red 'myRgbColor
Else
XrPanel2.BorderColor = Color.Red
XrLabel1.ForeColor = Color.Red
End If
End Sub
End Class

244
WISAG_PM_REPORT/WISAG_PM_REPORT.vbproj Normal file
View File

@@ -0,0 +1,244 @@
<?xml version="1.0" encoding="utf-8"?>
<Project ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
<PropertyGroup>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
<ProjectGuid>{2F07AD56-B8BF-40EC-B19E-D714CE8F5191}</ProjectGuid>
<OutputType>WinExe</OutputType>
<StartupObject>WISAG_PM_REPORT.My.MyApplication</StartupObject>
<RootNamespace>WISAG_PM_REPORT</RootNamespace>
<AssemblyName>WISAG_PM_REPORT</AssemblyName>
<FileAlignment>512</FileAlignment>
<MyType>WindowsForms</MyType>
<TargetFrameworkVersion>v4.6.1</TargetFrameworkVersion>
<AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<PlatformTarget>AnyCPU</PlatformTarget>
<DebugSymbols>true</DebugSymbols>
<DebugType>full</DebugType>
<DefineDebug>true</DefineDebug>
<DefineTrace>true</DefineTrace>
<OutputPath>bin\Debug\</OutputPath>
<DocumentationFile>WISAG_PM_REPORT.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
<PlatformTarget>AnyCPU</PlatformTarget>
<DebugType>pdbonly</DebugType>
<DefineDebug>false</DefineDebug>
<DefineTrace>true</DefineTrace>
<Optimize>true</Optimize>
<OutputPath>bin\Release\</OutputPath>
<DocumentationFile>WISAG_PM_REPORT.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
</PropertyGroup>
<PropertyGroup>
<OptionExplicit>On</OptionExplicit>
</PropertyGroup>
<PropertyGroup>
<OptionCompare>Binary</OptionCompare>
</PropertyGroup>
<PropertyGroup>
<OptionStrict>Off</OptionStrict>
</PropertyGroup>
<PropertyGroup>
<OptionInfer>On</OptionInfer>
</PropertyGroup>
<ItemGroup>
<Reference Include="DevExpress.Charts.v18.1.Core, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.CodeParser.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.Data.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.DataAccess.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.Office.v18.1.Core, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.Pdf.v18.1.Core, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.PivotGrid.v18.1.Core, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.Printing.v18.1.Core, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.RichEdit.v18.1.Core, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.RichEdit.v18.1.Export, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.Sparkline.v18.1.Core, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.Utils.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.Utils.v18.1.UI, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.Xpo.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.XtraBars.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.XtraCharts.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.XtraEditors.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.XtraGauges.v18.1.Core, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.XtraLayout.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.XtraPrinting.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.XtraReports.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DevExpress.XtraReports.v18.1.Extensions, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DevExpress.XtraTreeList.v18.1, Version=18.1.5.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<Reference Include="DigitalData.Modules.Database">
<HintPath>..\..\DDMonorepo\Modules.Database\bin\Debug\DigitalData.Modules.Database.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Logging">
<HintPath>..\..\DDMonorepo\Modules.Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
</Reference>
<Reference Include="GdPicture.NET.14">
<HintPath>D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET (.NET Framework 4.5)\GdPicture.NET.14.dll</HintPath>
</Reference>
<Reference Include="NLog">
<HintPath>..\..\DDMonorepo\Modules.Logging\bin\Debug\NLog.dll</HintPath>
</Reference>
<Reference Include="System" />
<Reference Include="System.Data" />
<Reference Include="System.Deployment" />
<Reference Include="System.Drawing" />
<Reference Include="System.Web.Services" />
<Reference Include="System.Windows.Forms" />
<Reference Include="System.Xml" />
<Reference Include="System.Core" />
<Reference Include="System.Xml.Linq" />
<Reference Include="System.Data.DataSetExtensions" />
<Reference Include="System.Net.Http" />
</ItemGroup>
<ItemGroup>
<Import Include="Microsoft.VisualBasic" />
<Import Include="System" />
<Import Include="System.Collections" />
<Import Include="System.Collections.Generic" />
<Import Include="System.Data" />
<Import Include="System.Drawing" />
<Import Include="System.Diagnostics" />
<Import Include="System.Windows.Forms" />
<Import Include="System.Linq" />
<Import Include="System.Xml.Linq" />
<Import Include="System.Threading.Tasks" />
</ItemGroup>
<ItemGroup>
<Compile Include="Form1.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="Form1.Designer.vb">
<DependentUpon>Form1.vb</DependentUpon>
<SubType>Form</SubType>
</Compile>
<Compile Include="My Project\AssemblyInfo.vb" />
<Compile Include="My Project\Application.Designer.vb">
<AutoGen>True</AutoGen>
<DependentUpon>Application.myapp</DependentUpon>
</Compile>
<Compile Include="My Project\Resources.Designer.vb">
<AutoGen>True</AutoGen>
<DesignTime>True</DesignTime>
<DependentUpon>Resources.resx</DependentUpon>
</Compile>
<Compile Include="My Project\Settings.Designer.vb">
<AutoGen>True</AutoGen>
<DependentUpon>Settings.settings</DependentUpon>
<DesignTimeSharedInput>True</DesignTimeSharedInput>
</Compile>
<Compile Include="MyDataset.Designer.vb">
<AutoGen>True</AutoGen>
<DesignTime>True</DesignTime>
<DependentUpon>MyDataset.xsd</DependentUpon>
</Compile>
<Compile Include="MyDataset.vb">
<DependentUpon>MyDataset.xsd</DependentUpon>
</Compile>
<Compile Include="RptStampIcon.Designer.vb">
<DependentUpon>RptStampIcon.vb</DependentUpon>
</Compile>
<Compile Include="RptStampIcon.vb">
<SubType>Component</SubType>
</Compile>
<Compile Include="XtraReport1.Designer.vb">
<DependentUpon>XtraReport1.vb</DependentUpon>
</Compile>
<Compile Include="XtraReport1.vb">
<SubType>Component</SubType>
</Compile>
<Compile Include="XtraReport2.Designer.vb">
<DependentUpon>XtraReport2.vb</DependentUpon>
</Compile>
<Compile Include="XtraReport2.vb">
<SubType>Component</SubType>
</Compile>
<Compile Include="XtraReport3.Designer.vb">
<DependentUpon>XtraReport3.vb</DependentUpon>
</Compile>
<Compile Include="XtraReport3.vb">
<SubType>Component</SubType>
</Compile>
<Compile Include="RptErgebnisbericht.Designer.vb">
<DependentUpon>RptErgebnisbericht.vb</DependentUpon>
</Compile>
<Compile Include="RptErgebnisbericht.vb">
<SubType>Component</SubType>
</Compile>
<Compile Include="RptStampSingle.Designer.vb">
<DependentUpon>RptStampSingle.vb</DependentUpon>
</Compile>
<Compile Include="RptStampSingle.vb">
<SubType>Component</SubType>
</Compile>
<Compile Include="RpStampTable.Designer.vb">
<DependentUpon>RpStampTable.vb</DependentUpon>
</Compile>
<Compile Include="RpStampTable.vb">
<SubType>Component</SubType>
</Compile>
</ItemGroup>
<ItemGroup>
<EmbeddedResource Include="Form1.resx">
<DependentUpon>Form1.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="My Project\licenses.licx" />
<EmbeddedResource Include="My Project\Resources.resx">
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
<LastGenOutput>Resources.Designer.vb</LastGenOutput>
<CustomToolNamespace>My.Resources</CustomToolNamespace>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="RptStampIcon.resx">
<DependentUpon>RptStampIcon.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="XtraReport1.resx">
<DependentUpon>XtraReport1.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="XtraReport2.resx">
<DependentUpon>XtraReport2.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="XtraReport3.resx">
<DependentUpon>XtraReport3.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="RptErgebnisbericht.resx">
<DependentUpon>RptErgebnisbericht.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="RptStampSingle.resx">
<DependentUpon>RptStampSingle.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="RpStampTable.resx">
<DependentUpon>RpStampTable.vb</DependentUpon>
</EmbeddedResource>
</ItemGroup>
<ItemGroup>
<None Include="My Project\Application.myapp">
<Generator>MyApplicationCodeGenerator</Generator>
<LastGenOutput>Application.Designer.vb</LastGenOutput>
</None>
<None Include="My Project\Settings.settings">
<Generator>SettingsSingleFileGenerator</Generator>
<CustomToolNamespace>My</CustomToolNamespace>
<LastGenOutput>Settings.Designer.vb</LastGenOutput>
</None>
<None Include="App.config">
<SubType>Designer</SubType>
</None>
<None Include="MyDataset.xsc">
<DependentUpon>MyDataset.xsd</DependentUpon>
</None>
<None Include="MyDataset.xsd">
<SubType>Designer</SubType>
<Generator>MSDataSetGenerator</Generator>
<LastGenOutput>MyDataset.Designer.vb</LastGenOutput>
</None>
<None Include="MyDataset.xss">
<DependentUpon>MyDataset.xsd</DependentUpon>
</None>
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
</Project>

38
WISAG_PM_REPORT/XtraReport1.Designer.vb generated Normal file
View File

@@ -0,0 +1,38 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Public Class XtraReport1
Inherits DevExpress.XtraReports.UI.XtraReport
'XtraReport overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
MyBase.Dispose(disposing)
End Sub
'Required by the Designer
Private components As System.ComponentModel.IContainer
'NOTE: The following procedure is required by the Designer
'It can be modified using the Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
components = New System.ComponentModel.Container
Me.Detail = New DevExpress.XtraReports.UI.DetailBand
Me.TopMargin = New DevExpress.XtraReports.UI.TopMarginBand
Me.BottomMargin = New DevExpress.XtraReports.UI.BottomMarginBand
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
Me.Detail.Name = "Detail"
Me.TopMargin.Height = 100
Me.TopMargin.Name = "TopMargin"
Me.BottomMargin.Height = 100
Me.BottomMargin.Name = "BottomMargin"
Me.Bands.AddRange(New DevExpress.XtraReports.UI.Band() {Me.Detail, Me.TopMargin, Me.BottomMargin})
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
Friend WithEvents Detail As DevExpress.XtraReports.UI.DetailBand
Friend WithEvents TopMargin As DevExpress.XtraReports.UI.TopMarginBand
Friend WithEvents BottomMargin As DevExpress.XtraReports.UI.BottomMarginBand
End Class

120
WISAG_PM_REPORT/XtraReport1.resx Normal file
View File

@@ -0,0 +1,120 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
</root>

3
WISAG_PM_REPORT/XtraReport1.vb Normal file
View File

@@ -0,0 +1,3 @@
Public Class XtraReport1
End Class

646
WISAG_PM_REPORT/XtraReport2.Designer.vb generated Normal file
View File

@@ -0,0 +1,646 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Public Class XtraReport2
Inherits DevExpress.XtraReports.UI.XtraReport
'XtraReport overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
MyBase.Dispose(disposing)
End Sub
'Required by the Designer
Private components As System.ComponentModel.IContainer
'NOTE: The following procedure is required by the Designer
'It can be modified using the Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim CustomSqlQuery1 As DevExpress.DataAccess.Sql.CustomSqlQuery = New DevExpress.DataAccess.Sql.CustomSqlQuery()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(XtraReport2))
Me.Detail = New DevExpress.XtraReports.UI.DetailBand()
Me.XrTable2 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow2 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell40 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell41 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell42 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell43 = New DevExpress.XtraReports.UI.XRTableCell()
Me.TopMargin = New DevExpress.XtraReports.UI.TopMarginBand()
Me.BottomMargin = New DevExpress.XtraReports.UI.BottomMarginBand()
Me.XrPageInfo1 = New DevExpress.XtraReports.UI.XRPageInfo()
Me.XrPageInfo2 = New DevExpress.XtraReports.UI.XRPageInfo()
Me.SqlDataSource1 = New DevExpress.DataAccess.Sql.SqlDataSource(Me.components)
Me.ReportHeaderBand1 = New DevExpress.XtraReports.UI.ReportHeaderBand()
Me.XrLabel21 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLine1 = New DevExpress.XtraReports.UI.XRLine()
Me.XrLabel20 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel19 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel18 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel17 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel16 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel15 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel14 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel13 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel12 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel11 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel10 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel9 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel8 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel7 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel6 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel5 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel4 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel3 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel2 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel1 = New DevExpress.XtraReports.UI.XRLabel()
Me.GroupHeaderBand1 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.XrPanel1 = New DevExpress.XtraReports.UI.XRPanel()
Me.XrTable1 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow1 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell18 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell19 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell20 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell21 = New DevExpress.XtraReports.UI.XRTableCell()
Me.Title = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailCaption3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailData3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailData3_Odd = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailCaptionBackground3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.PageInfo = New DevExpress.XtraReports.UI.XRControlStyle()
CType(Me.XrTable2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XrTable1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'Detail
'
Me.Detail.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable2})
Me.Detail.HeightF = 25.0!
Me.Detail.Name = "Detail"
Me.Detail.Padding = New DevExpress.XtraPrinting.PaddingInfo(0, 0, 0, 0, 100.0!)
Me.Detail.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
'
'XrTable2
'
Me.XrTable2.LocationFloat = New DevExpress.Utils.PointFloat(16.00037!, 0!)
Me.XrTable2.Name = "XrTable2"
Me.XrTable2.OddStyleName = "DetailData3_Odd"
Me.XrTable2.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow2})
Me.XrTable2.SizeF = New System.Drawing.SizeF(606.9997!, 25.0!)
'
'XrTableRow2
'
Me.XrTableRow2.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell40, Me.XrTableCell41, Me.XrTableCell42, Me.XrTableCell43})
Me.XrTableRow2.Name = "XrTableRow2"
Me.XrTableRow2.Weight = 11.5R
'
'XrTableCell40
'
Me.XrTableCell40.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Prozessschritt]")})
Me.XrTableCell40.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell40.Multiline = True
Me.XrTableCell40.Name = "XrTableCell40"
Me.XrTableCell40.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell40.StyleName = "DetailData3"
Me.XrTableCell40.StylePriority.UseFont = False
Me.XrTableCell40.Text = "XrTableCell40"
Me.XrTableCell40.Weight = 0.27170248283386134R
'
'XrTableCell41
'
Me.XrTableCell41.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Durch]")})
Me.XrTableCell41.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell41.Multiline = True
Me.XrTableCell41.Name = "XrTableCell41"
Me.XrTableCell41.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell41.StyleName = "DetailData3"
Me.XrTableCell41.StylePriority.UseFont = False
Me.XrTableCell41.Text = "XrTableCell41"
Me.XrTableCell41.Weight = 0.1516249745658986R
'
'XrTableCell42
'
Me.XrTableCell42.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Status_Change]")})
Me.XrTableCell42.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell42.Multiline = True
Me.XrTableCell42.Name = "XrTableCell42"
Me.XrTableCell42.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell42.StyleName = "DetailData3"
Me.XrTableCell42.StylePriority.UseFont = False
Me.XrTableCell42.Text = "XrTableCell42"
Me.XrTableCell42.Weight = 0.31414615874955754R
'
'XrTableCell43
'
Me.XrTableCell43.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[wannPos]")})
Me.XrTableCell43.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell43.Multiline = True
Me.XrTableCell43.Name = "XrTableCell43"
Me.XrTableCell43.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell43.StyleName = "DetailData3"
Me.XrTableCell43.StylePriority.UseFont = False
Me.XrTableCell43.Text = "XrTableCell43"
Me.XrTableCell43.TextFormatString = "{0:dd.MM.yyyy HH:mm}"
Me.XrTableCell43.Weight = 0.13306054388170926R
'
'TopMargin
'
Me.TopMargin.Name = "TopMargin"
Me.TopMargin.Padding = New DevExpress.XtraPrinting.PaddingInfo(0, 0, 0, 0, 100.0!)
Me.TopMargin.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
'
'BottomMargin
'
Me.BottomMargin.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPageInfo1, Me.XrPageInfo2})
Me.BottomMargin.Name = "BottomMargin"
Me.BottomMargin.Padding = New DevExpress.XtraPrinting.PaddingInfo(0, 0, 0, 0, 100.0!)
Me.BottomMargin.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
'
'XrPageInfo1
'
Me.XrPageInfo1.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrPageInfo1.LocationFloat = New DevExpress.Utils.PointFloat(6.0!, 6.0!)
Me.XrPageInfo1.Name = "XrPageInfo1"
Me.XrPageInfo1.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrPageInfo1.PageInfo = DevExpress.XtraPrinting.PageInfo.DateTime
Me.XrPageInfo1.SizeF = New System.Drawing.SizeF(313.0!, 23.0!)
Me.XrPageInfo1.StyleName = "PageInfo"
Me.XrPageInfo1.StylePriority.UseFont = False
Me.XrPageInfo1.TextFormatString = "{0:dd.MM.yyyy HH:mm' Uhr'}"
'
'XrPageInfo2
'
Me.XrPageInfo2.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrPageInfo2.LocationFloat = New DevExpress.Utils.PointFloat(319.0!, 6.00001!)
Me.XrPageInfo2.Name = "XrPageInfo2"
Me.XrPageInfo2.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrPageInfo2.SizeF = New System.Drawing.SizeF(313.0!, 23.0!)
Me.XrPageInfo2.StyleName = "PageInfo"
Me.XrPageInfo2.StylePriority.UseFont = False
Me.XrPageInfo2.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopRight
Me.XrPageInfo2.TextFormatString = "Seite {0} von {1}"
'
'SqlDataSource1
'
Me.SqlDataSource1.ConnectionName = "DD_ECM_ReportConnection"
Me.SqlDataSource1.Name = "SqlDataSource1"
CustomSqlQuery1.Name = "VWCUST_RPTERGEBNISBERICHT"
CustomSqlQuery1.Sql = resources.GetString("CustomSqlQuery1.Sql")
Me.SqlDataSource1.Queries.AddRange(New DevExpress.DataAccess.Sql.SqlQuery() {CustomSqlQuery1})
Me.SqlDataSource1.ResultSchemaSerializable = resources.GetString("SqlDataSource1.ResultSchemaSerializable")
'
'ReportHeaderBand1
'
Me.ReportHeaderBand1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrLabel21, Me.XrLine1, Me.XrLabel20, Me.XrLabel19, Me.XrLabel18, Me.XrLabel17, Me.XrLabel16, Me.XrLabel15, Me.XrLabel14, Me.XrLabel13, Me.XrLabel12, Me.XrLabel11, Me.XrLabel10, Me.XrLabel9, Me.XrLabel8, Me.XrLabel7, Me.XrLabel6, Me.XrLabel5, Me.XrLabel4, Me.XrLabel3, Me.XrLabel2, Me.XrLabel1})
Me.ReportHeaderBand1.HeightF = 330.8333!
Me.ReportHeaderBand1.Name = "ReportHeaderBand1"
'
'XrLabel21
'
Me.XrLabel21.Font = New System.Drawing.Font("Arial", 14.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel21.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 302.0833!)
Me.XrLabel21.Multiline = True
Me.XrLabel21.Name = "XrLabel21"
Me.XrLabel21.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel21.SizeF = New System.Drawing.SizeF(418.9405!, 23.0!)
Me.XrLabel21.StylePriority.UseFont = False
Me.XrLabel21.Text = "Zusammenfassung"
'
'XrLine1
'
Me.XrLine1.LineWidth = 3.0!
Me.XrLine1.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 289.5833!)
Me.XrLine1.Name = "XrLine1"
Me.XrLine1.SizeF = New System.Drawing.SizeF(611.0001!, 12.5!)
'
'XrLabel20
'
Me.XrLabel20.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel20.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 253.0834!)
Me.XrLabel20.Multiline = True
Me.XrLabel20.Name = "XrLabel20"
Me.XrLabel20.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel20.SizeF = New System.Drawing.SizeF(125.0!, 23.0!)
Me.XrLabel20.StylePriority.UseFont = False
Me.XrLabel20.Text = "email Absender:"
'
'XrLabel19
'
Me.XrLabel19.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel19.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 219.6667!)
Me.XrLabel19.Multiline = True
Me.XrLabel19.Name = "XrLabel19"
Me.XrLabel19.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel19.SizeF = New System.Drawing.SizeF(125.0!, 23.0!)
Me.XrLabel19.StylePriority.UseFont = False
Me.XrLabel19.Text = "Kreditorname:"
'
'XrLabel18
'
Me.XrLabel18.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel18.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 183.2917!)
Me.XrLabel18.Multiline = True
Me.XrLabel18.Name = "XrLabel18"
Me.XrLabel18.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel18.SizeF = New System.Drawing.SizeF(125.0!, 23.0!)
Me.XrLabel18.StylePriority.UseFont = False
Me.XrLabel18.Text = "Kreditornummer:"
'
'XrLabel17
'
Me.XrLabel17.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel17.LocationFloat = New DevExpress.Utils.PointFloat(295.123!, 78.16664!)
Me.XrLabel17.Multiline = True
Me.XrLabel17.Name = "XrLabel17"
Me.XrLabel17.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel17.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel17.StylePriority.UseFont = False
Me.XrLabel17.Text = "Mandant:"
'
'XrLabel16
'
Me.XrLabel16.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel16.LocationFloat = New DevExpress.Utils.PointFloat(295.123!, 44.75002!)
Me.XrLabel16.Multiline = True
Me.XrLabel16.Name = "XrLabel16"
Me.XrLabel16.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel16.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel16.StylePriority.UseFont = False
Me.XrLabel16.Text = "Belegnummer:"
'
'XrLabel15
'
Me.XrLabel15.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel15.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 148.1667!)
Me.XrLabel15.Multiline = True
Me.XrLabel15.Name = "XrLabel15"
Me.XrLabel15.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel15.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel15.StylePriority.UseFont = False
Me.XrLabel15.Text = "Bestellnummer:"
'
'XrLabel14
'
Me.XrLabel14.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel14.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 113.1666!)
Me.XrLabel14.Multiline = True
Me.XrLabel14.Name = "XrLabel14"
Me.XrLabel14.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel14.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel14.StylePriority.UseFont = False
Me.XrLabel14.Text = "Kostenstelle:"
'
'XrLabel13
'
Me.XrLabel13.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel13.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 78.16664!)
Me.XrLabel13.Multiline = True
Me.XrLabel13.Name = "XrLabel13"
Me.XrLabel13.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel13.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel13.StylePriority.UseFont = False
Me.XrLabel13.Text = "Belegdatum:"
'
'XrLabel12
'
Me.XrLabel12.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel12.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 44.75002!)
Me.XrLabel12.Multiline = True
Me.XrLabel12.Name = "XrLabel12"
Me.XrLabel12.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel12.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel12.StylePriority.UseFont = False
Me.XrLabel12.Text = "Eingang:"
'
'XrLabel11
'
Me.XrLabel11.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Absender]")})
Me.XrLabel11.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel11.LocationFloat = New DevExpress.Utils.PointFloat(146.1042!, 253.0834!)
Me.XrLabel11.Multiline = True
Me.XrLabel11.Name = "XrLabel11"
Me.XrLabel11.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel11.SizeF = New System.Drawing.SizeF(470.8959!, 23.00002!)
Me.XrLabel11.StylePriority.UseFont = False
Me.XrLabel11.Text = "XrLabel11"
'
'XrLabel10
'
Me.XrLabel10.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[KreditorName_Lang]")})
Me.XrLabel10.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel10.LocationFloat = New DevExpress.Utils.PointFloat(146.1042!, 219.6667!)
Me.XrLabel10.Multiline = True
Me.XrLabel10.Name = "XrLabel10"
Me.XrLabel10.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel10.SizeF = New System.Drawing.SizeF(470.8959!, 23.0!)
Me.XrLabel10.StylePriority.UseFont = False
Me.XrLabel10.Text = "XrLabel10"
'
'XrLabel9
'
Me.XrLabel9.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[KreditorNummer]")})
Me.XrLabel9.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel9.LocationFloat = New DevExpress.Utils.PointFloat(146.1042!, 183.2917!)
Me.XrLabel9.Multiline = True
Me.XrLabel9.Name = "XrLabel9"
Me.XrLabel9.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel9.SizeF = New System.Drawing.SizeF(144.7917!, 23.0!)
Me.XrLabel9.StylePriority.UseFont = False
Me.XrLabel9.Text = "XrLabel9"
'
'XrLabel8
'
Me.XrLabel8.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[BestellNr]")})
Me.XrLabel8.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel8.LocationFloat = New DevExpress.Utils.PointFloat(146.1042!, 148.1667!)
Me.XrLabel8.Multiline = True
Me.XrLabel8.Name = "XrLabel8"
Me.XrLabel8.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel8.SizeF = New System.Drawing.SizeF(144.7917!, 23.0!)
Me.XrLabel8.StylePriority.UseFont = False
Me.XrLabel8.Text = "XrLabel8"
'
'XrLabel7
'
Me.XrLabel7.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Kostenstelle]")})
Me.XrLabel7.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel7.LocationFloat = New DevExpress.Utils.PointFloat(146.1042!, 113.1666!)
Me.XrLabel7.Multiline = True
Me.XrLabel7.Name = "XrLabel7"
Me.XrLabel7.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel7.SizeF = New System.Drawing.SizeF(144.7917!, 23.00001!)
Me.XrLabel7.StylePriority.UseFont = False
Me.XrLabel7.Text = "XrLabel7"
'
'XrLabel6
'
Me.XrLabel6.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Mandant Name]")})
Me.XrLabel6.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel6.LocationFloat = New DevExpress.Utils.PointFloat(424.9405!, 101.1667!)
Me.XrLabel6.Multiline = True
Me.XrLabel6.Name = "XrLabel6"
Me.XrLabel6.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel6.SizeF = New System.Drawing.SizeF(192.0596!, 23.0!)
Me.XrLabel6.StylePriority.UseFont = False
Me.XrLabel6.Text = "XrLabel6"
'
'XrLabel5
'
Me.XrLabel5.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Mandant]")})
Me.XrLabel5.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel5.LocationFloat = New DevExpress.Utils.PointFloat(424.9405!, 78.16664!)
Me.XrLabel5.Multiline = True
Me.XrLabel5.Name = "XrLabel5"
Me.XrLabel5.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel5.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel5.StylePriority.UseFont = False
Me.XrLabel5.Text = "XrLabel5"
'
'XrLabel4
'
Me.XrLabel4.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[RechnungNr]")})
Me.XrLabel4.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel4.LocationFloat = New DevExpress.Utils.PointFloat(424.9405!, 44.75002!)
Me.XrLabel4.Multiline = True
Me.XrLabel4.Name = "XrLabel4"
Me.XrLabel4.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel4.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel4.StylePriority.UseFont = False
Me.XrLabel4.Text = "XrLabel4"
'
'XrLabel3
'
Me.XrLabel3.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Belegdatum]")})
Me.XrLabel3.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel3.LocationFloat = New DevExpress.Utils.PointFloat(146.1042!, 78.16664!)
Me.XrLabel3.Multiline = True
Me.XrLabel3.Name = "XrLabel3"
Me.XrLabel3.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel3.SizeF = New System.Drawing.SizeF(144.7917!, 23.0!)
Me.XrLabel3.StylePriority.UseFont = False
Me.XrLabel3.Text = "XrLabel3"
Me.XrLabel3.TextFormatString = "{0:dd.MM.yyyy}"
'
'XrLabel2
'
Me.XrLabel2.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[DatumIn]")})
Me.XrLabel2.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel2.LocationFloat = New DevExpress.Utils.PointFloat(146.1042!, 44.75002!)
Me.XrLabel2.Multiline = True
Me.XrLabel2.Name = "XrLabel2"
Me.XrLabel2.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel2.SizeF = New System.Drawing.SizeF(144.7917!, 23.0!)
Me.XrLabel2.StylePriority.UseFont = False
Me.XrLabel2.Text = "XrLabel2"
Me.XrLabel2.TextFormatString = "{0:dd.MM.yyyy}"
'
'XrLabel1
'
Me.XrLabel1.Font = New System.Drawing.Font("Arial", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel1.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 5.999994!)
Me.XrLabel1.Multiline = True
Me.XrLabel1.Name = "XrLabel1"
Me.XrLabel1.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel1.SizeF = New System.Drawing.SizeF(611.0001!, 25.55338!)
Me.XrLabel1.StyleName = "Title"
Me.XrLabel1.StylePriority.UseFont = False
Me.XrLabel1.Text = "Ergebnisbericht des WISAG e-invoice Portal"
'
'GroupHeaderBand1
'
Me.GroupHeaderBand1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPanel1})
Me.GroupHeaderBand1.GroupUnion = DevExpress.XtraReports.UI.GroupUnion.WithFirstDetail
Me.GroupHeaderBand1.HeightF = 48.0!
Me.GroupHeaderBand1.Name = "GroupHeaderBand1"
'
'XrPanel1
'
Me.XrPanel1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable1})
Me.XrPanel1.LocationFloat = New DevExpress.Utils.PointFloat(6.0!, 0!)
Me.XrPanel1.Name = "XrPanel1"
Me.XrPanel1.SizeF = New System.Drawing.SizeF(617.0001!, 48.0!)
Me.XrPanel1.StyleName = "DetailCaptionBackground3"
'
'XrTable1
'
Me.XrTable1.LocationFloat = New DevExpress.Utils.PointFloat(10.00037!, 9.999974!)
Me.XrTable1.Name = "XrTable1"
Me.XrTable1.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow1})
Me.XrTable1.SizeF = New System.Drawing.SizeF(600.9996!, 38.00005!)
'
'XrTableRow1
'
Me.XrTableRow1.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell18, Me.XrTableCell19, Me.XrTableCell20, Me.XrTableCell21})
Me.XrTableRow1.Name = "XrTableRow1"
Me.XrTableRow1.Weight = 1.0R
'
'XrTableCell18
'
Me.XrTableCell18.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell18.Multiline = True
Me.XrTableCell18.Name = "XrTableCell18"
Me.XrTableCell18.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell18.StyleName = "DetailCaption3"
Me.XrTableCell18.StylePriority.UseFont = False
Me.XrTableCell18.Text = "Prozessschritt"
Me.XrTableCell18.Weight = 0.26013168552048471R
'
'XrTableCell19
'
Me.XrTableCell19.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell19.Multiline = True
Me.XrTableCell19.Name = "XrTableCell19"
Me.XrTableCell19.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell19.StyleName = "DetailCaption3"
Me.XrTableCell19.StylePriority.UseFont = False
Me.XrTableCell19.Text = "Durch"
Me.XrTableCell19.Weight = 0.14516790917579048R
'
'XrTableCell20
'
Me.XrTableCell20.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell20.Multiline = True
Me.XrTableCell20.Name = "XrTableCell20"
Me.XrTableCell20.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell20.StyleName = "DetailCaption3"
Me.XrTableCell20.StylePriority.UseFont = False
Me.XrTableCell20.Text = "Status/An Wen/Änderung"
Me.XrTableCell20.Weight = 0.29950804574617118R
'
'XrTableCell21
'
Me.XrTableCell21.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell21.Multiline = True
Me.XrTableCell21.Name = "XrTableCell21"
Me.XrTableCell21.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell21.StyleName = "DetailCaption3"
Me.XrTableCell21.StylePriority.UseFont = False
Me.XrTableCell21.Text = "Datum" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Uhrzeit"
Me.XrTableCell21.Weight = 0.12041467605851398R
'
'Title
'
Me.Title.BackColor = System.Drawing.Color.Transparent
Me.Title.BorderColor = System.Drawing.Color.Black
Me.Title.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.Title.BorderWidth = 1.0!
Me.Title.Font = New System.Drawing.Font("Tahoma", 14.0!)
Me.Title.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.Title.Name = "Title"
'
'DetailCaption3
'
Me.DetailCaption3.BackColor = System.Drawing.Color.Transparent
Me.DetailCaption3.BorderColor = System.Drawing.Color.Transparent
Me.DetailCaption3.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.DetailCaption3.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.DetailCaption3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.DetailCaption3.Name = "DetailCaption3"
Me.DetailCaption3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailCaption3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailData3
'
Me.DetailData3.Font = New System.Drawing.Font("Tahoma", 8.0!)
Me.DetailData3.ForeColor = System.Drawing.Color.Black
Me.DetailData3.Name = "DetailData3"
Me.DetailData3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailData3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailData3_Odd
'
Me.DetailData3_Odd.BackColor = System.Drawing.Color.FromArgb(CType(CType(231, Byte), Integer), CType(CType(231, Byte), Integer), CType(CType(231, Byte), Integer))
Me.DetailData3_Odd.BorderColor = System.Drawing.Color.Transparent
Me.DetailData3_Odd.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.DetailData3_Odd.BorderWidth = 1.0!
Me.DetailData3_Odd.Font = New System.Drawing.Font("Tahoma", 8.0!)
Me.DetailData3_Odd.ForeColor = System.Drawing.Color.Black
Me.DetailData3_Odd.Name = "DetailData3_Odd"
Me.DetailData3_Odd.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailData3_Odd.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailCaptionBackground3
'
Me.DetailCaptionBackground3.BackColor = System.Drawing.Color.Transparent
Me.DetailCaptionBackground3.BorderColor = System.Drawing.Color.FromArgb(CType(CType(206, Byte), Integer), CType(CType(206, Byte), Integer), CType(CType(206, Byte), Integer))
Me.DetailCaptionBackground3.Borders = DevExpress.XtraPrinting.BorderSide.Top
Me.DetailCaptionBackground3.BorderWidth = 2.0!
Me.DetailCaptionBackground3.Name = "DetailCaptionBackground3"
'
'PageInfo
'
Me.PageInfo.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.PageInfo.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.PageInfo.Name = "PageInfo"
Me.PageInfo.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
'
'XtraReport2
'
Me.Bands.AddRange(New DevExpress.XtraReports.UI.Band() {Me.Detail, Me.TopMargin, Me.BottomMargin, Me.ReportHeaderBand1, Me.GroupHeaderBand1})
Me.ComponentStorage.AddRange(New System.ComponentModel.IComponent() {Me.SqlDataSource1})
Me.DataMember = "VWCUST_RPTERGEBNISBERICHT"
Me.DataSource = Me.SqlDataSource1
Me.Margins = New System.Drawing.Printing.Margins(90, 100, 100, 100)
Me.PageHeight = 1169
Me.PageWidth = 827
Me.PaperKind = System.Drawing.Printing.PaperKind.A4
Me.StyleSheet.AddRange(New DevExpress.XtraReports.UI.XRControlStyle() {Me.Title, Me.DetailCaption3, Me.DetailData3, Me.DetailData3_Odd, Me.DetailCaptionBackground3, Me.PageInfo})
Me.Version = "18.1"
CType(Me.XrTable2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.XrTable1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
Friend WithEvents Detail As DevExpress.XtraReports.UI.DetailBand
Friend WithEvents TopMargin As DevExpress.XtraReports.UI.TopMarginBand
Friend WithEvents BottomMargin As DevExpress.XtraReports.UI.BottomMarginBand
Friend WithEvents XrTable2 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow2 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell40 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell41 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell42 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell43 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrPageInfo1 As DevExpress.XtraReports.UI.XRPageInfo
Friend WithEvents XrPageInfo2 As DevExpress.XtraReports.UI.XRPageInfo
Friend WithEvents SqlDataSource1 As DevExpress.DataAccess.Sql.SqlDataSource
Friend WithEvents ReportHeaderBand1 As DevExpress.XtraReports.UI.ReportHeaderBand
Friend WithEvents XrLabel1 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents GroupHeaderBand1 As DevExpress.XtraReports.UI.GroupHeaderBand
Friend WithEvents XrPanel1 As DevExpress.XtraReports.UI.XRPanel
Friend WithEvents XrTable1 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow1 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell18 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell19 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell20 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell21 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents Title As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailCaption3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailData3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailData3_Odd As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailCaptionBackground3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents PageInfo As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents XrLabel11 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel10 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel9 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel8 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel7 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel6 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel5 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel4 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel3 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel2 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel21 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLine1 As DevExpress.XtraReports.UI.XRLine
Friend WithEvents XrLabel20 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel19 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel18 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel17 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel16 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel15 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel14 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel13 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel12 As DevExpress.XtraReports.UI.XRLabel
End Class

151
WISAG_PM_REPORT/XtraReport2.resx Normal file
View File

@@ -0,0 +1,151 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="SqlDataSource1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<data name="CustomSqlQuery1.Sql" xml:space="preserve">
<value>select "VWCUST_RPTERGEBNISBERICHT"."DocID",
"VWCUST_RPTERGEBNISBERICHT"."DatumIn",
"VWCUST_RPTERGEBNISBERICHT"."Belegdatum",
"VWCUST_RPTERGEBNISBERICHT"."KreditorNummer",
"VWCUST_RPTERGEBNISBERICHT"."KreditorName_Lang",
"VWCUST_RPTERGEBNISBERICHT"."KreditorName",
"VWCUST_RPTERGEBNISBERICHT"."RechnungNr",
"VWCUST_RPTERGEBNISBERICHT"."Referenz",
"VWCUST_RPTERGEBNISBERICHT"."Nettobetrag",
"VWCUST_RPTERGEBNISBERICHT"."Bruttobetrag",
"VWCUST_RPTERGEBNISBERICHT"."Zahlungsziel",
"VWCUST_RPTERGEBNISBERICHT"."Mandant",
"VWCUST_RPTERGEBNISBERICHT"."Mandant Name",
"VWCUST_RPTERGEBNISBERICHT"."Kostenstelle",
"VWCUST_RPTERGEBNISBERICHT"."BestellNr",
"VWCUST_RPTERGEBNISBERICHT"."Absender",
"VWCUST_RPTERGEBNISBERICHT"."Finaler Freigeber",
"VWCUST_RPTERGEBNISBERICHT"."Prozessschritt",
"VWCUST_RPTERGEBNISBERICHT"."Durch",
"VWCUST_RPTERGEBNISBERICHT"."Status_Change",
"VWCUST_RPTERGEBNISBERICHT"."wannPos",
"VWCUST_RPTERGEBNISBERICHT"."Kommentar"
from "dbo"."VWCUST_RPTERGEBNISBERICHT" "VWCUST_RPTERGEBNISBERICHT" ORDER BY wannPos desc</value>
</data>
<data name="SqlDataSource1.ResultSchemaSerializable" xml:space="preserve">
<value>PERhdGFTZXQgTmFtZT0iU3FsRGF0YVNvdXJjZTEiPjxWaWV3IE5hbWU9IlZXQ1VTVF9SUFRFUkdFQk5JU0JFUklDSFQiPjxGaWVsZCBOYW1lPSJEb2NJRCIgVHlwZT0iSW50MzIiIC8+PEZpZWxkIE5hbWU9IkRhdHVtSW4iIFR5cGU9IlN0cmluZyIgLz48RmllbGQgTmFtZT0iQmVsZWdkYXR1bSIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJLcmVkaXRvck51bW1lciIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJLcmVkaXRvck5hbWVfTGFuZyIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJLcmVkaXRvck5hbWUiIFR5cGU9IlN0cmluZyIgLz48RmllbGQgTmFtZT0iUmVjaG51bmdOciIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJSZWZlcmVueiIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJOZXR0b2JldHJhZyIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJCcnV0dG9iZXRyYWciIFR5cGU9IlN0cmluZyIgLz48RmllbGQgTmFtZT0iWmFobHVuZ3N6aWVsIiBUeXBlPSJTdHJpbmciIC8+PEZpZWxkIE5hbWU9Ik1hbmRhbnQiIFR5cGU9IlN0cmluZyIgLz48RmllbGQgTmFtZT0iTWFuZGFudCBOYW1lIiBUeXBlPSJTdHJpbmciIC8+PEZpZWxkIE5hbWU9Iktvc3RlbnN0ZWxsZSIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJCZXN0ZWxsTnIiIFR5cGU9IlN0cmluZyIgLz48RmllbGQgTmFtZT0iQWJzZW5kZXIiIFR5cGU9IlN0cmluZyIgLz48RmllbGQgTmFtZT0iRmluYWxlciBGcmVpZ2ViZXIiIFR5cGU9IlN0cmluZyIgLz48RmllbGQgTmFtZT0iUHJvemVzc3NjaHJpdHQiIFR5cGU9IlN0cmluZyIgLz48RmllbGQgTmFtZT0iRHVyY2giIFR5cGU9IlN0cmluZyIgLz48RmllbGQgTmFtZT0iU3RhdHVzX0NoYW5nZSIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJ3YW5uUG9zIiBUeXBlPSJEYXRlVGltZSIgLz48RmllbGQgTmFtZT0iS29tbWVudGFyIiBUeXBlPSJTdHJpbmciIC8+PC9WaWV3PjwvRGF0YVNldD4=</value>
</data>
</root>

3
WISAG_PM_REPORT/XtraReport2.vb Normal file
View File

@@ -0,0 +1,3 @@
Public Class XtraReport2
End Class

707
WISAG_PM_REPORT/XtraReport3.Designer.vb generated Normal file
View File

@@ -0,0 +1,707 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Public Class XtraReport3
Inherits DevExpress.XtraReports.UI.XtraReport
'XtraReport overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
MyBase.Dispose(disposing)
End Sub
'Required by the Designer
Private components As System.ComponentModel.IContainer
'NOTE: The following procedure is required by the Designer
'It can be modified using the Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim ObjectConstructorInfo1 As DevExpress.DataAccess.ObjectBinding.ObjectConstructorInfo = New DevExpress.DataAccess.ObjectBinding.ObjectConstructorInfo()
Dim Parameter1 As DevExpress.DataAccess.ObjectBinding.Parameter = New DevExpress.DataAccess.ObjectBinding.Parameter()
Me.Detail = New DevExpress.XtraReports.UI.DetailBand()
Me.XrTable4 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow4 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell36 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell37 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell38 = New DevExpress.XtraReports.UI.XRTableCell()
Me.TopMargin = New DevExpress.XtraReports.UI.TopMarginBand()
Me.BottomMargin = New DevExpress.XtraReports.UI.BottomMarginBand()
Me.XrPageInfo1 = New DevExpress.XtraReports.UI.XRPageInfo()
Me.XrPageInfo2 = New DevExpress.XtraReports.UI.XRPageInfo()
Me.ObjectDataSource1 = New DevExpress.DataAccess.ObjectBinding.ObjectDataSource(Me.components)
Me.ReportHeaderBand1 = New DevExpress.XtraReports.UI.ReportHeaderBand()
Me.XrLabel17 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel16 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel15 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel14 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel13 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel12 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel11 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel10 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel9 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel8 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel7 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel6 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel5 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel4 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel3 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel1 = New DevExpress.XtraReports.UI.XRLabel()
Me.GroupHeaderBand1 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.XrTable1 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow1 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell1 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell2 = New DevExpress.XtraReports.UI.XRTableCell()
Me.GroupHeaderBand2 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.XrTable2 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow2 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell3 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell4 = New DevExpress.XtraReports.UI.XRTableCell()
Me.GroupHeaderBand3 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.XrPanel1 = New DevExpress.XtraReports.UI.XRPanel()
Me.XrTable3 = New DevExpress.XtraReports.UI.XRTable()
Me.XrTableRow3 = New DevExpress.XtraReports.UI.XRTableRow()
Me.XrTableCell19 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell20 = New DevExpress.XtraReports.UI.XRTableCell()
Me.XrTableCell21 = New DevExpress.XtraReports.UI.XRTableCell()
Me.GroupFooterBand1 = New DevExpress.XtraReports.UI.GroupFooterBand()
Me.XrLabel2 = New DevExpress.XtraReports.UI.XRLabel()
Me.Title = New DevExpress.XtraReports.UI.XRControlStyle()
Me.GroupCaption3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.GroupData3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailCaption3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailData3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailData3_Odd = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DetailCaptionBackground3 = New DevExpress.XtraReports.UI.XRControlStyle()
Me.PageInfo = New DevExpress.XtraReports.UI.XRControlStyle()
CType(Me.XrTable4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ObjectDataSource1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XrTable1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XrTable2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XrTable3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'Detail
'
Me.Detail.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable4})
Me.Detail.HeightF = 25.0!
Me.Detail.Name = "Detail"
Me.Detail.Padding = New DevExpress.XtraPrinting.PaddingInfo(0, 0, 0, 0, 100.0!)
Me.Detail.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
'
'XrTable4
'
Me.XrTable4.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 0!)
Me.XrTable4.Name = "XrTable4"
Me.XrTable4.OddStyleName = "DetailData3_Odd"
Me.XrTable4.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow4})
Me.XrTable4.SizeF = New System.Drawing.SizeF(644.0!, 25.0!)
'
'XrTableRow4
'
Me.XrTableRow4.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell36, Me.XrTableCell37, Me.XrTableCell38})
Me.XrTableRow4.Name = "XrTableRow4"
Me.XrTableRow4.Weight = 11.5R
'
'XrTableCell36
'
Me.XrTableCell36.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[FG_Email]")})
Me.XrTableCell36.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell36.Multiline = True
Me.XrTableCell36.Name = "XrTableCell36"
Me.XrTableCell36.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell36.StyleName = "DetailData3"
Me.XrTableCell36.StylePriority.UseFont = False
Me.XrTableCell36.Text = "XrTableCell36"
Me.XrTableCell36.Weight = 0.48376485221562221R
'
'XrTableCell37
'
Me.XrTableCell37.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[FG_Freigabe]")})
Me.XrTableCell37.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell37.Multiline = True
Me.XrTableCell37.Name = "XrTableCell37"
Me.XrTableCell37.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell37.StyleName = "DetailData3"
Me.XrTableCell37.StylePriority.UseFont = False
Me.XrTableCell37.Text = "XrTableCell37"
Me.XrTableCell37.Weight = 0.15464052731818409R
'
'XrTableCell38
'
Me.XrTableCell38.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[FG_Wann]")})
Me.XrTableCell38.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell38.Multiline = True
Me.XrTableCell38.Name = "XrTableCell38"
Me.XrTableCell38.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell38.StyleName = "DetailData3"
Me.XrTableCell38.StylePriority.UseFont = False
Me.XrTableCell38.Text = "XrTableCell38"
Me.XrTableCell38.TextFormatString = "{0:dd.MM.yyyy HH:mm}"
Me.XrTableCell38.Weight = 0.28555169477860864R
'
'TopMargin
'
Me.TopMargin.Name = "TopMargin"
Me.TopMargin.Padding = New DevExpress.XtraPrinting.PaddingInfo(0, 0, 0, 0, 100.0!)
Me.TopMargin.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
'
'BottomMargin
'
Me.BottomMargin.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPageInfo1, Me.XrPageInfo2})
Me.BottomMargin.Name = "BottomMargin"
Me.BottomMargin.Padding = New DevExpress.XtraPrinting.PaddingInfo(0, 0, 0, 0, 100.0!)
Me.BottomMargin.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
'
'XrPageInfo1
'
Me.XrPageInfo1.Font = New System.Drawing.Font("Arial Narrow", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrPageInfo1.LocationFloat = New DevExpress.Utils.PointFloat(6.0!, 6.0!)
Me.XrPageInfo1.Name = "XrPageInfo1"
Me.XrPageInfo1.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrPageInfo1.PageInfo = DevExpress.XtraPrinting.PageInfo.DateTime
Me.XrPageInfo1.SizeF = New System.Drawing.SizeF(313.0!, 23.0!)
Me.XrPageInfo1.StyleName = "PageInfo"
Me.XrPageInfo1.StylePriority.UseFont = False
'
'XrPageInfo2
'
Me.XrPageInfo2.Font = New System.Drawing.Font("Arial Narrow", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrPageInfo2.LocationFloat = New DevExpress.Utils.PointFloat(331.0!, 6.0!)
Me.XrPageInfo2.Name = "XrPageInfo2"
Me.XrPageInfo2.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrPageInfo2.SizeF = New System.Drawing.SizeF(313.0!, 23.0!)
Me.XrPageInfo2.StyleName = "PageInfo"
Me.XrPageInfo2.StylePriority.UseFont = False
Me.XrPageInfo2.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopRight
Me.XrPageInfo2.TextFormatString = "Seite {0} von {1}"
'
'ObjectDataSource1
'
Me.ObjectDataSource1.Constructor = ObjectConstructorInfo1
Me.ObjectDataSource1.DataMember = "GetData"
Me.ObjectDataSource1.DataSource = GetType(WISAG_PM_REPORT.MyDatasetTableAdapters.VWCUST_RPTPM_UNION1TableAdapter)
Me.ObjectDataSource1.Name = "ObjectDataSource1"
Parameter1.Name = "DocID"
Parameter1.Type = GetType(System.Nullable(Of Long))
Parameter1.ValueInfo = "2894"
Me.ObjectDataSource1.Parameters.AddRange(New DevExpress.DataAccess.ObjectBinding.Parameter() {Parameter1})
'
'ReportHeaderBand1
'
Me.ReportHeaderBand1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrLabel17, Me.XrLabel16, Me.XrLabel15, Me.XrLabel14, Me.XrLabel13, Me.XrLabel12, Me.XrLabel11, Me.XrLabel10, Me.XrLabel9, Me.XrLabel8, Me.XrLabel7, Me.XrLabel6, Me.XrLabel5, Me.XrLabel4, Me.XrLabel3, Me.XrLabel1})
Me.ReportHeaderBand1.HeightF = 241.25!
Me.ReportHeaderBand1.Name = "ReportHeaderBand1"
'
'XrLabel17
'
Me.XrLabel17.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel17.LocationFloat = New DevExpress.Utils.PointFloat(316.1523!, 83.95837!)
Me.XrLabel17.Multiline = True
Me.XrLabel17.Name = "XrLabel17"
Me.XrLabel17.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel17.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel17.StylePriority.UseFont = False
Me.XrLabel17.Text = "Mandant:"
'
'XrLabel16
'
Me.XrLabel16.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel16.LocationFloat = New DevExpress.Utils.PointFloat(316.1523!, 43.70832!)
Me.XrLabel16.Multiline = True
Me.XrLabel16.Name = "XrLabel16"
Me.XrLabel16.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel16.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel16.StylePriority.UseFont = False
Me.XrLabel16.Text = "Belegnummer:"
'
'XrLabel15
'
Me.XrLabel15.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel15.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 212.7084!)
Me.XrLabel15.Multiline = True
Me.XrLabel15.Name = "XrLabel15"
Me.XrLabel15.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel15.SizeF = New System.Drawing.SizeF(118.9569!, 23.0!)
Me.XrLabel15.StylePriority.UseFont = False
Me.XrLabel15.Text = "Kreditorname:"
'
'XrLabel14
'
Me.XrLabel14.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel14.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 153.1667!)
Me.XrLabel14.Multiline = True
Me.XrLabel14.Name = "XrLabel14"
Me.XrLabel14.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel14.SizeF = New System.Drawing.SizeF(118.9569!, 23.0!)
Me.XrLabel14.StylePriority.UseFont = False
Me.XrLabel14.Text = "Kreditornummer:"
'
'XrLabel13
'
Me.XrLabel13.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel13.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 118.9584!)
Me.XrLabel13.Multiline = True
Me.XrLabel13.Name = "XrLabel13"
Me.XrLabel13.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel13.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel13.StylePriority.UseFont = False
Me.XrLabel13.Text = "Referenz:"
'
'XrLabel12
'
Me.XrLabel12.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel12.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 83.95837!)
Me.XrLabel12.Multiline = True
Me.XrLabel12.Name = "XrLabel12"
Me.XrLabel12.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel12.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel12.StylePriority.UseFont = False
Me.XrLabel12.Text = "Belegdatum:"
'
'XrLabel11
'
Me.XrLabel11.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel11.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 43.70832!)
Me.XrLabel11.Multiline = True
Me.XrLabel11.Name = "XrLabel11"
Me.XrLabel11.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel11.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel11.StylePriority.UseFont = False
Me.XrLabel11.Text = "Eingang:"
'
'XrLabel10
'
Me.XrLabel10.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[KreditorName_Lang]")})
Me.XrLabel10.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel10.LocationFloat = New DevExpress.Utils.PointFloat(124.9569!, 212.7084!)
Me.XrLabel10.Multiline = True
Me.XrLabel10.Name = "XrLabel10"
Me.XrLabel10.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel10.SizeF = New System.Drawing.SizeF(452.4882!, 23.0!)
Me.XrLabel10.StylePriority.UseFont = False
Me.XrLabel10.Text = "XrLabel10"
'
'XrLabel9
'
Me.XrLabel9.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[KreditorNummer]")})
Me.XrLabel9.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel9.LocationFloat = New DevExpress.Utils.PointFloat(124.9569!, 153.1667!)
Me.XrLabel9.Multiline = True
Me.XrLabel9.Name = "XrLabel9"
Me.XrLabel9.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel9.SizeF = New System.Drawing.SizeF(270.5035!, 23.0!)
Me.XrLabel9.StylePriority.UseFont = False
Me.XrLabel9.Text = "XrLabel9"
'
'XrLabel8
'
Me.XrLabel8.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Mandant Name]")})
Me.XrLabel8.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel8.LocationFloat = New DevExpress.Utils.PointFloat(430.5702!, 118.9584!)
Me.XrLabel8.Multiline = True
Me.XrLabel8.Name = "XrLabel8"
Me.XrLabel8.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel8.SizeF = New System.Drawing.SizeF(213.4298!, 22.99999!)
Me.XrLabel8.StylePriority.UseFont = False
Me.XrLabel8.Text = "XrLabel8"
'
'XrLabel7
'
Me.XrLabel7.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Mandant]")})
Me.XrLabel7.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel7.LocationFloat = New DevExpress.Utils.PointFloat(430.5702!, 83.95837!)
Me.XrLabel7.Multiline = True
Me.XrLabel7.Name = "XrLabel7"
Me.XrLabel7.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel7.SizeF = New System.Drawing.SizeF(100.0!, 23.0!)
Me.XrLabel7.StylePriority.UseFont = False
Me.XrLabel7.Text = "XrLabel7"
'
'XrLabel6
'
Me.XrLabel6.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[RechnungNr]")})
Me.XrLabel6.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel6.LocationFloat = New DevExpress.Utils.PointFloat(430.5702!, 43.70832!)
Me.XrLabel6.Multiline = True
Me.XrLabel6.Name = "XrLabel6"
Me.XrLabel6.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel6.SizeF = New System.Drawing.SizeF(213.4298!, 23.0!)
Me.XrLabel6.StylePriority.UseFont = False
Me.XrLabel6.Text = "XrLabel6"
'
'XrLabel5
'
Me.XrLabel5.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Referenz]")})
Me.XrLabel5.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel5.LocationFloat = New DevExpress.Utils.PointFloat(124.9569!, 118.9584!)
Me.XrLabel5.Multiline = True
Me.XrLabel5.Name = "XrLabel5"
Me.XrLabel5.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel5.SizeF = New System.Drawing.SizeF(160.9448!, 22.99999!)
Me.XrLabel5.StylePriority.UseFont = False
Me.XrLabel5.Text = "XrLabel5"
'
'XrLabel4
'
Me.XrLabel4.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Belegdatum]")})
Me.XrLabel4.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel4.LocationFloat = New DevExpress.Utils.PointFloat(124.9569!, 83.95837!)
Me.XrLabel4.Multiline = True
Me.XrLabel4.Name = "XrLabel4"
Me.XrLabel4.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel4.SizeF = New System.Drawing.SizeF(160.9448!, 23.0!)
Me.XrLabel4.StylePriority.UseFont = False
Me.XrLabel4.Text = "XrLabel4"
Me.XrLabel4.TextFormatString = "{0:dd.MM.yyyy}"
'
'XrLabel3
'
Me.XrLabel3.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[Erhalten wann]")})
Me.XrLabel3.Font = New System.Drawing.Font("Arial", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel3.LocationFloat = New DevExpress.Utils.PointFloat(124.9569!, 43.70832!)
Me.XrLabel3.Multiline = True
Me.XrLabel3.Name = "XrLabel3"
Me.XrLabel3.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel3.SizeF = New System.Drawing.SizeF(160.9448!, 23.0!)
Me.XrLabel3.StylePriority.UseFont = False
Me.XrLabel3.Text = "XrLabel3"
Me.XrLabel3.TextFormatString = "{0:dd.MM.yyyy}"
'
'XrLabel1
'
Me.XrLabel1.Font = New System.Drawing.Font("Arial", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel1.LocationFloat = New DevExpress.Utils.PointFloat(6.0!, 6.0!)
Me.XrLabel1.Multiline = True
Me.XrLabel1.Name = "XrLabel1"
Me.XrLabel1.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel1.SizeF = New System.Drawing.SizeF(638.0!, 25.55338!)
Me.XrLabel1.StyleName = "Title"
Me.XrLabel1.StylePriority.UseFont = False
Me.XrLabel1.Text = "Ergebnisbericht FeRDinand"
'
'GroupHeaderBand1
'
Me.GroupHeaderBand1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable1})
Me.GroupHeaderBand1.GroupFields.AddRange(New DevExpress.XtraReports.UI.GroupField() {New DevExpress.XtraReports.UI.GroupField("GroupTypeID", DevExpress.XtraReports.UI.XRColumnSortOrder.Ascending)})
Me.GroupHeaderBand1.GroupUnion = DevExpress.XtraReports.UI.GroupUnion.WithFirstDetail
Me.GroupHeaderBand1.HeightF = 44.79167!
Me.GroupHeaderBand1.Level = 1
Me.GroupHeaderBand1.Name = "GroupHeaderBand1"
'
'XrTable1
'
Me.XrTable1.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0!)
Me.XrTable1.Name = "XrTable1"
Me.XrTable1.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow1})
Me.XrTable1.SizeF = New System.Drawing.SizeF(650.0!, 34.79169!)
'
'XrTableRow1
'
Me.XrTableRow1.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell1, Me.XrTableCell2})
Me.XrTableRow1.Name = "XrTableRow1"
Me.XrTableRow1.Weight = 1.0R
'
'XrTableCell1
'
Me.XrTableCell1.Font = New System.Drawing.Font("Arial Narrow", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell1.Multiline = True
Me.XrTableCell1.Name = "XrTableCell1"
Me.XrTableCell1.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell1.StyleName = "GroupCaption3"
Me.XrTableCell1.StylePriority.UseFont = False
Me.XrTableCell1.StylePriority.UseTextAlignment = False
Me.XrTableCell1.Text = "Freigabe-" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Schritt:"
Me.XrTableCell1.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
Me.XrTableCell1.Weight = 0.17021859975961537R
'
'XrTableCell2
'
Me.XrTableCell2.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[GroupType]")})
Me.XrTableCell2.Font = New System.Drawing.Font("Arial Narrow", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell2.Multiline = True
Me.XrTableCell2.Name = "XrTableCell2"
Me.XrTableCell2.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell2.StyleName = "GroupData3"
Me.XrTableCell2.StylePriority.UseFont = False
Me.XrTableCell2.StylePriority.UseTextAlignment = False
Me.XrTableCell2.Text = "XrTableCell2"
Me.XrTableCell2.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
Me.XrTableCell2.Weight = 0.8297814002403846R
'
'GroupHeaderBand2
'
Me.GroupHeaderBand2.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable2})
Me.GroupHeaderBand2.GroupFields.AddRange(New DevExpress.XtraReports.UI.GroupField() {New DevExpress.XtraReports.UI.GroupField("DOC_ID", DevExpress.XtraReports.UI.XRColumnSortOrder.Ascending)})
Me.GroupHeaderBand2.GroupUnion = DevExpress.XtraReports.UI.GroupUnion.WithFirstDetail
Me.GroupHeaderBand2.HeightF = 25.0!
Me.GroupHeaderBand2.Level = 2
Me.GroupHeaderBand2.Name = "GroupHeaderBand2"
Me.GroupHeaderBand2.Visible = False
'
'XrTable2
'
Me.XrTable2.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0!)
Me.XrTable2.Name = "XrTable2"
Me.XrTable2.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow2})
Me.XrTable2.SizeF = New System.Drawing.SizeF(650.0!, 25.0!)
'
'XrTableRow2
'
Me.XrTableRow2.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell3, Me.XrTableCell4})
Me.XrTableRow2.Name = "XrTableRow2"
Me.XrTableRow2.Weight = 1.0R
'
'XrTableCell3
'
Me.XrTableCell3.Multiline = True
Me.XrTableCell3.Name = "XrTableCell3"
Me.XrTableCell3.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell3.StyleName = "GroupCaption3"
Me.XrTableCell3.Text = "DOC ID"
Me.XrTableCell3.Weight = 0.076042996920072117R
'
'XrTableCell4
'
Me.XrTableCell4.ExpressionBindings.AddRange(New DevExpress.XtraReports.UI.ExpressionBinding() {New DevExpress.XtraReports.UI.ExpressionBinding("BeforePrint", "Text", "[DOC_ID]")})
Me.XrTableCell4.Multiline = True
Me.XrTableCell4.Name = "XrTableCell4"
Me.XrTableCell4.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell4.StyleName = "GroupData3"
Me.XrTableCell4.Text = "XrTableCell4"
Me.XrTableCell4.Weight = 0.92395695612980766R
'
'GroupHeaderBand3
'
Me.GroupHeaderBand3.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPanel1})
Me.GroupHeaderBand3.GroupUnion = DevExpress.XtraReports.UI.GroupUnion.WithFirstDetail
Me.GroupHeaderBand3.HeightF = 48.0!
Me.GroupHeaderBand3.Level = 3
Me.GroupHeaderBand3.Name = "GroupHeaderBand3"
'
'XrPanel1
'
Me.XrPanel1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrTable3})
Me.XrPanel1.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0!)
Me.XrPanel1.Name = "XrPanel1"
Me.XrPanel1.SizeF = New System.Drawing.SizeF(650.0!, 48.0!)
Me.XrPanel1.StyleName = "DetailCaptionBackground3"
'
'XrTable3
'
Me.XrTable3.LocationFloat = New DevExpress.Utils.PointFloat(6.00001!, 20.00001!)
Me.XrTable3.Name = "XrTable3"
Me.XrTable3.Rows.AddRange(New DevExpress.XtraReports.UI.XRTableRow() {Me.XrTableRow3})
Me.XrTable3.SizeF = New System.Drawing.SizeF(643.9999!, 28.0!)
'
'XrTableRow3
'
Me.XrTableRow3.Cells.AddRange(New DevExpress.XtraReports.UI.XRTableCell() {Me.XrTableCell19, Me.XrTableCell20, Me.XrTableCell21})
Me.XrTableRow3.Name = "XrTableRow3"
Me.XrTableRow3.Weight = 1.0R
'
'XrTableCell19
'
Me.XrTableCell19.Font = New System.Drawing.Font("Arial Narrow", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell19.Multiline = True
Me.XrTableCell19.Name = "XrTableCell19"
Me.XrTableCell19.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell19.StyleName = "DetailCaption3"
Me.XrTableCell19.StylePriority.UseFont = False
Me.XrTableCell19.Text = "Email-Adresse"
Me.XrTableCell19.Weight = 0.074943914371077724R
'
'XrTableCell20
'
Me.XrTableCell20.Font = New System.Drawing.Font("Arial Narrow", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell20.Multiline = True
Me.XrTableCell20.Name = "XrTableCell20"
Me.XrTableCell20.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell20.StyleName = "DetailCaption3"
Me.XrTableCell20.StylePriority.UseFont = False
Me.XrTableCell20.Text = "Ja/Nein"
Me.XrTableCell20.Weight = 0.023956610648641317R
'
'XrTableCell21
'
Me.XrTableCell21.Font = New System.Drawing.Font("Arial Narrow", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrTableCell21.Multiline = True
Me.XrTableCell21.Name = "XrTableCell21"
Me.XrTableCell21.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrTableCell21.StyleName = "DetailCaption3"
Me.XrTableCell21.StylePriority.UseFont = False
Me.XrTableCell21.Text = "Datum Uhrzeit"
Me.XrTableCell21.Weight = 0.044237089890700118R
'
'GroupFooterBand1
'
Me.GroupFooterBand1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrLabel2})
Me.GroupFooterBand1.GroupUnion = DevExpress.XtraReports.UI.GroupFooterUnion.WithLastDetail
Me.GroupFooterBand1.HeightF = 6.0!
Me.GroupFooterBand1.Name = "GroupFooterBand1"
'
'XrLabel2
'
Me.XrLabel2.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.XrLabel2.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0!)
Me.XrLabel2.Multiline = True
Me.XrLabel2.Name = "XrLabel2"
Me.XrLabel2.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel2.SizeF = New System.Drawing.SizeF(650.0!, 2.08!)
Me.XrLabel2.StyleName = "GroupCaption3"
Me.XrLabel2.StylePriority.UseBorders = False
'
'Title
'
Me.Title.BackColor = System.Drawing.Color.Transparent
Me.Title.BorderColor = System.Drawing.Color.Black
Me.Title.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.Title.BorderWidth = 1.0!
Me.Title.Font = New System.Drawing.Font("Tahoma", 14.0!)
Me.Title.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.Title.Name = "Title"
'
'GroupCaption3
'
Me.GroupCaption3.BackColor = System.Drawing.Color.FromArgb(CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer))
Me.GroupCaption3.BorderColor = System.Drawing.Color.White
Me.GroupCaption3.Borders = DevExpress.XtraPrinting.BorderSide.Bottom
Me.GroupCaption3.BorderWidth = 2.0!
Me.GroupCaption3.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.GroupCaption3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(228, Byte), Integer), CType(CType(228, Byte), Integer), CType(CType(228, Byte), Integer))
Me.GroupCaption3.Name = "GroupCaption3"
Me.GroupCaption3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 2, 0, 0, 100.0!)
Me.GroupCaption3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'GroupData3
'
Me.GroupData3.BackColor = System.Drawing.Color.FromArgb(CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer), CType(CType(137, Byte), Integer))
Me.GroupData3.BorderColor = System.Drawing.Color.White
Me.GroupData3.Borders = DevExpress.XtraPrinting.BorderSide.Bottom
Me.GroupData3.BorderWidth = 2.0!
Me.GroupData3.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.GroupData3.ForeColor = System.Drawing.Color.White
Me.GroupData3.Name = "GroupData3"
Me.GroupData3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 2, 0, 0, 100.0!)
Me.GroupData3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailCaption3
'
Me.DetailCaption3.BackColor = System.Drawing.Color.Transparent
Me.DetailCaption3.BorderColor = System.Drawing.Color.Transparent
Me.DetailCaption3.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.DetailCaption3.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.DetailCaption3.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.DetailCaption3.Name = "DetailCaption3"
Me.DetailCaption3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailCaption3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailData3
'
Me.DetailData3.Font = New System.Drawing.Font("Tahoma", 8.0!)
Me.DetailData3.ForeColor = System.Drawing.Color.Black
Me.DetailData3.Name = "DetailData3"
Me.DetailData3.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailData3.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailData3_Odd
'
Me.DetailData3_Odd.BackColor = System.Drawing.Color.FromArgb(CType(CType(231, Byte), Integer), CType(CType(231, Byte), Integer), CType(CType(231, Byte), Integer))
Me.DetailData3_Odd.BorderColor = System.Drawing.Color.Transparent
Me.DetailData3_Odd.Borders = DevExpress.XtraPrinting.BorderSide.None
Me.DetailData3_Odd.BorderWidth = 1.0!
Me.DetailData3_Odd.Font = New System.Drawing.Font("Tahoma", 8.0!)
Me.DetailData3_Odd.ForeColor = System.Drawing.Color.Black
Me.DetailData3_Odd.Name = "DetailData3_Odd"
Me.DetailData3_Odd.Padding = New DevExpress.XtraPrinting.PaddingInfo(6, 6, 0, 0, 100.0!)
Me.DetailData3_Odd.TextAlignment = DevExpress.XtraPrinting.TextAlignment.MiddleLeft
'
'DetailCaptionBackground3
'
Me.DetailCaptionBackground3.BackColor = System.Drawing.Color.Transparent
Me.DetailCaptionBackground3.BorderColor = System.Drawing.Color.FromArgb(CType(CType(206, Byte), Integer), CType(CType(206, Byte), Integer), CType(CType(206, Byte), Integer))
Me.DetailCaptionBackground3.Borders = DevExpress.XtraPrinting.BorderSide.Top
Me.DetailCaptionBackground3.BorderWidth = 2.0!
Me.DetailCaptionBackground3.Name = "DetailCaptionBackground3"
'
'PageInfo
'
Me.PageInfo.Font = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.PageInfo.ForeColor = System.Drawing.Color.FromArgb(CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer), CType(CType(75, Byte), Integer))
Me.PageInfo.Name = "PageInfo"
Me.PageInfo.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
'
'XtraReport3
'
Me.Bands.AddRange(New DevExpress.XtraReports.UI.Band() {Me.Detail, Me.TopMargin, Me.BottomMargin, Me.ReportHeaderBand1, Me.GroupHeaderBand1, Me.GroupHeaderBand2, Me.GroupHeaderBand3, Me.GroupFooterBand1})
Me.ComponentStorage.AddRange(New System.ComponentModel.IComponent() {Me.ObjectDataSource1})
Me.DataSource = Me.ObjectDataSource1
Me.StyleSheet.AddRange(New DevExpress.XtraReports.UI.XRControlStyle() {Me.Title, Me.GroupCaption3, Me.GroupData3, Me.DetailCaption3, Me.DetailData3, Me.DetailData3_Odd, Me.DetailCaptionBackground3, Me.PageInfo})
Me.Version = "18.1"
CType(Me.XrTable4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ObjectDataSource1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.XrTable1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.XrTable2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.XrTable3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
Friend WithEvents Detail As DevExpress.XtraReports.UI.DetailBand
Friend WithEvents TopMargin As DevExpress.XtraReports.UI.TopMarginBand
Friend WithEvents BottomMargin As DevExpress.XtraReports.UI.BottomMarginBand
Friend WithEvents XrTable4 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow4 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell36 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell37 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell38 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrPageInfo1 As DevExpress.XtraReports.UI.XRPageInfo
Friend WithEvents XrPageInfo2 As DevExpress.XtraReports.UI.XRPageInfo
Friend WithEvents ObjectDataSource1 As DevExpress.DataAccess.ObjectBinding.ObjectDataSource
Friend WithEvents ReportHeaderBand1 As DevExpress.XtraReports.UI.ReportHeaderBand
Friend WithEvents XrLabel1 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents GroupHeaderBand1 As DevExpress.XtraReports.UI.GroupHeaderBand
Friend WithEvents XrTable1 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow1 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell1 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell2 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents GroupHeaderBand2 As DevExpress.XtraReports.UI.GroupHeaderBand
Friend WithEvents XrTable2 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow2 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell3 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell4 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents GroupHeaderBand3 As DevExpress.XtraReports.UI.GroupHeaderBand
Friend WithEvents XrPanel1 As DevExpress.XtraReports.UI.XRPanel
Friend WithEvents XrTable3 As DevExpress.XtraReports.UI.XRTable
Friend WithEvents XrTableRow3 As DevExpress.XtraReports.UI.XRTableRow
Friend WithEvents XrTableCell19 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell20 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents XrTableCell21 As DevExpress.XtraReports.UI.XRTableCell
Friend WithEvents GroupFooterBand1 As DevExpress.XtraReports.UI.GroupFooterBand
Friend WithEvents XrLabel2 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents Title As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents GroupCaption3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents GroupData3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailCaption3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailData3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailData3_Odd As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents DetailCaptionBackground3 As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents PageInfo As DevExpress.XtraReports.UI.XRControlStyle
Friend WithEvents XrLabel3 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel17 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel16 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel15 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel14 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel13 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel12 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel11 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel10 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel9 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel8 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel7 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel6 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel5 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel4 As DevExpress.XtraReports.UI.XRLabel
End Class

123
WISAG_PM_REPORT/XtraReport3.resx Normal file
View File

@@ -0,0 +1,123 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="ObjectDataSource1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
</root>

9
WISAG_PM_REPORT/XtraReport3.vb Normal file
View File

@@ -0,0 +1,9 @@
Public Class XtraReport3
Private Sub GroupHeaderBand3_BeforePrint(sender As Object, e As Printing.PrintEventArgs) Handles GroupHeaderBand3.BeforePrint, Detail.BeforePrint, GroupHeaderBand1.BeforePrint
Dim oGroupType As String = GetCurrentColumnValue("GroupType")
Dim oGroupTypeID As Integer = GetCurrentColumnValue("GroupTypeID")
If oGroupType = "HEAD" Then
e.Cancel = True
End If
End Sub
End Class