@ -0,0 +1,8 @@
|
|||||||
|
touch README.md
|
||||||
|
git init
|
||||||
|
git checkout -b main
|
||||||
|
git add README.md
|
||||||
|
git commit -m "first commit"
|
||||||
|
git remote add origin https://gitea.shubweb.ch/shu/Logbuch.git
|
||||||
|
git push -u origin main
|
||||||
|
pause
|
||||||
@ -0,0 +1,123 @@
|
|||||||
|
{
|
||||||
|
"Version": 1,
|
||||||
|
"WorkspaceRootPath": "E:\\Software-Projekte\\TKBDiverse\\Logbuch\\Logbuch\\",
|
||||||
|
"Documents": [
|
||||||
|
{
|
||||||
|
"AbsoluteMoniker": "D:0:0:{8A404216-38A9-4305-9BA2-04CD2AC20F32}|Logbuch\\Logbuch.vbproj|e:\\software-projekte\\tkbdiverse\\logbuch\\logbuch\\logbuch\\logbuch\\frmschuldbrief.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
|
||||||
|
"RelativeMoniker": "D:0:0:{8A404216-38A9-4305-9BA2-04CD2AC20F32}|Logbuch\\Logbuch.vbproj|solutionrelative:logbuch\\logbuch\\frmschuldbrief.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"AbsoluteMoniker": "D:0:0:{8A404216-38A9-4305-9BA2-04CD2AC20F32}|Logbuch\\Logbuch.vbproj|E:\\Software-Projekte\\TKBDiverse\\Logbuch\\Logbuch\\logbuch\\logbuch\\frmschuldbrief.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
|
||||||
|
"RelativeMoniker": "D:0:0:{8A404216-38A9-4305-9BA2-04CD2AC20F32}|Logbuch\\Logbuch.vbproj|solutionrelative:logbuch\\logbuch\\frmschuldbrief.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"AbsoluteMoniker": "D:0:0:{8A404216-38A9-4305-9BA2-04CD2AC20F32}|Logbuch\\Logbuch.vbproj|E:\\Software-Projekte\\TKBDiverse\\Logbuch\\Logbuch\\logbuch\\logbuch\\frmpolice.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
|
||||||
|
"RelativeMoniker": "D:0:0:{8A404216-38A9-4305-9BA2-04CD2AC20F32}|Logbuch\\Logbuch.vbproj|solutionrelative:logbuch\\logbuch\\frmpolice.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"AbsoluteMoniker": "D:0:0:{00000000-0000-0000-0000-000000000000}|\u003CSolution\u003E|Logbuch||{04B8AB82-A572-4FEF-95CE-5222444B6B64}|"
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"AbsoluteMoniker": "D:0:0:{8A404216-38A9-4305-9BA2-04CD2AC20F32}|Logbuch\\Logbuch.vbproj|E:\\Software-Projekte\\TKBDiverse\\Logbuch\\Logbuch\\logbuch\\klassen\\clsdbhandling.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}",
|
||||||
|
"RelativeMoniker": "D:0:0:{8A404216-38A9-4305-9BA2-04CD2AC20F32}|Logbuch\\Logbuch.vbproj|solutionrelative:logbuch\\klassen\\clsdbhandling.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}"
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"AbsoluteMoniker": "D:0:0:{8A404216-38A9-4305-9BA2-04CD2AC20F32}|Logbuch\\Logbuch.vbproj|E:\\Software-Projekte\\TKBDiverse\\Logbuch\\Logbuch\\logbuch\\logbuch\\frmpolice.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form",
|
||||||
|
"RelativeMoniker": "D:0:0:{8A404216-38A9-4305-9BA2-04CD2AC20F32}|Logbuch\\Logbuch.vbproj|solutionrelative:logbuch\\logbuch\\frmpolice.vb||{2C015C70-C72C-11D0-88C3-00A0C9110049}|Form"
|
||||||
|
}
|
||||||
|
],
|
||||||
|
"DocumentGroupContainers": [
|
||||||
|
{
|
||||||
|
"Orientation": 0,
|
||||||
|
"VerticalTabListWidth": 256,
|
||||||
|
"DocumentGroups": [
|
||||||
|
{
|
||||||
|
"DockedWidth": 200,
|
||||||
|
"SelectedChildIndex": 4,
|
||||||
|
"Children": [
|
||||||
|
{
|
||||||
|
"$type": "Document",
|
||||||
|
"DocumentIndex": 4,
|
||||||
|
"Title": "clsdbhandling.vb",
|
||||||
|
"DocumentMoniker": "E:\\Software-Projekte\\TKBDiverse\\Logbuch\\Logbuch\\Logbuch\\Klassen\\clsdbhandling.vb",
|
||||||
|
"RelativeDocumentMoniker": "Logbuch\\Klassen\\clsdbhandling.vb",
|
||||||
|
"ToolTip": "E:\\Software-Projekte\\TKBDiverse\\Logbuch\\Logbuch\\Logbuch\\Klassen\\clsdbhandling.vb",
|
||||||
|
"RelativeToolTip": "Logbuch\\Klassen\\clsdbhandling.vb",
|
||||||
|
"ViewState": "AQIAACwBAAAAAAAAAAAmwD4BAAAIAAAA",
|
||||||
|
"Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
|
||||||
|
"WhenOpened": "2024-10-29T19:26:52.272Z",
|
||||||
|
"IsPinned": true
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"$type": "Bookmark",
|
||||||
|
"Name": "ST:0:0:{b1e99781-ab81-11d0-b683-00aa00a3ee26}"
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"$type": "Bookmark",
|
||||||
|
"Name": "ST:0:0:{aa2115a1-9712-457b-9047-dbb71ca2cdd2}"
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"$type": "Document",
|
||||||
|
"DocumentIndex": 1,
|
||||||
|
"Title": "frmSchuldbrief.vb [Entwurf]",
|
||||||
|
"DocumentMoniker": "E:\\Software-Projekte\\TKBDiverse\\Logbuch\\Logbuch\\Logbuch\\Logbuch\\frmSchuldbrief.vb",
|
||||||
|
"RelativeDocumentMoniker": "Logbuch\\Logbuch\\frmSchuldbrief.vb",
|
||||||
|
"ToolTip": "E:\\Software-Projekte\\TKBDiverse\\Logbuch\\Logbuch\\Logbuch\\Logbuch\\frmSchuldbrief.vb [Entwurf]",
|
||||||
|
"RelativeToolTip": "Logbuch\\Logbuch\\frmSchuldbrief.vb [Entwurf]",
|
||||||
|
"Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
|
||||||
|
"WhenOpened": "2024-10-30T05:30:45.961Z",
|
||||||
|
"EditorCaption": " [Entwurf]"
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"$type": "Document",
|
||||||
|
"DocumentIndex": 0,
|
||||||
|
"Title": "frmSchuldbrief.vb",
|
||||||
|
"DocumentMoniker": "E:\\Software-Projekte\\TKBDiverse\\Logbuch\\Logbuch\\Logbuch\\Logbuch\\frmSchuldbrief.vb",
|
||||||
|
"RelativeDocumentMoniker": "Logbuch\\Logbuch\\frmSchuldbrief.vb",
|
||||||
|
"ToolTip": "E:\\Software-Projekte\\TKBDiverse\\Logbuch\\Logbuch\\Logbuch\\Logbuch\\frmSchuldbrief.vb",
|
||||||
|
"RelativeToolTip": "Logbuch\\Logbuch\\frmSchuldbrief.vb",
|
||||||
|
"ViewState": "AQIAAAcAAAAAAAAAAAAkwNcAAAAAAAAA",
|
||||||
|
"Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
|
||||||
|
"WhenOpened": "2024-10-30T04:57:11.392Z",
|
||||||
|
"EditorCaption": ""
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"$type": "Document",
|
||||||
|
"DocumentIndex": 3,
|
||||||
|
"Title": "Logbuch",
|
||||||
|
"DocumentMoniker": "E:\\Software-Projekte\\TKBDiverse\\Logbuch\\Logbuch\\Logbuch\\Logbuch.vbproj",
|
||||||
|
"RelativeDocumentMoniker": "Logbuch\\Logbuch.vbproj",
|
||||||
|
"ToolTip": "E:\\Software-Projekte\\TKBDiverse\\Logbuch\\Logbuch\\Logbuch\\Logbuch.vbproj",
|
||||||
|
"RelativeToolTip": "Logbuch\\Logbuch.vbproj",
|
||||||
|
"Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.001001|",
|
||||||
|
"WhenOpened": "2024-10-30T05:24:21.959Z"
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"$type": "Document",
|
||||||
|
"DocumentIndex": 2,
|
||||||
|
"Title": "frmPolice.vb",
|
||||||
|
"DocumentMoniker": "E:\\Software-Projekte\\TKBDiverse\\Logbuch\\Logbuch\\Logbuch\\Logbuch\\frmPolice.vb",
|
||||||
|
"RelativeDocumentMoniker": "Logbuch\\Logbuch\\frmPolice.vb",
|
||||||
|
"ToolTip": "E:\\Software-Projekte\\TKBDiverse\\Logbuch\\Logbuch\\Logbuch\\Logbuch\\frmPolice.vb",
|
||||||
|
"RelativeToolTip": "Logbuch\\Logbuch\\frmPolice.vb",
|
||||||
|
"ViewState": "AQIAADQBAAAAAAAAAAAAwD8BAAAAAAAA",
|
||||||
|
"Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
|
||||||
|
"WhenOpened": "2024-10-29T19:26:52.265Z"
|
||||||
|
},
|
||||||
|
{
|
||||||
|
"$type": "Document",
|
||||||
|
"DocumentIndex": 5,
|
||||||
|
"Title": "frmPolice.vb [Entwurf]",
|
||||||
|
"DocumentMoniker": "E:\\Software-Projekte\\TKBDiverse\\Logbuch\\Logbuch\\Logbuch\\Logbuch\\frmPolice.vb",
|
||||||
|
"RelativeDocumentMoniker": "Logbuch\\Logbuch\\frmPolice.vb",
|
||||||
|
"ToolTip": "E:\\Software-Projekte\\TKBDiverse\\Logbuch\\Logbuch\\Logbuch\\Logbuch\\frmPolice.vb [Entwurf]",
|
||||||
|
"RelativeToolTip": "Logbuch\\Logbuch\\frmPolice.vb [Entwurf]",
|
||||||
|
"Icon": "ae27a6b0-e345-4288-96df-5eaf394ee369.003361|",
|
||||||
|
"WhenOpened": "2024-10-29T19:28:45.98Z"
|
||||||
|
}
|
||||||
|
]
|
||||||
|
}
|
||||||
|
]
|
||||||
|
}
|
||||||
|
]
|
||||||
|
}
|
||||||
@ -0,0 +1,84 @@
|
|||||||
|
ALTER TABLE Logbuch ADD LSNr VARCHAR(255)
|
||||||
|
GO
|
||||||
|
ALTER TABLE Logbuch ADD GrundBuchNr INT
|
||||||
|
GO
|
||||||
|
UPDATE logbuch SET grundbuchnr=0
|
||||||
|
UPDATE logbuch SET lsnr=''
|
||||||
|
|
||||||
|
USE [logbuch]
|
||||||
|
GO
|
||||||
|
|
||||||
|
/****** Object: Table [dbo].[Grundbuch] Script Date: 26.11.2017 11:16:51 ******/
|
||||||
|
SET ANSI_NULLS ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
SET QUOTED_IDENTIFIER ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
SET ANSI_PADDING ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
CREATE TABLE [dbo].[Grundbuch](
|
||||||
|
[GrundbuchNr] [INT] IDENTITY(1,1) NOT NULL,
|
||||||
|
[Grundbuch] [VARCHAR](255) NULL,
|
||||||
|
[Aktiv] [BIT] NULL,
|
||||||
|
CONSTRAINT [PK_Grundbuch] PRIMARY KEY CLUSTERED
|
||||||
|
(
|
||||||
|
[GrundbuchNr] ASC
|
||||||
|
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
|
||||||
|
) ON [PRIMARY]
|
||||||
|
|
||||||
|
GO
|
||||||
|
|
||||||
|
SET ANSI_PADDING OFF
|
||||||
|
GO
|
||||||
|
|
||||||
|
USE [logbuch]
|
||||||
|
GO
|
||||||
|
|
||||||
|
/****** Object: StoredProcedure [dbo].[SP_Anzeige] Script Date: 26.11.2017 15:26:08 ******/
|
||||||
|
DROP PROCEDURE [dbo].[SP_Anzeige]
|
||||||
|
GO
|
||||||
|
|
||||||
|
/****** Object: StoredProcedure [dbo].[SP_Anzeige] Script Date: 26.11.2017 15:26:08 ******/
|
||||||
|
SET ANSI_NULLS ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
SET QUOTED_IDENTIFIER ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
|
||||||
|
CREATE PROCEDURE [dbo].[SP_Anzeige]
|
||||||
|
@partner VARCHAR(25),
|
||||||
|
@modus INT = 1 -- 1 -> schuldbriefe, 0 -> policen
|
||||||
|
AS
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
IF @modus = 1 BEGIN
|
||||||
|
SELECT Logbuch.*, Partner.BKPAR00, Benutzer.Kurzzeichen AS UserKurzzeichen, Bemerkungen.Bemerkung AS XBemerkung,
|
||||||
|
Gegenpartei.Bezeichnung AS XGegenpartei , LEFT(RIGHT(REPLICATE('0',8) + CAST(partnernr AS VARCHAR(8)),8),4)+'.'+RIGHT(RIGHT(REPLICATE('0',8)+CAST(partnernr AS VARCHAR(8)),8),4) AS PnrAufbereitet,
|
||||||
|
grundbuch.Grundbuch
|
||||||
|
FROM Logbuch
|
||||||
|
INNER JOIN Gegenpartei ON Logbuch.Gegenpartei = Gegenpartei.Gegenparteinr
|
||||||
|
LEFT OUTER JOIN Grundbuch ON Logbuch.Grundbuchnr = Grundbuch.Grundbuchnr
|
||||||
|
LEFT OUTER JOIN Bemerkungen ON Logbuch.Stdbemerkung = Bemerkungen.Bemerkungsnr
|
||||||
|
LEFT OUTER JOIN Benutzer ON Logbuch.Mitarbeiter = Benutzer.NrBenutzer
|
||||||
|
LEFT OUTER JOIN dbo.Partner ON Logbuch.Partnernr = dbo.Partner.NRPAR00
|
||||||
|
WHERE Partnernr = @partner
|
||||||
|
END ELSE IF @modus = 0 BEGIN
|
||||||
|
SELECT Policen.*, Partner.BKPAR00, Benutzer.Kurzzeichen AS UserKurzzeichen, Bemerkungen.Bemerkung AS XBemerkung,
|
||||||
|
Gegenpartei.Bezeichnung AS XGegenpartei , LEFT(RIGHT(REPLICATE('0',8) + CAST(partnernr AS VARCHAR(8)),8),4)+'.'+RIGHT(RIGHT(REPLICATE('0',8)+CAST(partnernr AS VARCHAR(8)),8),4) AS PnrAufbereitet,
|
||||||
|
dbo.Versgesellschaften.Bezeichnung AS Versgesellschaft
|
||||||
|
FROM Policen
|
||||||
|
INNER JOIN Gegenpartei ON Policen.Gegenpartei = Gegenpartei.Gegenparteinr
|
||||||
|
LEFT OUTER JOIN dbo.Versgesellschaften ON policen.VersgesellschaftId = dbo.Versgesellschaften.VersgesellschaftId
|
||||||
|
LEFT OUTER JOIN Bemerkungen ON Policen.Stdbemerkung = Bemerkungen.Bemerkungsnr
|
||||||
|
LEFT OUTER JOIN Benutzer ON Policen.MitarbeiterNr = Benutzer.NrBenutzer
|
||||||
|
LEFT OUTER JOIN dbo.Partner ON Policen.Partnernr = dbo.Partner.NRPAR00
|
||||||
|
WHERE Partnernr = @partner
|
||||||
|
END
|
||||||
|
|
||||||
|
GO
|
||||||
|
|
||||||
|
|
||||||
|
After Width: | Height: | Size: 766 B |
@ -0,0 +1,23 @@
|
|||||||
|
<?xml version="1.0"?>
|
||||||
|
<configuration>
|
||||||
|
<system.diagnostics>
|
||||||
|
<sources>
|
||||||
|
<!-- Dieser Abschnitt definiert die Protokollierungskonfiguration für My.Application.Log -->
|
||||||
|
<source name="DefaultSource" switchName="DefaultSwitch">
|
||||||
|
<listeners>
|
||||||
|
<add name="FileLog"/>
|
||||||
|
<!-- Auskommentierung des nachfolgenden Abschnitts aufheben, um in das Anwendungsereignisprotokoll zu schreiben -->
|
||||||
|
<!--<add name="EventLog"/>-->
|
||||||
|
</listeners>
|
||||||
|
</source>
|
||||||
|
</sources>
|
||||||
|
<switches>
|
||||||
|
<add name="DefaultSwitch" value="Information"/>
|
||||||
|
</switches>
|
||||||
|
<sharedListeners>
|
||||||
|
<add name="FileLog" type="Microsoft.VisualBasic.Logging.FileLogTraceListener, Microsoft.VisualBasic, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL" initializeData="FileLogWriter"/>
|
||||||
|
<!-- Auskommentierung des nachfolgenden Abschnitts aufheben und APPLICATION_NAME durch den Namen der Anwendung ersetzen, um in das Anwendungsereignisprotokoll zu schreiben -->
|
||||||
|
<!--<add name="EventLog" type="System.Diagnostics.EventLogTraceListener" initializeData="APPLICATION_NAME"/> -->
|
||||||
|
</sharedListeners>
|
||||||
|
</system.diagnostics>
|
||||||
|
<startup><supportedRuntime version="v2.0.50727"/></startup></configuration>
|
||||||
@ -0,0 +1,23 @@
|
|||||||
|
<?xml version="1.0"?>
|
||||||
|
<configuration>
|
||||||
|
<system.diagnostics>
|
||||||
|
<sources>
|
||||||
|
<!-- Dieser Abschnitt definiert die Protokollierungskonfiguration für My.Application.Log -->
|
||||||
|
<source name="DefaultSource" switchName="DefaultSwitch">
|
||||||
|
<listeners>
|
||||||
|
<add name="FileLog"/>
|
||||||
|
<!-- Auskommentierung des nachfolgenden Abschnitts aufheben, um in das Anwendungsereignisprotokoll zu schreiben -->
|
||||||
|
<!--<add name="EventLog"/>-->
|
||||||
|
</listeners>
|
||||||
|
</source>
|
||||||
|
</sources>
|
||||||
|
<switches>
|
||||||
|
<add name="DefaultSwitch" value="Information"/>
|
||||||
|
</switches>
|
||||||
|
<sharedListeners>
|
||||||
|
<add name="FileLog" type="Microsoft.VisualBasic.Logging.FileLogTraceListener, Microsoft.VisualBasic, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL" initializeData="FileLogWriter"/>
|
||||||
|
<!-- Auskommentierung des nachfolgenden Abschnitts aufheben und APPLICATION_NAME durch den Namen der Anwendung ersetzen, um in das Anwendungsereignisprotokoll zu schreiben -->
|
||||||
|
<!--<add name="EventLog" type="System.Diagnostics.EventLogTraceListener" initializeData="APPLICATION_NAME"/> -->
|
||||||
|
</sharedListeners>
|
||||||
|
</system.diagnostics>
|
||||||
|
<startup><supportedRuntime version="v2.0.50727"/></startup></configuration>
|
||||||
@ -0,0 +1,11 @@
|
|||||||
|
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
|
||||||
|
<assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
|
||||||
|
<assemblyIdentity version="1.0.0.0" name="MyApplication.app"/>
|
||||||
|
<trustInfo xmlns="urn:schemas-microsoft-com:asm.v2">
|
||||||
|
<security>
|
||||||
|
<requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3">
|
||||||
|
<requestedExecutionLevel level="asInvoker" uiAccess="false"/>
|
||||||
|
</requestedPrivileges>
|
||||||
|
</security>
|
||||||
|
</trustInfo>
|
||||||
|
</assembly>
|
||||||
@ -0,0 +1 @@
|
|||||||
|
AcpxZPPiXKddDph[A_wdh]qUzt;bnYgbullSXiQr<vz@PeiI\awdl;XI?VblIjje>HQO;oL?N\h[^ieVu]a\a^wmE@KsBQhKvMWURwuCNZV_o<aQNbwNY\oMD\ED=PFR\KYhAadxxIYK^>VirVER\B@XT[RhD_OPupfaNDT]Iqp;RC_\]\xiNkooKXoTEZWa\\G
|
||||||
@ -0,0 +1,457 @@
|
|||||||
|
USE [logbuch]
|
||||||
|
GO
|
||||||
|
|
||||||
|
/****** Object: StoredProcedure [dbo].[sp_get_dbkey] Script Date: 28.09.2017 15:37:18 ******/
|
||||||
|
SET ANSI_NULLS ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
SET QUOTED_IDENTIFIER ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
-- =============================================
|
||||||
|
-- Author: <Author,,Name>
|
||||||
|
-- Create date: <Create Date,,>
|
||||||
|
-- Description: <Description,,>
|
||||||
|
-- =============================================
|
||||||
|
CREATE PROCEDURE [dbo].[sp_get_dbkey]
|
||||||
|
@tablename varchar(255),
|
||||||
|
@dbkey int output,
|
||||||
|
@iErrorcode int output
|
||||||
|
AS
|
||||||
|
BEGIN
|
||||||
|
declare @zwkey int
|
||||||
|
select @zwkey = key_wert from key_tabelle where beschreibung = @tablename
|
||||||
|
set @zwkey = @zwkey + 1
|
||||||
|
update key_tabelle set key_wert = @zwkey where beschreibung=@tablename
|
||||||
|
select @dbkey = @zwkey
|
||||||
|
select @iErrorCode=@@Error
|
||||||
|
END
|
||||||
|
|
||||||
|
|
||||||
|
GO
|
||||||
|
|
||||||
|
/****** Object: StoredProcedure [dbo].[pr_spalten_Delete] Script Date: 28.09.2017 15:37:18 ******/
|
||||||
|
SET ANSI_NULLS ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
SET QUOTED_IDENTIFIER ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
---------------------------------------------------------------------------------
|
||||||
|
-- Stored procedure that will delete an existing row from the table 'spalten'
|
||||||
|
-- using the Primary Key.
|
||||||
|
-- Gets: @ieintragnr int
|
||||||
|
-- Returns: @iErrorCode int
|
||||||
|
---------------------------------------------------------------------------------
|
||||||
|
CREATE PROCEDURE [dbo].[pr_spalten_Delete]
|
||||||
|
@ieintragnr INT,
|
||||||
|
@iErrorCode INT OUTPUT
|
||||||
|
AS
|
||||||
|
SET NOCOUNT ON
|
||||||
|
-- DELETE an existing row from the table.
|
||||||
|
DELETE FROM [dbo].[spalten]
|
||||||
|
WHERE
|
||||||
|
[eintragnr] = @ieintragnr
|
||||||
|
-- Get the Error Code for the statement just executed.
|
||||||
|
SELECT @iErrorCode=@@ERROR
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
GO
|
||||||
|
|
||||||
|
/****** Object: StoredProcedure [dbo].[pr_spalten_Insert] Script Date: 28.09.2017 15:37:18 ******/
|
||||||
|
SET ANSI_NULLS ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
SET QUOTED_IDENTIFIER ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
---------------------------------------------------------------------------------
|
||||||
|
-- Stored procedure that will insert 1 row in the table 'spalten'
|
||||||
|
-- Gets: @ieintragnr int
|
||||||
|
-- Gets: @stabelle varchar(255)
|
||||||
|
-- Gets: @stabellenspalte varchar(255)
|
||||||
|
-- Gets: @sspalte varchar(255)
|
||||||
|
-- Gets: @bReadonly bit
|
||||||
|
-- Gets: @balsHacken bit
|
||||||
|
-- Gets: @iBreite int
|
||||||
|
-- Gets: @iReihenfolge int
|
||||||
|
-- Gets: @stiptext varchar(255)
|
||||||
|
-- Gets: @baktiv bit
|
||||||
|
-- Gets: @daerstellt_am datetime
|
||||||
|
-- Gets: @damutiert_am datetime
|
||||||
|
-- Gets: @imutierer int
|
||||||
|
-- Gets: @imandantnr int
|
||||||
|
-- Gets: @sNumberFormat varchar(255)
|
||||||
|
-- Returns: @iErrorCode int
|
||||||
|
---------------------------------------------------------------------------------
|
||||||
|
CREATE PROCEDURE [dbo].[pr_spalten_Insert]
|
||||||
|
@ieintragnr INT,
|
||||||
|
@stabelle VARCHAR(255),
|
||||||
|
@stabellenspalte VARCHAR(255),
|
||||||
|
@sspalte VARCHAR(255),
|
||||||
|
@bReadonly BIT,
|
||||||
|
@balsHacken BIT,
|
||||||
|
@iBreite INT,
|
||||||
|
@iReihenfolge INT,
|
||||||
|
@stiptext VARCHAR(255),
|
||||||
|
@baktiv BIT,
|
||||||
|
@daerstellt_am DATETIME,
|
||||||
|
@damutiert_am DATETIME,
|
||||||
|
@imutierer INT,
|
||||||
|
@imandantnr INT,
|
||||||
|
@sNumberFormat VARCHAR(255),
|
||||||
|
@iErrorCode INT OUTPUT
|
||||||
|
AS
|
||||||
|
SET NOCOUNT ON
|
||||||
|
-- INSERT a new row in the table.
|
||||||
|
INSERT [dbo].[spalten]
|
||||||
|
(
|
||||||
|
[eintragnr],
|
||||||
|
[tabelle],
|
||||||
|
[tabellenspalte],
|
||||||
|
[spalte],
|
||||||
|
[Readonly],
|
||||||
|
[alsHacken],
|
||||||
|
[Breite],
|
||||||
|
[Reihenfolge],
|
||||||
|
[tiptext],
|
||||||
|
[aktiv],
|
||||||
|
[erstellt_am],
|
||||||
|
[mutiert_am],
|
||||||
|
[mutierer],
|
||||||
|
[mandantnr],
|
||||||
|
[NumberFormat]
|
||||||
|
)
|
||||||
|
VALUES
|
||||||
|
(
|
||||||
|
@ieintragnr,
|
||||||
|
@stabelle,
|
||||||
|
@stabellenspalte,
|
||||||
|
@sspalte,
|
||||||
|
@bReadonly,
|
||||||
|
@balsHacken,
|
||||||
|
@iBreite,
|
||||||
|
@iReihenfolge,
|
||||||
|
@stiptext,
|
||||||
|
@baktiv,
|
||||||
|
@daerstellt_am,
|
||||||
|
@damutiert_am,
|
||||||
|
@imutierer,
|
||||||
|
@imandantnr,
|
||||||
|
@sNumberFormat
|
||||||
|
)
|
||||||
|
-- Get the Error Code for the statement just executed.
|
||||||
|
SELECT @iErrorCode=@@ERROR
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
GO
|
||||||
|
|
||||||
|
/****** Object: StoredProcedure [dbo].[pr_spalten_SelectAll_Aktiv] Script Date: 28.09.2017 15:37:18 ******/
|
||||||
|
SET ANSI_NULLS ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
SET QUOTED_IDENTIFIER ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
-- =============================================
|
||||||
|
-- Author: <Author,,Name>
|
||||||
|
-- Create date: <Create Date,,>
|
||||||
|
-- Description: <Description,,>
|
||||||
|
-- =============================================
|
||||||
|
CREATE PROCEDURE [dbo].[pr_spalten_SelectAll_Aktiv]
|
||||||
|
@iErrorCode int OUTPUT
|
||||||
|
AS
|
||||||
|
SET NOCOUNT ON
|
||||||
|
-- SELECT all rows from the table.
|
||||||
|
SELECT
|
||||||
|
[eintragnr],
|
||||||
|
tabelle,
|
||||||
|
tabellenspalte,
|
||||||
|
[spalte],
|
||||||
|
[Readonly],
|
||||||
|
[alsHacken],
|
||||||
|
[Breite],
|
||||||
|
[Reihenfolge],
|
||||||
|
[tiptext],
|
||||||
|
[aktiv],
|
||||||
|
[erstellt_am],
|
||||||
|
[mutiert_am],
|
||||||
|
[mutierer],
|
||||||
|
[mandantnr],
|
||||||
|
[numberformat]
|
||||||
|
FROM [dbo].[spalten]
|
||||||
|
Where aktiv=1
|
||||||
|
ORDER BY
|
||||||
|
[eintragnr] ASC
|
||||||
|
-- Get the Error Code for the statement just executed.
|
||||||
|
SELECT @iErrorCode=@@ERROR
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
GO
|
||||||
|
|
||||||
|
/****** Object: StoredProcedure [dbo].[pr_spalten_SelectAll] Script Date: 28.09.2017 15:37:18 ******/
|
||||||
|
SET ANSI_NULLS ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
SET QUOTED_IDENTIFIER ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
---------------------------------------------------------------------------------
|
||||||
|
-- Stored procedure that will select all rows from the table 'spalten'
|
||||||
|
-- Returns: @iErrorCode int
|
||||||
|
---------------------------------------------------------------------------------
|
||||||
|
CREATE PROCEDURE [dbo].[pr_spalten_SelectAll]
|
||||||
|
@iErrorCode int OUTPUT
|
||||||
|
AS
|
||||||
|
SET NOCOUNT ON
|
||||||
|
-- SELECT all rows from the table.
|
||||||
|
SELECT
|
||||||
|
[eintragnr],
|
||||||
|
[tabelle],
|
||||||
|
[tabellenspalte],
|
||||||
|
[spalte],
|
||||||
|
[Readonly],
|
||||||
|
[alsHacken],
|
||||||
|
[Breite],
|
||||||
|
[Reihenfolge],
|
||||||
|
[tiptext],
|
||||||
|
[aktiv],
|
||||||
|
[erstellt_am],
|
||||||
|
[mutiert_am],
|
||||||
|
[mutierer],
|
||||||
|
[mandantnr],
|
||||||
|
[NumberFormat]
|
||||||
|
FROM [dbo].[spalten]
|
||||||
|
ORDER BY
|
||||||
|
[eintragnr] ASC
|
||||||
|
-- Get the Error Code for the statement just executed.
|
||||||
|
SELECT @iErrorCode=@@ERROR
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
GO
|
||||||
|
|
||||||
|
/****** Object: StoredProcedure [dbo].[pr_spalten_Update] Script Date: 28.09.2017 15:37:18 ******/
|
||||||
|
SET ANSI_NULLS ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
SET QUOTED_IDENTIFIER ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
---------------------------------------------------------------------------------
|
||||||
|
-- Stored procedure that will update an existing row in the table 'spalten'
|
||||||
|
-- Gets: @ieintragnr int
|
||||||
|
-- Gets: @stabelle varchar(255)
|
||||||
|
-- Gets: @stabellenspalte varchar(255)
|
||||||
|
-- Gets: @sspalte varchar(255)
|
||||||
|
-- Gets: @bReadonly bit
|
||||||
|
-- Gets: @balsHacken bit
|
||||||
|
-- Gets: @iBreite int
|
||||||
|
-- Gets: @iReihenfolge int
|
||||||
|
-- Gets: @stiptext varchar(255)
|
||||||
|
-- Gets: @baktiv bit
|
||||||
|
-- Gets: @daerstellt_am datetime
|
||||||
|
-- Gets: @damutiert_am datetime
|
||||||
|
-- Gets: @imutierer int
|
||||||
|
-- Gets: @imandantnr int
|
||||||
|
-- Gets: @sNumberFormat varchar(255)
|
||||||
|
-- Returns: @iErrorCode int
|
||||||
|
---------------------------------------------------------------------------------
|
||||||
|
CREATE PROCEDURE [dbo].[pr_spalten_Update]
|
||||||
|
@ieintragnr int,
|
||||||
|
@stabelle varchar(255),
|
||||||
|
@stabellenspalte varchar(255),
|
||||||
|
@sspalte varchar(255),
|
||||||
|
@bReadonly bit,
|
||||||
|
@balsHacken bit,
|
||||||
|
@iBreite int,
|
||||||
|
@iReihenfolge int,
|
||||||
|
@stiptext varchar(255),
|
||||||
|
@baktiv bit,
|
||||||
|
@daerstellt_am datetime,
|
||||||
|
@damutiert_am datetime,
|
||||||
|
@imutierer int,
|
||||||
|
@imandantnr int,
|
||||||
|
@sNumberFormat varchar(255),
|
||||||
|
@iErrorCode int OUTPUT
|
||||||
|
AS
|
||||||
|
SET NOCOUNT ON
|
||||||
|
-- UPDATE an existing row in the table.
|
||||||
|
UPDATE [dbo].[spalten]
|
||||||
|
SET
|
||||||
|
[tabelle] = @stabelle,
|
||||||
|
[tabellenspalte] = @stabellenspalte,
|
||||||
|
[spalte] = @sspalte,
|
||||||
|
[Readonly] = @bReadonly,
|
||||||
|
[alsHacken] = @balsHacken,
|
||||||
|
[Breite] = @iBreite,
|
||||||
|
[Reihenfolge] = @iReihenfolge,
|
||||||
|
[tiptext] = @stiptext,
|
||||||
|
[aktiv] = @baktiv,
|
||||||
|
[erstellt_am] = @daerstellt_am,
|
||||||
|
[mutiert_am] = @damutiert_am,
|
||||||
|
[mutierer] = @imutierer,
|
||||||
|
[mandantnr] = @imandantnr,
|
||||||
|
[NumberFormat] = @sNumberFormat
|
||||||
|
WHERE
|
||||||
|
[eintragnr] = @ieintragnr
|
||||||
|
-- Get the Error Code for the statement just executed.
|
||||||
|
SELECT @iErrorCode=@@ERROR
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
GO
|
||||||
|
|
||||||
|
/****** Object: StoredProcedure [dbo].[pr_spalten_SelectOne] Script Date: 28.09.2017 15:37:18 ******/
|
||||||
|
SET ANSI_NULLS ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
SET QUOTED_IDENTIFIER ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
---------------------------------------------------------------------------------
|
||||||
|
-- Stored procedure that will select an existing row from the table 'spalten'
|
||||||
|
-- based on the Primary Key.
|
||||||
|
-- Gets: @ieintragnr int
|
||||||
|
-- Returns: @iErrorCode int
|
||||||
|
---------------------------------------------------------------------------------
|
||||||
|
CREATE PROCEDURE [dbo].[pr_spalten_SelectOne]
|
||||||
|
@ieintragnr int,
|
||||||
|
@iErrorCode int OUTPUT
|
||||||
|
AS
|
||||||
|
SET NOCOUNT ON
|
||||||
|
-- SELECT an existing row from the table.
|
||||||
|
SELECT
|
||||||
|
[eintragnr],
|
||||||
|
[tabelle],
|
||||||
|
[tabellenspalte],
|
||||||
|
[spalte],
|
||||||
|
[Readonly],
|
||||||
|
[alsHacken],
|
||||||
|
[Breite],
|
||||||
|
[Reihenfolge],
|
||||||
|
[tiptext],
|
||||||
|
[aktiv],
|
||||||
|
[erstellt_am],
|
||||||
|
[mutiert_am],
|
||||||
|
[mutierer],
|
||||||
|
[mandantnr],
|
||||||
|
[NumberFormat]
|
||||||
|
FROM [dbo].[spalten]
|
||||||
|
WHERE
|
||||||
|
[eintragnr] = @ieintragnr
|
||||||
|
-- Get the Error Code for the statement just executed.
|
||||||
|
SELECT @iErrorCode=@@ERROR
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
GO
|
||||||
|
|
||||||
|
/****** Object: StoredProcedure [dbo].[sp_update_spalten] Script Date: 28.09.2017 15:37:18 ******/
|
||||||
|
SET ANSI_NULLS ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
SET QUOTED_IDENTIFIER ON
|
||||||
|
GO
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
CREATE PROCEDURE [dbo].[sp_update_spalten]
|
||||||
|
@tablename varchar(255)
|
||||||
|
AS
|
||||||
|
begin
|
||||||
|
declare @len int
|
||||||
|
declare @inhalt varchar(30)
|
||||||
|
declare @col varchar(30)
|
||||||
|
declare @readonly int
|
||||||
|
declare @dbkey int
|
||||||
|
declare @alshacken int
|
||||||
|
declare @ierrorcode int
|
||||||
|
declare @spaltenkey int
|
||||||
|
declare @aktiv int
|
||||||
|
declare @tiptext varchar(255)
|
||||||
|
declare xcursor cursor for
|
||||||
|
SELECT column_name
|
||||||
|
from INFORMATION_SCHEMA.Columns
|
||||||
|
where table_name = @tablename
|
||||||
|
open xcursor
|
||||||
|
FETCH NEXT FROM xcursor into @col
|
||||||
|
WHILE @@FETCH_STATUS = 0 BEGIN
|
||||||
|
execute sp_get_dbkey 'spalten', @dbkey output, @ierrorcode output
|
||||||
|
set @spaltenkey=@dbkey
|
||||||
|
|
||||||
|
set @inhalt=@col
|
||||||
|
set @readonly=0
|
||||||
|
set @aktiv=1
|
||||||
|
set @tiptext=''
|
||||||
|
set @len=100
|
||||||
|
set @alshacken=0
|
||||||
|
if upper(@col)='ERSTELLT_AM' begin
|
||||||
|
set @inhalt='Erstellungsdatum'
|
||||||
|
set @len=100
|
||||||
|
set @readonly=1
|
||||||
|
end
|
||||||
|
if upper(@col)='MUTIERT_AM' begin
|
||||||
|
set @inhalt='Mutationsdatum'
|
||||||
|
set @len=100
|
||||||
|
set @readonly=1
|
||||||
|
end
|
||||||
|
if upper(@col)='MUTIERER' begin
|
||||||
|
set @inhalt='Mutiert durch'
|
||||||
|
set @len=40
|
||||||
|
set @readonly=1
|
||||||
|
end
|
||||||
|
if upper(@col)='AKTIV' begin
|
||||||
|
set @inhalt='Aktiv'
|
||||||
|
set @len=40
|
||||||
|
set @alshacken=0
|
||||||
|
end
|
||||||
|
|
||||||
|
insert into spalten (eintragnr,tabelle,tabellenspalte,spalte,readonly,aktiv,erstellt_am, mutiert_am,mutierer,mandantnr,alsHacken,tiptext, breite, reihenfolge)
|
||||||
|
values(@spaltenkey,@tablename,@col,@inhalt,@readonly,@aktiv,getdate(),getdate(),-1,1,@alshacken,@tiptext,@len,0)
|
||||||
|
FETCH NEXT FROM xcursor into @col
|
||||||
|
end
|
||||||
|
close xcursor
|
||||||
|
deallocate xcursor
|
||||||
|
end
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
GO
|
||||||
|
|
||||||
|
After Width: | Height: | Size: 174 KiB |
|
After Width: | Height: | Size: 161 KiB |
|
After Width: | Height: | Size: 682 B |
|
After Width: | Height: | Size: 766 B |
|
After Width: | Height: | Size: 17 KiB |
|
After Width: | Height: | Size: 4.5 KiB |
|
After Width: | Height: | Size: 9.4 KiB |
|
After Width: | Height: | Size: 4.8 KiB |
|
After Width: | Height: | Size: 211 KiB |
|
After Width: | Height: | Size: 680 B |
|
After Width: | Height: | Size: 9.4 KiB |
|
After Width: | Height: | Size: 1.0 MiB |
|
After Width: | Height: | Size: 21 KiB |
|
After Width: | Height: | Size: 1.4 MiB |
|
After Width: | Height: | Size: 8.7 KiB |
|
After Width: | Height: | Size: 9.4 KiB |
|
After Width: | Height: | Size: 1.2 KiB |
@ -0,0 +1,21 @@
|
|||||||
|
<?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="Logbuch.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
|
||||||
|
</sectionGroup>
|
||||||
|
</configSections>
|
||||||
|
<startup>
|
||||||
|
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.5" />
|
||||||
|
</startup>
|
||||||
|
<userSettings>
|
||||||
|
<Logbuch.My.MySettings>
|
||||||
|
<setting name="Waehrung" serializeAs="String">
|
||||||
|
<value>CHF</value>
|
||||||
|
</setting>
|
||||||
|
<setting name="NumRegex" serializeAs="String">
|
||||||
|
<value>[^0-9.]</value>
|
||||||
|
</setting>
|
||||||
|
</Logbuch.My.MySettings>
|
||||||
|
</userSettings>
|
||||||
|
</configuration>
|
||||||
@ -0,0 +1,61 @@
|
|||||||
|
Imports System
|
||||||
|
Imports System.Data
|
||||||
|
Imports System.Data.SqlTypes
|
||||||
|
Imports System.Data.SqlClient
|
||||||
|
Namespace DB
|
||||||
|
Public Class clsMyKey_Tabelle
|
||||||
|
Inherits db.clsKey_tabelle
|
||||||
|
|
||||||
|
Public Function get_dbkey(ByVal Tablename As String) As Long
|
||||||
|
Dim m_dbkey As Long
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[sp_get_dbkey]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = m_scoMainConnection
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@Tablename", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, Tablename))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@dbkey", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, m_dbkey))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@iErrorCode", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, m_iErrorCode))
|
||||||
|
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Open connection.
|
||||||
|
m_scoMainConnection.Open()
|
||||||
|
Else
|
||||||
|
If m_cpMainConnectionProvider.bIsTransactionPending Then
|
||||||
|
scmCmdToExecute.Transaction = m_cpMainConnectionProvider.stCurrentTransaction
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
' // Execute query.
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Connection.Open()
|
||||||
|
Catch ex As Exception
|
||||||
|
Finally
|
||||||
|
End Try
|
||||||
|
|
||||||
|
scmCmdToExecute.ExecuteNonQuery()
|
||||||
|
m_dbkey = scmCmdToExecute.Parameters.Item("@dbkey").Value
|
||||||
|
m_iErrorCode = New SqlInt32(CType(scmCmdToExecute.Parameters.Item("@iErrorCode").Value, SqlInt32))
|
||||||
|
scmCmdToExecute.Connection.Close()
|
||||||
|
|
||||||
|
If Not m_iErrorCode.Equals(New SqlInt32(LLBLError.AllOk)) Then
|
||||||
|
' // Throw error.
|
||||||
|
Throw New Exception("Stored Procedure 'sp_get_dbkey' reported the ErrorCode: " & m_iErrorCode.ToString())
|
||||||
|
End If
|
||||||
|
|
||||||
|
Return m_dbkey
|
||||||
|
Catch ex As Exception
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
Throw New Exception("clsKey_tabelle::get_dbkey::Error occured." + ex.Message, ex)
|
||||||
|
Finally
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Close connection.
|
||||||
|
m_scoMainConnection.Close()
|
||||||
|
End If
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
End Class
|
||||||
|
End Namespace
|
||||||
@ -0,0 +1,59 @@
|
|||||||
|
Imports System.IO
|
||||||
|
Namespace DB
|
||||||
|
''' <summary>
|
||||||
|
''' Dynamische Datenbank-Verbindung aufbauen. Verwendet wird standardmässig Vertragsverwaltung.cfg.
|
||||||
|
''' Sollen Datenbank-Verbindungen zur Auswahl angezeigt werden, werden sämntliche Datenbank-Verbindungsdateien
|
||||||
|
''' mit dem Namen "Vertragsverwaltung....cfg" berücksichtigt
|
||||||
|
''' </summary>
|
||||||
|
''' <remarks></remarks>
|
||||||
|
Public Class DB_Connection
|
||||||
|
|
||||||
|
''' <summary>
|
||||||
|
''' Liest sämtlcihe CFG-Dateien mit dem Namen "Vertragsverwaltung...". Sind meherere Dateien vorhanden,
|
||||||
|
''' wird ein Auswahldialog zur Datenbank-Selektion angezeigt.
|
||||||
|
''' Standardmässig wird Vertragsverwaltung.cfg als CFG-Datei benutzt.
|
||||||
|
'''
|
||||||
|
''' Die CFG-Datei ist verschlüsselt und wird über die Crypto-Funktionen entschlüsselt.
|
||||||
|
''' </summary>
|
||||||
|
''' <remarks></remarks>
|
||||||
|
Shared Sub New()
|
||||||
|
Dim fc As Integer = 0
|
||||||
|
If Globals.ConnectionFileName.Length = 0 Then
|
||||||
|
Dim Dir As DirectoryInfo = New DirectoryInfo(Application.StartupPath)
|
||||||
|
Try
|
||||||
|
Dim f As New frmDatenbankauswahl()
|
||||||
|
Dim ChildFile As FileInfo
|
||||||
|
For Each ChildFile In Dir.GetFiles()
|
||||||
|
If UCase(Left(ChildFile.Name, 14)) = "LOGBUCH" And UCase(ChildFile.Extension) = ".CFG" Then
|
||||||
|
f.ListBox1.Items.Add(ChildFile.Name)
|
||||||
|
fc = fc + 1
|
||||||
|
End If
|
||||||
|
Next
|
||||||
|
If fc > 1 Then
|
||||||
|
f.ListBox1.SelectedIndex = 0
|
||||||
|
f.ListBox1.Select()
|
||||||
|
f.ShowDialog()
|
||||||
|
Globals.ConnectionFileName = f.ListBox1.SelectedItem
|
||||||
|
f.Dispose()
|
||||||
|
End If
|
||||||
|
Catch except As Exception
|
||||||
|
fc = 0
|
||||||
|
Exit Sub
|
||||||
|
End Try
|
||||||
|
End If
|
||||||
|
If fc < 2 Then Globals.ConnectionFileName = "LOGBUCH.cfg"
|
||||||
|
Dim ofile As System.IO.File
|
||||||
|
Dim oread As System.IO.StreamReader
|
||||||
|
oread = ofile.OpenText(Application.StartupPath + "\" + Globals.ConnectionFileName)
|
||||||
|
sConnectionString = oread.ReadLine
|
||||||
|
sConnectionString = Crypto.DecryptText(sConnectionString, "HutterundMueller")
|
||||||
|
sConnectionString = Left(sConnectionString, Len(sConnectionString) - 1)
|
||||||
|
Globals.sConnectionString = sConnectionString
|
||||||
|
Globals.conn.sConnectionString = sConnectionString
|
||||||
|
oread.Close()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
End Class
|
||||||
|
|
||||||
|
End Namespace
|
||||||
|
|
||||||
@ -0,0 +1,138 @@
|
|||||||
|
<?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=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>
|
||||||
|
<assembly alias="System.Drawing" name="System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||||
|
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>
|
||||||
|
AAABAAEAICAEAAAAAADoAgAAFgAAACgAAAAgAAAAQAAAAAEABAAAAAAAAAIAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAACAAACAAAAAgIAAgAAAAIAAgACAgAAAgICAAMDAwAAAAP8AAP8AAAD//wD/AAAA/wD/AP//
|
||||||
|
AAD///8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAzd3d3MzMzAAAAAAAAAAAAM3d3dzMzMwAAAAAAAAAAM3eIiIi7MzMzAAAAAAAA
|
||||||
|
ADN3iIiIuzMzMwAAAAAAAAB3u4iIiLu7MzMAAAAAAAAAd7uIiIi7uzMzAAAAAAAAAHe7iIiIu7szMwAA
|
||||||
|
AAAAAAB3u4iIiLu7MzMAAAAAAAAAd7uIiIi7uzMzAAAAAAAAAHe7iIiIu7szMwAAAAAAAAB3u4iIiLu7
|
||||||
|
MzMAAAAAAAAAd7uIiIi7uzMzAAAAAAAAAHe7iIiIu7szMwAAAAAAAAB3u4iIiLu7MzMAAAAAAAAAd7uI
|
||||||
|
iIi7uzMzAAAAAAAAAHe7iIiIu7szMwAAAAAAAAB3u4iIiLu7MzMAAAAAAAAAd7uIiIi7uzMzAAAAAAAA
|
||||||
|
AHe7iIiIiIi7dwAAAAAAAAB3u4iIiIiIu3cAAAAAAAAAiIj//////4h3AAAAAAAAAIiI//////+IdwAA
|
||||||
|
AAAAAAAzd3d3d3d3dzMAAAAAAAAAM3d3d3d3d3czAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD//////////////////////AAA//wA
|
||||||
|
AP/8AAD//AAA//wAAP/8AAD//AAA//wAAP/8AAD//AAA//wAAP/8AAD//AAA//wAAP/8AAD//AAA//wA
|
||||||
|
AP/8AAD//AAA//wAAP/8AAD//AAA//wAAP/8AAD//////////////////////w==
|
||||||
|
</value>
|
||||||
|
</data>
|
||||||
|
</root>
|
||||||
@ -0,0 +1,95 @@
|
|||||||
|
''' <summary>
|
||||||
|
''' Form für die Datenbankauswahl
|
||||||
|
''' </summary>
|
||||||
|
''' <remarks></remarks>
|
||||||
|
Public Class frmDatenbankauswahl
|
||||||
|
Inherits System.Windows.Forms.Form
|
||||||
|
|
||||||
|
#Region " Vom Windows Form Designer generierter Code "
|
||||||
|
|
||||||
|
Public Sub New()
|
||||||
|
MyBase.New()
|
||||||
|
|
||||||
|
' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
|
||||||
|
InitializeComponent()
|
||||||
|
|
||||||
|
' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
' Die Form überschreibt den Löschvorgang der Basisklasse, um Komponenten zu bereinigen.
|
||||||
|
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||||
|
If disposing Then
|
||||||
|
If Not (components Is Nothing) Then
|
||||||
|
components.Dispose()
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
MyBase.Dispose(disposing)
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
' Für Windows Form-Designer erforderlich
|
||||||
|
Private components As System.ComponentModel.IContainer
|
||||||
|
|
||||||
|
'HINWEIS: Die folgende Prozedur ist für den Windows Form-Designer erforderlich
|
||||||
|
'Sie kann mit dem Windows Form-Designer modifiziert werden.
|
||||||
|
'Verwenden Sie nicht den Code-Editor zur Bearbeitung.
|
||||||
|
Friend WithEvents ListBox1 As System.Windows.Forms.ListBox
|
||||||
|
Friend WithEvents Button1 As System.Windows.Forms.Button
|
||||||
|
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
|
||||||
|
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmDatenbankauswahl))
|
||||||
|
Me.ListBox1 = New System.Windows.Forms.ListBox
|
||||||
|
Me.Button1 = New System.Windows.Forms.Button
|
||||||
|
Me.SuspendLayout()
|
||||||
|
'
|
||||||
|
'ListBox1
|
||||||
|
'
|
||||||
|
Me.ListBox1.Location = New System.Drawing.Point(16, 16)
|
||||||
|
Me.ListBox1.Name = "ListBox1"
|
||||||
|
Me.ListBox1.Size = New System.Drawing.Size(232, 95)
|
||||||
|
Me.ListBox1.TabIndex = 0
|
||||||
|
'
|
||||||
|
'Button1
|
||||||
|
'
|
||||||
|
Me.Button1.DialogResult = System.Windows.Forms.DialogResult.OK
|
||||||
|
Me.Button1.Location = New System.Drawing.Point(88, 128)
|
||||||
|
Me.Button1.Name = "Button1"
|
||||||
|
Me.Button1.Size = New System.Drawing.Size(75, 23)
|
||||||
|
Me.Button1.TabIndex = 1
|
||||||
|
Me.Button1.Text = "&OK"
|
||||||
|
'
|
||||||
|
'frmDatenbankauswahl
|
||||||
|
'
|
||||||
|
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
|
||||||
|
Me.ClientSize = New System.Drawing.Size(258, 165)
|
||||||
|
Me.Controls.Add(Me.Button1)
|
||||||
|
Me.Controls.Add(Me.ListBox1)
|
||||||
|
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
|
||||||
|
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||||
|
Me.MaximizeBox = False
|
||||||
|
Me.MinimizeBox = False
|
||||||
|
Me.Name = "frmDatenbankauswahl"
|
||||||
|
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||||
|
Me.Text = "Vertragsverwaltung: Datebbankauswahl"
|
||||||
|
Me.ResumeLayout(False)
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
#End Region
|
||||||
|
|
||||||
|
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
|
||||||
|
Me.Close()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub frmDatenbankauswahl_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||||
|
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
Private Sub ListBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBox1.DoubleClick
|
||||||
|
Me.Close()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
Private Sub ListBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles ListBox1.KeyDown
|
||||||
|
If e.KeyCode = Keys.Enter Then Me.Close()
|
||||||
|
End Sub
|
||||||
|
End Class
|
||||||
@ -0,0 +1,289 @@
|
|||||||
|
' ///////////////////////////////////////////////////////////////////////////
|
||||||
|
' // Description: Connection Provider class for Database connection sharing
|
||||||
|
' // Generated by LLBLGen v1.21.2003.712 Final on: Dienstag, 1. Januar 2013, 19:36:38
|
||||||
|
' // This class implements IDisposable.
|
||||||
|
' ///////////////////////////////////////////////////////////////////////////
|
||||||
|
Imports System
|
||||||
|
Imports System.Configuration
|
||||||
|
Imports System.Data
|
||||||
|
Imports System.Data.SqlClient
|
||||||
|
Imports System.Collections
|
||||||
|
|
||||||
|
Namespace DB
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: provides a SqlConnection object which can be shared among data-access tier objects
|
||||||
|
' /// to provide a way to do ADO.NET transaction coding without the hassling with SqlConnection objects
|
||||||
|
' /// on a high level.
|
||||||
|
' /// </summary>
|
||||||
|
Public Class clsConnectionProvider
|
||||||
|
Implements IDisposable
|
||||||
|
|
||||||
|
#Region " Class Member Declarations "
|
||||||
|
|
||||||
|
Private m_scoDBConnection As SqlConnection
|
||||||
|
Private m_bIsTransactionPending, m_bIsDisposed As Boolean
|
||||||
|
Private m_stCurrentTransaction As SqlTransaction
|
||||||
|
Private m_alSavePoints As ArrayList
|
||||||
|
|
||||||
|
#End Region
|
||||||
|
|
||||||
|
|
||||||
|
Public Sub New()
|
||||||
|
' // Init the class
|
||||||
|
InitClass()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Implements the IDispose' method Dispose.
|
||||||
|
' /// </summary>
|
||||||
|
Overloads Public Sub Dispose() Implements IDisposable.Dispose
|
||||||
|
Dispose(True)
|
||||||
|
GC.SuppressFinalize(Me)
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Implements the Dispose functionality.
|
||||||
|
' /// </summary>
|
||||||
|
Overridable Overloads Protected Sub Dispose(ByVal bIsDisposing As Boolean)
|
||||||
|
' // Check to see if Dispose has already been called.
|
||||||
|
If Not m_bIsDisposed Then
|
||||||
|
If bIsDisposing Then
|
||||||
|
' // Dispose managed resources.
|
||||||
|
If Not (m_stCurrentTransaction Is Nothing) Then
|
||||||
|
m_stCurrentTransaction.Dispose()
|
||||||
|
m_stCurrentTransaction = Nothing
|
||||||
|
End If
|
||||||
|
If Not (m_scoDBConnection Is Nothing) Then
|
||||||
|
' // closing the connection will abort (rollback) any pending transactions
|
||||||
|
m_scoDBConnection.Close()
|
||||||
|
m_scoDBConnection.Dispose()
|
||||||
|
m_scoDBConnection = Nothing
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
m_bIsDisposed = True
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Initializes class members.
|
||||||
|
' /// </summary>
|
||||||
|
Private Sub InitClass()
|
||||||
|
' // Create all the objects and initialize other members.
|
||||||
|
m_scoDBConnection = new SqlConnection()
|
||||||
|
m_bIsDisposed = False
|
||||||
|
m_stCurrentTransaction = Nothing
|
||||||
|
m_bIsTransactionPending = False
|
||||||
|
m_alSavePoints = new ArrayList()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Opens the connection object.
|
||||||
|
' /// </summary>
|
||||||
|
' /// <returns>True, if succeeded, otherwise an Exception exception is thrown.</returns>
|
||||||
|
Public Function OpenConnection() As Boolean
|
||||||
|
Try
|
||||||
|
If (m_scoDBConnection.State And ConnectionState.Open) > 0 Then
|
||||||
|
' // It's already open.
|
||||||
|
Throw New Exception("OpenConnection::Connection is already open.")
|
||||||
|
End If
|
||||||
|
m_scoDBConnection.Open()
|
||||||
|
m_bIsTransactionPending = False
|
||||||
|
m_alSavePoints.Clear()
|
||||||
|
Return True
|
||||||
|
Catch ex As Exception
|
||||||
|
' // bubble exception
|
||||||
|
Throw ex
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Starts a new ADO.NET transaction using the open connection object of this class.
|
||||||
|
' /// </summary>
|
||||||
|
' /// <param name="sTransactionName">Name of the transaction to start</param>
|
||||||
|
' /// <returns>True, if transaction is started correctly, otherwise an Exception exception is thrown</returns>
|
||||||
|
Public Function BeginTransaction(sTransactionName As String) As Boolean
|
||||||
|
Try
|
||||||
|
If m_bIsTransactionPending Then
|
||||||
|
' // no nested transactions allowed.
|
||||||
|
Throw New Exception("BeginTransaction::Already transaction pending. Nesting not allowed")
|
||||||
|
End If
|
||||||
|
If (m_scoDBConnection.State And ConnectionState.Open) = 0 Then
|
||||||
|
' // no open connection
|
||||||
|
Throw New Exception("BeginTransaction::Connection is not open.")
|
||||||
|
End If
|
||||||
|
' // begin the transaction and store the transaction object.
|
||||||
|
m_stCurrentTransaction = m_scoDBConnection.BeginTransaction(IsolationLevel.ReadCommitted, sTransactionName)
|
||||||
|
m_bIsTransactionPending = True
|
||||||
|
Return True
|
||||||
|
Catch ex As Exception
|
||||||
|
' // bubble exception
|
||||||
|
Throw ex
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Commits a pending transaction on the open connection object of this class.
|
||||||
|
' /// </summary>
|
||||||
|
' /// <returns>True, if commit was succesful, or an Exception exception is thrown</returns>
|
||||||
|
Public Function CommitTransaction() As Boolean
|
||||||
|
Try
|
||||||
|
If Not m_bIsTransactionPending Then
|
||||||
|
' // no transaction pending
|
||||||
|
Throw New Exception("CommitTransaction::No transaction pending.")
|
||||||
|
End If
|
||||||
|
If (m_scoDBConnection.State And ConnectionState.Open) = 0 Then
|
||||||
|
' // no open connection
|
||||||
|
Throw New Exception("CommitTransaction::Connection is not open.")
|
||||||
|
End if
|
||||||
|
' // commit the transaction
|
||||||
|
m_stCurrentTransaction.Commit()
|
||||||
|
m_bIsTransactionPending = False
|
||||||
|
m_stCurrentTransaction.Dispose()
|
||||||
|
m_stCurrentTransaction = Nothing
|
||||||
|
m_alSavePoints.Clear()
|
||||||
|
Return True
|
||||||
|
Catch ex As Exception
|
||||||
|
' // bubble exception
|
||||||
|
Throw ex
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Rolls back a pending transaction on the open connection object of this class,
|
||||||
|
' /// or rolls back to the savepoint with the given name. Savepoints are created with SaveTransaction().
|
||||||
|
' /// </summary>
|
||||||
|
' /// <param name="sTransactionToRollback">Name of transaction to roll back. Can be name of savepoint</param>
|
||||||
|
' /// <returns>True, if rollback was succesful, or an Exception exception is thrown</returns>
|
||||||
|
Public Function RollbackTransaction(sTransactionToRollback As String) As Boolean
|
||||||
|
Try
|
||||||
|
If Not m_bIsTransactionPending Then
|
||||||
|
' // no transaction pending
|
||||||
|
Throw New Exception("RollbackTransaction::No transaction pending.")
|
||||||
|
End If
|
||||||
|
If (m_scoDBConnection.State And ConnectionState.Open) = 0 Then
|
||||||
|
' // no open connection
|
||||||
|
Throw New Exception("RollbackTransaction::Connection is not open.")
|
||||||
|
End If
|
||||||
|
' // rollback the transaction
|
||||||
|
m_stCurrentTransaction.Rollback(sTransactionToRollback)
|
||||||
|
' // if this wasn't a savepoint, we've rolled back the complete transaction, so we
|
||||||
|
' // can clean it up.
|
||||||
|
If Not m_alSavePoints.Contains(sTransactionToRollback) Then
|
||||||
|
' // it's not a savepoint
|
||||||
|
m_bIsTransactionPending = False
|
||||||
|
m_stCurrentTransaction.Dispose()
|
||||||
|
m_stCurrentTransaction = Nothing
|
||||||
|
m_alSavePoints.Clear()
|
||||||
|
End If
|
||||||
|
Return True
|
||||||
|
Catch ex As Exception
|
||||||
|
' // bubble exception
|
||||||
|
Throw ex
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Saves a pending transaction on the open connection object of this class to a 'savepoint'
|
||||||
|
' /// with the given name.
|
||||||
|
' /// When a rollback is issued, the caller can rollback to this savepoint or roll back the complete transaction.
|
||||||
|
' /// </summary>
|
||||||
|
' /// <param name="sSavePointName">Name of the savepoint to store the current transaction under.</param>
|
||||||
|
' /// <returns>True, if save was succesful, or an Exception exception is thrown</returns>
|
||||||
|
Public Function SaveTransaction(sSavePointName As String) As Boolean
|
||||||
|
Try
|
||||||
|
If Not m_bIsTransactionPending Then
|
||||||
|
' // no transaction pending
|
||||||
|
Throw New Exception("SaveTransaction::No transaction pending.")
|
||||||
|
End If
|
||||||
|
If (m_scoDBConnection.State And ConnectionState.Open) = 0 Then
|
||||||
|
' // no open connection
|
||||||
|
Throw New Exception("SaveTransaction::Connection is not open.")
|
||||||
|
End If
|
||||||
|
' // save the transaction
|
||||||
|
m_stCurrentTransaction.Save(sSavePointName)
|
||||||
|
' // Store the savepoint in the list.
|
||||||
|
m_alSavePoints.Add(sSavePointName)
|
||||||
|
Return True
|
||||||
|
Catch ex As Exception
|
||||||
|
' // bubble exception
|
||||||
|
Throw ex
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Closes the open connection. Depending on bCommitPendingTransactions, a pending
|
||||||
|
' /// transaction is commited, or aborted.
|
||||||
|
' /// </summary>
|
||||||
|
' /// <param name="bCommitPendingTransaction">Flag for what to do when a transaction is still pending. True
|
||||||
|
' /// will commit the current transaction, False will abort (rollback) the complete current transaction.</param>
|
||||||
|
' /// <returns>True, if close was succesful, False if connection was already closed, or an Exception exception is thrown when
|
||||||
|
' /// an error occurs</returns>
|
||||||
|
Public Function CloseConnection(bCommitPendingTransaction As Boolean) As Boolean
|
||||||
|
Try
|
||||||
|
If (m_scoDBConnection.State And ConnectionState.Open) = 0 Then
|
||||||
|
' // No open connection
|
||||||
|
Return False
|
||||||
|
End If
|
||||||
|
If m_bIsTransactionPending Then
|
||||||
|
If bCommitPendingTransaction Then
|
||||||
|
' // Commit the pending transaction
|
||||||
|
m_stCurrentTransaction.Commit()
|
||||||
|
Else
|
||||||
|
' // Rollback the pending transaction
|
||||||
|
m_stCurrentTransaction.Rollback()
|
||||||
|
End If
|
||||||
|
m_bIsTransactionPending = False
|
||||||
|
m_stCurrentTransaction.Dispose()
|
||||||
|
m_stCurrentTransaction = Nothing
|
||||||
|
m_alSavePoints.Clear()
|
||||||
|
End If
|
||||||
|
' // close the connection
|
||||||
|
m_scoDBConnection.Close()
|
||||||
|
Return True
|
||||||
|
Catch ex As Exception
|
||||||
|
' // bubble exception
|
||||||
|
Throw ex
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
#Region " Class Property Declarations "
|
||||||
|
|
||||||
|
Public ReadOnly Property stCurrentTransaction() As SqlTransaction
|
||||||
|
Get
|
||||||
|
Return m_stCurrentTransaction
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public ReadOnly Property bIsTransactionPending() As Boolean
|
||||||
|
Get
|
||||||
|
Return m_bIsTransactionPending
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public ReadOnly Property scoDBConnection() As SqlConnection
|
||||||
|
Get
|
||||||
|
Return m_scoDBConnection
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
Public WriteOnly Property sConnectionString() As String
|
||||||
|
Set (ByVal Value As String)
|
||||||
|
m_scoDBConnection.ConnectionString = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
#End Region
|
||||||
|
|
||||||
|
End Class
|
||||||
|
End Namespace
|
||||||
@ -0,0 +1,208 @@
|
|||||||
|
' //////////////////////////////////////////////////////////////////////////////////////////
|
||||||
|
' // Description: Base class for Database Interaction.
|
||||||
|
' // Generated by LLBLGen v1.21.2003.712 Final on: Dienstag, 1. Januar 2013, 19:36:38
|
||||||
|
' // Because this class implements IDisposable, derived classes shouldn't do so.
|
||||||
|
' //////////////////////////////////////////////////////////////////////////////////////////
|
||||||
|
Imports System
|
||||||
|
Imports System.Configuration
|
||||||
|
Imports System.Data
|
||||||
|
Imports System.Data.SqlClient
|
||||||
|
Imports System.Data.SqlTypes
|
||||||
|
|
||||||
|
Namespace DB
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Error Enums used by this LLBL library.
|
||||||
|
' /// </summary>
|
||||||
|
Public Enum LLBLError
|
||||||
|
AllOk
|
||||||
|
' // Add more here (check the comma's!)
|
||||||
|
End Enum
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: General interface of the API generated. Contains only common methods of all classes.
|
||||||
|
' /// </summary>
|
||||||
|
Public Interface ICommonDBAccess
|
||||||
|
Function Insert() As Boolean
|
||||||
|
Function Update() As Boolean
|
||||||
|
Function Delete() As Boolean
|
||||||
|
Function SelectOne() As DataTable
|
||||||
|
Function SelectAll() As DataTable
|
||||||
|
End Interface
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Abstract base class for Database Interaction classes.
|
||||||
|
' /// </summary>
|
||||||
|
Public MustInherit Class clsDBInteractionBase
|
||||||
|
Implements IDisposable
|
||||||
|
Implements ICommonDBAccess
|
||||||
|
|
||||||
|
#Region " Class Member Declarations "
|
||||||
|
|
||||||
|
Protected m_scoMainConnection As SqlConnection
|
||||||
|
Protected m_iRowsAffected As Integer
|
||||||
|
Protected m_iErrorCode As SqlInt32
|
||||||
|
Protected m_bMainConnectionIsCreatedLocal As Boolean
|
||||||
|
Protected m_cpMainConnectionProvider As clsConnectionProvider
|
||||||
|
Private m_sConnectionString As String
|
||||||
|
Private m_bIsDisposed As Boolean
|
||||||
|
|
||||||
|
#End Region
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Class constructor.
|
||||||
|
' /// </summary>
|
||||||
|
Public Sub New()
|
||||||
|
' // Initialize the class' members.
|
||||||
|
InitClass()
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Initializes class members.
|
||||||
|
' /// </summary>
|
||||||
|
Private Sub InitClass()
|
||||||
|
' // create all the objects and initialize other members.
|
||||||
|
m_scoMainConnection = new SqlConnection()
|
||||||
|
m_bMainConnectionIsCreatedLocal = True
|
||||||
|
m_cpMainConnectionProvider = Nothing
|
||||||
|
m_iErrorCode = New SqlInt32(LLBLError.AllOk)
|
||||||
|
m_bIsDisposed = False
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Implements the IDispose' method Dispose.
|
||||||
|
' /// </summary>
|
||||||
|
Overloads Public Sub Dispose() Implements IDisposable.Dispose
|
||||||
|
Dispose(True)
|
||||||
|
GC.SuppressFinalize(Me)
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Implements the Dispose functionality.
|
||||||
|
' /// </summary>
|
||||||
|
Overridable Overloads Protected Sub Dispose(ByVal bIsDisposing As Boolean)
|
||||||
|
' // Check to see if Dispose has already been called.
|
||||||
|
If Not m_bIsDisposed Then
|
||||||
|
If bIsDisposing Then
|
||||||
|
' // Dispose managed resources.
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Object is created in this class, so destroy it here.
|
||||||
|
m_scoMainConnection.Close()
|
||||||
|
m_scoMainConnection.Dispose()
|
||||||
|
m_bMainConnectionIsCreatedLocal = True
|
||||||
|
End If
|
||||||
|
m_cpMainConnectionProvider = Nothing
|
||||||
|
m_scoMainConnection = Nothing
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
m_bIsDisposed = True
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Implements the ICommonDBAccess.Insert() method.
|
||||||
|
' /// </summary>
|
||||||
|
Public Overridable Function Insert() As Boolean Implements ICommonDBAccess.Insert
|
||||||
|
' // No implementation, throw exception
|
||||||
|
Throw New NotImplementedException()
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Implements the ICommonDBAccess.Delete() method.
|
||||||
|
' /// </summary>
|
||||||
|
Public Overridable Function Delete() As Boolean Implements ICommonDBAccess.Delete
|
||||||
|
' // No implementation, throw exception
|
||||||
|
Throw New NotImplementedException()
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Implements the ICommonDBAccess.Update() method.
|
||||||
|
' /// </summary>
|
||||||
|
Public Overridable Function Update() As Boolean Implements ICommonDBAccess.Update
|
||||||
|
' // No implementation, throw exception
|
||||||
|
Throw New NotImplementedException()
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Implements the ICommonDBAccess.SelectOne() method.
|
||||||
|
' /// </summary>
|
||||||
|
Public Overridable Function SelectOne() As DataTable Implements ICommonDBAccess.SelectOne
|
||||||
|
' // No implementation, throw exception
|
||||||
|
Throw New NotImplementedException()
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
' /// <summary>
|
||||||
|
' /// Purpose: Implements the ICommonDBAccess.SelectAll() method.
|
||||||
|
' /// </summary>
|
||||||
|
Public Overridable Function SelectAll() As DataTable Implements ICommonDBAccess.SelectAll
|
||||||
|
' // No implementation, throw exception
|
||||||
|
Throw New NotImplementedException()
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
#Region " Class Property Declarations "
|
||||||
|
|
||||||
|
Public WriteOnly Property cpMainConnectionProvider() As clsConnectionProvider
|
||||||
|
Set(ByVal Value As clsConnectionProvider)
|
||||||
|
If Value Is Nothing Then
|
||||||
|
' // Invalid value
|
||||||
|
Throw New ArgumentNullException("cpMainConnectionProvider", "Nothing passed as value to this property which is not allowed.")
|
||||||
|
End If
|
||||||
|
|
||||||
|
' // A connection provider object is passed to this class.
|
||||||
|
' // Retrieve the SqlConnection object, if present and create a
|
||||||
|
' // reference to it. If there is already a MainConnection object
|
||||||
|
' // referenced by the membervar, destroy that one or simply
|
||||||
|
' // remove the reference, based on the flag.
|
||||||
|
If Not (m_scoMainConnection Is Nothing) Then
|
||||||
|
' // First get rid of current connection object. Caller is responsible
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Is local created object, close it and dispose it.
|
||||||
|
m_scoMainConnection.Close()
|
||||||
|
m_scoMainConnection.Dispose()
|
||||||
|
End If
|
||||||
|
' // Remove reference.
|
||||||
|
m_scoMainConnection = Nothing
|
||||||
|
End If
|
||||||
|
m_cpMainConnectionProvider = CType(Value, clsConnectionProvider)
|
||||||
|
m_scoMainConnection = m_cpMainConnectionProvider.scoDBConnection
|
||||||
|
m_bMainConnectionIsCreatedLocal = False
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public ReadOnly Property iErrorCode() As SqlInt32
|
||||||
|
Get
|
||||||
|
Return m_iErrorCode
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property sConnectionString() As String
|
||||||
|
Get
|
||||||
|
Return m_sConnectionString
|
||||||
|
End Get
|
||||||
|
Set (ByVal Value As String)
|
||||||
|
m_sConnectionString = Value
|
||||||
|
m_scoMainConnection.ConnectionString = m_sConnectionString
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
Public Readonly Property iRowsAffected() As Integer
|
||||||
|
Get
|
||||||
|
Return m_iRowsAffected
|
||||||
|
End Get
|
||||||
|
End Property
|
||||||
|
|
||||||
|
#End Region
|
||||||
|
|
||||||
|
End Class
|
||||||
|
End Namespace
|
||||||
@ -0,0 +1,491 @@
|
|||||||
|
' ///////////////////////////////////////////////////////////////////////////
|
||||||
|
' // Description: Data Access class for the table 'key_tabelle'
|
||||||
|
' // Generated by LLBLGen v1.21.2003.712 Final on: Dienstag, 1. Januar 2013, 19:36:38
|
||||||
|
' // Because the Base Class already implements IDispose, this class doesn't.
|
||||||
|
' ///////////////////////////////////////////////////////////////////////////
|
||||||
|
Imports System
|
||||||
|
Imports System.Data
|
||||||
|
Imports System.Data.SqlTypes
|
||||||
|
Imports System.Data.SqlClient
|
||||||
|
|
||||||
|
Namespace DB
|
||||||
|
''' <summary>
|
||||||
|
''' Purpose: Data Access class for the table 'key_tabelle'.
|
||||||
|
''' </summary>
|
||||||
|
Public Class clsKey_tabelle
|
||||||
|
Inherits clsDBInteractionBase
|
||||||
|
|
||||||
|
#Region " Class Member Declarations "
|
||||||
|
|
||||||
|
Private m_bAktiv As SqlBoolean
|
||||||
|
Private m_daErstellt_am, m_daMutiert_am As SqlDateTime
|
||||||
|
Private m_iMutierer, m_iKeynr, m_iKey_wert, m_iMandantnr As SqlInt32
|
||||||
|
Private m_sBeschreibung As SqlString
|
||||||
|
|
||||||
|
#End Region
|
||||||
|
|
||||||
|
|
||||||
|
''' <summary>
|
||||||
|
''' Purpose: Class constructor.
|
||||||
|
''' </summary>
|
||||||
|
Public Sub New()
|
||||||
|
' // Nothing for now.
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
''' <summary>
|
||||||
|
''' Purpose: Insert method. This method will insert one new row into the database.
|
||||||
|
''' </summary>
|
||||||
|
''' <returns>True if succeeded, otherwise an Exception is thrown. </returns>
|
||||||
|
''' <remarks>
|
||||||
|
''' Properties needed for this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>sBeschreibung</LI>
|
||||||
|
''' <LI>iKey_wert</LI>
|
||||||
|
''' <LI>iMandantnr. May be SqlInt32.Null</LI>
|
||||||
|
''' <LI>bAktiv. May be SqlBoolean.Null</LI>
|
||||||
|
''' <LI>daErstellt_am. May be SqlDateTime.Null</LI>
|
||||||
|
''' <LI>daMutiert_am. May be SqlDateTime.Null</LI>
|
||||||
|
''' <LI>iMutierer. May be SqlInt32.Null</LI>
|
||||||
|
''' </UL>
|
||||||
|
''' Properties set after a succesful call of this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>iKeynr</LI>
|
||||||
|
''' <LI>iErrorCode</LI>
|
||||||
|
'''</UL>
|
||||||
|
''' </remarks>
|
||||||
|
Overrides Public Function Insert() As Boolean
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[pr_key_tabelle_Insert]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = m_scoMainConnection
|
||||||
|
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@sbeschreibung", SqlDbType.VarChar, 255, ParameterDirection.Input, False, 0, 0, "", DataRowVersion.Proposed, m_sBeschreibung))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@ikey_wert", SqlDbType.Int, 4, ParameterDirection.Input, False, 10, 0, "", DataRowVersion.Proposed, m_iKey_wert))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@imandantnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, m_iMandantnr))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@baktiv", SqlDbType.Bit, 1, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_bAktiv))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@daerstellt_am", SqlDbType.DateTime, 8, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_daErstellt_am))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@damutiert_am", SqlDbType.DateTime, 8, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_daMutiert_am))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@imutierer", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, m_iMutierer))
|
||||||
|
scmCmdToExecute.Parameters.Add(new SqlParameter("@ikeynr", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, m_iKeynr))
|
||||||
|
scmCmdToExecute.Parameters.Add(new SqlParameter("@iErrorCode", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, m_iErrorCode))
|
||||||
|
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Open connection.
|
||||||
|
m_scoMainConnection.Open()
|
||||||
|
Else
|
||||||
|
If m_cpMainConnectionProvider.bIsTransactionPending Then
|
||||||
|
scmCmdToExecute.Transaction = m_cpMainConnectionProvider.stCurrentTransaction
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
' // Execute query.
|
||||||
|
m_iRowsAffected = scmCmdToExecute.ExecuteNonQuery()
|
||||||
|
m_iKeynr = New SqlInt32(CType(scmCmdToExecute.Parameters.Item("@ikeynr").Value, Integer))
|
||||||
|
m_iErrorCode = New SqlInt32(CType(scmCmdToExecute.Parameters.Item("@iErrorCode").Value, SqlInt32))
|
||||||
|
|
||||||
|
If Not m_iErrorCode.Equals(New SqlInt32(LLBLError.AllOk)) Then
|
||||||
|
' // Throw error.
|
||||||
|
Throw New Exception("Stored Procedure 'pr_key_tabelle_Insert' reported the ErrorCode: " & m_iErrorCode.ToString())
|
||||||
|
End If
|
||||||
|
|
||||||
|
Return True
|
||||||
|
Catch ex As Exception
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
Throw New Exception("clsKey_tabelle::Insert::Error occured.", ex)
|
||||||
|
Finally
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Close connection.
|
||||||
|
m_scoMainConnection.Close()
|
||||||
|
End If
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
''' <summary>
|
||||||
|
''' Purpose: Update method. This method will Update one existing row in the database.
|
||||||
|
''' </summary>
|
||||||
|
''' <returns>True if succeeded, otherwise an Exception is thrown. </returns>
|
||||||
|
''' <remarks>
|
||||||
|
''' Properties needed for this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>iKeynr</LI>
|
||||||
|
''' <LI>sBeschreibung</LI>
|
||||||
|
''' <LI>iKey_wert</LI>
|
||||||
|
''' <LI>iMandantnr. May be SqlInt32.Null</LI>
|
||||||
|
''' <LI>bAktiv. May be SqlBoolean.Null</LI>
|
||||||
|
''' <LI>daErstellt_am. May be SqlDateTime.Null</LI>
|
||||||
|
''' <LI>daMutiert_am. May be SqlDateTime.Null</LI>
|
||||||
|
''' <LI>iMutierer. May be SqlInt32.Null</LI>
|
||||||
|
''' </UL>
|
||||||
|
''' Properties set after a succesful call of this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>iErrorCode</LI>
|
||||||
|
'''</UL>
|
||||||
|
''' </remarks>
|
||||||
|
Overrides Public Function Update() As Boolean
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[pr_key_tabelle_Update]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = m_scoMainConnection
|
||||||
|
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@ikeynr", SqlDbType.Int, 4, ParameterDirection.Input, False, 10, 0, "", DataRowVersion.Proposed, m_iKeynr))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@sbeschreibung", SqlDbType.VarChar, 255, ParameterDirection.Input, False, 0, 0, "", DataRowVersion.Proposed, m_sBeschreibung))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@ikey_wert", SqlDbType.Int, 4, ParameterDirection.Input, False, 10, 0, "", DataRowVersion.Proposed, m_iKey_wert))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@imandantnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, m_iMandantnr))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@baktiv", SqlDbType.Bit, 1, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_bAktiv))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@daerstellt_am", SqlDbType.DateTime, 8, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_daErstellt_am))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@damutiert_am", SqlDbType.DateTime, 8, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_daMutiert_am))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@imutierer", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, m_iMutierer))
|
||||||
|
scmCmdToExecute.Parameters.Add(new SqlParameter("@iErrorCode", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, m_iErrorCode))
|
||||||
|
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Open connection.
|
||||||
|
m_scoMainConnection.Open()
|
||||||
|
Else
|
||||||
|
If m_cpMainConnectionProvider.bIsTransactionPending Then
|
||||||
|
scmCmdToExecute.Transaction = m_cpMainConnectionProvider.stCurrentTransaction
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
' // Execute query.
|
||||||
|
m_iRowsAffected = scmCmdToExecute.ExecuteNonQuery()
|
||||||
|
m_iErrorCode = New SqlInt32(CType(scmCmdToExecute.Parameters.Item("@iErrorCode").Value, SqlInt32))
|
||||||
|
|
||||||
|
If Not m_iErrorCode.Equals(New SqlInt32(LLBLError.AllOk)) Then
|
||||||
|
' // Throw error.
|
||||||
|
Throw New Exception("Stored Procedure 'pr_key_tabelle_Update' reported the ErrorCode: " & m_iErrorCode.ToString())
|
||||||
|
End If
|
||||||
|
|
||||||
|
Return True
|
||||||
|
Catch ex As Exception
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
Throw New Exception("clsKey_tabelle::Update::Error occured.", ex)
|
||||||
|
Finally
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Close connection.
|
||||||
|
m_scoMainConnection.Close()
|
||||||
|
End If
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
''' <summary>
|
||||||
|
''' Purpose: Delete method. This method will Delete one existing row in the database, based on the Primary Key.
|
||||||
|
''' </summary>
|
||||||
|
''' <returns>True if succeeded, otherwise an Exception is thrown. </returns>
|
||||||
|
''' <remarks>
|
||||||
|
''' Properties needed for this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>iKeynr</LI>
|
||||||
|
''' </UL>
|
||||||
|
''' Properties set after a succesful call of this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>iErrorCode</LI>
|
||||||
|
'''</UL>
|
||||||
|
''' </remarks>
|
||||||
|
Overrides Public Function Delete() As Boolean
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[pr_key_tabelle_Delete]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = m_scoMainConnection
|
||||||
|
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@ikeynr", SqlDbType.Int, 4, ParameterDirection.Input, False, 10, 0, "", DataRowVersion.Proposed, m_iKeynr))
|
||||||
|
scmCmdToExecute.Parameters.Add(new SqlParameter("@iErrorCode", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, m_iErrorCode))
|
||||||
|
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Open connection.
|
||||||
|
m_scoMainConnection.Open()
|
||||||
|
Else
|
||||||
|
If m_cpMainConnectionProvider.bIsTransactionPending Then
|
||||||
|
scmCmdToExecute.Transaction = m_cpMainConnectionProvider.stCurrentTransaction
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
' // Execute query.
|
||||||
|
m_iRowsAffected = scmCmdToExecute.ExecuteNonQuery()
|
||||||
|
m_iErrorCode = New SqlInt32(CType(scmCmdToExecute.Parameters.Item("@iErrorCode").Value, SqlInt32))
|
||||||
|
|
||||||
|
If Not m_iErrorCode.Equals(New SqlInt32(LLBLError.AllOk)) Then
|
||||||
|
' // Throw error.
|
||||||
|
Throw New Exception("Stored Procedure 'pr_key_tabelle_Delete' reported the ErrorCode: " & m_iErrorCode.ToString())
|
||||||
|
End If
|
||||||
|
|
||||||
|
Return True
|
||||||
|
Catch ex As Exception
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
Throw New Exception("clsKey_tabelle::Delete::Error occured.", ex)
|
||||||
|
Finally
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Close connection.
|
||||||
|
m_scoMainConnection.Close()
|
||||||
|
End If
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
''' <summary>
|
||||||
|
''' Purpose: Select method. This method will Select one existing row from the database, based on the Primary Key.
|
||||||
|
''' </summary>
|
||||||
|
''' <returns>DataTable object if succeeded, otherwise an Exception is thrown. </returns>
|
||||||
|
''' <remarks>
|
||||||
|
''' Properties needed for this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>iKeynr</LI>
|
||||||
|
''' </UL>
|
||||||
|
''' Properties set after a succesful call of this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>iErrorCode</LI>
|
||||||
|
''' <LI>iKeynr</LI>
|
||||||
|
''' <LI>sBeschreibung</LI>
|
||||||
|
''' <LI>iKey_wert</LI>
|
||||||
|
''' <LI>iMandantnr</LI>
|
||||||
|
''' <LI>bAktiv</LI>
|
||||||
|
''' <LI>daErstellt_am</LI>
|
||||||
|
''' <LI>daMutiert_am</LI>
|
||||||
|
''' <LI>iMutierer</LI>
|
||||||
|
'''</UL>
|
||||||
|
''' Will fill all properties corresponding with a field in the table with the value of the row selected.
|
||||||
|
''' </remarks>
|
||||||
|
Overrides Public Function SelectOne() As DataTable
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[pr_key_tabelle_SelectOne]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
Dim dtToReturn As DataTable = new DataTable("key_tabelle")
|
||||||
|
Dim sdaAdapter As SqlDataAdapter = new SqlDataAdapter(scmCmdToExecute)
|
||||||
|
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = m_scoMainConnection
|
||||||
|
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(new SqlParameter("@ikeynr", SqlDbType.Int, 4, ParameterDirection.Input, False, 10, 0, "", DataRowVersion.Proposed, m_iKeynr))
|
||||||
|
scmCmdToExecute.Parameters.Add(new SqlParameter("@iErrorCode", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, m_iErrorCode))
|
||||||
|
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Open connection.
|
||||||
|
m_scoMainConnection.Open()
|
||||||
|
Else
|
||||||
|
If m_cpMainConnectionProvider.bIsTransactionPending Then
|
||||||
|
scmCmdToExecute.Transaction = m_cpMainConnectionProvider.stCurrentTransaction
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
' // Execute query.
|
||||||
|
sdaAdapter.Fill(dtToReturn)
|
||||||
|
m_iErrorCode = New SqlInt32(CType(scmCmdToExecute.Parameters.Item("@iErrorCode").Value, SqlInt32))
|
||||||
|
|
||||||
|
If Not m_iErrorCode.Equals(New SqlInt32(LLBLError.AllOk)) Then
|
||||||
|
' // Throw error.
|
||||||
|
Throw New Exception("Stored Procedure 'pr_key_tabelle_SelectOne' reported the ErrorCode: " & m_iErrorCode.ToString())
|
||||||
|
End If
|
||||||
|
|
||||||
|
If dtToReturn.Rows.Count > 0 Then
|
||||||
|
m_iKeynr = New SqlInt32(CType(dtToReturn.Rows(0)("keynr"), Integer))
|
||||||
|
m_sBeschreibung = New SqlString(CType(dtToReturn.Rows(0)("beschreibung"), String))
|
||||||
|
m_iKey_wert = New SqlInt32(CType(dtToReturn.Rows(0)("key_wert"), Integer))
|
||||||
|
If dtToReturn.Rows(0)("mandantnr") Is System.DBNull.Value Then
|
||||||
|
m_iMandantnr = SqlInt32.Null
|
||||||
|
Else
|
||||||
|
m_iMandantnr = New SqlInt32(CType(dtToReturn.Rows(0)("mandantnr"), Integer))
|
||||||
|
End If
|
||||||
|
If dtToReturn.Rows(0)("aktiv") Is System.DBNull.Value Then
|
||||||
|
m_bAktiv = SqlBoolean.Null
|
||||||
|
Else
|
||||||
|
m_bAktiv = New SqlBoolean(CType(dtToReturn.Rows(0)("aktiv"), Boolean))
|
||||||
|
End If
|
||||||
|
If dtToReturn.Rows(0)("erstellt_am") Is System.DBNull.Value Then
|
||||||
|
m_daErstellt_am = SqlDateTime.Null
|
||||||
|
Else
|
||||||
|
m_daErstellt_am = New SqlDateTime(CType(dtToReturn.Rows(0)("erstellt_am"), Date))
|
||||||
|
End If
|
||||||
|
If dtToReturn.Rows(0)("mutiert_am") Is System.DBNull.Value Then
|
||||||
|
m_daMutiert_am = SqlDateTime.Null
|
||||||
|
Else
|
||||||
|
m_daMutiert_am = New SqlDateTime(CType(dtToReturn.Rows(0)("mutiert_am"), Date))
|
||||||
|
End If
|
||||||
|
If dtToReturn.Rows(0)("mutierer") Is System.DBNull.Value Then
|
||||||
|
m_iMutierer = SqlInt32.Null
|
||||||
|
Else
|
||||||
|
m_iMutierer = New SqlInt32(CType(dtToReturn.Rows(0)("mutierer"), Integer))
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
Return dtToReturn
|
||||||
|
Catch ex As Exception
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
Throw New Exception("clsKey_tabelle::SelectOne::Error occured.", ex)
|
||||||
|
Finally
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Close connection.
|
||||||
|
m_scoMainConnection.Close()
|
||||||
|
End If
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
sdaAdapter.Dispose()
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
''' <summary>
|
||||||
|
''' Purpose: SelectAll method. This method will Select all rows from the table.
|
||||||
|
''' </summary>
|
||||||
|
''' <returns>DataTable object if succeeded, otherwise an Exception is thrown. </returns>
|
||||||
|
''' <remarks>
|
||||||
|
''' Properties set after a succesful call of this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>iErrorCode</LI>
|
||||||
|
'''</UL>
|
||||||
|
''' </remarks>
|
||||||
|
Overrides Public Function SelectAll() As DataTable
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[pr_key_tabelle_SelectAll]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
Dim dtToReturn As DataTable = new DataTable("key_tabelle")
|
||||||
|
Dim sdaAdapter As SqlDataAdapter = new SqlDataAdapter(scmCmdToExecute)
|
||||||
|
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = m_scoMainConnection
|
||||||
|
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(new SqlParameter("@iErrorCode", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, m_iErrorCode))
|
||||||
|
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Open connection.
|
||||||
|
m_scoMainConnection.Open()
|
||||||
|
Else
|
||||||
|
If m_cpMainConnectionProvider.bIsTransactionPending Then
|
||||||
|
scmCmdToExecute.Transaction = m_cpMainConnectionProvider.stCurrentTransaction
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
' // Execute query.
|
||||||
|
sdaAdapter.Fill(dtToReturn)
|
||||||
|
m_iErrorCode = New SqlInt32(CType(scmCmdToExecute.Parameters.Item("@iErrorCode").Value, SqlInt32))
|
||||||
|
|
||||||
|
If Not m_iErrorCode.Equals(New SqlInt32(LLBLError.AllOk)) Then
|
||||||
|
' // Throw error.
|
||||||
|
Throw New Exception("Stored Procedure 'pr_key_tabelle_SelectAll' reported the ErrorCode: " & m_iErrorCode.ToString())
|
||||||
|
End If
|
||||||
|
|
||||||
|
Return dtToReturn
|
||||||
|
Catch ex As Exception
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
Throw New Exception("clsKey_tabelle::SelectAll::Error occured.", ex)
|
||||||
|
Finally
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Close connection.
|
||||||
|
m_scoMainConnection.Close()
|
||||||
|
End If
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
sdaAdapter.Dispose()
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
#Region " Class Property Declarations "
|
||||||
|
|
||||||
|
Public Property [iKeynr]() As SqlInt32
|
||||||
|
Get
|
||||||
|
Return m_iKeynr
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlInt32)
|
||||||
|
Dim iKeynrTmp As SqlInt32 = Value
|
||||||
|
If iKeynrTmp.IsNull Then
|
||||||
|
Throw New ArgumentOutOfRangeException("iKeynr", "iKeynr can't be NULL")
|
||||||
|
End If
|
||||||
|
m_iKeynr = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [sBeschreibung]() As SqlString
|
||||||
|
Get
|
||||||
|
Return m_sBeschreibung
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlString)
|
||||||
|
Dim sBeschreibungTmp As SqlString = Value
|
||||||
|
If sBeschreibungTmp.IsNull Then
|
||||||
|
Throw New ArgumentOutOfRangeException("sBeschreibung", "sBeschreibung can't be NULL")
|
||||||
|
End If
|
||||||
|
m_sBeschreibung = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [iKey_wert]() As SqlInt32
|
||||||
|
Get
|
||||||
|
Return m_iKey_wert
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlInt32)
|
||||||
|
Dim iKey_wertTmp As SqlInt32 = Value
|
||||||
|
If iKey_wertTmp.IsNull Then
|
||||||
|
Throw New ArgumentOutOfRangeException("iKey_wert", "iKey_wert can't be NULL")
|
||||||
|
End If
|
||||||
|
m_iKey_wert = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [iMandantnr]() As SqlInt32
|
||||||
|
Get
|
||||||
|
Return m_iMandantnr
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlInt32)
|
||||||
|
m_iMandantnr = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [bAktiv]() As SqlBoolean
|
||||||
|
Get
|
||||||
|
Return m_bAktiv
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlBoolean)
|
||||||
|
m_bAktiv = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [daErstellt_am]() As SqlDateTime
|
||||||
|
Get
|
||||||
|
Return m_daErstellt_am
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlDateTime)
|
||||||
|
m_daErstellt_am = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [daMutiert_am]() As SqlDateTime
|
||||||
|
Get
|
||||||
|
Return m_daMutiert_am
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlDateTime)
|
||||||
|
m_daMutiert_am = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [iMutierer]() As SqlInt32
|
||||||
|
Get
|
||||||
|
Return m_iMutierer
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlInt32)
|
||||||
|
m_iMutierer = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
#End Region
|
||||||
|
|
||||||
|
End Class
|
||||||
|
End Namespace
|
||||||
@ -0,0 +1,200 @@
|
|||||||
|
Imports System
|
||||||
|
Imports System.Data
|
||||||
|
Imports System.Data.SqlTypes
|
||||||
|
Imports System.Data.SqlClient
|
||||||
|
|
||||||
|
Namespace edokadb
|
||||||
|
Public Class clsMyPartner
|
||||||
|
Public Function search_partner(ByVal query As String, ByVal anzahl As String, ByVal fnkt As Integer) As DataTable
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
Dim table As String = "dbo.partner"
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[sp_search_partner]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
Dim dtToReturn As DataTable = New DataTable("partner")
|
||||||
|
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
|
||||||
|
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = conn.scoDBConnection
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@query", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, query))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@table", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, table))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@anz", SqlDbType.VarChar, 10, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, anzahl))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@fnkt", SqlDbType.VarChar, 1, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, fnkt))
|
||||||
|
scmCmdToExecute.Connection.Open()
|
||||||
|
sdaAdapter.Fill(dtToReturn)
|
||||||
|
Return dtToReturn
|
||||||
|
Catch ex As Exception
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
Throw New Exception("clsMyPartner::sp_partner_search::Error occured." + ex.Message, ex)
|
||||||
|
Finally
|
||||||
|
scmCmdToExecute.Connection.Close()
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
sdaAdapter.Dispose()
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Public Function search_doppelte_partner(ByVal query As String, ByVal table As String, ByVal fnkt As Integer) As DataTable
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[sp_partner_search]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
Dim dtToReturn As DataTable = New DataTable("partner")
|
||||||
|
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
|
||||||
|
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = conn.scoDBConnection
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@query", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, query))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@table", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, table))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@anz", SqlDbType.VarChar, 10, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, 0))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@fnkt", SqlDbType.VarChar, 1, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, 4))
|
||||||
|
scmCmdToExecute.Connection.Open()
|
||||||
|
sdaAdapter.Fill(dtToReturn)
|
||||||
|
Return dtToReturn
|
||||||
|
Catch ex As Exception
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
Throw New Exception("clsMyPartner::sp_partner_search::Error occured." + ex.Message, ex)
|
||||||
|
Finally
|
||||||
|
scmCmdToExecute.Connection.Close()
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
sdaAdapter.Dispose()
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
Public Function Partner_Detail(ByVal nrpar00 As String) As DataTable
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
Dim table As String = "dbo.partner"
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[sp_partner_detail]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
Dim dtToReturn As DataTable = New DataTable("partner")
|
||||||
|
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
|
||||||
|
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = conn.scoDBConnection
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@nrpar00", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, nrpar00))
|
||||||
|
scmCmdToExecute.Connection.Open()
|
||||||
|
sdaAdapter.Fill(dtToReturn)
|
||||||
|
Return dtToReturn
|
||||||
|
Catch ex As Exception
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
Throw New Exception("clsMyPartner::sp_partner_detail::Error occured." + ex.Message, ex)
|
||||||
|
Finally
|
||||||
|
scmCmdToExecute.Connection.Close()
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
sdaAdapter.Dispose()
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Public Function Partner_zus_Adressen(ByVal nrpar00 As String) As DataTable
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
Dim table As String = "dbo.partner"
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[sp_partner_zus_adressen]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
Dim dtToReturn As DataTable = New DataTable("partner")
|
||||||
|
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
|
||||||
|
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = conn.scoDBConnection
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@nrpar00", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, nrpar00))
|
||||||
|
scmCmdToExecute.Connection.Open()
|
||||||
|
sdaAdapter.Fill(dtToReturn)
|
||||||
|
Return dtToReturn
|
||||||
|
Catch ex As Exception
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
Throw New Exception("clsMyPartner::sp_partner_detail::Error occured." + ex.Message, ex)
|
||||||
|
Finally
|
||||||
|
scmCmdToExecute.Connection.Close()
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
sdaAdapter.Dispose()
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
Public Function Partner_VV(ByVal nrpar00 As String) As DataTable
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
Dim table As String = "dbo.partner"
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[sp_partner_vv]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
Dim dtToReturn As DataTable = New DataTable("partner")
|
||||||
|
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
|
||||||
|
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = conn.scoDBConnection
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@nrpar00", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, nrpar00))
|
||||||
|
scmCmdToExecute.Connection.Open()
|
||||||
|
sdaAdapter.Fill(dtToReturn)
|
||||||
|
Return dtToReturn
|
||||||
|
Catch ex As Exception
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
Throw New Exception("clsMyPartner::sp_partner_vv::Error occured." + ex.Message, ex)
|
||||||
|
Finally
|
||||||
|
scmCmdToExecute.Connection.Close()
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
sdaAdapter.Dispose()
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Public Function Partner_Gebdat(ByVal nrpar00 As String) As String
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
Dim table As String = "dbo.partner"
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[sp_partner_gebdat]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
Dim dtToReturn As DataTable = New DataTable("partner")
|
||||||
|
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
|
||||||
|
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = conn.scoDBConnection
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@nrpar00", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, nrpar00))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@gebdat", SqlDbType.VarChar, 255, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, ""))
|
||||||
|
scmCmdToExecute.Connection.Open()
|
||||||
|
sdaAdapter.Fill(dtToReturn)
|
||||||
|
|
||||||
|
Return scmCmdToExecute.Parameters("@gebdat").Value
|
||||||
|
Catch ex As Exception
|
||||||
|
' MsgBox(ex.Message)
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
' Throw New Exception("clsMyPartner::sp_partner_vv::Error occured." + ex.Message, ex)
|
||||||
|
Return ""
|
||||||
|
Finally
|
||||||
|
scmCmdToExecute.Connection.Close()
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
sdaAdapter.Dispose()
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
Public Function Partner_Betreuer(ByVal nrpar00 As String) As String
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
Dim table As String = "dbo.partner"
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[sp_partner_betreuer]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
Dim dtToReturn As DataTable = New DataTable("partner")
|
||||||
|
Dim sdaAdapter As SqlDataAdapter = New SqlDataAdapter(scmCmdToExecute)
|
||||||
|
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = conn.scoDBConnection
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@nrpar00", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, nrpar00))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@betreuer", SqlDbType.VarChar, 255, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, ""))
|
||||||
|
scmCmdToExecute.Connection.Open()
|
||||||
|
sdaAdapter.Fill(dtToReturn)
|
||||||
|
Return scmCmdToExecute.Parameters("@betreuer").Value
|
||||||
|
Catch ex As Exception
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
Throw New Exception("clsMyPartner::sp_partner_vv::Error occured." + ex.Message, ex)
|
||||||
|
Return ""
|
||||||
|
Finally
|
||||||
|
scmCmdToExecute.Connection.Close()
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
sdaAdapter.Dispose()
|
||||||
|
dtToReturn.Dispose()
|
||||||
|
End Try
|
||||||
|
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
End Class
|
||||||
|
End Namespace
|
||||||
@ -0,0 +1,630 @@
|
|||||||
|
' ///////////////////////////////////////////////////////////////////////////
|
||||||
|
' // Description: Data Access class for the table 'spalten'
|
||||||
|
' // Generated by LLBLGen v1.21.2003.712 Final on: Dienstag, 1. Januar 2013, 13:15:45
|
||||||
|
' // Because the Base Class already implements IDispose, this class doesn't.
|
||||||
|
' ///////////////////////////////////////////////////////////////////////////
|
||||||
|
Imports System
|
||||||
|
Imports System.Data
|
||||||
|
Imports System.Data.SqlTypes
|
||||||
|
Imports System.Data.SqlClient
|
||||||
|
|
||||||
|
Namespace db
|
||||||
|
''' <summary>
|
||||||
|
''' Purpose: Data Access class for the table 'spalten'.
|
||||||
|
''' </summary>
|
||||||
|
Public Class clsSpalten
|
||||||
|
Inherits clsDBInteractionBase
|
||||||
|
|
||||||
|
#Region " Class Member Declarations "
|
||||||
|
|
||||||
|
Private m_bReadonly, m_bAlsHacken, m_bAktiv As SqlBoolean
|
||||||
|
Private m_daErstellt_am, m_daMutiert_am As SqlDateTime
|
||||||
|
Private m_iMandantnr, m_iMutierer, m_iReihenfolge, m_iEintragnr, m_iBreite As SqlInt32
|
||||||
|
Private m_sTabelle, m_sNumberFormat, m_sTiptext, m_sSpalte, m_sTabellenspalte As SqlString
|
||||||
|
|
||||||
|
#End Region
|
||||||
|
|
||||||
|
|
||||||
|
''' <summary>
|
||||||
|
''' Purpose: Class constructor.
|
||||||
|
''' </summary>
|
||||||
|
Public Sub New()
|
||||||
|
' // Nothing for now.
|
||||||
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
|
''' <summary>
|
||||||
|
''' Purpose: Insert method. This method will insert one new row into the database.
|
||||||
|
''' </summary>
|
||||||
|
''' <returns>True if succeeded, otherwise an Exception is thrown. </returns>
|
||||||
|
''' <remarks>
|
||||||
|
''' Properties needed for this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>iEintragnr</LI>
|
||||||
|
''' <LI>sTabelle. May be SqlString.Null</LI>
|
||||||
|
''' <LI>sTabellenspalte. May be SqlString.Null</LI>
|
||||||
|
''' <LI>sSpalte. May be SqlString.Null</LI>
|
||||||
|
''' <LI>bReadonly</LI>
|
||||||
|
''' <LI>bAlsHacken</LI>
|
||||||
|
''' <LI>iBreite. May be SqlInt32.Null</LI>
|
||||||
|
''' <LI>iReihenfolge. May be SqlInt32.Null</LI>
|
||||||
|
''' <LI>sTiptext. May be SqlString.Null</LI>
|
||||||
|
''' <LI>bAktiv</LI>
|
||||||
|
''' <LI>daErstellt_am. May be SqlDateTime.Null</LI>
|
||||||
|
''' <LI>daMutiert_am. May be SqlDateTime.Null</LI>
|
||||||
|
''' <LI>iMutierer. May be SqlInt32.Null</LI>
|
||||||
|
''' <LI>iMandantnr. May be SqlInt32.Null</LI>
|
||||||
|
''' <LI>sNumberFormat. May be SqlString.Null</LI>
|
||||||
|
''' </UL>
|
||||||
|
''' Properties set after a succesful call of this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>iErrorCode</LI>
|
||||||
|
'''</UL>
|
||||||
|
''' </remarks>
|
||||||
|
Overrides Public Function Insert() As Boolean
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[pr_spalten_Insert]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = m_scoMainConnection
|
||||||
|
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@ieintragnr", SqlDbType.Int, 4, ParameterDirection.Input, False, 10, 0, "", DataRowVersion.Proposed, m_iEintragnr))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@stabelle", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_sTabelle))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@stabellenspalte", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_sTabellenspalte))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@sspalte", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_sSpalte))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@bReadonly", SqlDbType.Bit, 1, ParameterDirection.Input, False, 0, 0, "", DataRowVersion.Proposed, m_bReadonly))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@balsHacken", SqlDbType.Bit, 1, ParameterDirection.Input, False, 0, 0, "", DataRowVersion.Proposed, m_bAlsHacken))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@iBreite", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, m_iBreite))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@iReihenfolge", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, m_iReihenfolge))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@stiptext", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_sTiptext))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@baktiv", SqlDbType.Bit, 1, ParameterDirection.Input, False, 0, 0, "", DataRowVersion.Proposed, m_bAktiv))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@daerstellt_am", SqlDbType.DateTime, 8, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_daErstellt_am))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@damutiert_am", SqlDbType.DateTime, 8, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_daMutiert_am))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@imutierer", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, m_iMutierer))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@imandantnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, m_iMandantnr))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@sNumberFormat", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_sNumberFormat))
|
||||||
|
scmCmdToExecute.Parameters.Add(new SqlParameter("@iErrorCode", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, m_iErrorCode))
|
||||||
|
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Open connection.
|
||||||
|
m_scoMainConnection.Open()
|
||||||
|
Else
|
||||||
|
If m_cpMainConnectionProvider.bIsTransactionPending Then
|
||||||
|
scmCmdToExecute.Transaction = m_cpMainConnectionProvider.stCurrentTransaction
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
' // Execute query.
|
||||||
|
m_iRowsAffected = scmCmdToExecute.ExecuteNonQuery()
|
||||||
|
m_iErrorCode = New SqlInt32(CType(scmCmdToExecute.Parameters.Item("@iErrorCode").Value, SqlInt32))
|
||||||
|
|
||||||
|
If Not m_iErrorCode.Equals(New SqlInt32(LLBLError.AllOk)) Then
|
||||||
|
' // Throw error.
|
||||||
|
Throw New Exception("Stored Procedure 'pr_spalten_Insert' reported the ErrorCode: " & m_iErrorCode.ToString())
|
||||||
|
End If
|
||||||
|
|
||||||
|
Return True
|
||||||
|
Catch ex As Exception
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
Throw New Exception("clsSpalten::Insert::Error occured.", ex)
|
||||||
|
Finally
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Close connection.
|
||||||
|
m_scoMainConnection.Close()
|
||||||
|
End If
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
''' <summary>
|
||||||
|
''' Purpose: Update method. This method will Update one existing row in the database.
|
||||||
|
''' </summary>
|
||||||
|
''' <returns>True if succeeded, otherwise an Exception is thrown. </returns>
|
||||||
|
''' <remarks>
|
||||||
|
''' Properties needed for this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>iEintragnr</LI>
|
||||||
|
''' <LI>sTabelle. May be SqlString.Null</LI>
|
||||||
|
''' <LI>sTabellenspalte. May be SqlString.Null</LI>
|
||||||
|
''' <LI>sSpalte. May be SqlString.Null</LI>
|
||||||
|
''' <LI>bReadonly</LI>
|
||||||
|
''' <LI>bAlsHacken</LI>
|
||||||
|
''' <LI>iBreite. May be SqlInt32.Null</LI>
|
||||||
|
''' <LI>iReihenfolge. May be SqlInt32.Null</LI>
|
||||||
|
''' <LI>sTiptext. May be SqlString.Null</LI>
|
||||||
|
''' <LI>bAktiv</LI>
|
||||||
|
''' <LI>daErstellt_am. May be SqlDateTime.Null</LI>
|
||||||
|
''' <LI>daMutiert_am. May be SqlDateTime.Null</LI>
|
||||||
|
''' <LI>iMutierer. May be SqlInt32.Null</LI>
|
||||||
|
''' <LI>iMandantnr. May be SqlInt32.Null</LI>
|
||||||
|
''' <LI>sNumberFormat. May be SqlString.Null</LI>
|
||||||
|
''' </UL>
|
||||||
|
''' Properties set after a succesful call of this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>iErrorCode</LI>
|
||||||
|
'''</UL>
|
||||||
|
''' </remarks>
|
||||||
|
Overrides Public Function Update() As Boolean
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[pr_spalten_Update]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = m_scoMainConnection
|
||||||
|
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@ieintragnr", SqlDbType.Int, 4, ParameterDirection.Input, False, 10, 0, "", DataRowVersion.Proposed, m_iEintragnr))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@stabelle", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_sTabelle))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@stabellenspalte", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_sTabellenspalte))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@sspalte", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_sSpalte))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@bReadonly", SqlDbType.Bit, 1, ParameterDirection.Input, False, 0, 0, "", DataRowVersion.Proposed, m_bReadonly))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@balsHacken", SqlDbType.Bit, 1, ParameterDirection.Input, False, 0, 0, "", DataRowVersion.Proposed, m_bAlsHacken))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@iBreite", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, m_iBreite))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@iReihenfolge", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, m_iReihenfolge))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@stiptext", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_sTiptext))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@baktiv", SqlDbType.Bit, 1, ParameterDirection.Input, False, 0, 0, "", DataRowVersion.Proposed, m_bAktiv))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@daerstellt_am", SqlDbType.DateTime, 8, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_daErstellt_am))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@damutiert_am", SqlDbType.DateTime, 8, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_daMutiert_am))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@imutierer", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, m_iMutierer))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@imandantnr", SqlDbType.Int, 4, ParameterDirection.Input, True, 10, 0, "", DataRowVersion.Proposed, m_iMandantnr))
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@sNumberFormat", SqlDbType.VarChar, 255, ParameterDirection.Input, True, 0, 0, "", DataRowVersion.Proposed, m_sNumberFormat))
|
||||||
|
scmCmdToExecute.Parameters.Add(new SqlParameter("@iErrorCode", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, m_iErrorCode))
|
||||||
|
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Open connection.
|
||||||
|
m_scoMainConnection.Open()
|
||||||
|
Else
|
||||||
|
If m_cpMainConnectionProvider.bIsTransactionPending Then
|
||||||
|
scmCmdToExecute.Transaction = m_cpMainConnectionProvider.stCurrentTransaction
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
' // Execute query.
|
||||||
|
m_iRowsAffected = scmCmdToExecute.ExecuteNonQuery()
|
||||||
|
m_iErrorCode = New SqlInt32(CType(scmCmdToExecute.Parameters.Item("@iErrorCode").Value, SqlInt32))
|
||||||
|
|
||||||
|
If Not m_iErrorCode.Equals(New SqlInt32(LLBLError.AllOk)) Then
|
||||||
|
' // Throw error.
|
||||||
|
Throw New Exception("Stored Procedure 'pr_spalten_Update' reported the ErrorCode: " & m_iErrorCode.ToString())
|
||||||
|
End If
|
||||||
|
|
||||||
|
Return True
|
||||||
|
Catch ex As Exception
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
Throw New Exception("clsSpalten::Update::Error occured.", ex)
|
||||||
|
Finally
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Close connection.
|
||||||
|
m_scoMainConnection.Close()
|
||||||
|
End If
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
''' <summary>
|
||||||
|
''' Purpose: Delete method. This method will Delete one existing row in the database, based on the Primary Key.
|
||||||
|
''' </summary>
|
||||||
|
''' <returns>True if succeeded, otherwise an Exception is thrown. </returns>
|
||||||
|
''' <remarks>
|
||||||
|
''' Properties needed for this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>iEintragnr</LI>
|
||||||
|
''' </UL>
|
||||||
|
''' Properties set after a succesful call of this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>iErrorCode</LI>
|
||||||
|
'''</UL>
|
||||||
|
''' </remarks>
|
||||||
|
Overrides Public Function Delete() As Boolean
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[pr_spalten_Delete]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = m_scoMainConnection
|
||||||
|
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(New SqlParameter("@ieintragnr", SqlDbType.Int, 4, ParameterDirection.Input, False, 10, 0, "", DataRowVersion.Proposed, m_iEintragnr))
|
||||||
|
scmCmdToExecute.Parameters.Add(new SqlParameter("@iErrorCode", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, m_iErrorCode))
|
||||||
|
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Open connection.
|
||||||
|
m_scoMainConnection.Open()
|
||||||
|
Else
|
||||||
|
If m_cpMainConnectionProvider.bIsTransactionPending Then
|
||||||
|
scmCmdToExecute.Transaction = m_cpMainConnectionProvider.stCurrentTransaction
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
' // Execute query.
|
||||||
|
m_iRowsAffected = scmCmdToExecute.ExecuteNonQuery()
|
||||||
|
m_iErrorCode = New SqlInt32(CType(scmCmdToExecute.Parameters.Item("@iErrorCode").Value, SqlInt32))
|
||||||
|
|
||||||
|
If Not m_iErrorCode.Equals(New SqlInt32(LLBLError.AllOk)) Then
|
||||||
|
' // Throw error.
|
||||||
|
Throw New Exception("Stored Procedure 'pr_spalten_Delete' reported the ErrorCode: " & m_iErrorCode.ToString())
|
||||||
|
End If
|
||||||
|
|
||||||
|
Return True
|
||||||
|
Catch ex As Exception
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
Throw New Exception("clsSpalten::Delete::Error occured.", ex)
|
||||||
|
Finally
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Close connection.
|
||||||
|
m_scoMainConnection.Close()
|
||||||
|
End If
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
''' <summary>
|
||||||
|
''' Purpose: Select method. This method will Select one existing row from the database, based on the Primary Key.
|
||||||
|
''' </summary>
|
||||||
|
''' <returns>DataTable object if succeeded, otherwise an Exception is thrown. </returns>
|
||||||
|
''' <remarks>
|
||||||
|
''' Properties needed for this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>iEintragnr</LI>
|
||||||
|
''' </UL>
|
||||||
|
''' Properties set after a succesful call of this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>iErrorCode</LI>
|
||||||
|
''' <LI>iEintragnr</LI>
|
||||||
|
''' <LI>sTabelle</LI>
|
||||||
|
''' <LI>sTabellenspalte</LI>
|
||||||
|
''' <LI>sSpalte</LI>
|
||||||
|
''' <LI>bReadonly</LI>
|
||||||
|
''' <LI>bAlsHacken</LI>
|
||||||
|
''' <LI>iBreite</LI>
|
||||||
|
''' <LI>iReihenfolge</LI>
|
||||||
|
''' <LI>sTiptext</LI>
|
||||||
|
''' <LI>bAktiv</LI>
|
||||||
|
''' <LI>daErstellt_am</LI>
|
||||||
|
''' <LI>daMutiert_am</LI>
|
||||||
|
''' <LI>iMutierer</LI>
|
||||||
|
''' <LI>iMandantnr</LI>
|
||||||
|
''' <LI>sNumberFormat</LI>
|
||||||
|
'''</UL>
|
||||||
|
''' Will fill all properties corresponding with a field in the table with the value of the row selected.
|
||||||
|
''' </remarks>
|
||||||
|
Overrides Public Function SelectOne() As DataTable
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[pr_spalten_SelectOne]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
Dim dtToReturn As DataTable = new DataTable("spalten")
|
||||||
|
Dim sdaAdapter As SqlDataAdapter = new SqlDataAdapter(scmCmdToExecute)
|
||||||
|
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = m_scoMainConnection
|
||||||
|
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(new SqlParameter("@ieintragnr", SqlDbType.Int, 4, ParameterDirection.Input, False, 10, 0, "", DataRowVersion.Proposed, m_iEintragnr))
|
||||||
|
scmCmdToExecute.Parameters.Add(new SqlParameter("@iErrorCode", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, m_iErrorCode))
|
||||||
|
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Open connection.
|
||||||
|
m_scoMainConnection.Open()
|
||||||
|
Else
|
||||||
|
If m_cpMainConnectionProvider.bIsTransactionPending Then
|
||||||
|
scmCmdToExecute.Transaction = m_cpMainConnectionProvider.stCurrentTransaction
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
' // Execute query.
|
||||||
|
sdaAdapter.Fill(dtToReturn)
|
||||||
|
m_iErrorCode = New SqlInt32(CType(scmCmdToExecute.Parameters.Item("@iErrorCode").Value, SqlInt32))
|
||||||
|
|
||||||
|
If Not m_iErrorCode.Equals(New SqlInt32(LLBLError.AllOk)) Then
|
||||||
|
' // Throw error.
|
||||||
|
Throw New Exception("Stored Procedure 'pr_spalten_SelectOne' reported the ErrorCode: " & m_iErrorCode.ToString())
|
||||||
|
End If
|
||||||
|
|
||||||
|
If dtToReturn.Rows.Count > 0 Then
|
||||||
|
m_iEintragnr = New SqlInt32(CType(dtToReturn.Rows(0)("eintragnr"), Integer))
|
||||||
|
If dtToReturn.Rows(0)("tabelle") Is System.DBNull.Value Then
|
||||||
|
m_sTabelle = SqlString.Null
|
||||||
|
Else
|
||||||
|
m_sTabelle = New SqlString(CType(dtToReturn.Rows(0)("tabelle"), String))
|
||||||
|
End If
|
||||||
|
If dtToReturn.Rows(0)("tabellenspalte") Is System.DBNull.Value Then
|
||||||
|
m_sTabellenspalte = SqlString.Null
|
||||||
|
Else
|
||||||
|
m_sTabellenspalte = New SqlString(CType(dtToReturn.Rows(0)("tabellenspalte"), String))
|
||||||
|
End If
|
||||||
|
If dtToReturn.Rows(0)("spalte") Is System.DBNull.Value Then
|
||||||
|
m_sSpalte = SqlString.Null
|
||||||
|
Else
|
||||||
|
m_sSpalte = New SqlString(CType(dtToReturn.Rows(0)("spalte"), String))
|
||||||
|
End If
|
||||||
|
m_bReadonly = New SqlBoolean(CType(dtToReturn.Rows(0)("Readonly"), Boolean))
|
||||||
|
m_bAlsHacken = New SqlBoolean(CType(dtToReturn.Rows(0)("alsHacken"), Boolean))
|
||||||
|
If dtToReturn.Rows(0)("Breite") Is System.DBNull.Value Then
|
||||||
|
m_iBreite = SqlInt32.Null
|
||||||
|
Else
|
||||||
|
m_iBreite = New SqlInt32(CType(dtToReturn.Rows(0)("Breite"), Integer))
|
||||||
|
End If
|
||||||
|
If dtToReturn.Rows(0)("Reihenfolge") Is System.DBNull.Value Then
|
||||||
|
m_iReihenfolge = SqlInt32.Null
|
||||||
|
Else
|
||||||
|
m_iReihenfolge = New SqlInt32(CType(dtToReturn.Rows(0)("Reihenfolge"), Integer))
|
||||||
|
End If
|
||||||
|
If dtToReturn.Rows(0)("tiptext") Is System.DBNull.Value Then
|
||||||
|
m_sTiptext = SqlString.Null
|
||||||
|
Else
|
||||||
|
m_sTiptext = New SqlString(CType(dtToReturn.Rows(0)("tiptext"), String))
|
||||||
|
End If
|
||||||
|
m_bAktiv = New SqlBoolean(CType(dtToReturn.Rows(0)("aktiv"), Boolean))
|
||||||
|
If dtToReturn.Rows(0)("erstellt_am") Is System.DBNull.Value Then
|
||||||
|
m_daErstellt_am = SqlDateTime.Null
|
||||||
|
Else
|
||||||
|
m_daErstellt_am = New SqlDateTime(CType(dtToReturn.Rows(0)("erstellt_am"), Date))
|
||||||
|
End If
|
||||||
|
If dtToReturn.Rows(0)("mutiert_am") Is System.DBNull.Value Then
|
||||||
|
m_daMutiert_am = SqlDateTime.Null
|
||||||
|
Else
|
||||||
|
m_daMutiert_am = New SqlDateTime(CType(dtToReturn.Rows(0)("mutiert_am"), Date))
|
||||||
|
End If
|
||||||
|
If dtToReturn.Rows(0)("mutierer") Is System.DBNull.Value Then
|
||||||
|
m_iMutierer = SqlInt32.Null
|
||||||
|
Else
|
||||||
|
m_iMutierer = New SqlInt32(CType(dtToReturn.Rows(0)("mutierer"), Integer))
|
||||||
|
End If
|
||||||
|
If dtToReturn.Rows(0)("mandantnr") Is System.DBNull.Value Then
|
||||||
|
m_iMandantnr = SqlInt32.Null
|
||||||
|
Else
|
||||||
|
m_iMandantnr = New SqlInt32(CType(dtToReturn.Rows(0)("mandantnr"), Integer))
|
||||||
|
End If
|
||||||
|
If dtToReturn.Rows(0)("NumberFormat") Is System.DBNull.Value Then
|
||||||
|
m_sNumberFormat = SqlString.Null
|
||||||
|
Else
|
||||||
|
m_sNumberFormat = New SqlString(CType(dtToReturn.Rows(0)("NumberFormat"), String))
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
Return dtToReturn
|
||||||
|
Catch ex As Exception
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
Throw New Exception("clsSpalten::SelectOne::Error occured.", ex)
|
||||||
|
Finally
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Close connection.
|
||||||
|
m_scoMainConnection.Close()
|
||||||
|
End If
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
sdaAdapter.Dispose()
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
''' <summary>
|
||||||
|
''' Purpose: SelectAll method. This method will Select all rows from the table.
|
||||||
|
''' </summary>
|
||||||
|
''' <returns>DataTable object if succeeded, otherwise an Exception is thrown. </returns>
|
||||||
|
''' <remarks>
|
||||||
|
''' Properties set after a succesful call of this method:
|
||||||
|
''' <UL>
|
||||||
|
''' <LI>iErrorCode</LI>
|
||||||
|
'''</UL>
|
||||||
|
''' </remarks>
|
||||||
|
Overrides Public Function SelectAll() As DataTable
|
||||||
|
Dim scmCmdToExecute As SqlCommand = New SqlCommand()
|
||||||
|
scmCmdToExecute.CommandText = "dbo.[pr_spalten_SelectAll]"
|
||||||
|
scmCmdToExecute.CommandType = CommandType.StoredProcedure
|
||||||
|
Dim dtToReturn As DataTable = new DataTable("spalten")
|
||||||
|
Dim sdaAdapter As SqlDataAdapter = new SqlDataAdapter(scmCmdToExecute)
|
||||||
|
|
||||||
|
' // Use base class' connection object
|
||||||
|
scmCmdToExecute.Connection = m_scoMainConnection
|
||||||
|
|
||||||
|
Try
|
||||||
|
scmCmdToExecute.Parameters.Add(new SqlParameter("@iErrorCode", SqlDbType.Int, 4, ParameterDirection.Output, True, 10, 0, "", DataRowVersion.Proposed, m_iErrorCode))
|
||||||
|
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Open connection.
|
||||||
|
m_scoMainConnection.Open()
|
||||||
|
Else
|
||||||
|
If m_cpMainConnectionProvider.bIsTransactionPending Then
|
||||||
|
scmCmdToExecute.Transaction = m_cpMainConnectionProvider.stCurrentTransaction
|
||||||
|
End If
|
||||||
|
End If
|
||||||
|
|
||||||
|
' // Execute query.
|
||||||
|
sdaAdapter.Fill(dtToReturn)
|
||||||
|
m_iErrorCode = New SqlInt32(CType(scmCmdToExecute.Parameters.Item("@iErrorCode").Value, SqlInt32))
|
||||||
|
|
||||||
|
If Not m_iErrorCode.Equals(New SqlInt32(LLBLError.AllOk)) Then
|
||||||
|
' // Throw error.
|
||||||
|
Throw New Exception("Stored Procedure 'pr_spalten_SelectAll' reported the ErrorCode: " & m_iErrorCode.ToString())
|
||||||
|
End If
|
||||||
|
|
||||||
|
Return dtToReturn
|
||||||
|
Catch ex As Exception
|
||||||
|
' // some error occured. Bubble it to caller and encapsulate Exception object
|
||||||
|
Throw New Exception("clsSpalten::SelectAll::Error occured.", ex)
|
||||||
|
Finally
|
||||||
|
If m_bMainConnectionIsCreatedLocal Then
|
||||||
|
' // Close connection.
|
||||||
|
m_scoMainConnection.Close()
|
||||||
|
End If
|
||||||
|
scmCmdToExecute.Dispose()
|
||||||
|
sdaAdapter.Dispose()
|
||||||
|
End Try
|
||||||
|
End Function
|
||||||
|
|
||||||
|
|
||||||
|
#Region " Class Property Declarations "
|
||||||
|
|
||||||
|
Public Property [iEintragnr]() As SqlInt32
|
||||||
|
Get
|
||||||
|
Return m_iEintragnr
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlInt32)
|
||||||
|
Dim iEintragnrTmp As SqlInt32 = Value
|
||||||
|
If iEintragnrTmp.IsNull Then
|
||||||
|
Throw New ArgumentOutOfRangeException("iEintragnr", "iEintragnr can't be NULL")
|
||||||
|
End If
|
||||||
|
m_iEintragnr = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [sTabelle]() As SqlString
|
||||||
|
Get
|
||||||
|
Return m_sTabelle
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlString)
|
||||||
|
m_sTabelle = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [sTabellenspalte]() As SqlString
|
||||||
|
Get
|
||||||
|
Return m_sTabellenspalte
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlString)
|
||||||
|
m_sTabellenspalte = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [sSpalte]() As SqlString
|
||||||
|
Get
|
||||||
|
Return m_sSpalte
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlString)
|
||||||
|
m_sSpalte = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [bReadonly]() As SqlBoolean
|
||||||
|
Get
|
||||||
|
Return m_bReadonly
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlBoolean)
|
||||||
|
Dim bReadonlyTmp As SqlBoolean = Value
|
||||||
|
If bReadonlyTmp.IsNull Then
|
||||||
|
Throw New ArgumentOutOfRangeException("bReadonly", "bReadonly can't be NULL")
|
||||||
|
End If
|
||||||
|
m_bReadonly = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [bAlsHacken]() As SqlBoolean
|
||||||
|
Get
|
||||||
|
Return m_bAlsHacken
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlBoolean)
|
||||||
|
Dim bAlsHackenTmp As SqlBoolean = Value
|
||||||
|
If bAlsHackenTmp.IsNull Then
|
||||||
|
Throw New ArgumentOutOfRangeException("bAlsHacken", "bAlsHacken can't be NULL")
|
||||||
|
End If
|
||||||
|
m_bAlsHacken = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [iBreite]() As SqlInt32
|
||||||
|
Get
|
||||||
|
Return m_iBreite
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlInt32)
|
||||||
|
m_iBreite = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [iReihenfolge]() As SqlInt32
|
||||||
|
Get
|
||||||
|
Return m_iReihenfolge
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlInt32)
|
||||||
|
m_iReihenfolge = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [sTiptext]() As SqlString
|
||||||
|
Get
|
||||||
|
Return m_sTiptext
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlString)
|
||||||
|
m_sTiptext = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [bAktiv]() As SqlBoolean
|
||||||
|
Get
|
||||||
|
Return m_bAktiv
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlBoolean)
|
||||||
|
Dim bAktivTmp As SqlBoolean = Value
|
||||||
|
If bAktivTmp.IsNull Then
|
||||||
|
Throw New ArgumentOutOfRangeException("bAktiv", "bAktiv can't be NULL")
|
||||||
|
End If
|
||||||
|
m_bAktiv = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [daErstellt_am]() As SqlDateTime
|
||||||
|
Get
|
||||||
|
Return m_daErstellt_am
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlDateTime)
|
||||||
|
m_daErstellt_am = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [daMutiert_am]() As SqlDateTime
|
||||||
|
Get
|
||||||
|
Return m_daMutiert_am
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlDateTime)
|
||||||
|
m_daMutiert_am = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [iMutierer]() As SqlInt32
|
||||||
|
Get
|
||||||
|
Return m_iMutierer
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlInt32)
|
||||||
|
m_iMutierer = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [iMandantnr]() As SqlInt32
|
||||||
|
Get
|
||||||
|
Return m_iMandantnr
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlInt32)
|
||||||
|
m_iMandantnr = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
|
||||||
|
Public Property [sNumberFormat]() As SqlString
|
||||||
|
Get
|
||||||
|
Return m_sNumberFormat
|
||||||
|
End Get
|
||||||
|
Set(ByVal Value As SqlString)
|
||||||
|
m_sNumberFormat = Value
|
||||||
|
End Set
|
||||||
|
End Property
|
||||||
|
|
||||||
|
#End Region
|
||||||
|
|
||||||
|
End Class
|
||||||
|
End Namespace
|
||||||
@ -0,0 +1,311 @@
|
|||||||
|
<?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="menuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||||
|
<value>17, 17</value>
|
||||||
|
</metadata>
|
||||||
|
<metadata name="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||||
|
<value>132, 17</value>
|
||||||
|
</metadata>
|
||||||
|
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||||
|
<data name="tsbtnclose.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>
|
||||||
|
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||||
|
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAK1SURBVDhPnZLfS1NhGMdfCPoDuummi+i6KwcWZYjb3Obx
|
||||||
|
7MzN5dY5Z9tJV86MirIgK8t++KssC63IYSoVRaVWRmn2Q9FIUcpCyiXVRXiRRCFIFwWfjhqLXdYDH3if
|
||||||
|
F94P7/d5X/E/9XVyIDj7aexn295M/mwt1vWK3K6Oyly6js0jJek8KnHjkJ2n8V3MTPTwZfwes+/7ubrf
|
||||||
|
mirorJBJW2tnzXobazf8JX29ldWWDOYSPSS6DjPa5Odb4hnXDzpSBR3lMplWJza7hN3hSmLNdpKeYeNd
|
||||||
|
W4TRSzrD54PMvHnIrSM5qQJHg0CqXkKO3YfkUpBy3EiSjMsls8EqMdFqMHwxxPPGINOjnQtR/xwVwlYj
|
||||||
|
SEy34zQluVkabmcARfKjyF5kt4csh5vX8TBDTTr9DZv4OHiN+1XKosBWLRj/1ExrvyCzSmCvFzjPCeTy
|
||||||
|
5XiVIJ48P9m5PsYuafSf1Zl7sJK3fS08rPUiXHWCFx+qiA8JmgfN9VQRIx8ivPwcXpBs9ITJzw8ieQKM
|
||||||
|
nFd5ckbjR88q3txvoq/evyh4nCgjPiaIjwpaXgtaJwSvvkdwnBUE84soCIRw52sMNQboOx2kuczJy84a
|
||||||
|
njUEFiJY7GaE7rdbaE8IsuYjnBQ4zgjyDq1AV6OouoEvaDDQ4Kf31EZuVyq8uFbBYKOaHKIlu1bQNeXD
|
||||||
|
eVpgBHZjaKUY4WIMI0rEKCQQivKk3suDOh/d1V4GLu9h+EIo5RktTvPKSt1SosYOokUlFEWLFyg00TbH
|
||||||
|
eFTnobsqjzvHPfQ0xRhrjqQIRFvpOraWlFIS20nJtu1JYiaFxTvorZW5e0Kh45ibu6dCjLcUInRdR9dC
|
||||||
|
aFoYVZ3HXKua2atJVLMv2KSzLxbgSoVi/kCZm0fzmGjfsjjEf6VcT99/+YDj1+SVWGqEf6hlJmlCCMtv
|
||||||
|
k4rCoiUUiGcAAAAASUVORK5CYII=
|
||||||
|
</value>
|
||||||
|
</data>
|
||||||
|
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>
|
||||||
|
AAABAAEAMDAAAAEAIACoJQAAFgAAACgAAAAwAAAAYAAAAAEAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACA
|
||||||
|
AAYAgAAmAIAAGACAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACA
|
||||||
|
AAIAgAAyAIAAdgCAALQAgADSAIAAugCAADAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAACAIAAEgCA
|
||||||
|
ACoAgABUAIAAmACAAN4AgAD/AIAA/wCAAP8AgAD/AIAA/wCAANYAgAAeAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAIAAEACA
|
||||||
|
ADwAgAB0AIAApACAANIAgAD6AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgACmAIAAHAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAACACA
|
||||||
|
ADYAgACKAIAAwACAANwAgAD2AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAPoAgAD4AIAA/wCA
|
||||||
|
AP8AgAD0AIAAiACAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAIAgAAWAIAALgCA
|
||||||
|
AFYAgACmAIAA5gCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD6AIAA6ACAANAAgACgAIAAWgCA
|
||||||
|
ABgAgABcAIAA6gCAAP8AgAD/AIAA+ACAAH4AgAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAASAIAAQACA
|
||||||
|
AHIAgACsAIAA2gCAAPoAgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD8AIAA6ACAALwAgACCAIAAVACA
|
||||||
|
ACQAgAAAAAAAAAAAAAAAgAAOAIAAgACAAPAAgAD/AIAA/wCAAPIAgABSAIAAAgAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAACAIAAIgCA
|
||||||
|
AHQAgADCAIAA3gCAAPYAgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA8gCAAL4AgABqAIAAOACA
|
||||||
|
AB4AgAAGAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAFgCAAKQAgAD/AIAA/wCAAP8AgADSAIAAPACA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACA
|
||||||
|
AA4AgACGAIAA8ACAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAPoAgADkAIAAzACAAKAAgABOAIAAEgCA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAoAgADAAIAA/ACA
|
||||||
|
AP8AgAD/AIAAygCAADQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAIAADgCAAH4AgAD6AIAA/wCAAP8AgAD/AIAA/wCAAP8AgADiAIAAtACAAIQAgABMAIAAHACA
|
||||||
|
AAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgAA2AIAAzACAAP8AgAD/AIAA/ACAALYAgAASAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAgAACAIAAYACAAOoAgAD/AIAA/wCAAP8AgAD0AIAAvACAAHAAgAA0AIAAGgCA
|
||||||
|
AAYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAgAAEAIAAUgCAAOQAgAD/AIAA/wCAAPwAgACKAIAACAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAqAIAAzgCAAP8AgAD/AIAA9ACAAKIAgAAYAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAFgAgADyAIAA/wCAAP8AgADyAIAAgACA
|
||||||
|
AAwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgABgAIAA+gCAAP8AgAD8AIAAqgCA
|
||||||
|
ABoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAIAgACMAIAA9gCA
|
||||||
|
AP8AgAD/AIAA5gCAAGAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgACgAIAA/wCA
|
||||||
|
AP8AgADmAIAAUgCAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAQAIAASACAAG4AgAAiAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgAAaAIAApgCAAPwAgAD/AIAA/wCAAOIAgAAqAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgADSAIAA/wCAAP8AgADOAIAAHgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAgAAAAIAACgCAACAAgAA+AIAAdACAALQAgAD2AIAA/wCAAP8AgADaAIAARgCA
|
||||||
|
AAQAAAAAAAAAAAAAAAAAAAAAAIAAHACAALAAgAD/AIAA/wCAAP8AgADMAIAALgCAAAIAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAgADgAIAA/wCAAP8AgADGAIAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAIAACACAACwAgABiAIAAkACAAL4AgADuAIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD8AIAAxgCAADQAAAAAAAAAAAAAAAAAAAAAAAAAAACAACwAgADaAIAA/wCAAP8AgAD6AIAArACA
|
||||||
|
AB4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgADaAIAA/wCAAP8AgADIAIAAFAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAIAABACAACoAgAB6AIAAtACAANQAgADuAIAA/ACAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/ACAAMIAgAAOAAAAAAAAAAAAAAAAAAAAAACAAAAAgABWAIAA6ACA
|
||||||
|
AP8AgAD/AIAA9gCAAJQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAC2AIAA/wCAAP8AgADcAIAAOgCA
|
||||||
|
AAAAAAAAAAAAAACAAAIAgAAYAIAALgCAAFIAgACgAIAA3gCAAPwAgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgACuAIAAHACAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgAAEAIAAYgCAAOgAgAD/AIAA/wCAAP8AgAByAIAACAAAAAAAAAAAAAAAAAAAAAAAgACIAIAA/wCA
|
||||||
|
AP8AgAD2AIAAogCAAD4AgAAwAIAAUgCAAHoAgACuAIAA2gCAAPoAgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD0AIAAkgCA
|
||||||
|
ABQAAAAAAAAAAAAAAAAAAAAAAIAADACAAH4AgAD/AIAA/wCAAP8AgADkAIAAWACAAAYAAAAAAAAAAAAA
|
||||||
|
AAAAgABQAIAA+gCAAP8AgAD/AIAA9gCAAN4AgADWAIAA6ACAAPoAgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA8ACAAHwAAAAAAAAAAAAAAAAAAAAAAAAAAACAABAAgACyAIAA/wCAAP8AgAD8AIAA0gCA
|
||||||
|
ADQAAAAAAAAAAAAAAAAAgAAkAIAAyACAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAPwAgABkAIAACAAAAAAAAAAAAAAAAAAAAAAAgAAgAIAAtgCA
|
||||||
|
APoAgAD/AIAA/wCAANYAgAAcAAAAAAAAAAAAgAAIAIAAhACAAPgAgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgADgAIAAUgCAAAQAAAAAAAAAAAAA
|
||||||
|
AAAAgAAAAIAAOgCAANAAgAD/AIAA/wCAAP8AgACgAIAAGAAAAAAAgAAAAIAALgCAANQAgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD8AIAA0gCA
|
||||||
|
ADYAAAAAAAAAAAAAAAAAAAAAAIAABACAAEwAgAD6AIAA/wCAAP8AgADyAIAAfgCAAAoAAAAAAAAAAACA
|
||||||
|
ADwAgADoAIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAN4AgAAmAIAAAAAAAAAAAAAAAAAAAAAAAAAAgABwAIAA8gCAAP8AgAD/AIAA9ACA
|
||||||
|
AF4AAAAAAAAAAAAAAAAAgABmAIAA5gCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgACwAIAAIgAAAAAAAAAAAAAAAAAAAAAAgAAUAIAAngCA
|
||||||
|
APoAgAD/AIAA/wCAAJwAAAAAAAAAAAAAAAAAgAAMAIAAfACAAPAAgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD2AIAAlgCAABQAAAAAAAAAAAAA
|
||||||
|
AAAAgAAAAIAAZACAAPAAgAD/AIAA/wCAAH4AAAAAAAAAAAAAAAAAAAAAAIAABgCAAHoAgAD4AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/ACA
|
||||||
|
AJQAgAAIAAAAAAAAAAAAAAAAAIAAZgCAAPIAgAD/AIAA/wCAAFQAAAAAAAAAAAAAAAAAAAAAAAAAAACA
|
||||||
|
AAgAgACeAIAA+ACAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAPgAgABqAIAACAAAAAAAAAAAAIAAZgCAAPIAgAD/AIAA/wCAAFgAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAgAAgAIAArACAAPwAgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgADiAIAAVgCAAAIAAAAAAIAAWgCAAOwAgAD/AIAA/wCA
|
||||||
|
AHwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAHACAAK4AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA4gCAAFAAAAAAAIAALACA
|
||||||
|
ANIAgAD/AIAA/wCAAJwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAACQAgADMAIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAPIAgADOAIAAwACAAOgAgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
ANYAgAAqAIAABgCAAIAAgAD0AIAA4gCAAFgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgABEAIAA1gCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/ACAAOAAgACeAIAAaACAAD4AgAAoAIAAIACAAEYAgADuAIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgACwAIAAHgCAABAAgAA8AIAANACAAAoAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAgAAAAIAARACAANQAgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/ACAAPAAgADaAIAAxACAAJoAgABWAIAAHgCAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgABOAIAA5gCAAP8AgAD/AIAA/wCAAP8AgAD8AIAAqgCAAB4AAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAgCAAFAAgADuAIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/ACAAOYAgAC2AIAAjACAAGQAgAA2AIAAEACAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAgAAUAIAApgCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA+ACAAJQAgAAGAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAQAgAByAIAA9ACA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD0AIAAkgCAADYAgAAcAIAACACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAgAAEAIAAKACAAGQAgACsAIAA5gCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
APYAgABoAIAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgAAIAIAAcgCAAO4AgAD/AIAA/wCAAP8AgAD2AIAAhgCAAAwAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgAACAIAAEACAACIAgAA8AIAAaACAAKIAgADkAIAA/ACAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgADqAIAAZACAAAYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAIAAEACAAIQAgAD8AIAA/wCAAP8AgAD/AIAA5gCAAGQAAAAAAAAAAAAA
|
||||||
|
AAAAgAAGAIAAIgCAAEgAgAB2AIAAnACAAMQAgADuAIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA2ACAAEYAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAABAAgACqAIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AOYAgAB0AIAAXACAAIAAgAC2AIAA0ACAAOIAgAD4AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAL4AAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAYAIAApACA
|
||||||
|
APgAgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AMIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgAAAAIAAKACAALYAgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
APwAgADeAIAAsACAAEQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAIAAAACAACgAgADeAIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
APQAgAC+AIAAiACAAFQAgAAwAIAAGgCAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAA2AIAA0ACAAPwAgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/ACAAPAAgADcAIAAygCA
|
||||||
|
AKgAgABsAIAANgCAAAoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAEAIAATACA
|
||||||
|
ANoAgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA9ACAANYAgACsAIAAiACA
|
||||||
|
AGQAgAA6AIAAGACAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAIAABgCAAFAAgAD4AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD8AIAA4ACAAKwAgABsAIAAQgCA
|
||||||
|
ACwAgAAWAIAABgCAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgABaAIAAygCAANAAgAC4AIAAigCAAFYAgAAaAIAAAgAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAEAIAAHACAACQAgAAGAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///////8AAP///////wAA////x///
|
||||||
|
AAD///wD//8AAP//4AH//wAA//4AAP//AAD/8ABw//8AAP+AA/B//wAA/AA/+D//AADgAf/8H/8AAOAP
|
||||||
|
//4P/wAAwP///wf/AACD////g/8AAIf///+D/wAAD////8H/AAAP//4P4P8AAA//4AfwfwAAD/8AA/g/
|
||||||
|
AAAP8AAB/D8AAAeAAAD+HwAAgAAAAP4PAACAAAAAfwcAAIAAAAA/gwAAwAAAAB/DAADgAAAAD+EAAPAA
|
||||||
|
AAAH4AAA+AAAAAPxAAD8AAAAAfEAAPwAAAAB8QAA/gAAAADxAAD/AAAAAHAAAP+AAAAAMQAA/8AAAfAf
|
||||||
|
AAD/4AAf+A8AAP/wAf/4BwAA//gP//AHAAD//A//AAMAAP/8D/AAAQAA//4GAAAAAAD//wAAAAAAAP//
|
||||||
|
gAAAAQAA///AAAAPAAD//+AAAf8AAP//8AAf/wAA///4A///AAD///w///8AAP///////wAA////////
|
||||||
|
AAA=
|
||||||
|
</value>
|
||||||
|
</data>
|
||||||
|
</root>
|
||||||
@ -0,0 +1,247 @@
|
|||||||
|
<?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>{8A404216-38A9-4305-9BA2-04CD2AC20F32}</ProjectGuid>
|
||||||
|
<OutputType>WinExe</OutputType>
|
||||||
|
<StartupObject>Logbuch.My.MyApplication</StartupObject>
|
||||||
|
<RootNamespace>Logbuch</RootNamespace>
|
||||||
|
<AssemblyName>Logbuch</AssemblyName>
|
||||||
|
<FileAlignment>512</FileAlignment>
|
||||||
|
<MyType>WindowsForms</MyType>
|
||||||
|
<TargetFrameworkVersion>v4.5</TargetFrameworkVersion>
|
||||||
|
</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>Logbuch.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>Logbuch.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>
|
||||||
|
<PropertyGroup>
|
||||||
|
<ApplicationIcon>book-multi-size.ico</ApplicationIcon>
|
||||||
|
</PropertyGroup>
|
||||||
|
<ItemGroup>
|
||||||
|
<Reference Include="C1.Win.C1Command.2, Version=2.0.20153.110, Culture=neutral, PublicKeyToken=e808566f358766d8" />
|
||||||
|
<Reference Include="C1.Win.C1Command.4, Version=4.0.20153.110, Culture=neutral, PublicKeyToken=e808566f358766d8" />
|
||||||
|
<Reference Include="C1.Win.C1Input.2, Version=2.0.20153.110, Culture=neutral, PublicKeyToken=7e7ff60f0c214f9a, processorArchitecture=MSIL" />
|
||||||
|
<Reference Include="C1.Win.C1Input.4, Version=4.0.20153.110, Culture=neutral, PublicKeyToken=7e7ff60f0c214f9a, processorArchitecture=MSIL" />
|
||||||
|
<Reference Include="C1.Win.C1TrueDBGrid.4, Version=4.0.20153.110, Culture=neutral, PublicKeyToken=75ae3fb0e2b1e0da, processorArchitecture=MSIL" />
|
||||||
|
<Reference Include="FastReport, Version=2017.4.1.0, Culture=neutral, PublicKeyToken=db7e5ce63278458c, processorArchitecture=MSIL">
|
||||||
|
<SpecificVersion>False</SpecificVersion>
|
||||||
|
<HintPath>C:\Program Files (x86)\FastReports\FastReport.Net\Framework 4.0\FastReport.dll</HintPath>
|
||||||
|
</Reference>
|
||||||
|
<Reference Include="FastReport.Bars, Version=2017.4.1.0, Culture=neutral, PublicKeyToken=db7e5ce63278458c, processorArchitecture=MSIL">
|
||||||
|
<SpecificVersion>False</SpecificVersion>
|
||||||
|
<HintPath>C:\Program Files (x86)\FastReports\FastReport.Net\Framework 4.0\FastReport.Bars.dll</HintPath>
|
||||||
|
</Reference>
|
||||||
|
<Reference Include="FastReport.Editor, Version=2017.4.1.0, Culture=neutral, PublicKeyToken=db7e5ce63278458c, processorArchitecture=MSIL">
|
||||||
|
<SpecificVersion>False</SpecificVersion>
|
||||||
|
<HintPath>C:\Program Files (x86)\FastReports\FastReport.Net\Framework 4.0\FastReport.Editor.dll</HintPath>
|
||||||
|
</Reference>
|
||||||
|
<Reference Include="System" />
|
||||||
|
<Reference Include="System.Data" />
|
||||||
|
<Reference Include="System.Deployment" />
|
||||||
|
<Reference Include="System.Design" />
|
||||||
|
<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="DB\clsConnectionProvider.vb" />
|
||||||
|
<Compile Include="DB\clsDBInteractionBase.vb" />
|
||||||
|
<Compile Include="DB\clsKey_tabelle.vb" />
|
||||||
|
<Compile Include="DB\clsMyPartner.vb" />
|
||||||
|
<Compile Include="DB\clsSpalten.vb" />
|
||||||
|
<Compile Include="DB\MyDBObjects\clsMyKey_Tabelle.vb" />
|
||||||
|
<Compile Include="DB\MyDBObjects\db_connection.vb" />
|
||||||
|
<Compile Include="DB\MyDBObjects\frmDatenbankauswahl.vb">
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Form1.vb">
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Form1.Designer.vb">
|
||||||
|
<DependentUpon>Form1.vb</DependentUpon>
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="frmSplash.designer.vb">
|
||||||
|
<DependentUpon>frmSplash.vb</DependentUpon>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="frmSplash.vb">
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Klassen\clsdbhandling.vb" />
|
||||||
|
<Compile Include="Klassen\clsSpalten.vb" />
|
||||||
|
<Compile Include="Logbuch\frmLogbuch.Designer.vb">
|
||||||
|
<DependentUpon>frmLogbuch.vb</DependentUpon>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Logbuch\frmLogbuch.vb">
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Logbuch\frmPolice.Designer.vb">
|
||||||
|
<DependentUpon>frmPolice.vb</DependentUpon>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Logbuch\frmPolice.vb">
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Logbuch\frmSchuldbrief.Designer.vb">
|
||||||
|
<DependentUpon>frmSchuldbrief.vb</DependentUpon>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Logbuch\frmSchuldbrief.vb">
|
||||||
|
<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="Partner\frmPartnersuche.Designer.vb">
|
||||||
|
<DependentUpon>frmPartnersuche.vb</DependentUpon>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Partner\frmPartnersuche.vb">
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Reports\frmAuswertung.Designer.vb">
|
||||||
|
<DependentUpon>frmAuswertung.vb</DependentUpon>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Reports\frmAuswertung.vb">
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Reports\frmCRReporting.Designer.vb">
|
||||||
|
<DependentUpon>frmCRReporting.vb</DependentUpon>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Reports\frmCRReporting.vb">
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Reports\frmKalender.Designer.vb">
|
||||||
|
<DependentUpon>frmKalender.vb</DependentUpon>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Reports\frmKalender.vb">
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Sysadmin\frmSysadmin.Designer.vb">
|
||||||
|
<DependentUpon>frmSysadmin.vb</DependentUpon>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Sysadmin\frmSysadmin.vb">
|
||||||
|
<SubType>Form</SubType>
|
||||||
|
</Compile>
|
||||||
|
<Compile Include="Utils\Crypto.vb" />
|
||||||
|
<Compile Include="Utils\Globals.vb" />
|
||||||
|
</ItemGroup>
|
||||||
|
<ItemGroup>
|
||||||
|
<EmbeddedResource Include="DB\MyDBObjects\frmDatenbankauswahl.resx" />
|
||||||
|
<EmbeddedResource Include="Form1.resx">
|
||||||
|
<DependentUpon>Form1.vb</DependentUpon>
|
||||||
|
</EmbeddedResource>
|
||||||
|
<EmbeddedResource Include="frmSplash.resx">
|
||||||
|
<DependentUpon>frmSplash.vb</DependentUpon>
|
||||||
|
</EmbeddedResource>
|
||||||
|
<EmbeddedResource Include="Logbuch\frmLogbuch.resx">
|
||||||
|
<DependentUpon>frmLogbuch.vb</DependentUpon>
|
||||||
|
</EmbeddedResource>
|
||||||
|
<EmbeddedResource Include="Logbuch\frmPolice.resx">
|
||||||
|
<DependentUpon>frmPolice.vb</DependentUpon>
|
||||||
|
</EmbeddedResource>
|
||||||
|
<EmbeddedResource Include="Logbuch\frmSchuldbrief.resx">
|
||||||
|
<DependentUpon>frmSchuldbrief.vb</DependentUpon>
|
||||||
|
</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="Partner\frmPartnersuche.resx">
|
||||||
|
<DependentUpon>frmPartnersuche.vb</DependentUpon>
|
||||||
|
</EmbeddedResource>
|
||||||
|
<EmbeddedResource Include="Reports\frmAuswertung.resx">
|
||||||
|
<DependentUpon>frmAuswertung.vb</DependentUpon>
|
||||||
|
</EmbeddedResource>
|
||||||
|
<EmbeddedResource Include="Reports\frmCRReporting.resx">
|
||||||
|
<DependentUpon>frmCRReporting.vb</DependentUpon>
|
||||||
|
</EmbeddedResource>
|
||||||
|
<EmbeddedResource Include="Reports\frmKalender.resx">
|
||||||
|
<DependentUpon>frmKalender.vb</DependentUpon>
|
||||||
|
</EmbeddedResource>
|
||||||
|
<EmbeddedResource Include="Sysadmin\frmSysadmin.resx">
|
||||||
|
<DependentUpon>frmSysadmin.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" />
|
||||||
|
</ItemGroup>
|
||||||
|
<ItemGroup>
|
||||||
|
<Content Include="book-48.ico" />
|
||||||
|
<Content Include="book-multi-size.ico" />
|
||||||
|
</ItemGroup>
|
||||||
|
<ItemGroup>
|
||||||
|
<Service Include="{C0C07587-41A7-46C8-8FBD-3F9C8EBE2DDC}" />
|
||||||
|
</ItemGroup>
|
||||||
|
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
|
||||||
|
</Project>
|
||||||
@ -0,0 +1,6 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<Project ToolsVersion="14.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||||
|
<PropertyGroup>
|
||||||
|
<ReferencePath>C:\Program Files (x86)\SAP BusinessObjects\Crystal Reports for .NET Framework 4.0\Common\SAP BusinessObjects Enterprise XI 4.0\win32_x86\dotnet\</ReferencePath>
|
||||||
|
</PropertyGroup>
|
||||||
|
</Project>
|
||||||
@ -0,0 +1,380 @@
|
|||||||
|
<?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="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||||
|
<value>17, 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
|
||||||
|
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAK0SURBVDhPnZLfS1NhGMdfCPoDuummi+i6qwYmlYjb3Obx
|
||||||
|
7MzN1dY5Z9tJV86Min5BlvZb07Is1CKHqVQYlVoZaZmlaGQopSLmkuwigoooguii4NNRY7HLeuAD7/PC
|
||||||
|
++H9Pu8r/qc+Tw8EP8yO/mzZm8mfrYVqK8/tbD+SS+exOaQkHUclrpfZeRzfyafJHj6O3eXb636u7rem
|
||||||
|
CjrKZVal21m91kZ6xl/S1lpZaVnH90QPic5DjNT7+ZJ4QttBR6qgvVQm0+rEZpewO1xJrNlO0tbZeNUS
|
||||||
|
YeSSznBDkE8T3dw8nJMqcNQKpMpF5Nh9SC4FKceNJMm4XDIZVonJZoPhiyGe1gV5P9IxH/XPUSFsJwWJ
|
||||||
|
9604TUlulobbGUCR/CiyF9ntIcvhZjweZqhep792I7OD17hXoSwIbJWCsbeNNPcLMisE9hqB87xALl2K
|
||||||
|
VwniyfOTnetj9JJG/zmd7/eXM9XbRHeVF+GqFjx7U0F8SNA4aK5nCnn+JsKLd+F5yXpPmPz8IJInwPMG
|
||||||
|
lb6zGj96VjBxr57eGv+C4FFiD/FRQXxE0DQuaJ4UvPwawXFOEMwvZEMghDtfY6guQO+ZII17nLzoOMmT
|
||||||
|
2sB8BIvdjNA1tZnWhCBrLsIpgeOsIK9sGboaRdUNfEGDgVo/D06v59YRhWfXyhmsU5NDtGRXCTpnfDjP
|
||||||
|
CIzALgytBCNchGFEiRgFBEJR+mq83K/20VXpZeDyboYvhFKe0eI0r6xULyZqbCdaWExhtGieAhNtU4yH
|
||||||
|
1R66KvK4fdxDT32M0cZIikC0lKxhS3EJxbEdFG/dliRmUlC0nQdVMndOKLQfc3PndIixpgKEruvoWghN
|
||||||
|
C6Oqc5hrVTN7NYlq9hs26uyLBbhSrpg/UObG0TwmWzcvDPFfKdXT9jccyPg1fSWWGuEfaonJKiGE5Tdo
|
||||||
|
FcKGVVlc7gAAAABJRU5ErkJggg==
|
||||||
|
</value>
|
||||||
|
</data>
|
||||||
|
<data name="ToolStripButton2.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>
|
||||||
|
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||||
|
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAHxSURBVDhPYxgFGICxpbF5o6ur6wNjY2MuqBiDhYWFkI+3
|
||||||
|
94PO9vYFUCFMkJ+fr1BUUNCVlJD439zM/L+ZsXGAoaGhr5ubmwfQgGgLoFhaSsr/6srKtubqZlmoNghY
|
||||||
|
PG+x0bIlS79ER0b9t7e1++/u6vbfzMT0X3BwyP+4uASQgf9AYiC5/Ny8/2vXrv24bNkybah2BoaF8xau
|
||||||
|
q6+t+29na/tfQ139P8g2K0ur/yUlJZ9LS0q/wvi21jb/y0pK/q9cvuL/7h27FoM1L5o717ykuPhPVVnJ
|
||||||
|
/+DAgP/iYmL/tTQ0wYpNDA13AvEROxvb/04Ojv9NjU3+JyfE/6+tKP9fWlLyZ9miReYMzg726wIMFf/n
|
||||||
|
e5r8b0iP/G9jpPffxsr6f3dn139zE/OF1hYWa6ZMmvw/LCT0v5m26v8wE6X/1RFu/2szY//b2FiuZTCT
|
||||||
|
E/+ZZybxv99H43+bt/b/aDOF/5qamjuszK0y9fT0xLS0tCQszCzS9bS1twXoy/5vcFX9PznY4H+dm9p/
|
||||||
|
XVHRnwyaKipHOtwU/+9LNfm/KETzv5+BIsiAALD/kICamlpAoLEyWA1IbYer4n9VBfmjDOrq6lKOpvpr
|
||||||
|
CpyN3uX629/z9vAogOrBADZWVoVp3tYP6kOtPwS7OazT19eXhkoNXcDAAABhb8pBnSSQ0QAAAABJRU5E
|
||||||
|
rkJggg==
|
||||||
|
</value>
|
||||||
|
</data>
|
||||||
|
<data name="ToolStripButton3.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>
|
||||||
|
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
|
||||||
|
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAINSURBVDhPY6AVYAyc67K/+XD1/SYg9p3quAQqTiQIZWAO
|
||||||
|
Wu75Zu6Nuf9nX5/9322S/TmoDJEAaIDnctc3k69M/D/hSt9/p0nm56EyRAKwATZveq+0/O++0gg0wAiP
|
||||||
|
AfUMTOYLtWx81tnYB0CxZZ+ak88myw9dV8v/d1wp+e88T++2/XxtB591FvYeQOyyzsTeYJGyFVi/cAGn
|
||||||
|
Se6J5P99V5v+T7ze8H/Szbr/U27V/O++kfe/43rm/9Zr6f87r+f+775e9L/tSsH/hot5/yvPZf8P2Ov6
|
||||||
|
ny+OXZlBLJfTogoo0H+9Fqi56v+U2xX/p94p/d9+M+5/283o/y03I/533Ur+33Mz63/79fT/DZdT/1ee
|
||||||
|
T/4fdtD5P28ImzqDUAaLRcQOwf9ph4T/554U+l94Ruh/wRnB/zXXzP633/H533rH83/5ZZ3/+af5/+cB
|
||||||
|
cdZx/v9JB/j++27lAhrAoM7A6cQgLRnPsFk2mWGbYhrDNuV0IA3EaQdFf3Y+sP3f/sDqf9gm8Q8gMRgG
|
||||||
|
qRWPZ9jAZ8EgBA4HIGBEwfYMLOGHmN7UPeb4X/eY67/7ciZQLKCqgWAcABiNiecY3nS8YvgPwj5rGEhP
|
||||||
|
B7kXBN4s+CT/f/5H+f9hG3lJNyBpr+6bOQ89/oNwwCJ1Eg1gYGCSymXYYdjGcAOExeIZ5kHFSQIsDCoM
|
||||||
|
7GDMwMAMEUIHDAwAsbvzUSNPIp4AAAAASUVORK5CYII=
|
||||||
|
</value>
|
||||||
|
</data>
|
||||||
|
<metadata name="ContextMenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||||
|
<value>124, 17</value>
|
||||||
|
</metadata>
|
||||||
|
<data name="C1Daten.Images" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>
|
||||||
|
iVBORw0KGgoAAAANSUhEUgAAAAkAAAAJCAYAAADgkQYQAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
|
||||||
|
wwAADsMBx2+oZAAAADRJREFUKFN1iQEKACAMAv3/p4six3R5IIqHD+v1oIu0Lzy8B0cwQhcpQhSEwrvo
|
||||||
|
R9qCCWADoKoc5CkvobIAAAAASUVORK5CYII=
|
||||||
|
</value>
|
||||||
|
</data>
|
||||||
|
<data name="C1Daten.PrintInfo.PageSettings" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||||
|
<value>
|
||||||
|
AAEAAAD/////AQAAAAAAAAAMAgAAAFFTeXN0ZW0uRHJhd2luZywgVmVyc2lvbj00LjAuMC4wLCBDdWx0
|
||||||
|
dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWIwM2Y1ZjdmMTFkNTBhM2EFAQAAACRTeXN0ZW0uRHJh
|
||||||
|
d2luZy5QcmludGluZy5QYWdlU2V0dGluZ3MHAAAAD3ByaW50ZXJTZXR0aW5ncwVjb2xvcglwYXBlclNp
|
||||||
|
emULcGFwZXJTb3VyY2URcHJpbnRlclJlc29sdXRpb24JbGFuZHNjYXBlB21hcmdpbnMEBAQEBAQEJ1N5
|
||||||
|
c3RlbS5EcmF3aW5nLlByaW50aW5nLlByaW50ZXJTZXR0aW5ncwIAAAAgU3lzdGVtLkRyYXdpbmcuUHJp
|
||||||
|
bnRpbmcuVHJpU3RhdGUCAAAAIVN5c3RlbS5EcmF3aW5nLlByaW50aW5nLlBhcGVyU2l6ZQIAAAAjU3lz
|
||||||
|
dGVtLkRyYXdpbmcuUHJpbnRpbmcuUGFwZXJTb3VyY2UCAAAAKVN5c3RlbS5EcmF3aW5nLlByaW50aW5n
|
||||||
|
LlByaW50ZXJSZXNvbHV0aW9uAgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAf
|
||||||
|
U3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuTWFyZ2lucwIAAAACAAAACQMAAAAF/P///yBTeXN0ZW0uRHJh
|
||||||
|
d2luZy5QcmludGluZy5UcmlTdGF0ZQEAAAAFdmFsdWUAAgIAAAAACgoKAfv////8////AAkGAAAABQMA
|
||||||
|
AAAnU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRlclNldHRpbmdzEgAAAAtwcmludGVyTmFtZQpk
|
||||||
|
cml2ZXJOYW1lCm91dHB1dFBvcnQLcHJpbnRUb0ZpbGUUcHJpbnREaWFsb2dEaXNwbGF5ZWQKZXh0cmFi
|
||||||
|
eXRlcwlleHRyYWluZm8GY29waWVzBmR1cGxleAdjb2xsYXRlE2RlZmF1bHRQYWdlU2V0dGluZ3MIZnJv
|
||||||
|
bVBhZ2UGdG9QYWdlB21heFBhZ2UHbWluUGFnZQpwcmludFJhbmdlDGRldm1vZGVieXRlcw1jYWNoZWRE
|
||||||
|
ZXZtb2RlAQEBAAAABwAEBAQAAAAABAAHAQEHAgceU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuRHVwbGV4
|
||||||
|
AgAAACBTeXN0ZW0uRHJhd2luZy5QcmludGluZy5UcmlTdGF0ZQIAAAAkU3lzdGVtLkRyYXdpbmcuUHJp
|
||||||
|
bnRpbmcuUGFnZVNldHRpbmdzAgAAAAgICAgiU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcuUHJpbnRSYW5n
|
||||||
|
ZQIAAAAHAgIAAAAKBgcAAAAACQcAAAAAAAAACv//Bfj///8eU3lzdGVtLkRyYXdpbmcuUHJpbnRpbmcu
|
||||||
|
RHVwbGV4AQAAAAd2YWx1ZV9fAAgCAAAA/////wH3/////P///wAJCgAAAAAAAAAAAAAADycAAAAAAAAF
|
||||||
|
9f///yJTeXN0ZW0uRHJhd2luZy5QcmludGluZy5QcmludFJhbmdlAQAAAAd2YWx1ZV9fAAgCAAAAAAAA
|
||||||
|
AAAACgUGAAAAH1N5c3RlbS5EcmF3aW5nLlByaW50aW5nLk1hcmdpbnMIAAAABGxlZnQFcmlnaHQDdG9w
|
||||||
|
BmJvdHRvbQpkb3VibGVMZWZ0C2RvdWJsZVJpZ2h0CWRvdWJsZVRvcAxkb3VibGVCb3R0b20AAAAAAAAA
|
||||||
|
AAgICAgGBgYGAgAAAGQAAABkAAAAZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZ
|
||||||
|
QAEKAAAAAQAAAAkDAAAAAfP////8////AAoKCgHy/////P///wAJDwAAAAEPAAAABgAAAGQAAABkAAAA
|
||||||
|
ZAAAAGQAAAAAAAAAAABZQAAAAAAAAFlAAAAAAAAAWUAAAAAAAABZQAs=
|
||||||
|
</value>
|
||||||
|
</data>
|
||||||
|
<data name="C1Daten.PropBag" xml:space="preserve">
|
||||||
|
<value><?xml version="1.0"?><Blob><Styles type="C1.Win.C1TrueDBGrid.Design.ContextWrapper"><Data>HighlightRow{ForeColor:HighlightText;BackColor:Highlight;}Style8{}Style7{}Style2{}EvenRow{BackColor:White;}Normal{}RecordSelector{AlignImage:Center;}Inactive{ForeColor:InactiveCaptionText;BackColor:InactiveCaption;}OddRow{BackColor:224, 224, 224;}Style3{}Footer{}Style14{}Heading{AlignVert:Center;Border:Raised,,1, 1, 1, 1;ForeColor:ControlText;BackColor:Control;Wrap:True;}Style5{}Editor{}Style10{AlignHorz:Near;}FilterWatermark{ForeColor:InfoText;BackColor:Info;}Style16{}Selected{ForeColor:HighlightText;BackColor:Highlight;}Style15{}Style13{}Style12{}Style11{}Style4{}Style9{}Group{Border:None,,0, 0, 0, 0;AlignVert:Center;BackColor:ControlDark;}Style1{}Caption{AlignHorz:Center;}Style6{}FilterBar{ForeColor:Black;BackColor:255, 255, 192;}</Data></Styles><Splits><C1.Win.C1TrueDBGrid.MergeView Name="" CaptionHeight="17" ColumnCaptionHeight="17" ColumnFooterHeight="17" FilterBar="True" FilterBorderStyle="Raised" MarqueeStyle="DottedCellBorder" RecordSelectorWidth="17" DefRecSelWidth="17" VerticalScrollGroup="1" HorizontalScrollGroup="1"><CaptionStyle parent="Style2" me="Style10" /><EditorStyle parent="Editor" me="Style5" /><EvenRowStyle parent="EvenRow" me="Style8" /><FilterBarStyle parent="FilterBar" me="Style13" /><FilterWatermarkStyle parent="FilterWatermark" me="Style14" /><FooterStyle parent="Footer" me="Style3" /><GroupStyle parent="Group" me="Style12" /><HeadingStyle parent="Heading" me="Style2" /><HighLightRowStyle parent="HighlightRow" me="Style7" /><InactiveStyle parent="Inactive" me="Style4" /><OddRowStyle parent="OddRow" me="Style9" /><RecordSelectorStyle parent="RecordSelector" me="Style11" /><SelectedStyle parent="Selected" me="Style6" /><Style parent="Normal" me="Style1" /><ClientRect>0, 0, 1071, 404</ClientRect><BorderSide>0</BorderSide><BorderStyle>Sunken</BorderStyle></C1.Win.C1TrueDBGrid.MergeView></Splits><NamedStyles><Style parent="" me="Normal" /><Style parent="Normal" me="Heading" /><Style parent="Heading" me="Footer" /><Style parent="Heading" me="Caption" /><Style parent="Heading" me="Inactive" /><Style parent="Normal" me="Selected" /><Style parent="Normal" me="Editor" /><Style parent="Normal" me="HighlightRow" /><Style parent="Normal" me="EvenRow" /><Style parent="Normal" me="OddRow" /><Style parent="Heading" me="RecordSelector" /><Style parent="Normal" me="FilterBar" /><Style parent="FilterBar" me="FilterWatermark" /><Style parent="Caption" me="Group" /></NamedStyles><vertSplits>1</vertSplits><horzSplits>1</horzSplits><Layout>None</Layout><DefaultRecSelWidth>17</DefaultRecSelWidth><ClientArea>0, 0, 1071, 404</ClientArea><PrintPageHeaderStyle parent="" me="Style15" /><PrintPageFooterStyle parent="" me="Style16" /></Blob></value>
|
||||||
|
</data>
|
||||||
|
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||||
|
<value>
|
||||||
|
AAABAAEAMDAAAAEAIACoJQAAFgAAACgAAAAwAAAAYAAAAAEAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACA
|
||||||
|
AAYAgAAmAIAAGACAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACA
|
||||||
|
AAIAgAAyAIAAdgCAALQAgADSAIAAugCAADAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAACAIAAEgCA
|
||||||
|
ACoAgABUAIAAmACAAN4AgAD/AIAA/wCAAP8AgAD/AIAA/wCAANYAgAAeAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAIAAEACA
|
||||||
|
ADwAgAB0AIAApACAANIAgAD6AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgACmAIAAHAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAACACA
|
||||||
|
ADYAgACKAIAAwACAANwAgAD2AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAPoAgAD4AIAA/wCA
|
||||||
|
AP8AgAD0AIAAiACAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAIAgAAWAIAALgCA
|
||||||
|
AFYAgACmAIAA5gCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD6AIAA6ACAANAAgACgAIAAWgCA
|
||||||
|
ABgAgABcAIAA6gCAAP8AgAD/AIAA+ACAAH4AgAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAASAIAAQACA
|
||||||
|
AHIAgACsAIAA2gCAAPoAgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD8AIAA6ACAALwAgACCAIAAVACA
|
||||||
|
ACQAgAAAAAAAAAAAAAAAgAAOAIAAgACAAPAAgAD/AIAA/wCAAPIAgABSAIAAAgAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAACAIAAIgCA
|
||||||
|
AHQAgADCAIAA3gCAAPYAgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA8gCAAL4AgABqAIAAOACA
|
||||||
|
AB4AgAAGAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAFgCAAKQAgAD/AIAA/wCAAP8AgADSAIAAPACA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACA
|
||||||
|
AA4AgACGAIAA8ACAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAPoAgADkAIAAzACAAKAAgABOAIAAEgCA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAoAgADAAIAA/ACA
|
||||||
|
AP8AgAD/AIAAygCAADQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAIAADgCAAH4AgAD6AIAA/wCAAP8AgAD/AIAA/wCAAP8AgADiAIAAtACAAIQAgABMAIAAHACA
|
||||||
|
AAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgAA2AIAAzACAAP8AgAD/AIAA/ACAALYAgAASAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAgAACAIAAYACAAOoAgAD/AIAA/wCAAP8AgAD0AIAAvACAAHAAgAA0AIAAGgCA
|
||||||
|
AAYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAgAAEAIAAUgCAAOQAgAD/AIAA/wCAAPwAgACKAIAACAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAqAIAAzgCAAP8AgAD/AIAA9ACAAKIAgAAYAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAFgAgADyAIAA/wCAAP8AgADyAIAAgACA
|
||||||
|
AAwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgABgAIAA+gCAAP8AgAD8AIAAqgCA
|
||||||
|
ABoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAIAgACMAIAA9gCA
|
||||||
|
AP8AgAD/AIAA5gCAAGAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgACgAIAA/wCA
|
||||||
|
AP8AgADmAIAAUgCAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAQAIAASACAAG4AgAAiAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgAAaAIAApgCAAPwAgAD/AIAA/wCAAOIAgAAqAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgADSAIAA/wCAAP8AgADOAIAAHgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAgAAAAIAACgCAACAAgAA+AIAAdACAALQAgAD2AIAA/wCAAP8AgADaAIAARgCA
|
||||||
|
AAQAAAAAAAAAAAAAAAAAAAAAAIAAHACAALAAgAD/AIAA/wCAAP8AgADMAIAALgCAAAIAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAgADgAIAA/wCAAP8AgADGAIAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAIAACACAACwAgABiAIAAkACAAL4AgADuAIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD8AIAAxgCAADQAAAAAAAAAAAAAAAAAAAAAAAAAAACAACwAgADaAIAA/wCAAP8AgAD6AIAArACA
|
||||||
|
AB4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgADaAIAA/wCAAP8AgADIAIAAFAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAIAABACAACoAgAB6AIAAtACAANQAgADuAIAA/ACAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/ACAAMIAgAAOAAAAAAAAAAAAAAAAAAAAAACAAAAAgABWAIAA6ACA
|
||||||
|
AP8AgAD/AIAA9gCAAJQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAC2AIAA/wCAAP8AgADcAIAAOgCA
|
||||||
|
AAAAAAAAAAAAAACAAAIAgAAYAIAALgCAAFIAgACgAIAA3gCAAPwAgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgACuAIAAHACAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgAAEAIAAYgCAAOgAgAD/AIAA/wCAAP8AgAByAIAACAAAAAAAAAAAAAAAAAAAAAAAgACIAIAA/wCA
|
||||||
|
AP8AgAD2AIAAogCAAD4AgAAwAIAAUgCAAHoAgACuAIAA2gCAAPoAgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD0AIAAkgCA
|
||||||
|
ABQAAAAAAAAAAAAAAAAAAAAAAIAADACAAH4AgAD/AIAA/wCAAP8AgADkAIAAWACAAAYAAAAAAAAAAAAA
|
||||||
|
AAAAgABQAIAA+gCAAP8AgAD/AIAA9gCAAN4AgADWAIAA6ACAAPoAgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA8ACAAHwAAAAAAAAAAAAAAAAAAAAAAAAAAACAABAAgACyAIAA/wCAAP8AgAD8AIAA0gCA
|
||||||
|
ADQAAAAAAAAAAAAAAAAAgAAkAIAAyACAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAPwAgABkAIAACAAAAAAAAAAAAAAAAAAAAAAAgAAgAIAAtgCA
|
||||||
|
APoAgAD/AIAA/wCAANYAgAAcAAAAAAAAAAAAgAAIAIAAhACAAPgAgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgADgAIAAUgCAAAQAAAAAAAAAAAAA
|
||||||
|
AAAAgAAAAIAAOgCAANAAgAD/AIAA/wCAAP8AgACgAIAAGAAAAAAAgAAAAIAALgCAANQAgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD8AIAA0gCA
|
||||||
|
ADYAAAAAAAAAAAAAAAAAAAAAAIAABACAAEwAgAD6AIAA/wCAAP8AgADyAIAAfgCAAAoAAAAAAAAAAACA
|
||||||
|
ADwAgADoAIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAN4AgAAmAIAAAAAAAAAAAAAAAAAAAAAAAAAAgABwAIAA8gCAAP8AgAD/AIAA9ACA
|
||||||
|
AF4AAAAAAAAAAAAAAAAAgABmAIAA5gCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgACwAIAAIgAAAAAAAAAAAAAAAAAAAAAAgAAUAIAAngCA
|
||||||
|
APoAgAD/AIAA/wCAAJwAAAAAAAAAAAAAAAAAgAAMAIAAfACAAPAAgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD2AIAAlgCAABQAAAAAAAAAAAAA
|
||||||
|
AAAAgAAAAIAAZACAAPAAgAD/AIAA/wCAAH4AAAAAAAAAAAAAAAAAAAAAAIAABgCAAHoAgAD4AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/ACA
|
||||||
|
AJQAgAAIAAAAAAAAAAAAAAAAAIAAZgCAAPIAgAD/AIAA/wCAAFQAAAAAAAAAAAAAAAAAAAAAAAAAAACA
|
||||||
|
AAgAgACeAIAA+ACAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAPgAgABqAIAACAAAAAAAAAAAAIAAZgCAAPIAgAD/AIAA/wCAAFgAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAgAAgAIAArACAAPwAgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgADiAIAAVgCAAAIAAAAAAIAAWgCAAOwAgAD/AIAA/wCA
|
||||||
|
AHwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAHACAAK4AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA4gCAAFAAAAAAAIAALACA
|
||||||
|
ANIAgAD/AIAA/wCAAJwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAACQAgADMAIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAPIAgADOAIAAwACAAOgAgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
ANYAgAAqAIAABgCAAIAAgAD0AIAA4gCAAFgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgABEAIAA1gCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/ACAAOAAgACeAIAAaACAAD4AgAAoAIAAIACAAEYAgADuAIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgACwAIAAHgCAABAAgAA8AIAANACAAAoAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAgAAAAIAARACAANQAgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/ACAAPAAgADaAIAAxACAAJoAgABWAIAAHgCAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgABOAIAA5gCAAP8AgAD/AIAA/wCAAP8AgAD8AIAAqgCAAB4AAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAgCAAFAAgADuAIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/ACAAOYAgAC2AIAAjACAAGQAgAA2AIAAEACAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAgAAUAIAApgCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA+ACAAJQAgAAGAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAAAQAgAByAIAA9ACA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD0AIAAkgCAADYAgAAcAIAACACAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAgAAEAIAAKACAAGQAgACsAIAA5gCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
APYAgABoAIAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgAAIAIAAcgCAAO4AgAD/AIAA/wCAAP8AgAD2AIAAhgCAAAwAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgAACAIAAEACAACIAgAA8AIAAaACAAKIAgADkAIAA/ACAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgADqAIAAZACAAAYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAIAAEACAAIQAgAD8AIAA/wCAAP8AgAD/AIAA5gCAAGQAAAAAAAAAAAAA
|
||||||
|
AAAAgAAGAIAAIgCAAEgAgAB2AIAAnACAAMQAgADuAIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA2ACAAEYAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACAABAAgACqAIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AOYAgAB0AIAAXACAAIAAgAC2AIAA0ACAAOIAgAD4AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAL4AAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAYAIAApACA
|
||||||
|
APgAgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AMIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAgAAAAIAAKACAALYAgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
APwAgADeAIAAsACAAEQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAIAAAACAACgAgADeAIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCA
|
||||||
|
APQAgAC+AIAAiACAAFQAgAAwAIAAGgCAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAA2AIAA0ACAAPwAgAD/AIAA/wCA
|
||||||
|
AP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/ACAAPAAgADcAIAAygCA
|
||||||
|
AKgAgABsAIAANgCAAAoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAEAIAATACA
|
||||||
|
ANoAgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD/AIAA9ACAANYAgACsAIAAiACA
|
||||||
|
AGQAgAA6AIAAGACAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAIAABgCAAFAAgAD4AIAA/wCAAP8AgAD/AIAA/wCAAP8AgAD8AIAA4ACAAKwAgABsAIAAQgCA
|
||||||
|
ACwAgAAWAIAABgCAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgABaAIAAygCAANAAgAC4AIAAigCAAFYAgAAaAIAAAgAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAEAIAAHACAACQAgAAGAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||||
|
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///////8AAP///////wAA////x///
|
||||||
|
AAD///wD//8AAP//4AH//wAA//4AAP//AAD/8ABw//8AAP+AA/B//wAA/AA/+D//AADgAf/8H/8AAOAP
|
||||||
|
//4P/wAAwP///wf/AACD////g/8AAIf///+D/wAAD////8H/AAAP//4P4P8AAA//4AfwfwAAD/8AA/g/
|
||||||
|
AAAP8AAB/D8AAAeAAAD+HwAAgAAAAP4PAACAAAAAfwcAAIAAAAA/gwAAwAAAAB/DAADgAAAAD+EAAPAA
|
||||||
|
AAAH4AAA+AAAAAPxAAD8AAAAAfEAAPwAAAAB8QAA/gAAAADxAAD/AAAAAHAAAP+AAAAAMQAA/8AAAfAf
|
||||||
|
AAD/4AAf+A8AAP/wAf/4BwAA//gP//AHAAD//A//AAMAAP/8D/AAAQAA//4GAAAAAAD//wAAAAAAAP//
|
||||||
|
gAAAAQAA///AAAAPAAD//+AAAf8AAP//8AAf/wAA///4A///AAD///w///8AAP///////wAA////////
|
||||||
|
AAA=
|
||||||
|
</value>
|
||||||
|
</data>
|
||||||
|
</root>
|
||||||