70 Commits

Author SHA1 Message Date
Developer01
743ef3fe22 MS 2.8.2 Fehlerhandling und Column-Formel Test bei Henning 2026-02-25 13:16:12 +01:00
Developer01
25dcfb2061 VorKOG_Hotspots in LOD 2026-02-13 07:56:02 +01:00
Developer01
3e34b52c6f 2.8.1 2026-02-12 17:25:46 +01:00
Developer01
950aeba89e 2.8.1 2026-02-12 17:25:40 +01:00
Developer01
e086c5db14 Finalisierung Columnberechnungen - ab in den TEST 2026-02-12 10:19:28 +01:00
Developer01
4898d25388 Berechnung Spalten start 2026-02-10 17:40:15 +01:00
Developer01
c2b3c023b9 Merge in MAster 2026-02-10 13:05:24 +01:00
Developer01
034ca839ba 2.7.9 an WISAG ausgegeben 2026-02-05 16:58:19 +01:00
Developer01
05c4ee9f41 Bug Speichern Inherit Value und ReadOnly Columns 2026-02-02 16:58:04 +01:00
Developer01
83e31a2e00 Geschwindigkeitsoptimierungen Main 2026-02-02 11:44:17 +01:00
Developer01
bca424f50f Optimierungen 2026-01-30 14:40:02 +01:00
Developer01
11d27cd860 Create_Basic_View 2026-01-30 13:02:55 +01:00
Developer01
969f27a91f frm main Load Grid Optimierung 2026-01-30 13:00:16 +01:00
Developer01
b7d427b5eb Decide_Load_Speed 2026-01-30 12:56:36 +01:00
Developer01
0f936c71e6 Speed Otimizing Lookp etc 2026-01-30 12:53:01 +01:00
Developer01
a53bfee8d5 ComboBOx Optimierung 2026-01-30 12:13:08 +01:00
Developer01
df4a8df25a Optimierung Speed Load_Next Document 2026-01-30 12:09:21 +01:00
Developer01
0e6848aa69 Hotspots 2026-01-30 11:23:35 +01:00
Developer01
72b1e4acba Vererbung Tabelle Finalisierung 2026-01-30 09:01:47 +01:00
Developer01
c249aa890d Messpunkte integriert 2026-01-29 10:46:09 +01:00
Developer01
f1984572b7 2.7.7 2026-01-28 21:48:44 +01:00
Developer01
ce50bc2964 Vererbung Werte 1 2026-01-28 21:47:49 +01:00
Developer01
2a8beead00 Logging bzgl AdditionalTitle 2026-01-12 13:16:08 +01:00
Developer01
9b85d1552e Laufzeitvererbung für Spaltenwerte implementiert. Eingeführter CellValueChanged-Handler plus HandleInheritedColumnValue prüfen das INHERIT_VALUE-Flag der Spaltendefinition. Werte werden ab dem bearbeiteten Eintrag auf alle folgenden Zeilen der aktiven Spalte übertragen, inklusive Schutz gegen rekursive Auslösung. 2026-01-12 11:36:03 +01:00
Developer01
9312c1244b 2.7.6.0 Indexierung Vektorfelder bei finalen INDexen 2025-12-22 14:13:50 +01:00
Developer01
55d7e025c9 Normalizing currency for windream 2025-12-16 17:21:18 +01:00
Developer01
2f64dc4b70 Vor Logging erweiterung in Tabelle Row Add 2025-12-12 10:04:53 +01:00
Developer01
17ec4953e5 WIX Aufruf über Link 2025-12-09 10:45:06 +01:00
Developer01
c29c508224 2.7.4 2025-12-05 14:03:07 +01:00
Developer01
443242415a Alignmenttext und Currency 2025-12-05 09:22:01 +01:00
Developer01
4db9b71a29 Merge and Commit Master 2025-12-03 14:41:02 +01:00
Developer01
65b73b45bf Currency Summary EUR 2025-12-03 14:29:18 +01:00
Developer01
4554c5841d Validator NotResponible mit oder ohne override/inlcude FI 2025-12-03 14:11:30 +01:00
Developer01
eef779ab09 • Stabilisiert Ladevorgang und Positions-/Größen-Wiederherstellung des Formulars
• Robustere Behandlung von Datenquellen, SQL-Placeholders und Verbindungs-IDs
• Verbesserte Steuerlogik für abhängige Controls, Enable/Disable und SetControlData
• Konsistente Verarbeitung von Vektorfeldern, Lookup, ComboBox, DateEdit und GridControl
• Validierung: Pflichtfelder, Regex-Checks, Grid-Zellenvalidierung, Fehlerdialoge
• Performance- und Logging-Verbesserungen, reduzierte Nebenwirkungen (Flags, Flow)
• Zusätzliche Suchen: Preload, OnClick, UI-Anbindung, Refresh
• Dokument-Viewer: Laden, Sichtbarkeit, PDF-Annotationen und Export-Workflow
• Finale Indexierung inkl. SQL-basierten Werten, Work-History-Logging, Move2Folder
• Fehlerbehandlung bei Überspringen/Löschen, Freigabe und Workflow-Abschluss
• UI-Feedback: Statuslabel, Ribbon-Buttons, Tooltips, Ghost-Mode Unterstützung
• Codehygiene: Null-/DBNull-Checks, Culture-Handling, farbliche Formatierung (Currency)
2025-11-26 14:05:37 +01:00
Developer01
040c7aeac0 2.7.3 WISAG
• Erweiterung von SetControlValues_FromControl um Handling für DevExpress DateEdit (Parsing verschiedener Datumsformate, Farbanpassung).
• Ergänzung einer analogen Fall-Branch für System.Windows.Forms.DateTimePicker (Fallback auf MinimumDateTime bei ungültigem oder leerem Caption).
• Keine bestehenden Funktionen außerhalb der neuen Select-Case-Zweige angepasst.
Nutzen: Ermöglicht dynamisches Setzen von Datumswerten aus SQL-Steuerdaten (Caption-Feld) für beide Datumstypen und konsistente Farbgestaltung wie bei anderen Steuerelementen.
Hinweis: Validierungs- und Logging-Struktur wiederverwendet; keine Seiteneffekte auf andere Control-Typen.
2025-11-19 13:02:27 +01:00
Developer01
6eafe9d53a Ms merge 2025-11-13 10:27:02 +01:00
Developer01
5b001aee03 Merge branch '2.6.1-Bugfix-Massenbearbeitung' into 2.7.0-Release 2025-10-22 08:37:12 +02:00
Developer01
5d69edab9f Merge branch '2.6.0-Release' into 2.7.0-Release 2025-10-22 08:36:34 +02:00
Developer01
c3f1687648 Referenzen upgedated 2025-10-22 08:30:21 +02:00
Developer01
b526108d5d Master empty row für GIT 2025-09-11 14:30:31 +02:00
Developer01
c9badc29bd GIT_TEST 2025-09-11 14:28:44 +02:00
Developer01
fc271e0a82 Änderungen aus 2.61 Bugfix 2025-09-09 17:33:56 +02:00
Developer01
7da4c89777 Finales Bugfix 2025-09-09 17:30:01 +02:00
Developer01
fd2f59af04 Übernahme frmValidator-Logik aus Bugfix 2.6.1 2025-09-09 11:26:49 +02:00
Developer01
d7520ac86a V1 - Anpassung frmValidator Logik Massenbarbeitung 2025-09-09 11:25:37 +02:00
Developer01
0eb480b427 frmValidator - SQLEnable funktionierte nicht bei Massenbearbeitung 2025-09-09 10:44:42 +02:00
OlgunR
544f710083 Profile_group_color wird aktualisiert - frmMain 2025-09-04 14:37:51 +02:00
Developer01
46d6cb0069 Dashboard gelöscht 2025-09-04 14:36:56 +02:00
Developer01
daf1c16b30 DocumentViewer Aufruf über Pfad (txtDateien) 2025-08-22 08:46:26 +02:00
Developer01
468f6e8ff0 Nochmal ProfileID 2025-08-22 08:11:06 +02:00
Developer01
c577177493 ProfileID in FormDesigner 2025-08-22 08:03:33 +02:00
Developer01
4807ab53b0 Version 2.6.0 für Master 2025-08-21 12:08:04 +02:00
Developer01
03b566574f Indexe leeren wie Vektor, ValidatorSearch und Instanzierung, ShowDocument abfangen 2025-08-21 11:19:48 +02:00
Developer01
a9cc02c4b4 @@Display Only wie ReadOnly behandeln Try1 2025-08-19 13:34:55 +02:00
Developer01
f21dbd3423 LookupControl Rückgabe Wert1','Wert2
VektorBoolean Handling und String.empty zum leeren
2025-08-18 18:28:21 +02:00
Developer01
cbdc5f900c Projekt LUControl und modules aus Projektmappe entfernt 2025-08-18 11:54:33 +02:00
Developer01
329f733ec9 Überarbeitung nach Rückmeldung Marvin (windreamIndexe SQL Editor, Dynmisch verkleinern des pnlValidators, Regexprüfung editvalue, Bedienung Tastaturbefehle, ...) 2025-08-18 11:51:56 +02:00
Developer01
642e65c95b FormatString Currency 2025-08-15 15:07:24 +02:00
Developer01
ffa65a9c07 Prüfen der Offenen Tickets und Push in Master, frmValidator (Fehlerhandling, Currency etc) 2025-08-15 12:55:53 +02:00
Developer01
c4f77ed2e8 Merge mit Branch 2.5.4.0 2025-08-15 08:29:46 +02:00
Developer01
330453abf1 Projektdatei korrupt, geändert, FormDesigner tastaturbefehle nach Merge rahman wieder integriert 2025-08-13 09:36:52 +02:00
Developer01
48d1e3e372 V 2.5.6 Dynamisches Panel, Verweise korrigieren, Finale Indexe Reihenfolge und Leeren 2025-08-12 17:13:42 +02:00
Developer01
1bbd3467ca Renaming DDProcessmanager 2025-07-18 15:42:56 +02:00
Developer01
6f3c439695 Vorgehen bei ProfileSearch, ersetzen ' 2025-06-26 14:39:44 +02:00
Developer01
6172bb3fd7 GD Picture auf 14.3.3 2025-06-20 08:50:17 +02:00
Developer01
b409e2caad merge 2025-06-17 16:50:42 +02:00
Developer01
653f9a82ca stage commit 2025-06-17 16:49:50 +02:00
OlgunR
b96a17ddff NugetUpdates 2025-06-17 16:48:35 +02:00
OlgunR
2727548bde Formatierung der DateTime-Spalten im Grid Overview - Load_Grid_Overview 2025-06-05 09:56:27 +02:00
OlgunR
0cca734cd0 Support Link wird aus der DB geholt und ist nicht mehr hardcoded - frmKonfig 2025-05-15 17:03:36 +02:00
120 changed files with 13887 additions and 7681 deletions

62
app/README.md Normal file
View File

@@ -0,0 +1,62 @@
Here's the improved `README.md` file incorporating the new content while maintaining the existing structure and coherence:
# Project Title
## Overview
Provide a brief description of the project, its purpose, and its main features.
## Installation
Instructions on how to install and set up the project.
## Usage
How to use the project, including code examples and explanations.
## DataColumn.Expression (Formelsprachen-Übersicht)
Die dynamischen Grid-Formeln verwenden die ADO.NET **`DataColumn.Expression`**-Sprache. Spalten werden immer über den **Spaltennamen** referenziert (in eckigen Klammern).
### Grundoperatoren
| Typ | Ausdruck | Beispiel |
|---|---|---|
| Arithmetik | `+ - * /` | `[A] * [B]` |
| Vergleich | `= <> > >= < <=` | `[MENGE] > 0` |
| Logik | `AND OR NOT` | `[A] > 0 AND [B] < 10` |
| Klammern | `(...)` | `([A] + [B]) * 2` |
### String-Verkettung
| Ausdruck | Beispiel |
|---|---|
| `+` | `[VORNAME] + ' - ' + [NACHNAME]` |
| `Convert` | `Convert([NUMMER], 'System.String')` |
### Bedingungen
| Ausdruck | Beispiel |
|---|---|
| `IIF` | `IIF([A] = 'Harry', 'Blume', 'Tier')` |
### Häufige Funktionen
| Funktion | Beispiel |
|---|---|
| `Len` | `Len([TEXT])` |
| `Trim` | `Trim([TEXT])` |
| `Substring` | `Substring([TEXT], 0, 3)` |
| `IsNull` | `IsNull([WERT], 0)` |
| `Convert` | `Convert([WERT], 'System.Double')` |
### Beispiele (FORMULA_EXPRESSION)
- **Multiplikation:** `[MENGE] * [PREIS]`
- **Addieren:** `[A] + [B]`
- **Division:** `[A] / [B]`
- **Text zusammensetzen:** `[SAKNR] + ' - ' + [KST]`
- **Bedingung:** `IIF([STATUS] = 'X', 'OK', 'NOK')`
## Contributing
Guidelines for contributing to the project.
## License
Information about the project's license.
## Contact
How to contact the project maintainers for questions or support.

View File

@@ -123,7 +123,6 @@
<File Id="DDLogging" Name="DigitalData.Modules.Logging.dll" Source="DigitalData.Modules.Logging.dll"/> <File Id="DDLogging" Name="DigitalData.Modules.Logging.dll" Source="DigitalData.Modules.Logging.dll"/>
<File Id="DDInterfaces" Name="DigitalData.Modules.Interfaces.dll" Source="DigitalData.Modules.Interfaces.dll"/> <File Id="DDInterfaces" Name="DigitalData.Modules.Interfaces.dll" Source="DigitalData.Modules.Interfaces.dll"/>
<File Id="DDBase" Name="DigitalData.Modules.Base.dll" Source="DigitalData.Modules.Base.dll"/> <File Id="DDBase" Name="DigitalData.Modules.Base.dll" Source="DigitalData.Modules.Base.dll"/>
<File Id="DDLanguage" Name="DigitalData.Modules.Language.dll" Source="DigitalData.Modules.Language.dll"/>
<File Id="DDFilesystem" Name="DigitalData.Modules.Filesystem.dll" Source="DigitalData.Modules.Filesystem.dll"/> <File Id="DDFilesystem" Name="DigitalData.Modules.Filesystem.dll" Source="DigitalData.Modules.Filesystem.dll"/>
<File Id="DDEncryption" Name="DigitalData.Modules.Encryption.dll" Source="DigitalData.Modules.Encryption.dll"/> <File Id="DDEncryption" Name="DigitalData.Modules.Encryption.dll" Source="DigitalData.Modules.Encryption.dll"/>
<File Id="DDWindream" Name="DigitalData.Modules.Windream.dll" Source="DigitalData.Modules.Windream.dll"/> <File Id="DDWindream" Name="DigitalData.Modules.Windream.dll" Source="DigitalData.Modules.Windream.dll"/>
@@ -154,7 +153,7 @@
<File Id="GdPicture.NET.14.image" Name="GdPicture.NET.14.image.gdimgplug.dll" /> <File Id="GdPicture.NET.14.image" Name="GdPicture.NET.14.image.gdimgplug.dll" />
<File Id="GdPicture.NET.14.image64" Name="GdPicture.NET.14.image.gdimgplug.64.dll" /> <File Id="GdPicture.NET.14.image64" Name="GdPicture.NET.14.image.gdimgplug.64.dll" />
<File Id="GdPicture.NET.14.Imaging.Rendering.Skia" Name="GdPicture.NET.14.Imaging.Rendering.Skia.dll" /> <File Id="GdPicture.NET.14.Imaging.Rendering.Skia" Name="GdPicture.NET.14.Imaging.Rendering.Skia.dll" />
<File Id="GdPicture.NET.14..Rendering.Skia.64" Name="GdPicture.NET.14.Imaging.Rendering.Skia.64.dll" /> <File Id="GdPicture.NET.14.Rendering.Skia.64" Name="GdPicture.NET.14.Imaging.Rendering.Skia.64.dll" />
<File Id="GdPicture.NET.14.Imaging" Name="GdPicture.NET.14.Imaging.dll" /> <File Id="GdPicture.NET.14.Imaging" Name="GdPicture.NET.14.Imaging.dll" />
<File Id="GdPicture.NET.14.Common" Name="GdPicture.NET.14.Common.dll" /> <File Id="GdPicture.NET.14.Common" Name="GdPicture.NET.14.Common.dll" />
<File Id="GdPicture.NET.14.Imaging.Rendering" Name="GdPicture.NET.14.Imaging.Rendering.dll" /> <File Id="GdPicture.NET.14.Imaging.Rendering" Name="GdPicture.NET.14.Imaging.Rendering.dll" />
@@ -166,7 +165,12 @@
<File Id="GdPicture.NET.14.OpenXML" Name="GdPicture.NET.14.OpenXML.dll" /> <File Id="GdPicture.NET.14.OpenXML" Name="GdPicture.NET.14.OpenXML.dll" />
<File Id="GdPicture.NET.14.Email" Name="GdPicture.NET.14.Email.dll" /> <File Id="GdPicture.NET.14.Email" Name="GdPicture.NET.14.Email.dll" />
<File Id="GdPicture.NET.14.HTML" Name="GdPicture.NET.14.HTML.dll" /> <File Id="GdPicture.NET.14.HTML" Name="GdPicture.NET.14.HTML.dll" />
<File Id="GdPicture.NET.14.MSOfficeBinary" Name="GdPicture.NET.14.MSOfficeBinary.dll"/>
<File Id="GdPicture.NET.14.CAD" Name="GdPicture.NET.14.CAD.dll"/>
<File Id="GdPicture.NET.14.CAD.DWG" Name="GdPicture.NET.14.CAD.DWG.dll"/>
<File Id="BouncyCastle.Cryptography" Name="BouncyCastle.Cryptography.dll"/>
<File Id="System.ValueTuple" Name="System.ValueTuple.dll" />
<File Id="System.IO.Packaging" Name="System.IO.Packaging.dll" />
</Component> </Component>
<Component Id="DevExpressLibs" Guid="CB40DAAE-348E-4BD3-B275-9A526EB8F191"> <Component Id="DevExpressLibs" Guid="CB40DAAE-348E-4BD3-B275-9A526EB8F191">
@@ -272,14 +276,13 @@
</RegistryKey> </RegistryKey>
</RegistryKey> </RegistryKey>
<util:RemoveFolderEx Id="RemoveApplicationFolder" On="uninstall" Property="APPLICATIONFOLDER" /> <util:RemoveFolderEx Id="RemoveApplicationFolder" On="uninstall" Property="INSTALLDIR" />
</Component> </Component>
</DirectoryRef> </DirectoryRef>
<Feature Id="MainApplication" Title="Main Application" Level="1"> <Feature Id="MainApplication" Title="Main Application" Level="1">
<ComponentRef Id="MainApplicationExe" /> <ComponentRef Id="MainApplicationExe" />
<ComponentRef Id="RegistryKeys" /> <ComponentRef Id="RegistryKeys" />
<!--<ComponentRef Id="ReleaseNotes" />-->
<ComponentRef Id="WindreamLibs" /> <ComponentRef Id="WindreamLibs" />
<ComponentRef Id="FormsUtilsLibs"/> <ComponentRef Id="FormsUtilsLibs"/>
<ComponentRef Id="DDLibs" /> <ComponentRef Id="DDLibs" />
@@ -289,6 +292,7 @@
<ComponentRef Id="DevExpressLibs" /> <ComponentRef Id="DevExpressLibs" />
<ComponentRef Id="GDPictureLibs" /> <ComponentRef Id="GDPictureLibs" />
<ComponentRef Id="Devexpress.Locales.de" /> <ComponentRef Id="Devexpress.Locales.de" />
<ComponentRef Id="ProtocolHandlerMachine" />
</Feature> </Feature>
<Feature Id="DesktopShortcut" Title="Desktop Shortcut"> <Feature Id="DesktopShortcut" Title="Desktop Shortcut">
@@ -300,7 +304,28 @@
<Condition Level="0">DISABLE_STARTMENU_ICON</Condition> <Condition Level="0">DISABLE_STARTMENU_ICON</Condition>
<ComponentRef Id="ApplicationShortcut_StartMenu" /> <ComponentRef Id="ApplicationShortcut_StartMenu" />
</Feature> </Feature>
<!-- #######################-->
<!-- Beginn Aufruf über Link-->
<!-- Per-user ProtocolHandler (HKCU) -->
<Component Id="ProtocolHandlerMachine" Guid="F2817163-DAAA-4EB2-A8D9-A9EF00E910C0" Directory="INSTALLDIR">
<!-- Basis-Schlüssel -->
<RegistryKey Root="HKLM" Key="Software\Classes\DDtaskFLOW" ForceCreateOnInstall="yes" ForceDeleteOnUninstall="yes">
<RegistryValue Type="string" Value="URL:ddtaskflow Protocol" KeyPath="yes"/>
<RegistryValue Type="string" Name="URL Protocol" Value="" />
</RegistryKey>
<!-- Icon -->
<RegistryKey Root="HKLM" Key="Software\Classes\DDtaskFLOW\DefaultIcon" ForceCreateOnInstall="yes" ForceDeleteOnUninstall="yes">
<RegistryValue Type="string" Value="[INSTALLDIR]taskFLOW.exe,1" />
</RegistryKey>
<!-- Kommando -->
<RegistryKey Root="HKLM" Key="Software\Classes\DDtaskFLOW\shell\open\command" ForceCreateOnInstall="yes" ForceDeleteOnUninstall="yes">
<RegistryValue Type="string" Value="&quot;[INSTALLDIR]taskFLOW.exe&quot; &quot;%1&quot;" />
</RegistryKey>
</Component>
<!-- Ende Aufruf über Link-->
<!-- #######################-->
<!-- Legt das Standard-Installationsverzeichnis fest--> <!-- Legt das Standard-Installationsverzeichnis fest-->
<Property Id="WIXUI_INSTALLDIR" Value="INSTALLDIR" /> <Property Id="WIXUI_INSTALLDIR" Value="INSTALLDIR" />
<Property Id="_BrowseProperty" Value="INSTALLDIR" /> <Property Id="_BrowseProperty" Value="INSTALLDIR" />

View File

@@ -7,9 +7,7 @@ Project("{930C7802-8A8C-48F9-8165-68863BCCD9DD}") = "SetupVS19", "SetupVS19\Setu
EndProject EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "taskFLOW", "TaskFlow\taskFLOW.vbproj", "{6ACA1432-09A2-47EF-A704-C0AA73905756}" Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "taskFLOW", "TaskFlow\taskFLOW.vbproj", "{6ACA1432-09A2-47EF-A704-C0AA73905756}"
EndProject EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "Windream", "..\..\..\2_DLL Projekte\DDModules\Windream\Windream.vbproj", "{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}" Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DocumentViewer", "..\..\..\2_DLL Projekte\Controls.DocumentViewer\DocumentViewer.vbproj", "{0958CDDF-4A16-41F6-8837-8335F71D599C}"
EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "LookupControl", "..\..\..\2_DLL Projekte\DDMonorepo\Controls.LookupGrid\LookupControl.vbproj", "{3DCD6D1A-C830-4241-B7E4-27430E7EA483}"
EndProject EndProject
Global Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution GlobalSection(SolutionConfigurationPlatforms) = preSolution
@@ -65,46 +63,26 @@ Global
{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|Any CPU.Build.0 = Release|x86 {6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|Any CPU.Build.0 = Release|x86
{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|x86.ActiveCfg = Debug|x86 {6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|x86.ActiveCfg = Debug|x86
{6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|x86.Build.0 = Debug|x86 {6ACA1432-09A2-47EF-A704-C0AA73905756}.SingleImage|x86.Build.0 = Debug|x86
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.CD_ROM|Any CPU.ActiveCfg = Debug|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.CD_ROM|Any CPU.ActiveCfg = Release|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.CD_ROM|Any CPU.Build.0 = Debug|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.CD_ROM|Any CPU.Build.0 = Release|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.CD_ROM|x86.ActiveCfg = Debug|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.CD_ROM|x86.ActiveCfg = Release|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.CD_ROM|x86.Build.0 = Debug|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.CD_ROM|x86.Build.0 = Release|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Debug|Any CPU.ActiveCfg = Debug|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Debug|Any CPU.Build.0 = Debug|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.Debug|Any CPU.Build.0 = Debug|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Debug|x86.ActiveCfg = Debug|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.Debug|x86.ActiveCfg = Debug|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Debug|x86.Build.0 = Debug|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.Debug|x86.Build.0 = Debug|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.DVD-5|Any CPU.ActiveCfg = Debug|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.DVD-5|Any CPU.ActiveCfg = Release|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.DVD-5|Any CPU.Build.0 = Debug|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.DVD-5|Any CPU.Build.0 = Release|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.DVD-5|x86.ActiveCfg = Debug|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.DVD-5|x86.ActiveCfg = Release|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.DVD-5|x86.Build.0 = Debug|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.DVD-5|x86.Build.0 = Release|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Release|Any CPU.ActiveCfg = Release|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.Release|Any CPU.ActiveCfg = Release|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Release|Any CPU.Build.0 = Release|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.Release|Any CPU.Build.0 = Release|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Release|x86.ActiveCfg = Release|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.Release|x86.ActiveCfg = Release|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.Release|x86.Build.0 = Release|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.Release|x86.Build.0 = Release|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.SingleImage|Any CPU.ActiveCfg = Debug|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.SingleImage|Any CPU.ActiveCfg = Release|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.SingleImage|Any CPU.Build.0 = Debug|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.SingleImage|Any CPU.Build.0 = Release|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.SingleImage|x86.ActiveCfg = Debug|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.SingleImage|x86.ActiveCfg = Release|Any CPU
{4C86DF8F-A280-40D4-85B0-10B1BF66C15C}.SingleImage|x86.Build.0 = Debug|Any CPU {0958CDDF-4A16-41F6-8837-8335F71D599C}.SingleImage|x86.Build.0 = Release|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.CD_ROM|Any CPU.ActiveCfg = Debug|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.CD_ROM|Any CPU.Build.0 = Debug|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.CD_ROM|x86.ActiveCfg = Debug|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.CD_ROM|x86.Build.0 = Debug|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Debug|Any CPU.Build.0 = Debug|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Debug|x86.ActiveCfg = Debug|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Debug|x86.Build.0 = Debug|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.DVD-5|Any CPU.ActiveCfg = Debug|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.DVD-5|Any CPU.Build.0 = Debug|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.DVD-5|x86.ActiveCfg = Debug|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.DVD-5|x86.Build.0 = Debug|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Release|Any CPU.ActiveCfg = Release|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Release|Any CPU.Build.0 = Release|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Release|x86.ActiveCfg = Release|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.Release|x86.Build.0 = Release|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.SingleImage|Any CPU.ActiveCfg = Debug|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.SingleImage|Any CPU.Build.0 = Debug|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.SingleImage|x86.ActiveCfg = Debug|Any CPU
{3DCD6D1A-C830-4241-B7E4-27430E7EA483}.SingleImage|x86.Build.0 = Debug|Any CPU
EndGlobalSection EndGlobalSection
GlobalSection(SolutionProperties) = preSolution GlobalSection(SolutionProperties) = preSolution
HideSolutionNode = FALSE HideSolutionNode = FALSE

View File

@@ -2,17 +2,18 @@
<configuration> <configuration>
<configSections> <configSections>
<sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System"> <sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System">
<section name="DD_ProcessManager.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" /> <section name="taskFLOW.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" />
<section name="DevExpress.LookAndFeel.Design.AppSettings" type="System.Configuration.ClientSettingsSection" requirePermission="false" /> <section name="DevExpress.LookAndFeel.Design.AppSettings" type="System.Configuration.ClientSettingsSection" requirePermission="false" />
</sectionGroup> </sectionGroup>
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089"> <!-- For more information on Entity Framework configuration, visit http://go.microsoft.com/fwlink/?LinkID=237468 -->
<section name="DD_ProcessManager.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
</sectionGroup>
<!-- For more information on Entity Framework configuration, visit http://go.microsoft.com/fwlink/?LinkID=237468 --> <!-- For more information on Entity Framework configuration, visit http://go.microsoft.com/fwlink/?LinkID=237468 -->
<section name="entityFramework" type="System.Data.Entity.Internal.ConfigFile.EntityFrameworkSection, EntityFramework, Version=6.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" /> <section name="entityFramework" type="System.Data.Entity.Internal.ConfigFile.EntityFrameworkSection, EntityFramework, Version=6.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" requirePermission="false" />
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<section name="taskFLOW.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
</sectionGroup>
</configSections> </configSections>
<applicationSettings> <applicationSettings>
<DD_ProcessManager.My.MySettings> <taskFLOW.My.MySettings>
<setting name="UseAppConfigConString" serializeAs="String"> <setting name="UseAppConfigConString" serializeAs="String">
<value>False</value> <value>False</value>
</setting> </setting>
@@ -22,7 +23,7 @@
<setting name="GDPICTURE_VERSION" serializeAs="String"> <setting name="GDPICTURE_VERSION" serializeAs="String">
<value>11.2024</value> <value>11.2024</value>
</setting> </setting>
</DD_ProcessManager.My.MySettings> </taskFLOW.My.MySettings>
<DevExpress.LookAndFeel.Design.AppSettings> <DevExpress.LookAndFeel.Design.AppSettings>
<setting name="DefaultAppSkin" serializeAs="String"> <setting name="DefaultAppSkin" serializeAs="String">
<value>Skin/Office 2019 White</value> <value>Skin/Office 2019 White</value>
@@ -101,54 +102,12 @@
</DevExpress.LookAndFeel.Design.AppSettings> </DevExpress.LookAndFeel.Design.AppSettings>
</applicationSettings> </applicationSettings>
<connectionStrings> <connectionStrings>
<add name="DD_ProcessManager.My.MySettings.ConnectionString" connectionString="Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd;Encrypt=False" providerName="System.Data.SqlClient" /> <add name="taskFLOW.My.MySettings.ConnectionString" connectionString="Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd;Encrypt=False"
providerName="System.Data.SqlClient" />
</connectionStrings> </connectionStrings>
<startup> <startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.2" /> <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.2" />
</startup> </startup>
<userSettings>
<DD_ProcessManager.My.MySettings>
<setting name="IntervallReminder" serializeAs="String">
<value>5</value>
</setting>
<setting name="frmMainSize" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmMainPosition" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmValidatorSize" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmValidatorPosition" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmMassValidatorSize" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmMassValidatorposition" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmValidatorSearchPosition" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmValSearchSplitterDistance" serializeAs="String">
<value>563</value>
</setting>
<setting name="frmMainWindowState" serializeAs="String">
<value>Normal</value>
</setting>
<setting name="frmTableColumns_Position" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmValidatorSearchSize" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmValidatorWindowState" serializeAs="String">
<value>Normal</value>
</setting>
</DD_ProcessManager.My.MySettings>
</userSettings>
<runtime> <runtime>
<assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1"> <assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
<dependentAssembly> <dependentAssembly>
@@ -185,7 +144,7 @@
</dependentAssembly> </dependentAssembly>
<dependentAssembly> <dependentAssembly>
<assemblyIdentity name="GdPicture.NET.14.Common" publicKeyToken="f52a2e60ad468dbb" culture="neutral" /> <assemblyIdentity name="GdPicture.NET.14.Common" publicKeyToken="f52a2e60ad468dbb" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-14.3.1.0" newVersion="14.3.1.0" /> <bindingRedirect oldVersion="0.0.0.0-14.3.3.0" newVersion="14.3.3.0" />
</dependentAssembly> </dependentAssembly>
<dependentAssembly> <dependentAssembly>
<assemblyIdentity name="GdPicture.NET.14.Imaging" publicKeyToken="f52a2e60ad468dbb" culture="neutral" /> <assemblyIdentity name="GdPicture.NET.14.Imaging" publicKeyToken="f52a2e60ad468dbb" culture="neutral" />
@@ -211,6 +170,30 @@
<assemblyIdentity name="protobuf-net" publicKeyToken="257b51d87d2e4d67" culture="neutral" /> <assemblyIdentity name="protobuf-net" publicKeyToken="257b51d87d2e4d67" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-3.0.0.0" newVersion="3.0.0.0" /> <bindingRedirect oldVersion="0.0.0.0-3.0.0.0" newVersion="3.0.0.0" />
</dependentAssembly> </dependentAssembly>
<dependentAssembly>
<assemblyIdentity name="System.ValueTuple" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-4.0.3.0" newVersion="4.0.3.0" />
</dependentAssembly>
<dependentAssembly>
<assemblyIdentity name="System.Threading.Tasks.Extensions" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-4.2.0.1" newVersion="4.2.0.1" />
</dependentAssembly>
<dependentAssembly>
<assemblyIdentity name="DocumentFormat.OpenXml.Framework" publicKeyToken="8fb06cb64d019a17" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-3.2.0.0" newVersion="3.2.0.0" />
</dependentAssembly>
<dependentAssembly>
<assemblyIdentity name="DocumentFormat.OpenXml" publicKeyToken="8fb06cb64d019a17" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-3.2.0.0" newVersion="3.2.0.0" />
</dependentAssembly>
<dependentAssembly>
<assemblyIdentity name="System.Text.Encodings.Web" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-9.0.0.0" newVersion="9.0.0.0" />
</dependentAssembly>
<dependentAssembly>
<assemblyIdentity name="Microsoft.Bcl.AsyncInterfaces" publicKeyToken="cc7b13ffcd2ddd51" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-9.0.0.0" newVersion="9.0.0.0" />
</dependentAssembly>
</assemblyBinding> </assemblyBinding>
</runtime> </runtime>
<entityFramework> <entityFramework>
@@ -220,4 +203,47 @@
</providers> </providers>
<defaultConnectionFactory type="EntityFramework.Firebird.FbConnectionFactory, EntityFramework.Firebird" /> <defaultConnectionFactory type="EntityFramework.Firebird.FbConnectionFactory, EntityFramework.Firebird" />
</entityFramework> </entityFramework>
<userSettings>
<taskFLOW.My.MySettings>
<setting name="IntervallReminder" serializeAs="String">
<value>5</value>
</setting>
<setting name="frmMainSize" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmMainPosition" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmValidatorSize" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmValidatorPosition" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmMassValidatorSize" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmMassValidatorposition" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmValidatorSearchPosition" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmValSearchSplitterDistance" serializeAs="String">
<value>346</value>
</setting>
<setting name="frmMainWindowState" serializeAs="String">
<value>Normal</value>
</setting>
<setting name="frmTableColumns_Position" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmValidatorSearchSize" serializeAs="String">
<value>0, 0</value>
</setting>
<setting name="frmValidatorWindowState" serializeAs="String">
<value>Normal</value>
</setting>
</taskFLOW.My.MySettings>
</userSettings>
</configuration> </configuration>

View File

@@ -366,4 +366,55 @@ Public Class ClassAllgemeineFunktionen
MsgBox(ex.Message, MsgBoxStyle.Critical, "Error saving log file") MsgBox(ex.Message, MsgBoxStyle.Critical, "Error saving log file")
End Try End Try
End Sub End Sub
Public Shared Function NotNull(Of T)(value As Object, defaultValue As T) As T
If value Is Nothing OrElse Convert.IsDBNull(value) Then
Return defaultValue
End If
' Versuche den Wert in den gewünschten Typ zu konvertieren
Try
Return CType(value, T)
Catch ex As InvalidCastException
' Falls die Konvertierung fehlschlägt, gib den Default zurück
Return defaultValue
End Try
End Function
Public Shared Function NotNullNullable(Of T As Structure)(value As Object, defaultValue As Nullable(Of T)) As Nullable(Of T)
If value Is Nothing OrElse Convert.IsDBNull(value) Then
Return defaultValue
End If
Try
' Direkte Casts sind robust, wandeln aber DBNull nicht das ist bereits oben abgefangen.
Return DirectCast(value, Nullable(Of T))
Catch
Try
' Fallback: in T casten und zu Nullable machen
Return New Nullable(Of T)(DirectCast(value, T))
Catch
Return defaultValue
End Try
End Try
End Function
Public Shared Function NotNullString(value As Object, defaultValue As Object) As String
If value Is Nothing OrElse Convert.IsDBNull(value) Then Return defaultValue
Return CStr(value)
End Function
Public Shared Function NotNullDate(value As Object, defaultValue As DateTime) As DateTime?
If value Is Nothing OrElse Convert.IsDBNull(value) Then Return defaultValue
Return DirectCast(value, DateTime)
End Function
Public Shared Function NewShortGuid() As String
' Neue GUID erzeugen
Dim g As Guid = Guid.NewGuid()
' In Base64 umwandeln
Dim b64 As String = Convert.ToBase64String(g.ToByteArray())
' Unerwünschte Zeichen ersetzen/entfernen
b64 = b64.Replace("=", "").Replace("+", "-").Replace("/", "_")
' Ergebnis zurückgeben
Return b64
End Function
End Class End Class

View File

@@ -1,6 +1,5 @@
Imports System.ComponentModel Imports System.ComponentModel
Imports System.Text.RegularExpressions Imports System.Text.RegularExpressions
Imports DD_LIB_Standards
Imports DevExpress.Utils Imports DevExpress.Utils
Imports DevExpress.XtraEditors Imports DevExpress.XtraEditors
Imports DevExpress.XtraEditors.Controls Imports DevExpress.XtraEditors.Controls
@@ -11,13 +10,10 @@ Imports DevExpress.XtraGrid.Columns
Imports DevExpress.XtraGrid.Views.Base Imports DevExpress.XtraGrid.Views.Base
Imports DevExpress.XtraGrid.Views.Grid Imports DevExpress.XtraGrid.Views.Grid
Imports DigitalData.Controls.LookupGrid Imports DigitalData.Controls.LookupGrid
Imports DigitalData.Modules.Language.Utils
Imports DigitalData.GUIs.Common Imports DigitalData.GUIs.Common
Imports DigitalData.Modules.Logging Imports DigitalData.Modules.Logging
Imports DigitalData.Modules.Language
Imports DigitalData.Modules.EDMI.API.DatabaseWithFallback Imports DigitalData.Modules.EDMI.API.DatabaseWithFallback
Imports DigitalData.Modules.EDMI.API.Constants Imports DigitalData.Modules.EDMI.API.Constants
Imports DigitalData.Modules.Language.DataTableEx
Imports DigitalData.Modules.Base Imports DigitalData.Modules.Base
Public Class ClassControlCreator Public Class ClassControlCreator
@@ -93,7 +89,7 @@ Public Class ClassControlCreator
Public Attribute As String Public Attribute As String
Public [ReadOnly] As Boolean = False Public [ReadOnly] As Boolean = False
Public BackColor As Color = Color.White Public BackColor As Color = Color.White
Public Property IsDirty As Boolean = False
End Class End Class
Public Sub New(pLogConfig As LogConfig) Public Sub New(pLogConfig As LogConfig)
@@ -104,23 +100,27 @@ Public Class ClassControlCreator
Private Function TransformDataRow(row As DataRow) As ControlDBProps Private Function TransformDataRow(row As DataRow) As ControlDBProps
Dim x As Integer = row.Item("X_LOC") Dim x As Integer = row.Item("X_LOC")
Dim y As Integer = row.Item("Y_LOC") Dim y As Integer = row.Item("Y_LOC")
Dim style As FontStyle = NotNull(row.Item("FONT_STYLE"), DEFAULT_FONT_STYLE) Dim style As FontStyle = ClassAllgemeineFunktionen.NotNullString(row.Item("FONT_STYLE"), DEFAULT_FONT_STYLE)
Dim size As Single = NotNull(row.Item("FONT_SIZE"), DEFAULT_FONT_SIZE) Dim size As Single = ClassAllgemeineFunktionen.NotNullString(row.Item("FONT_SIZE"), DEFAULT_FONT_SIZE)
Dim familyString As String = NotNull(row.Item("FONT_FAMILY"), DEFAULT_FONT_FAMILY) Dim familyString As String = ClassAllgemeineFunktionen.NotNullString(row.Item("FONT_FAMILY"), DEFAULT_FONT_FAMILY)
Dim family As FontFamily = New FontFamily(familyString) Dim family As FontFamily = New FontFamily(familyString)
Dim oGuid As Integer = row.Item("GUID") Dim oGuid As Integer = row.Item("GUID")
Dim oName As String = NotNull(row.Item("NAME"), "") Dim oControlName As String = ClassAllgemeineFunktionen.NotNullString(row.Item("NAME"), "")
Dim oAttribute As String = NotNull(row.Item("INDEX_NAME"), "") Dim oAttribute As String = ClassAllgemeineFunktionen.NotNullString(row.Item("INDEX_NAME"), "")
Dim oLocation As New Point(x, y) Dim oLocation As New Point(x, y)
Dim oFont As New Font(family, size, style, GraphicsUnit.Point) Dim oFont As New Font(family, size, style, GraphicsUnit.Point)
Dim oColor As Color = IntToColor(NotNull(row.Item("FONT_COLOR"), DEFAULT_COLOR)) Dim oColor As Color = IntToColor(ClassAllgemeineFunktionen.NotNullString(row.Item("FONT_COLOR"), DEFAULT_COLOR))
Dim oReadOnly As Boolean = row.Item("READ_ONLY") Dim oReadOnly As Boolean = row.Item("READ_ONLY")
Dim oAddNewItems As Boolean = row.Item("VKT_ADD_ITEM") Dim oAddNewItems As Boolean = row.Item("VKT_ADD_ITEM")
If oAttribute = "@@DISPLAY_ONLY" And oReadOnly = False Then
Logger.Info($"Override oReadOnly = True for Control [{oControlName}] as Attribute is @@DISPLAY_ONLY and ReadOnly = False")
oReadOnly = True
End If
Return New ControlDBProps() With { Return New ControlDBProps() With {
.Guid = oGuid, .Guid = oGuid,
.Name = oName, .Name = oControlName,
.Attribute = oAttribute, .Attribute = oAttribute,
.Location = oLocation, .Location = oLocation,
.Font = oFont, .Font = oFont,
@@ -144,8 +144,6 @@ Public Class ClassControlCreator
ctrl.Location = props.Location ctrl.Location = props.Location
ctrl.Font = props.Font ctrl.Font = props.Font
ctrl.ForeColor = props.Color ctrl.ForeColor = props.Color
If designMode Then If designMode Then
ctrl.Cursor = Cursors.Hand ctrl.Cursor = Cursors.Hand
End If End If
@@ -166,7 +164,7 @@ Public Class ClassControlCreator
Public Function CreateNewTextBox(location As Point) As TextEdit Public Function CreateNewTextBox(location As Point) As TextEdit
Dim control As New TextEdit With { Dim control As New TextEdit With {
.Name = $"{PREFIX_TEXTBOX}_{clsTools.ShortGuid()}", .Name = $"{PREFIX_TEXTBOX}_{ClassAllgemeineFunktionen.NewShortGuid()}",
.Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT), .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT),
.Location = location, .Location = location,
.ReadOnly = True, .ReadOnly = True,
@@ -179,7 +177,7 @@ Public Class ClassControlCreator
Public Function CreateNewLabel(location As Point) As Label Public Function CreateNewLabel(location As Point) As Label
Dim control As New Label With { Dim control As New Label With {
.Name = $"{PREFIX_LABEL}_{clsTools.ShortGuid}", .Name = $"{PREFIX_LABEL}_{ClassAllgemeineFunktionen.NewShortGuid}",
.Text = DEFAULT_TEXT, .Text = DEFAULT_TEXT,
.AutoSize = True, .AutoSize = True,
.Location = location, .Location = location,
@@ -191,7 +189,7 @@ Public Class ClassControlCreator
Public Function CreateNewCheckbox(location As Point) As CheckBox Public Function CreateNewCheckbox(location As Point) As CheckBox
Dim control As New CheckBox With { Dim control As New CheckBox With {
.Name = $"{PREFIX_CHECKBOX}_{clsTools.ShortGuid}", .Name = $"{PREFIX_CHECKBOX}_{ClassAllgemeineFunktionen.NewShortGuid}",
.AutoSize = True, .AutoSize = True,
.Text = DEFAULT_TEXT, .Text = DEFAULT_TEXT,
.Cursor = Cursors.Hand, .Cursor = Cursors.Hand,
@@ -204,7 +202,7 @@ Public Class ClassControlCreator
Public Function CreateNewCombobox(location As Point) As Windows.Forms.ComboBox Public Function CreateNewCombobox(location As Point) As Windows.Forms.ComboBox
Dim control As New Windows.Forms.ComboBox With { Dim control As New Windows.Forms.ComboBox With {
.Name = $"{PREFIX_COMBOBOX}_{clsTools.ShortGuid}", .Name = $"{PREFIX_COMBOBOX}_{ClassAllgemeineFunktionen.NewShortGuid}",
.Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT), .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT),
.Cursor = Cursors.Hand, .Cursor = Cursors.Hand,
.Location = location .Location = location
@@ -215,7 +213,7 @@ Public Class ClassControlCreator
Public Function CreateNewDatetimepicker(location As Point) As DateTimePicker Public Function CreateNewDatetimepicker(location As Point) As DateTimePicker
Dim control As New DateTimePicker With { Dim control As New DateTimePicker With {
.Name = $"{PREFIX_DATETIMEPICKER}_{clsTools.ShortGuid}", .Name = $"{PREFIX_DATETIMEPICKER}_{ClassAllgemeineFunktionen.NewShortGuid}",
.Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT), .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT),
.Cursor = Cursors.Hand, .Cursor = Cursors.Hand,
.Location = location, .Location = location,
@@ -227,7 +225,7 @@ Public Class ClassControlCreator
Public Function CreateNewDatagridview(location As Point) As DataGridView Public Function CreateNewDatagridview(location As Point) As DataGridView
Dim control As New DataGridView With { Dim control As New DataGridView With {
.Name = $"{PREFIX_DATAGRIDVIEW}_{clsTools.ShortGuid}", .Name = $"{PREFIX_DATAGRIDVIEW}_{ClassAllgemeineFunktionen.NewShortGuid}",
.Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT_TABLE), .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT_TABLE),
.Cursor = Cursors.Hand, .Cursor = Cursors.Hand,
.Location = location, .Location = location,
@@ -247,7 +245,7 @@ Public Class ClassControlCreator
Friend Function CreateNewLookupControl(location As Point) As LookupControl3 Friend Function CreateNewLookupControl(location As Point) As LookupControl3
Dim control As New LookupControl3 With { Dim control As New LookupControl3 With {
.Name = $"{PREFIX_LOOKUP}_{clsTools.ShortGuid}", .Name = $"{PREFIX_LOOKUP}_{ClassAllgemeineFunktionen.NewShortGuid}",
.Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT), .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT),
.Cursor = Cursors.Hand, .Cursor = Cursors.Hand,
.Location = location .Location = location
@@ -257,7 +255,7 @@ Public Class ClassControlCreator
Public Function CreateNewTable(location As Point) As GridControl Public Function CreateNewTable(location As Point) As GridControl
Dim oControl As New GridControl With { Dim oControl As New GridControl With {
.Name = $"{PREFIX_TABLE}_{clsTools.ShortGuid}", .Name = $"{PREFIX_TABLE}_{ClassAllgemeineFunktionen.NewShortGuid}",
.Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT_TABLE), .Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT_TABLE),
.Cursor = Cursors.Hand, .Cursor = Cursors.Hand,
.Location = location, .Location = location,
@@ -277,7 +275,7 @@ Public Class ClassControlCreator
Public Function CreateNewLine(location As Point) As LineLabel Public Function CreateNewLine(location As Point) As LineLabel
Dim control As New LineLabel With { Dim control As New LineLabel With {
.Name = $"{PREFIX_LINE}_{clsTools.ShortGuid}", .Name = $"{PREFIX_LINE}_{ClassAllgemeineFunktionen.NewShortGuid}",
.Text = "---------------------------------", .Text = "---------------------------------",
.Size = New Size(100, 5), .Size = New Size(100, 5),
.Location = location .Location = location
@@ -287,7 +285,7 @@ Public Class ClassControlCreator
End Function End Function
Public Function CreateNewButton(location As Point) As Button Public Function CreateNewButton(location As Point) As Button
Dim control As New Button With { Dim control As New Button With {
.Name = $"{PREFIX_BUTTON}_{clsTools.ShortGuid}", .Name = $"{PREFIX_BUTTON}_{ClassAllgemeineFunktionen.NewShortGuid}",
.Size = New Size(108, 28), .Size = New Size(108, 28),
.Cursor = Cursors.Hand, .Cursor = Cursors.Hand,
.Location = location .Location = location
@@ -305,10 +303,10 @@ Public Class ClassControlCreator
Dim oReadOnly = oControlRow.ItemEx("READ_ONLY", False) Dim oReadOnly = oControlRow.ItemEx("READ_ONLY", False)
Dim oFormatString = oControlRow.ItemEx("FORMAT_STRING", String.Empty) Dim oFormatString = oControlRow.ItemEx("FORMAT_STRING", String.Empty)
Dim oBackColorIf = oControlRow.ItemEx("CTRL_BACKCOLOR_IF", String.Empty) Dim oBackColorIf = oControlRow.ItemEx("CTRL_BACKCOLOR_IF", String.Empty)
Dim oIndexname = oControlRow.ItemEx("INDEX_NAME", String.Empty)
Dim oAlignment = oControlRow.ItemEx("TEXT_ALIGNMENT", "Near")
Dim oControl As BaseEdit = Nothing Dim oControl As BaseEdit = Nothing
If oHeight >= 27 Then
If oHeight > 27 Then
oControl = CreateBaseControl(New MemoEdit(), oControlRow, designMode) oControl = CreateBaseControl(New MemoEdit(), oControlRow, designMode)
Else Else
oControl = CreateBaseControl(New TextEdit(), oControlRow, designMode) oControl = CreateBaseControl(New TextEdit(), oControlRow, designMode)
@@ -321,6 +319,13 @@ Public Class ClassControlCreator
oControl.Height = oHeight oControl.Height = oHeight
oControl.Width = oWidth oControl.Width = oWidth
If oAlignment = "Near" Then
oControl.Properties.Appearance.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Near
ElseIf oAlignment = "Center" Then
oControl.Properties.Appearance.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Center
ElseIf oAlignment = "Far" Then
oControl.Properties.Appearance.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Far
End If
If Not designMode Then If Not designMode Then
oControl.ReadOnly = oReadOnly oControl.ReadOnly = oReadOnly
@@ -332,12 +337,10 @@ Public Class ClassControlCreator
If oFormatString <> String.Empty Then If oFormatString <> String.Empty Then
oControl.Properties.DisplayFormat.FormatType = FormatType.Custom oControl.Properties.DisplayFormat.FormatType = FormatType.Custom
oControl.Properties.DisplayFormat.FormatString = ClassFormat.GetFormatString(oFormatString) oControl.Properties.DisplayFormat.FormatString = ClassFormat.GetFormatString(oFormatString)
End If 'ElseIf oReadOnly Then
' ' For read only controls, don't show the raw value when a user clicks into it
' For read only controls, don't show the raw value when a user clicks into it ' oControl.Properties.EditFormat.FormatType = FormatType.Custom
If oReadOnly Then ' oControl.Properties.EditFormat.FormatString = ClassFormat.GetFormatString(oFormatString)
oControl.Properties.EditFormat.FormatType = FormatType.Custom
oControl.Properties.EditFormat.FormatString = ClassFormat.GetFormatString(oFormatString)
End If End If
Else Else
oControl.ReadOnly = True oControl.ReadOnly = True
@@ -351,17 +354,24 @@ Public Class ClassControlCreator
End Function End Function
Public Function CreateExistingLabel(row As DataRow, designMode As Boolean) As Label Public Function CreateExistingLabel(row As DataRow, designMode As Boolean) As Label
Dim control As Label = CreateBaseControl(New Label(), row, designMode) Dim oControl As Label = CreateBaseControl(New Label(), row, designMode)
Try Try
control.Text = row.Item("CTRL_CAPTION_LANG") oControl.Text = row.Item("CTRL_CAPTION_LANG")
Catch ex As Exception Catch ex As Exception
Logger.Warn("Label [{0}] does not have a translation!", control.Name) Logger.Warn("⚠️ Label [{0}] does not have a translation!", oControl.Name)
control.Text = row.Item("CTRL_TEXT") oControl.Text = row.Item("CTRL_TEXT")
End Try End Try
Dim oAlignment = row.ItemEx("TEXT_ALIGNMENT", "Near")
If oAlignment = "Near" Then
oControl.TextAlign = ContentAlignment.MiddleLeft
ElseIf oAlignment = "Center" Then
oControl.TextAlign = ContentAlignment.MiddleCenter
ElseIf oAlignment = "Far" Then
oControl.TextAlign = ContentAlignment.MiddleRight
End If
oControl.AutoSize = True
control.AutoSize = True Return oControl
Return control
End Function End Function
Public Function CreateExistingButton(row As DataRow, designMode As Boolean) As Button Public Function CreateExistingButton(row As DataRow, designMode As Boolean) As Button
@@ -393,21 +403,53 @@ Public Class ClassControlCreator
Return oControl Return oControl
End Function End Function
Public Function CreateExistingCombobox(row As DataRow, designMode As Boolean) As Windows.Forms.ComboBox Public Function CreateExistingCombobox(pRow As DataRow, designMode As Boolean) As Windows.Forms.ComboBox
Dim control As Windows.Forms.ComboBox = CreateBaseControl(New Windows.Forms.ComboBox(), row, designMode) Dim oControl As Windows.Forms.ComboBox = CreateBaseControl(New Windows.Forms.ComboBox(), pRow, designMode)
oControl.Size = New Size(pRow.Item("WIDTH"), pRow.Item("HEIGHT"))
control.Size = New Size(row.Item("WIDTH"), row.Item("HEIGHT"))
If Not designMode Then If Not designMode Then
control.Enabled = Not row.Item("READ_ONLY") oControl.Enabled = Not pRow.Item("READ_ONLY")
control.TabStop = Not row.Item("READ_ONLY") oControl.TabStop = Not pRow.Item("READ_ONLY")
control.BackColor = IIf(row.Item("READ_ONLY"), Color.LightGray, Color.White) oControl.BackColor = IIf(pRow.Item("READ_ONLY"), Color.LightGray, Color.White)
control.AutoCompleteMode = AutoCompleteMode.SuggestAppend oControl.AutoCompleteMode = AutoCompleteMode.SuggestAppend
control.AutoCompleteSource = AutoCompleteSource.ListItems oControl.AutoCompleteSource = AutoCompleteSource.ListItems
End If End If
Return control '' Apply text alignment by owner-drawing based on oAlignment
'Dim oAlignment = pRow.ItemEx("TEXT_ALIGNMENT", "Near")
'' Ensure owner-draw so we can control text alignment
'oControl.DrawMode = Global.System.Windows.Forms.DrawMode.OwnerDrawFixed
'' Attach handler with inline drawing logic respecting alignment
'AddHandler oControl.DrawItem,
'Sub(sender As Object, e As DrawItemEventArgs)
' Dim cmb = TryCast(sender, Windows.Forms.ComboBox)
' If cmb Is Nothing Then Return
' e.DrawBackground()
' If e.Index >= 0 AndAlso e.Index < cmb.Items.Count Then
' Dim text As String = cmb.GetItemText(cmb.Items(e.Index))
' Dim sf As New StringFormat(StringFormatFlags.NoWrap)
' Select Case oAlignment
' Case "Near"
' sf.Alignment = StringAlignment.Near
' Case "Center"
' sf.Alignment = StringAlignment.Center
' Case "Far"
' sf.Alignment = StringAlignment.Far
' Case Else
' sf.Alignment = StringAlignment.Near
' End Select
' sf.LineAlignment = StringAlignment.Center
' Using foreBrush As New SolidBrush(If((e.State And DrawItemState.Selected) = DrawItemState.Selected, SystemColors.HighlightText, cmb.ForeColor))
' e.Graphics.DrawString(text, e.Font, foreBrush, e.Bounds, sf)
' End Using
' End If
' e.DrawFocusRectangle()
'End Sub
Return oControl
End Function End Function
Public Function CreateExistingDatepicker(row As DataRow, designMode As Boolean) As DateTimePicker Public Function CreateExistingDatepicker(row As DataRow, designMode As Boolean) As DateTimePicker
@@ -467,26 +509,35 @@ Public Class ClassControlCreator
Return control Return control
End Function End Function
Public Function CreateExistingLookupControl(row As DataRow, designMode As Boolean) As LookupControl3 Public Function CreateExistingLookupControl(pRow As DataRow, pDesignMode As Boolean) As LookupControl3
Dim control As LookupControl3 = CreateBaseControl(New LookupControl3(), row, designMode) Dim oControl As LookupControl3 = CreateBaseControl(New LookupControl3(), pRow, pDesignMode)
control.Properties.Name = control.Name oControl.Properties.Name = oControl.Name
control.Width = row.Item("WIDTH") oControl.Width = pRow.Item("WIDTH")
control.ReadOnly = row.Item("READ_ONLY") oControl.ReadOnly = pRow.Item("READ_ONLY")
control.Properties.AllowAddNewValues = row.Item("VKT_ADD_ITEM") oControl.Properties.AllowAddNewValues = pRow.Item("VKT_ADD_ITEM")
Dim oAlignment = pRow.ItemEx("TEXT_ALIGNMENT", "Near")
If designMode Then If oAlignment = "Near" Then
control.Cursor = Cursors.Hand oControl.Properties.Appearance.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Near
ElseIf oAlignment = "Center" Then
oControl.Properties.Appearance.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Center
ElseIf oAlignment = "Far" Then
oControl.Properties.Appearance.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Far
End If End If
Return control If pDesignMode Then
oControl.Cursor = Cursors.Hand
End If
Return oControl
End Function End Function
Public Function CreateExistingGridControl(row As DataRow, DT_MY_COLUMNS As DataTable, designMode As Boolean) As GridControl Public Function CreateExistingGridControl(row As DataRow, DT_MY_COLUMNS As DataTable, designMode As Boolean, pcurrencySymbol As String) As GridControl
Dim oGridControlCreator = New ControlCreator.GridControl(LogConfig, GridTables) Dim oGridControlCreator = New ControlCreator.GridControl(LogConfig, GridTables)
Dim oControl As GridControl = CreateBaseControl(New GridControl(), row, designMode) Dim oControl As GridControl = CreateBaseControl(New GridControl(), row, designMode)
Dim oControlId = DirectCast(oControl.Tag, ControlMetadata).Guid Dim oControlId = DirectCast(oControl.Tag, ControlMetadata).Guid
Dim oView As GridView Dim oView As GridView
Dim oControlName = oControl.Name
oControl.ForceInitialize() oControl.ForceInitialize()
@@ -527,7 +578,6 @@ Public Class ClassControlCreator
End If End If
oControl.Size = New Size(row.Item("WIDTH"), row.Item("HEIGHT")) oControl.Size = New Size(row.Item("WIDTH"), row.Item("HEIGHT"))
' Add and configure navigator to delete rows ' Add and configure navigator to delete rows
oControl.UseEmbeddedNavigator = True oControl.UseEmbeddedNavigator = True
With oControl.EmbeddedNavigator.Buttons With oControl.EmbeddedNavigator.Buttons
@@ -557,8 +607,8 @@ Public Class ClassControlCreator
Dim oDataTable = oGridControlCreator.CreateGridColumns(DT_MY_COLUMNS) Dim oDataTable = oGridControlCreator.CreateGridColumns(DT_MY_COLUMNS)
GridTables = oGridControlCreator.FillGridTables(DT_MY_COLUMNS, oControlId, oControl.Name) GridTables = oGridControlCreator.FillGridTables(DT_MY_COLUMNS, oControlId, oControl.Name)
oView.PopulateColumns(oDatatable) oView.PopulateColumns(oDataTable)
oControl.DataSource = oDatatable oControl.DataSource = oDataTable
oControl.RefreshDataSource() oControl.RefreshDataSource()
oControl.ForceInitialize() oControl.ForceInitialize()
@@ -585,9 +635,8 @@ Public Class ClassControlCreator
End Try End Try
End If End If
oGridControlCreator.ConfigureViewColumns(DT_MY_COLUMNS, oView, oControl) oGridControlCreator.ConfigureViewColumns(DT_MY_COLUMNS, oView, oControl, pcurrencySymbol)
oGridControlCreator.ConfigureViewEvents(DT_MY_COLUMNS, oView, oControl, oControlId) oGridControlCreator.ConfigureViewEvents(DT_MY_COLUMNS, oView, oControl, oControlId)
' 08.11.2021: Fix editor being empty on first open ' 08.11.2021: Fix editor being empty on first open
oView.FocusInvalidRow() oView.FocusInvalidRow()
@@ -603,7 +652,7 @@ Public Class ClassControlCreator
control.Text = "------------------------------" control.Text = "------------------------------"
control.BorderStyle = BorderStyle.None control.BorderStyle = BorderStyle.None
control.AutoSize = False control.AutoSize = False
control.BackColor = IntToColor(NotNull(row.Item("FONT_COLOR"), DEFAULT_COLOR)) control.BackColor = IntToColor(ClassAllgemeineFunktionen.NotNullString(row.Item("FONT_COLOR"), DEFAULT_COLOR))
control.Size = New Size(row.Item("WIDTH"), row.Item("HEIGHT")) control.Size = New Size(row.Item("WIDTH"), row.Item("HEIGHT"))
Return control Return control
@@ -822,7 +871,7 @@ Public Class ClassControlCreator
If oMeta.Guid = oControlId AndAlso TypeOf oControl Is GridControl Then If oMeta.Guid = oControlId AndAlso TypeOf oControl Is GridControl Then
Dim oGrid As GridControl = DirectCast(oControl, GridControl) Dim oGrid As GridControl = DirectCast(oControl, GridControl)
DirectCast(oGrid.FocusedView, GridView).FocusInvalidRow() DirectCast(oGrid.FocusedView, GridView).FocusInvalidRow()
Logger.Info("Force-setting Editor for Grid [{0}]", oGrid.Name) Logger.Debug("Force-setting Editor for Grid [{0}]", oGrid.Name)
Exit For Exit For
End If End If
Catch ex As Exception Catch ex As Exception
@@ -839,9 +888,4 @@ Public Class ClassControlCreator
Next Next
End If End If
End Sub End Sub
End Class End Class

View File

@@ -114,12 +114,12 @@ Public Class ClassFinalIndex
props.VectorIndex = isVector props.VectorIndex = isVector
If type = INDEX_TYPE_STRING Or type = INDEX_TYPE_VECTOR_STRING Then If type = INDEX_TYPE_STRING Or type = INDEX_TYPE_VECTOR_STRING Then
value = NotNull(value, "") value = ClassAllgemeineFunktionen.NotNullString(value, "")
props.StringValue = value props.StringValue = value
ElseIf type = INDEX_TYPE_INTEGER Or type = INDEX_TYPE_INTEGER64 Or type = INDEX_TYPE_VECTOR_INTEGER_64 Then ElseIf type = INDEX_TYPE_INTEGER Or type = INDEX_TYPE_INTEGER64 Or type = INDEX_TYPE_VECTOR_INTEGER_64 Then
Try Try
value = NotNull(Of Integer)(value, 0) value = ClassAllgemeineFunktionen.NotNullString(value, 0)
If value = String.Empty Then If value = String.Empty Then
props.IntegerValue = 0 props.IntegerValue = 0
Else Else
@@ -138,7 +138,7 @@ Public Class ClassFinalIndex
If value = "SQL-Command" Then If value = "SQL-Command" Then
props.FloatValue = 0 props.FloatValue = 0
Else Else
value = NotNull(Of Double)(value, 0) value = ClassAllgemeineFunktionen.NotNullString(value, 0)
If value = String.Empty Then If value = String.Empty Then
props.FloatValue = 0 props.FloatValue = 0
@@ -148,7 +148,7 @@ Public Class ClassFinalIndex
End If End If
ElseIf type = INDEX_TYPE_BOOLEAN Or type = INDEX_TYPE_VECTOR_BOOLEAN Then ElseIf type = INDEX_TYPE_BOOLEAN Or type = INDEX_TYPE_VECTOR_BOOLEAN Then
value = NotNull(value, "False") value = ClassAllgemeineFunktionen.NotNullString(value, "False")
If value = "1" Or value.ToLower = "true" Then If value = "1" Or value.ToLower = "true" Then
props.BoolValue = True props.BoolValue = True

View File

@@ -156,7 +156,7 @@ Public Class ClassFinalizeDoc
End If End If
Return indexierung_erfolgreich Return indexierung_erfolgreich
Catch ex As Exception Catch ex As Exception
LOGGER.Warn("Unvorhergesehener Fehler bei Indexiere_File: " & ex.Message.ToString) LOGGER.Warn("⚠️ Unvorhergesehener Fehler bei Indexiere_File: " & ex.Message.ToString)
Return False Return False
End Try End Try

View File

@@ -138,6 +138,7 @@
If IDB_USES_WMFILESTORE Then If IDB_USES_WMFILESTORE Then
oID_IS_FOREIGN = 1 oID_IS_FOREIGN = 1
End If End If
Dim oDELSQL = $"EXEC PRIDB_DELETE_TERM_OBJECT_METADATA {CURRENT_DOC_ID},'{oAttributeName}','{oTerm2Delete}','{USER_USERNAME}','{USER_LANGUAGE}',{oID_IS_FOREIGN}" Dim oDELSQL = $"EXEC PRIDB_DELETE_TERM_OBJECT_METADATA {CURRENT_DOC_ID},'{oAttributeName}','{oTerm2Delete}','{USER_USERNAME}','{USER_LANGUAGE}',{oID_IS_FOREIGN}"
DatabaseFallback.ExecuteNonQueryIDB(oDELSQL) DatabaseFallback.ExecuteNonQueryIDB(oDELSQL)
@@ -231,8 +232,9 @@
For Each oNewValueRow As DataRow In oDTMyNewValues.Rows For Each oNewValueRow As DataRow In oDTMyNewValues.Rows
Dim oSuccess As Boolean = False Dim oSuccess As Boolean = False
Dim oVALUE = oNewValueRow.Item(1).ToString
Dim oPRSQL = $"DECLARE @NEW_OBJ_MD_ID BIGINT " & vbNewLine & $"EXEC PRIDB_NEW_OBJ_DATA {CURRENT_DOC_ID},'{oAttributeName}','{USER_USERNAME}','{oNewValueRow.Item(1).ToString}','{USER_LANGUAGE}',0,@OMD_ID = @NEW_OBJ_MD_ID OUTPUT" oVALUE = oVALUE.Replace("'", "''")
Dim oPRSQL = $"DECLARE @NEW_OBJ_MD_ID BIGINT " & vbNewLine & $"EXEC PRIDB_NEW_OBJ_DATA {CURRENT_DOC_ID},'{oAttributeName}','{USER_USERNAME}','{oVALUE}','{USER_LANGUAGE}',0,@OMD_ID = @NEW_OBJ_MD_ID OUTPUT"
LOGGER.Debug(oPRSQL) LOGGER.Debug(oPRSQL)
oSuccess = DatabaseFallback.ExecuteNonQueryIDB(oPRSQL) oSuccess = DatabaseFallback.ExecuteNonQueryIDB(oPRSQL)
If oSuccess = False Then If oSuccess = False Then
@@ -241,6 +243,7 @@
Next Next
Return True Return True
Else Else
'oNewValue = oNewValue.Replace("'", "' + NCHAR(39) + '")
Dim oFNSQL = $"DECLARE @NEW_OBJ_MD_ID BIGINT " & vbNewLine & $"EXEC PRIDB_NEW_OBJ_DATA {CURRENT_DOC_ID},'{oAttributeName}','{USER_USERNAME}','{oNewValue}','{USER_LANGUAGE}',0,@OMD_ID = @NEW_OBJ_MD_ID OUTPUT" Dim oFNSQL = $"DECLARE @NEW_OBJ_MD_ID BIGINT " & vbNewLine & $"EXEC PRIDB_NEW_OBJ_DATA {CURRENT_DOC_ID},'{oAttributeName}','{USER_USERNAME}','{oNewValue}','{USER_LANGUAGE}',0,@OMD_ID = @NEW_OBJ_MD_ID OUTPUT"
LOGGER.Debug(oFNSQL) LOGGER.Debug(oFNSQL)
Return DatabaseFallback.ExecuteNonQueryIDB(oFNSQL) Return DatabaseFallback.ExecuteNonQueryIDB(oFNSQL)

View File

@@ -1,6 +1,6 @@
Imports System.ComponentModel Imports System.ComponentModel
Imports System.Drawing.Design Imports System.Drawing.Design
Imports DD_ProcessManager.InputProperties Imports taskFLOW.InputProperties
Public Class ClassImageSelector Public Class ClassImageSelector
Inherits UITypeEditor Inherits UITypeEditor

View File

@@ -1,11 +1,12 @@
Imports DLLLicenseManager Imports System.Windows.Forms.VisualStyles.VisualStyleElement
Imports DigitalData.Modules.Logging
Imports DigitalData.Modules.Config Imports DigitalData.Modules.Config
Imports DigitalData.Modules.EDMI.API
Imports DigitalData.Modules.EDMI.API.DatabaseWithFallback
Imports DigitalData.Modules.EDMI.API.Constants
Imports DigitalData.Modules.Database Imports DigitalData.Modules.Database
Imports System.Windows.Forms.VisualStyles.VisualStyleElement Imports DigitalData.Modules.EDMI.API
Imports DigitalData.Modules.EDMI.API.Constants
Imports DigitalData.Modules.EDMI.API.DatabaseWithFallback
Imports DigitalData.Modules.Logging
Imports DLLLicenseManager
Imports DocumentFormat.OpenXml.Spreadsheet
Public Class ClassInit Public Class ClassInit
Public _lizenzManager As ClassLicenseManager Public _lizenzManager As ClassLicenseManager
@@ -20,21 +21,16 @@ Public Class ClassInit
My.Application.Info.CompanyName, My.Application.Info.CompanyName,
My.Application.Info.ProductName) My.Application.Info.ProductName)
LOGGER = LOGCONFIG.GetLogger("taskFLOW") LOGGER = LOGCONFIG.GetLogger("taskFLOW")
LOGGER.Info("## taskFLOW started - {0}", Now) LOGGER.Info("## taskFLOW started - {0}", Now)
Try Try
Dim directory As New IO.DirectoryInfo(Application.LocalUserAppDataPath & "\Log") Dim directory As New IO.DirectoryInfo(Application.LocalUserAppDataPath & "\Log")
For Each file As IO.FileInfo In directory.GetFiles For Each file As IO.FileInfo In directory.GetFiles
If (Now - file.CreationTime).Days > 29 Then If (Now - file.CreationTime).Days > 29 Then
file.Delete() file.Delete()
Else Else
Exit For Exit For
End If End If
Next Next
Catch ex As Exception Catch ex As Exception
@@ -58,7 +54,16 @@ Public Class ClassInit
End If End If
CONFIG = New ConfigManager(Of ClassConfig)(LOGCONFIG, oUserAppDataPath, oCommonAppDataPath, oStartupPath) CONFIG = New ConfigManager(Of ClassConfig)(LOGCONFIG, oUserAppDataPath, oCommonAppDataPath, oStartupPath)
LOGGER.Info("Config loaded") LOGGER.Info("ConfigManager loaded")
LOGGER.Info($"oUserAppDataPath will be: {oUserAppDataPath}")
If oStartupPath <> oCommonAppDataPath Then
LOGGER.Info($"oCommonAppDataPath will be: {oCommonAppDataPath}")
LOGGER.Info($"oStartupPath will be: {oStartupPath}")
Else
LOGGER.Info($"oStartupPath is the same as oCommonAppDataPath: {oCommonAppDataPath}")
End If
Try Try
If CONFIG.Config.ConnectionStringTest <> String.Empty And CONFIG.Config.TestMode = True Then If CONFIG.Config.ConnectionStringTest <> String.Empty And CONFIG.Config.TestMode = True Then
LOGGER.Debug("Test Connection String loaded") LOGGER.Debug("Test Connection String loaded")
@@ -85,11 +90,11 @@ Public Class ClassInit
LOGGER.Info($"EDMIAppServer [{CONFIG.Config.EDMIAppServer}] is active!") LOGGER.Info($"EDMIAppServer [{CONFIG.Config.EDMIAppServer}] is active!")
Else Else
LOGGER.Warn($"#### !!! Could not Connect to APPServer [{CONFIG.Config.EDMIAppServer}]!!! ###") LOGGER.Warn($"#### ⚠️ !!! Could not Connect to APPServer [{CONFIG.Config.EDMIAppServer}]!!! ###")
End If End If
End If End If
Catch ex As Exception Catch ex As Exception
LOGGER.Warn($"Could not initialize the AppServer: {ex.Message}") LOGGER.Warn($"⚠️ Could not initialize the AppServer: {ex.Message}")
End Try End Try
Else Else
@@ -244,12 +249,12 @@ Public Class ClassInit
Try Try
oLICDATE = CDate(split(1)) oLICDATE = CDate(split(1))
Catch ex As Exception Catch ex As Exception
LOGGER.Warn($"Error Converting Value {split(1)} to DATE") LOGGER.Warn($"⚠️ Error Converting Value {split(1)} to DATE")
Try Try
Dim expenddt As Date = Date.ParseExact(split(1), "dd.MM.yyyy", System.Globalization.DateTimeFormatInfo.InvariantInfo) Dim expenddt As Date = Date.ParseExact(split(1), "dd.MM.yyyy", System.Globalization.DateTimeFormatInfo.InvariantInfo)
oLICDATE = expenddt oLICDATE = expenddt
Catch ex1 As Exception Catch ex1 As Exception
LOGGER.Warn($"Second Error Converting DATE with ParseExact - Setting Date = Today") LOGGER.Warn($"⚠️Second Error Converting DATE with ParseExact - Setting Date = Today")
oLICDATE = Now.Date oLICDATE = Now.Date
End Try End Try
@@ -329,9 +334,8 @@ Public Class ClassInit
LOGGER.Debug("Username: " & USER_USERNAME) LOGGER.Debug("Username: " & USER_USERNAME)
Dim oFnct As New RefreshHelper.SW("FNDD_LOGIN_USER_MODULE") Dim oFnct As New RefreshHelper.SW("FNDD_LOGIN_USER_MODULE")
oSQL = String.Format("SELECT * FROM [dbo].[FNDD_LOGIN_USER_MODULE] ('{0}','PM',{1})", USER_USERNAME, CLIENT_SELECTED) oSQL = String.Format("SELECT * FROM [dbo].[FNDD_LOGIN_USER_MODULE] ('{0}','PM',{1})", USER_USERNAME, CLIENT_SELECTED)
Dim DT_CHECKUSER_MODULE As DataTable Dim DT_CHECKUSER_MODULE As DataTable
DT_CHECKUSER_MODULE = DatabaseFallback.GetDatatable("TBDD_USER_MODULE", New GetDatatableOptions(oSQL, DatabaseType.ECM) With { DT_CHECKUSER_MODULE = DatabaseFallback.GetDatatable("TBDD_USER_MODULE", New GetDatatableOptions(oSQL, DatabaseType.ECM) With {
.FilterExpression = $"USERNAME = '{USER_USERNAME.ToLower}' AND MODULE_SHORT = 'PM'" .FilterExpression = $"USERNAME = '{USER_USERNAME.ToLower}' AND MODULE_SHORT = 'PM'"
}) })
@@ -357,6 +361,7 @@ Public Class ClassInit
USER_EMAIL = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_EMAIL")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_EMAIL")) USER_EMAIL = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_EMAIL")), "", DT_CHECKUSER_MODULE.Rows(0).Item("USER_EMAIL"))
USER_LANGUAGE = DT_CHECKUSER_MODULE.Rows(0).Item("USER_LANGUAGE") USER_LANGUAGE = DT_CHECKUSER_MODULE.Rows(0).Item("USER_LANGUAGE")
USER_MODULE_ID = DT_CHECKUSER_MODULE.Rows(0).Item("MODULE_ID")
USER_IN_MODULE = DT_CHECKUSER_MODULE.Rows(0).Item("MODULE_ACCESS") USER_IN_MODULE = DT_CHECKUSER_MODULE.Rows(0).Item("MODULE_ACCESS")
@@ -380,18 +385,19 @@ Public Class ClassInit
LOGGER.Debug("User Info:") LOGGER.Debug("User Info:")
LOGGER.Debug("Language: [{0}]", USER_LANGUAGE) LOGGER.Debug("Language: [{0}]", USER_LANGUAGE)
LOGGER.Debug("Username: [{0}]", USER_USERNAME) LOGGER.Debug("Username: [{0}]", USER_USERNAME)
LOGGER.Debug("Environment.MachineName: [{0}]", Environment.MachineName)
Try Try
USER_RIGHT_FILE_DELETE = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT_FILE_DEL")), False, DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT_FILE_DEL")) USER_RIGHT_FILE_DELETE = IIf(IsDBNull(DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT_FILE_DEL")), False, DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT_FILE_DEL"))
Catch ex As Exception Catch ex As Exception
LOGGER.Warn("Error in USER_RIGHT_FILE_DELETE: " & ex.Message) LOGGER.Warn("⚠️ Error in USER_RIGHT_FILE_DELETE: " & ex.Message)
USER_RIGHT_FILE_DELETE = False USER_RIGHT_FILE_DELETE = False
End Try End Try
USER_DATE_FORMAT = DT_CHECKUSER_MODULE.Rows(0).Item("USER_DATE_FORMAT") USER_DATE_FORMAT = DT_CHECKUSER_MODULE.Rows(0).Item("USER_DATE_FORMAT")
ClassParamRefresh.Refresh_Params(DT_CHECKUSER_MODULE) ClassParamRefresh.Refresh_Params(DT_CHECKUSER_MODULE, "Load")
FINALINDICES = New ClassFinalIndex() FINALINDICES = New ClassFinalIndex()
@@ -462,7 +468,7 @@ Public Class ClassInit
' DataASorDB = New ClassDataASorDB ' DataASorDB = New ClassDataASorDB
'End If 'End If
Dim oStopWatch As New RefreshHelper.SW("InitBasics") Dim oStopWatch As New RefreshHelper.SW("InitBasics")
Dim oSql = String.Format("select * from TBPM_KONFIGURATION WHERE GUID = 1") Dim oSql = String.Format("select * from TBPM_KONFIGURATION WITH (NOLOCK) WHERE GUID = 1")
oStep = "TBPM_KONFIGURATION" oStep = "TBPM_KONFIGURATION"
BASEDATA_DT_CONFIG = DatabaseFallback.GetDatatable("TBPM_KONFIGURATION", New GetDatatableOptions(oSql, DatabaseType.ECM) With { BASEDATA_DT_CONFIG = DatabaseFallback.GetDatatable("TBPM_KONFIGURATION", New GetDatatableOptions(oSql, DatabaseType.ECM) With {
@@ -492,24 +498,23 @@ Public Class ClassInit
LOGGER.Warn($"Keine GDPICTURE-Lizenz gefunden. Version Konfiguration: {My.Settings.GDPICTURE_VERSION} - Prüfe TBDD_3RD_PARTY_MODULES") LOGGER.Warn($"Keine GDPICTURE-Lizenz gefunden. Version Konfiguration: {My.Settings.GDPICTURE_VERSION} - Prüfe TBDD_3RD_PARTY_MODULES")
End If End If
oStep = "TBDD_SQL_COMMANDS" oStep = "TBDD_SQL_COMMANDS"
oSql = "Select * FROM TBDD_SQL_COMMANDS" oSql = "Select * FROM TBDD_SQL_COMMANDS WITH (NOLOCK)"
BASEDATA_DT_TBDD_SQL_COMMANDS = DatabaseFallback.GetDatatable("TBDD_SQL_COMMANDS", New GetDatatableOptions(oSql, DatabaseType.ECM)) BASEDATA_DT_TBDD_SQL_COMMANDS = DatabaseFallback.GetDatatable("TBDD_SQL_COMMANDS", New GetDatatableOptions(oSql, DatabaseType.ECM))
oStep = "TBDD_GUI_LANGUAGE_PHRASE" oStep = "TBDD_GUI_LANGUAGE_PHRASE"
oSql = $"SELECT * FROM TBDD_GUI_LANGUAGE_PHRASE WHERE MODULE IN ('PM','All Modules')" oSql = $"SELECT * FROM TBDD_GUI_LANGUAGE_PHRASE WITH (NOLOCK) WHERE MODULE IN ('PM','All Modules')"
'BASEDATA_DT_GUI_LANGUAGE_PHRASES = DataASorDB.GetDatatable("DD_ECM", oSql, "TBDD_GUI_LANGUAGE_PHRASE", "") 'BASEDATA_DT_GUI_LANGUAGE_PHRASES = DataASorDB.GetDatatable("DD_ECM", oSql, "TBDD_GUI_LANGUAGE_PHRASE", "")
BASEDATA_DT_GUI_LANGUAGE_PHRASES = DatabaseFallback.GetDatatable("TBDD_GUI_LANGUAGE_PHRASE", New GetDatatableOptions(oSql, DatabaseType.ECM)) BASEDATA_DT_GUI_LANGUAGE_PHRASES = DatabaseFallback.GetDatatable("TBDD_GUI_LANGUAGE_PHRASE", New GetDatatableOptions(oSql, DatabaseType.ECM))
oStep = "TBPM_PROFILE_SEARCH" oStep = "TBPM_PROFILE_SEARCH"
oSql = "select * from TBPM_PROFILE_SEARCH where TYPE = 'DOC' AND ACTIVE = 1 ORDER BY PROFILE_ID,TAB_INDEX" oSql = "select * from TBPM_PROFILE_SEARCH WITH (NOLOCK) where TYPE = 'DOC' AND ACTIVE = 1 ORDER BY PROFILE_ID,TAB_INDEX"
BASEDATA_DT_PROFILES_SEARCHES_DOC = DatabaseFallback.GetDatatable("TBPM_PROFILE_SEARCH", New GetDatatableOptions(oSql, DatabaseType.ECM) With { BASEDATA_DT_PROFILES_SEARCHES_DOC = DatabaseFallback.GetDatatable("TBPM_PROFILE_SEARCH", New GetDatatableOptions(oSql, DatabaseType.ECM) With {
.FilterExpression = "TYPE = 'DOC'",
.SortByColumn = "PROFILE_ID,TAB_INDEX" .SortByColumn = "PROFILE_ID,TAB_INDEX"
}) })
DT_FILTERED_PROFILE_SEARCHES_DOC = BASEDATA_DT_PROFILES_SEARCHES_DOC.Clone() DT_FILTERED_PROFILE_SEARCHES_DOC = BASEDATA_DT_PROFILES_SEARCHES_DOC.Clone()
oStep = "TBPM_MAIN_VIEW_GROUPS" oStep = "TBPM_MAIN_VIEW_GROUPS"
oSql = "SELECT * FROM TBPM_MAIN_VIEW_GROUPS WHERE ACTIVE = 1" oSql = "SELECT * FROM TBPM_MAIN_VIEW_GROUPS WITH (NOLOCK) WHERE ACTIVE = 1"
BASEDATA_DTGRID_GROUPS = DatabaseFallback.GetDatatable("TBPM_MAIN_VIEW_GROUPS", New GetDatatableOptions(oSql, DatabaseType.ECM)) BASEDATA_DTGRID_GROUPS = DatabaseFallback.GetDatatable("TBPM_MAIN_VIEW_GROUPS", New GetDatatableOptions(oSql, DatabaseType.ECM))
@@ -519,10 +524,17 @@ Public Class ClassInit
BASEDATA_DT_CHARTS = DatabaseFallback.GetDatatable("TBPM_CHART", New GetDatatableOptions(oSql, DatabaseType.ECM)) BASEDATA_DT_CHARTS = DatabaseFallback.GetDatatable("TBPM_CHART", New GetDatatableOptions(oSql, DatabaseType.ECM))
oStep = "TBDD_GUI_LANGUAGE" oStep = "TBDD_GUI_LANGUAGE"
oSql = "SELECT LANG_CODE FROM TBDD_GUI_LANGUAGE WHERE ACTIVE = 1 ORDER BY LANG_CODE" oSql = "SELECT LANG_CODE FROM TBDD_GUI_LANGUAGE WITH (NOLOCK) WHERE ACTIVE = 1 ORDER BY LANG_CODE"
BASEDATA_DT_LANGUAGE = DatabaseFallback.GetDatatable("TBDD_GUI_LANGUAGE", New GetDatatableOptions(oSql, DatabaseType.ECM)) BASEDATA_DT_LANGUAGE = DatabaseFallback.GetDatatable("TBDD_GUI_LANGUAGE", New GetDatatableOptions(oSql, DatabaseType.ECM))
oSql = "SELECT * FROM TBDD_COLUMNS_FORMAT WITH (NOLOCK) WHERE MODULE = 'taskFLOW' AND GRIDVIEW = 'GridViewWorkflows'"
BASEDATA_TBDD_COLUMNS_FORMAT = DatabaseFallback.GetDatatable("TBDD_COLUMNS_FORMAT", New GetDatatableOptions(oSql, DatabaseType.ECM))
oStopWatch.Done() oStopWatch.Done()
Catch ex As Exception Catch ex As Exception
LOGGER.Error(ex) LOGGER.Error(ex)
LOGGER.Info($"Unexpected Error in InitBasics - last Step [{oStep}]: {ex.Message}", True) LOGGER.Info($"Unexpected Error in InitBasics - last Step [{oStep}]: {ex.Message}", True)
@@ -543,6 +555,48 @@ Public Class ClassInit
LOGGER.Warn($"no profiles for user: '{USER_USERNAME}' configured - Check SQL [{oSql}]!", False) LOGGER.Warn($"no profiles for user: '{USER_USERNAME}' configured - Check SQL [{oSql}]!", False)
End If End If
oSql = "SELECT KEY_NAME, VALUE_TEXT1
FROM TBDD_USER_KEY_VALUE_PAIR WITH (NOLOCK)
WHERE FK_USER_ID = " & USER_ID & " And [FK_MODULE_ID] = '" & USER_MODULE_ID & "'"
Dim oDT_USER_KEY_VALUE_PAIR As DataTable = DatabaseFallback.GetDatatable(New GetDatatableOptions(oSql, DatabaseType.ECM))
If UserInheritance_ConfirmationByColumn Is Nothing Then
UserInheritance_ConfirmationByColumn = New List(Of UserInheritanceConfirmation)()
End If
If Not IsNothing(oDT_USER_KEY_VALUE_PAIR) Then
For Each row As DataRow In oDT_USER_KEY_VALUE_PAIR.Rows
Dim keyName As String = row("KEY_NAME").ToString()
' Prüfe ob es sich um einen Inheritance-Key handelt
If keyName.StartsWith("INHERITANCE_CONFIRM_") Then
Dim columnName As String = keyName.Replace("INHERITANCE_CONFIRM_", "")
Dim countValue As Integer = Integer.Parse(row("VALUE_TEXT1").ToString())
Dim existingEntry = UserInheritance_ConfirmationByColumn.FirstOrDefault(
Function(e) String.Equals(e.ColumnName, columnName, StringComparison.OrdinalIgnoreCase))
If existingEntry IsNot Nothing Then
existingEntry.Count = countValue
Else
UserInheritance_ConfirmationByColumn.Add(
New UserInheritanceConfirmation With {
.ColumnName = columnName,
.Count = countValue
})
End If
LOGGER.Debug("Loaded inheritance confirmation for column [{0}] with count [{1}]", columnName, countValue)
End If
Next
Else
LOGGER.Warn("⚠️ oDT_USER_KEY_VALUE_PAIR is nothing")
End If
oStopWatch.Done() oStopWatch.Done()
Catch ex As Exception Catch ex As Exception
LOGGER.Error(ex) LOGGER.Error(ex)
@@ -554,7 +608,7 @@ Public Class ClassInit
<STAThread()> <STAThread()>
Private Function Settings_LoadBasicConfig() Private Function Settings_LoadBasicConfig()
Try Try
Dim oSql As String = "select * from tbdd_Modules where SHORT_NAME = 'PM'" Dim oSql As String = "select * from tbdd_Modules WITH (NOLOCK) where SHORT_NAME = 'PM'"
Dim oDTtbdd_Modules As DataTable Dim oDTtbdd_Modules As DataTable
'oDTtbdd_Modules = DataASorDB.GetDatatable("DD_ECM", oSql, "tbdd_Modules", $" SHORT_NAME = 'PM'") 'oDTtbdd_Modules = DataASorDB.GetDatatable("DD_ECM", oSql, "tbdd_Modules", $" SHORT_NAME = 'PM'")
oDTtbdd_Modules = DatabaseFallback.GetDatatable("TBDD_MODULES", New GetDatatableOptions(oSql, DatabaseType.ECM) With { oDTtbdd_Modules = DatabaseFallback.GetDatatable("TBDD_MODULES", New GetDatatableOptions(oSql, DatabaseType.ECM) With {

View File

@@ -152,14 +152,20 @@ Public Class ClassPMWindream
'Den Typ des Index-Feldes auslesen 'Den Typ des Index-Feldes auslesen
'MsgBox(value.GetType.ToString) 'MsgBox(value.GetType.ToString)
Select Case vType Select Case vType
'Case WMObjectVariableValueTypeUndefined
Case WMObjectVariableValueTypeString Case WMObjectVariableValueTypeString
LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeString") LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeString")
If value = "DeleteWMAttributeValue" Then
LOGGER.Debug("DeleteWMAttributeValue - simpleAttribute with String.Empty")
convertValue = CStr(String.Empty)
Else
convertValue = CStr(value) convertValue = CStr(value)
End If
Case WMObjectVariableValueTypeInteger Case WMObjectVariableValueTypeInteger
LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeInteger") LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeInteger")
If IsNumeric(value) = False Then If IsNumeric(value) = False Then
If value = "String.Empty" Then If value = String.Empty Then
LOGGER.Debug("Indexing WMObjectVariableValueTypeInteger with vbEmpty")
convertValue = vbEmpty convertValue = vbEmpty
Else Else
frmValidator.idxerr_message = "Unerlaubte Eingabe in Numerisches Feld: " & value frmValidator.idxerr_message = "Unerlaubte Eingabe in Numerisches Feld: " & value
@@ -187,7 +193,8 @@ Public Class ClassPMWindream
Case WMObjectVariableValueTypeFloat Case WMObjectVariableValueTypeFloat
LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeFloat") LOGGER.Debug("Typ des windream-Indexes: WMObjectVariableValueTypeFloat")
Try Try
convertValue = CDbl(value) value = Replace(value, ".", ",")
convertValue = Convert.ToDouble(value)
Catch ex As Exception Catch ex As Exception
LOGGER.Error(ex) LOGGER.Error(ex)
frmValidator.idxerr_message = "Could't convert value '" & value & "' to double!" frmValidator.idxerr_message = "Could't convert value '" & value & "' to double!"
@@ -288,17 +295,9 @@ Public Class ClassPMWindream
LOGGER.Info(" >> Unexpected Error in Logging SetVariableValue for " & aName & ": " & ex.Message, False) LOGGER.Info(" >> Unexpected Error in Logging SetVariableValue for " & aName & ": " & ex.Message, False)
End Try End Try
'Dim ArrValues()
'ReDim ArrValues(0)
'ArrValues(0) = convertValue If _int = True Then
'Dim ArrName()
'ReDim ArrName(0)
'ArrName(0) = "Tournr"
'oDocument.SetValues(ArrName, ArrValues)
If convertValue = "String.Empty" Or convertValue = vbEmpty Then
LOGGER.Debug("Now Indexing simpleAttribute with vbEmpty ...")
oDocument.SetVariableValue(aName, String.Empty)
ElseIf _int = True Then
oDocument.SetVariableValue(aName, CInt(convertValue)) oDocument.SetVariableValue(aName, CInt(convertValue))
ElseIf _date = True Then ElseIf _date = True Then
oDocument.SetVariableValue(aName, CDate(convertValue)) oDocument.SetVariableValue(aName, CDate(convertValue))
@@ -316,10 +315,15 @@ Public Class ClassPMWindream
Else Else
'VEKTORFELDER, ALSO ÜBERPRÜFEN OB ERGEBNIS-ARRAY GEFÜLLT IST 'VEKTORFELDER, ALSO ÜBERPRÜFEN OB ERGEBNIS-ARRAY GEFÜLLT IST
LOGGER.Debug("VEKTORFELD: Vorbereiten des Arrays", False) LOGGER.Debug("VEKTORFELD: Vorbereiten des Arrays", False)
If aValues(0).ToString.Contains("DeleteWMAttributeValue") Then
'Variante um Vektorfeld zu leeren
Dim myArray()
ReDim myArray(aValues.Length - 1)
myArray(0) = String.Empty
LOGGER.Debug("Now Indexing vektor-attribute with String.Empty ...")
oDocument.SetVariableValue(aName, myArray)
Else
Dim myArray() Dim myArray()
'Dim anz As Integer = 0
'For Each obj In aValues
'ReDim Preserve myArray(anz)
Select Case vType Select Case vType
Case 4100 Case 4100
'Vektortyp Boolean 'Vektortyp Boolean
@@ -338,6 +342,10 @@ Public Class ClassPMWindream
obj = False obj = False
Case "ja" Case "ja"
obj = True obj = True
Case "0"
obj = False
Case "1"
obj = True
End Select End Select
myArray(i1) = CBool(obj) myArray(i1) = CBool(obj)
i1 = i1 + 1 i1 = i1 + 1
@@ -419,17 +427,23 @@ Public Class ClassPMWindream
i1 = i1 + 1 i1 = i1 + 1
Next Next
End Select End Select
'Jetzt die Nachindexierung für Vektor-Felder
LOGGER.Debug("Wert für Index vor Indexierung: [{0}]", myArray) LOGGER.Debug("Wert für Index vor Indexierung: [{0}]", myArray)
'Jetzt die Nachindexierung für Vektor-Felder 'If vType = 4097 Or vType = 36865 Then
If myArray(0) = "String.Empty" Then ' If myArray(0) = "DeleteWMAttributeValue" Then
LOGGER.Debug("Now Indexing vektor-attribute with vbEmpty ...") ' 'Variante um Vektorfeld zu leeren
oDocument.SetVariableValue(aName, vbEmpty) ' LOGGER.Debug("Now Indexing vektor-attribute with vbEmpty ...")
Else ' oDocument.SetVariableValue(aName, vbEmpty)
' Else
' oDocument.SetVariableValue(aName, myArray)
' End If
'Else
oDocument.SetVariableValue(aName, myArray) oDocument.SetVariableValue(aName, myArray)
'End If
End If End If
LOGGER.Debug("'SetVariableValue' für VEKTOR erfolgreich", False) LOGGER.Debug("'SetVariableValue' für VEKTOR erfolgreich", False)
End If End If
End If End If

View File

@@ -1,7 +1,8 @@
Imports DigitalData.Modules.Database Imports DigitalData.Modules.Database
Public Class ClassParamRefresh Public Class ClassParamRefresh
Public Shared Sub Refresh_Params(DT_CHECKUSER As DataTable) Public Shared Sub Refresh_Params(DT_CHECKUSER As DataTable, pMode As String)
LOGGER.Debug("Refresh_Params starting ...")
Dim oStopwatch As New RefreshHelper.SW("Refresh_Params") Dim oStopwatch As New RefreshHelper.SW("Refresh_Params")
FORCE_LAYOUT_OVERVIEW = False FORCE_LAYOUT_OVERVIEW = False
SHOW_CHARTS = True SHOW_CHARTS = True
@@ -28,16 +29,18 @@ Public Class ClassParamRefresh
End If End If
End If End If
LOGGER.Debug("Refresh_Params BASEDATA_DT_TBDD_SQL_COMMANDS done!")
If DT_CHECKUSER.Rows.Count = 1 Then If DT_CHECKUSER.Rows.Count = 1 Then
If oLicenseoverSQL = False Then If oLicenseoverSQL = False Then
USERCOUNT_LOGGED_IN = DT_CHECKUSER.Rows(0).Item("USERCOUNT_LOGGED_IN") USERCOUNT_LOGGED_IN = DT_CHECKUSER.Rows(0).Item("USERCOUNT_LOGGED_IN")
LOGGER.Debug(String.Format("Refresh_Params USERCOUNT_LOGGED_IN {0}", USERCOUNT_LOGGED_IN.ToString))
End If End If
Try Try
WORKING_MODE = DT_CHECKUSER.Rows(0).Item("WORKING_MODE") WORKING_MODE = DT_CHECKUSER.Rows(0).Item("WORKING_MODE")
LOGGER.Debug(String.Format("Refresh_Params WORKING_MODE {0}", WORKING_MODE.ToString))
Catch ex As Exception Catch ex As Exception
WORKING_MODE = "" WORKING_MODE = ""
End Try End Try
@@ -47,6 +50,7 @@ Public Class ClassParamRefresh
If ADDITIONAL_TITLE = String.Empty Then If ADDITIONAL_TITLE = String.Empty Then
ADDITIONAL_TITLE = My.Application.Info.ProductName ADDITIONAL_TITLE = My.Application.Info.ProductName
End If End If
LOGGER.Debug(String.Format("Refresh_Params ADDITIONAL_TITLE {0}", ADDITIONAL_TITLE.ToString))
Catch ex As Exception Catch ex As Exception
ADDITIONAL_TITLE = My.Application.Info.ProductName ADDITIONAL_TITLE = My.Application.Info.ProductName
End Try End Try
@@ -69,6 +73,8 @@ Public Class ClassParamRefresh
ElseIf oMode = "PM.DEBUG_LOG" Then ElseIf oMode = "PM.DEBUG_LOG" Then
DEBUG = True DEBUG = True
LOGCONFIG.Debug = True LOGCONFIG.Debug = True
ElseIf oMode = "PM.LOG_HOTSPOTS" Then
LOG_HOTSPOTS = True
ElseIf oMode.StartsWith("OPERATION_MODE_FS") Then ElseIf oMode.StartsWith("OPERATION_MODE_FS") Then
OPERATION_MODE_FS = oMode.Replace("OPERATION_MODE_FS=", "") OPERATION_MODE_FS = oMode.Replace("OPERATION_MODE_FS=", "")
If OPERATION_MODE_FS = ClassConstants.OpModeFS_IDBWM Then If OPERATION_MODE_FS = ClassConstants.OpModeFS_IDBWM Then
@@ -215,6 +221,28 @@ Public Class ClassParamRefresh
Catch ex As Exception Catch ex As Exception
TITLE_NOTIFICATIONS = "" TITLE_NOTIFICATIONS = ""
End Try End Try
ElseIf oMode.StartsWith("TF.InheritanceMsgAmount") And pMode = "Load" Then
Dim oParam = oMode.Replace("TF.InheritanceMsgAmount=", "")
Try
InheritanceMsgAmount = oParam
Catch ex As Exception
End Try
ElseIf oMode.StartsWith("TF.InheritanceCalcReset") And pMode = "Load" Then
Dim oParam = oMode.Replace("TF.InheritanceCalcReset=", "")
Try
If CBool(oParam) = True Then
LOGGER.Info("Inheritance_Counts werden auf 0 zurückgesetzt bzw gelöscht")
Dim oDELETESQL = "DELETE FROM TBDD_USER_KEY_VALUE_PAIR
WHERE FK_USER_ID = " & USER_ID & " And [FK_MODULE_ID] = '" & USER_MODULE_ID & "' AND KEY_NAME LIKE 'INHERITANCE_CONFIRM_%'"
DatabaseECM.ExecuteNonQuery(oDELETESQL)
UserInheritance_ConfirmationByColumn = Nothing
CONFIG.Save()
End If
Catch ex As Exception
End Try
ElseIf oMode.StartsWith("PM.START_CW") Then ElseIf oMode.StartsWith("PM.START_CW") Then
Dim oAfterReplace = oMode.Replace("PM.START_CW=", "") Dim oAfterReplace = oMode.Replace("PM.START_CW=", "")
Try Try

View File

@@ -12,7 +12,7 @@ Public Class ClassRegexEditor
Public Overrides Function EditValue(context As ITypeDescriptorContext, provider As IServiceProvider, value As Object) As Object Public Overrides Function EditValue(context As ITypeDescriptorContext, provider As IServiceProvider, value As Object) As Object
Dim oService As IWindowsFormsEditorService = TryCast(provider.GetService(GetType(IWindowsFormsEditorService)), IWindowsFormsEditorService) Dim oService As IWindowsFormsEditorService = TryCast(provider.GetService(GetType(IWindowsFormsEditorService)), IWindowsFormsEditorService)
Dim oRegexString As String = NotNull(value, String.Empty) Dim oRegexString As String = ClassAllgemeineFunktionen.NotNullString(value, String.Empty)
If oService IsNot Nothing Then If oService IsNot Nothing Then
Using oform As New frmRegexEditor() Using oform As New frmRegexEditor()

View File

@@ -1,7 +1,7 @@
Imports System.ComponentModel Imports System.ComponentModel
Imports System.Drawing.Design Imports System.Drawing.Design
Imports System.Windows.Forms.Design Imports System.Windows.Forms.Design
Imports DD_ProcessManager.InputProperties Imports taskFLOW.InputProperties
Imports DigitalData.GUIs.Common Imports DigitalData.GUIs.Common
Public Class ClassSQLEditor Public Class ClassSQLEditor

View File

@@ -211,7 +211,7 @@ LOGGER.Error(ex)
Public Function GetTypeOfIndex(ByVal indexname As String) As Integer Public Function GetTypeOfIndex(ByVal indexname As String) As Integer
Try Try
If IsNothing(Me.oSession) Then If IsNothing(Me.oSession) Then
LOGGER.Warn("GetTypeOfIndex: WMSession is nothing") LOGGER.Warn("⚠️ GetTypeOfIndex: WMSession is nothing")
Return Nothing Return Nothing
End If End If
Dim oAttribute = Me.oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityAttribute, indexname) Dim oAttribute = Me.oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityAttribute, indexname)
@@ -272,7 +272,7 @@ LOGGER.Error(ex)
Public Function GetIndicesByObjecttype(ByVal Objecttype_name As String) As String() Public Function GetIndicesByObjecttype(ByVal Objecttype_name As String) As String()
Try Try
If IsNothing(Me.oSession) Then If IsNothing(Me.oSession) Then
LOGGER.Warn("GetIndicesByObjecttype: WMSession is nothing") LOGGER.Warn("⚠️ GetIndicesByObjecttype: WMSession is nothing")
Return Nothing Return Nothing
End If End If
Dim oObjectType As WMObject Dim oObjectType As WMObject
@@ -325,7 +325,7 @@ LOGGER.Error(ex)
Public Function GetObjecttypeByName(ByVal objekttypName As String) As WMObject Public Function GetObjecttypeByName(ByVal objekttypName As String) As WMObject
Try Try
If IsNothing(Me.oSession) Then If IsNothing(Me.oSession) Then
LOGGER.Warn("GetObjecttypeByName: WMSession is nothing") LOGGER.Warn("⚠️ GetObjecttypeByName: WMSession is nothing")
Return Nothing Return Nothing
End If End If
' alle Objekttypen auslesen ' alle Objekttypen auslesen
@@ -359,6 +359,7 @@ LOGGER.Error(ex)
Dim indexnamen() As String = Me.GetIndicesByObjecttype(objekttyp) Dim indexnamen() As String = Me.GetIndicesByObjecttype(objekttyp)
If indexnamen Is Nothing Then Return False If indexnamen Is Nothing Then Return False
MVSource_AllIndicies = MyIndicies
For Each index As String In indexnamen For Each index As String In indexnamen
If index = indexname Then Return True If index = indexname Then Return True

View File

@@ -15,6 +15,7 @@ Imports System.Text.RegularExpressions
Imports System.Globalization Imports System.Globalization
Imports DevExpress.Xpo.Helpers.AssociatedCollectionCriteriaHelper Imports DevExpress.Xpo.Helpers.AssociatedCollectionCriteriaHelper
Imports DevExpress.XtraEditors.Mask Imports DevExpress.XtraEditors.Mask
Imports System.Windows.Forms
Namespace ControlCreator Namespace ControlCreator
Public Class GridControl Public Class GridControl
@@ -23,6 +24,7 @@ Namespace ControlCreator
Private ReadOnly _GridTables As Dictionary(Of Integer, Dictionary(Of String, RepositoryItem)) Private ReadOnly _GridTables As Dictionary(Of Integer, Dictionary(Of String, RepositoryItem))
Private newRowModified As Boolean Private newRowModified As Boolean
Private isApplyingInheritedValue As Boolean
Public Sub New(pLogConfig As LogConfig, pGridTables As Dictionary(Of Integer, Dictionary(Of String, RepositoryItem))) Public Sub New(pLogConfig As LogConfig, pGridTables As Dictionary(Of Integer, Dictionary(Of String, RepositoryItem)))
_LogConfig = pLogConfig _LogConfig = pLogConfig
@@ -32,6 +34,7 @@ Namespace ControlCreator
Public Function CreateGridColumns(pColumnTable As DataTable) As DataTable Public Function CreateGridColumns(pColumnTable As DataTable) As DataTable
Dim oDataTable As New DataTable Dim oDataTable As New DataTable
Dim columnsWithExpressions As New List(Of Tuple(Of DataColumn, String))
For Each oRow As DataRow In pColumnTable.Rows For Each oRow As DataRow In pColumnTable.Rows
' Create Columns in Datatable ' Create Columns in Datatable
@@ -56,19 +59,71 @@ Namespace ControlCreator
oColumn.DataType = GetType(String) oColumn.DataType = GetType(String)
End Select End Select
Dim oFormulaExpression = ObjectEx.NotNull(oRow.Item("FORMULA_EXPRESSION"), String.Empty)
If oFormulaExpression <> String.Empty Then
' Expression merken, aber erst später setzen
columnsWithExpressions.Add(New Tuple(Of DataColumn, String)(oColumn, oFormulaExpression))
End If
Try
oDataTable.Columns.Add(oColumn) oDataTable.Columns.Add(oColumn)
Catch ex As Exception
_Logger.Warn("⚠️ Could not add column {0} to DataTable", oColumn.ColumnName)
_Logger.Error(ex)
End Try
Next
' Jetzt alle Expressions setzen, nachdem alle Spalten existieren
For Each columnExpressionPair In columnsWithExpressions
Dim oColumn = columnExpressionPair.Item1
Dim oExpression = columnExpressionPair.Item2
Try
_Logger.Debug("Setting expression for column [{0}]: {1}", oColumn.ColumnName, oExpression)
' Prüfe, ob alle referenzierten Spalten existieren
Dim referencedColumns = GetReferencedColumnNames(oExpression)
For Each refCol In referencedColumns
If Not oDataTable.Columns.Contains(refCol) Then
_Logger.Warn("⚠️ Referenced column [{0}] does not exist in DataTable!", refCol)
MsgBox(String.Format("Referenced column [{0}] does not exist in DataTable!", refCol), MsgBoxStyle.Exclamation)
Else
_Logger.Debug("Referenced column [{0}] exists with DataType: {1}", refCol, oDataTable.Columns(refCol).DataType.Name)
End If
Next
oColumn.Expression = oExpression
oColumn.ReadOnly = True
_Logger.Info("✓ Expression successfully set for column [{0}]: {1}", oColumn.ColumnName, oColumn.Expression)
Catch ex As Exception
_Logger.Warn("⚠️ Invalid FORMULA_EXPRESSION for column {0}: {1}", oColumn.ColumnName, oExpression)
_Logger.Error(ex)
MsgBox(String.Format("The column '{0}' inlcudes an invalid formula: {1}. Please check the FORMULA_EXPRESSION in the table designer." & vbCrLf &
"Error: {2}", oColumn.ColumnName, oExpression, ex.Message), MsgBoxStyle.Exclamation, "Ungültige Formel")
End Try
Next Next
Return oDataTable Return oDataTable
End Function End Function
Private Function GetReferencedColumnNames(expression As String) As List(Of String)
Dim columnNames As New List(Of String)
Dim pattern As String = "\[([^\]]+)\]"
Dim matches = Regex.Matches(expression, pattern)
For Each match As Match In matches
columnNames.Add(match.Groups(1).Value)
Next
Return columnNames
End Function
Public Function FillGridTables(pColumnTable As DataTable, pControlId As Integer, pControlName As String) As Dictionary(Of Integer, Dictionary(Of String, RepositoryItem)) Public Function FillGridTables(pColumnTable As DataTable, pControlId As Integer, pControlName As String) As Dictionary(Of Integer, Dictionary(Of String, RepositoryItem))
For Each oRow As DataRow In pColumnTable.Rows For Each oRow As DataRow In pColumnTable.Rows
' Fetch and cache Combobox results ' Fetch and cache Combobox results
Dim oConnectionId As Integer = oRow.ItemEx("CONNECTION_ID", 0) Dim oConnectionId As Integer = oRow.ItemEx("CONNECTION_ID", 0)
Dim oSqlCommand As String = oRow.ItemEx("SQL_COMMAND", "") Dim oSqlCommand As String = oRow.ItemEx("SQL_COMMAND", "")
If oConnectionId > 0 And oSqlCommand <> "" Then If oSqlCommand <> "" Then
Try Try
Dim oComboboxDataTable As DataTable = Nothing Dim oComboboxDataTable As DataTable = Nothing
Dim oColumnName As String = oRow.Item("SPALTENNAME") Dim oColumnName As String = oRow.Item("SPALTENNAME")
@@ -91,7 +146,7 @@ Namespace ControlCreator
_GridTables.Item(pControlId).Add(oColumnName, oRepositoryItem) _GridTables.Item(pControlId).Add(oColumnName, oRepositoryItem)
End If End If
Catch ex As Exception Catch ex As Exception
_Logger.Warn("Could not load data for column {0} in control {1}", oRow.Item("SPALTENNAME"), pControlName) _Logger.Warn("⚠️ Could not load data for column {0} in control {1}", oRow.Item("SPALTENNAME"), pControlName)
_Logger.Error(ex) _Logger.Error(ex)
End Try End Try
End If End If
@@ -144,12 +199,17 @@ Namespace ControlCreator
Return oEditor Return oEditor
End If End If
End Function End Function
' Hilfsroutine: passt NUR das Summary-Item an (ohne FormatInfo)
Private Sub ApplyCurrencySummaryFormat(oCol As GridColumn, currencySymbol As String)
oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Sum
' Variante A: Standard-Währungsformat aus aktueller Kultur
' oCol.SummaryItem.DisplayFormat = "SUM: {0:C2}"
Public Sub ConfigureViewColumns(pColumnTable As DataTable, pGridView As GridView, pGrid As DevExpress.XtraGrid.GridControl) ' Variante B: Kulturunabhängig, Symbol explizit anhängen
oCol.SummaryItem.DisplayFormat = $"SUM: {{0:N2}} {currencySymbol}"
End Sub
Public Sub ConfigureViewColumns(pColumnTable As DataTable, pGridView As GridView, pGrid As DevExpress.XtraGrid.GridControl, pcurrencySymbol As String)
Dim oShouldDisplayFooter As Boolean = False Dim oShouldDisplayFooter As Boolean = False
For Each oCol As GridColumn In pGridView.Columns For Each oCol As GridColumn In pGridView.Columns
Dim oColumnData As DataRow = pColumnTable. Dim oColumnData As DataRow = pColumnTable.
Select($"SPALTENNAME = '{oCol.FieldName}'"). Select($"SPALTENNAME = '{oCol.FieldName}'").
@@ -162,6 +222,25 @@ Namespace ControlCreator
Dim oSequence As Integer = oColumnData.Item("SEQUENCE") Dim oSequence As Integer = oColumnData.Item("SEQUENCE")
oCol.VisibleIndex = oSequence oCol.VisibleIndex = oSequence
' READ_ONLY Eigenschaft verarbeiten
Dim oIsReadOnly As Boolean = False
Dim oReadOnlyValue = ObjectEx.NotNull(oColumnData.Item("READ_ONLY"), False)
If TypeOf oReadOnlyValue Is Boolean Then
oIsReadOnly = CBool(oReadOnlyValue)
Else
Dim oReadOnlyInt As Integer
oIsReadOnly = Integer.TryParse(oReadOnlyValue.ToString(), oReadOnlyInt) AndAlso oReadOnlyInt = 1
End If
Dim oFormulaExpression = ObjectEx.NotNull(oColumnData.Item("FORMULA_EXPRESSION"), String.Empty)
If oFormulaExpression <> String.Empty Then
oIsReadOnly = True
End If
oCol.OptionsColumn.AllowEdit = Not oIsReadOnly
Dim oColumnType As String = oColumnData.Item("TYPE_COLUMN") Dim oColumnType As String = oColumnData.Item("TYPE_COLUMN")
Select Case oColumnType Select Case oColumnType
@@ -192,8 +271,7 @@ Namespace ControlCreator
oShouldDisplayFooter = True oShouldDisplayFooter = True
Case Constants.AGGREGATE_TOTAL_CURRENCY Case Constants.AGGREGATE_TOTAL_CURRENCY
oCol.SummaryItem.SummaryType = DevExpress.Data.SummaryItemType.Sum ApplyCurrencySummaryFormat(oCol, pcurrencySymbol)
oCol.SummaryItem.DisplayFormat = "SUM: {0:C2}"
oShouldDisplayFooter = True oShouldDisplayFooter = True
Case Constants.AGGREGATE_TOTAL_AVG Case Constants.AGGREGATE_TOTAL_AVG
@@ -220,6 +298,13 @@ Namespace ControlCreator
Next Next
pGridView.OptionsView.ShowFooter = oShouldDisplayFooter pGridView.OptionsView.ShowFooter = oShouldDisplayFooter
If oShouldDisplayFooter Then
With pGridView.Appearance.FooterPanel
.Options.UseFont = True
.Font = New Font(.Font.FontFamily, 8.0F, FontStyle.Bold)
End With
End If
End Sub End Sub
Public Sub ConfigureViewColumnsCurrency(pColumnTable As DataTable, pGridView As GridView, pGrid As DevExpress.XtraGrid.GridControl, pCurrency As String) Public Sub ConfigureViewColumnsCurrency(pColumnTable As DataTable, pGridView As GridView, pGrid As DevExpress.XtraGrid.GridControl, pCurrency As String)
@@ -233,7 +318,6 @@ Namespace ControlCreator
riTextEdit.UseMaskAsDisplayFormat = True 'Optional riTextEdit.UseMaskAsDisplayFormat = True 'Optional
pGrid.RepositoryItems.Add(riTextEdit) pGrid.RepositoryItems.Add(riTextEdit)
For Each oCol As GridColumn In pGridView.Columns For Each oCol As GridColumn In pGridView.Columns
Dim oColumnData As DataRow = pColumnTable. Dim oColumnData As DataRow = pColumnTable.
Select($"SPALTENNAME = '{oCol.FieldName}'"). Select($"SPALTENNAME = '{oCol.FieldName}'").
@@ -250,7 +334,6 @@ Namespace ControlCreator
oCol.DisplayFormat.FormatType = FormatType.Custom oCol.DisplayFormat.FormatType = FormatType.Custom
oCol.ColumnEdit = riTextEdit oCol.ColumnEdit = riTextEdit
End Select End Select
Next Next
End Sub End Sub
Public Sub ConfigureViewEvents(pColumnTable As DataTable, pGridView As GridView, pControl As Windows.Forms.Control, pControlId As Integer) Public Sub ConfigureViewEvents(pColumnTable As DataTable, pGridView As GridView, pControl As Windows.Forms.Control, pControlId As Integer)
@@ -298,7 +381,7 @@ Namespace ControlCreator
End If End If
Next Next
Catch ex As Exception Catch ex As Exception
_Logger.Warn("Error in CustomRowCellEdit for [{0}]", e.CellValue) _Logger.Warn("⚠️ Error in CustomRowCellEdit for [{0}]", e.CellValue)
_Logger.Error(ex) _Logger.Error(ex)
End Try End Try
End Sub End Sub
@@ -322,7 +405,180 @@ Namespace ControlCreator
AddHandler pGridView.ShownEditor, AddressOf View_ShownEditor AddHandler pGridView.ShownEditor, AddressOf View_ShownEditor
AddHandler pGridView.ValidateRow, AddressOf View_ValidateRow AddHandler pGridView.ValidateRow, AddressOf View_ValidateRow
AddHandler pControl.LostFocus, AddressOf Control_LostFocus AddHandler pControl.LostFocus, AddressOf Control_LostFocus
AddHandler pGridView.CellValueChanged,
Sub(sender As Object, e As CellValueChangedEventArgs)
Try
HandleInheritedColumnValue(TryCast(sender, GridView), pColumnTable, e)
Catch ex As Exception
_Logger.Error(ex)
End Try
End Sub End Sub
End Sub
Private Sub HandleInheritedColumnValue(pView As GridView, pColumnDefinition As DataTable, pArgs As CellValueChangedEventArgs)
If pView Is Nothing OrElse pArgs Is Nothing OrElse pArgs.Column Is Nothing Then
Return
End If
If isApplyingInheritedValue OrElse pArgs.RowHandle = DevExpress.XtraGrid.GridControl.InvalidRowHandle Then
Return
End If
Dim oColumnData As DataRow = pColumnDefinition.
Select($"SPALTENNAME = '{pArgs.Column.FieldName}'").
FirstOrDefault()
If oColumnData Is Nothing Then
Return
End If
Dim inheritRaw = ObjectEx.NotNull(oColumnData.Item("INHERIT_VALUE"), 0)
Dim inheritEnabled As Boolean
If TypeOf inheritRaw Is Boolean Then
inheritEnabled = CBool(inheritRaw)
Else
Dim inheritInt As Integer
inheritEnabled = Integer.TryParse(inheritRaw.ToString(), inheritInt) AndAlso inheritInt = 1
End If
If Not inheritEnabled Then
Return
End If
Dim listIndex = pView.GetDataSourceRowIndex(pArgs.RowHandle)
If listIndex = DevExpress.XtraGrid.GridControl.InvalidRowHandle Then
Return
End If
' Benutzerbestätigung für Wertvererbung
Dim valueToApply = pArgs.Value
Dim affectedRowsCount = pView.DataRowCount - listIndex - 1
Dim confirmationEntry = GetInheritanceConfirmationEntry(pArgs.Column.FieldName)
If affectedRowsCount > 0 AndAlso confirmationEntry.Count < InheritanceMsgAmount Then
Dim confirmMessage As String = String.Format(
"Möchten Sie den Wert '{0}' an {1} nachfolgende Zeile(n) vererben?",
valueToApply,
affectedRowsCount)
If USER_LANGUAGE <> "de-DE" Then
confirmMessage = String.Format(
"Do you want to inherit the value '{0}' to {1} subsequent row(s)?",
valueToApply,
affectedRowsCount)
End If
Dim confirmTitle As String = "Wertevererbung bestätigen"
If USER_LANGUAGE <> "de-DE" Then
confirmTitle = "Confirm Value Inheritance"
End If
Dim result = MessageBox.Show(
confirmMessage,
confirmTitle,
MessageBoxButtons.YesNo,
MessageBoxIcon.Question,
MessageBoxDefaultButton.Button1)
If result <> DialogResult.Yes Then
_Logger.Debug("User cancelled value inheritance")
Return
End If
Dim newCount = confirmationEntry.Count + 1
confirmationEntry.Count = newCount
SetInheritanceConfirmationCount(confirmationEntry.ColumnName, newCount)
_Logger.Info("User confirmed value inheritance. Confirmation count: {0}", newCount)
ElseIf affectedRowsCount > 0 AndAlso confirmationEntry.Count = InheritanceMsgAmount Then
' Schwellenwert erreicht - User fragen, ob er weiterhin gefragt werden möchte
Dim continueAskingMessage As String = "Sie haben diese Bestätigung bereits mehrfach durchgeführt. Möchten Sie in Zukunft weiterhin gefragt werden?"
If USER_LANGUAGE <> "de-DE" Then
continueAskingMessage = "You have confirmed this action multiple times. Do you want to continue being asked in the future?"
End If
Dim continueAskingTitle As String = "Bestätigungen fortsetzen?"
If USER_LANGUAGE <> "de-DE" Then
continueAskingTitle = "Continue Confirmations?"
End If
Dim continueResult = MessageBox.Show(
continueAskingMessage,
continueAskingTitle,
MessageBoxButtons.YesNo,
MessageBoxIcon.Question,
MessageBoxDefaultButton.Button2)
If continueResult = DialogResult.Yes Then
' User möchte weiterhin gefragt werden - Counter zurücksetzen
confirmationEntry.Count = 0
SetInheritanceConfirmationCount(confirmationEntry.ColumnName, 0)
_Logger.Info("User wants to continue being asked. Counter reset to 0.")
Else
' User möchte nicht mehr gefragt werden - Counter erhöhen
Dim newCount = confirmationEntry.Count + 1
confirmationEntry.Count = newCount
SetInheritanceConfirmationCount(confirmationEntry.ColumnName, newCount)
_Logger.Info("User does not want to be asked anymore. Counter increased to {0}.", newCount)
End If
ElseIf affectedRowsCount > 0 Then
_Logger.Info("Skipping confirmation dialog (already confirmed {0} times)", confirmationEntry.Count)
End If
isApplyingInheritedValue = True
Try
_Logger.Info(String.Format("Inherit Value is active for column. So inheritting the value [{0}]...", valueToApply))
For dataIndex As Integer = listIndex + 1 To pView.DataRowCount - 1
Dim targetHandle = pView.GetRowHandle(dataIndex)
If targetHandle = DevExpress.XtraGrid.GridControl.InvalidRowHandle OrElse pView.IsGroupRow(targetHandle) Then
Continue For
End If
If pView.IsNewItemRow(targetHandle) Then
Exit For
End If
Dim existingValue = pView.GetRowCellValue(targetHandle, pArgs.Column.FieldName)
If Equals(existingValue, valueToApply) Then
Continue For
End If
pView.SetRowCellValue(targetHandle, pArgs.Column.FieldName, valueToApply)
Next
Finally
isApplyingInheritedValue = False
End Try
End Sub
Private Sub SetInheritanceConfirmationCount(columnName As String, newCount As Integer)
Dim entries = UserInheritance_ConfirmationByColumn
If entries Is Nothing Then
Return
End If
Dim entryIndex = entries.FindIndex(Function(item) String.Equals(item.ColumnName, columnName, StringComparison.OrdinalIgnoreCase))
If entryIndex < 0 Then
Return
End If
Dim entry = entries(entryIndex)
entry.Count = newCount
entries(entryIndex) = entry
End Sub
Private Function GetInheritanceConfirmationEntry(columnName As String) As UserInheritanceConfirmation
Dim entries = UserInheritance_ConfirmationByColumn
If entries Is Nothing Then
entries = New List(Of UserInheritanceConfirmation)()
UserInheritance_ConfirmationByColumn = entries
End If
Dim entry = entries.FirstOrDefault(Function(item) String.Equals(item.ColumnName, columnName, StringComparison.OrdinalIgnoreCase))
If entry Is Nothing Then
entry = New UserInheritanceConfirmation With {
.ColumnName = columnName,
.Count = 0
}
entries.Add(entry)
End If
Return entry
End Function
Private Sub View_CustomColumnDisplayText(ByVal eSender As Object, ByVal e As CustomColumnDisplayTextEventArgs) Private Sub View_CustomColumnDisplayText(ByVal eSender As Object, ByVal e As CustomColumnDisplayTextEventArgs)
If IsNothing(e.Value) Then If IsNothing(e.Value) Then
Exit Sub Exit Sub
@@ -336,25 +592,29 @@ Namespace ControlCreator
Private Sub View_PopupMenuShowing(sender As Object, e As PopupMenuShowingEventArgs) Private Sub View_PopupMenuShowing(sender As Object, e As PopupMenuShowingEventArgs)
Dim view As GridView = TryCast(sender, GridView) Dim view As GridView = TryCast(sender, GridView)
Dim oFocusedColumn As GridColumn = view.FocusedColumn Dim oFocusedColumn As GridColumn = view.FocusedColumn
If IsNothing(oFocusedColumn) Then
MsgBox("Please focus a column first.", MsgBoxStyle.Information, "No Column focused")
Exit Sub
End If
Dim oColumnType As Type = oFocusedColumn.ColumnType Dim oColumnType As Type = oFocusedColumn.ColumnType
Dim oColumnName As String = oFocusedColumn.FieldName Dim oColumnName As String = oFocusedColumn.FieldName
If e.MenuType = GridMenuType.Column AndAlso oColumnType Is GetType(Boolean) Then If e.MenuType = GridMenuType.Column AndAlso oColumnType Is GetType(Boolean) Then
e.Menu.Items.Add(New Menu.DXMenuItem( e.Menu.Items.Add(New DevExpress.Utils.Menu.DXMenuItem(
"Alle Zeilen anhaken", "Alle Zeilen anhaken",
Sub(_sender As Object, _e As EventArgs) Sub(_sender As Object, _e As EventArgs)
SetCellValuesForBooleanColumn(view, oColumnName, True) SetCellValuesForBooleanColumn(view, oColumnName, True)
End Sub, End Sub,
My.Resources.itemtypechecked, My.Resources.itemtypechecked,
Menu.DXMenuItemPriority.Normal)) DevExpress.Utils.Menu.DXMenuItemPriority.Normal))
e.Menu.Items.Add(New Menu.DXMenuItem( e.Menu.Items.Add(New DevExpress.Utils.Menu.DXMenuItem(
"Alle Zeilen abhaken", "Alle Zeilen abhaken",
Sub(_sender As Object, _e As EventArgs) Sub(_sender As Object, _e As EventArgs)
SetCellValuesForBooleanColumn(view, oColumnName, False) SetCellValuesForBooleanColumn(view, oColumnName, False)
End Sub, End Sub,
My.Resources.itemtypechecked, My.Resources.itemtypechecked,
Menu.DXMenuItemPriority.Normal)) DevExpress.Utils.Menu.DXMenuItemPriority.Normal))
End If End If
End Sub End Sub

View File

@@ -4587,6 +4587,8 @@ Partial Public Class DD_DMSLiteDataSet
Private columnBACKCOLOR_IF As Global.System.Data.DataColumn Private columnBACKCOLOR_IF As Global.System.Data.DataColumn
Private columnTEXT_ALIGNMENT As Global.System.Data.DataColumn
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub New() Public Sub New()
@@ -4966,6 +4968,14 @@ Partial Public Class DD_DMSLiteDataSet
End Get End Get
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property TEXT_ALIGNMENTColumn() As Global.System.Data.DataColumn
Get
Return Me.columnTEXT_ALIGNMENT
End Get
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Browsable(false)> _ Global.System.ComponentModel.Browsable(false)> _
@@ -5045,9 +5055,10 @@ Partial Public Class DD_DMSLiteDataSet
ByVal TABLE_ORDER_COLUMN As String, _ ByVal TABLE_ORDER_COLUMN As String, _
ByVal SAVE_CHANGE_ON_ENABLED As Boolean, _ ByVal SAVE_CHANGE_ON_ENABLED As Boolean, _
ByVal FORMAT_STRING As String, _ ByVal FORMAT_STRING As String, _
ByVal BACKCOLOR_IF As String) As TBPM_PROFILE_CONTROLSRow ByVal BACKCOLOR_IF As String, _
ByVal TEXT_ALIGNMENT As String) As TBPM_PROFILE_CONTROLSRow
Dim rowTBPM_PROFILE_CONTROLSRow As TBPM_PROFILE_CONTROLSRow = CType(Me.NewRow,TBPM_PROFILE_CONTROLSRow) Dim rowTBPM_PROFILE_CONTROLSRow As TBPM_PROFILE_CONTROLSRow = CType(Me.NewRow,TBPM_PROFILE_CONTROLSRow)
Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL2, SQL_ENABLE, SET_CONTROL_DATA, SQL_ENABLE_ON_LOAD, SQL_ENABLE_ON_LOAD_CONID, CONTROL_ACTIVE, TABLE_ORDER_COLUMN, SAVE_CHANGE_ON_ENABLED, FORMAT_STRING, BACKCOLOR_IF} Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL2, SQL_ENABLE, SET_CONTROL_DATA, SQL_ENABLE_ON_LOAD, SQL_ENABLE_ON_LOAD_CONID, CONTROL_ACTIVE, TABLE_ORDER_COLUMN, SAVE_CHANGE_ON_ENABLED, FORMAT_STRING, BACKCOLOR_IF, TEXT_ALIGNMENT}
If (Not (parentTBPM_PROFILERowByFK_TBPM_PROFILE_CONTROLS_PROFILE) Is Nothing) Then If (Not (parentTBPM_PROFILERowByFK_TBPM_PROFILE_CONTROLS_PROFILE) Is Nothing) Then
columnValuesArray(1) = parentTBPM_PROFILERowByFK_TBPM_PROFILE_CONTROLS_PROFILE(0) columnValuesArray(1) = parentTBPM_PROFILERowByFK_TBPM_PROFILE_CONTROLS_PROFILE(0)
End If End If
@@ -5122,6 +5133,7 @@ Partial Public Class DD_DMSLiteDataSet
Me.columnSAVE_CHANGE_ON_ENABLED = MyBase.Columns("SAVE_CHANGE_ON_ENABLED") Me.columnSAVE_CHANGE_ON_ENABLED = MyBase.Columns("SAVE_CHANGE_ON_ENABLED")
Me.columnFORMAT_STRING = MyBase.Columns("FORMAT_STRING") Me.columnFORMAT_STRING = MyBase.Columns("FORMAT_STRING")
Me.columnBACKCOLOR_IF = MyBase.Columns("BACKCOLOR_IF") Me.columnBACKCOLOR_IF = MyBase.Columns("BACKCOLOR_IF")
Me.columnTEXT_ALIGNMENT = MyBase.Columns("TEXT_ALIGNMENT")
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -5213,6 +5225,8 @@ Partial Public Class DD_DMSLiteDataSet
MyBase.Columns.Add(Me.columnFORMAT_STRING) MyBase.Columns.Add(Me.columnFORMAT_STRING)
Me.columnBACKCOLOR_IF = New Global.System.Data.DataColumn("BACKCOLOR_IF", GetType(String), Nothing, Global.System.Data.MappingType.Element) Me.columnBACKCOLOR_IF = New Global.System.Data.DataColumn("BACKCOLOR_IF", GetType(String), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnBACKCOLOR_IF) MyBase.Columns.Add(Me.columnBACKCOLOR_IF)
Me.columnTEXT_ALIGNMENT = New Global.System.Data.DataColumn("TEXT_ALIGNMENT", GetType(String), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnTEXT_ALIGNMENT)
Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, true)) Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, true))
Me.columnGUID.AutoIncrement = true Me.columnGUID.AutoIncrement = true
Me.columnGUID.AllowDBNull = false Me.columnGUID.AllowDBNull = false
@@ -5259,7 +5273,10 @@ Partial Public Class DD_DMSLiteDataSet
Me.columnTABLE_ORDER_COLUMN.DefaultValue = CType("",String) Me.columnTABLE_ORDER_COLUMN.DefaultValue = CType("",String)
Me.columnTABLE_ORDER_COLUMN.MaxLength = 250 Me.columnTABLE_ORDER_COLUMN.MaxLength = 250
Me.columnSAVE_CHANGE_ON_ENABLED.AllowDBNull = false Me.columnSAVE_CHANGE_ON_ENABLED.AllowDBNull = false
Me.columnFORMAT_STRING.AllowDBNull = false Me.columnFORMAT_STRING.DefaultValue = CType("",String)
Me.columnTEXT_ALIGNMENT.AllowDBNull = false
Me.columnTEXT_ALIGNMENT.DefaultValue = CType("Near",String)
Me.columnTEXT_ALIGNMENT.MaxLength = 20
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -5445,6 +5462,10 @@ Partial Public Class DD_DMSLiteDataSet
Private columnLU_CAPTION As Global.System.Data.DataColumn Private columnLU_CAPTION As Global.System.Data.DataColumn
Private columnINHERIT_VALUE As Global.System.Data.DataColumn
Private columnFORMULA_EXPRESSION As Global.System.Data.DataColumn
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub New() Public Sub New()
@@ -5672,6 +5693,22 @@ Partial Public Class DD_DMSLiteDataSet
End Get End Get
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property INHERIT_VALUEColumn() As Global.System.Data.DataColumn
Get
Return Me.columnINHERIT_VALUE
End Get
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public ReadOnly Property FORMULA_EXPRESSIONColumn() As Global.System.Data.DataColumn
Get
Return Me.columnFORMULA_EXPRESSION
End Get
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Browsable(false)> _ Global.System.ComponentModel.Browsable(false)> _
@@ -5732,9 +5769,11 @@ Partial Public Class DD_DMSLiteDataSet
ByVal ADVANCED_LOOKUP As Boolean, _ ByVal ADVANCED_LOOKUP As Boolean, _
ByVal SUMMARY_FUNCTION As String, _ ByVal SUMMARY_FUNCTION As String, _
ByVal TYPE_COLUMN As String, _ ByVal TYPE_COLUMN As String, _
ByVal LU_CAPTION As String) As TBPM_CONTROL_TABLERow ByVal LU_CAPTION As String, _
ByVal INHERIT_VALUE As Boolean, _
ByVal FORMULA_EXPRESSION As String) As TBPM_CONTROL_TABLERow
Dim rowTBPM_CONTROL_TABLERow As TBPM_CONTROL_TABLERow = CType(Me.NewRow,TBPM_CONTROL_TABLERow) Dim rowTBPM_CONTROL_TABLERow As TBPM_CONTROL_TABLERow = CType(Me.NewRow,TBPM_CONTROL_TABLERow)
Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, REGEX_MATCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE, SEQUENCE, DEFAULT_VALUE, ADVANCED_LOOKUP, SUMMARY_FUNCTION, TYPE_COLUMN, LU_CAPTION} Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, REGEX_MATCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE, SEQUENCE, DEFAULT_VALUE, ADVANCED_LOOKUP, SUMMARY_FUNCTION, TYPE_COLUMN, LU_CAPTION, INHERIT_VALUE, FORMULA_EXPRESSION}
If (Not (parentTBPM_PROFILE_CONTROLSRowByFK_TBPM_CONTROL_TABLE_CONTROL1) Is Nothing) Then If (Not (parentTBPM_PROFILE_CONTROLSRowByFK_TBPM_CONTROL_TABLE_CONTROL1) Is Nothing) Then
columnValuesArray(1) = parentTBPM_PROFILE_CONTROLSRowByFK_TBPM_CONTROL_TABLE_CONTROL1(0) columnValuesArray(1) = parentTBPM_PROFILE_CONTROLSRowByFK_TBPM_CONTROL_TABLE_CONTROL1(0)
End If End If
@@ -5790,6 +5829,8 @@ Partial Public Class DD_DMSLiteDataSet
Me.columnSUMMARY_FUNCTION = MyBase.Columns("SUMMARY_FUNCTION") Me.columnSUMMARY_FUNCTION = MyBase.Columns("SUMMARY_FUNCTION")
Me.columnTYPE_COLUMN = MyBase.Columns("TYPE_COLUMN") Me.columnTYPE_COLUMN = MyBase.Columns("TYPE_COLUMN")
Me.columnLU_CAPTION = MyBase.Columns("LU_CAPTION") Me.columnLU_CAPTION = MyBase.Columns("LU_CAPTION")
Me.columnINHERIT_VALUE = MyBase.Columns("INHERIT_VALUE")
Me.columnFORMULA_EXPRESSION = MyBase.Columns("FORMULA_EXPRESSION")
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -5843,6 +5884,10 @@ Partial Public Class DD_DMSLiteDataSet
MyBase.Columns.Add(Me.columnTYPE_COLUMN) MyBase.Columns.Add(Me.columnTYPE_COLUMN)
Me.columnLU_CAPTION = New Global.System.Data.DataColumn("LU_CAPTION", GetType(String), Nothing, Global.System.Data.MappingType.Element) Me.columnLU_CAPTION = New Global.System.Data.DataColumn("LU_CAPTION", GetType(String), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnLU_CAPTION) MyBase.Columns.Add(Me.columnLU_CAPTION)
Me.columnINHERIT_VALUE = New Global.System.Data.DataColumn("INHERIT_VALUE", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnINHERIT_VALUE)
Me.columnFORMULA_EXPRESSION = New Global.System.Data.DataColumn("FORMULA_EXPRESSION", GetType(String), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnFORMULA_EXPRESSION)
Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, true)) Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, true))
Me.columnGUID.AutoIncrement = true Me.columnGUID.AutoIncrement = true
Me.columnGUID.AllowDBNull = false Me.columnGUID.AllowDBNull = false
@@ -5883,6 +5928,10 @@ Partial Public Class DD_DMSLiteDataSet
Me.columnLU_CAPTION.AllowDBNull = false Me.columnLU_CAPTION.AllowDBNull = false
Me.columnLU_CAPTION.DefaultValue = CType("",String) Me.columnLU_CAPTION.DefaultValue = CType("",String)
Me.columnLU_CAPTION.MaxLength = 150 Me.columnLU_CAPTION.MaxLength = 150
Me.columnINHERIT_VALUE.AllowDBNull = false
Me.columnINHERIT_VALUE.DefaultValue = CType(false,Boolean)
Me.columnFORMULA_EXPRESSION.AllowDBNull = false
Me.columnFORMULA_EXPRESSION.MaxLength = 1000
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -12546,7 +12595,11 @@ Partial Public Class DD_DMSLiteDataSet
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property FORMAT_STRING() As String Public Property FORMAT_STRING() As String
Get Get
Try
Return CType(Me(Me.tableTBPM_PROFILE_CONTROLS.FORMAT_STRINGColumn),String) Return CType(Me(Me.tableTBPM_PROFILE_CONTROLS.FORMAT_STRINGColumn),String)
Catch e As Global.System.InvalidCastException
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte FORMAT_STRING in Tabelle TBPM_PROFILE_CONTROLS ist DBNull.", e)
End Try
End Get End Get
Set Set
Me(Me.tableTBPM_PROFILE_CONTROLS.FORMAT_STRINGColumn) = value Me(Me.tableTBPM_PROFILE_CONTROLS.FORMAT_STRINGColumn) = value
@@ -12568,6 +12621,17 @@ Partial Public Class DD_DMSLiteDataSet
End Set End Set
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property TEXT_ALIGNMENT() As String
Get
Return CType(Me(Me.tableTBPM_PROFILE_CONTROLS.TEXT_ALIGNMENTColumn),String)
End Get
Set
Me(Me.tableTBPM_PROFILE_CONTROLS.TEXT_ALIGNMENTColumn) = value
End Set
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property TBPM_PROFILERow() As TBPM_PROFILERow Public Property TBPM_PROFILERow() As TBPM_PROFILERow
@@ -12807,6 +12871,18 @@ Partial Public Class DD_DMSLiteDataSet
Me(Me.tableTBPM_PROFILE_CONTROLS.SQL_ENABLE_ON_LOAD_CONIDColumn) = Global.System.Convert.DBNull Me(Me.tableTBPM_PROFILE_CONTROLS.SQL_ENABLE_ON_LOAD_CONIDColumn) = Global.System.Convert.DBNull
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function IsFORMAT_STRINGNull() As Boolean
Return Me.IsNull(Me.tableTBPM_PROFILE_CONTROLS.FORMAT_STRINGColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Sub SetFORMAT_STRINGNull()
Me(Me.tableTBPM_PROFILE_CONTROLS.FORMAT_STRINGColumn) = Global.System.Convert.DBNull
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Function IsBACKCOLOR_IFNull() As Boolean Public Function IsBACKCOLOR_IFNull() As Boolean
@@ -13129,6 +13205,28 @@ Partial Public Class DD_DMSLiteDataSet
End Set End Set
End Property End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property INHERIT_VALUE() As Boolean
Get
Return CType(Me(Me.tableTBPM_CONTROL_TABLE.INHERIT_VALUEColumn),Boolean)
End Get
Set
Me(Me.tableTBPM_CONTROL_TABLE.INHERIT_VALUEColumn) = value
End Set
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property FORMULA_EXPRESSION() As String
Get
Return CType(Me(Me.tableTBPM_CONTROL_TABLE.FORMULA_EXPRESSIONColumn),String)
End Get
Set
Me(Me.tableTBPM_CONTROL_TABLE.FORMULA_EXPRESSIONColumn) = value
End Set
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Public Property TBPM_PROFILE_CONTROLSRow() As TBPM_PROFILE_CONTROLSRow Public Property TBPM_PROFILE_CONTROLSRow() As TBPM_PROFILE_CONTROLSRow
@@ -16518,7 +16616,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -17054,7 +17152,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -17609,7 +17707,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -18114,7 +18212,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -18516,7 +18614,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -18937,7 +19035,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -19414,7 +19512,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -19707,7 +19805,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -20072,7 +20170,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -20284,6 +20382,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
tableMapping.ColumnMappings.Add("TABLE_ORDER_COLUMN", "TABLE_ORDER_COLUMN") tableMapping.ColumnMappings.Add("TABLE_ORDER_COLUMN", "TABLE_ORDER_COLUMN")
tableMapping.ColumnMappings.Add("SAVE_CHANGE_ON_ENABLED", "SAVE_CHANGE_ON_ENABLED") tableMapping.ColumnMappings.Add("SAVE_CHANGE_ON_ENABLED", "SAVE_CHANGE_ON_ENABLED")
tableMapping.ColumnMappings.Add("FORMAT_STRING", "FORMAT_STRING") tableMapping.ColumnMappings.Add("FORMAT_STRING", "FORMAT_STRING")
tableMapping.ColumnMappings.Add("TEXT_ALIGNMENT", "TEXT_ALIGNMENT")
Me._adapter.TableMappings.Add(tableMapping) Me._adapter.TableMappings.Add(tableMapping)
Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand() Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.DeleteCommand.Connection = Me.Connection Me._adapter.DeleteCommand.Connection = Me.Connection
@@ -20298,19 +20397,19 @@ Namespace DD_DMSLiteDataSetTableAdapters
"T_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VK"& _ "T_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VK"& _
"T_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" REGEX_MESSAGE"& _ "T_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" REGEX_MESSAGE"& _
"_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL2, SQL_ENABLE, SAVE_CHANGE_ON_ENABLED, "& _ "_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL2, SQL_ENABLE, SAVE_CHANGE_ON_ENABLED, "& _
"FORMAT_STRING)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@PROFIL_ID,@NAME,@CTRL_TYPE,@CTRL_TEXT,@X_LOC,@Y_"& _ "FORMAT_STRING, TEXT_ALIGNMENT)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@PROFIL_ID,@NAME,@CTRL_TYPE,@CTRL"& _
"LOC,@ADDED_WHO,@ADDED_WHEN,@CHANGED_WHO,@CHANGED_WHEN,@INDEX_NAME,@TYP,@VALIDATI"& _ "_TEXT,@X_LOC,@Y_LOC,@ADDED_WHO,@ADDED_WHEN,@CHANGED_WHO,@CHANGED_WHEN,@INDEX_NAM"& _
"ON,@CHOICE_LIST,@CONNECTION_ID,@SQL_UEBERPRUEFUNG,@HEIGHT,@WIDTH,@FONT_STYLE,@FO"& _ "E,@TYP,@VALIDATION,@CHOICE_LIST,@CONNECTION_ID,@SQL_UEBERPRUEFUNG,@HEIGHT,@WIDTH"& _
"NT_SIZE,@FONT_FAMILY,@FONT_COLOR,@READ_ONLY,@LOAD_IDX_VALUE,@DEFAULT_VALUE,@MULT"& _ ",@FONT_STYLE,@FONT_SIZE,@FONT_FAMILY,@FONT_COLOR,@READ_ONLY,@LOAD_IDX_VALUE,@DEF"& _
"ISELECT,@VKT_ADD_ITEM,@VKT_PREVENT_MULTIPLE_VALUES,@REGEX_MATCH,@REGEX_MESSAGE_D"& _ "AULT_VALUE,@MULTISELECT,@VKT_ADD_ITEM,@VKT_PREVENT_MULTIPLE_VALUES,@REGEX_MATCH,"& _
"E,@REGEX_MESSAGE_EN,@IMAGE_CONTROL,@SQL2,@SQL_ENABLE,@SAVE_CHANGE_ON_ENABLED,@FO"& _ "@REGEX_MESSAGE_DE,@REGEX_MESSAGE_EN,@IMAGE_CONTROL,@SQL2,@SQL_ENABLE,@SAVE_CHANG"& _
"RMAT_STRING); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y"& _ "E_ON_ENABLED,@FORMAT_STRING,@TEXT_ALIGNMENT); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, PROFIL_ID, NAM"& _
"_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDAT"& _ "E, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANG"& _
"ION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, F"& _ "ED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEF"& _
"ONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MUL"& _ "UNG, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, L"& _
"TISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, REGEX_MESSAGE_"& _ "OAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VA"& _
"DE, REGEX_MESSAGE_EN FROM TBPM_PROFILE_CONTROLS WHERE (GUID = SCOPE_IDENTITY()) "& _ "LUES, REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN FROM TBPM_PROFILE_CONTROLS"& _
"ORDER BY Y_LOC, X_LOC" " WHERE (GUID = SCOPE_IDENTITY()) ORDER BY Y_LOC, X_LOC"
Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROFIL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFIL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROFIL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFIL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -20348,6 +20447,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_ENABLE", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_ENABLE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_ENABLE", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_ENABLE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SAVE_CHANGE_ON_ENABLED", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "SAVE_CHANGE_ON_ENABLED", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SAVE_CHANGE_ON_ENABLED", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "SAVE_CHANGE_ON_ENABLED", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FORMAT_STRING", Global.System.Data.SqlDbType.VarChar, 200, Global.System.Data.ParameterDirection.Input, 0, 0, "FORMAT_STRING", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FORMAT_STRING", Global.System.Data.SqlDbType.VarChar, 200, Global.System.Data.ParameterDirection.Input, 0, 0, "FORMAT_STRING", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TEXT_ALIGNMENT", Global.System.Data.SqlDbType.NVarChar, 20, Global.System.Data.ParameterDirection.Input, 0, 0, "TEXT_ALIGNMENT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand() Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.UpdateCommand.Connection = Me.Connection Me._adapter.UpdateCommand.Connection = Me.Connection
Me._adapter.UpdateCommand.CommandText = "UPDATE TBPM_PROFILE_CONTROLS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET PROFIL_ID = @PROFIL_ID, NA"& _ Me._adapter.UpdateCommand.CommandText = "UPDATE TBPM_PROFILE_CONTROLS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET PROFIL_ID = @PROFIL_ID, NA"& _
@@ -20363,14 +20463,14 @@ Namespace DD_DMSLiteDataSetTableAdapters
"CH = @REGEX_MATCH, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" REGEX_MESSAGE_DE = @REGEX_MESSAGE_"& _ "CH = @REGEX_MATCH, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" REGEX_MESSAGE_DE = @REGEX_MESSAGE_"& _
"DE, REGEX_MESSAGE_EN = @REGEX_MESSAGE_EN, IMAGE_CONTROL = @IMAGE_CONTROL, SQL2 ="& _ "DE, REGEX_MESSAGE_EN = @REGEX_MESSAGE_EN, IMAGE_CONTROL = @IMAGE_CONTROL, SQL2 ="& _
" @SQL2, SQL_ENABLE = @SQL_ENABLE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" SAVE_CHANGE_ON_ENAB"& _ " @SQL2, SQL_ENABLE = @SQL_ENABLE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" SAVE_CHANGE_ON_ENAB"& _
"LED = @SAVE_CHANGE_ON_ENABLED, FORMAT_STRING = @FORMAT_STRING"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUI"& _ "LED = @SAVE_CHANGE_ON_ENABLED, FORMAT_STRING = @FORMAT_STRING, TEXT_ALIGNMENT = "& _
"D = @Original_GUID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_"& _ "@TEXT_ALIGNMENT"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, PROFIL"& _
"LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, V"& _ "_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WH"& _
"ALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_ST"& _ "O, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UE"& _
"YLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALU"& _ "BERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ"& _
"E, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, REGEX_ME"& _ "_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MUL"& _
"SSAGE_DE, REGEX_MESSAGE_EN FROM TBPM_PROFILE_CONTROLS WHERE (GUID = @GUID) ORDER"& _ "TIPLE_VALUES, REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN FROM TBPM_PROFILE_"& _
" BY Y_LOC, X_LOC" "CONTROLS WHERE (GUID = @GUID) ORDER BY Y_LOC, X_LOC"
Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROFIL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFIL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROFIL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFIL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -20405,6 +20505,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_ENABLE", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_ENABLE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_ENABLE", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_ENABLE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SAVE_CHANGE_ON_ENABLED", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "SAVE_CHANGE_ON_ENABLED", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SAVE_CHANGE_ON_ENABLED", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "SAVE_CHANGE_ON_ENABLED", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FORMAT_STRING", Global.System.Data.SqlDbType.VarChar, 200, Global.System.Data.ParameterDirection.Input, 0, 0, "FORMAT_STRING", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FORMAT_STRING", Global.System.Data.SqlDbType.VarChar, 200, Global.System.Data.ParameterDirection.Input, 0, 0, "FORMAT_STRING", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TEXT_ALIGNMENT", Global.System.Data.SqlDbType.NVarChar, 20, Global.System.Data.ParameterDirection.Input, 0, 0, "TEXT_ALIGNMENT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
End Sub End Sub
@@ -20413,7 +20514,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -20430,8 +20531,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
" REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL"& _ " REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL"& _
"2, SQL_ENABLE, SET_CONTROL_DATA, SQL_ENABLE_ON_LOAD, SQL_ENABLE_ON_LOAD_CONID, C"& _ "2, SQL_ENABLE, SET_CONTROL_DATA, SQL_ENABLE_ON_LOAD, SQL_ENABLE_ON_LOAD_CONID, C"& _
"ONTROL_ACTIVE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" TABLE_ORDER_COLUMN, SAVE_CHANGE_ON_ENA"& _ "ONTROL_ACTIVE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" TABLE_ORDER_COLUMN, SAVE_CHANGE_ON_ENA"& _
"BLED, FORMAT_STRING"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_PROFILE_CONTROLS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID ="& _ "BLED, FORMAT_STRING, TEXT_ALIGNMENT"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_PROFILE_CONTROLS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHER"& _
" @guid)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY Y_LOC, X_LOC" "E (GUID = @guid)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY Y_LOC, X_LOC"
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@guid", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@guid", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand() Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand()
@@ -20480,18 +20581,20 @@ Namespace DD_DMSLiteDataSetTableAdapters
Me._commandCollection(8) = New Global.System.Data.SqlClient.SqlCommand() Me._commandCollection(8) = New Global.System.Data.SqlClient.SqlCommand()
Me._commandCollection(8).Connection = Me.Connection Me._commandCollection(8).Connection = Me.Connection
Me._commandCollection(8).CommandText = "INSERT INTO TBPM_PROFILE_CONTROLS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (PROFIL_ID, NAME, CTR"& _ Me._commandCollection(8).CommandText = "INSERT INTO TBPM_PROFILE_CONTROLS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (PROFIL_ID, NAME, CTR"& _
"L_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, HEIGHT, WIDTH)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@PROF"& _ "L_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, HEIGHT, WIDTH, TEXT_ALIGNMENT)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALU"& _
"IL_ID,@NAME,@CTRL_TYPE,@CTRL_TEXT,@X_LOC,@Y_LOC,@ADDED_WHO,@HEIGHT,@Width)" "ES (@PROFIL_ID,@NAME,@CTRL_TYPE,@CTRL_TEXT,@X_LOC,@Y_LOC,@ADDED_WHO,@HEIG"& _
"HT,@Width,@TEXT_ALIGNMENT)"
Me._commandCollection(8).CommandType = Global.System.Data.CommandType.Text Me._commandCollection(8).CommandType = Global.System.Data.CommandType.Text
Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROFIL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFIL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROFIL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFIL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CTRL_TYPE", Global.System.Data.SqlDbType.VarChar, 10, Global.System.Data.ParameterDirection.Input, 0, 0, "CTRL_TYPE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CTRL_TYPE", Global.System.Data.SqlDbType.VarChar, 10, Global.System.Data.ParameterDirection.Input, 0, 0, "CTRL_TYPE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CTRL_TEXT", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CTRL_TEXT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CTRL_TEXT", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "CTRL_TEXT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@X_LOC", Global.System.Data.SqlDbType.Float, 8, Global.System.Data.ParameterDirection.Input, 0, 0, "X_LOC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@X_LOC", Global.System.Data.SqlDbType.Float, 8, Global.System.Data.ParameterDirection.Input, 0, 0, "X_LOC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Y_LOC", Global.System.Data.SqlDbType.Float, 8, Global.System.Data.ParameterDirection.Input, 0, 0, "Y_LOC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Y_LOC", Global.System.Data.SqlDbType.Float, 8, Global.System.Data.ParameterDirection.Input, 0, 0, "Y_LOC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 30, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 30, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@HEIGHT", Global.System.Data.SqlDbType.SmallInt, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "HEIGHT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@HEIGHT", Global.System.Data.SqlDbType.SmallInt, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "HEIGHT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Width", Global.System.Data.SqlDbType.SmallInt, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "WIDTH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Width", Global.System.Data.SqlDbType.SmallInt, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "WIDTH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TEXT_ALIGNMENT", Global.System.Data.SqlDbType.NVarChar, 20, Global.System.Data.ParameterDirection.Input, 0, 0, "TEXT_ALIGNMENT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(9) = New Global.System.Data.SqlClient.SqlCommand() Me._commandCollection(9) = New Global.System.Data.SqlClient.SqlCommand()
Me._commandCollection(9).Connection = Me.Connection Me._commandCollection(9).Connection = Me.Connection
Me._commandCollection(9).CommandText = "UPDATE TBPM_PROFILE_CONTROLS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET INDEX_NAME = @INDEX_NAME,CH"& _ Me._commandCollection(9).CommandText = "UPDATE TBPM_PROFILE_CONTROLS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET INDEX_NAME = @INDEX_NAME,CH"& _
@@ -20511,8 +20614,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
"P, VALIDATION, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, WIDTH, X_LOC, Y_LOC, I"& _ "P, VALIDATION, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, WIDTH, X_LOC, Y_LOC, I"& _
"MAGE_CONTROL, SQL2, SQL_ENABLE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" SET_CONTROL_DATA, SQL"& _ "MAGE_CONTROL, SQL2, SQL_ENABLE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" SET_CONTROL_DATA, SQL"& _
"_ENABLE_ON_LOAD, SQL_ENABLE_ON_LOAD_CONID, CONTROL_ACTIVE, TABLE_ORDER_COLUMN, S"& _ "_ENABLE_ON_LOAD, SQL_ENABLE_ON_LOAD_CONID, CONTROL_ACTIVE, TABLE_ORDER_COLUMN, S"& _
"AVE_CHANGE_ON_ENABLED, FORMAT_STRING"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_PROFILE_CONTROLS AS T"& _ "AVE_CHANGE_ON_ENABLED, FORMAT_STRING, TEXT_ALIGNMENT"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_PROFI"& _
""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (PROFIL_ID = @profil_id)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY Y_LOC, X_LOC" "LE_CONTROLS AS T"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (PROFIL_ID = @profil_id)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY Y_LOC, X_LOC"
Me._commandCollection(10).CommandType = Global.System.Data.CommandType.Text Me._commandCollection(10).CommandType = Global.System.Data.CommandType.Text
Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@USER_LANGUAGE", Global.System.Data.SqlDbType.VarChar, 1024, Global.System.Data.ParameterDirection.Input, 0, 0, "", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@USER_LANGUAGE", Global.System.Data.SqlDbType.VarChar, 1024, Global.System.Data.ParameterDirection.Input, 0, 0, "", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@profil_id", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFIL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@profil_id", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFIL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -20669,7 +20772,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
ByVal SQL2 As String, _ ByVal SQL2 As String, _
ByVal SQL_ENABLE As String, _ ByVal SQL_ENABLE As String, _
ByVal SAVE_CHANGE_ON_ENABLED As Boolean, _ ByVal SAVE_CHANGE_ON_ENABLED As Boolean, _
ByVal FORMAT_STRING As String) As Integer ByVal FORMAT_STRING As String, _
ByVal TEXT_ALIGNMENT As String) As Integer
Me.Adapter.InsertCommand.Parameters(0).Value = CType(PROFIL_ID,Integer) Me.Adapter.InsertCommand.Parameters(0).Value = CType(PROFIL_ID,Integer)
If (NAME Is Nothing) Then If (NAME Is Nothing) Then
Throw New Global.System.ArgumentNullException("NAME") Throw New Global.System.ArgumentNullException("NAME")
@@ -20794,10 +20898,15 @@ Namespace DD_DMSLiteDataSetTableAdapters
End If End If
Me.Adapter.InsertCommand.Parameters(34).Value = CType(SAVE_CHANGE_ON_ENABLED,Boolean) Me.Adapter.InsertCommand.Parameters(34).Value = CType(SAVE_CHANGE_ON_ENABLED,Boolean)
If (FORMAT_STRING Is Nothing) Then If (FORMAT_STRING Is Nothing) Then
Throw New Global.System.ArgumentNullException("FORMAT_STRING") Me.Adapter.InsertCommand.Parameters(35).Value = Global.System.DBNull.Value
Else Else
Me.Adapter.InsertCommand.Parameters(35).Value = CType(FORMAT_STRING,String) Me.Adapter.InsertCommand.Parameters(35).Value = CType(FORMAT_STRING,String)
End If End If
If (TEXT_ALIGNMENT Is Nothing) Then
Throw New Global.System.ArgumentNullException("TEXT_ALIGNMENT")
Else
Me.Adapter.InsertCommand.Parameters(36).Value = CType(TEXT_ALIGNMENT,String)
End If
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _ If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
<> Global.System.Data.ConnectionState.Open) Then <> Global.System.Data.ConnectionState.Open) Then
@@ -20851,6 +20960,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
ByVal SQL_ENABLE As String, _ ByVal SQL_ENABLE As String, _
ByVal SAVE_CHANGE_ON_ENABLED As Boolean, _ ByVal SAVE_CHANGE_ON_ENABLED As Boolean, _
ByVal FORMAT_STRING As String, _ ByVal FORMAT_STRING As String, _
ByVal TEXT_ALIGNMENT As String, _
ByVal Original_GUID As Integer, _ ByVal Original_GUID As Integer, _
ByVal GUID As Integer) As Integer ByVal GUID As Integer) As Integer
Me.Adapter.UpdateCommand.Parameters(0).Value = CType(PROFIL_ID,Integer) Me.Adapter.UpdateCommand.Parameters(0).Value = CType(PROFIL_ID,Integer)
@@ -20966,12 +21076,17 @@ Namespace DD_DMSLiteDataSetTableAdapters
End If End If
Me.Adapter.UpdateCommand.Parameters(31).Value = CType(SAVE_CHANGE_ON_ENABLED,Boolean) Me.Adapter.UpdateCommand.Parameters(31).Value = CType(SAVE_CHANGE_ON_ENABLED,Boolean)
If (FORMAT_STRING Is Nothing) Then If (FORMAT_STRING Is Nothing) Then
Throw New Global.System.ArgumentNullException("FORMAT_STRING") Me.Adapter.UpdateCommand.Parameters(32).Value = Global.System.DBNull.Value
Else Else
Me.Adapter.UpdateCommand.Parameters(32).Value = CType(FORMAT_STRING,String) Me.Adapter.UpdateCommand.Parameters(32).Value = CType(FORMAT_STRING,String)
End If End If
Me.Adapter.UpdateCommand.Parameters(33).Value = CType(Original_GUID,Integer) If (TEXT_ALIGNMENT Is Nothing) Then
Me.Adapter.UpdateCommand.Parameters(34).Value = CType(GUID,Integer) Throw New Global.System.ArgumentNullException("TEXT_ALIGNMENT")
Else
Me.Adapter.UpdateCommand.Parameters(33).Value = CType(TEXT_ALIGNMENT,String)
End If
Me.Adapter.UpdateCommand.Parameters(34).Value = CType(Original_GUID,Integer)
Me.Adapter.UpdateCommand.Parameters(35).Value = CType(GUID,Integer)
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _ If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
<> Global.System.Data.ConnectionState.Open) Then <> Global.System.Data.ConnectionState.Open) Then
@@ -21184,9 +21299,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _ Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, false)> _ Public Overloads Overridable Function cmdInsertAnlage(ByVal PROFIL_ID As Integer, ByVal NAME As String, ByVal CTRL_TYPE As String, ByVal CTRL_TEXT As String, ByVal X_LOC As Double, ByVal Y_LOC As Double, ByVal ADDED_WHO As String, ByVal HEIGHT As Short, ByVal Width As Short, ByVal TEXT_ALIGNMENT As String) As Integer
Public Overloads Overridable Function cmdInsertAnlage(ByVal PROFIL_ID As Integer, ByVal NAME As String, ByVal CTRL_TYPE As String, ByVal CTRL_TEXT As String, ByVal X_LOC As Double, ByVal Y_LOC As Double, ByVal ADDED_WHO As String, ByVal HEIGHT As Short, ByVal Width As Short) As Integer
Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(8) Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(8)
command.Parameters(0).Value = CType(PROFIL_ID,Integer) command.Parameters(0).Value = CType(PROFIL_ID,Integer)
If (NAME Is Nothing) Then If (NAME Is Nothing) Then
@@ -21213,6 +21327,11 @@ Namespace DD_DMSLiteDataSetTableAdapters
End If End If
command.Parameters(7).Value = CType(HEIGHT,Short) command.Parameters(7).Value = CType(HEIGHT,Short)
command.Parameters(8).Value = CType(Width,Short) command.Parameters(8).Value = CType(Width,Short)
If (TEXT_ALIGNMENT Is Nothing) Then
Throw New Global.System.ArgumentNullException("TEXT_ALIGNMENT")
Else
command.Parameters(9).Value = CType(TEXT_ALIGNMENT,String)
End If
Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
If ((command.Connection.State And Global.System.Data.ConnectionState.Open) _ If ((command.Connection.State And Global.System.Data.ConnectionState.Open) _
<> Global.System.Data.ConnectionState.Open) Then <> Global.System.Data.ConnectionState.Open) Then
@@ -21414,6 +21533,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
tableMapping.ColumnMappings.Add("SUMMARY_FUNCTION", "SUMMARY_FUNCTION") tableMapping.ColumnMappings.Add("SUMMARY_FUNCTION", "SUMMARY_FUNCTION")
tableMapping.ColumnMappings.Add("TYPE_COLUMN", "TYPE_COLUMN") tableMapping.ColumnMappings.Add("TYPE_COLUMN", "TYPE_COLUMN")
tableMapping.ColumnMappings.Add("LU_CAPTION", "LU_CAPTION") tableMapping.ColumnMappings.Add("LU_CAPTION", "LU_CAPTION")
tableMapping.ColumnMappings.Add("INHERIT_VALUE", "INHERIT_VALUE")
tableMapping.ColumnMappings.Add("FORMULA_EXPRESSION", "FORMULA_EXPRESSION")
Me._adapter.TableMappings.Add(tableMapping) Me._adapter.TableMappings.Add(tableMapping)
Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand() Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.DeleteCommand.Connection = Me.Connection Me._adapter.DeleteCommand.Connection = Me.Connection
@@ -21423,13 +21544,13 @@ Namespace DD_DMSLiteDataSetTableAdapters
Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand() Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.InsertCommand.Connection = Me.Connection Me._adapter.InsertCommand.Connection = Me.Connection
Me._adapter.InsertCommand.CommandText = "INSERT INTO TBPM_CONTROL_TABLE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (CONTROL_ID, SPALTENNAME"& _ Me._adapter.InsertCommand.CommandText = "INSERT INTO TBPM_CONTROL_TABLE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (CONTROL_ID, SPALTENNAME"& _
", SPALTEN_HEADER, SPALTENBREITE, ADDED_WHO, TYPE_COLUMN)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@CONTRO"& _ ", SPALTEN_HEADER, SPALTENBREITE, ADDED_WHO, TYPE_COLUMN, INHERIT_VALUE)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES "& _
"L_ID,@SPALTENNAME,@SPALTEN_HEADER,@SPALTENBREITE,@ADDED_WHO,@TYPE_COLUMN); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)& _ " (@CONTROL_ID,@SPALTENNAME,@SPALTEN_HEADER,@SPALTENBREITE,@ADDED_WHO,@TYPE"& _
"SELECT GUID, CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION,"& _ "_COLUMN,@INHERIT_VALUE); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, CONTROL_ID, SPALTENNAME, SPALTEN_HE"& _
" CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED_WHO, "& _ "ADER, SPALTENBREITE, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_O"& _
"ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, REGEX_MATCH, REGEX_MESSAGE_EN, REGEX_MESS"& _ "NLY, LOAD_IDX_VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, REGEX_MAT"& _
"AGE_DE, SEQUENCE, DEFAULT_VALUE, ADVANCED_LOOKUP FROM TBPM_CONTROL_TABLE WHERE ("& _ "CH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE, SEQUENCE, DEFAULT_VALUE, ADVANCED_LOOKUP"& _
"GUID = SCOPE_IDENTITY())" " FROM TBPM_CONTROL_TABLE WHERE (GUID = SCOPE_IDENTITY())"
Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONTROL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "CONTROL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONTROL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "CONTROL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTENNAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTENNAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTENNAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTENNAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -21437,6 +21558,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTENBREITE", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTENBREITE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTENBREITE", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTENBREITE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 30, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 30, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TYPE_COLUMN", Global.System.Data.SqlDbType.VarChar, 20, Global.System.Data.ParameterDirection.Input, 0, 0, "TYPE_COLUMN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TYPE_COLUMN", Global.System.Data.SqlDbType.VarChar, 20, Global.System.Data.ParameterDirection.Input, 0, 0, "TYPE_COLUMN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@INHERIT_VALUE", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "INHERIT_VALUE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand() Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.UpdateCommand.Connection = Me.Connection Me._adapter.UpdateCommand.Connection = Me.Connection
Me._adapter.UpdateCommand.CommandText = "UPDATE TBPM_CONTROL_TABLE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET CONTROL_ID = @CONTROL_ID, SPA"& _ Me._adapter.UpdateCommand.CommandText = "UPDATE TBPM_CONTROL_TABLE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET CONTROL_ID = @CONTROL_ID, SPA"& _
@@ -21448,12 +21570,14 @@ Namespace DD_DMSLiteDataSetTableAdapters
"ED_WHEN = @CHANGED_WHEN, REGEX_MATCH = @REGEX_MATCH, REGEX_MESSAGE_EN = @REGEX_M"& _ "ED_WHEN = @CHANGED_WHEN, REGEX_MATCH = @REGEX_MATCH, REGEX_MESSAGE_EN = @REGEX_M"& _
"ESSAGE_EN, REGEX_MESSAGE_DE = @REGEX_MESSAGE_DE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" SEQU"& _ "ESSAGE_EN, REGEX_MESSAGE_DE = @REGEX_MESSAGE_DE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" SEQU"& _
"ENCE = @SEQUENCE, DEFAULT_VALUE = @DEFAULT_VALUE, ADVANCED_LOOKUP = @ADVANCED_LO"& _ "ENCE = @SEQUENCE, DEFAULT_VALUE = @DEFAULT_VALUE, ADVANCED_LOOKUP = @ADVANCED_LO"& _
"OKUP, SAVE_CHANGE_ON_ENABLED = @SAVE_CHANGE_ON_ENABLED"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Or"& _ "OKUP, SAVE_CHANGE_ON_ENABLED = @SAVE_CHANGE_ON_ENABLED, INHERIT_VALUE = @INHERIT"& _
"iginal_GUID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBR"& _ "_VALUE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" LU_CAPTION = @LU_CAPTION, FORMULA_EXPRESSION "& _
"EITE, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_V"& _ "= @FORMULA_EXPRESSION"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, "& _
"ALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, REGEX_MATCH, REGEX_MESSA"& _ "CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION, CHOICE_LIST,"& _
"GE_EN, REGEX_MESSAGE_DE, SEQUENCE, DEFAULT_VALUE, ADVANCED_LOOKUP FROM TBPM_CONT"& _ " CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED_WHO, ADDED_WHEN, C"& _
"ROL_TABLE WHERE (GUID = @GUID)" "HANGED_WHO, CHANGED_WHEN, REGEX_MATCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE, SEQUE"& _
"NCE, DEFAULT_VALUE, ADVANCED_LOOKUP FROM TBPM_CONTROL_TABLE WHERE (GUID = @GUID)"& _
""
Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONTROL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "CONTROL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONTROL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "CONTROL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTENNAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTENNAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTENNAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTENNAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -21476,6 +21600,9 @@ Namespace DD_DMSLiteDataSetTableAdapters
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DEFAULT_VALUE", Global.System.Data.SqlDbType.VarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "DEFAULT_VALUE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DEFAULT_VALUE", Global.System.Data.SqlDbType.VarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "DEFAULT_VALUE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADVANCED_LOOKUP", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ADVANCED_LOOKUP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADVANCED_LOOKUP", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ADVANCED_LOOKUP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SAVE_CHANGE_ON_ENABLED", Global.System.Data.SqlDbType.[Variant], 1024, Global.System.Data.ParameterDirection.Input, 0, 0, "SAVE_CHANGE_ON_ENABLED", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SAVE_CHANGE_ON_ENABLED", Global.System.Data.SqlDbType.[Variant], 1024, Global.System.Data.ParameterDirection.Input, 0, 0, "SAVE_CHANGE_ON_ENABLED", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@INHERIT_VALUE", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "INHERIT_VALUE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LU_CAPTION", Global.System.Data.SqlDbType.VarChar, 150, Global.System.Data.ParameterDirection.Input, 0, 0, "LU_CAPTION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FORMULA_EXPRESSION", Global.System.Data.SqlDbType.NVarChar, 1000, Global.System.Data.ParameterDirection.Input, 0, 0, "FORMULA_EXPRESSION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", "")) Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
End Sub End Sub
@@ -21484,7 +21611,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -21497,8 +21624,9 @@ Namespace DD_DMSLiteDataSetTableAdapters
"ATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED"& _ "ATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED"& _
"_WHO, ADDED_WHEN, CHANGED_WHO, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" CHANGED_WHEN, REGEX_MA"& _ "_WHO, ADDED_WHEN, CHANGED_WHO, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" CHANGED_WHEN, REGEX_MA"& _
"TCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE, SEQUENCE, DEFAULT_VALUE, ADVANCED_LOOKU"& _ "TCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE, SEQUENCE, DEFAULT_VALUE, ADVANCED_LOOKU"& _
"P, SUMMARY_FUNCTION, TYPE_COLUMN, LU_CAPTION"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_CONTROL_TABLE"& _ "P, SUMMARY_FUNCTION, TYPE_COLUMN, LU_CAPTION, INHERIT_VALUE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (CONTROL_ID = @CONTROL_ID)" " FORMULA_EXPRESSION"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_CONTROL_TABLE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (CO"& _
"NTROL_ID = @CONTROL_ID)"
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONTROL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "CONTROL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONTROL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "CONTROL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand() Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand()
@@ -21510,7 +21638,9 @@ Namespace DD_DMSLiteDataSetTableAdapters
"SSAGE_EN = @REGEX_MESSAGE_EN, REGEX_MESSAGE_DE = @REGEX_MESSAGE_DE, DEFAULT_VALU"& _ "SSAGE_EN = @REGEX_MESSAGE_EN, REGEX_MESSAGE_DE = @REGEX_MESSAGE_DE, DEFAULT_VALU"& _
"E = @DEFAULT_VALUE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" SEQUENCE = @SEQUENCE, ADVANCED_LO"& _ "E = @DEFAULT_VALUE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" SEQUENCE = @SEQUENCE, ADVANCED_LO"& _
"OKUP = @ADVANCED_LOOKUP, SUMMARY_FUNCTION = @SUMMARY_FUNCTION, TYPE_COLUMN = @TY"& _ "OKUP = @ADVANCED_LOOKUP, SUMMARY_FUNCTION = @SUMMARY_FUNCTION, TYPE_COLUMN = @TY"& _
"PE_COLUMN, LU_CAPTION = @LU_CAPTION"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID)" "PE_COLUMN, LU_CAPTION = @LU_CAPTION, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" INHERIT_VALUE = "& _
"@INHERIT_VALUE, FORMULA_EXPRESSION = @FORMULA_EXPRESSION"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @"& _
"Original_GUID)"
Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTENNAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTENNAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTENNAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTENNAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTEN_HEADER", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTEN_HEADER", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTEN_HEADER", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTEN_HEADER", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -21528,6 +21658,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SUMMARY_FUNCTION", Global.System.Data.SqlDbType.VarChar, 20, Global.System.Data.ParameterDirection.Input, 0, 0, "SUMMARY_FUNCTION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SUMMARY_FUNCTION", Global.System.Data.SqlDbType.VarChar, 20, Global.System.Data.ParameterDirection.Input, 0, 0, "SUMMARY_FUNCTION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TYPE_COLUMN", Global.System.Data.SqlDbType.VarChar, 20, Global.System.Data.ParameterDirection.Input, 0, 0, "TYPE_COLUMN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TYPE_COLUMN", Global.System.Data.SqlDbType.VarChar, 20, Global.System.Data.ParameterDirection.Input, 0, 0, "TYPE_COLUMN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LU_CAPTION", Global.System.Data.SqlDbType.VarChar, 150, Global.System.Data.ParameterDirection.Input, 0, 0, "LU_CAPTION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LU_CAPTION", Global.System.Data.SqlDbType.VarChar, 150, Global.System.Data.ParameterDirection.Input, 0, 0, "LU_CAPTION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@INHERIT_VALUE", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "INHERIT_VALUE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FORMULA_EXPRESSION", Global.System.Data.SqlDbType.NVarChar, 1000, Global.System.Data.ParameterDirection.Input, 0, 0, "FORMULA_EXPRESSION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", "")) Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand() Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand()
Me._commandCollection(2).Connection = Me.Connection Me._commandCollection(2).Connection = Me.Connection
@@ -21540,8 +21672,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
"CHOICE_LIST, CONNECTION_ID, CONTROL_ID, DEFAULT_VALUE, GUID, LOAD_IDX_VALUE, REA"& _ "CHOICE_LIST, CONNECTION_ID, CONTROL_ID, DEFAULT_VALUE, GUID, LOAD_IDX_VALUE, REA"& _
"D_ONLY, REGEX_MATCH, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" REGEX_MESSAGE_DE, REGEX_MESSAGE_"& _ "D_ONLY, REGEX_MATCH, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" REGEX_MESSAGE_DE, REGEX_MESSAGE_"& _
"EN, SEQUENCE, SPALTENBREITE, SPALTENNAME, SPALTEN_HEADER, SQL_COMMAND, VALIDATIO"& _ "EN, SEQUENCE, SPALTENBREITE, SPALTENNAME, SPALTEN_HEADER, SQL_COMMAND, VALIDATIO"& _
"N, SUMMARY_FUNCTION, TYPE_COLUMN, LU_CAPTION"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_CONTROL_TABLE"& _ "N, SUMMARY_FUNCTION, TYPE_COLUMN, LU_CAPTION, INHERIT_VALUE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
"" " FORMULA_EXPRESSION"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_CONTROL_TABLE"
Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
Me._commandCollection(4) = New Global.System.Data.SqlClient.SqlCommand() Me._commandCollection(4) = New Global.System.Data.SqlClient.SqlCommand()
Me._commandCollection(4).Connection = Me.Connection Me._commandCollection(4).Connection = Me.Connection
@@ -21549,8 +21681,9 @@ Namespace DD_DMSLiteDataSetTableAdapters
"CHOICE_LIST, CONNECTION_ID, CONTROL_ID, DEFAULT_VALUE, GUID, LOAD_IDX_VALUE, REA"& _ "CHOICE_LIST, CONNECTION_ID, CONTROL_ID, DEFAULT_VALUE, GUID, LOAD_IDX_VALUE, REA"& _
"D_ONLY, REGEX_MATCH, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" REGEX_MESSAGE_DE, REGEX_MESSAGE_"& _ "D_ONLY, REGEX_MATCH, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" REGEX_MESSAGE_DE, REGEX_MESSAGE_"& _
"EN, SEQUENCE, SPALTENBREITE, SPALTENNAME, SPALTEN_HEADER, SQL_COMMAND, VALIDATIO"& _ "EN, SEQUENCE, SPALTENBREITE, SPALTENNAME, SPALTEN_HEADER, SQL_COMMAND, VALIDATIO"& _
"N, SUMMARY_FUNCTION, TYPE_COLUMN, LU_CAPTION"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_CONTROL_TABLE"& _ "N, SUMMARY_FUNCTION, TYPE_COLUMN, LU_CAPTION, INHERIT_VALUE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @GUID)" " FORMULA_EXPRESSION"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_CONTROL_TABLE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GU"& _
"ID = @GUID)"
Me._commandCollection(4).CommandType = Global.System.Data.CommandType.Text Me._commandCollection(4).CommandType = Global.System.Data.CommandType.Text
Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", "")) Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._commandCollection(5) = New Global.System.Data.SqlClient.SqlCommand() Me._commandCollection(5) = New Global.System.Data.SqlClient.SqlCommand()
@@ -21691,7 +21824,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _ Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _ Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
Public Overloads Overridable Function Insert(ByVal CONTROL_ID As Integer, ByVal SPALTENNAME As String, ByVal SPALTEN_HEADER As String, ByVal SPALTENBREITE As Integer, ByVal ADDED_WHO As String, ByVal TYPE_COLUMN As String) As Integer Public Overloads Overridable Function Insert(ByVal CONTROL_ID As Integer, ByVal SPALTENNAME As String, ByVal SPALTEN_HEADER As String, ByVal SPALTENBREITE As Integer, ByVal ADDED_WHO As String, ByVal TYPE_COLUMN As String, ByVal INHERIT_VALUE As Boolean) As Integer
Me.Adapter.InsertCommand.Parameters(0).Value = CType(CONTROL_ID,Integer) Me.Adapter.InsertCommand.Parameters(0).Value = CType(CONTROL_ID,Integer)
If (SPALTENNAME Is Nothing) Then If (SPALTENNAME Is Nothing) Then
Throw New Global.System.ArgumentNullException("SPALTENNAME") Throw New Global.System.ArgumentNullException("SPALTENNAME")
@@ -21714,6 +21847,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Else Else
Me.Adapter.InsertCommand.Parameters(5).Value = CType(TYPE_COLUMN,String) Me.Adapter.InsertCommand.Parameters(5).Value = CType(TYPE_COLUMN,String)
End If End If
Me.Adapter.InsertCommand.Parameters(6).Value = CType(INHERIT_VALUE,Boolean)
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _ If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
<> Global.System.Data.ConnectionState.Open) Then <> Global.System.Data.ConnectionState.Open) Then
@@ -21755,6 +21889,9 @@ Namespace DD_DMSLiteDataSetTableAdapters
ByVal DEFAULT_VALUE As String, _ ByVal DEFAULT_VALUE As String, _
ByVal ADVANCED_LOOKUP As Boolean, _ ByVal ADVANCED_LOOKUP As Boolean, _
ByVal SAVE_CHANGE_ON_ENABLED As Object, _ ByVal SAVE_CHANGE_ON_ENABLED As Object, _
ByVal INHERIT_VALUE As Boolean, _
ByVal LU_CAPTION As String, _
ByVal FORMULA_EXPRESSION As String, _
ByVal Original_GUID As Integer, _ ByVal Original_GUID As Integer, _
ByVal GUID As Integer) As Integer ByVal GUID As Integer) As Integer
Me.Adapter.UpdateCommand.Parameters(0).Value = CType(CONTROL_ID,Integer) Me.Adapter.UpdateCommand.Parameters(0).Value = CType(CONTROL_ID,Integer)
@@ -21830,8 +21967,19 @@ Namespace DD_DMSLiteDataSetTableAdapters
Else Else
Me.Adapter.UpdateCommand.Parameters(20).Value = CType(SAVE_CHANGE_ON_ENABLED,Object) Me.Adapter.UpdateCommand.Parameters(20).Value = CType(SAVE_CHANGE_ON_ENABLED,Object)
End If End If
Me.Adapter.UpdateCommand.Parameters(21).Value = CType(Original_GUID,Integer) Me.Adapter.UpdateCommand.Parameters(21).Value = CType(INHERIT_VALUE,Boolean)
Me.Adapter.UpdateCommand.Parameters(22).Value = CType(GUID,Integer) If (LU_CAPTION Is Nothing) Then
Throw New Global.System.ArgumentNullException("LU_CAPTION")
Else
Me.Adapter.UpdateCommand.Parameters(22).Value = CType(LU_CAPTION,String)
End If
If (FORMULA_EXPRESSION Is Nothing) Then
Throw New Global.System.ArgumentNullException("FORMULA_EXPRESSION")
Else
Me.Adapter.UpdateCommand.Parameters(23).Value = CType(FORMULA_EXPRESSION,String)
End If
Me.Adapter.UpdateCommand.Parameters(24).Value = CType(Original_GUID,Integer)
Me.Adapter.UpdateCommand.Parameters(25).Value = CType(GUID,Integer)
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _ If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
<> Global.System.Data.ConnectionState.Open) Then <> Global.System.Data.ConnectionState.Open) Then
@@ -21867,6 +22015,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
ByVal SUMMARY_FUNCTION As String, _ ByVal SUMMARY_FUNCTION As String, _
ByVal TYPE_COLUMN As String, _ ByVal TYPE_COLUMN As String, _
ByVal LU_CAPTION As String, _ ByVal LU_CAPTION As String, _
ByVal INHERIT_VALUE As Boolean, _
ByVal FORMULA_EXPRESSION As String, _
ByVal Original_GUID As Integer) As Object ByVal Original_GUID As Integer) As Object
Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1) Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
If (SPALTENNAME Is Nothing) Then If (SPALTENNAME Is Nothing) Then
@@ -21925,7 +22075,13 @@ Namespace DD_DMSLiteDataSetTableAdapters
Else Else
command.Parameters(15).Value = CType(LU_CAPTION,String) command.Parameters(15).Value = CType(LU_CAPTION,String)
End If End If
command.Parameters(16).Value = CType(Original_GUID,Integer) command.Parameters(16).Value = CType(INHERIT_VALUE,Boolean)
If (FORMULA_EXPRESSION Is Nothing) Then
Throw New Global.System.ArgumentNullException("FORMULA_EXPRESSION")
Else
command.Parameters(17).Value = CType(FORMULA_EXPRESSION,String)
End If
command.Parameters(18).Value = CType(Original_GUID,Integer)
Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
If ((command.Connection.State And Global.System.Data.ConnectionState.Open) _ If ((command.Connection.State And Global.System.Data.ConnectionState.Open) _
<> Global.System.Data.ConnectionState.Open) Then <> Global.System.Data.ConnectionState.Open) Then
@@ -22148,7 +22304,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -22339,7 +22495,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -22622,7 +22778,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -22846,7 +23002,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -23236,7 +23392,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -23620,7 +23776,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -23797,7 +23953,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -23974,7 +24130,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -24327,7 +24483,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _

View File

@@ -56,24 +56,32 @@
<TableUISetting Name="TBPM_CONTROL_TABLE"> <TableUISetting Name="TBPM_CONTROL_TABLE">
<ColumnUISettings> <ColumnUISettings>
<ColumnUISetting Name="ADDED_WHO"> <ColumnUISetting Name="ADDED_WHO">
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource"> <ControlSettings>
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" /> <BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
</ControlSetting></ControlSettings> </ControlSetting>
</ControlSettings>
</ColumnUISetting> </ColumnUISetting>
<ColumnUISetting Name="ADDED_WHEN"> <ColumnUISetting Name="ADDED_WHEN">
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource"> <ControlSettings>
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" /> <BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
</ControlSetting></ControlSettings> </ControlSetting>
</ControlSettings>
</ColumnUISetting> </ColumnUISetting>
<ColumnUISetting Name="CHANGED_WHEN"> <ColumnUISetting Name="CHANGED_WHEN">
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource"> <ControlSettings>
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" /> <BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
</ControlSetting></ControlSettings> </ControlSetting>
</ControlSettings>
</ColumnUISetting> </ColumnUISetting>
<ColumnUISetting Name="TYPE_COLUMN"> <ColumnUISetting Name="TYPE_COLUMN">
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource"> <ControlSettings>
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
<BindableControlInfo Name="ComboBox" Type="System.Windows.Forms.ComboBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" /> <BindableControlInfo Name="ComboBox" Type="System.Windows.Forms.ComboBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
</ControlSetting></ControlSettings> </ControlSetting>
</ControlSettings>
</ColumnUISetting> </ColumnUISetting>
</ColumnUISettings> </ColumnUISettings>
</TableUISetting> </TableUISetting>

View File

@@ -4,7 +4,7 @@
<xs:appinfo source="urn:schemas-microsoft-com:xml-msdatasource"> <xs:appinfo source="urn:schemas-microsoft-com:xml-msdatasource">
<DataSource DefaultConnectionIndex="0" FunctionsComponentName="QueriesTableAdapter" Modifier="AutoLayout, AnsiClass, Class, Public" SchemaSerializationMode="IncludeSchema" xmlns="urn:schemas-microsoft-com:xml-msdatasource"> <DataSource DefaultConnectionIndex="0" FunctionsComponentName="QueriesTableAdapter" Modifier="AutoLayout, AnsiClass, Class, Public" SchemaSerializationMode="IncludeSchema" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<Connections> <Connections>
<Connection AppSettingsObjectName="MySettings" AppSettingsPropertyName="ConnectionString" ConnectionStringObject="" IsAppSettingsProperty="true" Modifier="Assembly" Name="ConnectionString (MySettings)" ParameterPrefix="@" PropertyReference="ApplicationSettings.DD_ProcessManager.My.MySettings.GlobalReference.Default.ConnectionString" Provider="System.Data.SqlClient" /> <Connection AppSettingsObjectName="MySettings" AppSettingsPropertyName="ConnectionString" ConnectionStringObject="" IsAppSettingsProperty="true" Modifier="Assembly" Name="ConnectionString (MySettings)" ParameterPrefix="@" PropertyReference="ApplicationSettings.taskFLOW.My.MySettings.GlobalReference.Default.ConnectionString" Provider="System.Data.SqlClient" />
</Connections> </Connections>
<Tables> <Tables>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBPM_PROFILE_FINAL_INDEXINGTableAdapter" GeneratorDataComponentClassName="TBPM_PROFILE_FINAL_INDEXINGTableAdapter" Name="TBPM_PROFILE_FINAL_INDEXING" UserDataComponentName="TBPM_PROFILE_FINAL_INDEXINGTableAdapter"> <TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBPM_PROFILE_FINAL_INDEXINGTableAdapter" GeneratorDataComponentClassName="TBPM_PROFILE_FINAL_INDEXINGTableAdapter" Name="TBPM_PROFILE_FINAL_INDEXING" UserDataComponentName="TBPM_PROFILE_FINAL_INDEXINGTableAdapter">
@@ -972,8 +972,8 @@ WHERE (GUID = @Original_GUID)</CommandText>
<CommandText>INSERT INTO TBPM_PROFILE_CONTROLS <CommandText>INSERT INTO TBPM_PROFILE_CONTROLS
(PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, (PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG,
HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH,
REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL2, SQL_ENABLE, SAVE_CHANGE_ON_ENABLED, FORMAT_STRING) REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL2, SQL_ENABLE, SAVE_CHANGE_ON_ENABLED, FORMAT_STRING, TEXT_ALIGNMENT)
VALUES (@PROFIL_ID,@NAME,@CTRL_TYPE,@CTRL_TEXT,@X_LOC,@Y_LOC,@ADDED_WHO,@ADDED_WHEN,@CHANGED_WHO,@CHANGED_WHEN,@INDEX_NAME,@TYP,@VALIDATION,@CHOICE_LIST,@CONNECTION_ID,@SQL_UEBERPRUEFUNG,@HEIGHT,@WIDTH,@FONT_STYLE,@FONT_SIZE,@FONT_FAMILY,@FONT_COLOR,@READ_ONLY,@LOAD_IDX_VALUE,@DEFAULT_VALUE,@MULTISELECT,@VKT_ADD_ITEM,@VKT_PREVENT_MULTIPLE_VALUES,@REGEX_MATCH,@REGEX_MESSAGE_DE,@REGEX_MESSAGE_EN,@IMAGE_CONTROL,@SQL2,@SQL_ENABLE,@SAVE_CHANGE_ON_ENABLED,@FORMAT_STRING); VALUES (@PROFIL_ID,@NAME,@CTRL_TYPE,@CTRL_TEXT,@X_LOC,@Y_LOC,@ADDED_WHO,@ADDED_WHEN,@CHANGED_WHO,@CHANGED_WHEN,@INDEX_NAME,@TYP,@VALIDATION,@CHOICE_LIST,@CONNECTION_ID,@SQL_UEBERPRUEFUNG,@HEIGHT,@WIDTH,@FONT_STYLE,@FONT_SIZE,@FONT_FAMILY,@FONT_COLOR,@READ_ONLY,@LOAD_IDX_VALUE,@DEFAULT_VALUE,@MULTISELECT,@VKT_ADD_ITEM,@VKT_PREVENT_MULTIPLE_VALUES,@REGEX_MATCH,@REGEX_MESSAGE_DE,@REGEX_MESSAGE_EN,@IMAGE_CONTROL,@SQL2,@SQL_ENABLE,@SAVE_CHANGE_ON_ENABLED,@FORMAT_STRING,@TEXT_ALIGNMENT);
SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN FROM TBPM_PROFILE_CONTROLS WHERE (GUID = SCOPE_IDENTITY()) ORDER BY Y_LOC, X_LOC</CommandText> SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN FROM TBPM_PROFILE_CONTROLS WHERE (GUID = SCOPE_IDENTITY()) ORDER BY Y_LOC, X_LOC</CommandText>
<Parameters> <Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="PROFIL_ID" ColumnName="PROFIL_ID" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFIL_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="PROFIL_ID" ColumnName="PROFIL_ID" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFIL_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
@@ -1011,7 +1011,8 @@ SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADD
<Parameter AllowDbNull="true" AutogeneratedName="SQL2" ColumnName="SQL2" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@SQL2" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="SQL2" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="true" AutogeneratedName="SQL2" ColumnName="SQL2" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@SQL2" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="SQL2" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="SQL_ENABLE" ColumnName="SQL_ENABLE" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@SQL_ENABLE" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="SQL_ENABLE" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="true" AutogeneratedName="SQL_ENABLE" ColumnName="SQL_ENABLE" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@SQL_ENABLE" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="SQL_ENABLE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="SAVE_CHANGE_ON_ENABLED" ColumnName="SAVE_CHANGE_ON_ENABLED" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@SAVE_CHANGE_ON_ENABLED" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="SAVE_CHANGE_ON_ENABLED" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="SAVE_CHANGE_ON_ENABLED" ColumnName="SAVE_CHANGE_ON_ENABLED" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@SAVE_CHANGE_ON_ENABLED" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="SAVE_CHANGE_ON_ENABLED" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="FORMAT_STRING" ColumnName="FORMAT_STRING" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(200)" DbType="AnsiString" Direction="Input" ParameterName="@FORMAT_STRING" Precision="0" ProviderType="VarChar" Scale="0" Size="200" SourceColumn="FORMAT_STRING" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="true" AutogeneratedName="FORMAT_STRING" ColumnName="FORMAT_STRING" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(200)" DbType="AnsiString" Direction="Input" ParameterName="@FORMAT_STRING" Precision="0" ProviderType="VarChar" Scale="0" Size="200" SourceColumn="FORMAT_STRING" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="TEXT_ALIGNMENT" ColumnName="TEXT_ALIGNMENT" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="nvarchar(20)" DbType="String" Direction="Input" ParameterName="@TEXT_ALIGNMENT" Precision="0" ProviderType="NVarChar" Scale="0" Size="20" SourceColumn="TEXT_ALIGNMENT" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters> </Parameters>
</DbCommand> </DbCommand>
</InsertCommand> </InsertCommand>
@@ -1020,7 +1021,7 @@ SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADD
<CommandText>SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, <CommandText>SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID,
SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES,
REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL2, SQL_ENABLE, SET_CONTROL_DATA, SQL_ENABLE_ON_LOAD, SQL_ENABLE_ON_LOAD_CONID, CONTROL_ACTIVE, REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, IMAGE_CONTROL, SQL2, SQL_ENABLE, SET_CONTROL_DATA, SQL_ENABLE_ON_LOAD, SQL_ENABLE_ON_LOAD_CONID, CONTROL_ACTIVE,
TABLE_ORDER_COLUMN, SAVE_CHANGE_ON_ENABLED, FORMAT_STRING TABLE_ORDER_COLUMN, SAVE_CHANGE_ON_ENABLED, FORMAT_STRING, TEXT_ALIGNMENT
FROM TBPM_PROFILE_CONTROLS FROM TBPM_PROFILE_CONTROLS
WHERE (GUID = @guid) WHERE (GUID = @guid)
ORDER BY Y_LOC, X_LOC</CommandText> ORDER BY Y_LOC, X_LOC</CommandText>
@@ -1037,7 +1038,7 @@ SET PROFIL_ID = @PROFIL_ID, NAME = @NAME, CTRL_TYPE = @CTRL_TYPE,
FONT_STYLE = @FONT_STYLE, FONT_SIZE = @FONT_SIZE, FONT_FAMILY = @FONT_FAMILY, FONT_COLOR = @FONT_COLOR, READ_ONLY = @READ_ONLY, LOAD_IDX_VALUE = @LOAD_IDX_VALUE, FONT_STYLE = @FONT_STYLE, FONT_SIZE = @FONT_SIZE, FONT_FAMILY = @FONT_FAMILY, FONT_COLOR = @FONT_COLOR, READ_ONLY = @READ_ONLY, LOAD_IDX_VALUE = @LOAD_IDX_VALUE,
DEFAULT_VALUE = @DEFAULT_VALUE, MULTISELECT = @MULTISELECT, VKT_ADD_ITEM = @VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES = @VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH = @REGEX_MATCH, DEFAULT_VALUE = @DEFAULT_VALUE, MULTISELECT = @MULTISELECT, VKT_ADD_ITEM = @VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES = @VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH = @REGEX_MATCH,
REGEX_MESSAGE_DE = @REGEX_MESSAGE_DE, REGEX_MESSAGE_EN = @REGEX_MESSAGE_EN, IMAGE_CONTROL = @IMAGE_CONTROL, SQL2 = @SQL2, SQL_ENABLE = @SQL_ENABLE, REGEX_MESSAGE_DE = @REGEX_MESSAGE_DE, REGEX_MESSAGE_EN = @REGEX_MESSAGE_EN, IMAGE_CONTROL = @IMAGE_CONTROL, SQL2 = @SQL2, SQL_ENABLE = @SQL_ENABLE,
SAVE_CHANGE_ON_ENABLED = @SAVE_CHANGE_ON_ENABLED, FORMAT_STRING = @FORMAT_STRING SAVE_CHANGE_ON_ENABLED = @SAVE_CHANGE_ON_ENABLED, FORMAT_STRING = @FORMAT_STRING, TEXT_ALIGNMENT = @TEXT_ALIGNMENT
WHERE (GUID = @Original_GUID); WHERE (GUID = @Original_GUID);
SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN FROM TBPM_PROFILE_CONTROLS WHERE (GUID = @GUID) ORDER BY Y_LOC, X_LOC</CommandText> SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, INDEX_NAME, TYP, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_UEBERPRUEFUNG, HEIGHT, WIDTH, FONT_STYLE, FONT_SIZE, FONT_FAMILY, FONT_COLOR, READ_ONLY, LOAD_IDX_VALUE, DEFAULT_VALUE, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN FROM TBPM_PROFILE_CONTROLS WHERE (GUID = @GUID) ORDER BY Y_LOC, X_LOC</CommandText>
<Parameters> <Parameters>
@@ -1073,7 +1074,8 @@ SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADD
<Parameter AllowDbNull="true" AutogeneratedName="SQL2" ColumnName="SQL2" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@SQL2" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="SQL2" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="true" AutogeneratedName="SQL2" ColumnName="SQL2" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@SQL2" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="SQL2" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="SQL_ENABLE" ColumnName="SQL_ENABLE" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@SQL_ENABLE" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="SQL_ENABLE" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="true" AutogeneratedName="SQL_ENABLE" ColumnName="SQL_ENABLE" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@SQL_ENABLE" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="SQL_ENABLE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="SAVE_CHANGE_ON_ENABLED" ColumnName="SAVE_CHANGE_ON_ENABLED" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@SAVE_CHANGE_ON_ENABLED" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="SAVE_CHANGE_ON_ENABLED" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="SAVE_CHANGE_ON_ENABLED" ColumnName="SAVE_CHANGE_ON_ENABLED" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@SAVE_CHANGE_ON_ENABLED" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="SAVE_CHANGE_ON_ENABLED" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="FORMAT_STRING" ColumnName="FORMAT_STRING" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(200)" DbType="AnsiString" Direction="Input" ParameterName="@FORMAT_STRING" Precision="0" ProviderType="VarChar" Scale="0" Size="200" SourceColumn="FORMAT_STRING" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="true" AutogeneratedName="FORMAT_STRING" ColumnName="FORMAT_STRING" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(200)" DbType="AnsiString" Direction="Input" ParameterName="@FORMAT_STRING" Precision="0" ProviderType="VarChar" Scale="0" Size="200" SourceColumn="FORMAT_STRING" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="TEXT_ALIGNMENT" ColumnName="TEXT_ALIGNMENT" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="nvarchar(20)" DbType="String" Direction="Input" ParameterName="@TEXT_ALIGNMENT" Precision="0" ProviderType="NVarChar" Scale="0" Size="20" SourceColumn="TEXT_ALIGNMENT" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" /> <Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" /> <Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters> </Parameters>
@@ -1124,6 +1126,7 @@ SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADD
<Mapping SourceColumn="TABLE_ORDER_COLUMN" DataSetColumn="TABLE_ORDER_COLUMN" /> <Mapping SourceColumn="TABLE_ORDER_COLUMN" DataSetColumn="TABLE_ORDER_COLUMN" />
<Mapping SourceColumn="SAVE_CHANGE_ON_ENABLED" DataSetColumn="SAVE_CHANGE_ON_ENABLED" /> <Mapping SourceColumn="SAVE_CHANGE_ON_ENABLED" DataSetColumn="SAVE_CHANGE_ON_ENABLED" />
<Mapping SourceColumn="FORMAT_STRING" DataSetColumn="FORMAT_STRING" /> <Mapping SourceColumn="FORMAT_STRING" DataSetColumn="FORMAT_STRING" />
<Mapping SourceColumn="TEXT_ALIGNMENT" DataSetColumn="TEXT_ALIGNMENT" />
</Mappings> </Mappings>
<Sources> <Sources>
<DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="cmdControlExists" Modifier="Public" Name="cmdControlExists" QueryType="Scalar" ScalarCallRetval="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy" UserSourceName="cmdControlExists"> <DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="cmdControlExists" Modifier="Public" Name="cmdControlExists" QueryType="Scalar" ScalarCallRetval="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy" UserSourceName="cmdControlExists">
@@ -1211,7 +1214,7 @@ WHERE (GUID = @Guid)</CommandText>
</DbCommand> </DbCommand>
</SelectCommand> </SelectCommand>
</DbSource> </DbSource>
<DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="cmdInsertAnlage" Modifier="Public" Name="cmdInsertAnlage" QueryType="NoData" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy7" UserSourceName="cmdInsertAnlage"> <DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DbObjectType="Table" GenerateShortCommands="true" GeneratorSourceName="cmdInsertAnlage" Modifier="Public" Name="cmdInsertAnlage" QueryType="NoData" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy7" UserSourceName="cmdInsertAnlage">
<InsertCommand> <InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="true"> <DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>INSERT INTO TBPM_PROFILE_CONTROLS <CommandText>INSERT INTO TBPM_PROFILE_CONTROLS
@@ -1230,6 +1233,25 @@ VALUES (@PROFIL_ID,@NAME,@CTRL_TYPE,@CTRL_TEXT,@X_LOC,@Y_LOC,@ADDED_WHO,@
</Parameters> </Parameters>
</DbCommand> </DbCommand>
</InsertCommand> </InsertCommand>
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>INSERT INTO TBPM_PROFILE_CONTROLS
(PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, HEIGHT, WIDTH, TEXT_ALIGNMENT)
VALUES (@PROFIL_ID,@NAME,@CTRL_TYPE,@CTRL_TEXT,@X_LOC,@Y_LOC,@ADDED_WHO,@HEIGHT,@Width,@TEXT_ALIGNMENT)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="PROFIL_ID" ColumnName="PROFIL_ID" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@PROFIL_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="NAME" ColumnName="NAME" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="CTRL_TYPE" ColumnName="CTRL_TYPE" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(10)" DbType="AnsiString" Direction="Input" ParameterName="@CTRL_TYPE" Precision="0" ProviderType="VarChar" Scale="0" Size="10" SourceColumn="CTRL_TYPE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="CTRL_TEXT" ColumnName="CTRL_TEXT" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@CTRL_TEXT" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="CTRL_TEXT" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="X_LOC" ColumnName="X_LOC" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="float" DbType="Double" Direction="Input" ParameterName="@X_LOC" Precision="0" ProviderType="Float" Scale="0" Size="8" SourceColumn="X_LOC" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Y_LOC" ColumnName="Y_LOC" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="float" DbType="Double" Direction="Input" ParameterName="@Y_LOC" Precision="0" ProviderType="Float" Scale="0" Size="8" SourceColumn="Y_LOC" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(30)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="30" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="HEIGHT" ColumnName="HEIGHT" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="smallint" DbType="Int16" Direction="Input" ParameterName="@HEIGHT" Precision="0" ProviderType="SmallInt" Scale="0" Size="2" SourceColumn="HEIGHT" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Width" ColumnName="WIDTH" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="smallint" DbType="Int16" Direction="Input" ParameterName="@Width" Precision="0" ProviderType="SmallInt" Scale="0" Size="2" SourceColumn="WIDTH" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="TEXT_ALIGNMENT" ColumnName="TEXT_ALIGNMENT" DataSourceName="DD_ECM.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="nvarchar(20)" DbType="String" Direction="Input" ParameterName="@TEXT_ALIGNMENT" Precision="0" ProviderType="NVarChar" Scale="0" Size="20" SourceColumn="TEXT_ALIGNMENT" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
</DbSource> </DbSource>
<DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="cmdUpdateIndexname" Modifier="Public" Name="cmdUpdateIndexname" QueryType="NoData" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy8" UserSourceName="cmdUpdateIndexname"> <DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="cmdUpdateIndexname" Modifier="Public" Name="cmdUpdateIndexname" QueryType="NoData" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy8" UserSourceName="cmdUpdateIndexname">
<UpdateCommand> <UpdateCommand>
@@ -1251,7 +1273,7 @@ WHERE (GUID = @Original_GUID);</CommandText>
<CommandText>SELECT dbo.FNPM_LANGUAGE_CONTROL_TEXT(NAME, @USER_LANGUAGE, CTRL_TYPE, CTRL_TEXT) AS CTRL_CAPTION_LANG, ADDED_WHEN, ADDED_WHO, CHANGED_WHEN, CHANGED_WHO, CHOICE_LIST, CONNECTION_ID, <CommandText>SELECT dbo.FNPM_LANGUAGE_CONTROL_TEXT(NAME, @USER_LANGUAGE, CTRL_TYPE, CTRL_TEXT) AS CTRL_CAPTION_LANG, ADDED_WHEN, ADDED_WHO, CHANGED_WHEN, CHANGED_WHO, CHOICE_LIST, CONNECTION_ID,
CTRL_TEXT, CTRL_TYPE, DEFAULT_VALUE, FONT_COLOR, FONT_FAMILY, FONT_SIZE, FONT_STYLE, GUID, HEIGHT, INDEX_NAME, LOAD_IDX_VALUE, MULTISELECT, NAME, PROFIL_ID, READ_ONLY, REGEX_MATCH, CTRL_TEXT, CTRL_TYPE, DEFAULT_VALUE, FONT_COLOR, FONT_FAMILY, FONT_SIZE, FONT_STYLE, GUID, HEIGHT, INDEX_NAME, LOAD_IDX_VALUE, MULTISELECT, NAME, PROFIL_ID, READ_ONLY, REGEX_MATCH,
REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, SQL_UEBERPRUEFUNG, TYP, VALIDATION, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, WIDTH, X_LOC, Y_LOC, IMAGE_CONTROL, SQL2, SQL_ENABLE, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, SQL_UEBERPRUEFUNG, TYP, VALIDATION, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, WIDTH, X_LOC, Y_LOC, IMAGE_CONTROL, SQL2, SQL_ENABLE,
SET_CONTROL_DATA, SQL_ENABLE_ON_LOAD, SQL_ENABLE_ON_LOAD_CONID, CONTROL_ACTIVE, TABLE_ORDER_COLUMN, SAVE_CHANGE_ON_ENABLED, FORMAT_STRING SET_CONTROL_DATA, SQL_ENABLE_ON_LOAD, SQL_ENABLE_ON_LOAD_CONID, CONTROL_ACTIVE, TABLE_ORDER_COLUMN, SAVE_CHANGE_ON_ENABLED, FORMAT_STRING, TEXT_ALIGNMENT
FROM TBPM_PROFILE_CONTROLS AS T FROM TBPM_PROFILE_CONTROLS AS T
WHERE (PROFIL_ID = @profil_id) WHERE (PROFIL_ID = @profil_id)
ORDER BY Y_LOC, X_LOC</CommandText> ORDER BY Y_LOC, X_LOC</CommandText>
@@ -1279,8 +1301,8 @@ WHERE (GUID = @Original_GUID)</CommandText>
<InsertCommand> <InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="false"> <DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>INSERT INTO TBPM_CONTROL_TABLE <CommandText>INSERT INTO TBPM_CONTROL_TABLE
(CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, ADDED_WHO, TYPE_COLUMN) (CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, ADDED_WHO, TYPE_COLUMN, INHERIT_VALUE)
VALUES (@CONTROL_ID,@SPALTENNAME,@SPALTEN_HEADER,@SPALTENBREITE,@ADDED_WHO,@TYPE_COLUMN); VALUES (@CONTROL_ID,@SPALTENNAME,@SPALTEN_HEADER,@SPALTENBREITE,@ADDED_WHO,@TYPE_COLUMN,@INHERIT_VALUE);
SELECT GUID, CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, REGEX_MATCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE, SEQUENCE, DEFAULT_VALUE, ADVANCED_LOOKUP FROM TBPM_CONTROL_TABLE WHERE (GUID = SCOPE_IDENTITY())</CommandText> SELECT GUID, CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, REGEX_MATCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE, SEQUENCE, DEFAULT_VALUE, ADVANCED_LOOKUP FROM TBPM_CONTROL_TABLE WHERE (GUID = SCOPE_IDENTITY())</CommandText>
<Parameters> <Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="CONTROL_ID" ColumnName="CONTROL_ID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@CONTROL_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="CONTROL_ID" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="CONTROL_ID" ColumnName="CONTROL_ID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@CONTROL_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="CONTROL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
@@ -1289,13 +1311,15 @@ SELECT GUID, CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION,
<Parameter AllowDbNull="false" AutogeneratedName="SPALTENBREITE" ColumnName="SPALTENBREITE" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@SPALTENBREITE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="SPALTENBREITE" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="SPALTENBREITE" ColumnName="SPALTENBREITE" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@SPALTENBREITE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="SPALTENBREITE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="" DataTypeServer="varchar(30)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="30" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="" DataTypeServer="varchar(30)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="30" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="TYPE_COLUMN" ColumnName="TYPE_COLUMN" DataSourceName="" DataTypeServer="varchar(20)" DbType="AnsiString" Direction="Input" ParameterName="@TYPE_COLUMN" Precision="0" ProviderType="VarChar" Scale="0" Size="20" SourceColumn="TYPE_COLUMN" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="TYPE_COLUMN" ColumnName="TYPE_COLUMN" DataSourceName="" DataTypeServer="varchar(20)" DbType="AnsiString" Direction="Input" ParameterName="@TYPE_COLUMN" Precision="0" ProviderType="VarChar" Scale="0" Size="20" SourceColumn="TYPE_COLUMN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="INHERIT_VALUE" ColumnName="INHERIT_VALUE" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@INHERIT_VALUE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="INHERIT_VALUE" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters> </Parameters>
</DbCommand> </DbCommand>
</InsertCommand> </InsertCommand>
<SelectCommand> <SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="false"> <DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT GUID, CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, <CommandText>SELECT GUID, CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO,
CHANGED_WHEN, REGEX_MATCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE, SEQUENCE, DEFAULT_VALUE, ADVANCED_LOOKUP, SUMMARY_FUNCTION, TYPE_COLUMN, LU_CAPTION CHANGED_WHEN, REGEX_MATCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE, SEQUENCE, DEFAULT_VALUE, ADVANCED_LOOKUP, SUMMARY_FUNCTION, TYPE_COLUMN, LU_CAPTION, INHERIT_VALUE,
FORMULA_EXPRESSION
FROM TBPM_CONTROL_TABLE FROM TBPM_CONTROL_TABLE
WHERE (CONTROL_ID = @CONTROL_ID)</CommandText> WHERE (CONTROL_ID = @CONTROL_ID)</CommandText>
<Parameters> <Parameters>
@@ -1304,38 +1328,42 @@ WHERE (CONTROL_ID = @CONTROL_ID)</CommandText>
</DbCommand> </DbCommand>
</SelectCommand> </SelectCommand>
<UpdateCommand> <UpdateCommand>
<DbCommand CommandType="Text" ModifiedByUser="false"> <DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>UPDATE TBPM_CONTROL_TABLE <CommandText>UPDATE TBPM_CONTROL_TABLE
SET CONTROL_ID = @CONTROL_ID, SPALTENNAME = @SPALTENNAME, SPALTEN_HEADER = @SPALTEN_HEADER, SPALTENBREITE = @SPALTENBREITE, VALIDATION = @VALIDATION, CHOICE_LIST = @CHOICE_LIST, SET CONTROL_ID = @CONTROL_ID, SPALTENNAME = @SPALTENNAME, SPALTEN_HEADER = @SPALTEN_HEADER, SPALTENBREITE = @SPALTENBREITE, VALIDATION = @VALIDATION, CHOICE_LIST = @CHOICE_LIST,
CONNECTION_ID = @CONNECTION_ID, SQL_COMMAND = @SQL_COMMAND, READ_ONLY = @READ_ONLY, LOAD_IDX_VALUE = @LOAD_IDX_VALUE, ADDED_WHO = @ADDED_WHO, ADDED_WHEN = @ADDED_WHEN, CONNECTION_ID = @CONNECTION_ID, SQL_COMMAND = @SQL_COMMAND, READ_ONLY = @READ_ONLY, LOAD_IDX_VALUE = @LOAD_IDX_VALUE, ADDED_WHO = @ADDED_WHO, ADDED_WHEN = @ADDED_WHEN,
CHANGED_WHO = @CHANGED_WHO, CHANGED_WHEN = @CHANGED_WHEN, REGEX_MATCH = @REGEX_MATCH, REGEX_MESSAGE_EN = @REGEX_MESSAGE_EN, REGEX_MESSAGE_DE = @REGEX_MESSAGE_DE, CHANGED_WHO = @CHANGED_WHO, CHANGED_WHEN = @CHANGED_WHEN, REGEX_MATCH = @REGEX_MATCH, REGEX_MESSAGE_EN = @REGEX_MESSAGE_EN, REGEX_MESSAGE_DE = @REGEX_MESSAGE_DE,
SEQUENCE = @SEQUENCE, DEFAULT_VALUE = @DEFAULT_VALUE, ADVANCED_LOOKUP = @ADVANCED_LOOKUP, SAVE_CHANGE_ON_ENABLED = @SAVE_CHANGE_ON_ENABLED SEQUENCE = @SEQUENCE, DEFAULT_VALUE = @DEFAULT_VALUE, ADVANCED_LOOKUP = @ADVANCED_LOOKUP, SAVE_CHANGE_ON_ENABLED = @SAVE_CHANGE_ON_ENABLED, INHERIT_VALUE = @INHERIT_VALUE,
LU_CAPTION = @LU_CAPTION, FORMULA_EXPRESSION = @FORMULA_EXPRESSION
WHERE (GUID = @Original_GUID); WHERE (GUID = @Original_GUID);
SELECT GUID, CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, REGEX_MATCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE, SEQUENCE, DEFAULT_VALUE, ADVANCED_LOOKUP FROM TBPM_CONTROL_TABLE WHERE (GUID = @GUID)</CommandText> SELECT GUID, CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, REGEX_MATCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE, SEQUENCE, DEFAULT_VALUE, ADVANCED_LOOKUP FROM TBPM_CONTROL_TABLE WHERE (GUID = @GUID)</CommandText>
<Parameters> <Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="CONTROL_ID" ColumnName="CONTROL_ID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@CONTROL_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="CONTROL_ID" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="CONTROL_ID" ColumnName="CONTROL_ID" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@CONTROL_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="CONTROL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="SPALTENNAME" ColumnName="SPALTENNAME" DataSourceName="" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@SPALTENNAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="SPALTENNAME" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="SPALTENNAME" ColumnName="SPALTENNAME" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@SPALTENNAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="SPALTENNAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="SPALTEN_HEADER" ColumnName="SPALTEN_HEADER" DataSourceName="" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@SPALTEN_HEADER" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="SPALTEN_HEADER" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="SPALTEN_HEADER" ColumnName="SPALTEN_HEADER" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@SPALTEN_HEADER" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="SPALTEN_HEADER" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="SPALTENBREITE" ColumnName="SPALTENBREITE" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@SPALTENBREITE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="SPALTENBREITE" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="SPALTENBREITE" ColumnName="SPALTENBREITE" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@SPALTENBREITE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="SPALTENBREITE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="VALIDATION" ColumnName="VALIDATION" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@VALIDATION" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="VALIDATION" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="VALIDATION" ColumnName="VALIDATION" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@VALIDATION" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="VALIDATION" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="CHOICE_LIST" ColumnName="CHOICE_LIST" DataSourceName="" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@CHOICE_LIST" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="CHOICE_LIST" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="true" AutogeneratedName="CHOICE_LIST" ColumnName="CHOICE_LIST" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@CHOICE_LIST" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="CHOICE_LIST" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="CONNECTION_ID" ColumnName="CONNECTION_ID" DataSourceName="" DataTypeServer="smallint" DbType="Int16" Direction="Input" ParameterName="@CONNECTION_ID" Precision="0" ProviderType="SmallInt" Scale="0" Size="2" SourceColumn="CONNECTION_ID" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="true" AutogeneratedName="CONNECTION_ID" ColumnName="CONNECTION_ID" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="smallint" DbType="Int16" Direction="Input" ParameterName="@CONNECTION_ID" Precision="0" ProviderType="SmallInt" Scale="0" Size="2" SourceColumn="CONNECTION_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="SQL_COMMAND" ColumnName="SQL_COMMAND" DataSourceName="" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@SQL_COMMAND" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="SQL_COMMAND" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="true" AutogeneratedName="SQL_COMMAND" ColumnName="SQL_COMMAND" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@SQL_COMMAND" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="SQL_COMMAND" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="READ_ONLY" ColumnName="READ_ONLY" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@READ_ONLY" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="READ_ONLY" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="READ_ONLY" ColumnName="READ_ONLY" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@READ_ONLY" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="READ_ONLY" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="LOAD_IDX_VALUE" ColumnName="LOAD_IDX_VALUE" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@LOAD_IDX_VALUE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="LOAD_IDX_VALUE" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="LOAD_IDX_VALUE" ColumnName="LOAD_IDX_VALUE" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@LOAD_IDX_VALUE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="LOAD_IDX_VALUE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="" DataTypeServer="varchar(30)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="30" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(30)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="30" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHEN" ColumnName="ADDED_WHEN" DataSourceName="" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHEN" ColumnName="ADDED_WHEN" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="" DataTypeServer="varchar(30)" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="30" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(30)" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="30" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHEN" ColumnName="CHANGED_WHEN" DataSourceName="" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHEN" ColumnName="CHANGED_WHEN" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="REGEX_MATCH" ColumnName="REGEX_MATCH" DataSourceName="" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MATCH" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="REGEX_MATCH" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="REGEX_MATCH" ColumnName="REGEX_MATCH" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MATCH" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="REGEX_MATCH" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="REGEX_MESSAGE_EN" ColumnName="REGEX_MESSAGE_EN" DataSourceName="" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MESSAGE_EN" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="REGEX_MESSAGE_EN" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="REGEX_MESSAGE_EN" ColumnName="REGEX_MESSAGE_EN" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MESSAGE_EN" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="REGEX_MESSAGE_EN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="REGEX_MESSAGE_DE" ColumnName="REGEX_MESSAGE_DE" DataSourceName="" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MESSAGE_DE" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="REGEX_MESSAGE_DE" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="REGEX_MESSAGE_DE" ColumnName="REGEX_MESSAGE_DE" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MESSAGE_DE" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="REGEX_MESSAGE_DE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="SEQUENCE" ColumnName="SEQUENCE" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="SEQUENCE" ColumnName="SEQUENCE" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="DEFAULT_VALUE" ColumnName="DEFAULT_VALUE" DataSourceName="" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@DEFAULT_VALUE" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="DEFAULT_VALUE" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="DEFAULT_VALUE" ColumnName="DEFAULT_VALUE" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@DEFAULT_VALUE" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="DEFAULT_VALUE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="ADVANCED_LOOKUP" ColumnName="ADVANCED_LOOKUP" DataSourceName="" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ADVANCED_LOOKUP" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ADVANCED_LOOKUP" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="ADVANCED_LOOKUP" ColumnName="ADVANCED_LOOKUP" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ADVANCED_LOOKUP" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ADVANCED_LOOKUP" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="SAVE_CHANGE_ON_ENABLED" ColumnName="SAVE_CHANGE_ON_ENABLED" DataSourceName="" DataTypeServer="unknown" DbType="Object" Direction="Input" ParameterName="@SAVE_CHANGE_ON_ENABLED" Precision="0" Scale="0" Size="1024" SourceColumn="SAVE_CHANGE_ON_ENABLED" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="SAVE_CHANGE_ON_ENABLED" ColumnName="SAVE_CHANGE_ON_ENABLED" DataSourceName="" DataTypeServer="unknown" DbType="Object" Direction="Input" ParameterName="@SAVE_CHANGE_ON_ENABLED" Precision="0" Scale="0" Size="1024" SourceColumn="SAVE_CHANGE_ON_ENABLED" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" /> <Parameter AllowDbNull="false" AutogeneratedName="INHERIT_VALUE" ColumnName="INHERIT_VALUE" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@INHERIT_VALUE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="INHERIT_VALUE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" /> <Parameter AllowDbNull="false" AutogeneratedName="LU_CAPTION" ColumnName="LU_CAPTION" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(150)" DbType="AnsiString" Direction="Input" ParameterName="@LU_CAPTION" Precision="0" ProviderType="VarChar" Scale="0" Size="150" SourceColumn="LU_CAPTION" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="FORMULA_EXPRESSION" ColumnName="FORMULA_EXPRESSION" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="nvarchar(1000)" DbType="String" Direction="Input" ParameterName="@FORMULA_EXPRESSION" Precision="0" ProviderType="NVarChar" Scale="0" Size="1000" SourceColumn="FORMULA_EXPRESSION" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters> </Parameters>
</DbCommand> </DbCommand>
</UpdateCommand> </UpdateCommand>
@@ -1366,6 +1394,8 @@ SELECT GUID, CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION,
<Mapping SourceColumn="SUMMARY_FUNCTION" DataSetColumn="SUMMARY_FUNCTION" /> <Mapping SourceColumn="SUMMARY_FUNCTION" DataSetColumn="SUMMARY_FUNCTION" />
<Mapping SourceColumn="TYPE_COLUMN" DataSetColumn="TYPE_COLUMN" /> <Mapping SourceColumn="TYPE_COLUMN" DataSetColumn="TYPE_COLUMN" />
<Mapping SourceColumn="LU_CAPTION" DataSetColumn="LU_CAPTION" /> <Mapping SourceColumn="LU_CAPTION" DataSetColumn="LU_CAPTION" />
<Mapping SourceColumn="INHERIT_VALUE" DataSetColumn="INHERIT_VALUE" />
<Mapping SourceColumn="FORMULA_EXPRESSION" DataSetColumn="FORMULA_EXPRESSION" />
</Mappings> </Mappings>
<Sources> <Sources>
<DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DbObjectType="Table" GenerateShortCommands="true" GeneratorSourceName="cmdUpdate" Modifier="Public" Name="cmdUpdate" QueryType="Scalar" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy" UserSourceName="cmdUpdate"> <DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DbObjectType="Table" GenerateShortCommands="true" GeneratorSourceName="cmdUpdate" Modifier="Public" Name="cmdUpdate" QueryType="Scalar" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy" UserSourceName="cmdUpdate">
@@ -1374,26 +1404,29 @@ SELECT GUID, CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION,
<CommandText>UPDATE TBPM_CONTROL_TABLE <CommandText>UPDATE TBPM_CONTROL_TABLE
SET SPALTENNAME = @SPALTENNAME, SPALTEN_HEADER = @SPALTEN_HEADER, SPALTENBREITE = @SPALTENBREITE, VALIDATION = @VALIDATION, READ_ONLY = @READ_ONLY, LOAD_IDX_VALUE = @LOAD_IDX_VALUE, SET SPALTENNAME = @SPALTENNAME, SPALTEN_HEADER = @SPALTEN_HEADER, SPALTENBREITE = @SPALTENBREITE, VALIDATION = @VALIDATION, READ_ONLY = @READ_ONLY, LOAD_IDX_VALUE = @LOAD_IDX_VALUE,
CHANGED_WHO = @CHANGED_WHO, REGEX_MATCH = @REGEX_MATCH, REGEX_MESSAGE_EN = @REGEX_MESSAGE_EN, REGEX_MESSAGE_DE = @REGEX_MESSAGE_DE, DEFAULT_VALUE = @DEFAULT_VALUE, CHANGED_WHO = @CHANGED_WHO, REGEX_MATCH = @REGEX_MATCH, REGEX_MESSAGE_EN = @REGEX_MESSAGE_EN, REGEX_MESSAGE_DE = @REGEX_MESSAGE_DE, DEFAULT_VALUE = @DEFAULT_VALUE,
SEQUENCE = @SEQUENCE, ADVANCED_LOOKUP = @ADVANCED_LOOKUP, SUMMARY_FUNCTION = @SUMMARY_FUNCTION, TYPE_COLUMN = @TYPE_COLUMN, LU_CAPTION = @LU_CAPTION SEQUENCE = @SEQUENCE, ADVANCED_LOOKUP = @ADVANCED_LOOKUP, SUMMARY_FUNCTION = @SUMMARY_FUNCTION, TYPE_COLUMN = @TYPE_COLUMN, LU_CAPTION = @LU_CAPTION,
INHERIT_VALUE = @INHERIT_VALUE, FORMULA_EXPRESSION = @FORMULA_EXPRESSION
WHERE (GUID = @Original_GUID)</CommandText> WHERE (GUID = @Original_GUID)</CommandText>
<Parameters> <Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="SPALTENNAME" ColumnName="SPALTENNAME" DataSourceName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@SPALTENNAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="SPALTENNAME" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="SPALTENNAME" ColumnName="SPALTENNAME" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@SPALTENNAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="SPALTENNAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="SPALTEN_HEADER" ColumnName="SPALTEN_HEADER" DataSourceName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@SPALTEN_HEADER" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="SPALTEN_HEADER" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="SPALTEN_HEADER" ColumnName="SPALTEN_HEADER" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@SPALTEN_HEADER" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="SPALTEN_HEADER" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="SPALTENBREITE" ColumnName="SPALTENBREITE" DataSourceName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@SPALTENBREITE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="SPALTENBREITE" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="SPALTENBREITE" ColumnName="SPALTENBREITE" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@SPALTENBREITE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="SPALTENBREITE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="VALIDATION" ColumnName="VALIDATION" DataSourceName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@VALIDATION" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="VALIDATION" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="VALIDATION" ColumnName="VALIDATION" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@VALIDATION" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="VALIDATION" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="READ_ONLY" ColumnName="READ_ONLY" DataSourceName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@READ_ONLY" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="READ_ONLY" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="READ_ONLY" ColumnName="READ_ONLY" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@READ_ONLY" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="READ_ONLY" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="LOAD_IDX_VALUE" ColumnName="LOAD_IDX_VALUE" DataSourceName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@LOAD_IDX_VALUE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="LOAD_IDX_VALUE" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="LOAD_IDX_VALUE" ColumnName="LOAD_IDX_VALUE" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@LOAD_IDX_VALUE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="LOAD_IDX_VALUE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(30)" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="30" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(30)" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="30" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="REGEX_MATCH" ColumnName="REGEX_MATCH" DataSourceName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MATCH" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="REGEX_MATCH" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="REGEX_MATCH" ColumnName="REGEX_MATCH" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MATCH" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="REGEX_MATCH" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="REGEX_MESSAGE_EN" ColumnName="REGEX_MESSAGE_EN" DataSourceName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MESSAGE_EN" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="REGEX_MESSAGE_EN" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="REGEX_MESSAGE_EN" ColumnName="REGEX_MESSAGE_EN" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MESSAGE_EN" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="REGEX_MESSAGE_EN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="REGEX_MESSAGE_DE" ColumnName="REGEX_MESSAGE_DE" DataSourceName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MESSAGE_DE" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="REGEX_MESSAGE_DE" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="REGEX_MESSAGE_DE" ColumnName="REGEX_MESSAGE_DE" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(1000)" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MESSAGE_DE" Precision="0" ProviderType="VarChar" Scale="0" Size="1000" SourceColumn="REGEX_MESSAGE_DE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="DEFAULT_VALUE" ColumnName="DEFAULT_VALUE" DataSourceName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@DEFAULT_VALUE" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="DEFAULT_VALUE" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="DEFAULT_VALUE" ColumnName="DEFAULT_VALUE" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@DEFAULT_VALUE" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="DEFAULT_VALUE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="SEQUENCE" ColumnName="SEQUENCE" DataSourceName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="SEQUENCE" ColumnName="SEQUENCE" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@SEQUENCE" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="SEQUENCE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="ADVANCED_LOOKUP" ColumnName="ADVANCED_LOOKUP" DataSourceName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ADVANCED_LOOKUP" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ADVANCED_LOOKUP" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="ADVANCED_LOOKUP" ColumnName="ADVANCED_LOOKUP" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ADVANCED_LOOKUP" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ADVANCED_LOOKUP" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="SUMMARY_FUNCTION" ColumnName="SUMMARY_FUNCTION" DataSourceName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(20)" DbType="AnsiString" Direction="Input" ParameterName="@SUMMARY_FUNCTION" Precision="0" ProviderType="VarChar" Scale="0" Size="20" SourceColumn="SUMMARY_FUNCTION" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="SUMMARY_FUNCTION" ColumnName="SUMMARY_FUNCTION" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(20)" DbType="AnsiString" Direction="Input" ParameterName="@SUMMARY_FUNCTION" Precision="0" ProviderType="VarChar" Scale="0" Size="20" SourceColumn="SUMMARY_FUNCTION" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="TYPE_COLUMN" ColumnName="TYPE_COLUMN" DataSourceName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(20)" DbType="AnsiString" Direction="Input" ParameterName="@TYPE_COLUMN" Precision="0" ProviderType="VarChar" Scale="0" Size="20" SourceColumn="TYPE_COLUMN" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="TYPE_COLUMN" ColumnName="TYPE_COLUMN" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(20)" DbType="AnsiString" Direction="Input" ParameterName="@TYPE_COLUMN" Precision="0" ProviderType="VarChar" Scale="0" Size="20" SourceColumn="TYPE_COLUMN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="LU_CAPTION" ColumnName="LU_CAPTION" DataSourceName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(150)" DbType="AnsiString" Direction="Input" ParameterName="@LU_CAPTION" Precision="0" ProviderType="VarChar" Scale="0" Size="150" SourceColumn="LU_CAPTION" SourceColumnNullMapping="false" SourceVersion="Current" /> <Parameter AllowDbNull="false" AutogeneratedName="LU_CAPTION" ColumnName="LU_CAPTION" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="varchar(150)" DbType="AnsiString" Direction="Input" ParameterName="@LU_CAPTION" Precision="0" ProviderType="VarChar" Scale="0" Size="150" SourceColumn="LU_CAPTION" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.dbo.TBPM_CONTROL_TABLE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" /> <Parameter AllowDbNull="false" AutogeneratedName="INHERIT_VALUE" ColumnName="INHERIT_VALUE" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@INHERIT_VALUE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="INHERIT_VALUE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="FORMULA_EXPRESSION" ColumnName="FORMULA_EXPRESSION" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="nvarchar(1000)" DbType="String" Direction="Input" ParameterName="@FORMULA_EXPRESSION" Precision="0" ProviderType="NVarChar" Scale="0" Size="1000" SourceColumn="FORMULA_EXPRESSION" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM.dbo.TBPM_CONTROL_TABLE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters> </Parameters>
</DbCommand> </DbCommand>
</SelectCommand> </SelectCommand>
@@ -1413,7 +1446,8 @@ WHERE (CONTROL_ID = @CONTROL_ID)</CommandText>
<SelectCommand> <SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true"> <DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT ADDED_WHEN, ADDED_WHO, ADVANCED_LOOKUP, CHANGED_WHEN, CHANGED_WHO, CHOICE_LIST, CONNECTION_ID, CONTROL_ID, DEFAULT_VALUE, GUID, LOAD_IDX_VALUE, READ_ONLY, REGEX_MATCH, <CommandText>SELECT ADDED_WHEN, ADDED_WHO, ADVANCED_LOOKUP, CHANGED_WHEN, CHANGED_WHO, CHOICE_LIST, CONNECTION_ID, CONTROL_ID, DEFAULT_VALUE, GUID, LOAD_IDX_VALUE, READ_ONLY, REGEX_MATCH,
REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, SEQUENCE, SPALTENBREITE, SPALTENNAME, SPALTEN_HEADER, SQL_COMMAND, VALIDATION, SUMMARY_FUNCTION, TYPE_COLUMN, LU_CAPTION REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, SEQUENCE, SPALTENBREITE, SPALTENNAME, SPALTEN_HEADER, SQL_COMMAND, VALIDATION, SUMMARY_FUNCTION, TYPE_COLUMN, LU_CAPTION, INHERIT_VALUE,
FORMULA_EXPRESSION
FROM TBPM_CONTROL_TABLE</CommandText> FROM TBPM_CONTROL_TABLE</CommandText>
<Parameters /> <Parameters />
</DbCommand> </DbCommand>
@@ -1423,7 +1457,8 @@ FROM TBPM_CONTROL_TABLE</CommandText>
<SelectCommand> <SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true"> <DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT ADDED_WHEN, ADDED_WHO, ADVANCED_LOOKUP, CHANGED_WHEN, CHANGED_WHO, CHOICE_LIST, CONNECTION_ID, CONTROL_ID, DEFAULT_VALUE, GUID, LOAD_IDX_VALUE, READ_ONLY, REGEX_MATCH, <CommandText>SELECT ADDED_WHEN, ADDED_WHO, ADVANCED_LOOKUP, CHANGED_WHEN, CHANGED_WHO, CHOICE_LIST, CONNECTION_ID, CONTROL_ID, DEFAULT_VALUE, GUID, LOAD_IDX_VALUE, READ_ONLY, REGEX_MATCH,
REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, SEQUENCE, SPALTENBREITE, SPALTENNAME, SPALTEN_HEADER, SQL_COMMAND, VALIDATION, SUMMARY_FUNCTION, TYPE_COLUMN, LU_CAPTION REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, SEQUENCE, SPALTENBREITE, SPALTENNAME, SPALTEN_HEADER, SQL_COMMAND, VALIDATION, SUMMARY_FUNCTION, TYPE_COLUMN, LU_CAPTION, INHERIT_VALUE,
FORMULA_EXPRESSION
FROM TBPM_CONTROL_TABLE FROM TBPM_CONTROL_TABLE
WHERE (GUID = @GUID)</CommandText> WHERE (GUID = @GUID)</CommandText>
<Parameters> <Parameters>
@@ -2665,8 +2700,15 @@ SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUME
</xs:simpleType> </xs:simpleType>
</xs:element> </xs:element>
<xs:element name="SAVE_CHANGE_ON_ENABLED" msprop:Generator_ColumnPropNameInTable="SAVE_CHANGE_ON_ENABLEDColumn" msprop:Generator_ColumnPropNameInRow="SAVE_CHANGE_ON_ENABLED" msprop:Generator_UserColumnName="SAVE_CHANGE_ON_ENABLED" msprop:Generator_ColumnVarNameInTable="columnSAVE_CHANGE_ON_ENABLED" type="xs:boolean" /> <xs:element name="SAVE_CHANGE_ON_ENABLED" msprop:Generator_ColumnPropNameInTable="SAVE_CHANGE_ON_ENABLEDColumn" msprop:Generator_ColumnPropNameInRow="SAVE_CHANGE_ON_ENABLED" msprop:Generator_UserColumnName="SAVE_CHANGE_ON_ENABLED" msprop:Generator_ColumnVarNameInTable="columnSAVE_CHANGE_ON_ENABLED" type="xs:boolean" />
<xs:element name="FORMAT_STRING" msprop:Generator_ColumnPropNameInTable="FORMAT_STRINGColumn" msprop:Generator_ColumnPropNameInRow="FORMAT_STRING" msprop:Generator_UserColumnName="FORMAT_STRING" msprop:Generator_ColumnVarNameInTable="columnFORMAT_STRING" type="xs:string" /> <xs:element name="FORMAT_STRING" msprop:Generator_ColumnPropNameInTable="FORMAT_STRINGColumn" msprop:Generator_ColumnPropNameInRow="FORMAT_STRING" msprop:Generator_UserColumnName="FORMAT_STRING" msprop:Generator_ColumnVarNameInTable="columnFORMAT_STRING" type="xs:string" default="" minOccurs="0" />
<xs:element name="BACKCOLOR_IF" msprop:Generator_ColumnPropNameInTable="BACKCOLOR_IFColumn" msprop:Generator_ColumnPropNameInRow="BACKCOLOR_IF" msprop:Generator_UserColumnName="BACKCOLOR_IF" msprop:Generator_ColumnVarNameInTable="columnBACKCOLOR_IF" type="xs:string" minOccurs="0" /> <xs:element name="BACKCOLOR_IF" msprop:Generator_ColumnPropNameInTable="BACKCOLOR_IFColumn" msprop:Generator_ColumnPropNameInRow="BACKCOLOR_IF" msprop:Generator_UserColumnName="BACKCOLOR_IF" msprop:Generator_ColumnVarNameInTable="columnBACKCOLOR_IF" type="xs:string" minOccurs="0" />
<xs:element name="TEXT_ALIGNMENT" msprop:Generator_ColumnPropNameInTable="TEXT_ALIGNMENTColumn" msprop:Generator_ColumnPropNameInRow="TEXT_ALIGNMENT" msprop:Generator_UserColumnName="TEXT_ALIGNMENT" msprop:Generator_ColumnVarNameInTable="columnTEXT_ALIGNMENT" default="Near">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="20" />
</xs:restriction>
</xs:simpleType>
</xs:element>
</xs:sequence> </xs:sequence>
</xs:complexType> </xs:complexType>
</xs:element> </xs:element>
@@ -2769,6 +2811,14 @@ SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUME
</xs:restriction> </xs:restriction>
</xs:simpleType> </xs:simpleType>
</xs:element> </xs:element>
<xs:element name="INHERIT_VALUE" msprop:Generator_ColumnPropNameInTable="INHERIT_VALUEColumn" msprop:Generator_ColumnPropNameInRow="INHERIT_VALUE" msprop:Generator_UserColumnName="INHERIT_VALUE" msprop:Generator_ColumnVarNameInTable="columnINHERIT_VALUE" type="xs:boolean" default="false" />
<xs:element name="FORMULA_EXPRESSION" msprop:Generator_ColumnPropNameInTable="FORMULA_EXPRESSIONColumn" msprop:Generator_ColumnPropNameInRow="FORMULA_EXPRESSION" msprop:Generator_UserColumnName="FORMULA_EXPRESSION" msprop:Generator_ColumnVarNameInTable="columnFORMULA_EXPRESSION">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="1000" />
</xs:restriction>
</xs:simpleType>
</xs:element>
</xs:sequence> </xs:sequence>
</xs:complexType> </xs:complexType>
</xs:element> </xs:element>

View File

@@ -4,7 +4,7 @@
Changes to this file may cause incorrect behavior and will be lost if Changes to this file may cause incorrect behavior and will be lost if
the code is regenerated. the code is regenerated.
</autogenerated>--> </autogenerated>-->
<DiagramLayout xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" ex:showrelationlabel="False" ViewPortX="-27" ViewPortY="-97" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout"> <DiagramLayout xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" ex:showrelationlabel="False" ViewPortX="472" ViewPortY="129" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
<Shapes> <Shapes>
<Shape ID="DesignTable:TBPM_PROFILE_FINAL_INDEXING" ZOrder="14" X="1688" Y="-74" Height="324" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" /> <Shape ID="DesignTable:TBPM_PROFILE_FINAL_INDEXING" ZOrder="14" X="1688" Y="-74" Height="324" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" />
<Shape ID="DesignTable:TBPM_KONFIGURATION" ZOrder="2" X="-17" Y="232" Height="262" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="97" /> <Shape ID="DesignTable:TBPM_KONFIGURATION" ZOrder="2" X="-17" Y="232" Height="262" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="97" />
@@ -15,8 +15,8 @@
<Shape ID="DesignTable:TBPROFILE_USER" ZOrder="15" X="509" Y="-80" Height="267" Width="266" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" /> <Shape ID="DesignTable:TBPROFILE_USER" ZOrder="15" X="509" Y="-80" Height="267" Width="266" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
<Shape ID="DesignTable:TBPM_PROFILE_FILES" ZOrder="3" X="1391" Y="-70" Height="229" Width="268" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="83" /> <Shape ID="DesignTable:TBPM_PROFILE_FILES" ZOrder="3" X="1391" Y="-70" Height="229" Width="268" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="83" />
<Shape ID="DesignTable:TBWH_CHECK_PROFILE_CONTROLS" ZOrder="23" X="0" Y="-72" Height="168" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="78" /> <Shape ID="DesignTable:TBWH_CHECK_PROFILE_CONTROLS" ZOrder="23" X="0" Y="-72" Height="168" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="78" />
<Shape ID="DesignTable:TBPM_PROFILE_CONTROLS" ZOrder="12" X="947" Y="400" Height="381" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="24" OldDataTableHeight="0" SplitterPosition="254" /> <Shape ID="DesignTable:TBPM_PROFILE_CONTROLS" ZOrder="12" X="947" Y="404" Height="381" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="24" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBPM_CONTROL_TABLE" ZOrder="1" X="1299" Y="326" Height="381" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="24" OldDataTableHeight="0" SplitterPosition="254" /> <Shape ID="DesignTable:TBPM_CONTROL_TABLE" ZOrder="1" X="1297" Y="391" Height="381" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="24" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBDD_GROUPS" ZOrder="17" X="19" Y="320" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" /> <Shape ID="DesignTable:TBDD_GROUPS" ZOrder="17" X="19" Y="320" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
<Shape ID="DesignTable:TBPROFILE_GROUP" ZOrder="13" X="1054" Y="47" Height="286" Width="277" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" /> <Shape ID="DesignTable:TBPROFILE_GROUP" ZOrder="13" X="1054" Y="47" Height="286" Width="277" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" />
<Shape ID="DesignTable:FNPM_GET_FREE_USER_FOR_PROFILE" ZOrder="16" X="807" Y="155" Height="229" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" /> <Shape ID="DesignTable:FNPM_GET_FREE_USER_FOR_PROFILE" ZOrder="16" X="807" Y="155" Height="229" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" />
@@ -33,11 +33,11 @@
<RoutePoints> <RoutePoints>
<Point> <Point>
<X>1247</X> <X>1247</X>
<Y>542</Y> <Y>611</Y>
</Point> </Point>
<Point> <Point>
<X>1299</X> <X>1297</X>
<Y>542</Y> <Y>611</Y>
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </Connector>
@@ -49,11 +49,11 @@
</Point> </Point>
<Point> <Point>
<X>141</X> <X>141</X>
<Y>343</Y> <Y>408</Y>
</Point> </Point>
<Point> <Point>
<X>1299</X> <X>1297</X>
<Y>343</Y> <Y>408</Y>
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </Connector>
@@ -65,7 +65,7 @@
</Point> </Point>
<Point> <Point>
<X>965</X> <X>965</X>
<Y>400</Y> <Y>404</Y>
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </Connector>

View File

@@ -0,0 +1,73 @@
ADO.NET DataColumn.Expression Kompakte Übersicht
Spalten werden über den Spaltennamen referenziert, z. B. [MENGE].
GRUNDOPERATOREN
- Arithmetik: + - * /
Beispiel: [A] * [B]
- Vergleich: = <> > >= < <=
Beispiel: [MENGE] > 0
- Logik: AND OR NOT
Beispiel: [A] > 0 AND [B] < 10
- Klammern: (...)
Beispiel: ([A] + [B]) * 2
STRING-VERKETTUNG
- Verkettung: +
Beispiel: [VORNAME] + ' - ' + [NACHNAME]
- Typkonvertierung: Convert
Beispiel: Convert([NUMMER], 'System.String')
BEDINGUNGEN
- IIF(Bedingung, True, False)
Beispiel: IIF([A] = 'Harry', 'Blume', 'Tier')
HÄUFIGE FUNKTIONEN
- Len([TEXT])
- Trim([TEXT])
- Substring([TEXT], 0, 3)
- IsNull([WERT], 0)
- Convert([WERT], 'System.Double')
BEISPIELE (FORMULA_EXPRESSION)
- Multiplikation: [MENGE] * [PREIS]
- Addieren: [A] + [B]
- Division: [A] / [B]
- Text zusammensetzen: [SAKNR] + ' - ' + [KST]
- Bedingung: IIF([STATUS] = 'X', 'OK', 'NOK')ADO.NET DataColumn.Expression Kompakte Übersicht
Spalten werden über den Spaltennamen referenziert, z. B. [MENGE].
GRUNDOPERATOREN
- Arithmetik: + - * /
Beispiel: [A] * [B]
- Vergleich: = <> > >= < <=
Beispiel: [MENGE] > 0
- Logik: AND OR NOT
Beispiel: [A] > 0 AND [B] < 10
- Klammern: (...)
Beispiel: ([A] + [B]) * 2
STRING-VERKETTUNG
- Verkettung: +
Beispiel: [VORNAME] + ' - ' + [NACHNAME]
- Typkonvertierung: Convert
Beispiel: Convert([NUMMER], 'System.String')
BEDINGUNGEN
- IIF(Bedingung, True, False)
Beispiel: IIF([A] = 'Harry', 'Blume', 'Tier')
HÄUFIGE FUNKTIONEN
- Len([TEXT])
- Trim([TEXT])
- Substring([TEXT], 0, 3)
- IsNull([WERT], 0)
- Convert([WERT], 'System.Double')
BEISPIELE (FORMULA_EXPRESSION)
- Multiplikation: [MENGE] * [PREIS]
- Addieren: [A] + [B]
- Division: [A] / [B]
- Text zusammensetzen: [SAKNR] + ' - ' + [KST]
- Bedingung: IIF([STATUS] = 'X', 'OK', 'NOK')

View File

@@ -1213,7 +1213,7 @@ Namespace FinalIndexDataSetTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _
Private Sub InitConnection() Private Sub InitConnection()
Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection()
Me._connection.ConnectionString = Global.DD_ProcessManager.My.MySettings.Default.ConnectionString Me._connection.ConnectionString = Global.taskFLOW.My.MySettings.Default.ConnectionString
End Sub End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _

View File

@@ -4,7 +4,7 @@
<xs:appinfo source="urn:schemas-microsoft-com:xml-msdatasource"> <xs:appinfo source="urn:schemas-microsoft-com:xml-msdatasource">
<DataSource DefaultConnectionIndex="0" FunctionsComponentName="QueriesTableAdapter" Modifier="AutoLayout, AnsiClass, Class, Public" SchemaSerializationMode="IncludeSchema" xmlns="urn:schemas-microsoft-com:xml-msdatasource"> <DataSource DefaultConnectionIndex="0" FunctionsComponentName="QueriesTableAdapter" Modifier="AutoLayout, AnsiClass, Class, Public" SchemaSerializationMode="IncludeSchema" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<Connections> <Connections>
<Connection AppSettingsObjectName="MySettings" AppSettingsPropertyName="ConnectionString" ConnectionStringObject="" IsAppSettingsProperty="true" Modifier="Assembly" Name="ConnectionString (MySettings)" ParameterPrefix="@" PropertyReference="ApplicationSettings.DD_ProcessManager.My.MySettings.GlobalReference.Default.ConnectionString" Provider="System.Data.SqlClient" /> <Connection AppSettingsObjectName="MySettings" AppSettingsPropertyName="ConnectionString" ConnectionStringObject="" IsAppSettingsProperty="true" Modifier="Assembly" Name="ConnectionString (MySettings)" ParameterPrefix="@" PropertyReference="ApplicationSettings.taskFLOW.My.MySettings.GlobalReference.Default.ConnectionString" Provider="System.Data.SqlClient" />
</Connections> </Connections>
<Tables> <Tables>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBPM_PROFILE_FINAL_INDEXINGTableAdapter" GeneratorDataComponentClassName="TBPM_PROFILE_FINAL_INDEXINGTableAdapter" Name="TBPM_PROFILE_FINAL_INDEXING" UserDataComponentName="TBPM_PROFILE_FINAL_INDEXINGTableAdapter"> <TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBPM_PROFILE_FINAL_INDEXINGTableAdapter" GeneratorDataComponentClassName="TBPM_PROFILE_FINAL_INDEXINGTableAdapter" Name="TBPM_PROFILE_FINAL_INDEXING" UserDataComponentName="TBPM_PROFILE_FINAL_INDEXINGTableAdapter">
@@ -66,71 +66,71 @@ WHERE (GUID = @guid)</CommandText>
</DataSource> </DataSource>
</xs:appinfo> </xs:appinfo>
</xs:annotation> </xs:annotation>
<xs:element name="FinalIndexDataSet" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="true" msprop:Generator_DataSetName="FinalIndexDataSet" msprop:Generator_UserDSName="FinalIndexDataSet"> <xs:element name="FinalIndexDataSet" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="true" msprop:Generator_UserDSName="FinalIndexDataSet" msprop:Generator_DataSetName="FinalIndexDataSet">
<xs:complexType> <xs:complexType>
<xs:choice minOccurs="0" maxOccurs="unbounded"> <xs:choice minOccurs="0" maxOccurs="unbounded">
<xs:element name="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_TableClassName="TBPM_PROFILE_FINAL_INDEXINGDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowChangedName="TBPM_PROFILE_FINAL_INDEXINGRowChanged" msprop:Generator_TablePropName="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowDeletingName="TBPM_PROFILE_FINAL_INDEXINGRowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILE_FINAL_INDEXINGRowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_FINAL_INDEXINGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_FINAL_INDEXINGRowDeleted" msprop:Generator_RowClassName="TBPM_PROFILE_FINAL_INDEXINGRow" msprop:Generator_UserTableName="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowEvArgName="TBPM_PROFILE_FINAL_INDEXINGRowChangeEvent"> <xs:element name="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_FINAL_INDEXINGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_FINAL_INDEXINGRowDeleted" msprop:Generator_RowDeletingName="TBPM_PROFILE_FINAL_INDEXINGRowDeleting" msprop:Generator_RowEvArgName="TBPM_PROFILE_FINAL_INDEXINGRowChangeEvent" msprop:Generator_TablePropName="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowChangedName="TBPM_PROFILE_FINAL_INDEXINGRowChanged" msprop:Generator_RowChangingName="TBPM_PROFILE_FINAL_INDEXINGRowChanging" msprop:Generator_TableClassName="TBPM_PROFILE_FINAL_INDEXINGDataTable" msprop:Generator_RowClassName="TBPM_PROFILE_FINAL_INDEXINGRow" msprop:Generator_TableVarName="tableTBPM_PROFILE_FINAL_INDEXING" msprop:Generator_UserTableName="TBPM_PROFILE_FINAL_INDEXING">
<xs:complexType> <xs:complexType>
<xs:sequence> <xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" /> <xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_UserColumnName="GUID" type="xs:int" />
<xs:element name="PROFIL_ID" msprop:Generator_ColumnVarNameInTable="columnPROFIL_ID" msprop:Generator_ColumnPropNameInRow="PROFIL_ID" msprop:Generator_ColumnPropNameInTable="PROFIL_IDColumn" msprop:Generator_UserColumnName="PROFIL_ID" type="xs:int" /> <xs:element name="PROFIL_ID" msprop:Generator_ColumnPropNameInRow="PROFIL_ID" msprop:Generator_ColumnPropNameInTable="PROFIL_IDColumn" msprop:Generator_ColumnVarNameInTable="columnPROFIL_ID" msprop:Generator_UserColumnName="PROFIL_ID" type="xs:int" />
<xs:element name="CONNECTION_ID" msprop:Generator_ColumnVarNameInTable="columnCONNECTION_ID" msprop:Generator_ColumnPropNameInRow="CONNECTION_ID" msprop:Generator_ColumnPropNameInTable="CONNECTION_IDColumn" msprop:Generator_UserColumnName="CONNECTION_ID" type="xs:short" /> <xs:element name="CONNECTION_ID" msprop:Generator_ColumnPropNameInRow="CONNECTION_ID" msprop:Generator_ColumnPropNameInTable="CONNECTION_IDColumn" msprop:Generator_ColumnVarNameInTable="columnCONNECTION_ID" msprop:Generator_UserColumnName="CONNECTION_ID" type="xs:short" />
<xs:element name="SQL_COMMAND" msprop:Generator_ColumnVarNameInTable="columnSQL_COMMAND" msprop:Generator_ColumnPropNameInRow="SQL_COMMAND" msprop:Generator_ColumnPropNameInTable="SQL_COMMANDColumn" msprop:Generator_UserColumnName="SQL_COMMAND"> <xs:element name="SQL_COMMAND" msprop:Generator_ColumnPropNameInRow="SQL_COMMAND" msprop:Generator_ColumnPropNameInTable="SQL_COMMANDColumn" msprop:Generator_ColumnVarNameInTable="columnSQL_COMMAND" msprop:Generator_UserColumnName="SQL_COMMAND">
<xs:simpleType> <xs:simpleType>
<xs:restriction base="xs:string"> <xs:restriction base="xs:string">
<xs:maxLength value="2147483647" /> <xs:maxLength value="2147483647" />
</xs:restriction> </xs:restriction>
</xs:simpleType> </xs:simpleType>
</xs:element> </xs:element>
<xs:element name="INDEXNAME" msprop:Generator_ColumnVarNameInTable="columnINDEXNAME" msprop:Generator_ColumnPropNameInRow="INDEXNAME" msprop:Generator_ColumnPropNameInTable="INDEXNAMEColumn" msprop:Generator_UserColumnName="INDEXNAME"> <xs:element name="INDEXNAME" msprop:Generator_ColumnPropNameInRow="INDEXNAME" msprop:Generator_ColumnPropNameInTable="INDEXNAMEColumn" msprop:Generator_ColumnVarNameInTable="columnINDEXNAME" msprop:Generator_UserColumnName="INDEXNAME">
<xs:simpleType> <xs:simpleType>
<xs:restriction base="xs:string"> <xs:restriction base="xs:string">
<xs:maxLength value="100" /> <xs:maxLength value="100" />
</xs:restriction> </xs:restriction>
</xs:simpleType> </xs:simpleType>
</xs:element> </xs:element>
<xs:element name="VALUE" msprop:Generator_ColumnVarNameInTable="columnVALUE" msprop:Generator_ColumnPropNameInRow="VALUE" msprop:Generator_ColumnPropNameInTable="VALUEColumn" msprop:Generator_UserColumnName="VALUE"> <xs:element name="VALUE" msprop:Generator_ColumnPropNameInRow="VALUE" msprop:Generator_ColumnPropNameInTable="VALUEColumn" msprop:Generator_ColumnVarNameInTable="columnVALUE" msprop:Generator_UserColumnName="VALUE">
<xs:simpleType> <xs:simpleType>
<xs:restriction base="xs:string"> <xs:restriction base="xs:string">
<xs:maxLength value="100" /> <xs:maxLength value="100" />
</xs:restriction> </xs:restriction>
</xs:simpleType> </xs:simpleType>
</xs:element> </xs:element>
<xs:element name="ADDED_WHO" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_UserColumnName="ADDED_WHO"> <xs:element name="ADDED_WHO" msprop:Generator_ColumnPropNameInRow="ADDED_WHO" msprop:Generator_ColumnPropNameInTable="ADDED_WHOColumn" msprop:Generator_ColumnVarNameInTable="columnADDED_WHO" msprop:Generator_UserColumnName="ADDED_WHO">
<xs:simpleType> <xs:simpleType>
<xs:restriction base="xs:string"> <xs:restriction base="xs:string">
<xs:maxLength value="30" /> <xs:maxLength value="30" />
</xs:restriction> </xs:restriction>
</xs:simpleType> </xs:simpleType>
</xs:element> </xs:element>
<xs:element name="ADDED_WHEN" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_UserColumnName="ADDED_WHEN" type="xs:dateTime" /> <xs:element name="ADDED_WHEN" msprop:Generator_ColumnPropNameInRow="ADDED_WHEN" msprop:Generator_ColumnPropNameInTable="ADDED_WHENColumn" msprop:Generator_ColumnVarNameInTable="columnADDED_WHEN" msprop:Generator_UserColumnName="ADDED_WHEN" type="xs:dateTime" />
<xs:element name="CHANGED_WHO" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHO" msprop:Generator_ColumnPropNameInRow="CHANGED_WHO" msprop:Generator_ColumnPropNameInTable="CHANGED_WHOColumn" msprop:Generator_UserColumnName="CHANGED_WHO" minOccurs="0"> <xs:element name="CHANGED_WHO" msprop:Generator_ColumnPropNameInRow="CHANGED_WHO" msprop:Generator_ColumnPropNameInTable="CHANGED_WHOColumn" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHO" msprop:Generator_UserColumnName="CHANGED_WHO" minOccurs="0">
<xs:simpleType> <xs:simpleType>
<xs:restriction base="xs:string"> <xs:restriction base="xs:string">
<xs:maxLength value="30" /> <xs:maxLength value="30" />
</xs:restriction> </xs:restriction>
</xs:simpleType> </xs:simpleType>
</xs:element> </xs:element>
<xs:element name="CHANGED_WHEN" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_UserColumnName="CHANGED_WHEN" type="xs:dateTime" minOccurs="0" /> <xs:element name="CHANGED_WHEN" msprop:Generator_ColumnPropNameInRow="CHANGED_WHEN" msprop:Generator_ColumnPropNameInTable="CHANGED_WHENColumn" msprop:Generator_ColumnVarNameInTable="columnCHANGED_WHEN" msprop:Generator_UserColumnName="CHANGED_WHEN" type="xs:dateTime" minOccurs="0" />
<xs:element name="DESCRIPTION" msprop:Generator_ColumnVarNameInTable="columnDESCRIPTION" msprop:Generator_ColumnPropNameInRow="DESCRIPTION" msprop:Generator_ColumnPropNameInTable="DESCRIPTIONColumn" msprop:Generator_UserColumnName="DESCRIPTION"> <xs:element name="DESCRIPTION" msprop:Generator_ColumnPropNameInRow="DESCRIPTION" msprop:Generator_ColumnPropNameInTable="DESCRIPTIONColumn" msprop:Generator_ColumnVarNameInTable="columnDESCRIPTION" msprop:Generator_UserColumnName="DESCRIPTION">
<xs:simpleType> <xs:simpleType>
<xs:restriction base="xs:string"> <xs:restriction base="xs:string">
<xs:maxLength value="2147483647" /> <xs:maxLength value="2147483647" />
</xs:restriction> </xs:restriction>
</xs:simpleType> </xs:simpleType>
</xs:element> </xs:element>
<xs:element name="ACTIVE" msprop:Generator_ColumnVarNameInTable="columnACTIVE" msprop:Generator_ColumnPropNameInRow="ACTIVE" msprop:Generator_ColumnPropNameInTable="ACTIVEColumn" msprop:Generator_UserColumnName="ACTIVE" type="xs:boolean" /> <xs:element name="ACTIVE" msprop:Generator_ColumnPropNameInRow="ACTIVE" msprop:Generator_ColumnPropNameInTable="ACTIVEColumn" msprop:Generator_ColumnVarNameInTable="columnACTIVE" msprop:Generator_UserColumnName="ACTIVE" type="xs:boolean" />
<xs:element name="PREVENT_DUPLICATES" msprop:Generator_ColumnVarNameInTable="columnPREVENT_DUPLICATES" msprop:Generator_ColumnPropNameInRow="PREVENT_DUPLICATES" msprop:Generator_ColumnPropNameInTable="PREVENT_DUPLICATESColumn" msprop:Generator_UserColumnName="PREVENT_DUPLICATES" type="xs:boolean" /> <xs:element name="PREVENT_DUPLICATES" msprop:Generator_ColumnPropNameInRow="PREVENT_DUPLICATES" msprop:Generator_ColumnPropNameInTable="PREVENT_DUPLICATESColumn" msprop:Generator_ColumnVarNameInTable="columnPREVENT_DUPLICATES" msprop:Generator_UserColumnName="PREVENT_DUPLICATES" type="xs:boolean" />
<xs:element name="ALLOW_NEW_VALUES" msprop:Generator_ColumnVarNameInTable="columnALLOW_NEW_VALUES" msprop:Generator_ColumnPropNameInRow="ALLOW_NEW_VALUES" msprop:Generator_ColumnPropNameInTable="ALLOW_NEW_VALUESColumn" msprop:Generator_UserColumnName="ALLOW_NEW_VALUES" type="xs:boolean" /> <xs:element name="ALLOW_NEW_VALUES" msprop:Generator_ColumnPropNameInRow="ALLOW_NEW_VALUES" msprop:Generator_ColumnPropNameInTable="ALLOW_NEW_VALUESColumn" msprop:Generator_ColumnVarNameInTable="columnALLOW_NEW_VALUES" msprop:Generator_UserColumnName="ALLOW_NEW_VALUES" type="xs:boolean" />
<xs:element name="IF_VEKTOR_BEHAVIOUR" msprop:Generator_ColumnVarNameInTable="columnIF_VEKTOR_BEHAVIOUR" msprop:Generator_ColumnPropNameInRow="IF_VEKTOR_BEHAVIOUR" msprop:Generator_ColumnPropNameInTable="IF_VEKTOR_BEHAVIOURColumn" msprop:Generator_UserColumnName="IF_VEKTOR_BEHAVIOUR"> <xs:element name="IF_VEKTOR_BEHAVIOUR" msprop:Generator_ColumnPropNameInRow="IF_VEKTOR_BEHAVIOUR" msprop:Generator_ColumnPropNameInTable="IF_VEKTOR_BEHAVIOURColumn" msprop:Generator_ColumnVarNameInTable="columnIF_VEKTOR_BEHAVIOUR" msprop:Generator_UserColumnName="IF_VEKTOR_BEHAVIOUR">
<xs:simpleType> <xs:simpleType>
<xs:restriction base="xs:string"> <xs:restriction base="xs:string">
<xs:maxLength value="25" /> <xs:maxLength value="25" />
</xs:restriction> </xs:restriction>
</xs:simpleType> </xs:simpleType>
</xs:element> </xs:element>
<xs:element name="SEQUENCE" msprop:Generator_ColumnVarNameInTable="columnSEQUENCE" msprop:Generator_ColumnPropNameInRow="SEQUENCE" msprop:Generator_ColumnPropNameInTable="SEQUENCEColumn" msprop:Generator_UserColumnName="SEQUENCE" type="xs:unsignedByte" default="0" /> <xs:element name="SEQUENCE" msprop:Generator_ColumnPropNameInRow="SEQUENCE" msprop:Generator_ColumnPropNameInTable="SEQUENCEColumn" msprop:Generator_ColumnVarNameInTable="columnSEQUENCE" msprop:Generator_UserColumnName="SEQUENCE" type="xs:unsignedByte" default="0" />
<xs:element name="CONTINUE_INDETERMINED" msprop:Generator_ColumnVarNameInTable="columnCONTINUE_INDETERMINED" msprop:Generator_ColumnPropNameInRow="CONTINUE_INDETERMINED" msprop:Generator_ColumnPropNameInTable="CONTINUE_INDETERMINEDColumn" msprop:Generator_UserColumnName="CONTINUE_INDETERMINED" type="xs:boolean" /> <xs:element name="CONTINUE_INDETERMINED" msprop:Generator_ColumnPropNameInRow="CONTINUE_INDETERMINED" msprop:Generator_ColumnPropNameInTable="CONTINUE_INDETERMINEDColumn" msprop:Generator_ColumnVarNameInTable="columnCONTINUE_INDETERMINED" msprop:Generator_UserColumnName="CONTINUE_INDETERMINED" type="xs:boolean" />
</xs:sequence> </xs:sequence>
</xs:complexType> </xs:complexType>
</xs:element> </xs:element>

View File

@@ -2,6 +2,7 @@
Imports System.ComponentModel.Design Imports System.ComponentModel.Design
Imports System.Drawing.Design Imports System.Drawing.Design
Imports System.Globalization Imports System.Globalization
Imports DevExpress.XtraPrinting.Native
Imports DigitalData.Modules.Language.Utils Imports DigitalData.Modules.Language.Utils
Public Module ModuleControlProperties Public Module ModuleControlProperties
@@ -69,6 +70,35 @@ Public Module ModuleControlProperties
<Category(ClassConstants.CAT_DISPLAY)> <Category(ClassConstants.CAT_DISPLAY)>
Public Property TextColor As Color Public Property TextColor As Color
<DisplayName("Text Alignement")>
<Category(ClassConstants.CAT_DISPLAY)>
<TypeConverter(GetType(TextAlignmentConverter))>
Public Property TextAlignment As String
' Converter für Dropdown-Werte Near/Center/Far
Public Class TextAlignmentConverter
Inherits TypeConverter
Public Overrides Function GetStandardValuesSupported(context As ITypeDescriptorContext) As Boolean
Return True
End Function
' Optional: True, damit nur die vorgegebenen Werte erlaubt sind
Public Overrides Function GetStandardValuesExclusive(context As ITypeDescriptorContext) As Boolean
Return True
End Function
Public Overrides Function GetStandardValues(context As ITypeDescriptorContext) As StandardValuesCollection
Dim values = New List(Of String) From {"Near", "Center", "Far"}
Return New StandardValuesCollection(values)
End Function
Public Overrides Function ConvertTo(context As ITypeDescriptorContext, culture As CultureInfo, value As Object, destinationType As Type) As Object
If destinationType Is GetType(String) Then
Return If(value Is Nothing, "", value.ToString())
End If
Return MyBase.ConvertTo(context, culture, value, destinationType)
End Function
End Class
Class FontConverter Class FontConverter
Inherits TypeConverter Inherits TypeConverter
@@ -124,7 +154,7 @@ Public Module ModuleControlProperties
<Category(ClassConstants.CAT_DATA)> <Category(ClassConstants.CAT_DATA)>
Public Property SQLCommand() As SQLValue Public Property SQLCommand() As SQLValue
Get Get
Return New SQLValue(NotNull(_sql_command, "")) ', _sql_connection Return New SQLValue(ClassAllgemeineFunktionen.NotNullString(_sql_command, "")) ', _sql_connection
End Get End Get
Set(ByVal value As SQLValue) Set(ByVal value As SQLValue)
_sql_command = value.Value _sql_command = value.Value
@@ -150,7 +180,7 @@ Public Module ModuleControlProperties
<Category(ClassConstants.CAT_BEHAVIOUR)> <Category(ClassConstants.CAT_BEHAVIOUR)>
Public Property Enable_SQL() As SQLValue Public Property Enable_SQL() As SQLValue
Get Get
Return New SQLValue(NotNull(_Enable_SQL, "")) ', _sql_connection Return New SQLValue(ClassAllgemeineFunktionen.NotNullString(_Enable_SQL, "")) ', _sql_connection
End Get End Get
Set(ByVal value As SQLValue) Set(ByVal value As SQLValue)
_Enable_SQL = value.Value _Enable_SQL = value.Value
@@ -163,7 +193,7 @@ Public Module ModuleControlProperties
<Category(ClassConstants.CAT_BEHAVIOUR)> <Category(ClassConstants.CAT_BEHAVIOUR)>
Public Property Enable_SQL_OnLoad() As SQLValue Public Property Enable_SQL_OnLoad() As SQLValue
Get Get
Return New SQLValue(NotNull(_Enable_SQL_ONLOAD, "")) ', _sql_connection Return New SQLValue(ClassAllgemeineFunktionen.NotNullString(_Enable_SQL_ONLOAD, "")) ', _sql_connection
End Get End Get
Set(ByVal value As SQLValue) Set(ByVal value As SQLValue)
_Enable_SQL_ONLOAD = value.Value _Enable_SQL_ONLOAD = value.Value
@@ -335,7 +365,7 @@ Public Module ModuleControlProperties
<Category(ClassConstants.CAT_DISPLAY)> <Category(ClassConstants.CAT_DISPLAY)>
Public Property CtrlImage() As ImageValue Public Property CtrlImage() As ImageValue
Get Get
Return New ImageValue(NotNull(_image_Value, "")) Return New ImageValue(ClassAllgemeineFunktionen.NotNullString(_image_Value, ""))
End Get End Get
Set(ByVal value As ImageValue) Set(ByVal value As ImageValue)
_image_Value = value.Value _image_Value = value.Value
@@ -346,7 +376,7 @@ Public Module ModuleControlProperties
<Category(ClassConstants.CAT_VALIDATION)> <Category(ClassConstants.CAT_VALIDATION)>
Public Property Override_SQL() As SQLValue Public Property Override_SQL() As SQLValue
Get Get
Return New SQLValue(NotNull(_Override_SQL, "")) ', _sql_connection Return New SQLValue(ClassAllgemeineFunktionen.NotNullString(_Override_SQL, "")) ', _sql_connection
End Get End Get
Set(ByVal value As SQLValue) Set(ByVal value As SQLValue)
_Override_SQL = value.Value _Override_SQL = value.Value

View File

@@ -14,7 +14,7 @@
Public Property NO_DETAIL_PROFILES As Boolean = False Public Property NO_DETAIL_PROFILES As Boolean = False
' Debug Settings ' Debug Settings
Public Property DEBUG As Boolean = False Public Property DEBUG As Boolean = False
Public Property LOG_HOTSPOTS As Boolean = False
Public Property INDEX_DMS_ERSTELLT = "DMS erstellt" Public Property INDEX_DMS_ERSTELLT = "DMS erstellt"
Public Property INDEX_DMS_ERSTELLT_ZEIT = "DMS erstellt (Zeit)" Public Property INDEX_DMS_ERSTELLT_ZEIT = "DMS erstellt (Zeit)"

View File

@@ -1,10 +1,11 @@
Imports WINDREAMLib Imports DigitalData.Modules.Config
Imports DigitalData.Modules.Config
Imports DigitalData.Modules.Logging
Imports DigitalData.Modules.EDMI.API
Imports DigitalData.Modules.Database Imports DigitalData.Modules.Database
Imports DigitalData.Modules.ZooFlow Imports DigitalData.Modules.EDMI.API
Imports DigitalData.Modules.Logging
Imports DigitalData.Modules.Windream Imports DigitalData.Modules.Windream
Imports DigitalData.Modules.ZooFlow
Imports taskFLOW.ClassConfig
Imports WINDREAMLib
Module ModuleRuntimeVariables Module ModuleRuntimeVariables
@@ -32,10 +33,15 @@ Module ModuleRuntimeVariables
Public Property BASEDATA_DT_PROFILE_SEARCHES_SQL As DataTable Public Property BASEDATA_DT_PROFILE_SEARCHES_SQL As DataTable
Public Property BASEDATA_DT_VW_PROFILE_USER As DataTable Public Property BASEDATA_DT_VW_PROFILE_USER As DataTable
Public Property BASEDATA_TBDD_COLUMNS_FORMAT As DataTable
Public Property BASEDATA_TBPM_PROFILE_CONTROLS As DataTable
Public Property CURRENT_ProfilGUID As Integer Public Property CURRENT_ProfilGUID As Integer
Public Property CURRENT_ProfilName As String Public Property CURRENT_ProfilName As String
Public Property CURRENT_PROFILE_LOG_INDEX As String Public Property CURRENT_PROFILE_LOG_INDEX As String
Public Property PROFILE_SHOW_DOCUMENT As Boolean = True Public Property PROFILE_SHOW_DOCUMENT As Boolean = True
Public Property PROFILE_NOT_RESP_COMMENT As Boolean = True
Public Property CURRENT_DOC_GUID As Int64 Public Property CURRENT_DOC_GUID As Int64
Public Property CURRENT_DOC_ID As Int64 Public Property CURRENT_DOC_ID As Int64
@@ -57,6 +63,7 @@ Module ModuleRuntimeVariables
Public Property USER_IS_ADMIN As Boolean = False Public Property USER_IS_ADMIN As Boolean = False
Public Property USER_ID = 0 Public Property USER_ID = 0
Public Property USER_MODULE_ID = 0
Public Property USER_PRENAME = "" Public Property USER_PRENAME = ""
Public Property USER_SURNAME = "" Public Property USER_SURNAME = ""
Public Property USER_SHORTNAME = "" Public Property USER_SHORTNAME = ""
@@ -75,6 +82,11 @@ Module ModuleRuntimeVariables
Public Property USER_USERNAME_ORG As String = "" Public Property USER_USERNAME_ORG As String = ""
Public Property USER_GHOST_MODE_ACTIVE As Boolean = False Public Property USER_GHOST_MODE_ACTIVE As Boolean = False
Public Property USER_GHOST_MODE_USRNAME As String = "" Public Property USER_GHOST_MODE_USRNAME As String = ""
Public Class UserInheritanceConfirmation
Public Property ColumnName As String = ""
Public Property Count As Integer
End Class
Public Property UserInheritance_ConfirmationByColumn As New List(Of UserInheritanceConfirmation)
Public Property FORCE_LAYOUT_OVERVIEW As Boolean = False Public Property FORCE_LAYOUT_OVERVIEW As Boolean = False
Public Property SHOW_CHARTS As Boolean = True Public Property SHOW_CHARTS As Boolean = True
@@ -89,6 +101,7 @@ Module ModuleRuntimeVariables
Public Property POPUP_REMINDER_ACTIVE As Boolean = True Public Property POPUP_REMINDER_ACTIVE As Boolean = True
Public Property INACTIVITY_DURATION As Integer = 0 Public Property INACTIVITY_DURATION As Integer = 0
Public Property INACTIVITYRecognized As Boolean = False Public Property INACTIVITYRecognized As Boolean = False
Public Property InheritanceMsgAmount As Integer = 5
Public Property LAST_EDITED_COLUMN As String = "NONE" Public Property LAST_EDITED_COLUMN As String = "NONE"
Public Property LAST_ADDED_COLUMN As String = "NONE" Public Property LAST_ADDED_COLUMN As String = "NONE"
Public Property MON_EDITED_COLUMN As String = "NONE" Public Property MON_EDITED_COLUMN As String = "NONE"
@@ -137,7 +150,6 @@ Module ModuleRuntimeVariables
Public Property CURRENT_DT_PROFILES As DataTable Public Property CURRENT_DT_PROFILES As DataTable
Public Property CURRENT_DT_PROFILE_LANGUAGE As DataTable Public Property CURRENT_DT_PROFILE_LANGUAGE As DataTable
Public Property CURRENT_DT_PROFILE As DataTable Public Property CURRENT_DT_PROFILE As DataTable
Public Property CURRENT_CONTROL_NAME_LIST As New List(Of String) Public Property CURRENT_CONTROL_NAME_LIST As New List(Of String)
@@ -145,7 +157,7 @@ Module ModuleRuntimeVariables
Public Property DTVWCONTROL_INDEX As DataTable Public Property DTVWCONTROL_INDEX As DataTable
Public Property DTCONTROLS_WITH_SQL As DataTable Public Property DTCONTROLS_WITH_SQL As DataTable
Public Property DTTBPM_PROFILE_FINAL_INDEXING As DataTable
Public Property CURRENT_CONTROL_ID As Integer Public Property CURRENT_CONTROL_ID As Integer
Public Property errormessage As String Public Property errormessage As String

View File

@@ -32,7 +32,7 @@ Namespace My
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _ <Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Protected Overrides Sub OnCreateMainForm() Protected Overrides Sub OnCreateMainForm()
Me.MainForm = Global.DD_ProcessManager.frmMain Me.MainForm = Global.taskFLOW.frmMain
End Sub End Sub
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _ <Global.System.Diagnostics.DebuggerStepThroughAttribute()> _

View File

@@ -8,5 +8,5 @@
<AuthenticationMode>0</AuthenticationMode> <AuthenticationMode>0</AuthenticationMode>
<MinimumSplashScreenDisplayTime>0</MinimumSplashScreenDisplayTime> <MinimumSplashScreenDisplayTime>0</MinimumSplashScreenDisplayTime>
<SaveMySettingsOnExit>true</SaveMySettingsOnExit> <SaveMySettingsOnExit>true</SaveMySettingsOnExit>
<HighDpiMpde>false</HighDpiMpde> <HighDpiMode>0</HighDpiMode>
</MyApplicationData> </MyApplicationData>

View File

@@ -32,6 +32,6 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("2.5.4.3")> <Assembly: AssemblyVersion("2.8.2.0")>
<Assembly: AssemblyFileVersion("1.0.0.0")> <Assembly: AssemblyFileVersion("1.0.0.0")>
<Assembly: NeutralResourcesLanguage("")> <Assembly: NeutralResourcesLanguage("")>

View File

@@ -39,7 +39,7 @@ Namespace My.Resources
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
Get Get
If Object.ReferenceEquals(resourceMan, Nothing) Then If Object.ReferenceEquals(resourceMan, Nothing) Then
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DD_ProcessManager.Resources", GetType(Resources).Assembly) Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("taskFLOW.Resources", GetType(Resources).Assembly)
resourceMan = temp resourceMan = temp
End If End If
Return resourceMan Return resourceMan

View File

@@ -15,7 +15,7 @@ Option Explicit On
Namespace My Namespace My
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _ <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.9.0.0"), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.14.0.0"), _
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _ Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Partial Friend NotInheritable Class MySettings Partial Friend NotInheritable Class MySettings
Inherits Global.System.Configuration.ApplicationSettingsBase Inherits Global.System.Configuration.ApplicationSettingsBase
@@ -156,7 +156,7 @@ Namespace My
<Global.System.Configuration.UserScopedSettingAttribute(), _ <Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("563")> _ Global.System.Configuration.DefaultSettingValueAttribute("346")> _
Public Property frmValSearchSplitterDistance() As Integer Public Property frmValSearchSplitterDistance() As Integer
Get Get
Return CType(Me("frmValSearchSplitterDistance"),Integer) Return CType(Me("frmValSearchSplitterDistance"),Integer)
@@ -263,9 +263,9 @@ Namespace My
Friend Module MySettingsProperty Friend Module MySettingsProperty
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _ <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
Friend ReadOnly Property Settings() As Global.DD_ProcessManager.My.MySettings Friend ReadOnly Property Settings() As Global.taskFLOW.My.MySettings
Get Get
Return Global.DD_ProcessManager.My.MySettings.Default Return Global.taskFLOW.My.MySettings.Default
End Get End Get
End Property End Property
End Module End Module

View File

@@ -27,7 +27,7 @@
<Value Profile="(Default)">0, 0</Value> <Value Profile="(Default)">0, 0</Value>
</Setting> </Setting>
<Setting Name="frmValSearchSplitterDistance" Type="System.Int32" Scope="User"> <Setting Name="frmValSearchSplitterDistance" Type="System.Int32" Scope="User">
<Value Profile="(Default)">563</Value> <Value Profile="(Default)">346</Value>
</Setting> </Setting>
<Setting Name="frmMainWindowState" Type="System.String" Scope="User"> <Setting Name="frmMainWindowState" Type="System.String" Scope="User">
<Value Profile="(Default)">Normal</Value> <Value Profile="(Default)">Normal</Value>

View File

@@ -1,5 +0,0 @@
BASE MODULE
===========
This module is intended for often used constants and datastructures.
Therefor it is important that this module does not have any dependencies on other modules!!

View File

@@ -1,5 +1,5 @@
<?xml version="1.0" encoding="utf-8"?> <?xml version="1.0" encoding="utf-8"?>
<Project ToolsVersion="12.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <Project ToolsVersion="15.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<Import Project="..\packages\EntityFramework.6.4.4\build\EntityFramework.props" Condition="Exists('..\packages\EntityFramework.6.4.4\build\EntityFramework.props')" /> <Import Project="..\packages\EntityFramework.6.4.4\build\EntityFramework.props" Condition="Exists('..\packages\EntityFramework.6.4.4\build\EntityFramework.props')" />
<PropertyGroup> <PropertyGroup>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration> <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
@@ -9,8 +9,8 @@
<SchemaVersion>2.0</SchemaVersion> <SchemaVersion>2.0</SchemaVersion>
<ProjectGuid>{6ACA1432-09A2-47EF-A704-C0AA73905756}</ProjectGuid> <ProjectGuid>{6ACA1432-09A2-47EF-A704-C0AA73905756}</ProjectGuid>
<OutputType>WinExe</OutputType> <OutputType>WinExe</OutputType>
<StartupObject>DD_ProcessManager.My.MyApplication</StartupObject> <StartupObject>taskFLOW.My.MyApplication</StartupObject>
<RootNamespace>DD_ProcessManager</RootNamespace> <RootNamespace>taskFLOW</RootNamespace>
<AssemblyName>taskFLOW</AssemblyName> <AssemblyName>taskFLOW</AssemblyName>
<FileAlignment>512</FileAlignment> <FileAlignment>512</FileAlignment>
<MyType>WindowsForms</MyType> <MyType>WindowsForms</MyType>
@@ -77,14 +77,16 @@
<PropertyGroup> <PropertyGroup>
<ApplicationManifest>My Project\app.manifest</ApplicationManifest> <ApplicationManifest>My Project\app.manifest</ApplicationManifest>
</PropertyGroup> </PropertyGroup>
<ItemGroup>
<GdPictureAssemblies Include="$(SolutionDir)lib\GdPicture14*.dll" />
</ItemGroup>
<Target Name="CopyGdPictureDlls" AfterTargets="Build">
<Copy SourceFiles="@(GdPictureAssemblies)" DestinationFolder="$(TargetDir)" SkipUnchangedFiles="true" />
</Target>
<ItemGroup> <ItemGroup>
<Reference Include="BouncyCastle.Cryptography, Version=2.0.0.0, Culture=neutral, PublicKeyToken=072edcf4a5328938, processorArchitecture=MSIL"> <Reference Include="BouncyCastle.Cryptography, Version=2.0.0.0, Culture=neutral, PublicKeyToken=072edcf4a5328938, processorArchitecture=MSIL">
<HintPath>..\packages\BouncyCastle.Cryptography.2.5.0\lib\net461\BouncyCastle.Cryptography.dll</HintPath> <HintPath>..\packages\BouncyCastle.Cryptography.2.5.0\lib\net461\BouncyCastle.Cryptography.dll</HintPath>
</Reference> </Reference>
<Reference Include="DD_LIB_Standards, Version=1.0.0.0, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>P:\Visual Studio Projekte\Bibliotheken\DD_LIB_Standards.dll</HintPath>
</Reference>
<Reference Include="DevExpress.Charts.v21.2.Core, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL"> <Reference Include="DevExpress.Charts.v21.2.Core, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion> <SpecificVersion>False</SpecificVersion>
</Reference> </Reference>
@@ -149,59 +151,56 @@
<SpecificVersion>False</SpecificVersion> <SpecificVersion>False</SpecificVersion>
</Reference> </Reference>
<Reference Include="DevExpress.XtraVerticalGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" /> <Reference Include="DevExpress.XtraVerticalGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
<Reference Include="DigitalData.Controls.DocumentViewer, Version=1.9.8.0, Culture=neutral, processorArchitecture=MSIL"> <Reference Include="DigitalData.Controls.DocumentViewer, Version=2.2.0.0, Culture=neutral, processorArchitecture=MSIL">
<HintPath>..\packages\DigitalData.Controls.DocumentViewer.1.9.8\lib\net462\DigitalData.Controls.DocumentViewer.dll</HintPath> <SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\..\2_DLL Projekte\Controls.DocumentViewer\obj\Debug\DigitalData.Controls.DocumentViewer.dll</HintPath>
</Reference> </Reference>
<Reference Include="DigitalData.Controls.LookupGrid"> <Reference Include="DigitalData.Controls.LookupGrid">
<HintPath>..\..\..\..\2_DLL Projekte\DDMonorepo\Controls.LookupGrid\bin\Debug\DigitalData.Controls.LookupGrid.dll</HintPath> <HintPath>..\..\..\..\2_DLL Projekte\DDMonorepo\Controls.LookupGrid\bin\Debug\DigitalData.Controls.LookupGrid.dll</HintPath>
</Reference> </Reference>
<Reference Include="DigitalData.Controls.SnapPanel, Version=1.0.1.0, Culture=neutral, processorArchitecture=MSIL"> <Reference Include="DigitalData.Controls.SnapPanel">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\..\2_DLL Projekte\DDMonorepo\Controls.SnapPanel\bin\Debug\DigitalData.Controls.SnapPanel.dll</HintPath> <HintPath>..\..\..\..\2_DLL Projekte\DDMonorepo\Controls.SnapPanel\bin\Debug\DigitalData.Controls.SnapPanel.dll</HintPath>
</Reference> </Reference>
<Reference Include="DigitalData.GUIs.Common, Version=2.6.2.0, Culture=neutral, processorArchitecture=MSIL"> <Reference Include="DigitalData.GUIs.Common, Version=2.7.0.0, Culture=neutral, processorArchitecture=MSIL">
<HintPath>..\packages\DigitalData.GUIs.Common.2.6.2\lib\net462\DigitalData.GUIs.Common.dll</HintPath> <SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\..\2_DLL Projekte\DDMonorepo\GUIs.Common\bin\Debug\DigitalData.GUIs.Common.dll</HintPath>
</Reference> </Reference>
<Reference Include="DigitalData.Modules.Base, Version=1.3.8.0, Culture=neutral, processorArchitecture=MSIL"> <Reference Include="DigitalData.Modules.Base, Version=1.3.9.0, Culture=neutral, processorArchitecture=MSIL">
<HintPath>..\packages\DigitalData.Modules.Base.1.3.8\lib\net462\DigitalData.Modules.Base.dll</HintPath> <SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\..\2_DLL Projekte\DDModules\Base\bin\Debug\DigitalData.Modules.Base.dll</HintPath>
</Reference> </Reference>
<Reference Include="DigitalData.Modules.Config, Version=1.3.0.0, Culture=neutral, processorArchitecture=MSIL"> <Reference Include="DigitalData.Modules.Config, Version=1.3.0.0, Culture=neutral, processorArchitecture=MSIL">
<HintPath>..\packages\DigitalData.Modules.Config.1.3.0\lib\net462\DigitalData.Modules.Config.dll</HintPath> <SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\..\2_DLL Projekte\DDModules\Config\bin\Debug\DigitalData.Modules.Config.dll</HintPath>
</Reference> </Reference>
<Reference Include="DigitalData.Modules.Database, Version=2.3.5.4, Culture=neutral, processorArchitecture=MSIL"> <Reference Include="DigitalData.Modules.Database, Version=2.3.6.0, Culture=neutral, processorArchitecture=MSIL">
<HintPath>..\packages\DigitalData.Modules.Database.2.3.5.4\lib\net462\DigitalData.Modules.Database.dll</HintPath> <SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\..\2_DLL Projekte\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll</HintPath>
</Reference> </Reference>
<Reference Include="DigitalData.Modules.EDMI.API"> <Reference Include="DigitalData.Modules.EDMI.API">
<HintPath>..\..\..\..\2_DLL Projekte\DDModules\EDMIAPI\bin\Debug\DigitalData.Modules.EDMI.API.dll</HintPath> <HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\Digital Data\DD_Modules\DigitalData.Modules.EDMI.API.dll</HintPath>
</Reference> </Reference>
<Reference Include="DigitalData.Modules.Encryption, Version=1.3.1.0, Culture=neutral, processorArchitecture=MSIL"> <Reference Include="DigitalData.Modules.Encryption, Version=1.3.1.0, Culture=neutral, processorArchitecture=MSIL">
<HintPath>..\packages\DigitalData.Modules.Encryption.1.3.1\lib\net462\DigitalData.Modules.Encryption.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Filesystem, Version=1.3.3.0, Culture=neutral, processorArchitecture=MSIL">
<HintPath>..\packages\DigitalData.Modules.Filesystem.1.3.3\lib\net462\DigitalData.Modules.Filesystem.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Interfaces">
<HintPath>..\..\..\..\2_DLL Projekte\DDModules\Interfaces\bin\Debug\DigitalData.Modules.Interfaces.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Language, Version=1.7.1.0, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion> <SpecificVersion>False</SpecificVersion>
<HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\Digital Data\DigitalData.Modules.Language.dll</HintPath> <HintPath>..\..\..\..\2_DLL Projekte\DDModules\Encryption\bin\Debug\DigitalData.Modules.Encryption.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Interfaces, Version=2.3.7.0, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\Digital Data\DD_Modules\DigitalData.Modules.Interfaces.dll</HintPath>
</Reference> </Reference>
<Reference Include="DigitalData.Modules.License"> <Reference Include="DigitalData.Modules.License">
<HintPath>..\..\..\..\2_DLL Projekte\DDModules\License\bin\Debug\DigitalData.Modules.License.dll</HintPath> <HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\Digital Data\DD_Modules\11_2025\DigitalData.Modules.License.dll</HintPath>
</Reference> </Reference>
<Reference Include="DigitalData.Modules.Logging, Version=2.6.5.0, Culture=neutral, processorArchitecture=MSIL"> <Reference Include="DigitalData.Modules.Logging, Version=2.6.5.0, Culture=neutral, processorArchitecture=MSIL">
<HintPath>..\packages\DigitalData.Modules.Logging.2.6.5\lib\net462\DigitalData.Modules.Logging.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Messaging, Version=1.9.8.0, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion> <SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\..\2_DLL Projekte\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
</Reference>
<Reference Include="DigitalData.Modules.Messaging">
<HintPath>..\..\..\..\2_DLL Projekte\DDModules\Messaging\bin\Debug\DigitalData.Modules.Messaging.dll</HintPath> <HintPath>..\..\..\..\2_DLL Projekte\DDModules\Messaging\bin\Debug\DigitalData.Modules.Messaging.dll</HintPath>
</Reference> </Reference>
<Reference Include="DigitalData.Modules.Patterns, Version=1.3.1.0, Culture=neutral, processorArchitecture=MSIL"> <Reference Include="DigitalData.Modules.Patterns, Version=1.3.1.0, Culture=neutral, processorArchitecture=MSIL">
<HintPath>..\packages\DigitalData.Modules.Patterns.1.3.1\lib\net462\DigitalData.Modules.Patterns.dll</HintPath> <SpecificVersion>False</SpecificVersion>
</Reference> <HintPath>..\..\..\..\2_DLL Projekte\DDModules\Patterns\bin\Debug\DigitalData.Modules.Patterns.dll</HintPath>
<Reference Include="DigitalData.Modules.Windows, Version=1.5.1.0, Culture=neutral, processorArchitecture=MSIL">
<HintPath>..\packages\DigitalData.Modules.Windows.1.5.1\lib\net462\DigitalData.Modules.Windows.dll</HintPath>
</Reference> </Reference>
<Reference Include="DigitalData.Modules.Windream, Version=1.9.6.2, Culture=neutral, processorArchitecture=MSIL"> <Reference Include="DigitalData.Modules.Windream, Version=1.9.6.2, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion> <SpecificVersion>False</SpecificVersion>
@@ -235,68 +234,95 @@
<HintPath>P:\Visual Studio Projekte\Bibliotheken\FormsUtils.dll</HintPath> <HintPath>P:\Visual Studio Projekte\Bibliotheken\FormsUtils.dll</HintPath>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.barcode.1d.writer, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.barcode.1d.writer, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.barcode.1d.writer.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.barcode.1d.writer.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.barcode.2d.writer, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.barcode.2d.writer, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.barcode.2d.writer.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.barcode.2d.writer.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.CAD, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.CAD, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.CAD.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.CAD.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.CAD.DWG, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.CAD.DWG, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.CAD.DWG.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.CAD.DWG.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.Common, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.Common, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Common.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.Common.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.Document, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.Document, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Document.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.Document.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.Email, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.Email, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Email.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.Email.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.HTML, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.HTML, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.HTML.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.HTML.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.Imaging, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.Imaging, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Imaging.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.Imaging.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.Imaging.Formats, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.Imaging.Formats, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Imaging.Formats.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.Imaging.Formats.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.Imaging.Formats.Conversion, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.Imaging.Formats.Conversion, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Imaging.Formats.Conversion.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.Imaging.Formats.Conversion.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.Imaging.Rendering, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.Imaging.Rendering, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.Imaging.Rendering.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.Imaging.Rendering.dll</HintPath>
<Private>True</Private>
</Reference>
<Reference Include="GdPicture.NET.14.Markdown, Version=14.3.23.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.Markdown.dll</HintPath>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.MSOfficeBinary, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.MSOfficeBinary, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.MSOfficeBinary.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.MSOfficeBinary.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.OpenDocument, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.OpenDocument, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.OpenDocument.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.OpenDocument.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.OpenXML, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.OpenXML, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.OpenXML.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.OpenXML.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.OpenXML.Templating, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.OpenXML.Templating, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.OpenXML.Templating.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.OpenXML.Templating.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.PDF, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.PDF, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.PDF.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.PDF.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.RTF, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.RTF, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.RTF.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.RTF.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.SVG, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.SVG, Version=14.3.3.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.SVG.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.SVG.dll</HintPath>
<Private>True</Private>
</Reference> </Reference>
<Reference Include="GdPicture.NET.14.wia.gateway, Version=1.0.0.0, Culture=neutral, PublicKeyToken=6973b5c22dcf45f7, processorArchitecture=MSIL"> <Reference Include="GdPicture.NET.14.wia.gateway, Version=1.0.0.0, Culture=neutral, PublicKeyToken=6973b5c22dcf45f7, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.3\lib\net462\GdPicture.NET.14.wia.gateway.dll</HintPath> <HintPath>..\packages\GdPicture.14.3.23\lib\net462\GdPicture.NET.14.wia.gateway.dll</HintPath>
<EmbedInteropTypes>True</EmbedInteropTypes> <EmbedInteropTypes>True</EmbedInteropTypes>
<Private>True</Private>
</Reference>
<Reference Include="Google.Protobuf, Version=3.33.2.0, Culture=neutral, PublicKeyToken=a7d26565bac4d604, processorArchitecture=MSIL">
<HintPath>..\packages\Google.Protobuf.3.33.2\lib\net45\Google.Protobuf.dll</HintPath>
</Reference> </Reference>
<Reference Include="Interop.WINDREAMLib"> <Reference Include="Interop.WINDREAMLib">
<HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WINDREAMLib.dll</HintPath> <HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WINDREAMLib.dll</HintPath>
@@ -330,6 +356,15 @@
<Reference Include="Microsoft.IdentityModel.Abstractions, Version=6.22.0.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35, processorArchitecture=MSIL"> <Reference Include="Microsoft.IdentityModel.Abstractions, Version=6.22.0.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35, processorArchitecture=MSIL">
<HintPath>..\packages\Microsoft.IdentityModel.Abstractions.6.22.0\lib\net461\Microsoft.IdentityModel.Abstractions.dll</HintPath> <HintPath>..\packages\Microsoft.IdentityModel.Abstractions.6.22.0\lib\net461\Microsoft.IdentityModel.Abstractions.dll</HintPath>
</Reference> </Reference>
<Reference Include="NativeSDK.Exceptions, Version=14.3.23.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.23\lib\net462\NativeSDK.Exceptions.dll</HintPath>
</Reference>
<Reference Include="NativeSDK.Settings, Version=14.3.23.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.23\lib\net462\NativeSDK.Settings.dll</HintPath>
</Reference>
<Reference Include="NativeSDK.Settings.Edition, Version=14.3.23.0, Culture=neutral, PublicKeyToken=f52a2e60ad468dbb, processorArchitecture=MSIL">
<HintPath>..\packages\GdPicture.14.3.23\lib\net462\NativeSDK.Settings.Edition.dll</HintPath>
</Reference>
<Reference Include="Newtonsoft.Json, Version=13.0.0.0, Culture=neutral, PublicKeyToken=30ad4fe6b2a6aeed, processorArchitecture=MSIL"> <Reference Include="Newtonsoft.Json, Version=13.0.0.0, Culture=neutral, PublicKeyToken=30ad4fe6b2a6aeed, processorArchitecture=MSIL">
<HintPath>..\packages\Newtonsoft.Json.13.0.3\lib\net45\Newtonsoft.Json.dll</HintPath> <HintPath>..\packages\Newtonsoft.Json.13.0.3\lib\net45\Newtonsoft.Json.dll</HintPath>
</Reference> </Reference>
@@ -421,6 +456,9 @@
<Reference Include="System.Text.Json, Version=9.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL"> <Reference Include="System.Text.Json, Version=9.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
<HintPath>..\packages\System.Text.Json.9.0.0\lib\net462\System.Text.Json.dll</HintPath> <HintPath>..\packages\System.Text.Json.9.0.0\lib\net462\System.Text.Json.dll</HintPath>
</Reference> </Reference>
<Reference Include="System.Threading.Channels, Version=8.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
<HintPath>..\packages\System.Threading.Channels.8.0.0\lib\net462\System.Threading.Channels.dll</HintPath>
</Reference>
<Reference Include="System.Threading.Tasks.Extensions, Version=4.2.0.1, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL"> <Reference Include="System.Threading.Tasks.Extensions, Version=4.2.0.1, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
<HintPath>..\packages\System.Threading.Tasks.Extensions.4.5.4\lib\net461\System.Threading.Tasks.Extensions.dll</HintPath> <HintPath>..\packages\System.Threading.Tasks.Extensions.4.5.4\lib\net461\System.Threading.Tasks.Extensions.dll</HintPath>
</Reference> </Reference>
@@ -549,12 +587,6 @@
<Compile Include="frmColumn_Detail.vb"> <Compile Include="frmColumn_Detail.vb">
<SubType>Form</SubType> <SubType>Form</SubType>
</Compile> </Compile>
<Compile Include="frmDashboard1.Designer.vb">
<DependentUpon>frmDashboard1.vb</DependentUpon>
</Compile>
<Compile Include="frmDashboard1.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmDesignerLayout.Designer.vb"> <Compile Include="frmDesignerLayout.Designer.vb">
<DependentUpon>frmDesignerLayout.vb</DependentUpon> <DependentUpon>frmDesignerLayout.vb</DependentUpon>
</Compile> </Compile>
@@ -592,6 +624,12 @@
<Compile Include="frmError.vb"> <Compile Include="frmError.vb">
<SubType>Form</SubType> <SubType>Form</SubType>
</Compile> </Compile>
<Compile Include="frmExpression_Designer.Designer.vb">
<DependentUpon>frmExpression_Designer.vb</DependentUpon>
</Compile>
<Compile Include="frmExpression_Designer.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmFileInfo.Designer.vb"> <Compile Include="frmFileInfo.Designer.vb">
<DependentUpon>frmFileInfo.vb</DependentUpon> <DependentUpon>frmFileInfo.vb</DependentUpon>
</Compile> </Compile>
@@ -782,21 +820,27 @@
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmAdminPasswort.resx"> <EmbeddedResource Include="frmAdminPasswort.resx">
<DependentUpon>frmAdminPasswort.vb</DependentUpon> <DependentUpon>frmAdminPasswort.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmAdmin_notResponsibleConfig.resx"> <EmbeddedResource Include="frmAdmin_notResponsibleConfig.resx">
<DependentUpon>frmAdmin_notResponsibleConfig.vb</DependentUpon> <DependentUpon>frmAdmin_notResponsibleConfig.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmAdmin_rejectionConfig.resx"> <EmbeddedResource Include="frmAdmin_rejectionConfig.resx">
<DependentUpon>frmAdmin_rejectionConfig.vb</DependentUpon> <DependentUpon>frmAdmin_rejectionConfig.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmAnnotations.resx"> <EmbeddedResource Include="frmAnnotations.resx">
<DependentUpon>frmAnnotations.vb</DependentUpon> <DependentUpon>frmAnnotations.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmClientLogin.en.resx"> <EmbeddedResource Include="frmClientLogin.en.resx">
<DependentUpon>frmClientLogin.vb</DependentUpon> <DependentUpon>frmClientLogin.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmClientLogin.resx"> <EmbeddedResource Include="frmClientLogin.resx">
<DependentUpon>frmClientLogin.vb</DependentUpon> <DependentUpon>frmClientLogin.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmConnection.resx"> <EmbeddedResource Include="frmConnection.resx">
<DependentUpon>frmConnection.vb</DependentUpon> <DependentUpon>frmConnection.vb</DependentUpon>
@@ -804,30 +848,38 @@
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmColumn_Detail.resx"> <EmbeddedResource Include="frmColumn_Detail.resx">
<DependentUpon>frmColumn_Detail.vb</DependentUpon> <DependentUpon>frmColumn_Detail.vb</DependentUpon>
</EmbeddedResource> <SubType>Designer</SubType>
<EmbeddedResource Include="frmDashboard1.resx">
<DependentUpon>frmDashboard1.vb</DependentUpon>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmDesignerLayout.resx"> <EmbeddedResource Include="frmDesignerLayout.resx">
<DependentUpon>frmDesignerLayout.vb</DependentUpon> <DependentUpon>frmDesignerLayout.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmDesignerLayout\Editors\frmDatasourceEditor.resx"> <EmbeddedResource Include="frmDesignerLayout\Editors\frmDatasourceEditor.resx">
<DependentUpon>frmDatasourceEditor.vb</DependentUpon> <DependentUpon>frmDatasourceEditor.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmDesignerLayout\Editors\frmStaticListEditor.resx"> <EmbeddedResource Include="frmDesignerLayout\Editors\frmStaticListEditor.resx">
<DependentUpon>frmStaticListEditor.vb</DependentUpon> <DependentUpon>frmStaticListEditor.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmError.en.resx"> <EmbeddedResource Include="frmError.en.resx">
<DependentUpon>frmError.vb</DependentUpon> <DependentUpon>frmError.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmError.fr.resx"> <EmbeddedResource Include="frmError.fr.resx">
<DependentUpon>frmError.vb</DependentUpon> <DependentUpon>frmError.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmError.resx"> <EmbeddedResource Include="frmError.resx">
<DependentUpon>frmError.vb</DependentUpon> <DependentUpon>frmError.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="frmExpression_Designer.resx">
<DependentUpon>frmExpression_Designer.vb</DependentUpon>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmFileInfo.resx"> <EmbeddedResource Include="frmFileInfo.resx">
<DependentUpon>frmFileInfo.vb</DependentUpon> <DependentUpon>frmFileInfo.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmFormDesigner.resx"> <EmbeddedResource Include="frmFormDesigner.resx">
<DependentUpon>frmFormDesigner.vb</DependentUpon> <DependentUpon>frmFormDesigner.vb</DependentUpon>
@@ -835,6 +887,7 @@
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmGhostMode.en-US.resx"> <EmbeddedResource Include="frmGhostMode.en-US.resx">
<DependentUpon>frmGhostMode.vb</DependentUpon> <DependentUpon>frmGhostMode.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmGhostMode.resx"> <EmbeddedResource Include="frmGhostMode.resx">
<DependentUpon>frmGhostMode.vb</DependentUpon> <DependentUpon>frmGhostMode.vb</DependentUpon>
@@ -842,21 +895,27 @@
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmInvDashboard.resx"> <EmbeddedResource Include="frmInvDashboard.resx">
<DependentUpon>frmInvDashboard.vb</DependentUpon> <DependentUpon>frmInvDashboard.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmLicense.resx"> <EmbeddedResource Include="frmLicense.resx">
<DependentUpon>frmLicense.vb</DependentUpon> <DependentUpon>frmLicense.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmLoginAdmin.resx"> <EmbeddedResource Include="frmLoginAdmin.resx">
<DependentUpon>frmLoginAdmin.vb</DependentUpon> <DependentUpon>frmLoginAdmin.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmMain.en.resx"> <EmbeddedResource Include="frmMain.en.resx">
<DependentUpon>frmMain.vb</DependentUpon> <DependentUpon>frmMain.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmMain.fr.resx"> <EmbeddedResource Include="frmMain.fr.resx">
<DependentUpon>frmMain.vb</DependentUpon> <DependentUpon>frmMain.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmMassValidator.resx"> <EmbeddedResource Include="frmMassValidator.resx">
<DependentUpon>frmMassValidator.vb</DependentUpon> <DependentUpon>frmMassValidator.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmAdministration.resx"> <EmbeddedResource Include="frmAdministration.resx">
<DependentUpon>frmAdministration.vb</DependentUpon> <DependentUpon>frmAdministration.vb</DependentUpon>
@@ -864,45 +923,58 @@
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmKonfig.resx"> <EmbeddedResource Include="frmKonfig.resx">
<DependentUpon>frmKonfig.vb</DependentUpon> <DependentUpon>frmKonfig.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmKonfig.en.resx"> <EmbeddedResource Include="frmKonfig.en.resx">
<DependentUpon>frmKonfig.vb</DependentUpon> <DependentUpon>frmKonfig.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmKonfig.fr.resx"> <EmbeddedResource Include="frmKonfig.fr.resx">
<DependentUpon>frmKonfig.vb</DependentUpon> <DependentUpon>frmKonfig.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmMetadataFile.resx"> <EmbeddedResource Include="frmMetadataFile.resx">
<DependentUpon>frmMetadataFile.vb</DependentUpon> <DependentUpon>frmMetadataFile.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmMonitor.resx"> <EmbeddedResource Include="frmMonitor.resx">
<DependentUpon>frmMonitor.vb</DependentUpon> <DependentUpon>frmMonitor.vb</DependentUpon>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmPreviewHtml.resx"> <EmbeddedResource Include="frmPreviewHtml.resx">
<DependentUpon>frmPreviewHtml.vb</DependentUpon> <DependentUpon>frmPreviewHtml.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmRegexEditor.resx"> <EmbeddedResource Include="frmRegexEditor.resx">
<DependentUpon>frmRegexEditor.vb</DependentUpon> <DependentUpon>frmRegexEditor.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmRejectionCommit.en.resx"> <EmbeddedResource Include="frmRejectionCommit.en.resx">
<DependentUpon>frmRejectionCommit.vb</DependentUpon> <DependentUpon>frmRejectionCommit.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmRejectionCommit.fr.resx"> <EmbeddedResource Include="frmRejectionCommit.fr.resx">
<DependentUpon>frmRejectionCommit.vb</DependentUpon> <DependentUpon>frmRejectionCommit.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmRejectionCommit.resx"> <EmbeddedResource Include="frmRejectionCommit.resx">
<DependentUpon>frmRejectionCommit.vb</DependentUpon> <DependentUpon>frmRejectionCommit.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmSplash.resx"> <EmbeddedResource Include="frmSplash.resx">
<DependentUpon>frmSplash.vb</DependentUpon> <DependentUpon>frmSplash.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmSQL_Admin.resx"> <EmbeddedResource Include="frmSQL_Admin.resx">
<DependentUpon>frmSQL_Admin.vb</DependentUpon> <DependentUpon>frmSQL_Admin.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmSQL_Admin.en.resx"> <EmbeddedResource Include="frmSQL_Admin.en.resx">
<DependentUpon>frmSQL_Admin.vb</DependentUpon> <DependentUpon>frmSQL_Admin.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmSQL_Admin.fr.resx"> <EmbeddedResource Include="frmSQL_Admin.fr.resx">
<DependentUpon>frmSQL_Admin.vb</DependentUpon> <DependentUpon>frmSQL_Admin.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmMain.resx"> <EmbeddedResource Include="frmMain.resx">
<DependentUpon>frmMain.vb</DependentUpon> <DependentUpon>frmMain.vb</DependentUpon>
@@ -922,9 +994,14 @@
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmValidatorSearch.en.resx"> <EmbeddedResource Include="frmValidatorSearch.en.resx">
<DependentUpon>frmValidatorSearch.vb</DependentUpon> <DependentUpon>frmValidatorSearch.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="frmValidatorSearch.fr-FR.resx">
<DependentUpon>frmValidatorSearch.vb</DependentUpon>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmValidatorSearch.fr.resx"> <EmbeddedResource Include="frmValidatorSearch.fr.resx">
<DependentUpon>frmValidatorSearch.vb</DependentUpon> <DependentUpon>frmValidatorSearch.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmValidatorSearch.resx"> <EmbeddedResource Include="frmValidatorSearch.resx">
<DependentUpon>frmValidatorSearch.vb</DependentUpon> <DependentUpon>frmValidatorSearch.vb</DependentUpon>
@@ -932,18 +1009,23 @@
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmValidator_Messages.resx"> <EmbeddedResource Include="frmValidator_Messages.resx">
<DependentUpon>frmValidator_Messages.vb</DependentUpon> <DependentUpon>frmValidator_Messages.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmWorkflow.resx"> <EmbeddedResource Include="frmWorkflow.resx">
<DependentUpon>frmWorkflow.vb</DependentUpon> <DependentUpon>frmWorkflow.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmYesNo.en.resx"> <EmbeddedResource Include="frmYesNo.en.resx">
<DependentUpon>frmYesNo.vb</DependentUpon> <DependentUpon>frmYesNo.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmYesNo.fr.resx"> <EmbeddedResource Include="frmYesNo.fr.resx">
<DependentUpon>frmYesNo.vb</DependentUpon> <DependentUpon>frmYesNo.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmYesNo.resx"> <EmbeddedResource Include="frmYesNo.resx">
<DependentUpon>frmYesNo.vb</DependentUpon> <DependentUpon>frmYesNo.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="My Project\licenses.licx" /> <EmbeddedResource Include="My Project\licenses.licx" />
<EmbeddedResource Include="My Project\Resources.resx"> <EmbeddedResource Include="My Project\Resources.resx">
@@ -962,16 +1044,23 @@
<CustomToolNamespace>My.Resources</CustomToolNamespace> <CustomToolNamespace>My.Resources</CustomToolNamespace>
<Generator>ResXFileCodeGenerator</Generator> <Generator>ResXFileCodeGenerator</Generator>
<LastGenOutput>frmMain_Strings.Designer.vb</LastGenOutput> <LastGenOutput>frmMain_Strings.Designer.vb</LastGenOutput>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="Translations\frmValidator_Strings.en.resx">
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="Translations\frmValidator_Strings.fr.resx">
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="Translations\frmValidator_Strings.en.resx" />
<EmbeddedResource Include="Translations\frmValidator_Strings.fr.resx" />
<EmbeddedResource Include="Translations\frmValidator_Strings.resx"> <EmbeddedResource Include="Translations\frmValidator_Strings.resx">
<CustomToolNamespace>My.Resources</CustomToolNamespace> <CustomToolNamespace>My.Resources</CustomToolNamespace>
<Generator>ResXFileCodeGenerator</Generator> <Generator>ResXFileCodeGenerator</Generator>
<LastGenOutput>frmValidator_Strings.Designer.vb</LastGenOutput> <LastGenOutput>frmValidator_Strings.Designer.vb</LastGenOutput>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="XtraReport1.resx"> <EmbeddedResource Include="XtraReport1.resx">
<DependentUpon>XtraReport1.vb</DependentUpon> <DependentUpon>XtraReport1.vb</DependentUpon>
<SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
</ItemGroup> </ItemGroup>
<ItemGroup> <ItemGroup>
@@ -1192,24 +1281,9 @@
</ItemGroup> </ItemGroup>
<ItemGroup> <ItemGroup>
<None Include="Changelog.md" /> <None Include="Changelog.md" />
<Content Include="DataColumnExpression.txt" />
<Content Include="DD_Icons_ICO_PMANAGER_48px.ico" /> <Content Include="DD_Icons_ICO_PMANAGER_48px.ico" />
<Content Include="DD_taskFLOW_ICON.ico" /> <Content Include="DD_taskFLOW_ICON.ico" />
<Content Include="GdPicture.NET.14.barcode.1d.reader.64.dll" />
<Content Include="GdPicture.NET.14.barcode.1d.reader.dll" />
<Content Include="GdPicture.NET.14.barcode.2d.reader.64.dll" />
<Content Include="GdPicture.NET.14.barcode.2d.reader.dll" />
<Content Include="GdPicture.NET.14.filters.64.dll" />
<Content Include="GdPicture.NET.14.filters.dll" />
<Content Include="GdPicture.NET.14.image.gdimgplug.64.dll" />
<Content Include="GdPicture.NET.14.image.gdimgplug.dll" />
<Content Include="GdPicture.NET.14.Imaging.ML.64.dll" />
<Content Include="GdPicture.NET.14.Imaging.ML.dll" />
<Content Include="GdPicture.NET.14.Imaging.Rendering.Skia.64.dll" />
<Content Include="GdPicture.NET.14.Imaging.Rendering.Skia.dll" />
<Content Include="GdPicture.NET.14.machine.vision.64.dll" />
<Content Include="GdPicture.NET.14.machine.vision.dll" />
<Content Include="GdPicture.NET.14.twain.client.64.dll" />
<Content Include="GdPicture.NET.14.twain.client.dll" />
<Content Include="MailLicense.xml"> <Content Include="MailLicense.xml">
<CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory> <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
</Content> </Content>
@@ -1237,7 +1311,6 @@
<None Include="Resources\DD_taskFLOW_BOOT.png" /> <None Include="Resources\DD_taskFLOW_BOOT.png" />
<None Include="Resources\DD_taskFLOW_ICON.png" /> <None Include="Resources\DD_taskFLOW_ICON.png" />
<None Include="Resources\AttachFileHS.png" /> <None Include="Resources\AttachFileHS.png" />
<Content Include="README.txt" />
<Content Include="task.ico" /> <Content Include="task.ico" />
<None Include="Resources\searchFlow_icon.png" /> <None Include="Resources\searchFlow_icon.png" />
<None Include="Resources\taskFlow_icon.png" /> <None Include="Resources\taskFlow_icon.png" />
@@ -1310,16 +1383,16 @@
</BootstrapperPackage> </BootstrapperPackage>
</ItemGroup> </ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" /> <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
<Import Project="..\packages\GdPicture.runtimes.windows.14.3.3\build\net462\GdPicture.runtimes.windows.targets" Condition="Exists('..\packages\GdPicture.runtimes.windows.14.3.3\build\net462\GdPicture.runtimes.windows.targets')" />
<Target Name="EnsureNuGetPackageBuildImports" BeforeTargets="PrepareForBuild"> <Target Name="EnsureNuGetPackageBuildImports" BeforeTargets="PrepareForBuild">
<PropertyGroup> <PropertyGroup>
<ErrorText>Dieses Projekt verweist auf mindestens ein NuGet-Paket, das auf diesem Computer fehlt. Verwenden Sie die Wiederherstellung von NuGet-Paketen, um die fehlenden Dateien herunterzuladen. Weitere Informationen finden Sie unter "http://go.microsoft.com/fwlink/?LinkID=322105". Die fehlende Datei ist "{0}".</ErrorText> <ErrorText>Dieses Projekt verweist auf mindestens ein NuGet-Paket, das auf diesem Computer fehlt. Verwenden Sie die Wiederherstellung von NuGet-Paketen, um die fehlenden Dateien herunterzuladen. Weitere Informationen finden Sie unter "http://go.microsoft.com/fwlink/?LinkID=322105". Die fehlende Datei ist "{0}".</ErrorText>
</PropertyGroup> </PropertyGroup>
<Error Condition="!Exists('..\packages\GdPicture.runtimes.windows.14.3.3\build\net462\GdPicture.runtimes.windows.targets')" Text="$([System.String]::Format('$(ErrorText)', '..\packages\GdPicture.runtimes.windows.14.3.3\build\net462\GdPicture.runtimes.windows.targets'))" />
<Error Condition="!Exists('..\packages\EntityFramework.6.4.4\build\EntityFramework.props')" Text="$([System.String]::Format('$(ErrorText)', '..\packages\EntityFramework.6.4.4\build\EntityFramework.props'))" /> <Error Condition="!Exists('..\packages\EntityFramework.6.4.4\build\EntityFramework.props')" Text="$([System.String]::Format('$(ErrorText)', '..\packages\EntityFramework.6.4.4\build\EntityFramework.props'))" />
<Error Condition="!Exists('..\packages\EntityFramework.6.4.4\build\EntityFramework.targets')" Text="$([System.String]::Format('$(ErrorText)', '..\packages\EntityFramework.6.4.4\build\EntityFramework.targets'))" /> <Error Condition="!Exists('..\packages\EntityFramework.6.4.4\build\EntityFramework.targets')" Text="$([System.String]::Format('$(ErrorText)', '..\packages\EntityFramework.6.4.4\build\EntityFramework.targets'))" />
<Error Condition="!Exists('..\packages\GdPicture.runtimes.windows.14.3.23\build\net462\GdPicture.runtimes.windows.targets')" Text="$([System.String]::Format('$(ErrorText)', '..\packages\GdPicture.runtimes.windows.14.3.23\build\net462\GdPicture.runtimes.windows.targets'))" />
</Target> </Target>
<Import Project="..\packages\EntityFramework.6.4.4\build\EntityFramework.targets" Condition="Exists('..\packages\EntityFramework.6.4.4\build\EntityFramework.targets')" /> <Import Project="..\packages\EntityFramework.6.4.4\build\EntityFramework.targets" Condition="Exists('..\packages\EntityFramework.6.4.4\build\EntityFramework.targets')" />
<Import Project="..\packages\GdPicture.runtimes.windows.14.3.23\build\net462\GdPicture.runtimes.windows.targets" Condition="Exists('..\packages\GdPicture.runtimes.windows.14.3.23\build\net462\GdPicture.runtimes.windows.targets')" />
<!-- To modify your build process, add your task inside one of the targets below and uncomment it. <!-- To modify your build process, add your task inside one of the targets below and uncomment it.
Other similar extension points exist, see Microsoft.Common.targets. Other similar extension points exist, see Microsoft.Common.targets.
<Target Name="BeforeBuild"> <Target Name="BeforeBuild">

View File

@@ -43,7 +43,7 @@ Namespace My.Resources
Friend Shared ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager Friend Shared ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
Get Get
If Object.ReferenceEquals(resourceMan, Nothing) Then If Object.ReferenceEquals(resourceMan, Nothing) Then
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DD_ProcessManager.frmMain_Strings", GetType(frmMain_Strings).Assembly) Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("taskFLOW.frmMain_Strings", GetType(frmMain_Strings).Assembly)
resourceMan = temp resourceMan = temp
End If End If
Return resourceMan Return resourceMan

View File

@@ -43,7 +43,7 @@ Namespace My.Resources
Friend Shared ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager Friend Shared ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
Get Get
If Object.ReferenceEquals(resourceMan, Nothing) Then If Object.ReferenceEquals(resourceMan, Nothing) Then
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DD_ProcessManager.frmValidator_Strings", GetType(frmValidator_Strings).Assembly) Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("taskFLOW.frmValidator_Strings", GetType(frmValidator_Strings).Assembly)
resourceMan = temp resourceMan = temp
End If End If
Return resourceMan Return resourceMan
@@ -64,6 +64,15 @@ Namespace My.Resources
End Set End Set
End Property End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Bestätigung ähnelt.
'''</summary>
Friend Shared ReadOnly Property Bestaetigung() As String
Get
Return ResourceManager.GetString("Bestaetigung", resourceCulture)
End Get
End Property
'''<summary> '''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Bitte validieren Sie die rot markierten Felder! ähnelt. ''' Sucht eine lokalisierte Zeichenfolge, die Bitte validieren Sie die rot markierten Felder! ähnelt.
'''</summary> '''</summary>
@@ -109,6 +118,24 @@ Namespace My.Resources
End Get End Get
End Property End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Vererbung Werte Grid aktiv ähnelt.
'''</summary>
Friend Shared ReadOnly Property Inheritance_Messages_Active() As String
Get
Return ResourceManager.GetString("Inheritance_Messages_Active", resourceCulture)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Vererbung Werte Grid inaktiv ähnelt.
'''</summary>
Friend Shared ReadOnly Property Inheritance_Messages_Inactive() As String
Get
Return ResourceManager.GetString("Inheritance_Messages_Inactive", resourceCulture)
End Get
End Property
'''<summary> '''<summary>
''' Sucht eine lokalisierte Zeichenfolge, die Speichern - Nächster Vorgang (F2) ähnelt. ''' Sucht eine lokalisierte Zeichenfolge, die Speichern - Nächster Vorgang (F2) ähnelt.
'''</summary> '''</summary>

View File

@@ -117,9 +117,6 @@
<resheader name="writer"> <resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader> </resheader>
<data name="Bestaetigung" xml:space="preserve">
<value>Confirmation</value>
</data>
<data name="Bitte validieren Sie die rot markierten Felder!" xml:space="preserve"> <data name="Bitte validieren Sie die rot markierten Felder!" xml:space="preserve">
<value>Please validate red marked fields!</value> <value>Please validate red marked fields!</value>
</data> </data>
@@ -144,4 +141,13 @@
<data name="Wollen Sie die Konversation beenden?" xml:space="preserve"> <data name="Wollen Sie die Konversation beenden?" xml:space="preserve">
<value>Would You like to end this conversation?</value> <value>Would You like to end this conversation?</value>
</data> </data>
<data name="Bestaetigung" xml:space="preserve">
<value>Confirmation</value>
</data>
<data name="Inheritance_Messages_Active" xml:space="preserve">
<value>Confirmation of inheritance Values Grid active</value>
</data>
<data name="Inheritance_Messages_Inactive" xml:space="preserve">
<value>Confirmation of inheritance Values Grid inactive</value>
</data>
</root> </root>

View File

@@ -117,9 +117,6 @@
<resheader name="writer"> <resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader> </resheader>
<data name="Bestaetigung" xml:space="preserve">
<value>Confirmation</value>
</data>
<data name="Bitte validieren Sie die rot markierten Felder!" xml:space="preserve"> <data name="Bitte validieren Sie die rot markierten Felder!" xml:space="preserve">
<value>Veuillez valider les champs marqués en rouge!</value> <value>Veuillez valider les champs marqués en rouge!</value>
</data> </data>
@@ -144,4 +141,13 @@
<data name="Wollen Sie die Konversation beenden?" xml:space="preserve"> <data name="Wollen Sie die Konversation beenden?" xml:space="preserve">
<value>Vous voulez mettre fin à la conversation?</value> <value>Vous voulez mettre fin à la conversation?</value>
</data> </data>
<data name="Bestaetigung" xml:space="preserve">
<value>Confirmation</value>
</data>
<data name="Inheritance_Messages_Active" xml:space="preserve">
<value>Confirmation Héritage Valeurs Grille active</value>
</data>
<data name="Inheritance_Messages_Inactive" xml:space="preserve">
<value>Confirmation Héritage Valeurs Grille inactive</value>
</data>
</root> </root>

View File

@@ -141,4 +141,13 @@
<data name="Wollen Sie die Konversation beenden?" xml:space="preserve"> <data name="Wollen Sie die Konversation beenden?" xml:space="preserve">
<value>Wollen Sie die Konversation beenden?</value> <value>Wollen Sie die Konversation beenden?</value>
</data> </data>
<data name="Bestaetigung" xml:space="preserve">
<value>Bestätigung</value>
</data>
<data name="Inheritance_Messages_Active" xml:space="preserve">
<value>Vererbung Werte Grid aktiv</value>
</data>
<data name="Inheritance_Messages_Inactive" xml:space="preserve">
<value>Vererbung Werte Grid inaktiv</value>
</data>
</root> </root>

View File

@@ -163,7 +163,7 @@ Public Class Validator
' Logger.Error(ex) ' Logger.Error(ex)
' Dim st As New StackTrace(True) ' Dim st As New StackTrace(True)
' st = New StackTrace(ex, True) ' st = New StackTrace(ex, True)
' Logger.Warn("Unexpected error in Check_UpdateIndexe TextBox :" & ex.Message, True) ' LOGGER.Warn("⚠️ Unexpected error in Check_UpdateIndexe TextBox :" & ex.Message, True)
' Return False ' Return False
' End Try ' End Try
'End Function 'End Function

View File

@@ -68,7 +68,7 @@ Partial Public Class XtraReport1
' '
'SqlDataSource1 'SqlDataSource1
' '
Me.SqlDataSource1.ConnectionName = "DD_ProcessManager.My.MySettings.ConnectionString" Me.SqlDataSource1.ConnectionName = "taskFLOW.My.MySettings.ConnectionString"
Me.SqlDataSource1.Name = "SqlDataSource1" Me.SqlDataSource1.Name = "SqlDataSource1"
ColumnExpression1.ColumnName = "Anzahl" ColumnExpression1.ColumnName = "Anzahl"
Table4.Name = "VWPM_CHART_INVOICE_MONITOR" Table4.Name = "VWPM_CHART_INVOICE_MONITOR"

View File

@@ -5,7 +5,6 @@ Imports DevExpress.XtraGrid
Imports DevExpress.XtraGrid.Views.Grid Imports DevExpress.XtraGrid.Views.Grid
Imports DevExpress.XtraGrid.Columns Imports DevExpress.XtraGrid.Columns
Imports DevExpress.XtraEditors Imports DevExpress.XtraEditors
Imports DigitalData.Modules.Language
''' <summary> ''' <summary>
''' Defines common Functions for Checking for and replacing placeholders. ''' Defines common Functions for Checking for and replacing placeholders.
''' This Class also includes a child class `Pattern` for passing around Patterns. ''' This Class also includes a child class `Pattern` for passing around Patterns.
@@ -51,7 +50,7 @@ Public Class clsPatterns
Public Const INT_VALUE_WMDocID = "WMDocID" Public Const INT_VALUE_WMDocID = "WMDocID"
Public Const INT_VALUE_IDBID = "IDBObjID" Public Const INT_VALUE_IDBID = "IDBObjID"
Public Const MAX_TRY_COUNT = 20 Public Const MAX_TRY_COUNT = 5
''' <summary> ''' <summary>
''' This value will be valid as any datatype, ''' This value will be valid as any datatype,
@@ -64,6 +63,80 @@ Public Class clsPatterns
Private Shared ReadOnly complexPatterns As New List(Of String) From {PATTERN_WMI, PATTERN_CTRL, PATTERN_IDBA} Private Shared ReadOnly complexPatterns As New List(Of String) From {PATTERN_WMI, PATTERN_CTRL, PATTERN_IDBA}
Private Shared ReadOnly simplePatterns As New List(Of String) From {PATTERN_USER, PATTERN_INT} Private Shared ReadOnly simplePatterns As New List(Of String) From {PATTERN_USER, PATTERN_INT}
Private Shared _ControlLookupCache As Dictionary(Of String, Control)
''' <summary>
''' Clears the control lookup cache. Call when controls are dynamically added/removed.
''' </summary>
Public Shared Sub ClearControlCache()
_ControlLookupCache = Nothing
LOGGER.Debug("Control cache cleared")
End Sub
''' <summary>
''' Aktualisiert den Wert eines Controls im Cache
''' </summary>
Public Shared Sub UpdateControlInCache(controlName As String, newValue As Object)
SyncLock _ControlLookupCache ' Thread-Safety
If _ControlLookupCache Is Nothing OrElse Not _ControlLookupCache.ContainsKey(controlName) Then
LOGGER.Warn($"Control [{controlName}] not found in cache for update")
Return
End If
' Hole das Control aus dem Cache
Dim ctrl As Control = _ControlLookupCache(controlName)
' Aktualisiere den WERT des Controls basierend auf seinem Typ
Try
Select Case ctrl.GetType
Case GetType(TextEdit), GetType(MemoEdit)
DirectCast(ctrl, BaseEdit).EditValue = newValue
Case GetType(LookupControl3)
Dim lookup = DirectCast(ctrl, LookupControl3)
If TypeOf newValue Is List(Of String) Then
lookup.Properties.SelectedValues = DirectCast(newValue, List(Of String))
ElseIf TypeOf newValue Is String Then
lookup.Properties.SelectedValues = New List(Of String) From {newValue.ToString()}
End If
Case GetType(Windows.Forms.ComboBox)
DirectCast(ctrl, ComboBox).Text = newValue?.ToString()
Case GetType(CheckBox)
If TypeOf newValue Is Boolean Then
DirectCast(ctrl, CheckBox).Checked = CBool(newValue)
End If
Case GetType(DateTimePicker)
If TypeOf newValue Is Date Then
DirectCast(ctrl, DateTimePicker).Value = CDate(newValue)
End If
Case Else
LOGGER.Warn($"Unsupported control type for cache update: {ctrl.GetType.Name}")
End Select
LOGGER.Debug($"Cache updated for control [{controlName}] with value type [{newValue?.GetType().Name}]")
Catch ex As Exception
LOGGER.Error(ex)
LOGGER.Warn($"Failed to update control [{controlName}]: {ex.Message}")
End Try
End SyncLock
End Sub
''' <summary>
''' Batch-Update für mehrere Controls
''' </summary>
Public Shared Sub UpdateMultipleControlsInCache(updates As Dictionary(Of String, Object))
If updates Is Nothing OrElse updates.Count = 0 Then Return
SyncLock _ControlLookupCache
For Each kvp In updates
UpdateControlInCache(kvp.Key, kvp.Value)
Next
LOGGER.Debug($"Batch cache update completed for {updates.Count} controls")
End SyncLock
End Sub
''' <summary> ''' <summary>
''' Wraps a pattern-type and -value in the common format: {#type#value} ''' Wraps a pattern-type and -value in the common format: {#type#value}
''' </summary> ''' </summary>
@@ -189,18 +262,34 @@ Public Class clsPatterns
End Try End Try
End Function End Function
Private Shared Sub RecursiveAddToCache(ctrl As Control, cache As Dictionary(Of String, Control))
cache(ctrl.Name) = ctrl
For Each child As Control In ctrl.Controls
RecursiveAddToCache(child, cache)
Next
End Sub
Public Shared Function ReplaceControlValues(pInput As String, oPanel As DevExpress.XtraEditors.XtraScrollableControl, oIsSQL As Boolean) As String Public Shared Function ReplaceControlValues(pInput As String, oPanel As DevExpress.XtraEditors.XtraScrollableControl, oIsSQL As Boolean) As String
Dim oResult = pInput Dim oResult = pInput
' Cache beim ersten Aufruf erstellen mit Lock
SyncLock GetType(clsPatterns) ' Class-Level Lock
If _ControlLookupCache Is Nothing Then
_ControlLookupCache = New Dictionary(Of String, Control)()
For Each ctrl As Control In oPanel.Controls
RecursiveAddToCache(ctrl, _ControlLookupCache)
Next
LOGGER.Debug($"Control cache initialized with {_ControlLookupCache.Count} controls")
End If
End SyncLock
Try Try
Dim oTryCounter = 0 Dim oTryCounter = 0
While ContainsPattern(oResult, PATTERN_CTRL) While ContainsPattern(oResult, PATTERN_CTRL)
If oTryCounter > MAX_TRY_COUNT Then If oTryCounter > MAX_TRY_COUNT Then
LOGGER.Warn($"Max tries in ReplaceControlValues exceeded - Replacing with [0]") LOGGER.Info($"Max tries in ReplaceControlValues exceeded - Replacing PATTERN_CTRL [{PATTERN_CTRL}] with [0]")
LOGGER.Info($"oResult so far is:{oResult}")
oResult = ReplacePattern(oResult, PATTERN_CTRL, 0) oResult = ReplacePattern(oResult, PATTERN_CTRL, 0)
Throw New Exception($"Max tries in ReplaceControlValues exceeded - Result so far [{oResult}].") Exit While
End If End If
Dim oControlName As String = GetNextPattern(oResult, PATTERN_CTRL).Value Dim oControlName As String = GetNextPattern(oResult, PATTERN_CTRL).Value
@@ -213,36 +302,74 @@ Public Class clsPatterns
End If End If
LOGGER.Debug("Found placeholder for control [{0}].", oControlName) LOGGER.Debug("Found placeholder for control [{0}].", oControlName)
' Beim Cache-Zugriff Lock verwenden
Dim oControl As Control = Nothing
SyncLock _ControlLookupCache
If Not _ControlLookupCache.TryGetValue(oControlName, oControl) Then
LOGGER.Warn($"Control [{oControlName}] not found in cache!")
' Fallback außerhalb des Lock
End If
End SyncLock
' Fallback außerhalb des Lock
If oControl Is Nothing Then
oControl = oPanel.Controls.Find(oControlName, True).FirstOrDefault()
If oControl IsNot Nothing Then
LOGGER.Info($"Control [{oControlName}] found via fallback. Adding to cache.")
SyncLock _ControlLookupCache
_ControlLookupCache(oControlName) = oControl
End SyncLock
End If
End If
Dim oControl As Control = oPanel.Controls.Find(oControlName, False).FirstOrDefault()
If oControl IsNot Nothing Then If oControl IsNot Nothing Then
Dim oReplaceValue As String Dim oReplaceValue As String
LOGGER.Debug("oControl.GetType [{0}].", oControl.GetType.ToString)
Select Case oControl.GetType Select Case oControl.GetType
Case GetType(TextBox) Case GetType(TextBox)
oReplaceValue = oControl.Text oReplaceValue = oControl.Text
LOGGER.Debug("TextBox- oReplaceValue will be [{0}].", oReplaceValue)
Case GetType(TextEdit) Case GetType(TextEdit)
Try Try
oReplaceValue = Utils.NotNull(DirectCast(oControl, TextEdit).EditValue, String.Empty) oReplaceValue = ClassAllgemeineFunktionen.NotNullString(DirectCast(oControl, TextEdit).EditValue, String.Empty)
Catch ex As Exception Catch ex As Exception
LOGGER.Warn($"Error in ReplaceValue MemoEdit: {ex.Message}") LOGGER.Warn($"Error in ReplaceValue MemoEdit: {ex.Message}")
oReplaceValue = "" oReplaceValue = ""
End Try End Try
LOGGER.Debug("TextEdit- oReplaceValue will be [{0}].", oReplaceValue)
Case GetType(MemoEdit) Case GetType(MemoEdit)
Try Try
oReplaceValue = Utils.NotNull(DirectCast(oControl, MemoEdit).EditValue, String.Empty) oReplaceValue = ClassAllgemeineFunktionen.NotNullString(DirectCast(oControl, MemoEdit).EditValue, String.Empty)
Catch ex As Exception Catch ex As Exception
LOGGER.Warn($"Error in ReplaceValue MemoEdit: {ex.Message}") LOGGER.Warn($"Error in ReplaceValue MemoEdit: {ex.Message}")
oReplaceValue = "" oReplaceValue = ""
End Try End Try
LOGGER.Debug("MemoEdit- oReplaceValue will be [{0}].", oReplaceValue)
Case GetType(LookupControl3) Case GetType(LookupControl3)
Dim oLookupControl3 As LookupControl3 = oControl Dim oLookupControl3 As LookupControl3 = oControl
If oLookupControl3.Properties.SelectedValues.Count = 1 Then
oReplaceValue = oLookupControl3.Properties.SelectedValues.Item(0) If oLookupControl3.Properties.SelectedValues.Count > 1 Then
LOGGER.Debug($"LookupControl3 mit mehr als 1 Value")
Dim oIndex As Integer = 0
For Each oString As String In oLookupControl3.Properties.SelectedValues
If oIndex = 0 Then
oReplaceValue = oString
Else Else
oReplaceValue += "', '" + oString
End If
oIndex += 1
Next
oIsSQL = False
ElseIf oLookupControl3.Properties.SelectedValues.Count = 1 Then
LOGGER.Debug($"LookupControl3 mit genau einem Value")
oReplaceValue = oLookupControl3.Properties.SelectedValues(0)
Else
' LOGGER.Warn($"SelectedValues of LookUpControl scheint empty oder leer zu sein! Ersetzen mit ErrorReplaceValue!")
oReplaceValue = ERROR_REPLACE_VALUE oReplaceValue = ERROR_REPLACE_VALUE
End If End If
LOGGER.Debug($"oReplaceValue nach Durchlaufen selectedValues: {oReplaceValue}")
Case GetType(Windows.Forms.ComboBox) Case GetType(Windows.Forms.ComboBox)
oReplaceValue = oControl.Text oReplaceValue = oControl.Text
@@ -256,7 +383,7 @@ Public Class clsPatterns
Dim oView As GridView = oGrid.FocusedView Dim oView As GridView = oGrid.FocusedView
If oColumnName = String.Empty Then If oColumnName = String.Empty Then
LOGGER.Warn("Used placeholder for Table [{0}] but without Column Name!", oControlName) LOGGER.Warn("⚠️ Used placeholder for Table [{0}] but without Column Name!", oControlName)
oReplaceValue = ERROR_REPLACE_VALUE oReplaceValue = ERROR_REPLACE_VALUE
End If End If
@@ -265,7 +392,7 @@ Public Class clsPatterns
SingleOrDefault() SingleOrDefault()
If oColumn?.SummaryItem?.SummaryValue Is Nothing Then If oColumn?.SummaryItem?.SummaryValue Is Nothing Then
LOGGER.Warn("Column [{0}] not found in Grid!", oColumnName) LOGGER.Warn("⚠️ Column [{0}] not found in Grid!", oColumnName)
oReplaceValue = ERROR_REPLACE_VALUE oReplaceValue = ERROR_REPLACE_VALUE
Else Else
oReplaceValue = oColumn.SummaryItem.SummaryValue oReplaceValue = oColumn.SummaryItem.SummaryValue
@@ -280,6 +407,8 @@ Public Class clsPatterns
oReplaceValue = oReplaceValue.Replace("'", "''") oReplaceValue = oReplaceValue.Replace("'", "''")
End If End If
oResult = ReplacePattern(oResult, PATTERN_CTRL, oReplaceValue) oResult = ReplacePattern(oResult, PATTERN_CTRL, oReplaceValue)
Else
LOGGER.Warn("⚠️ Could not get a Control for [{0}].", oControlName)
End If End If
oTryCounter += 1 oTryCounter += 1
@@ -287,7 +416,7 @@ Public Class clsPatterns
Return oResult Return oResult
Catch ex As Exception Catch ex As Exception
LOGGER.Error(ex) LOGGER.Error(ex)
LOGGER.Warn("Error in ReplaceControlValues:" & ex.Message) LOGGER.Warn("⚠️ Error in ReplaceControlValues:" & ex.Message)
Return oResult Return oResult
End Try End Try
End Function End Function

View File

@@ -114,7 +114,7 @@ Partial Class frmAbout
Me.PictureBox1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ Me.PictureBox1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.PictureBox1.Image = Global.DD_ProcessManager.My.Resources.Resources.taskflow_boot Me.PictureBox1.Image = Global.taskFLOW.My.Resources.Resources.taskflow_boot
Me.PictureBox1.Location = New System.Drawing.Point(12, 5) Me.PictureBox1.Location = New System.Drawing.Point(12, 5)
Me.PictureBox1.Name = "PictureBox1" Me.PictureBox1.Name = "PictureBox1"
Me.PictureBox1.Size = New System.Drawing.Size(496, 141) Me.PictureBox1.Size = New System.Drawing.Size(496, 141)

View File

@@ -63,7 +63,7 @@ Partial Class frmAdmin2
Me.XtraTabPage1 = New DevExpress.XtraTab.XtraTabPage() Me.XtraTabPage1 = New DevExpress.XtraTab.XtraTabPage()
Me.BindingNavigator1 = New System.Windows.Forms.BindingNavigator(Me.components) Me.BindingNavigator1 = New System.Windows.Forms.BindingNavigator(Me.components)
Me.TBDD_EMAIL_TEMPLATEBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBDD_EMAIL_TEMPLATEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet() Me.DD_DMSLiteDataSet = New taskFLOW.DD_DMSLiteDataSet()
Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel() Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel()
Me.BindingNavigatorMoveFirstItem = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorMoveFirstItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorMovePreviousItem = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorMovePreviousItem = New System.Windows.Forms.ToolStripButton()
@@ -156,9 +156,9 @@ Partial Class frmAdmin2
Me.GridColumn3 = New DevExpress.XtraGrid.Columns.GridColumn() Me.GridColumn3 = New DevExpress.XtraGrid.Columns.GridColumn()
Me.GridColumn4 = New DevExpress.XtraGrid.Columns.GridColumn() Me.GridColumn4 = New DevExpress.XtraGrid.Columns.GridColumn()
Me.XtraTabPage3 = New DevExpress.XtraTab.XtraTabPage() Me.XtraTabPage3 = New DevExpress.XtraTab.XtraTabPage()
Me.TBDD_EMAIL_TEMPLATETableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_EMAIL_TEMPLATETableAdapter() Me.TBDD_EMAIL_TEMPLATETableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBDD_EMAIL_TEMPLATETableAdapter()
Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager() Me.TableAdapterManager = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
Me.TBDD_GUI_LANGUAGE_PHRASETableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_GUI_LANGUAGE_PHRASETableAdapter() Me.TBDD_GUI_LANGUAGE_PHRASETableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBDD_GUI_LANGUAGE_PHRASETableAdapter()
Me.LayoutConverter1 = New DevExpress.XtraLayout.Converter.LayoutConverter(Me.components) Me.LayoutConverter1 = New DevExpress.XtraLayout.Converter.LayoutConverter(Me.components)
Me.XtraSaveFileDialog1 = New System.Windows.Forms.SaveFileDialog() Me.XtraSaveFileDialog1 = New System.Windows.Forms.SaveFileDialog()
CType(Me.spcontwKonfMain, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.spcontwKonfMain, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -1465,7 +1465,7 @@ Partial Class frmAdmin2
Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete Me.TableAdapterManager.UpdateOrder = taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
' '
'TBDD_GUI_LANGUAGE_PHRASETableAdapter 'TBDD_GUI_LANGUAGE_PHRASETableAdapter
' '

View File

@@ -2360,7 +2360,7 @@
<value>DD_DMSLiteDataSet</value> <value>DD_DMSLiteDataSet</value>
</data> </data>
<data name="&gt;&gt;DD_DMSLiteDataSet.Type" xml:space="preserve"> <data name="&gt;&gt;DD_DMSLiteDataSet.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;BindingNavigatorCountItem.Name" xml:space="preserve"> <data name="&gt;&gt;BindingNavigatorCountItem.Name" xml:space="preserve">
<value>BindingNavigatorCountItem</value> <value>BindingNavigatorCountItem</value>
@@ -2714,19 +2714,19 @@
<value>TBDD_EMAIL_TEMPLATETableAdapter</value> <value>TBDD_EMAIL_TEMPLATETableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBDD_EMAIL_TEMPLATETableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBDD_EMAIL_TEMPLATETableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_EMAIL_TEMPLATETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBDD_EMAIL_TEMPLATETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve"> <data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve">
<value>TableAdapterManager</value> <value>TableAdapterManager</value>
</data> </data>
<data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve"> <data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBDD_GUI_LANGUAGE_PHRASETableAdapter.Name" xml:space="preserve"> <data name="&gt;&gt;TBDD_GUI_LANGUAGE_PHRASETableAdapter.Name" xml:space="preserve">
<value>TBDD_GUI_LANGUAGE_PHRASETableAdapter</value> <value>TBDD_GUI_LANGUAGE_PHRASETableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBDD_GUI_LANGUAGE_PHRASETableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBDD_GUI_LANGUAGE_PHRASETableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_GUI_LANGUAGE_PHRASETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBDD_GUI_LANGUAGE_PHRASETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;LayoutConverter1.Name" xml:space="preserve"> <data name="&gt;&gt;LayoutConverter1.Name" xml:space="preserve">
<value>LayoutConverter1</value> <value>LayoutConverter1</value>

View File

@@ -25,10 +25,10 @@ Partial Class frmAdminPasswort
Me.components = New System.ComponentModel.Container() Me.components = New System.ComponentModel.Container()
Me.txtOld = New System.Windows.Forms.TextBox() Me.txtOld = New System.Windows.Forms.TextBox()
Me.txtNew = New System.Windows.Forms.TextBox() Me.txtNew = New System.Windows.Forms.TextBox()
Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet() Me.DD_DMSLiteDataSet = New taskFLOW.DD_DMSLiteDataSet()
Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBPM_KONFIGURATIONTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter() Me.TBPM_KONFIGURATIONTableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter()
Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager() Me.TableAdapterManager = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
Me.btnSetNew = New System.Windows.Forms.Button() Me.btnSetNew = New System.Windows.Forms.Button()
Me.Label1 = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label()
Me.Label2 = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label()
@@ -81,11 +81,11 @@ Partial Class frmAdminPasswort
Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete Me.TableAdapterManager.UpdateOrder = taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
' '
'btnSetNew 'btnSetNew
' '
Me.btnSetNew.Image = Global.DD_ProcessManager.My.Resources.Resources.add Me.btnSetNew.Image = Global.taskFLOW.My.Resources.Resources.add
Me.btnSetNew.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnSetNew.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnSetNew.Location = New System.Drawing.Point(12, 60) Me.btnSetNew.Location = New System.Drawing.Point(12, 60)
Me.btnSetNew.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.btnSetNew.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
@@ -138,10 +138,10 @@ Partial Class frmAdminPasswort
End Sub End Sub
Friend WithEvents txtOld As System.Windows.Forms.TextBox Friend WithEvents txtOld As System.Windows.Forms.TextBox
Friend WithEvents txtNew As System.Windows.Forms.TextBox Friend WithEvents txtNew As System.Windows.Forms.TextBox
Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet Friend WithEvents DD_DMSLiteDataSet As taskFLOW.DD_DMSLiteDataSet
Friend WithEvents TBPM_KONFIGURATIONBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPM_KONFIGURATIONBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBPM_KONFIGURATIONTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter Friend WithEvents TBPM_KONFIGURATIONTableAdapter As taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter
Friend WithEvents TableAdapterManager As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager Friend WithEvents TableAdapterManager As taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
Friend WithEvents btnSetNew As System.Windows.Forms.Button Friend WithEvents btnSetNew As System.Windows.Forms.Button
Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label Friend WithEvents Label2 As System.Windows.Forms.Label

View File

@@ -40,6 +40,7 @@ Partial Class frmAdmin_notResponsibleConfig
Me.Label2 = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label()
Me.Label9 = New System.Windows.Forms.Label() Me.Label9 = New System.Windows.Forms.Label()
Me.cmbAttrComment = New System.Windows.Forms.ComboBox() Me.cmbAttrComment = New System.Windows.Forms.ComboBox()
Me.checkCommentMuss = New System.Windows.Forms.CheckBox()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout() Me.SuspendLayout()
' '
@@ -193,11 +194,22 @@ Partial Class frmAdmin_notResponsibleConfig
Me.cmbAttrComment.Size = New System.Drawing.Size(295, 24) Me.cmbAttrComment.Size = New System.Drawing.Size(295, 24)
Me.cmbAttrComment.TabIndex = 106 Me.cmbAttrComment.TabIndex = 106
' '
'checkCommentMuss
'
Me.checkCommentMuss.AutoSize = True
Me.checkCommentMuss.Location = New System.Drawing.Point(548, 259)
Me.checkCommentMuss.Name = "checkCommentMuss"
Me.checkCommentMuss.Size = New System.Drawing.Size(208, 17)
Me.checkCommentMuss.TabIndex = 110
Me.checkCommentMuss.Text = "Begründung muss eingetragen werden"
Me.checkCommentMuss.UseVisualStyleBackColor = True
'
'frmAdmin_notResponsibleConfig 'frmAdmin_notResponsibleConfig
' '
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(778, 340) Me.ClientSize = New System.Drawing.Size(778, 340)
Me.Controls.Add(Me.checkCommentMuss)
Me.Controls.Add(Me.Label9) Me.Controls.Add(Me.Label9)
Me.Controls.Add(Me.cmbAttrComment) Me.Controls.Add(Me.cmbAttrComment)
Me.Controls.Add(Me.txtPROFILE_NOT_RESPONSIBLE_QUEST) Me.Controls.Add(Me.txtPROFILE_NOT_RESPONSIBLE_QUEST)
@@ -236,4 +248,5 @@ Partial Class frmAdmin_notResponsibleConfig
Friend WithEvents Label2 As Label Friend WithEvents Label2 As Label
Friend WithEvents Label9 As Label Friend WithEvents Label9 As Label
Friend WithEvents cmbAttrComment As ComboBox Friend WithEvents cmbAttrComment As ComboBox
Friend WithEvents checkCommentMuss As CheckBox
End Class End Class

View File

@@ -165,52 +165,53 @@
<data name="SimpleButton1.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="SimpleButton1.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABV0RVh0VGl0 iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABV0RVh0VGl0
bGUATmV4dDtBcnJvdztEb3duKXvBAwAACnFJREFUWEeVVgdUlUcWHnfTdlNxk3WTmD0REXDFBoIUYekP bGUATmV4dDtBcnJvdztEb3duKXvBAwAACqBJREFUWEeNlwdYVFcWx4+buptsEtxk3SRmv4gIKCoCihRh
sGIBUaOoFHvDREMRERQQEOmIYDdqYqICFoogKErUJJIISi8qqKEpSs9+uXceDzWb3T0753xn5p+5937f GdogKoIFRI2iUuwNEw2ogKCAgEhHpIglamIHpA0gKEjUJJgI6sDQixCa9GL2n+/eeUMmbp3v+3/3vfvu
vVPeE/7JViJgr7UIPGAjgg/bitAjtiLsS4WI+FohIk8qRFSqQsSk24m403Yi/py9oDbgvyHmjI3YmW4l Ped3zj33znvkk2hBfimW5H/aigLPWVPweWsK+VpMYZfFFH5NTBE3xBSVbkMxGTYUmzWfiGjcf1PUTSs6
Ik9ZivBvLETIV+Zi21EzseWwqfDfbyJ8U0zE57uMxGfxhmRObVOypbj3dK+of7pPNLTvF/c7Dkg86DhI nm5B4dfNKfSKiIK+MaMjF0zp0DkT8kk1pv1JxvTlCUP6ItaA2SI6mGhOTf0p1Nx/iloGUunZ4Gmu1sEz
OCQedh5iMxXBHwh/JLxEePk34DkGr7PdgHtPD4q7Tw+IO0/2i9q2faLm8R5R/ShFVLbuFuvjx5MJNd/d 1Dp4ltqGzio7/QMRvUJErxLRay+J9TGx52zcuKb+M9TYf5oa+lKprvcU1fYkU83zJJJ1n6Q9sXPlAPtP
FmS0Rwqob1eKaJAiDvKyiliSBh+20I1KtdkSl2FbkJBl+31itqI3KUfRG59h/UPcOevLO05YBPnvMRlH iqixP5kDNA/IIVo4xBllx9xp4DmRbsQNq0Mx2dbFcbnW38dLxC8S8sUvYrMtf4jJsiw5dlUU4JNsPJuI
tq+wPUEKudNGAh7vE9UqAS3JYn2cAS1R800yJ4XJ4u6TFKoECWmnahCoqTJ+OeSIuVNUunXZnlxHnC/x XhdgOEhDbyrV9ZyiGgVAVyLtidEXABLMqKEvkRr7kqiJgQykcClF/FrQeTPHiHRLaXKBA/IqPPHoWSik
ws374ShrjMaDjsMSZY0xNBeGrOK1SD4/FRGnzMsCDhjPJd9XCVJIbR95VWuyqGhJEl6xfQK8E81EXVsi 7ZFoHTzHJW2PwqNnIcgt34XEvMUIu24m9TtttIqI3lCA1AnOq7sTqaorgTyjBQCveFOq742nhr4T1NiX
idhFIpJIxG6elllvjDUcGnbcovBgnjN+qg9FfftuVD7ajpImfxQ3+eDGw3X44eFa/NToTfBFeUso7jzZ QE39JxXOX9kXbTA55JKo9EyhE35qDkbzwEnInh9FRYcPyju8Uda2Gz+07cJP7V74qX0/KruC0dB3Eg+b
jSKy3X9hFrYeM7nq5q+jTbG4IrIalS27REVzolgXq0+f1DYmmNDexNEexZOQBJ5i8pe8k4xttn9l0Zx7 g5F6azkOXzS+5+ozXVPICM+GrOsEVXXG0+7oOXKAfXHGVNsTQ3W9sVTfG6dw/qpXgpHV0W9EnQWPP0dt
61PUtEWh6OeNuHZ/Ba4/YKyU+O4hj5fj2oNl+LZhKa7UL8Hlex643rAO5a07kXXTC1uPTmheFTHWgWJy bwQe/rwP959txYNWpm1c37Wx6y2437oZ37Zswt3mjShpcseDlt2o7D6O3EeeOHxhXuf2MB1bIRscQtoZ
NaSIsuZ4sTZaj4bUPoszElWPo0hENH9K8g0x423Dj1t1Xa/djJuNPrhCQQvrCQ2eROSJq/eVvQqFDR5E S7si9eQAX8QYUnVPBNX2RI453xs11zr0ksXwgzpfPGr3xt0md5Q2u6O0xQPftnjg3jN5q1BpizvuNruh
7o6Ce4tx8c5C5NctQG7NfHzfsAGFVZux7YhZ97KQUf0iSptixeooXeYTYm2Uvqh8FMFDWXbPwNHagYdM uGkDbjesQ1H9WhTUrsH3LXtRWu2LI+dNRzYHzRyDeNoRTTsidOUAuyLmkOx52FjaPfy1Nf3PmrTfr/PG
G6/V+uDb+hW4dMdVouDuQiJYhMv1C58Dfd/jebIh5N+Zjwt185BTOxfnq1yQWemMvBoSV7kJfnsNm5zX t81bcafBhau4cR2Km9ajpHmdktajpIn1u+BOkwuKGtbgVv1q5NetQl61M3JkTiisdcdd2UEcSDHocNqp
aI4kDrkdqyLHMqcQ7sE6oqw1hIdcnle8kwwun73B5fRETo0LLtTOQR4FzKubi4t35xE+wfwtw2C0YCCM PkOxHNvDdeQAboHTSdodxC5Zel73StAvySxj6fRAfq0zbtWtRGHdKhTWr8LtxtW43fgZ1hyaAsO142G0
FzLehomrGlyDNJFb54Lz5JNd7YyMylk4Vz4Tp8sckVO9CKe+W451MWMLieMNAh9MTliIT/yHcydLvzp8 juldGLuowCVAHQX1zsirdYakxgnZsuXIqlyGDKkD8mvW4/p3W7A7SqeUiN4WCpMFTPSZz9Sx1O8InbUq
zNzwr2xwtWE1MqtmIItwvnqWRE6NE2XmRCTOMFn0DqrrHqDmzkPZV9Y8gOlCNSKeRVnPJPLpOFvuiPSy 9Bsr3GvZgZzqpcitXoq8muVc+bWOyK9zREG9E4zXv4ea+lbUNrTxVlbbCpN1KpDULEeObBmyZUuQWemA
KUi7PQUnSibhUu1KBH9hDVf/4QuJ6zUCJyzEvE1a3PHHq16xemXZJUtxrmI6zpRPwdmKKRRsGgmZhsxq dKkd0p7Y4WrFQtyp24bAryzh4jN1HRG9KQRMtPqghiL6Nzyj9aSSik3IqlqCm5V2yKyyQ7bMHrnV9sip
R+qnE8l0mLqrobunBz29vbLv6OqRc+cqHclnKk6Tb1rpZKTenkjk9jh+U4FviifiTNFyrIgYVUFcbxH6 cUBu9RJIapbAxE0FI6OjGH3xgreDw6O8L0vmgMyqxciotEPa00W48WQBrlbMx6VHYlwpX4CbD7dga9jM
qyCzd/LSsAvYZ0bldkXqLTukldlRBg5UwokUcBKJIlROljD3UEMnEXf19KKruxedJOCfNMd26WSfWuqA KiJ6RzkLPHpHTzUbv1OmKKxzwY3HNkiT2iBdaosM6QJkVC5EVtVCZMkWcZm5q2BodBTDoy8wPPICQ8Oj
U7fs8XWxgshtcexHaxy5YYWM8gXw22OGacvUpxCn6lZIAa+4fK4ZGZvmRIa25GhFyq1x8rYNThHSymwJ +Ie7Ch+XLl2AG09tcf3xfFwuF+PSI2tc/NES58sskF25FgeSTWG/WdVOaVdwgNedv1QPj05zxPkya1wu
CiKwI0EOsFxKAoi0s1uZfXtnj5xLvW2Hk7co2xIiLrbFlzetcfRHS3xRZIlD35nj4HUbxKc7YfYGzVji t8DVCktce2KF60+skCa1RppUjIxKG2RIbWG+SYU7HRqRRz8wNMr7bjyxwbXHYlypEONSuTW+fmSJCz+a
fJ3AL6xU8docH62ClFwnxF40RkKBEQkxJyEWcN40GBaearBapgbr5X1YMRBPO7rxtJNA/RMCz1sxSIgF 46uH5jj7nRnOPLBCbLojVuxVjyait4QTllO8udJbozipwBHRt40QV2yI82VmuFwugtPBiRB5qMBiswos
wZx8Zvp8iMMUZ/81MyRcoriXJmBv3mwQFx9G3oZ+AX928dFq3FswHdEXDLAzTx8xeeORdNkY+wsmY+ba twjaOh79gyPoHxrhbd/gCO+3YNqkAtEmFZh5qGCZ98c4V2aG1PumiLtjhLg785BSuAIrvTVYMbJlGAP4
MSivqkVpVQNuVdTjdmUD2tq7JB4/VaKkogEl5co1tp2xTg8p+ZNkjLh8I8TkjycYYt+VGZjnp91EnGoE k7O3RntK8RJE3tLH8cI5iCqci4QSI6QWL8KyXbNQWV2Hp9UteFzVjCeyFvQODHP19MtVUdWCikr5MzZ2
PgdSxeuzvbW6k6/YIyJXF5G54/pFJBaYIuALU2yKd0fvL/9C65MutLR1orWti8bUE/i75XEnmh51SZuA 6W49JBUt5DZiigwRVTQXUUUGOHV3KVYf0OwgIhWhDjjFWyu8NEYS785HWIEuwgtmj0HEF5vA7ysTHIx1
hCXYfMiUyM0Qd9FQkkdd0MeOXH3sKZyIub7a3cQ5kMC/olLAG84btbrjL5oj/LwuduToSRFRVI3oPAMk w4tf/onuvmF09Q6hu3cY3X1DXOy+q2cIHc+H+Ri/uI3wPWuChBJTxNw24M4jbs3BsYI5SC5dgFX7NUeI
F1phQZA2MgqO08H7BT+3dqCZCJsfd6DxERN34OeWDnkgs66cwPxALSKylhlHkT/H4XgRObq0DRZwoWSJ aLzwL8oB3nbapzESe9sMoXm6OJavxyEibukjslAfiaUWWBugieziSxge/QU/dw+is2cInT2DaH/OHA/i
8y8vCJj5qWbjjiwTEjAWEdl9IhgXxilFXLbDNC913L1fjSftPXjY0k7owIPmDtm3tXej/mEd2WggpcBe 565BXpC5d69ijb8GkkstecQRhfrcDrMXlq+LuDsiOHtpMIC//A5g2efq7cdyjRGap4MwiQDBdGu2HKLE
+nDW7M9xmJwRmT0BThs0eQv6BfAZeN1x1bDL274xRniWLsIyxyAse4zSgZx35OrJLCLSLeEWaC3vPmfe Bvaeqmh8VoO+gVG0dQ2grWsQrZ2DvO0dGEFzWz3sPdWQVDyfz2FRs/nMDnPOFC6ZB8e96mwJxgBYDbzl
0NSOhsZ2OeY5zyAFwtMs5dbtpIxVWTM43g5KLPiECRxXaVwlzv4zwAL+5LBEPXpjyngy1EVo5miEZo+W sH1KyZErRgjN1UVIziyESGbJJ+Tr4ViBHo8iLN0crv6WfO+zyFs6BtDSPsCvWZ9HgBihaeZ86Y4XzB6L
TrIifdsSm2+MtYm62H1iGxH+gnoirycRPE45GYI1CWNpzycoRTPIj/3Ds8dSUqNprIfP9xjCwX1IInG+ monZOybRReBVYzhsV7unXAMM4I+2G1Uj9yXNRYhEF8E52giWaPNJPCPCskQXGWFXvC5OXj2CkdFf0Nw+
cAtetXD5aMrCLaPIeBxCzo1ESMZIhGaM6q+GDERILLDAHH91XL+VT1ewR+L70gI4+w3BLlpT2THYjxMJ gOaOAX6ddC0IO+N0EHN7nhyaKU+Xzw+V6CAkRxuheXr4MtkAtm6T4l/eBW+InD+xW3doJkIlsxGUNQNB
zRwlY0VQ7EWBo2A6a7AzcfI7wNzKl5Dw9uRlQyv9jo6WAoLP6cieHTnAdspge19VYs7TQfIdjUdPWiXm 2TMQnD1zLBvcUJ4O4otFWOmjigePi9A/OMr1/dNiOB2YhBPForFxTGweCyQ4Zya3FSaZjfX+M2GyfKKT
+ekiOtOC1p6Rsn1IBpGTvyqO37ExmLJCo5q4/krgl3CAcFgylHrlW0BVcJ/nPwLbM8Zi65kR2HZ2hBQS cA6MHUQsFe8u2jxZduCCNgcIzJrOWzaRGTiao42jQlai8kRw3q+N533dXKsP6CIyR4QQFqnglI0Pytbm
rBLSJyYsWw+BXxrBN2EuNu36BAHHjKhyenJ9u8qOk6AqBp/VkXHCKOb8zSNg5jR4OXGpyj9A2HuqUy+r 8xV2DlycBbutajVE9FfhJBxHthsnj50FIudP3Fb7aOFotg4O39TCkUwtDhKoABFgQiR68P/aEPvjVuHg
wCfyHQdP9Wtrdo0gASOliK3k/EyIsiosaGfOeHju1IZnpBbtuaEkk1sn15WkzzASa5NGgGLfII5n2XNT ic/gd9EQoRI9/vyoYhwLInsGAjOnczsh2TpY46sFU8eJW5TSP47me6gqssAq8j1bD9X7O09o4fDNGRzi
uKuLs7eW8FAexjHWgwwnrxzW7H1kBIJIQNDpf8heVuQ5QYz4PDPE55thmyR8Rsq2Kp+gMzrwPqqDqSuG cKYyiDwrDOh4/lx4HNeER7gGwvMNuDO+dEL22JzfNAO7ErRg66Fa9rvo2U/spkqZjzeOFeMsywkGi7ZN
tuiYvWtGHPx/QJk9N4Wbukgv9hBpxW78yWfhDcOpH86Ytlqje/1+LWxJH04gEaeHK8UQAk+zsBeJGHK+ 6fQ6r4WAm1oIyJjGW54RJSCm2EJTxBaZ4gh3+JtTNlYxJ+DmdHhdmI7FWyd3TTd931R4H5BHzwFcVSm9
by6Q7NiPYziu0ejWn/S+C8V+h8CVHqDwkJX/NwGqrXjLYPIHsyYuHdq6PF6zT4QSgSTkRbAgAq/T9/O2 3J3Syl3ZLauFtw0Wf7zUfofayJ5UDRxKn4pD6dMQkDFVDpMxDf4ZDOz3jph4v9DnnzGNz2M2HHaqjcxZ
KxI0MWmpxiN9+/fnUEx+evnv2IA04lO4ybOnEuD2vACViDeHG71rYLv44x+cvDWw/qAWNlPQgHRtBKRR +KEzy7CQ6XFid575fwFQLMU7+os+Wr5g0+TuLbHqAoRc/hkviwFNgz97nvHbOKatcepYuEnt+Zz5H64U
T+BvJuJ+83NzbOvsMwy2i4YUaRoMNKZYnLkkZzAX88rGA55gsBBqKhG8HXxX3zOc9uFyxeIhtY5eQ7E4 jl72OjYurdydxK689hQArsoACog/TzV8X996w6c/OHqpYc8ZDfimT4Vfuib80qZysXvmiLW+Sn1srJP3
TAPr9mpiwyEt+KdpY3OqNjYc1sK6fVpwozVHeooVi9XrDKcOXkm+fyO8SZBlZ6h4fiPAo68KvBUePK0S FFivn/RQXX+8kRA5dy4HcOV+xwBYBxMDUYJgy8H26gcG9h9vEW+YVOfgORkbQtSwO0Ude89qwCdNE743
wYeFTyxfm0FjrAZNNp399zgr1yFF1q4fl9IBBsPGdUiplevHRaazP4ofbTloKtm+T+Cs+b8fJ9JP/rsC NLH3nAZ2n9KAa4gaHDzVIN6gWm+weOI2IvobC0SRdoVz5uclAHchC2wp3JUhWLGwimXbZsIsiwmLTFb8
/hOoPS+ES8gV4cDvETi7D/rAY75e/L7zKWfR/cS/F5vx/zSVEL6qHJhLyoKYiMFjnuM1tlHZ/48mxK89 PcbCZdJDS5dPn4rdVMFk5TLpqYXLpw9NVnwSq20+YTERfShEzd79FK9e3Pm/BfhPegmEpZBlhBn+QIju
+oEotzUUCQAAAABJRU5ErkJggg== I0Hsmm0vdr6zKld8kvH5L9tVsv9//xQgbKsqvowZEHPExK4VX8j860fQ//z9Cj36gSjD0TzyAAAAAElF
TkSuQmCC
</value> </value>
</data> </data>
<data name="frmAdmin_notResponsibleConfig.IconOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="frmAdmin_notResponsibleConfig.IconOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">

View File

@@ -21,12 +21,18 @@ Public Class frmAdmin_notResponsibleConfig
End Sub End Sub
Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
Dim oUpd = $"UPDATE TBPM_PROFILE SET NOT_RESP_SQL = '{oNotResponsible_SQL.Replace("'", "''")}',NOT_RESP_COMMENT_ATTRIBUTE = '{cmbAttrComment.Text}', CHANGED_WHO = '{User.UserName}' WHERE GUID = {oProfilID}" Dim oUpd = $"UPDATE TBPM_PROFILE SET NOT_RESP_COMMENT = '{checkCommentMuss.Checked}', NOT_RESP_SQL = '{oNotResponsible_SQL.Replace("'", "''")}',NOT_RESP_COMMENT_ATTRIBUTE = '{cmbAttrComment.Text}', CHANGED_WHO = '{User.UserName}' WHERE GUID = {oProfilID}"
If DatabaseECM.ExecuteNonQuery(oUpd) = True Then If DatabaseECM.ExecuteNonQuery(oUpd) = True Then
oUpd = $"EXEC PRDD_GUI_LANGUAGE_PHRASE 'PM','PROFILE_NOT_RESPONSIBLE_QUEST{oProfilID}','{USER_LANGUAGE}','PROFILE_NOT_RESPONSIBLE_QUEST','{txtPROFILE_NOT_RESPONSIBLE_QUEST.Text}','','{USER_USERNAME}','{oProfilID}',0" oUpd = $"EXEC PRDD_GUI_LANGUAGE_PHRASE 'PM','PROFILE_NOT_RESPONSIBLE_QUEST{oProfilID}','{USER_LANGUAGE}','PROFILE_NOT_RESPONSIBLE_QUEST','{txtPROFILE_NOT_RESPONSIBLE_QUEST.Text}','','{USER_USERNAME}','{oProfilID}',0"
LOGGER.Debug($"oUpd: {oUpd}")
If DatabaseECM.ExecuteNonQuery(oUpd) Then
oUpd = $"EXEC PRDD_GUI_LANGUAGE_PHRASE 'PM','PROFILE_NOT_RESPONSIBLE_CAPT{oProfilID}','{USER_LANGUAGE}','PROFILE_NOT_RESPONSIBLE_CAPT','{txtCaption_NotResponsible.Text}','','{USER_USERNAME}','{oProfilID}',0"
If DatabaseECM.ExecuteNonQuery(oUpd) Then If DatabaseECM.ExecuteNonQuery(oUpd) Then
oUpd = $"EXEC PRDD_GUI_LANGUAGE_PHRASE 'PM','PROFILE_REJECTION_CAPT{oProfilID}','{USER_LANGUAGE}','PROFILE_REJECTION_CAPT','{txtCaption_NotResponsible.Text}','','{USER_USERNAME}','{oProfilID}',0"
bstitmInfo.Caption = "Data saved successfully - " + Now.ToString bstitmInfo.Caption = "Data saved successfully - " + Now.ToString
LOGGER.Debug($"oUpd: {oUpd}")
End If
End If End If
@@ -38,10 +44,11 @@ Public Class frmAdmin_notResponsibleConfig
Private Sub frmAdmin_notResponsibleConfig_Load(sender As Object, e As EventArgs) Handles Me.Load Private Sub frmAdmin_notResponsibleConfig_Load(sender As Object, e As EventArgs) Handles Me.Load
Try Try
Dim oNR_Act_Attr As String Dim oNR_Act_Attr As String
Dim oSQL = $"SELECT NOT_RESP_SQL, NOT_RESP_COMMENT_ATTRIBUTE FROM TBPM_PROFILE WHERE GUID = {oProfilID}" Dim oSQL = $"SELECT NOT_RESP_SQL, NOT_RESP_COMMENT_ATTRIBUTE,NOT_RESP_COMMENT FROM TBPM_PROFILE WHERE GUID = {oProfilID}"
Dim oDT = DatabaseECM.GetDatatable(oSQL) Dim oDT = DatabaseECM.GetDatatable(oSQL)
oNotResponsible_SQL = oDT.Rows(0).Item("NOT_RESP_SQL") oNotResponsible_SQL = oDT.Rows(0).Item("NOT_RESP_SQL")
oNR_Act_Attr = oDT.Rows(0).Item("NOT_RESP_COMMENT_ATTRIBUTE") oNR_Act_Attr = oDT.Rows(0).Item("NOT_RESP_COMMENT_ATTRIBUTE")
checkCommentMuss.Checked = oDT.Rows(0).Item("NOT_RESP_COMMENT")
LOGGER.Debug($"oNR_Act_Attr: {oNR_Act_Attr}") LOGGER.Debug($"oNR_Act_Attr: {oNR_Act_Attr}")

View File

@@ -37,7 +37,7 @@ Partial Class frmAdministration
Me.SplitContainer_Profilzuordnung2 = New System.Windows.Forms.SplitContainer() Me.SplitContainer_Profilzuordnung2 = New System.Windows.Forms.SplitContainer()
Me.gridAssignedUsers = New DevExpress.XtraGrid.GridControl() Me.gridAssignedUsers = New DevExpress.XtraGrid.GridControl()
Me.TBPROFILE_USERBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPROFILE_USERBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet() Me.DD_DMSLiteDataSet = New taskFLOW.DD_DMSLiteDataSet()
Me.viewAssignedUsers = New DevExpress.XtraGrid.Views.Grid.GridView() Me.viewAssignedUsers = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.colPRENAME1 = New DevExpress.XtraGrid.Columns.GridColumn() Me.colPRENAME1 = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colNAME3 = New DevExpress.XtraGrid.Columns.GridColumn() Me.colNAME3 = New DevExpress.XtraGrid.Columns.GridColumn()
@@ -76,7 +76,7 @@ Partial Class frmAdministration
Me.SplitContainerControl1 = New DevExpress.XtraEditors.SplitContainerControl() Me.SplitContainerControl1 = New DevExpress.XtraEditors.SplitContainerControl()
Me.gridFinalIndex = New DevExpress.XtraGrid.GridControl() Me.gridFinalIndex = New DevExpress.XtraGrid.GridControl()
Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.FinalIndexDataSet = New DD_ProcessManager.FinalIndexDataSet() Me.FinalIndexDataSet = New taskFLOW.FinalIndexDataSet()
Me.viewFinalIndex = New DevExpress.XtraGrid.Views.Grid.GridView() Me.viewFinalIndex = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.colGUID = New DevExpress.XtraGrid.Columns.GridColumn() Me.colGUID = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colPROFIL_ID = New DevExpress.XtraGrid.Columns.GridColumn() Me.colPROFIL_ID = New DevExpress.XtraGrid.Columns.GridColumn()
@@ -130,9 +130,9 @@ Partial Class frmAdministration
Me.RibbonPageGroup5 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.RibbonPageGroup5 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar() Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
Me.TBDD_USERBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBDD_USERBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager() Me.TableAdapterManager = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
Me.TBPM_PROFILEBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_PROFILEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBPM_PROFILETableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILETableAdapter() Me.TBPM_PROFILETableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILETableAdapter()
Me.Label2 = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label()
Me.cmbObjekttypen = New System.Windows.Forms.ComboBox() Me.cmbObjekttypen = New System.Windows.Forms.ComboBox()
Me.FINAL_PROFILECheckBox = New System.Windows.Forms.CheckBox() Me.FINAL_PROFILECheckBox = New System.Windows.Forms.CheckBox()
@@ -152,7 +152,7 @@ Partial Class frmAdministration
Me.CHANGED_WHOTextBox = New System.Windows.Forms.TextBox() Me.CHANGED_WHOTextBox = New System.Windows.Forms.TextBox()
Me.CHANGED_WHENTextBox = New System.Windows.Forms.TextBox() Me.CHANGED_WHENTextBox = New System.Windows.Forms.TextBox()
Me.dlgWindreamsuche = New System.Windows.Forms.OpenFileDialog() Me.dlgWindreamsuche = New System.Windows.Forms.OpenFileDialog()
Me.TBPM_TYPETableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_TYPETableAdapter() Me.TBPM_TYPETableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_TYPETableAdapter()
Me.FolderBrowserDialog1 = New System.Windows.Forms.FolderBrowserDialog() Me.FolderBrowserDialog1 = New System.Windows.Forms.FolderBrowserDialog()
Me.TabControl1 = New System.Windows.Forms.TabControl() Me.TabControl1 = New System.Windows.Forms.TabControl()
Me.TabPage1 = New System.Windows.Forms.TabPage() Me.TabPage1 = New System.Windows.Forms.TabPage()
@@ -242,19 +242,19 @@ Partial Class frmAdministration
Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBDD_CONNECTIONBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBDD_CONNECTIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBPM_PROFILE_CONTROLSBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_PROFILE_CONTROLSBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBPROFILE_USERTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPROFILE_USERTableAdapter() Me.TBPROFILE_USERTableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPROFILE_USERTableAdapter()
Me.TBDD_USERTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_USERTableAdapter() Me.TBDD_USERTableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBDD_USERTableAdapter()
Me.TBPM_KONFIGURATIONTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter() Me.TBPM_KONFIGURATIONTableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter()
Me.pnlMain = New System.Windows.Forms.Panel() Me.pnlMain = New System.Windows.Forms.Panel()
Me.TBPM_PROFILE_CONTROLSTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_CONTROLSTableAdapter() Me.TBPM_PROFILE_CONTROLSTableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_CONTROLSTableAdapter()
Me.TBPM_PROFILE_FILESBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_PROFILE_FILESBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBPM_PROFILE_FILESTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_FILESTableAdapter() Me.TBPM_PROFILE_FILESTableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_FILESTableAdapter()
Me.TBDD_CONNECTIONTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter() Me.TBDD_CONNECTIONTableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter()
Me.TBDD_GROUPSTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_GROUPSTableAdapter() Me.TBDD_GROUPSTableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBDD_GROUPSTableAdapter()
Me.TBPROFILE_GROUPTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPROFILE_GROUPTableAdapter() Me.TBPROFILE_GROUPTableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPROFILE_GROUPTableAdapter()
Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog() Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog()
Me.FNPM_GET_FREE_USER_FOR_PROFILETableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.FNPM_GET_FREE_USER_FOR_PROFILETableAdapter() Me.FNPM_GET_FREE_USER_FOR_PROFILETableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.FNPM_GET_FREE_USER_FOR_PROFILETableAdapter()
Me.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = New DD_ProcessManager.FinalIndexDataSetTableAdapters.TBPM_PROFILE_FINAL_INDEXINGTableAdapter() Me.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = New taskFLOW.FinalIndexDataSetTableAdapters.TBPM_PROFILE_FINAL_INDEXINGTableAdapter()
Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components) Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage() Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.FolderBrowserDialog2 = New System.Windows.Forms.FolderBrowserDialog() Me.FolderBrowserDialog2 = New System.Windows.Forms.FolderBrowserDialog()
@@ -778,7 +778,7 @@ Partial Class frmAdministration
' '
resources.ApplyResources(Me.BarButtonItem2, "BarButtonItem2") resources.ApplyResources(Me.BarButtonItem2, "BarButtonItem2")
Me.BarButtonItem2.Id = 2 Me.BarButtonItem2.Id = 2
Me.BarButtonItem2.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.chartdesigner2 Me.BarButtonItem2.ImageOptions.SvgImage = Global.taskFLOW.My.Resources.Resources.chartdesigner2
Me.BarButtonItem2.Name = "BarButtonItem2" Me.BarButtonItem2.Name = "BarButtonItem2"
' '
'BarButtonItem3 'BarButtonItem3
@@ -910,7 +910,7 @@ Partial Class frmAdministration
' '
resources.ApplyResources(Me.BarButtonItem19, "BarButtonItem19") resources.ApplyResources(Me.BarButtonItem19, "BarButtonItem19")
Me.BarButtonItem19.Id = 19 Me.BarButtonItem19.Id = 19
Me.BarButtonItem19.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.cancel1 Me.BarButtonItem19.ImageOptions.SvgImage = Global.taskFLOW.My.Resources.Resources.cancel1
Me.BarButtonItem19.Name = "BarButtonItem19" Me.BarButtonItem19.Name = "BarButtonItem19"
' '
'tsbStaticInfo 'tsbStaticInfo
@@ -976,7 +976,7 @@ Partial Class frmAdministration
' '
resources.ApplyResources(Me.BarButtonItem26, "BarButtonItem26") resources.ApplyResources(Me.BarButtonItem26, "BarButtonItem26")
Me.BarButtonItem26.Id = 28 Me.BarButtonItem26.Id = 28
Me.BarButtonItem26.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.Security_Lock Me.BarButtonItem26.ImageOptions.SvgImage = Global.taskFLOW.My.Resources.Resources.Security_Lock
Me.BarButtonItem26.Name = "BarButtonItem26" Me.BarButtonItem26.Name = "BarButtonItem26"
Me.BarButtonItem26.Tag = "Unlock" Me.BarButtonItem26.Tag = "Unlock"
Me.BarButtonItem26.Visibility = DevExpress.XtraBars.BarItemVisibility.Never Me.BarButtonItem26.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
@@ -1144,7 +1144,7 @@ Partial Class frmAdministration
Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete Me.TableAdapterManager.UpdateOrder = taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
' '
'TBPM_PROFILEBindingSource 'TBPM_PROFILEBindingSource
' '
@@ -1194,7 +1194,7 @@ Partial Class frmAdministration
'btnWMopenSuche 'btnWMopenSuche
' '
resources.ApplyResources(Me.btnWMopenSuche, "btnWMopenSuche") resources.ApplyResources(Me.btnWMopenSuche, "btnWMopenSuche")
Me.btnWMopenSuche.Image = Global.DD_ProcessManager.My.Resources.Resources.flag_green Me.btnWMopenSuche.Image = Global.taskFLOW.My.Resources.Resources.flag_green
Me.btnWMopenSuche.Name = "btnWMopenSuche" Me.btnWMopenSuche.Name = "btnWMopenSuche"
Me.btnWMopenSuche.UseVisualStyleBackColor = True Me.btnWMopenSuche.UseVisualStyleBackColor = True
' '
@@ -1629,28 +1629,28 @@ Partial Class frmAdministration
' '
'Button4 'Button4
' '
Me.Button4.Image = Global.DD_ProcessManager.My.Resources.Resources.DeleteFilter_5563 Me.Button4.Image = Global.taskFLOW.My.Resources.Resources.DeleteFilter_5563
resources.ApplyResources(Me.Button4, "Button4") resources.ApplyResources(Me.Button4, "Button4")
Me.Button4.Name = "Button4" Me.Button4.Name = "Button4"
Me.Button4.UseVisualStyleBackColor = True Me.Button4.UseVisualStyleBackColor = True
' '
'Button3 'Button3
' '
Me.Button3.Image = Global.DD_ProcessManager.My.Resources.Resources.DeleteFilter_5563 Me.Button3.Image = Global.taskFLOW.My.Resources.Resources.DeleteFilter_5563
resources.ApplyResources(Me.Button3, "Button3") resources.ApplyResources(Me.Button3, "Button3")
Me.Button3.Name = "Button3" Me.Button3.Name = "Button3"
Me.Button3.UseVisualStyleBackColor = True Me.Button3.UseVisualStyleBackColor = True
' '
'Button2 'Button2
' '
Me.Button2.Image = Global.DD_ProcessManager.My.Resources.Resources.DeleteFilter_5563 Me.Button2.Image = Global.taskFLOW.My.Resources.Resources.DeleteFilter_5563
resources.ApplyResources(Me.Button2, "Button2") resources.ApplyResources(Me.Button2, "Button2")
Me.Button2.Name = "Button2" Me.Button2.Name = "Button2"
Me.Button2.UseVisualStyleBackColor = True Me.Button2.UseVisualStyleBackColor = True
' '
'Button1 'Button1
' '
Me.Button1.Image = Global.DD_ProcessManager.My.Resources.Resources.DeleteFilter_5563 Me.Button1.Image = Global.taskFLOW.My.Resources.Resources.DeleteFilter_5563
resources.ApplyResources(Me.Button1, "Button1") resources.ApplyResources(Me.Button1, "Button1")
Me.Button1.Name = "Button1" Me.Button1.Name = "Button1"
Me.Button1.UseVisualStyleBackColor = True Me.Button1.UseVisualStyleBackColor = True
@@ -1694,7 +1694,7 @@ Partial Class frmAdministration
' '
'Series4SQL 'Series4SQL
' '
Me.Series4SQL.Image = Global.DD_ProcessManager.My.Resources.Resources.database_go Me.Series4SQL.Image = Global.taskFLOW.My.Resources.Resources.database_go
resources.ApplyResources(Me.Series4SQL, "Series4SQL") resources.ApplyResources(Me.Series4SQL, "Series4SQL")
Me.Series4SQL.Name = "Series4SQL" Me.Series4SQL.Name = "Series4SQL"
Me.Series4SQL.UseVisualStyleBackColor = True Me.Series4SQL.UseVisualStyleBackColor = True
@@ -1728,7 +1728,7 @@ Partial Class frmAdministration
' '
'Series3SQL 'Series3SQL
' '
Me.Series3SQL.Image = Global.DD_ProcessManager.My.Resources.Resources.database_go Me.Series3SQL.Image = Global.taskFLOW.My.Resources.Resources.database_go
resources.ApplyResources(Me.Series3SQL, "Series3SQL") resources.ApplyResources(Me.Series3SQL, "Series3SQL")
Me.Series3SQL.Name = "Series3SQL" Me.Series3SQL.Name = "Series3SQL"
Me.Series3SQL.UseVisualStyleBackColor = True Me.Series3SQL.UseVisualStyleBackColor = True
@@ -1762,7 +1762,7 @@ Partial Class frmAdministration
' '
'Series2SQL 'Series2SQL
' '
Me.Series2SQL.Image = Global.DD_ProcessManager.My.Resources.Resources.database_go Me.Series2SQL.Image = Global.taskFLOW.My.Resources.Resources.database_go
resources.ApplyResources(Me.Series2SQL, "Series2SQL") resources.ApplyResources(Me.Series2SQL, "Series2SQL")
Me.Series2SQL.Name = "Series2SQL" Me.Series2SQL.Name = "Series2SQL"
Me.Series2SQL.UseVisualStyleBackColor = True Me.Series2SQL.UseVisualStyleBackColor = True
@@ -1801,7 +1801,7 @@ Partial Class frmAdministration
' '
'Series1SQL 'Series1SQL
' '
Me.Series1SQL.Image = Global.DD_ProcessManager.My.Resources.Resources.database_go Me.Series1SQL.Image = Global.taskFLOW.My.Resources.Resources.database_go
resources.ApplyResources(Me.Series1SQL, "Series1SQL") resources.ApplyResources(Me.Series1SQL, "Series1SQL")
Me.Series1SQL.Name = "Series1SQL" Me.Series1SQL.Name = "Series1SQL"
Me.Series1SQL.UseVisualStyleBackColor = True Me.Series1SQL.UseVisualStyleBackColor = True
@@ -2005,7 +2005,7 @@ Partial Class frmAdministration
Me.Controls.Add(Me.RibbonStatusBar1) Me.Controls.Add(Me.RibbonStatusBar1)
Me.Controls.Add(Me.RibbonControl1) Me.Controls.Add(Me.RibbonControl1)
Me.IconOptions.Icon = CType(resources.GetObject("frmAdministration.IconOptions.Icon"), System.Drawing.Icon) Me.IconOptions.Icon = CType(resources.GetObject("frmAdministration.IconOptions.Icon"), System.Drawing.Icon)
Me.IconOptions.LargeImage = Global.DD_ProcessManager.My.Resources.Resources.publicfix_32x32 Me.IconOptions.LargeImage = Global.taskFLOW.My.Resources.Resources.publicfix_32x32
Me.Name = "frmAdministration" Me.Name = "frmAdministration"
Me.Ribbon = Me.RibbonControl1 Me.Ribbon = Me.RibbonControl1
Me.StatusBar = Me.RibbonStatusBar1 Me.StatusBar = Me.RibbonStatusBar1
@@ -2089,10 +2089,10 @@ Partial Class frmAdministration
Me.PerformLayout() Me.PerformLayout()
End Sub End Sub
Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet Friend WithEvents DD_DMSLiteDataSet As taskFLOW.DD_DMSLiteDataSet
Friend WithEvents TableAdapterManager As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager Friend WithEvents TableAdapterManager As taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
Friend WithEvents TBPM_PROFILEBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPM_PROFILEBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBPM_PROFILETableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILETableAdapter Friend WithEvents TBPM_PROFILETableAdapter As taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILETableAdapter
Friend WithEvents btnWMSuche As System.Windows.Forms.Button Friend WithEvents btnWMSuche As System.Windows.Forms.Button
Friend WithEvents TITLETextBox As System.Windows.Forms.TextBox Friend WithEvents TITLETextBox As System.Windows.Forms.TextBox
Friend WithEvents PROFILGUIDTextBox As System.Windows.Forms.TextBox Friend WithEvents PROFILGUIDTextBox As System.Windows.Forms.TextBox
@@ -2110,7 +2110,7 @@ Partial Class frmAdministration
Friend WithEvents btnWMopenSuche As System.Windows.Forms.Button Friend WithEvents btnWMopenSuche As System.Windows.Forms.Button
Friend WithEvents PRIORITYNumericUpDown As System.Windows.Forms.NumericUpDown Friend WithEvents PRIORITYNumericUpDown As System.Windows.Forms.NumericUpDown
Friend WithEvents TBPM_TYPEBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPM_TYPEBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBPM_TYPETableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_TYPETableAdapter Friend WithEvents TBPM_TYPETableAdapter As taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_TYPETableAdapter
Friend WithEvents FolderBrowserDialog1 As System.Windows.Forms.FolderBrowserDialog Friend WithEvents FolderBrowserDialog1 As System.Windows.Forms.FolderBrowserDialog
Friend WithEvents cmbObjekttypen As System.Windows.Forms.ComboBox Friend WithEvents cmbObjekttypen As System.Windows.Forms.ComboBox
Friend WithEvents Label2 As System.Windows.Forms.Label Friend WithEvents Label2 As System.Windows.Forms.Label
@@ -2119,11 +2119,11 @@ Partial Class frmAdministration
Friend WithEvents TabPage2 As System.Windows.Forms.TabPage Friend WithEvents TabPage2 As System.Windows.Forms.TabPage
Friend WithEvents SplitContainer_Profilzuordnung2 As System.Windows.Forms.SplitContainer Friend WithEvents SplitContainer_Profilzuordnung2 As System.Windows.Forms.SplitContainer
Friend WithEvents TBPROFILE_USERBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPROFILE_USERBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBPROFILE_USERTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPROFILE_USERTableAdapter Friend WithEvents TBPROFILE_USERTableAdapter As taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPROFILE_USERTableAdapter
Friend WithEvents TBDD_USERBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBDD_USERBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBDD_USERTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_USERTableAdapter Friend WithEvents TBDD_USERTableAdapter As taskFLOW.DD_DMSLiteDataSetTableAdapters.TBDD_USERTableAdapter
Friend WithEvents TBPM_KONFIGURATIONBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPM_KONFIGURATIONBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBPM_KONFIGURATIONTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter Friend WithEvents TBPM_KONFIGURATIONTableAdapter As taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter
Friend WithEvents pnlMain As System.Windows.Forms.Panel Friend WithEvents pnlMain As System.Windows.Forms.Panel
Friend WithEvents SORT_BY_LATESTCheckBox As System.Windows.Forms.CheckBox Friend WithEvents SORT_BY_LATESTCheckBox As System.Windows.Forms.CheckBox
Friend WithEvents tabctrl_Profilkonfig As System.Windows.Forms.TabControl Friend WithEvents tabctrl_Profilkonfig As System.Windows.Forms.TabControl
@@ -2131,17 +2131,17 @@ Partial Class frmAdministration
Friend WithEvents TabPageAfterIndex As System.Windows.Forms.TabPage Friend WithEvents TabPageAfterIndex As System.Windows.Forms.TabPage
Friend WithEvents Label6 As System.Windows.Forms.Label Friend WithEvents Label6 As System.Windows.Forms.Label
Friend WithEvents TBPM_PROFILE_CONTROLSBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPM_PROFILE_CONTROLSBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBPM_PROFILE_CONTROLSTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_CONTROLSTableAdapter Friend WithEvents TBPM_PROFILE_CONTROLSTableAdapter As taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_CONTROLSTableAdapter
Friend WithEvents PM_VEKTOR_INDEXComboBox As System.Windows.Forms.ComboBox Friend WithEvents PM_VEKTOR_INDEXComboBox As System.Windows.Forms.ComboBox
Friend WithEvents TBPM_PROFILE_FILESBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPM_PROFILE_FILESBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBPM_PROFILE_FILESTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_FILESTableAdapter Friend WithEvents TBPM_PROFILE_FILESTableAdapter As taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_FILESTableAdapter
Friend WithEvents cmbLOGIndex As System.Windows.Forms.ComboBox Friend WithEvents cmbLOGIndex As System.Windows.Forms.ComboBox
Friend WithEvents DataGridViewCheckBoxColumn2 As System.Windows.Forms.DataGridViewCheckBoxColumn Friend WithEvents DataGridViewCheckBoxColumn2 As System.Windows.Forms.DataGridViewCheckBoxColumn
Friend WithEvents GridControlNavigation As DevExpress.XtraGrid.GridControl Friend WithEvents GridControlNavigation As DevExpress.XtraGrid.GridControl
Friend WithEvents GridViewProfile As DevExpress.XtraGrid.Views.Grid.GridView Friend WithEvents GridViewProfile As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents colNAME As DevExpress.XtraGrid.Columns.GridColumn Friend WithEvents colNAME As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents TBDD_CONNECTIONBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBDD_CONNECTIONBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBDD_CONNECTIONTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter Friend WithEvents TBDD_CONNECTIONTableAdapter As taskFLOW.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter
Friend WithEvents TabControl2 As TabControl Friend WithEvents TabControl2 As TabControl
Friend WithEvents TabPage11 As TabPage Friend WithEvents TabPage11 As TabPage
Friend WithEvents TabPage12 As TabPage Friend WithEvents TabPage12 As TabPage

View File

@@ -5048,7 +5048,7 @@ Top Kreditoren: </value>
<value>DD_DMSLiteDataSet</value> <value>DD_DMSLiteDataSet</value>
</data> </data>
<data name="&gt;&gt;DD_DMSLiteDataSet.Type" xml:space="preserve"> <data name="&gt;&gt;DD_DMSLiteDataSet.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;viewAssignedUsers.Name" xml:space="preserve"> <data name="&gt;&gt;viewAssignedUsers.Name" xml:space="preserve">
<value>viewAssignedUsers</value> <value>viewAssignedUsers</value>
@@ -5198,7 +5198,7 @@ Top Kreditoren: </value>
<value>FinalIndexDataSet</value> <value>FinalIndexDataSet</value>
</data> </data>
<data name="&gt;&gt;FinalIndexDataSet.Type" xml:space="preserve"> <data name="&gt;&gt;FinalIndexDataSet.Type" xml:space="preserve">
<value>DD_ProcessManager.FinalIndexDataSet, FinalIndexDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.FinalIndexDataSet, FinalIndexDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;viewFinalIndex.Name" xml:space="preserve"> <data name="&gt;&gt;viewFinalIndex.Name" xml:space="preserve">
<value>viewFinalIndex</value> <value>viewFinalIndex</value>
@@ -5504,7 +5504,7 @@ Top Kreditoren: </value>
<value>TableAdapterManager</value> <value>TableAdapterManager</value>
</data> </data>
<data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve"> <data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBPM_PROFILEBindingSource.Name" xml:space="preserve"> <data name="&gt;&gt;TBPM_PROFILEBindingSource.Name" xml:space="preserve">
<value>TBPM_PROFILEBindingSource</value> <value>TBPM_PROFILEBindingSource</value>
@@ -5516,7 +5516,7 @@ Top Kreditoren: </value>
<value>TBPM_PROFILETableAdapter</value> <value>TBPM_PROFILETableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBPM_PROFILETableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBPM_PROFILETableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBPM_TYPEBindingSource.Name" xml:space="preserve"> <data name="&gt;&gt;TBPM_TYPEBindingSource.Name" xml:space="preserve">
<value>TBPM_TYPEBindingSource</value> <value>TBPM_TYPEBindingSource</value>
@@ -5534,7 +5534,7 @@ Top Kreditoren: </value>
<value>TBPM_TYPETableAdapter</value> <value>TBPM_TYPETableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBPM_TYPETableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBPM_TYPETableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_TYPETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_TYPETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;FolderBrowserDialog1.Name" xml:space="preserve"> <data name="&gt;&gt;FolderBrowserDialog1.Name" xml:space="preserve">
<value>FolderBrowserDialog1</value> <value>FolderBrowserDialog1</value>
@@ -5582,25 +5582,25 @@ Top Kreditoren: </value>
<value>TBPROFILE_USERTableAdapter</value> <value>TBPROFILE_USERTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBPROFILE_USERTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBPROFILE_USERTableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPROFILE_USERTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPROFILE_USERTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBDD_USERTableAdapter.Name" xml:space="preserve"> <data name="&gt;&gt;TBDD_USERTableAdapter.Name" xml:space="preserve">
<value>TBDD_USERTableAdapter</value> <value>TBDD_USERTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBDD_USERTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBDD_USERTableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_USERTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBDD_USERTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBPM_KONFIGURATIONTableAdapter.Name" xml:space="preserve"> <data name="&gt;&gt;TBPM_KONFIGURATIONTableAdapter.Name" xml:space="preserve">
<value>TBPM_KONFIGURATIONTableAdapter</value> <value>TBPM_KONFIGURATIONTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBPM_KONFIGURATIONTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBPM_KONFIGURATIONTableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBPM_PROFILE_CONTROLSTableAdapter.Name" xml:space="preserve"> <data name="&gt;&gt;TBPM_PROFILE_CONTROLSTableAdapter.Name" xml:space="preserve">
<value>TBPM_PROFILE_CONTROLSTableAdapter</value> <value>TBPM_PROFILE_CONTROLSTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBPM_PROFILE_CONTROLSTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBPM_PROFILE_CONTROLSTableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_CONTROLSTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_CONTROLSTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBPM_PROFILE_FILESBindingSource.Name" xml:space="preserve"> <data name="&gt;&gt;TBPM_PROFILE_FILESBindingSource.Name" xml:space="preserve">
<value>TBPM_PROFILE_FILESBindingSource</value> <value>TBPM_PROFILE_FILESBindingSource</value>
@@ -5612,25 +5612,25 @@ Top Kreditoren: </value>
<value>TBPM_PROFILE_FILESTableAdapter</value> <value>TBPM_PROFILE_FILESTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBPM_PROFILE_FILESTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBPM_PROFILE_FILESTableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_FILESTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_FILESTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBDD_CONNECTIONTableAdapter.Name" xml:space="preserve"> <data name="&gt;&gt;TBDD_CONNECTIONTableAdapter.Name" xml:space="preserve">
<value>TBDD_CONNECTIONTableAdapter</value> <value>TBDD_CONNECTIONTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBDD_CONNECTIONTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBDD_CONNECTIONTableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBDD_GROUPSTableAdapter.Name" xml:space="preserve"> <data name="&gt;&gt;TBDD_GROUPSTableAdapter.Name" xml:space="preserve">
<value>TBDD_GROUPSTableAdapter</value> <value>TBDD_GROUPSTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBDD_GROUPSTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBDD_GROUPSTableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_GROUPSTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBDD_GROUPSTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBPROFILE_GROUPTableAdapter.Name" xml:space="preserve"> <data name="&gt;&gt;TBPROFILE_GROUPTableAdapter.Name" xml:space="preserve">
<value>TBPROFILE_GROUPTableAdapter</value> <value>TBPROFILE_GROUPTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBPROFILE_GROUPTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBPROFILE_GROUPTableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPROFILE_GROUPTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPROFILE_GROUPTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;OpenFileDialog1.Name" xml:space="preserve"> <data name="&gt;&gt;OpenFileDialog1.Name" xml:space="preserve">
<value>OpenFileDialog1</value> <value>OpenFileDialog1</value>
@@ -5642,13 +5642,13 @@ Top Kreditoren: </value>
<value>FNPM_GET_FREE_USER_FOR_PROFILETableAdapter</value> <value>FNPM_GET_FREE_USER_FOR_PROFILETableAdapter</value>
</data> </data>
<data name="&gt;&gt;FNPM_GET_FREE_USER_FOR_PROFILETableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;FNPM_GET_FREE_USER_FOR_PROFILETableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.FNPM_GET_FREE_USER_FOR_PROFILETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.FNPM_GET_FREE_USER_FOR_PROFILETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBPM_PROFILE_FINAL_INDEXINGTableAdapter.Name" xml:space="preserve"> <data name="&gt;&gt;TBPM_PROFILE_FINAL_INDEXINGTableAdapter.Name" xml:space="preserve">
<value>TBPM_PROFILE_FINAL_INDEXINGTableAdapter</value> <value>TBPM_PROFILE_FINAL_INDEXINGTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBPM_PROFILE_FINAL_INDEXINGTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBPM_PROFILE_FINAL_INDEXINGTableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.FinalIndexDataSetTableAdapters.TBPM_PROFILE_FINAL_INDEXINGTableAdapter, FinalIndexDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.FinalIndexDataSetTableAdapters.TBPM_PROFILE_FINAL_INDEXINGTableAdapter, FinalIndexDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;ToolTip1.Name" xml:space="preserve"> <data name="&gt;&gt;ToolTip1.Name" xml:space="preserve">
<value>ToolTip1</value> <value>ToolTip1</value>

View File

@@ -113,7 +113,7 @@ Public Class frmAdministration
MyIndicies_Types = New List(Of Integer) MyIndicies_Types = New List(Of Integer)
MyIndicies = New List(Of String) MyIndicies = New List(Of String)
MyIndicies = WINDREAM.GetIndicesByObjecttype(cmbObjekttypen.Text).ToList() MyIndicies = WINDREAM.GetIndicesByObjecttype(cmbObjekttypen.Text).ToList()
MVSource_AllIndicies = MyIndicies
If MyIndicies IsNot Nothing Then If MyIndicies IsNot Nothing Then
Dim i As Integer = 0 Dim i As Integer = 0
@@ -674,17 +674,17 @@ Public Class frmAdministration
pgFinalIndexes.SelectedObject = Nothing pgFinalIndexes.SelectedObject = Nothing
Dim guid As Integer = focusedRow.Item("GUID") Dim guid As Integer = focusedRow.Item("GUID")
Dim index As String = NotNull(focusedRow.Item("INDEXNAME"), Nothing) Dim index As String = ClassAllgemeineFunktionen.NotNullString(focusedRow.Item("INDEXNAME"), Nothing)
Dim sqlCommand As String = NotNull(focusedRow.Item("SQL_COMMAND"), "") Dim sqlCommand As String = ClassAllgemeineFunktionen.NotNullString(focusedRow.Item("SQL_COMMAND"), "")
' Dim connectionId As Integer = NotNull(focusedRow.Item("CONNECTION_ID"), 0) ' Dim connectionId As Integer = ClassAllgemeineFunktionen.NotNullString(focusedRow.Item("CONNECTION_ID"), 0)
Dim value As String = NotNull(focusedRow.Item("VALUE"), "") Dim value As String = ClassAllgemeineFunktionen.NotNullString(focusedRow.Item("VALUE"), "")
Dim active As Boolean = NotNull(focusedRow.Item("ACTIVE"), True) Dim active As Boolean = ClassAllgemeineFunktionen.NotNullString(focusedRow.Item("ACTIVE"), True)
Dim description As String = NotNull(focusedRow.Item("DESCRIPTION"), "") Dim description As String = ClassAllgemeineFunktionen.NotNullString(focusedRow.Item("DESCRIPTION"), "")
Dim preventDuplicates As Boolean = NotNull(focusedRow.Item("PREVENT_DUPLICATES"), False) Dim preventDuplicates As Boolean = ClassAllgemeineFunktionen.NotNullString(focusedRow.Item("PREVENT_DUPLICATES"), False)
Dim allowNewValues As Boolean = NotNull(focusedRow.Item("ALLOW_NEW_VALUES"), False) Dim allowNewValues As Boolean = ClassAllgemeineFunktionen.NotNullString(focusedRow.Item("ALLOW_NEW_VALUES"), False)
Dim VectorBehaviour As String = NotNull(focusedRow.Item("IF_VEKTOR_BEHAVIOUR"), "Add") Dim VectorBehaviour As String = ClassAllgemeineFunktionen.NotNullString(focusedRow.Item("IF_VEKTOR_BEHAVIOUR"), "Add")
Dim oSequence As Int16 = NotNull(focusedRow.Item("SEQUENCE"), 0) Dim oSequence As Int16 = ClassAllgemeineFunktionen.NotNullString(focusedRow.Item("SEQUENCE"), 0)
Dim oIndetermined As Boolean = NotNull(focusedRow.Item("CONTINUE_INDETERMINED"), False) Dim oIndetermined As Boolean = ClassAllgemeineFunktionen.NotNullString(focusedRow.Item("CONTINUE_INDETERMINED"), False)
CURRENT_INDEX_ID = guid CURRENT_INDEX_ID = guid
Dim obj As New FinalIndexProperties With { Dim obj As New FinalIndexProperties With {
@@ -1074,25 +1074,25 @@ Public Class frmAdministration
Else Else
value = FINALINDICES.GetValue(obj, obj.IndexName, MyIndicies, MyIndicies_Types, obj.VectorIndex) value = FINALINDICES.GetValue(obj, obj.IndexName, MyIndicies, MyIndicies_Types, obj.VectorIndex)
End If End If
value = NotNull(value, String.Empty) value = ClassAllgemeineFunktionen.NotNullString(value, String.Empty)
Dim guid = obj.GUID Dim guid = obj.GUID
Dim oProfileId As Integer = PROFILGUIDTextBox.Text Dim oProfileId As Integer = PROFILGUIDTextBox.Text
focusedRowHandle = 199 focusedRowHandle = 199
focusedRowHandle = viewFinalIndex.FocusedRowHandle focusedRowHandle = viewFinalIndex.FocusedRowHandle
'Dim connectionId As Integer = obj.ConnectionId 'Dim connectionId As Integer = obj.ConnectionId
' Dim connectionId As Integer = NotNull(obj.SQLCommand.ConnectionId, 1) ' Dim connectionId As Integer = ClassAllgemeineFunktionen.NotNullString(obj.SQLCommand.ConnectionId, 1)
Dim sqlCommand As String = NotNull(obj.SQLCommand.Value, String.Empty).Replace("'", "''") Dim sqlCommand As String = ClassAllgemeineFunktionen.NotNullString(obj.SQLCommand.Value, String.Empty).Replace("'", "''")
Dim indexName As String = NotNull(obj.IndexName, String.Empty) Dim indexName As String = ClassAllgemeineFunktionen.NotNullString(obj.IndexName, String.Empty)
Dim isVectorIndex As Boolean = obj.VectorIndex Dim isVectorIndex As Boolean = obj.VectorIndex
Dim addedWho As String = USER_USERNAME Dim addedWho As String = USER_USERNAME
Dim description As String = obj.Description Dim description As String = obj.Description
Dim active As Integer = IIf(obj.Active, 1, 0) Dim active As Integer = IIf(obj.Active, 1, 0)
Dim preventDuplicates As Integer = IIf(obj.PreventDuplicates, 1, 0) Dim preventDuplicates As Integer = IIf(obj.PreventDuplicates, 1, 0)
Dim AllowAddNewValues As Integer = IIf(obj.AllowAddNewValues, 1, 0) Dim AllowAddNewValues As Integer = IIf(obj.AllowAddNewValues, 1, 0)
Dim IF_VEKTOR_BEHAVIOUR As String = NotNull(obj.VectorBehaviour, String.Empty) Dim IF_VEKTOR_BEHAVIOUR As String = ClassAllgemeineFunktionen.NotNullString(obj.VectorBehaviour, String.Empty)
Dim oDescription As String = NotNull(obj.Description, String.Empty) Dim oDescription As String = ClassAllgemeineFunktionen.NotNullString(obj.Description, String.Empty)
Dim oSequence As Integer = obj.Sequence Dim oSequence As Integer = obj.Sequence
Dim oContinueOIdS As Integer = obj.ContinueOnIndifferentState Dim oContinueOIdS As Integer = obj.ContinueOnIndifferentState
If indexName = String.Empty Then If indexName = String.Empty Then
@@ -1235,6 +1235,13 @@ Public Class frmAdministration
.PlaceholdersManualTitle = "Controls", .PlaceholdersManualTitle = "Controls",
.PlaceholdersManual = CURRENT_CONTROL_NAME_LIST.ToDictionary(Function(name) name, Function(name) name) .PlaceholdersManual = CURRENT_CONTROL_NAME_LIST.ToDictionary(Function(name) name, Function(name) name)
} }
If IDB_ACTIVE = False Then
oForm.ATTRIBUTE_STORE = "WM"
oForm.PlaceholdersWindream = MVSource_AllIndicies
Else
oForm.ATTRIBUTE_STORE = "IDB"
End If
oForm.ShowDialog() oForm.ShowDialog()
If oForm.DialogResult = DialogResult.OK Then If oForm.DialogResult = DialogResult.OK Then

View File

@@ -35,7 +35,7 @@ Partial Class frmAnnotations
'Button1 'Button1
' '
Me.Button1.Cursor = System.Windows.Forms.Cursors.Default Me.Button1.Cursor = System.Windows.Forms.Cursors.Default
Me.Button1.Image = Global.DD_ProcessManager.My.Resources.Resources.add Me.Button1.Image = Global.taskFLOW.My.Resources.Resources.add
resources.ApplyResources(Me.Button1, "Button1") resources.ApplyResources(Me.Button1, "Button1")
Me.Button1.Name = "Button1" Me.Button1.Name = "Button1"
Me.Button1.UseVisualStyleBackColor = True Me.Button1.UseVisualStyleBackColor = True

View File

@@ -25,9 +25,9 @@ Partial Class frmColumn_Detail
Me.components = New System.ComponentModel.Container() Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmColumn_Detail)) Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmColumn_Detail))
Me.TBPM_CONTROL_TABLEBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_CONTROL_TABLEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet() Me.DD_DMSLiteDataSet = New taskFLOW.DD_DMSLiteDataSet()
Me.TBPM_CONTROL_TABLETableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter() Me.TBPM_CONTROL_TABLETableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter()
Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager() Me.TableAdapterManager = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl() Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem() Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem() Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
@@ -37,6 +37,8 @@ Partial Class frmColumn_Detail
Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar() Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage() Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.LayoutControl1 = New DevExpress.XtraLayout.LayoutControl() Me.LayoutControl1 = New DevExpress.XtraLayout.LayoutControl()
Me.SimpleButton3 = New DevExpress.XtraEditors.SimpleButton()
Me.FORMULA_EXPRESSIONTextBox = New System.Windows.Forms.TextBox()
Me.LU_CAPTIONTextBox = New System.Windows.Forms.TextBox() Me.LU_CAPTIONTextBox = New System.Windows.Forms.TextBox()
Me.GUIDTextBox = New DevExpress.XtraEditors.TextEdit() Me.GUIDTextBox = New DevExpress.XtraEditors.TextEdit()
Me.SPALTENNAMETextBox = New DevExpress.XtraEditors.TextEdit() Me.SPALTENNAMETextBox = New DevExpress.XtraEditors.TextEdit()
@@ -59,6 +61,7 @@ Partial Class frmColumn_Detail
Me.SEQUENCETextBox = New DevExpress.XtraEditors.SpinEdit() Me.SEQUENCETextBox = New DevExpress.XtraEditors.SpinEdit()
Me.SUMMARY_FUNCTIONCombobox = New DevExpress.XtraEditors.LookUpEdit() Me.SUMMARY_FUNCTIONCombobox = New DevExpress.XtraEditors.LookUpEdit()
Me.TYPE_COLUMNComboBox2 = New DevExpress.XtraEditors.LookUpEdit() Me.TYPE_COLUMNComboBox2 = New DevExpress.XtraEditors.LookUpEdit()
Me.CheckEditInheritValue = New DevExpress.XtraEditors.CheckEdit()
Me.Root = New DevExpress.XtraLayout.LayoutControlGroup() Me.Root = New DevExpress.XtraLayout.LayoutControlGroup()
Me.LayoutControlItem1 = New DevExpress.XtraLayout.LayoutControlItem() Me.LayoutControlItem1 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem() Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem()
@@ -76,13 +79,16 @@ Partial Class frmColumn_Detail
Me.LayoutControlGroup1 = New DevExpress.XtraLayout.LayoutControlGroup() Me.LayoutControlGroup1 = New DevExpress.XtraLayout.LayoutControlGroup()
Me.LayoutControlItem16 = New DevExpress.XtraLayout.LayoutControlItem() Me.LayoutControlItem16 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem14 = New DevExpress.XtraLayout.LayoutControlItem() Me.LayoutControlItem14 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem15 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem17 = New DevExpress.XtraLayout.LayoutControlItem() Me.LayoutControlItem17 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem25 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem20 = New DevExpress.XtraLayout.LayoutControlItem() Me.LayoutControlItem20 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem22 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem18 = New DevExpress.XtraLayout.LayoutControlItem() Me.LayoutControlItem18 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem19 = New DevExpress.XtraLayout.LayoutControlItem() Me.LayoutControlItem19 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem23 = New DevExpress.XtraLayout.LayoutControlItem() Me.LayoutControlItem23 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem21 = New DevExpress.XtraLayout.LayoutControlItem() Me.LayoutControlItem21 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem24 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem26 = New DevExpress.XtraLayout.LayoutControlItem()
CType(Me.TBPM_CONTROL_TABLEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBPM_CONTROL_TABLEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -107,6 +113,7 @@ Partial Class frmColumn_Detail
CType(Me.SEQUENCETextBox.Properties, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.SEQUENCETextBox.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.SUMMARY_FUNCTIONCombobox.Properties, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.SUMMARY_FUNCTIONCombobox.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TYPE_COLUMNComboBox2.Properties, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TYPE_COLUMNComboBox2.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.CheckEditInheritValue.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.Root, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.Root, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -124,13 +131,16 @@ Partial Class frmColumn_Detail
CType(Me.LayoutControlGroup1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControlGroup1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem16, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControlItem16, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem14, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControlItem14, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem15, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem17, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControlItem17, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem25, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem20, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControlItem20, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem22, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem18, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControlItem18, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem19, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControlItem19, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem23, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControlItem23, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem21, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControlItem21, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem24, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem26, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout() Me.SuspendLayout()
' '
'TBPM_CONTROL_TABLEBindingSource 'TBPM_CONTROL_TABLEBindingSource
@@ -162,7 +172,7 @@ Partial Class frmColumn_Detail
Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete Me.TableAdapterManager.UpdateOrder = taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
' '
'RibbonControl1 'RibbonControl1
' '
@@ -183,14 +193,14 @@ Partial Class frmColumn_Detail
' '
resources.ApplyResources(Me.BarButtonItem1, "BarButtonItem1") resources.ApplyResources(Me.BarButtonItem1, "BarButtonItem1")
Me.BarButtonItem1.Id = 1 Me.BarButtonItem1.Id = 1
Me.BarButtonItem1.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.markcomplete Me.BarButtonItem1.ImageOptions.SvgImage = Global.taskFLOW.My.Resources.Resources.markcomplete
Me.BarButtonItem1.Name = "BarButtonItem1" Me.BarButtonItem1.Name = "BarButtonItem1"
' '
'BarButtonItem2 'BarButtonItem2
' '
resources.ApplyResources(Me.BarButtonItem2, "BarButtonItem2") resources.ApplyResources(Me.BarButtonItem2, "BarButtonItem2")
Me.BarButtonItem2.Id = 2 Me.BarButtonItem2.Id = 2
Me.BarButtonItem2.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.delete Me.BarButtonItem2.ImageOptions.SvgImage = Global.taskFLOW.My.Resources.Resources.delete
Me.BarButtonItem2.Name = "BarButtonItem2" Me.BarButtonItem2.Name = "BarButtonItem2"
' '
'tslblAenderungen 'tslblAenderungen
@@ -227,6 +237,8 @@ Partial Class frmColumn_Detail
' '
'LayoutControl1 'LayoutControl1
' '
Me.LayoutControl1.Controls.Add(Me.SimpleButton3)
Me.LayoutControl1.Controls.Add(Me.FORMULA_EXPRESSIONTextBox)
Me.LayoutControl1.Controls.Add(Me.LU_CAPTIONTextBox) Me.LayoutControl1.Controls.Add(Me.LU_CAPTIONTextBox)
Me.LayoutControl1.Controls.Add(Me.GUIDTextBox) Me.LayoutControl1.Controls.Add(Me.GUIDTextBox)
Me.LayoutControl1.Controls.Add(Me.SPALTENNAMETextBox) Me.LayoutControl1.Controls.Add(Me.SPALTENNAMETextBox)
@@ -249,10 +261,23 @@ Partial Class frmColumn_Detail
Me.LayoutControl1.Controls.Add(Me.SEQUENCETextBox) Me.LayoutControl1.Controls.Add(Me.SEQUENCETextBox)
Me.LayoutControl1.Controls.Add(Me.SUMMARY_FUNCTIONCombobox) Me.LayoutControl1.Controls.Add(Me.SUMMARY_FUNCTIONCombobox)
Me.LayoutControl1.Controls.Add(Me.TYPE_COLUMNComboBox2) Me.LayoutControl1.Controls.Add(Me.TYPE_COLUMNComboBox2)
Me.LayoutControl1.Controls.Add(Me.CheckEditInheritValue)
resources.ApplyResources(Me.LayoutControl1, "LayoutControl1") resources.ApplyResources(Me.LayoutControl1, "LayoutControl1")
Me.LayoutControl1.Name = "LayoutControl1" Me.LayoutControl1.Name = "LayoutControl1"
Me.LayoutControl1.Root = Me.Root Me.LayoutControl1.Root = Me.Root
' '
'SimpleButton3
'
resources.ApplyResources(Me.SimpleButton3, "SimpleButton3")
Me.SimpleButton3.Name = "SimpleButton3"
Me.SimpleButton3.StyleController = Me.LayoutControl1
'
'FORMULA_EXPRESSIONTextBox
'
Me.FORMULA_EXPRESSIONTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPM_CONTROL_TABLEBindingSource, "FORMULA_EXPRESSION", True))
resources.ApplyResources(Me.FORMULA_EXPRESSIONTextBox, "FORMULA_EXPRESSIONTextBox")
Me.FORMULA_EXPRESSIONTextBox.Name = "FORMULA_EXPRESSIONTextBox"
'
'LU_CAPTIONTextBox 'LU_CAPTIONTextBox
' '
Me.LU_CAPTIONTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPM_CONTROL_TABLEBindingSource, "LU_CAPTION", True)) Me.LU_CAPTIONTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPM_CONTROL_TABLEBindingSource, "LU_CAPTION", True))
@@ -309,7 +334,7 @@ Partial Class frmColumn_Detail
' '
'REGEX_MESSAGE_DETextBox 'REGEX_MESSAGE_DETextBox
' '
Me.REGEX_MESSAGE_DETextBox.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBPM_CONTROL_TABLEBindingSource, "REGEX_MESSAGE_DE", True)) Me.REGEX_MESSAGE_DETextBox.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBPM_CONTROL_TABLEBindingSource, "INHERIT_VALUE", True))
resources.ApplyResources(Me.REGEX_MESSAGE_DETextBox, "REGEX_MESSAGE_DETextBox") resources.ApplyResources(Me.REGEX_MESSAGE_DETextBox, "REGEX_MESSAGE_DETextBox")
Me.REGEX_MESSAGE_DETextBox.MenuManager = Me.RibbonControl1 Me.REGEX_MESSAGE_DETextBox.MenuManager = Me.RibbonControl1
Me.REGEX_MESSAGE_DETextBox.Name = "REGEX_MESSAGE_DETextBox" Me.REGEX_MESSAGE_DETextBox.Name = "REGEX_MESSAGE_DETextBox"
@@ -440,13 +465,22 @@ Partial Class frmColumn_Detail
Me.TYPE_COLUMNComboBox2.Properties.PopupSizeable = False Me.TYPE_COLUMNComboBox2.Properties.PopupSizeable = False
Me.TYPE_COLUMNComboBox2.StyleController = Me.LayoutControl1 Me.TYPE_COLUMNComboBox2.StyleController = Me.LayoutControl1
' '
'CheckEditInheritValue
'
Me.CheckEditInheritValue.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBPM_CONTROL_TABLEBindingSource, "INHERIT_VALUE", True))
resources.ApplyResources(Me.CheckEditInheritValue, "CheckEditInheritValue")
Me.CheckEditInheritValue.MenuManager = Me.RibbonControl1
Me.CheckEditInheritValue.Name = "CheckEditInheritValue"
Me.CheckEditInheritValue.Properties.Caption = resources.GetString("CheckEditInheritValue.Properties.Caption")
Me.CheckEditInheritValue.StyleController = Me.LayoutControl1
'
'Root 'Root
' '
Me.Root.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True] Me.Root.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
Me.Root.GroupBordersVisible = False Me.Root.GroupBordersVisible = False
Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.LayoutControlItem2, Me.LayoutControlItem3, Me.LayoutControlItem4, Me.LayoutControlItem5, Me.LayoutControlItem6, Me.LayoutControlItem8, Me.LayoutControlItem7, Me.LayoutControlItem9, Me.LayoutControlItem10, Me.LayoutControlItem12, Me.LayoutControlItem11, Me.LayoutControlItem13, Me.LayoutControlGroup1, Me.LayoutControlItem18, Me.LayoutControlItem19, Me.LayoutControlItem23, Me.LayoutControlItem21}) Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.LayoutControlItem2, Me.LayoutControlItem3, Me.LayoutControlItem4, Me.LayoutControlItem5, Me.LayoutControlItem6, Me.LayoutControlItem8, Me.LayoutControlItem7, Me.LayoutControlItem9, Me.LayoutControlItem10, Me.LayoutControlItem12, Me.LayoutControlItem11, Me.LayoutControlItem13, Me.LayoutControlGroup1, Me.LayoutControlItem18, Me.LayoutControlItem19, Me.LayoutControlItem23, Me.LayoutControlItem21, Me.LayoutControlItem24, Me.LayoutControlItem26})
Me.Root.Name = "Root" Me.Root.Name = "Root"
Me.Root.Size = New System.Drawing.Size(573, 668) Me.Root.Size = New System.Drawing.Size(593, 816)
Me.Root.TextVisible = False Me.Root.TextVisible = False
' '
'LayoutControlItem1 'LayoutControlItem1
@@ -455,9 +489,9 @@ Partial Class frmColumn_Detail
Me.LayoutControlItem1.Location = New System.Drawing.Point(0, 0) Me.LayoutControlItem1.Location = New System.Drawing.Point(0, 0)
Me.LayoutControlItem1.Name = "LayoutControlItem1" Me.LayoutControlItem1.Name = "LayoutControlItem1"
Me.LayoutControlItem1.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) Me.LayoutControlItem1.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem1.Size = New System.Drawing.Size(553, 40) Me.LayoutControlItem1.Size = New System.Drawing.Size(573, 40)
resources.ApplyResources(Me.LayoutControlItem1, "LayoutControlItem1") resources.ApplyResources(Me.LayoutControlItem1, "LayoutControlItem1")
Me.LayoutControlItem1.TextSize = New System.Drawing.Size(112, 13) Me.LayoutControlItem1.TextSize = New System.Drawing.Size(110, 13)
' '
'LayoutControlItem2 'LayoutControlItem2
' '
@@ -465,9 +499,9 @@ Partial Class frmColumn_Detail
Me.LayoutControlItem2.Location = New System.Drawing.Point(0, 40) Me.LayoutControlItem2.Location = New System.Drawing.Point(0, 40)
Me.LayoutControlItem2.Name = "LayoutControlItem2" Me.LayoutControlItem2.Name = "LayoutControlItem2"
Me.LayoutControlItem2.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) Me.LayoutControlItem2.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem2.Size = New System.Drawing.Size(553, 40) Me.LayoutControlItem2.Size = New System.Drawing.Size(573, 40)
resources.ApplyResources(Me.LayoutControlItem2, "LayoutControlItem2") resources.ApplyResources(Me.LayoutControlItem2, "LayoutControlItem2")
Me.LayoutControlItem2.TextSize = New System.Drawing.Size(112, 13) Me.LayoutControlItem2.TextSize = New System.Drawing.Size(110, 13)
' '
'LayoutControlItem3 'LayoutControlItem3
' '
@@ -475,9 +509,9 @@ Partial Class frmColumn_Detail
Me.LayoutControlItem3.Location = New System.Drawing.Point(0, 80) Me.LayoutControlItem3.Location = New System.Drawing.Point(0, 80)
Me.LayoutControlItem3.Name = "LayoutControlItem3" Me.LayoutControlItem3.Name = "LayoutControlItem3"
Me.LayoutControlItem3.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) Me.LayoutControlItem3.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem3.Size = New System.Drawing.Size(553, 40) Me.LayoutControlItem3.Size = New System.Drawing.Size(573, 40)
resources.ApplyResources(Me.LayoutControlItem3, "LayoutControlItem3") resources.ApplyResources(Me.LayoutControlItem3, "LayoutControlItem3")
Me.LayoutControlItem3.TextSize = New System.Drawing.Size(112, 13) Me.LayoutControlItem3.TextSize = New System.Drawing.Size(110, 13)
' '
'LayoutControlItem4 'LayoutControlItem4
' '
@@ -485,9 +519,9 @@ Partial Class frmColumn_Detail
Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 120) Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 120)
Me.LayoutControlItem4.Name = "LayoutControlItem4" Me.LayoutControlItem4.Name = "LayoutControlItem4"
Me.LayoutControlItem4.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) Me.LayoutControlItem4.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem4.Size = New System.Drawing.Size(276, 40) Me.LayoutControlItem4.Size = New System.Drawing.Size(286, 40)
resources.ApplyResources(Me.LayoutControlItem4, "LayoutControlItem4") resources.ApplyResources(Me.LayoutControlItem4, "LayoutControlItem4")
Me.LayoutControlItem4.TextSize = New System.Drawing.Size(112, 13) Me.LayoutControlItem4.TextSize = New System.Drawing.Size(110, 13)
' '
'LayoutControlItem5 'LayoutControlItem5
' '
@@ -495,16 +529,16 @@ Partial Class frmColumn_Detail
Me.LayoutControlItem5.Location = New System.Drawing.Point(0, 200) Me.LayoutControlItem5.Location = New System.Drawing.Point(0, 200)
Me.LayoutControlItem5.Name = "LayoutControlItem5" Me.LayoutControlItem5.Name = "LayoutControlItem5"
Me.LayoutControlItem5.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) Me.LayoutControlItem5.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem5.Size = New System.Drawing.Size(471, 46) Me.LayoutControlItem5.Size = New System.Drawing.Size(488, 46)
resources.ApplyResources(Me.LayoutControlItem5, "LayoutControlItem5") resources.ApplyResources(Me.LayoutControlItem5, "LayoutControlItem5")
Me.LayoutControlItem5.TextSize = New System.Drawing.Size(112, 13) Me.LayoutControlItem5.TextSize = New System.Drawing.Size(110, 13)
' '
'LayoutControlItem6 'LayoutControlItem6
' '
Me.LayoutControlItem6.Control = Me.SimpleButton1 Me.LayoutControlItem6.Control = Me.SimpleButton1
Me.LayoutControlItem6.Location = New System.Drawing.Point(471, 200) Me.LayoutControlItem6.Location = New System.Drawing.Point(488, 200)
Me.LayoutControlItem6.Name = "LayoutControlItem6" Me.LayoutControlItem6.Name = "LayoutControlItem6"
Me.LayoutControlItem6.Size = New System.Drawing.Size(82, 46) Me.LayoutControlItem6.Size = New System.Drawing.Size(85, 46)
Me.LayoutControlItem6.TextSize = New System.Drawing.Size(0, 0) Me.LayoutControlItem6.TextSize = New System.Drawing.Size(0, 0)
Me.LayoutControlItem6.TextVisible = False Me.LayoutControlItem6.TextVisible = False
' '
@@ -514,9 +548,9 @@ Partial Class frmColumn_Detail
Me.LayoutControlItem8.Location = New System.Drawing.Point(0, 326) Me.LayoutControlItem8.Location = New System.Drawing.Point(0, 326)
Me.LayoutControlItem8.Name = "LayoutControlItem8" Me.LayoutControlItem8.Name = "LayoutControlItem8"
Me.LayoutControlItem8.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) Me.LayoutControlItem8.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem8.Size = New System.Drawing.Size(471, 46) Me.LayoutControlItem8.Size = New System.Drawing.Size(488, 46)
resources.ApplyResources(Me.LayoutControlItem8, "LayoutControlItem8") resources.ApplyResources(Me.LayoutControlItem8, "LayoutControlItem8")
Me.LayoutControlItem8.TextSize = New System.Drawing.Size(112, 13) Me.LayoutControlItem8.TextSize = New System.Drawing.Size(110, 13)
' '
'LayoutControlItem7 'LayoutControlItem7
' '
@@ -524,65 +558,65 @@ Partial Class frmColumn_Detail
Me.LayoutControlItem7.Location = New System.Drawing.Point(0, 246) Me.LayoutControlItem7.Location = New System.Drawing.Point(0, 246)
Me.LayoutControlItem7.Name = "LayoutControlItem7" Me.LayoutControlItem7.Name = "LayoutControlItem7"
Me.LayoutControlItem7.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) Me.LayoutControlItem7.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem7.Size = New System.Drawing.Size(553, 40) Me.LayoutControlItem7.Size = New System.Drawing.Size(573, 40)
resources.ApplyResources(Me.LayoutControlItem7, "LayoutControlItem7") resources.ApplyResources(Me.LayoutControlItem7, "LayoutControlItem7")
Me.LayoutControlItem7.TextSize = New System.Drawing.Size(112, 13) Me.LayoutControlItem7.TextSize = New System.Drawing.Size(110, 13)
' '
'LayoutControlItem9 'LayoutControlItem9
' '
Me.LayoutControlItem9.Control = Me.SimpleButton2 Me.LayoutControlItem9.Control = Me.SimpleButton2
Me.LayoutControlItem9.Location = New System.Drawing.Point(471, 326) Me.LayoutControlItem9.Location = New System.Drawing.Point(488, 326)
Me.LayoutControlItem9.Name = "LayoutControlItem9" Me.LayoutControlItem9.Name = "LayoutControlItem9"
Me.LayoutControlItem9.Size = New System.Drawing.Size(82, 46) Me.LayoutControlItem9.Size = New System.Drawing.Size(85, 46)
Me.LayoutControlItem9.TextSize = New System.Drawing.Size(0, 0) Me.LayoutControlItem9.TextSize = New System.Drawing.Size(0, 0)
Me.LayoutControlItem9.TextVisible = False Me.LayoutControlItem9.TextVisible = False
' '
'LayoutControlItem10 'LayoutControlItem10
' '
Me.LayoutControlItem10.Control = Me.TextEdit7 Me.LayoutControlItem10.Control = Me.TextEdit7
Me.LayoutControlItem10.Location = New System.Drawing.Point(0, 412) Me.LayoutControlItem10.Location = New System.Drawing.Point(0, 458)
Me.LayoutControlItem10.Name = "LayoutControlItem10" Me.LayoutControlItem10.Name = "LayoutControlItem10"
Me.LayoutControlItem10.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) Me.LayoutControlItem10.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem10.Size = New System.Drawing.Size(276, 40) Me.LayoutControlItem10.Size = New System.Drawing.Size(286, 40)
resources.ApplyResources(Me.LayoutControlItem10, "LayoutControlItem10") resources.ApplyResources(Me.LayoutControlItem10, "LayoutControlItem10")
Me.LayoutControlItem10.TextSize = New System.Drawing.Size(112, 13) Me.LayoutControlItem10.TextSize = New System.Drawing.Size(110, 13)
' '
'LayoutControlItem12 'LayoutControlItem12
' '
Me.LayoutControlItem12.Control = Me.CHANGED_WHOTextBox Me.LayoutControlItem12.Control = Me.CHANGED_WHOTextBox
Me.LayoutControlItem12.Location = New System.Drawing.Point(0, 452) Me.LayoutControlItem12.Location = New System.Drawing.Point(0, 498)
Me.LayoutControlItem12.Name = "LayoutControlItem12" Me.LayoutControlItem12.Name = "LayoutControlItem12"
Me.LayoutControlItem12.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) Me.LayoutControlItem12.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem12.Size = New System.Drawing.Size(276, 40) Me.LayoutControlItem12.Size = New System.Drawing.Size(286, 40)
resources.ApplyResources(Me.LayoutControlItem12, "LayoutControlItem12") resources.ApplyResources(Me.LayoutControlItem12, "LayoutControlItem12")
Me.LayoutControlItem12.TextSize = New System.Drawing.Size(112, 13) Me.LayoutControlItem12.TextSize = New System.Drawing.Size(110, 13)
' '
'LayoutControlItem11 'LayoutControlItem11
' '
Me.LayoutControlItem11.Control = Me.TextEdit8 Me.LayoutControlItem11.Control = Me.TextEdit8
Me.LayoutControlItem11.Location = New System.Drawing.Point(276, 412) Me.LayoutControlItem11.Location = New System.Drawing.Point(286, 458)
Me.LayoutControlItem11.Name = "LayoutControlItem11" Me.LayoutControlItem11.Name = "LayoutControlItem11"
Me.LayoutControlItem11.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) Me.LayoutControlItem11.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem11.Size = New System.Drawing.Size(277, 40) Me.LayoutControlItem11.Size = New System.Drawing.Size(287, 40)
resources.ApplyResources(Me.LayoutControlItem11, "LayoutControlItem11") resources.ApplyResources(Me.LayoutControlItem11, "LayoutControlItem11")
Me.LayoutControlItem11.TextSize = New System.Drawing.Size(112, 13) Me.LayoutControlItem11.TextSize = New System.Drawing.Size(110, 13)
' '
'LayoutControlItem13 'LayoutControlItem13
' '
Me.LayoutControlItem13.Control = Me.TextEdit10 Me.LayoutControlItem13.Control = Me.TextEdit10
Me.LayoutControlItem13.Location = New System.Drawing.Point(276, 452) Me.LayoutControlItem13.Location = New System.Drawing.Point(286, 498)
Me.LayoutControlItem13.Name = "LayoutControlItem13" Me.LayoutControlItem13.Name = "LayoutControlItem13"
Me.LayoutControlItem13.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) Me.LayoutControlItem13.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem13.Size = New System.Drawing.Size(277, 40) Me.LayoutControlItem13.Size = New System.Drawing.Size(287, 40)
resources.ApplyResources(Me.LayoutControlItem13, "LayoutControlItem13") resources.ApplyResources(Me.LayoutControlItem13, "LayoutControlItem13")
Me.LayoutControlItem13.TextSize = New System.Drawing.Size(112, 13) Me.LayoutControlItem13.TextSize = New System.Drawing.Size(110, 13)
' '
'LayoutControlGroup1 'LayoutControlGroup1
' '
Me.LayoutControlGroup1.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem16, Me.LayoutControlItem14, Me.LayoutControlItem15, Me.LayoutControlItem17, Me.LayoutControlItem20}) Me.LayoutControlGroup1.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem16, Me.LayoutControlItem14, Me.LayoutControlItem17, Me.LayoutControlItem25, Me.LayoutControlItem20, Me.LayoutControlItem22})
Me.LayoutControlGroup1.Location = New System.Drawing.Point(0, 492) Me.LayoutControlGroup1.Location = New System.Drawing.Point(0, 538)
Me.LayoutControlGroup1.Name = "LayoutControlGroup1" Me.LayoutControlGroup1.Name = "LayoutControlGroup1"
Me.LayoutControlGroup1.Size = New System.Drawing.Size(553, 156) Me.LayoutControlGroup1.Size = New System.Drawing.Size(573, 258)
resources.ApplyResources(Me.LayoutControlGroup1, "LayoutControlGroup1") resources.ApplyResources(Me.LayoutControlGroup1, "LayoutControlGroup1")
' '
'LayoutControlItem16 'LayoutControlItem16
@@ -590,7 +624,7 @@ Partial Class frmColumn_Detail
Me.LayoutControlItem16.Control = Me.VALIDATIONCheckbox Me.LayoutControlItem16.Control = Me.VALIDATIONCheckbox
Me.LayoutControlItem16.Location = New System.Drawing.Point(0, 0) Me.LayoutControlItem16.Location = New System.Drawing.Point(0, 0)
Me.LayoutControlItem16.Name = "LayoutControlItem16" Me.LayoutControlItem16.Name = "LayoutControlItem16"
Me.LayoutControlItem16.Size = New System.Drawing.Size(264, 24) Me.LayoutControlItem16.Size = New System.Drawing.Size(274, 24)
Me.LayoutControlItem16.TextSize = New System.Drawing.Size(0, 0) Me.LayoutControlItem16.TextSize = New System.Drawing.Size(0, 0)
Me.LayoutControlItem16.TextVisible = False Me.LayoutControlItem16.TextVisible = False
' '
@@ -599,36 +633,46 @@ Partial Class frmColumn_Detail
Me.LayoutControlItem14.Control = Me.READ_ONLYCheckBox Me.LayoutControlItem14.Control = Me.READ_ONLYCheckBox
Me.LayoutControlItem14.Location = New System.Drawing.Point(0, 24) Me.LayoutControlItem14.Location = New System.Drawing.Point(0, 24)
Me.LayoutControlItem14.Name = "LayoutControlItem14" Me.LayoutControlItem14.Name = "LayoutControlItem14"
Me.LayoutControlItem14.Size = New System.Drawing.Size(529, 22) Me.LayoutControlItem14.Size = New System.Drawing.Size(549, 22)
Me.LayoutControlItem14.TextSize = New System.Drawing.Size(0, 0) Me.LayoutControlItem14.TextSize = New System.Drawing.Size(0, 0)
Me.LayoutControlItem14.TextVisible = False Me.LayoutControlItem14.TextVisible = False
' '
'LayoutControlItem15
'
Me.LayoutControlItem15.Control = Me.LOAD_IDX_VALUECheckBox
Me.LayoutControlItem15.Location = New System.Drawing.Point(0, 46)
Me.LayoutControlItem15.Name = "LayoutControlItem15"
Me.LayoutControlItem15.Size = New System.Drawing.Size(529, 22)
Me.LayoutControlItem15.TextSize = New System.Drawing.Size(0, 0)
Me.LayoutControlItem15.TextVisible = False
'
'LayoutControlItem17 'LayoutControlItem17
' '
Me.LayoutControlItem17.Control = Me.ADVANCED_LOOKUPCheckbox Me.LayoutControlItem17.Control = Me.ADVANCED_LOOKUPCheckbox
Me.LayoutControlItem17.Location = New System.Drawing.Point(0, 68) Me.LayoutControlItem17.Location = New System.Drawing.Point(0, 46)
Me.LayoutControlItem17.Name = "LayoutControlItem17" Me.LayoutControlItem17.Name = "LayoutControlItem17"
Me.LayoutControlItem17.Size = New System.Drawing.Size(529, 43) Me.LayoutControlItem17.Size = New System.Drawing.Size(549, 22)
Me.LayoutControlItem17.TextSize = New System.Drawing.Size(0, 0) Me.LayoutControlItem17.TextSize = New System.Drawing.Size(0, 0)
Me.LayoutControlItem17.TextVisible = False Me.LayoutControlItem17.TextVisible = False
' '
'LayoutControlItem25
'
Me.LayoutControlItem25.Control = Me.LOAD_IDX_VALUECheckBox
Me.LayoutControlItem25.Location = New System.Drawing.Point(0, 68)
Me.LayoutControlItem25.Name = "LayoutControlItem25"
Me.LayoutControlItem25.Size = New System.Drawing.Size(549, 22)
Me.LayoutControlItem25.TextSize = New System.Drawing.Size(0, 0)
Me.LayoutControlItem25.TextVisible = False
'
'LayoutControlItem20 'LayoutControlItem20
' '
Me.LayoutControlItem20.Control = Me.SUMMARY_FUNCTIONCombobox Me.LayoutControlItem20.Control = Me.SUMMARY_FUNCTIONCombobox
Me.LayoutControlItem20.Location = New System.Drawing.Point(264, 0) Me.LayoutControlItem20.Location = New System.Drawing.Point(274, 0)
Me.LayoutControlItem20.Name = "LayoutControlItem20" Me.LayoutControlItem20.Name = "LayoutControlItem20"
Me.LayoutControlItem20.Size = New System.Drawing.Size(265, 24) Me.LayoutControlItem20.Size = New System.Drawing.Size(275, 24)
resources.ApplyResources(Me.LayoutControlItem20, "LayoutControlItem20") resources.ApplyResources(Me.LayoutControlItem20, "LayoutControlItem20")
Me.LayoutControlItem20.TextSize = New System.Drawing.Size(112, 13) Me.LayoutControlItem20.TextSize = New System.Drawing.Size(110, 13)
'
'LayoutControlItem22
'
Me.LayoutControlItem22.Control = Me.CheckEditInheritValue
Me.LayoutControlItem22.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPM_CONTROL_TABLEBindingSource, "INHERIT_VALUE", True))
Me.LayoutControlItem22.Location = New System.Drawing.Point(0, 90)
Me.LayoutControlItem22.Name = "LayoutControlItem22"
Me.LayoutControlItem22.Size = New System.Drawing.Size(549, 123)
Me.LayoutControlItem22.TextSize = New System.Drawing.Size(0, 0)
Me.LayoutControlItem22.TextVisible = False
' '
'LayoutControlItem18 'LayoutControlItem18
' '
@@ -636,19 +680,19 @@ Partial Class frmColumn_Detail
Me.LayoutControlItem18.Location = New System.Drawing.Point(0, 372) Me.LayoutControlItem18.Location = New System.Drawing.Point(0, 372)
Me.LayoutControlItem18.Name = "LayoutControlItem18" Me.LayoutControlItem18.Name = "LayoutControlItem18"
Me.LayoutControlItem18.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) Me.LayoutControlItem18.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem18.Size = New System.Drawing.Size(553, 40) Me.LayoutControlItem18.Size = New System.Drawing.Size(573, 40)
resources.ApplyResources(Me.LayoutControlItem18, "LayoutControlItem18") resources.ApplyResources(Me.LayoutControlItem18, "LayoutControlItem18")
Me.LayoutControlItem18.TextSize = New System.Drawing.Size(112, 13) Me.LayoutControlItem18.TextSize = New System.Drawing.Size(110, 13)
' '
'LayoutControlItem19 'LayoutControlItem19
' '
Me.LayoutControlItem19.Control = Me.SEQUENCETextBox Me.LayoutControlItem19.Control = Me.SEQUENCETextBox
Me.LayoutControlItem19.Location = New System.Drawing.Point(276, 120) Me.LayoutControlItem19.Location = New System.Drawing.Point(286, 120)
Me.LayoutControlItem19.Name = "LayoutControlItem19" Me.LayoutControlItem19.Name = "LayoutControlItem19"
Me.LayoutControlItem19.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) Me.LayoutControlItem19.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem19.Size = New System.Drawing.Size(277, 40) Me.LayoutControlItem19.Size = New System.Drawing.Size(287, 40)
resources.ApplyResources(Me.LayoutControlItem19, "LayoutControlItem19") resources.ApplyResources(Me.LayoutControlItem19, "LayoutControlItem19")
Me.LayoutControlItem19.TextSize = New System.Drawing.Size(112, 13) Me.LayoutControlItem19.TextSize = New System.Drawing.Size(110, 13)
' '
'LayoutControlItem23 'LayoutControlItem23
' '
@@ -657,8 +701,8 @@ Partial Class frmColumn_Detail
Me.LayoutControlItem23.Location = New System.Drawing.Point(0, 286) Me.LayoutControlItem23.Location = New System.Drawing.Point(0, 286)
Me.LayoutControlItem23.Name = "LayoutControlItem23" Me.LayoutControlItem23.Name = "LayoutControlItem23"
Me.LayoutControlItem23.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) Me.LayoutControlItem23.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem23.Size = New System.Drawing.Size(553, 40) Me.LayoutControlItem23.Size = New System.Drawing.Size(573, 40)
Me.LayoutControlItem23.TextSize = New System.Drawing.Size(112, 13) Me.LayoutControlItem23.TextSize = New System.Drawing.Size(110, 13)
' '
'LayoutControlItem21 'LayoutControlItem21
' '
@@ -666,9 +710,28 @@ Partial Class frmColumn_Detail
Me.LayoutControlItem21.Location = New System.Drawing.Point(0, 160) Me.LayoutControlItem21.Location = New System.Drawing.Point(0, 160)
Me.LayoutControlItem21.Name = "LayoutControlItem21" Me.LayoutControlItem21.Name = "LayoutControlItem21"
Me.LayoutControlItem21.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10) Me.LayoutControlItem21.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem21.Size = New System.Drawing.Size(553, 40) Me.LayoutControlItem21.Size = New System.Drawing.Size(573, 40)
resources.ApplyResources(Me.LayoutControlItem21, "LayoutControlItem21") resources.ApplyResources(Me.LayoutControlItem21, "LayoutControlItem21")
Me.LayoutControlItem21.TextSize = New System.Drawing.Size(112, 13) Me.LayoutControlItem21.TextSize = New System.Drawing.Size(110, 13)
'
'LayoutControlItem24
'
Me.LayoutControlItem24.Control = Me.FORMULA_EXPRESSIONTextBox
Me.LayoutControlItem24.Location = New System.Drawing.Point(0, 412)
Me.LayoutControlItem24.Name = "LayoutControlItem24"
Me.LayoutControlItem24.Padding = New DevExpress.XtraLayout.Utils.Padding(10, 10, 10, 10)
Me.LayoutControlItem24.Size = New System.Drawing.Size(488, 46)
resources.ApplyResources(Me.LayoutControlItem24, "LayoutControlItem24")
Me.LayoutControlItem24.TextSize = New System.Drawing.Size(110, 13)
'
'LayoutControlItem26
'
Me.LayoutControlItem26.Control = Me.SimpleButton3
Me.LayoutControlItem26.Location = New System.Drawing.Point(488, 412)
Me.LayoutControlItem26.Name = "LayoutControlItem26"
Me.LayoutControlItem26.Size = New System.Drawing.Size(85, 46)
Me.LayoutControlItem26.TextSize = New System.Drawing.Size(0, 0)
Me.LayoutControlItem26.TextVisible = False
' '
'frmColumn_Detail 'frmColumn_Detail
' '
@@ -708,6 +771,7 @@ Partial Class frmColumn_Detail
CType(Me.SEQUENCETextBox.Properties, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.SEQUENCETextBox.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.SUMMARY_FUNCTIONCombobox.Properties, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.SUMMARY_FUNCTIONCombobox.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TYPE_COLUMNComboBox2.Properties, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TYPE_COLUMNComboBox2.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.CheckEditInheritValue.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.Root, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.Root, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit()
@@ -725,21 +789,24 @@ Partial Class frmColumn_Detail
CType(Me.LayoutControlGroup1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.LayoutControlGroup1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem16, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.LayoutControlItem16, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem14, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.LayoutControlItem14, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem15, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem17, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.LayoutControlItem17, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem25, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem20, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.LayoutControlItem20, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem22, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem18, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.LayoutControlItem18, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem19, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.LayoutControlItem19, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem23, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.LayoutControlItem23, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem21, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.LayoutControlItem21, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem24, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem26, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False) Me.ResumeLayout(False)
Me.PerformLayout Me.PerformLayout
End Sub End Sub
Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet Friend WithEvents DD_DMSLiteDataSet As taskFLOW.DD_DMSLiteDataSet
Friend WithEvents TBPM_CONTROL_TABLEBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPM_CONTROL_TABLEBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBPM_CONTROL_TABLETableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter Friend WithEvents TBPM_CONTROL_TABLETableAdapter As taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter
Friend WithEvents TableAdapterManager As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager Friend WithEvents TableAdapterManager As taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
@@ -779,7 +846,6 @@ End Sub
Friend WithEvents READ_ONLYCheckBox As DevExpress.XtraEditors.CheckEdit Friend WithEvents READ_ONLYCheckBox As DevExpress.XtraEditors.CheckEdit
Friend WithEvents LOAD_IDX_VALUECheckBox As DevExpress.XtraEditors.CheckEdit Friend WithEvents LOAD_IDX_VALUECheckBox As DevExpress.XtraEditors.CheckEdit
Friend WithEvents LayoutControlItem14 As DevExpress.XtraLayout.LayoutControlItem Friend WithEvents LayoutControlItem14 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents LayoutControlItem15 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents VALIDATIONCheckbox As DevExpress.XtraEditors.CheckEdit Friend WithEvents VALIDATIONCheckbox As DevExpress.XtraEditors.CheckEdit
Friend WithEvents ADVANCED_LOOKUPCheckbox As DevExpress.XtraEditors.CheckEdit Friend WithEvents ADVANCED_LOOKUPCheckbox As DevExpress.XtraEditors.CheckEdit
Friend WithEvents DEFAULTVALUETextBox As DevExpress.XtraEditors.TextEdit Friend WithEvents DEFAULTVALUETextBox As DevExpress.XtraEditors.TextEdit
@@ -795,4 +861,11 @@ End Sub
Friend WithEvents LayoutControlItem23 As DevExpress.XtraLayout.LayoutControlItem Friend WithEvents LayoutControlItem23 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents LayoutControlItem21 As DevExpress.XtraLayout.LayoutControlItem Friend WithEvents LayoutControlItem21 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents TYPE_COLUMNComboBox2 As DevExpress.XtraEditors.LookUpEdit Friend WithEvents TYPE_COLUMNComboBox2 As DevExpress.XtraEditors.LookUpEdit
Friend WithEvents CheckEditInheritValue As DevExpress.XtraEditors.CheckEdit
Friend WithEvents LayoutControlItem22 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents FORMULA_EXPRESSIONTextBox As TextBox
Friend WithEvents LayoutControlItem24 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents LayoutControlItem25 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents SimpleButton3 As DevExpress.XtraEditors.SimpleButton
Friend WithEvents LayoutControlItem26 As DevExpress.XtraLayout.LayoutControlItem
End Class End Class

View File

@@ -149,13 +149,13 @@
<value>RibbonPage1</value> <value>RibbonPage1</value>
</data> </data>
<data name="RibbonControl1.Size" type="System.Drawing.Size, System.Drawing"> <data name="RibbonControl1.Size" type="System.Drawing.Size, System.Drawing">
<value>573, 67</value> <value>593, 67</value>
</data> </data>
<data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing"> <data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 735</value> <value>0, 883</value>
</data> </data>
<data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing"> <data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing">
<value>573, 22</value> <value>593, 22</value>
</data> </data>
<data name="&gt;&gt;RibbonStatusBar1.Name" xml:space="preserve"> <data name="&gt;&gt;RibbonStatusBar1.Name" xml:space="preserve">
<value>RibbonStatusBar1</value> <value>RibbonStatusBar1</value>
@@ -184,13 +184,62 @@
<data name="RibbonPage2.Text" xml:space="preserve"> <data name="RibbonPage2.Text" xml:space="preserve">
<value>RibbonPage2</value> <value>RibbonPage2</value>
</data> </data>
<data name="LU_CAPTIONTextBox.Location" type="System.Drawing.Point, System.Drawing"> <data name="SimpleButton3.Location" type="System.Drawing.Point, System.Drawing">
<value>144, 306</value> <value>500, 424</value>
</data> </data>
<data name="LU_CAPTIONTextBox.Size" type="System.Drawing.Size, System.Drawing"> <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<value>409, 20</value> <data name="SimpleButton3.Padding" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>10, 10, 10, 10</value>
</data>
<data name="SimpleButton3.Size" type="System.Drawing.Size, System.Drawing">
<value>81, 42</value>
</data> </data>
<assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" /> <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="SimpleButton3.TabIndex" type="System.Int32, mscorlib">
<value>31</value>
</data>
<data name="SimpleButton3.Text" xml:space="preserve">
<value>...</value>
</data>
<data name="&gt;&gt;SimpleButton3.Name" xml:space="preserve">
<value>SimpleButton3</value>
</data>
<data name="&gt;&gt;SimpleButton3.Type" xml:space="preserve">
<value>DevExpress.XtraEditors.SimpleButton, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;SimpleButton3.Parent" xml:space="preserve">
<value>LayoutControl1</value>
</data>
<data name="&gt;&gt;SimpleButton3.ZOrder" xml:space="preserve">
<value>4</value>
</data>
<data name="FORMULA_EXPRESSIONTextBox.Location" type="System.Drawing.Point, System.Drawing">
<value>142, 432</value>
</data>
<data name="FORMULA_EXPRESSIONTextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>346, 20</value>
</data>
<data name="FORMULA_EXPRESSIONTextBox.TabIndex" type="System.Int32, mscorlib">
<value>29</value>
</data>
<data name="&gt;&gt;FORMULA_EXPRESSIONTextBox.Name" xml:space="preserve">
<value>FORMULA_EXPRESSIONTextBox</value>
</data>
<data name="&gt;&gt;FORMULA_EXPRESSIONTextBox.Type" xml:space="preserve">
<value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;FORMULA_EXPRESSIONTextBox.Parent" xml:space="preserve">
<value>LayoutControl1</value>
</data>
<data name="&gt;&gt;FORMULA_EXPRESSIONTextBox.ZOrder" xml:space="preserve">
<value>5</value>
</data>
<data name="LU_CAPTIONTextBox.Location" type="System.Drawing.Point, System.Drawing">
<value>142, 306</value>
</data>
<data name="LU_CAPTIONTextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>431, 20</value>
</data>
<data name="LU_CAPTIONTextBox.TabIndex" type="System.Int32, mscorlib"> <data name="LU_CAPTIONTextBox.TabIndex" type="System.Int32, mscorlib">
<value>26</value> <value>26</value>
</data> </data>
@@ -204,13 +253,13 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;LU_CAPTIONTextBox.ZOrder" xml:space="preserve"> <data name="&gt;&gt;LU_CAPTIONTextBox.ZOrder" xml:space="preserve">
<value>4</value> <value>6</value>
</data> </data>
<data name="GUIDTextBox.Location" type="System.Drawing.Point, System.Drawing"> <data name="GUIDTextBox.Location" type="System.Drawing.Point, System.Drawing">
<value>144, 20</value> <value>142, 20</value>
</data> </data>
<data name="GUIDTextBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="GUIDTextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>409, 20</value> <value>431, 20</value>
</data> </data>
<data name="GUIDTextBox.TabIndex" type="System.Int32, mscorlib"> <data name="GUIDTextBox.TabIndex" type="System.Int32, mscorlib">
<value>4</value> <value>4</value>
@@ -225,13 +274,13 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;GUIDTextBox.ZOrder" xml:space="preserve"> <data name="&gt;&gt;GUIDTextBox.ZOrder" xml:space="preserve">
<value>5</value> <value>7</value>
</data> </data>
<data name="SPALTENNAMETextBox.Location" type="System.Drawing.Point, System.Drawing"> <data name="SPALTENNAMETextBox.Location" type="System.Drawing.Point, System.Drawing">
<value>144, 60</value> <value>142, 60</value>
</data> </data>
<data name="SPALTENNAMETextBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="SPALTENNAMETextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>409, 20</value> <value>431, 20</value>
</data> </data>
<data name="SPALTENNAMETextBox.TabIndex" type="System.Int32, mscorlib"> <data name="SPALTENNAMETextBox.TabIndex" type="System.Int32, mscorlib">
<value>5</value> <value>5</value>
@@ -246,13 +295,13 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;SPALTENNAMETextBox.ZOrder" xml:space="preserve"> <data name="&gt;&gt;SPALTENNAMETextBox.ZOrder" xml:space="preserve">
<value>6</value> <value>8</value>
</data> </data>
<data name="SPALTEN_HEADERTextBox.Location" type="System.Drawing.Point, System.Drawing"> <data name="SPALTEN_HEADERTextBox.Location" type="System.Drawing.Point, System.Drawing">
<value>144, 100</value> <value>142, 100</value>
</data> </data>
<data name="SPALTEN_HEADERTextBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="SPALTEN_HEADERTextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>409, 20</value> <value>431, 20</value>
</data> </data>
<data name="SPALTEN_HEADERTextBox.TabIndex" type="System.Int32, mscorlib"> <data name="SPALTEN_HEADERTextBox.TabIndex" type="System.Int32, mscorlib">
<value>6</value> <value>6</value>
@@ -267,20 +316,20 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;SPALTEN_HEADERTextBox.ZOrder" xml:space="preserve"> <data name="&gt;&gt;SPALTEN_HEADERTextBox.ZOrder" xml:space="preserve">
<value>7</value> <value>9</value>
</data> </data>
<data name="SPALTENBREITETextBox.EditValue" type="System.Decimal, mscorlib"> <data name="SPALTENBREITETextBox.EditValue" type="System.Decimal, mscorlib">
<value>0</value> <value>0</value>
</data> </data>
<data name="SPALTENBREITETextBox.Location" type="System.Drawing.Point, System.Drawing"> <data name="SPALTENBREITETextBox.Location" type="System.Drawing.Point, System.Drawing">
<value>144, 140</value> <value>142, 140</value>
</data> </data>
<assembly alias="DevExpress.Utils.v21.2" name="DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" /> <assembly alias="DevExpress.Utils.v21.2" name="DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<data name="SPALTENBREITETextBox.Properties.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2"> <data name="SPALTENBREITETextBox.Properties.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2">
<value>Combo</value> <value>Combo</value>
</data> </data>
<data name="SPALTENBREITETextBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="SPALTENBREITETextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>132, 20</value> <value>144, 20</value>
</data> </data>
<data name="SPALTENBREITETextBox.TabIndex" type="System.Int32, mscorlib"> <data name="SPALTENBREITETextBox.TabIndex" type="System.Int32, mscorlib">
<value>7</value> <value>7</value>
@@ -295,13 +344,13 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;SPALTENBREITETextBox.ZOrder" xml:space="preserve"> <data name="&gt;&gt;SPALTENBREITETextBox.ZOrder" xml:space="preserve">
<value>8</value> <value>10</value>
</data> </data>
<data name="REGEX_MATCHTextBox.Location" type="System.Drawing.Point, System.Drawing"> <data name="REGEX_MATCHTextBox.Location" type="System.Drawing.Point, System.Drawing">
<value>144, 220</value> <value>142, 220</value>
</data> </data>
<data name="REGEX_MATCHTextBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="REGEX_MATCHTextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>327, 20</value> <value>346, 20</value>
</data> </data>
<data name="REGEX_MATCHTextBox.TabIndex" type="System.Int32, mscorlib"> <data name="REGEX_MATCHTextBox.TabIndex" type="System.Int32, mscorlib">
<value>8</value> <value>8</value>
@@ -316,12 +365,11 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;REGEX_MATCHTextBox.ZOrder" xml:space="preserve"> <data name="&gt;&gt;REGEX_MATCHTextBox.ZOrder" xml:space="preserve">
<value>9</value> <value>11</value>
</data> </data>
<data name="SimpleButton1.Location" type="System.Drawing.Point, System.Drawing"> <data name="SimpleButton1.Location" type="System.Drawing.Point, System.Drawing">
<value>483, 212</value> <value>500, 212</value>
</data> </data>
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="SimpleButton1.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms"> <data name="SimpleButton1.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>10, 10, 10, 10</value> <value>10, 10, 10, 10</value>
</data> </data>
@@ -329,7 +377,7 @@
<value>10, 10, 10, 10</value> <value>10, 10, 10, 10</value>
</data> </data>
<data name="SimpleButton1.Size" type="System.Drawing.Size, System.Drawing"> <data name="SimpleButton1.Size" type="System.Drawing.Size, System.Drawing">
<value>78, 42</value> <value>81, 42</value>
</data> </data>
<data name="SimpleButton1.TabIndex" type="System.Int32, mscorlib"> <data name="SimpleButton1.TabIndex" type="System.Int32, mscorlib">
<value>9</value> <value>9</value>
@@ -347,13 +395,13 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;SimpleButton1.ZOrder" xml:space="preserve"> <data name="&gt;&gt;SimpleButton1.ZOrder" xml:space="preserve">
<value>10</value> <value>12</value>
</data> </data>
<data name="REGEX_MESSAGE_DETextBox.Location" type="System.Drawing.Point, System.Drawing"> <data name="REGEX_MESSAGE_DETextBox.Location" type="System.Drawing.Point, System.Drawing">
<value>144, 266</value> <value>142, 266</value>
</data> </data>
<data name="REGEX_MESSAGE_DETextBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="REGEX_MESSAGE_DETextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>409, 20</value> <value>431, 20</value>
</data> </data>
<data name="REGEX_MESSAGE_DETextBox.TabIndex" type="System.Int32, mscorlib"> <data name="REGEX_MESSAGE_DETextBox.TabIndex" type="System.Int32, mscorlib">
<value>10</value> <value>10</value>
@@ -368,13 +416,13 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;REGEX_MESSAGE_DETextBox.ZOrder" xml:space="preserve"> <data name="&gt;&gt;REGEX_MESSAGE_DETextBox.ZOrder" xml:space="preserve">
<value>11</value> <value>13</value>
</data> </data>
<data name="SQL_COMMANDTextBox.Location" type="System.Drawing.Point, System.Drawing"> <data name="SQL_COMMANDTextBox.Location" type="System.Drawing.Point, System.Drawing">
<value>144, 346</value> <value>142, 346</value>
</data> </data>
<data name="SQL_COMMANDTextBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="SQL_COMMANDTextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>327, 20</value> <value>346, 20</value>
</data> </data>
<data name="SQL_COMMANDTextBox.TabIndex" type="System.Int32, mscorlib"> <data name="SQL_COMMANDTextBox.TabIndex" type="System.Int32, mscorlib">
<value>11</value> <value>11</value>
@@ -389,16 +437,16 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;SQL_COMMANDTextBox.ZOrder" xml:space="preserve"> <data name="&gt;&gt;SQL_COMMANDTextBox.ZOrder" xml:space="preserve">
<value>12</value> <value>14</value>
</data> </data>
<data name="SimpleButton2.Location" type="System.Drawing.Point, System.Drawing"> <data name="SimpleButton2.Location" type="System.Drawing.Point, System.Drawing">
<value>483, 338</value> <value>500, 338</value>
</data> </data>
<data name="SimpleButton2.Padding" type="System.Windows.Forms.Padding, System.Windows.Forms"> <data name="SimpleButton2.Padding" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>10, 10, 10, 10</value> <value>10, 10, 10, 10</value>
</data> </data>
<data name="SimpleButton2.Size" type="System.Drawing.Size, System.Drawing"> <data name="SimpleButton2.Size" type="System.Drawing.Size, System.Drawing">
<value>78, 42</value> <value>81, 42</value>
</data> </data>
<data name="SimpleButton2.TabIndex" type="System.Int32, mscorlib"> <data name="SimpleButton2.TabIndex" type="System.Int32, mscorlib">
<value>12</value> <value>12</value>
@@ -416,13 +464,13 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;SimpleButton2.ZOrder" xml:space="preserve"> <data name="&gt;&gt;SimpleButton2.ZOrder" xml:space="preserve">
<value>13</value> <value>15</value>
</data> </data>
<data name="TextEdit7.Location" type="System.Drawing.Point, System.Drawing"> <data name="TextEdit7.Location" type="System.Drawing.Point, System.Drawing">
<value>144, 432</value> <value>142, 478</value>
</data> </data>
<data name="TextEdit7.Size" type="System.Drawing.Size, System.Drawing"> <data name="TextEdit7.Size" type="System.Drawing.Size, System.Drawing">
<value>132, 20</value> <value>144, 20</value>
</data> </data>
<data name="TextEdit7.TabIndex" type="System.Int32, mscorlib"> <data name="TextEdit7.TabIndex" type="System.Int32, mscorlib">
<value>13</value> <value>13</value>
@@ -437,13 +485,13 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;TextEdit7.ZOrder" xml:space="preserve"> <data name="&gt;&gt;TextEdit7.ZOrder" xml:space="preserve">
<value>14</value> <value>16</value>
</data> </data>
<data name="TextEdit8.Location" type="System.Drawing.Point, System.Drawing"> <data name="TextEdit8.Location" type="System.Drawing.Point, System.Drawing">
<value>420, 432</value> <value>428, 478</value>
</data> </data>
<data name="TextEdit8.Size" type="System.Drawing.Size, System.Drawing"> <data name="TextEdit8.Size" type="System.Drawing.Size, System.Drawing">
<value>133, 20</value> <value>145, 20</value>
</data> </data>
<data name="TextEdit8.TabIndex" type="System.Int32, mscorlib"> <data name="TextEdit8.TabIndex" type="System.Int32, mscorlib">
<value>14</value> <value>14</value>
@@ -458,13 +506,13 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;TextEdit8.ZOrder" xml:space="preserve"> <data name="&gt;&gt;TextEdit8.ZOrder" xml:space="preserve">
<value>15</value> <value>17</value>
</data> </data>
<data name="CHANGED_WHOTextBox.Location" type="System.Drawing.Point, System.Drawing"> <data name="CHANGED_WHOTextBox.Location" type="System.Drawing.Point, System.Drawing">
<value>144, 472</value> <value>142, 518</value>
</data> </data>
<data name="CHANGED_WHOTextBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="CHANGED_WHOTextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>132, 20</value> <value>144, 20</value>
</data> </data>
<data name="CHANGED_WHOTextBox.TabIndex" type="System.Int32, mscorlib"> <data name="CHANGED_WHOTextBox.TabIndex" type="System.Int32, mscorlib">
<value>15</value> <value>15</value>
@@ -479,13 +527,13 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;CHANGED_WHOTextBox.ZOrder" xml:space="preserve"> <data name="&gt;&gt;CHANGED_WHOTextBox.ZOrder" xml:space="preserve">
<value>16</value> <value>18</value>
</data> </data>
<data name="TextEdit10.Location" type="System.Drawing.Point, System.Drawing"> <data name="TextEdit10.Location" type="System.Drawing.Point, System.Drawing">
<value>420, 472</value> <value>428, 518</value>
</data> </data>
<data name="TextEdit10.Size" type="System.Drawing.Size, System.Drawing"> <data name="TextEdit10.Size" type="System.Drawing.Size, System.Drawing">
<value>133, 20</value> <value>145, 20</value>
</data> </data>
<data name="TextEdit10.TabIndex" type="System.Int32, mscorlib"> <data name="TextEdit10.TabIndex" type="System.Int32, mscorlib">
<value>16</value> <value>16</value>
@@ -500,16 +548,16 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;TextEdit10.ZOrder" xml:space="preserve"> <data name="&gt;&gt;TextEdit10.ZOrder" xml:space="preserve">
<value>17</value> <value>19</value>
</data> </data>
<data name="READ_ONLYCheckBox.Location" type="System.Drawing.Point, System.Drawing"> <data name="READ_ONLYCheckBox.Location" type="System.Drawing.Point, System.Drawing">
<value>24, 561</value> <value>24, 607</value>
</data> </data>
<data name="READ_ONLYCheckBox.Properties.Caption" xml:space="preserve"> <data name="READ_ONLYCheckBox.Properties.Caption" xml:space="preserve">
<value>Read Only</value> <value>Read Only</value>
</data> </data>
<data name="READ_ONLYCheckBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="READ_ONLYCheckBox.Size" type="System.Drawing.Size, System.Drawing">
<value>525, 18</value> <value>545, 18</value>
</data> </data>
<data name="READ_ONLYCheckBox.TabIndex" type="System.Int32, mscorlib"> <data name="READ_ONLYCheckBox.TabIndex" type="System.Int32, mscorlib">
<value>17</value> <value>17</value>
@@ -524,16 +572,16 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;READ_ONLYCheckBox.ZOrder" xml:space="preserve"> <data name="&gt;&gt;READ_ONLYCheckBox.ZOrder" xml:space="preserve">
<value>18</value> <value>20</value>
</data> </data>
<data name="LOAD_IDX_VALUECheckBox.Location" type="System.Drawing.Point, System.Drawing"> <data name="LOAD_IDX_VALUECheckBox.Location" type="System.Drawing.Point, System.Drawing">
<value>24, 583</value> <value>24, 651</value>
</data> </data>
<data name="LOAD_IDX_VALUECheckBox.Properties.Caption" xml:space="preserve"> <data name="LOAD_IDX_VALUECheckBox.Properties.Caption" xml:space="preserve">
<value>Lade Indexdaten</value> <value>Lade Indexdaten</value>
</data> </data>
<data name="LOAD_IDX_VALUECheckBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="LOAD_IDX_VALUECheckBox.Size" type="System.Drawing.Size, System.Drawing">
<value>525, 18</value> <value>545, 18</value>
</data> </data>
<data name="LOAD_IDX_VALUECheckBox.TabIndex" type="System.Int32, mscorlib"> <data name="LOAD_IDX_VALUECheckBox.TabIndex" type="System.Int32, mscorlib">
<value>18</value> <value>18</value>
@@ -548,16 +596,16 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;LOAD_IDX_VALUECheckBox.ZOrder" xml:space="preserve"> <data name="&gt;&gt;LOAD_IDX_VALUECheckBox.ZOrder" xml:space="preserve">
<value>19</value> <value>21</value>
</data> </data>
<data name="VALIDATIONCheckbox.Location" type="System.Drawing.Point, System.Drawing"> <data name="VALIDATIONCheckbox.Location" type="System.Drawing.Point, System.Drawing">
<value>24, 537</value> <value>24, 583</value>
</data> </data>
<data name="VALIDATIONCheckbox.Properties.Caption" xml:space="preserve"> <data name="VALIDATIONCheckbox.Properties.Caption" xml:space="preserve">
<value>Muss ausgefüllt werden</value> <value>Muss ausgefüllt werden</value>
</data> </data>
<data name="VALIDATIONCheckbox.Size" type="System.Drawing.Size, System.Drawing"> <data name="VALIDATIONCheckbox.Size" type="System.Drawing.Size, System.Drawing">
<value>260, 18</value> <value>270, 18</value>
</data> </data>
<data name="VALIDATIONCheckbox.TabIndex" type="System.Int32, mscorlib"> <data name="VALIDATIONCheckbox.TabIndex" type="System.Int32, mscorlib">
<value>19</value> <value>19</value>
@@ -572,16 +620,16 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;VALIDATIONCheckbox.ZOrder" xml:space="preserve"> <data name="&gt;&gt;VALIDATIONCheckbox.ZOrder" xml:space="preserve">
<value>20</value> <value>22</value>
</data> </data>
<data name="ADVANCED_LOOKUPCheckbox.Location" type="System.Drawing.Point, System.Drawing"> <data name="ADVANCED_LOOKUPCheckbox.Location" type="System.Drawing.Point, System.Drawing">
<value>24, 605</value> <value>24, 629</value>
</data> </data>
<data name="ADVANCED_LOOKUPCheckbox.Properties.Caption" xml:space="preserve"> <data name="ADVANCED_LOOKUPCheckbox.Properties.Caption" xml:space="preserve">
<value>Erweitertes Auswahl Control (für lange Listen)</value> <value>Erweitertes Auswahl Control (für lange Listen)</value>
</data> </data>
<data name="ADVANCED_LOOKUPCheckbox.Size" type="System.Drawing.Size, System.Drawing"> <data name="ADVANCED_LOOKUPCheckbox.Size" type="System.Drawing.Size, System.Drawing">
<value>525, 18</value> <value>545, 18</value>
</data> </data>
<data name="ADVANCED_LOOKUPCheckbox.TabIndex" type="System.Int32, mscorlib"> <data name="ADVANCED_LOOKUPCheckbox.TabIndex" type="System.Int32, mscorlib">
<value>20</value> <value>20</value>
@@ -596,13 +644,13 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;ADVANCED_LOOKUPCheckbox.ZOrder" xml:space="preserve"> <data name="&gt;&gt;ADVANCED_LOOKUPCheckbox.ZOrder" xml:space="preserve">
<value>21</value> <value>23</value>
</data> </data>
<data name="DEFAULTVALUETextBox.Location" type="System.Drawing.Point, System.Drawing"> <data name="DEFAULTVALUETextBox.Location" type="System.Drawing.Point, System.Drawing">
<value>144, 392</value> <value>142, 392</value>
</data> </data>
<data name="DEFAULTVALUETextBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="DEFAULTVALUETextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>409, 20</value> <value>431, 20</value>
</data> </data>
<data name="DEFAULTVALUETextBox.TabIndex" type="System.Int32, mscorlib"> <data name="DEFAULTVALUETextBox.TabIndex" type="System.Int32, mscorlib">
<value>21</value> <value>21</value>
@@ -617,19 +665,19 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;DEFAULTVALUETextBox.ZOrder" xml:space="preserve"> <data name="&gt;&gt;DEFAULTVALUETextBox.ZOrder" xml:space="preserve">
<value>22</value> <value>24</value>
</data> </data>
<data name="SEQUENCETextBox.EditValue" type="System.Decimal, mscorlib"> <data name="SEQUENCETextBox.EditValue" type="System.Decimal, mscorlib">
<value>0</value> <value>0</value>
</data> </data>
<data name="SEQUENCETextBox.Location" type="System.Drawing.Point, System.Drawing"> <data name="SEQUENCETextBox.Location" type="System.Drawing.Point, System.Drawing">
<value>420, 140</value> <value>428, 140</value>
</data> </data>
<data name="SEQUENCETextBox.Properties.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2"> <data name="SEQUENCETextBox.Properties.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2">
<value>Combo</value> <value>Combo</value>
</data> </data>
<data name="SEQUENCETextBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="SEQUENCETextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>133, 20</value> <value>145, 20</value>
</data> </data>
<data name="SEQUENCETextBox.TabIndex" type="System.Int32, mscorlib"> <data name="SEQUENCETextBox.TabIndex" type="System.Int32, mscorlib">
<value>22</value> <value>22</value>
@@ -644,10 +692,10 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;SEQUENCETextBox.ZOrder" xml:space="preserve"> <data name="&gt;&gt;SEQUENCETextBox.ZOrder" xml:space="preserve">
<value>23</value> <value>25</value>
</data> </data>
<data name="SUMMARY_FUNCTIONCombobox.Location" type="System.Drawing.Point, System.Drawing"> <data name="SUMMARY_FUNCTIONCombobox.Location" type="System.Drawing.Point, System.Drawing">
<value>412, 537</value> <value>420, 583</value>
</data> </data>
<data name="SUMMARY_FUNCTIONCombobox.Properties.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2"> <data name="SUMMARY_FUNCTIONCombobox.Properties.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2">
<value>Combo</value> <value>Combo</value>
@@ -656,7 +704,7 @@
<value /> <value />
</data> </data>
<data name="SUMMARY_FUNCTIONCombobox.Size" type="System.Drawing.Size, System.Drawing"> <data name="SUMMARY_FUNCTIONCombobox.Size" type="System.Drawing.Size, System.Drawing">
<value>137, 20</value> <value>149, 20</value>
</data> </data>
<data name="SUMMARY_FUNCTIONCombobox.TabIndex" type="System.Int32, mscorlib"> <data name="SUMMARY_FUNCTIONCombobox.TabIndex" type="System.Int32, mscorlib">
<value>23</value> <value>23</value>
@@ -671,10 +719,10 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;SUMMARY_FUNCTIONCombobox.ZOrder" xml:space="preserve"> <data name="&gt;&gt;SUMMARY_FUNCTIONCombobox.ZOrder" xml:space="preserve">
<value>24</value> <value>26</value>
</data> </data>
<data name="TYPE_COLUMNComboBox2.Location" type="System.Drawing.Point, System.Drawing"> <data name="TYPE_COLUMNComboBox2.Location" type="System.Drawing.Point, System.Drawing">
<value>144, 180</value> <value>142, 180</value>
</data> </data>
<data name="TYPE_COLUMNComboBox2.Properties.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2"> <data name="TYPE_COLUMNComboBox2.Properties.Buttons" type="DevExpress.XtraEditors.Controls.ButtonPredefines, DevExpress.Utils.v21.2">
<value>Combo</value> <value>Combo</value>
@@ -683,7 +731,7 @@
<value /> <value />
</data> </data>
<data name="TYPE_COLUMNComboBox2.Size" type="System.Drawing.Size, System.Drawing"> <data name="TYPE_COLUMNComboBox2.Size" type="System.Drawing.Size, System.Drawing">
<value>409, 20</value> <value>431, 20</value>
</data> </data>
<data name="TYPE_COLUMNComboBox2.TabIndex" type="System.Int32, mscorlib"> <data name="TYPE_COLUMNComboBox2.TabIndex" type="System.Int32, mscorlib">
<value>27</value> <value>27</value>
@@ -698,7 +746,31 @@
<value>LayoutControl1</value> <value>LayoutControl1</value>
</data> </data>
<data name="&gt;&gt;TYPE_COLUMNComboBox2.ZOrder" xml:space="preserve"> <data name="&gt;&gt;TYPE_COLUMNComboBox2.ZOrder" xml:space="preserve">
<value>25</value> <value>27</value>
</data>
<data name="CheckEditInheritValue.Location" type="System.Drawing.Point, System.Drawing">
<value>24, 673</value>
</data>
<data name="CheckEditInheritValue.Properties.Caption" xml:space="preserve">
<value>Inherit Value (Vererbt den Wert der aktuellen Zelle auf alle nachfolgenden)</value>
</data>
<data name="CheckEditInheritValue.Size" type="System.Drawing.Size, System.Drawing">
<value>545, 18</value>
</data>
<data name="CheckEditInheritValue.TabIndex" type="System.Int32, mscorlib">
<value>28</value>
</data>
<data name="&gt;&gt;CheckEditInheritValue.Name" xml:space="preserve">
<value>CheckEditInheritValue</value>
</data>
<data name="&gt;&gt;CheckEditInheritValue.Type" xml:space="preserve">
<value>DevExpress.XtraEditors.CheckEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;CheckEditInheritValue.Parent" xml:space="preserve">
<value>LayoutControl1</value>
</data>
<data name="&gt;&gt;CheckEditInheritValue.ZOrder" xml:space="preserve">
<value>28</value>
</data> </data>
<data name="LayoutControl1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms"> <data name="LayoutControl1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
<value>Fill</value> <value>Fill</value>
@@ -760,8 +832,11 @@
<data name="LayoutControlItem21.Text" xml:space="preserve"> <data name="LayoutControlItem21.Text" xml:space="preserve">
<value>Formatierung:</value> <value>Formatierung:</value>
</data> </data>
<data name="LayoutControlItem24.Text" xml:space="preserve">
<value>Formel:</value>
</data>
<data name="LayoutControl1.Size" type="System.Drawing.Size, System.Drawing"> <data name="LayoutControl1.Size" type="System.Drawing.Size, System.Drawing">
<value>573, 668</value> <value>593, 816</value>
</data> </data>
<data name="LayoutControl1.TabIndex" type="System.Int32, mscorlib"> <data name="LayoutControl1.TabIndex" type="System.Int32, mscorlib">
<value>33</value> <value>33</value>
@@ -788,7 +863,7 @@
<value>6, 13</value> <value>6, 13</value>
</data> </data>
<data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing"> <data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
<value>573, 757</value> <value>593, 905</value>
</data> </data>
<data name="$this.Font" type="System.Drawing.Font, System.Drawing"> <data name="$this.Font" type="System.Drawing.Font, System.Drawing">
<value>Segoe UI, 8.25pt</value> <value>Segoe UI, 8.25pt</value>
@@ -806,19 +881,19 @@
<value>DD_DMSLiteDataSet</value> <value>DD_DMSLiteDataSet</value>
</data> </data>
<data name="&gt;&gt;DD_DMSLiteDataSet.Type" xml:space="preserve"> <data name="&gt;&gt;DD_DMSLiteDataSet.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBPM_CONTROL_TABLETableAdapter.Name" xml:space="preserve"> <data name="&gt;&gt;TBPM_CONTROL_TABLETableAdapter.Name" xml:space="preserve">
<value>TBPM_CONTROL_TABLETableAdapter</value> <value>TBPM_CONTROL_TABLETableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBPM_CONTROL_TABLETableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBPM_CONTROL_TABLETableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve"> <data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve">
<value>TableAdapterManager</value> <value>TableAdapterManager</value>
</data> </data>
<data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve"> <data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;BarButtonItem1.Name" xml:space="preserve"> <data name="&gt;&gt;BarButtonItem1.Name" xml:space="preserve">
<value>BarButtonItem1</value> <value>BarButtonItem1</value>
@@ -958,24 +1033,30 @@
<data name="&gt;&gt;LayoutControlItem14.Type" xml:space="preserve"> <data name="&gt;&gt;LayoutControlItem14.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;LayoutControlItem15.Name" xml:space="preserve">
<value>LayoutControlItem15</value>
</data>
<data name="&gt;&gt;LayoutControlItem15.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;LayoutControlItem17.Name" xml:space="preserve"> <data name="&gt;&gt;LayoutControlItem17.Name" xml:space="preserve">
<value>LayoutControlItem17</value> <value>LayoutControlItem17</value>
</data> </data>
<data name="&gt;&gt;LayoutControlItem17.Type" xml:space="preserve"> <data name="&gt;&gt;LayoutControlItem17.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;LayoutControlItem25.Name" xml:space="preserve">
<value>LayoutControlItem25</value>
</data>
<data name="&gt;&gt;LayoutControlItem25.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;LayoutControlItem20.Name" xml:space="preserve"> <data name="&gt;&gt;LayoutControlItem20.Name" xml:space="preserve">
<value>LayoutControlItem20</value> <value>LayoutControlItem20</value>
</data> </data>
<data name="&gt;&gt;LayoutControlItem20.Type" xml:space="preserve"> <data name="&gt;&gt;LayoutControlItem20.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;LayoutControlItem22.Name" xml:space="preserve">
<value>LayoutControlItem22</value>
</data>
<data name="&gt;&gt;LayoutControlItem22.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;LayoutControlItem18.Name" xml:space="preserve"> <data name="&gt;&gt;LayoutControlItem18.Name" xml:space="preserve">
<value>LayoutControlItem18</value> <value>LayoutControlItem18</value>
</data> </data>
@@ -1000,6 +1081,18 @@
<data name="&gt;&gt;LayoutControlItem21.Type" xml:space="preserve"> <data name="&gt;&gt;LayoutControlItem21.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;LayoutControlItem24.Name" xml:space="preserve">
<value>LayoutControlItem24</value>
</data>
<data name="&gt;&gt;LayoutControlItem24.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;LayoutControlItem26.Name" xml:space="preserve">
<value>LayoutControlItem26</value>
</data>
<data name="&gt;&gt;LayoutControlItem26.Type" xml:space="preserve">
<value>DevExpress.XtraLayout.LayoutControlItem, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;$this.Name" xml:space="preserve"> <data name="&gt;&gt;$this.Name" xml:space="preserve">
<value>frmColumn_Detail</value> <value>frmColumn_Detail</value>
</data> </data>

View File

@@ -64,6 +64,17 @@ Public Class frmColumn_Detail
End Try End Try
End Function End Function
Private Sub READ_ONLYCheckBox_CheckedChanged(sender As Object, e As EventArgs) Handles READ_ONLYCheckBox.CheckedChanged
Console.WriteLine($"READ_ONLY changed to: {READ_ONLYCheckBox.Checked}")
Console.WriteLine($"CheckEditInheritValue is now: {CheckEditInheritValue.Checked}")
End Sub
Private Sub CheckEditInheritValue_CheckedChanged(sender As Object, e As EventArgs) Handles CheckEditInheritValue.CheckedChanged
Console.WriteLine($"CheckEditInheritValue changed to: {CheckEditInheritValue.Checked}")
Dim stackTrace As New StackTrace()
Console.WriteLine($"Called from: {stackTrace}")
End Sub
Sub Save_Data() Sub Save_Data()
Try Try
TBPM_CONTROL_TABLEBindingSource.EndEdit() TBPM_CONTROL_TABLEBindingSource.EndEdit()
@@ -87,11 +98,13 @@ Public Class frmColumn_Detail
SUMMARY_FUNCTIONCombobox.EditValue, SUMMARY_FUNCTIONCombobox.EditValue,
TYPE_COLUMNComboBox2.EditValue, TYPE_COLUMNComboBox2.EditValue,
LU_CAPTIONTextBox.Text, LU_CAPTIONTextBox.Text,
CheckEditInheritValue.Checked,
FORMULA_EXPRESSIONTextBox.Text,
GUIDTextBox.Text GUIDTextBox.Text
) )
tslblAenderungen.Visibility = DevExpress.XtraBars.BarItemVisibility.Always tslblAenderungen.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
tslblAenderungen.Caption = "Änderungen gespeichert - " & Now tslblAenderungen.Caption = "Änderungen gespeichert - " & Now
FillData(GUIDTextBox.Text) ' FillData(GUIDTextBox.Text)
Else Else
tslblAenderungen.Visibility = DevExpress.XtraBars.BarItemVisibility.Never tslblAenderungen.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
End If End If
@@ -193,4 +206,22 @@ Public Class frmColumn_Detail
Private Sub RibbonControl1_Click(sender As Object, e As EventArgs) Handles RibbonControl1.Click Private Sub RibbonControl1_Click(sender As Object, e As EventArgs) Handles RibbonControl1.Click
End Sub End Sub
Private Sub SimpleButton3_Click(sender As Object, e As EventArgs) Handles SimpleButton3.Click
' Alle verfügbaren Spalten für dieses Control laden
Dim availableColumns As DataTable = GetAvailableColumnsForControl()
' Expression Designer öffnen
Using designer As New frmExpression_Designer(availableColumns, FORMULA_EXPRESSIONTextBox.Text)
If designer.ShowDialog() = DialogResult.OK Then
FORMULA_EXPRESSIONTextBox.Text = designer.Expression
End If
End Using
End Sub
Private Function GetAvailableColumnsForControl() As DataTable
' Spalten aus der aktuellen Control-Definition laden
Dim oSQL = "SELECT * FROM TBPM_CONTROL_TABLE WHERE CONTROL_ID = " & CURRENT_CONTROL_ID & " ORDER BY SEQUENCE"
Dim dt As DataTable = DatabaseFallback.GetDatatableECM(oSQL)
Return dt
End Function
End Class End Class

View File

@@ -33,7 +33,7 @@ Partial Class frmConnection
Me.Chckwin_aut = New System.Windows.Forms.CheckBox() Me.Chckwin_aut = New System.Windows.Forms.CheckBox()
Me.txtBezeichnung = New System.Windows.Forms.TextBox() Me.txtBezeichnung = New System.Windows.Forms.TextBox()
Me.TBDD_CONNECTIONBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBDD_CONNECTIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet() Me.DD_DMSLiteDataSet = New taskFLOW.DD_DMSLiteDataSet()
Me.Label1 = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label()
Me.btnCheck_Con = New System.Windows.Forms.Button() Me.btnCheck_Con = New System.Windows.Forms.Button()
Me.lblDatasource2 = New System.Windows.Forms.Label() Me.lblDatasource2 = New System.Windows.Forms.Label()
@@ -75,8 +75,8 @@ Partial Class frmConnection
Me.GUIDTextBox = New System.Windows.Forms.TextBox() Me.GUIDTextBox = New System.Windows.Forms.TextBox()
Me.DATENBANKComboBox = New System.Windows.Forms.ComboBox() Me.DATENBANKComboBox = New System.Windows.Forms.ComboBox()
Me.BEMERKUNGTextBox = New System.Windows.Forms.TextBox() Me.BEMERKUNGTextBox = New System.Windows.Forms.TextBox()
Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager() Me.TableAdapterManager = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
Me.TBDD_CONNECTIONTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter() Me.TBDD_CONNECTIONTableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter()
Me.SYS_CONNECTIONCheckBox = New System.Windows.Forms.CheckBox() Me.SYS_CONNECTIONCheckBox = New System.Windows.Forms.CheckBox()
Me.GroupBox1 = New System.Windows.Forms.GroupBox() Me.GroupBox1 = New System.Windows.Forms.GroupBox()
GEANDERTWERLabel = New System.Windows.Forms.Label() GEANDERTWERLabel = New System.Windows.Forms.Label()
@@ -183,7 +183,7 @@ Partial Class frmConnection
'btnCheck_Con 'btnCheck_Con
' '
Me.btnCheck_Con.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.btnCheck_Con.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnCheck_Con.Image = Global.DD_ProcessManager.My.Resources.Resources.world_link Me.btnCheck_Con.Image = Global.taskFLOW.My.Resources.Resources.world_link
Me.btnCheck_Con.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnCheck_Con.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnCheck_Con.Location = New System.Drawing.Point(368, 133) Me.btnCheck_Con.Location = New System.Drawing.Point(368, 133)
Me.btnCheck_Con.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.btnCheck_Con.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
@@ -400,7 +400,7 @@ Partial Class frmConnection
' '
'ToolStripButton3 'ToolStripButton3
' '
Me.ToolStripButton3.Image = Global.DD_ProcessManager.My.Resources.Resources.refresh_16xLG Me.ToolStripButton3.Image = Global.taskFLOW.My.Resources.Resources.refresh_16xLG
Me.ToolStripButton3.ImageTransparentColor = System.Drawing.Color.Magenta Me.ToolStripButton3.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton3.Name = "ToolStripButton3" Me.ToolStripButton3.Name = "ToolStripButton3"
Me.ToolStripButton3.Size = New System.Drawing.Size(95, 22) Me.ToolStripButton3.Size = New System.Drawing.Size(95, 22)
@@ -408,7 +408,7 @@ Partial Class frmConnection
' '
'ToolStripButton1 'ToolStripButton1
' '
Me.ToolStripButton1.Image = Global.DD_ProcessManager.My.Resources.Resources.add Me.ToolStripButton1.Image = Global.taskFLOW.My.Resources.Resources.add
Me.ToolStripButton1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.ToolStripButton1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton1.Name = "ToolStripButton1" Me.ToolStripButton1.Name = "ToolStripButton1"
@@ -425,7 +425,7 @@ Partial Class frmConnection
' '
'ToolStripButton2 'ToolStripButton2
' '
Me.ToolStripButton2.Image = Global.DD_ProcessManager.My.Resources.Resources.delete_12x12 Me.ToolStripButton2.Image = Global.taskFLOW.My.Resources.Resources.delete_12x12
Me.ToolStripButton2.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.ToolStripButton2.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.ToolStripButton2.ImageTransparentColor = System.Drawing.Color.Magenta Me.ToolStripButton2.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton2.Name = "ToolStripButton2" Me.ToolStripButton2.Name = "ToolStripButton2"
@@ -568,7 +568,7 @@ Partial Class frmConnection
Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete Me.TableAdapterManager.UpdateOrder = taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
' '
'TBDD_CONNECTIONTableAdapter 'TBDD_CONNECTIONTableAdapter
' '
@@ -653,9 +653,9 @@ Partial Class frmConnection
Friend WithEvents lblDataSource As System.Windows.Forms.Label Friend WithEvents lblDataSource As System.Windows.Forms.Label
Friend WithEvents cmbDbArt As System.Windows.Forms.ComboBox Friend WithEvents cmbDbArt As System.Windows.Forms.ComboBox
Friend WithEvents lblDatenbanktyp As System.Windows.Forms.Label Friend WithEvents lblDatenbanktyp As System.Windows.Forms.Label
Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet Friend WithEvents DD_DMSLiteDataSet As taskFLOW.DD_DMSLiteDataSet
Friend WithEvents TBDD_CONNECTIONBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBDD_CONNECTIONBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TableAdapterManager As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager Friend WithEvents TableAdapterManager As taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
Friend WithEvents TBDD_CONNECTIONBindingNavigator As System.Windows.Forms.BindingNavigator Friend WithEvents TBDD_CONNECTIONBindingNavigator As System.Windows.Forms.BindingNavigator
Friend WithEvents BindingNavigatorCountItem As System.Windows.Forms.ToolStripLabel Friend WithEvents BindingNavigatorCountItem As System.Windows.Forms.ToolStripLabel
Friend WithEvents BindingNavigatorMoveFirstItem As System.Windows.Forms.ToolStripButton Friend WithEvents BindingNavigatorMoveFirstItem As System.Windows.Forms.ToolStripButton

View File

@@ -330,7 +330,6 @@ Public Class frmConnection
Catch ex As Exception Catch ex As Exception
LOGGER.Error(ex) LOGGER.Error(ex)
MsgBox("Error while loading Databases. Default Database will be set!" & vbCrLf & ex.Message, MsgBoxStyle.Critical) MsgBox("Error while loading Databases. Default Database will be set!" & vbCrLf & ex.Message, MsgBoxStyle.Critical)
DD_LIB_Standards.clsLogger.Add("Error while loading Databases:" & ex.Message)
Finally Finally
Me.Cursor = Cursors.Default Me.Cursor = Cursors.Default
End Try End Try

View File

@@ -1,231 +0,0 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmDashboard1
Inherits DevExpress.XtraEditors.XtraForm
'Form overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
MyBase.Dispose(disposing)
End Sub
'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim TileItemElement1 As DevExpress.XtraEditors.TileItemElement = New DevExpress.XtraEditors.TileItemElement()
Dim TileItemElement2 As DevExpress.XtraEditors.TileItemElement = New DevExpress.XtraEditors.TileItemElement()
Dim TileItemElement3 As DevExpress.XtraEditors.TileItemElement = New DevExpress.XtraEditors.TileItemElement()
Me.TileBar1 = New DevExpress.XtraBars.Navigation.TileBar()
Me.TileBarGroup2 = New DevExpress.XtraBars.Navigation.TileBarGroup()
Me.TileBarItem1 = New DevExpress.XtraBars.Navigation.TileBarItem()
Me.TileBarItem2 = New DevExpress.XtraBars.Navigation.TileBarItem()
Me.TileBarGroup3 = New DevExpress.XtraBars.Navigation.TileBarGroup()
Me.TileBarItem3 = New DevExpress.XtraBars.Navigation.TileBarItem()
Me.NavigationPane1 = New DevExpress.XtraBars.Navigation.NavigationPane()
Me.NavigationPage1 = New DevExpress.XtraBars.Navigation.NavigationPage()
Me.NavigationPage2 = New DevExpress.XtraBars.Navigation.NavigationPage()
Me.RadialMenu1 = New DevExpress.XtraBars.Ribbon.RadialMenu(Me.components)
Me.BarManager1 = New DevExpress.XtraBars.BarManager(Me.components)
Me.barDockControlTop = New DevExpress.XtraBars.BarDockControl()
Me.barDockControlBottom = New DevExpress.XtraBars.BarDockControl()
Me.barDockControlLeft = New DevExpress.XtraBars.BarDockControl()
Me.barDockControlRight = New DevExpress.XtraBars.BarDockControl()
Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
CType(Me.NavigationPane1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.NavigationPane1.SuspendLayout()
CType(Me.RadialMenu1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'TileBar1
'
Me.TileBar1.Dock = System.Windows.Forms.DockStyle.Top
Me.TileBar1.DropDownOptions.BeakColor = System.Drawing.Color.Empty
Me.TileBar1.Groups.Add(Me.TileBarGroup2)
Me.TileBar1.Groups.Add(Me.TileBarGroup3)
Me.TileBar1.Location = New System.Drawing.Point(0, 0)
Me.TileBar1.MaxId = 3
Me.TileBar1.Name = "TileBar1"
Me.TileBar1.ScrollMode = DevExpress.XtraEditors.TileControlScrollMode.ScrollButtons
Me.TileBar1.Size = New System.Drawing.Size(796, 133)
Me.TileBar1.TabIndex = 0
Me.TileBar1.Text = "TileBar1"
'
'TileBarGroup2
'
Me.TileBarGroup2.Items.Add(Me.TileBarItem1)
Me.TileBarGroup2.Items.Add(Me.TileBarItem2)
Me.TileBarGroup2.Name = "TileBarGroup2"
Me.TileBarGroup2.Text = "Gruppe 1"
'
'TileBarItem1
'
Me.TileBarItem1.DropDownOptions.BeakColor = System.Drawing.Color.Empty
TileItemElement1.Text = "TileBarItem1"
Me.TileBarItem1.Elements.Add(TileItemElement1)
Me.TileBarItem1.Id = 0
Me.TileBarItem1.ItemSize = DevExpress.XtraBars.Navigation.TileBarItemSize.Medium
Me.TileBarItem1.Name = "TileBarItem1"
'
'TileBarItem2
'
Me.TileBarItem2.DropDownOptions.BeakColor = System.Drawing.Color.Empty
TileItemElement2.Text = "TileBarItem2"
Me.TileBarItem2.Elements.Add(TileItemElement2)
Me.TileBarItem2.Id = 1
Me.TileBarItem2.ItemSize = DevExpress.XtraBars.Navigation.TileBarItemSize.Wide
Me.TileBarItem2.Name = "TileBarItem2"
'
'TileBarGroup3
'
Me.TileBarGroup3.Items.Add(Me.TileBarItem3)
Me.TileBarGroup3.Name = "TileBarGroup3"
Me.TileBarGroup3.Text = "Gruppe 2"
'
'TileBarItem3
'
Me.TileBarItem3.AppearanceItem.Normal.BackColor = System.Drawing.Color.DarkTurquoise
Me.TileBarItem3.AppearanceItem.Normal.Options.UseBackColor = True
Me.TileBarItem3.DropDownOptions.BeakColor = System.Drawing.Color.Empty
TileItemElement3.Text = "TileBarItem3"
Me.TileBarItem3.Elements.Add(TileItemElement3)
Me.TileBarItem3.Id = 2
Me.TileBarItem3.ItemSize = DevExpress.XtraBars.Navigation.TileBarItemSize.Medium
Me.TileBarItem3.Name = "TileBarItem3"
'
'NavigationPane1
'
Me.NavigationPane1.Controls.Add(Me.NavigationPage1)
Me.NavigationPane1.Controls.Add(Me.NavigationPage2)
Me.NavigationPane1.Dock = System.Windows.Forms.DockStyle.Bottom
Me.NavigationPane1.Location = New System.Drawing.Point(0, 343)
Me.NavigationPane1.Name = "NavigationPane1"
Me.NavigationPane1.Pages.AddRange(New DevExpress.XtraBars.Navigation.NavigationPageBase() {Me.NavigationPage1, Me.NavigationPage2})
Me.NavigationPane1.RegularSize = New System.Drawing.Size(796, 150)
Me.NavigationPane1.SelectedPage = Me.NavigationPage1
Me.NavigationPane1.Size = New System.Drawing.Size(796, 150)
Me.NavigationPane1.TabIndex = 1
Me.NavigationPane1.Text = "NavigationPane1"
'
'NavigationPage1
'
Me.NavigationPage1.Caption = "NavigationPage1"
Me.NavigationPage1.Name = "NavigationPage1"
Me.NavigationPage1.Size = New System.Drawing.Size(660, 77)
'
'NavigationPage2
'
Me.NavigationPage2.Caption = "NavigationPage2"
Me.NavigationPage2.Name = "NavigationPage2"
Me.NavigationPage2.PageText = "sdsdsd"
Me.NavigationPage2.Size = New System.Drawing.Size(660, 77)
'
'RadialMenu1
'
Me.RadialMenu1.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.BarButtonItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.BarButtonItem2)})
Me.RadialMenu1.Manager = Me.BarManager1
Me.RadialMenu1.Name = "RadialMenu1"
'
'BarManager1
'
Me.BarManager1.DockControls.Add(Me.barDockControlTop)
Me.BarManager1.DockControls.Add(Me.barDockControlBottom)
Me.BarManager1.DockControls.Add(Me.barDockControlLeft)
Me.BarManager1.DockControls.Add(Me.barDockControlRight)
Me.BarManager1.Form = Me
Me.BarManager1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.BarButtonItem1, Me.BarButtonItem2})
Me.BarManager1.MaxItemId = 2
'
'barDockControlTop
'
Me.barDockControlTop.CausesValidation = False
Me.barDockControlTop.Dock = System.Windows.Forms.DockStyle.Top
Me.barDockControlTop.Location = New System.Drawing.Point(0, 0)
Me.barDockControlTop.Manager = Me.BarManager1
Me.barDockControlTop.Size = New System.Drawing.Size(796, 0)
'
'barDockControlBottom
'
Me.barDockControlBottom.CausesValidation = False
Me.barDockControlBottom.Dock = System.Windows.Forms.DockStyle.Bottom
Me.barDockControlBottom.Location = New System.Drawing.Point(0, 493)
Me.barDockControlBottom.Manager = Me.BarManager1
Me.barDockControlBottom.Size = New System.Drawing.Size(796, 0)
'
'barDockControlLeft
'
Me.barDockControlLeft.CausesValidation = False
Me.barDockControlLeft.Dock = System.Windows.Forms.DockStyle.Left
Me.barDockControlLeft.Location = New System.Drawing.Point(0, 0)
Me.barDockControlLeft.Manager = Me.BarManager1
Me.barDockControlLeft.Size = New System.Drawing.Size(0, 493)
'
'barDockControlRight
'
Me.barDockControlRight.CausesValidation = False
Me.barDockControlRight.Dock = System.Windows.Forms.DockStyle.Right
Me.barDockControlRight.Location = New System.Drawing.Point(796, 0)
Me.barDockControlRight.Manager = Me.BarManager1
Me.barDockControlRight.Size = New System.Drawing.Size(0, 493)
'
'BarButtonItem1
'
Me.BarButtonItem1.Caption = "BarButtonItem1"
Me.BarButtonItem1.Id = 0
Me.BarButtonItem1.Name = "BarButtonItem1"
'
'BarButtonItem2
'
Me.BarButtonItem2.Caption = "BarButtonItem2"
Me.BarButtonItem2.Id = 1
Me.BarButtonItem2.Name = "BarButtonItem2"
'
'frmDashboard1
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(796, 493)
Me.Controls.Add(Me.NavigationPane1)
Me.Controls.Add(Me.TileBar1)
Me.Controls.Add(Me.barDockControlLeft)
Me.Controls.Add(Me.barDockControlRight)
Me.Controls.Add(Me.barDockControlBottom)
Me.Controls.Add(Me.barDockControlTop)
Me.Name = "frmDashboard1"
Me.Text = "frmDashboard1"
CType(Me.NavigationPane1, System.ComponentModel.ISupportInitialize).EndInit()
Me.NavigationPane1.ResumeLayout(False)
CType(Me.RadialMenu1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents TileBar1 As DevExpress.XtraBars.Navigation.TileBar
Friend WithEvents TileBarGroup2 As DevExpress.XtraBars.Navigation.TileBarGroup
Friend WithEvents TileBarItem1 As DevExpress.XtraBars.Navigation.TileBarItem
Friend WithEvents TileBarItem2 As DevExpress.XtraBars.Navigation.TileBarItem
Friend WithEvents TileBarGroup3 As DevExpress.XtraBars.Navigation.TileBarGroup
Friend WithEvents TileBarItem3 As DevExpress.XtraBars.Navigation.TileBarItem
Friend WithEvents NavigationPane1 As DevExpress.XtraBars.Navigation.NavigationPane
Friend WithEvents NavigationPage1 As DevExpress.XtraBars.Navigation.NavigationPage
Friend WithEvents NavigationPage2 As DevExpress.XtraBars.Navigation.NavigationPage
Friend WithEvents RadialMenu1 As DevExpress.XtraBars.Ribbon.RadialMenu
Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents BarManager1 As DevExpress.XtraBars.BarManager
Friend WithEvents barDockControlTop As DevExpress.XtraBars.BarDockControl
Friend WithEvents barDockControlBottom As DevExpress.XtraBars.BarDockControl
Friend WithEvents barDockControlLeft As DevExpress.XtraBars.BarDockControl
Friend WithEvents barDockControlRight As DevExpress.XtraBars.BarDockControl
End Class

View File

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

View File

@@ -227,28 +227,28 @@ Partial Class frmDesignerLayout
'ToolboxItemTextbox 'ToolboxItemTextbox
' '
Me.ToolboxItemTextbox.Caption = "Textbox" Me.ToolboxItemTextbox.Caption = "Textbox"
Me.ToolboxItemTextbox.ImageOptions.Image = Global.DD_ProcessManager.My.Resources.Resources.TextBox Me.ToolboxItemTextbox.ImageOptions.Image = Global.taskFLOW.My.Resources.Resources.TextBox
Me.ToolboxItemTextbox.Name = "ToolboxItemTextbox" Me.ToolboxItemTextbox.Name = "ToolboxItemTextbox"
Me.ToolboxItemTextbox.Tag = "TextBox" Me.ToolboxItemTextbox.Tag = "TextBox"
' '
'ToolboxItemMemoedit 'ToolboxItemMemoedit
' '
Me.ToolboxItemMemoedit.Caption = "Multiline Textbox" Me.ToolboxItemMemoedit.Caption = "Multiline Textbox"
Me.ToolboxItemMemoedit.ImageOptions.Image = Global.DD_ProcessManager.My.Resources.Resources.TextBox Me.ToolboxItemMemoedit.ImageOptions.Image = Global.taskFLOW.My.Resources.Resources.TextBox
Me.ToolboxItemMemoedit.Name = "ToolboxItemMemoedit" Me.ToolboxItemMemoedit.Name = "ToolboxItemMemoedit"
Me.ToolboxItemMemoedit.Tag = "Memoedit" Me.ToolboxItemMemoedit.Tag = "Memoedit"
' '
'ToolboxItemDatepicker 'ToolboxItemDatepicker
' '
Me.ToolboxItemDatepicker.Caption = "Datepicker" Me.ToolboxItemDatepicker.Caption = "Datepicker"
Me.ToolboxItemDatepicker.ImageOptions.Image = Global.DD_ProcessManager.My.Resources.Resources.DateOrTimePicker_675 Me.ToolboxItemDatepicker.ImageOptions.Image = Global.taskFLOW.My.Resources.Resources.DateOrTimePicker_675
Me.ToolboxItemDatepicker.Name = "ToolboxItemDatepicker" Me.ToolboxItemDatepicker.Name = "ToolboxItemDatepicker"
Me.ToolboxItemDatepicker.Tag = "Datepicker" Me.ToolboxItemDatepicker.Tag = "Datepicker"
' '
'ToolboxItemCheckbox 'ToolboxItemCheckbox
' '
Me.ToolboxItemCheckbox.Caption = "Checkbox" Me.ToolboxItemCheckbox.Caption = "Checkbox"
Me.ToolboxItemCheckbox.ImageOptions.Image = Global.DD_ProcessManager.My.Resources.Resources.checkbox_16xLG Me.ToolboxItemCheckbox.ImageOptions.Image = Global.taskFLOW.My.Resources.Resources.checkbox_16xLG
Me.ToolboxItemCheckbox.Name = "ToolboxItemCheckbox" Me.ToolboxItemCheckbox.Name = "ToolboxItemCheckbox"
Me.ToolboxItemCheckbox.Tag = "Checkbox" Me.ToolboxItemCheckbox.Tag = "Checkbox"
' '

View File

@@ -1,6 +1,6 @@
Imports System.IO Imports System.IO
Imports System.Text.Encoding Imports System.Text.Encoding
Imports DD_ProcessManager.Controls Imports taskFLOW.Controls
Imports DevExpress.XtraBars Imports DevExpress.XtraBars
Imports DevExpress.XtraEditors Imports DevExpress.XtraEditors
Imports DevExpress.XtraLayout Imports DevExpress.XtraLayout

View File

@@ -1,4 +1,4 @@
Imports DD_ProcessManager.Controls.Editors Imports taskFLOW.Controls.Editors
'Imports ScintillaNET 'Imports ScintillaNET
Public Class frmDatasourceEditor Public Class frmDatasourceEditor

View File

@@ -1,5 +1,5 @@
Imports System.ComponentModel Imports System.ComponentModel
Imports DD_ProcessManager.Controls.Localization Imports taskFLOW.Controls.Localization
Namespace Controls.Properties Namespace Controls.Properties
Public MustInherit Class BaseProperties Public MustInherit Class BaseProperties

View File

@@ -1,6 +1,6 @@
Imports System.ComponentModel Imports System.ComponentModel
Imports DD_ProcessManager.Controls.Editors Imports taskFLOW.Controls.Editors
Imports DD_ProcessManager.Controls.Localization Imports taskFLOW.Controls.Localization
Namespace Controls.Properties Namespace Controls.Properties
Public Class ComboboxProperties Public Class ComboboxProperties

View File

@@ -117,101 +117,29 @@
<resheader name="writer"> <resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader> </resheader>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="Label1.Location" type="System.Drawing.Point, System.Drawing">
<value>15, 9</value>
</data>
<data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
<value>495, 203</value>
</data>
<data name="&gt;&gt;Label1.Name" xml:space="preserve">
<value>Label1</value>
</data>
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" /> <assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="$this.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms"> <data name="OK_Button.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
<value>None</value>
</data>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="OK_Button.Location" type="System.Drawing.Point, System.Drawing">
<value>355, 150</value>
</data>
<data name="OK_Button.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>6, 5, 6, 5</value> <value>6, 5, 6, 5</value>
</data> </data>
<data name="&gt;&gt;Timer1.Name" xml:space="preserve">
<value>Timer1</value>
</data>
<assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="txterror.TabIndex" type="System.Int32, mscorlib">
<value>1</value>
</data>
<data name="Label1.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
</data>
<data name="txterror.Enabled" type="System.Boolean, mscorlib">
<value>False</value>
</data>
<data name="Label1.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>6, 0, 6, 0</value>
</data>
<data name="&gt;&gt;txterror.Type" xml:space="preserve">
<value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;Label1.Type" xml:space="preserve">
<value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;txterror.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="OK_Button.Size" type="System.Drawing.Size, System.Drawing"> <data name="OK_Button.Size" type="System.Drawing.Size, System.Drawing">
<value>134, 41</value> <value>134, 41</value>
</data> </data>
<data name="$this.Font" type="System.Drawing.Font, System.Drawing"> <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<value>Verdana, 14.25pt</value> <data name="OK_Button.TabIndex" type="System.Int32, mscorlib">
</data> <value>0</value>
<data name="&gt;&gt;Label1.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="$this.Text" xml:space="preserve">
<value>Fehlermeldung:</value>
</data>
<data name="OK_Button.Location" type="System.Drawing.Point, System.Drawing">
<value>355, 150</value>
</data>
<data name="&gt;&gt;$this.Name" xml:space="preserve">
<value>frmError</value>
</data>
<data name="txterror.Font" type="System.Drawing.Font, System.Drawing">
<value>Verdana, 9.75pt</value>
</data>
<data name="&gt;&gt;Timer1.Type" xml:space="preserve">
<value>System.Windows.Forms.Timer, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;Label1.ZOrder" xml:space="preserve">
<value>1</value>
</data>
<data name="txterror.Location" type="System.Drawing.Point, System.Drawing">
<value>19, 35</value>
</data>
<data name="&gt;&gt;$this.Type" xml:space="preserve">
<value>System.Windows.Forms.Form, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;OK_Button.ZOrder" xml:space="preserve">
<value>2</value>
</data>
<data name="$this.AutoScaleDimensions" type="System.Drawing.SizeF, System.Drawing">
<value>12, 23</value>
</data> </data>
<data name="OK_Button.Text" xml:space="preserve"> <data name="OK_Button.Text" xml:space="preserve">
<value>OK</value> <value>OK</value>
</data> </data>
<data name="&gt;&gt;txterror.ZOrder" xml:space="preserve"> <data name="&gt;&gt;OK_Button.Name" xml:space="preserve">
<value>0</value> <value>OK_Button</value>
</data>
<data name="&gt;&gt;txterror.Name" xml:space="preserve">
<value>txterror</value>
</data>
<data name="Label1.Size" type="System.Drawing.Size, System.Drawing">
<value>358, 23</value>
</data>
<data name="$this.StartPosition" type="System.Windows.Forms.FormStartPosition, System.Windows.Forms">
<value>CenterScreen</value>
</data>
<data name="Label1.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
</data> </data>
<data name="&gt;&gt;OK_Button.Type" xml:space="preserve"> <data name="&gt;&gt;OK_Button.Type" xml:space="preserve">
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
@@ -219,31 +147,103 @@
<data name="&gt;&gt;OK_Button.Parent" xml:space="preserve"> <data name="&gt;&gt;OK_Button.Parent" xml:space="preserve">
<value>$this</value> <value>$this</value>
</data> </data>
<data name="&gt;&gt;OK_Button.ZOrder" xml:space="preserve">
<value>2</value>
</data>
<data name="Label1.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
</data>
<data name="Label1.Location" type="System.Drawing.Point, System.Drawing">
<value>15, 9</value>
</data>
<data name="Label1.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>6, 0, 6, 0</value>
</data>
<data name="Label1.Size" type="System.Drawing.Size, System.Drawing">
<value>358, 23</value>
</data>
<data name="Label1.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
</data>
<data name="Label1.Text" xml:space="preserve"> <data name="Label1.Text" xml:space="preserve">
<value>Folgender Fehler wurde festgestellt:</value> <value>Folgender Fehler wurde festgestellt:</value>
</data> </data>
<data name="OK_Button.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms"> <data name="&gt;&gt;Label1.Name" xml:space="preserve">
<value>6, 5, 6, 5</value> <value>Label1</value>
</data> </data>
<data name="OK_Button.TabIndex" type="System.Int32, mscorlib"> <data name="&gt;&gt;Label1.Type" xml:space="preserve">
<value>0</value> <value>System.Windows.Forms.Label, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="OK_Button.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms"> <data name="&gt;&gt;Label1.Parent" xml:space="preserve">
<value>None</value> <value>$this</value>
</data>
<data name="&gt;&gt;Label1.ZOrder" xml:space="preserve">
<value>1</value>
</data>
<data name="txterror.Enabled" type="System.Boolean, mscorlib">
<value>False</value>
</data>
<data name="txterror.Font" type="System.Drawing.Font, System.Drawing">
<value>Verdana, 9.75pt</value>
</data>
<data name="txterror.Location" type="System.Drawing.Point, System.Drawing">
<value>19, 35</value>
</data> </data>
<data name="txterror.Multiline" type="System.Boolean, mscorlib"> <data name="txterror.Multiline" type="System.Boolean, mscorlib">
<value>True</value> <value>True</value>
</data> </data>
<data name="&gt;&gt;OK_Button.Name" xml:space="preserve">
<value>OK_Button</value>
</data>
<data name="txterror.Size" type="System.Drawing.Size, System.Drawing"> <data name="txterror.Size" type="System.Drawing.Size, System.Drawing">
<value>470, 107</value> <value>470, 107</value>
</data> </data>
<data name="txterror.TabIndex" type="System.Int32, mscorlib">
<value>1</value>
</data>
<data name="&gt;&gt;txterror.Name" xml:space="preserve">
<value>txterror</value>
</data>
<data name="&gt;&gt;txterror.Type" xml:space="preserve">
<value>System.Windows.Forms.TextBox, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;txterror.Parent" xml:space="preserve">
<value>$this</value>
</data>
<data name="&gt;&gt;txterror.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<metadata name="Timer1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="Timer1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value> <value>17, 17</value>
</metadata> </metadata>
<metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089"> <metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value> <value>True</value>
</metadata> </metadata>
<data name="$this.AutoScaleDimensions" type="System.Drawing.SizeF, System.Drawing">
<value>12, 23</value>
</data>
<data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
<value>495, 203</value>
</data>
<data name="$this.Font" type="System.Drawing.Font, System.Drawing">
<value>Verdana, 14.25pt</value>
</data>
<data name="$this.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>6, 5, 6, 5</value>
</data>
<data name="$this.StartPosition" type="System.Windows.Forms.FormStartPosition, System.Windows.Forms">
<value>CenterScreen</value>
</data>
<data name="$this.Text" xml:space="preserve">
<value>Fehlermeldung:</value>
</data>
<data name="&gt;&gt;Timer1.Name" xml:space="preserve">
<value>Timer1</value>
</data>
<data name="&gt;&gt;Timer1.Type" xml:space="preserve">
<value>System.Windows.Forms.Timer, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;$this.Name" xml:space="preserve">
<value>frmError</value>
</data>
<data name="&gt;&gt;$this.Type" xml:space="preserve">
<value>System.Windows.Forms.Form, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
</root> </root>

View File

@@ -1,15 +1,24 @@
Imports System.Windows.Forms Imports System.Windows.Forms
Public Class frmError Public Class frmError
Public ValidatorError As String = ""
Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK_Button.Click Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK_Button.Click
Me.Close() Me.Close()
End Sub End Sub
Private Sub frmError_Load(sender As Object, e As System.EventArgs) Handles Me.Load Private Sub frmError_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If ValidatorError <> String.Empty Or errormessage <> String.Empty Then
If ValidatorError <> String.Empty Then
Me.txterror.Text = ValidatorError
Else
Me.txterror.Text = errormessage Me.txterror.Text = errormessage
End If
Me.Label1.Focus() Me.Label1.Focus()
Me.Timer1.Start() Me.Timer1.Start()
Else
Me.Close()
End If
End Sub End Sub
Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick

View File

@@ -0,0 +1,465 @@
Imports DevExpress.XtraEditors
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Class frmExpression_Designer
Inherits DevExpress.XtraEditors.XtraForm
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<System.Diagnostics.DebuggerNonUserCode()>
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Wird vom Windows Form-Designer benötigt.
Private components As System.ComponentModel.IContainer
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Me.layoutControl1 = New DevExpress.XtraLayout.LayoutControl()
Me.btnClear = New DevExpress.XtraEditors.SimpleButton()
Me.btnCancel = New DevExpress.XtraEditors.SimpleButton()
Me.btnOK = New DevExpress.XtraEditors.SimpleButton()
Me.lblColumnCount = New System.Windows.Forms.Label()
Me.lblValidation = New System.Windows.Forms.Label()
Me.btnValidate = New DevExpress.XtraEditors.SimpleButton()
Me.panelOperators = New System.Windows.Forms.Panel()
Me.lstFunctions = New System.Windows.Forms.ListBox()
Me.lstColumns = New System.Windows.Forms.ListBox()
Me.txtExpression = New DevExpress.XtraEditors.MemoEdit()
Me.Root = New DevExpress.XtraLayout.LayoutControlGroup()
Me.layoutControlItem1 = New DevExpress.XtraLayout.LayoutControlItem()
Me.layoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem()
Me.layoutControlItem3 = New DevExpress.XtraLayout.LayoutControlItem()
Me.layoutControlItem4 = New DevExpress.XtraLayout.LayoutControlItem()
Me.layoutControlItem5 = New DevExpress.XtraLayout.LayoutControlItem()
Me.layoutControlItem6 = New DevExpress.XtraLayout.LayoutControlItem()
Me.layoutControlItem7 = New DevExpress.XtraLayout.LayoutControlItem()
Me.emptySpaceItem1 = New DevExpress.XtraLayout.EmptySpaceItem()
Me.layoutControlItem8 = New DevExpress.XtraLayout.LayoutControlItem()
Me.layoutControlItem9 = New DevExpress.XtraLayout.LayoutControlItem()
Me.layoutControlItem10 = New DevExpress.XtraLayout.LayoutControlItem()
Me.btnAdd = New DevExpress.XtraEditors.SimpleButton()
Me.btnSubtract = New DevExpress.XtraEditors.SimpleButton()
Me.btnMultiply = New DevExpress.XtraEditors.SimpleButton()
Me.btnDivide = New DevExpress.XtraEditors.SimpleButton()
Me.btnEquals = New DevExpress.XtraEditors.SimpleButton()
Me.btnNotEquals = New DevExpress.XtraEditors.SimpleButton()
Me.btnGreater = New DevExpress.XtraEditors.SimpleButton()
Me.btnLess = New DevExpress.XtraEditors.SimpleButton()
Me.btnAnd = New DevExpress.XtraEditors.SimpleButton()
Me.btnOr = New DevExpress.XtraEditors.SimpleButton()
Me.btnNot = New DevExpress.XtraEditors.SimpleButton()
Me.btnOpenBracket = New DevExpress.XtraEditors.SimpleButton()
Me.btnCloseBracket = New DevExpress.XtraEditors.SimpleButton()
CType(Me.layoutControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.layoutControl1.SuspendLayout()
CType(Me.txtExpression.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.Root, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.layoutControlItem1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.layoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.layoutControlItem3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.layoutControlItem4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.layoutControlItem5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.layoutControlItem6, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.layoutControlItem7, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.emptySpaceItem1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.layoutControlItem8, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.layoutControlItem9, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.layoutControlItem10, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'layoutControl1
'
Me.layoutControl1.Controls.Add(Me.btnClear)
Me.layoutControl1.Controls.Add(Me.btnCancel)
Me.layoutControl1.Controls.Add(Me.btnOK)
Me.layoutControl1.Controls.Add(Me.lblColumnCount)
Me.layoutControl1.Controls.Add(Me.lblValidation)
Me.layoutControl1.Controls.Add(Me.btnValidate)
Me.layoutControl1.Controls.Add(Me.panelOperators)
Me.layoutControl1.Controls.Add(Me.lstFunctions)
Me.layoutControl1.Controls.Add(Me.lstColumns)
Me.layoutControl1.Controls.Add(Me.txtExpression)
Me.layoutControl1.Dock = System.Windows.Forms.DockStyle.Fill
Me.layoutControl1.Location = New System.Drawing.Point(0, 0)
Me.layoutControl1.Name = "layoutControl1"
Me.layoutControl1.Root = Me.Root
Me.layoutControl1.Size = New System.Drawing.Size(900, 600)
Me.layoutControl1.TabIndex = 0
Me.layoutControl1.Text = "LayoutControl1"
'
'btnClear
'
Me.btnClear.Location = New System.Drawing.Point(809, 558)
Me.btnClear.Name = "btnClear"
Me.btnClear.Size = New System.Drawing.Size(79, 30)
Me.btnClear.StyleController = Me.layoutControl1
Me.btnClear.TabIndex = 13
Me.btnClear.Text = "Löschen"
'
'btnCancel
'
Me.btnCancel.DialogResult = System.Windows.Forms.DialogResult.Cancel
Me.btnCancel.Location = New System.Drawing.Point(724, 558)
Me.btnCancel.Name = "btnCancel"
Me.btnCancel.Size = New System.Drawing.Size(81, 30)
Me.btnCancel.StyleController = Me.layoutControl1
Me.btnCancel.TabIndex = 12
Me.btnCancel.Text = "Abbrechen"
'
'btnOK
'
Me.btnOK.DialogResult = System.Windows.Forms.DialogResult.OK
Me.btnOK.Location = New System.Drawing.Point(644, 558)
Me.btnOK.Name = "btnOK"
Me.btnOK.Size = New System.Drawing.Size(76, 30)
Me.btnOK.StyleController = Me.layoutControl1
Me.btnOK.TabIndex = 11
Me.btnOK.Text = "OK"
'
'lblColumnCount
'
Me.lblColumnCount.Location = New System.Drawing.Point(12, 472)
Me.lblColumnCount.Name = "lblColumnCount"
Me.lblColumnCount.Size = New System.Drawing.Size(876, 20)
Me.lblColumnCount.TabIndex = 10
Me.lblColumnCount.Text = "Referenzierte Spalten: 0"
'
'lblValidation
'
Me.lblValidation.Location = New System.Drawing.Point(116, 438)
Me.lblValidation.Name = "lblValidation"
Me.lblValidation.Size = New System.Drawing.Size(772, 30)
Me.lblValidation.TabIndex = 9
'
'btnValidate
'
Me.btnValidate.Location = New System.Drawing.Point(12, 438)
Me.btnValidate.Name = "btnValidate"
Me.btnValidate.Size = New System.Drawing.Size(100, 30)
Me.btnValidate.StyleController = Me.layoutControl1
Me.btnValidate.TabIndex = 8
Me.btnValidate.Text = "Validieren"
'
'panelOperators
'
Me.panelOperators.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.panelOperators.Location = New System.Drawing.Point(602, 161)
Me.panelOperators.Name = "panelOperators"
Me.panelOperators.Size = New System.Drawing.Size(286, 273)
Me.panelOperators.TabIndex = 7
'
'lstFunctions
'
Me.lstFunctions.FormattingEnabled = True
Me.lstFunctions.Location = New System.Drawing.Point(307, 161)
Me.lstFunctions.Name = "lstFunctions"
Me.lstFunctions.Size = New System.Drawing.Size(291, 273)
Me.lstFunctions.TabIndex = 6
'
'lstColumns
'
Me.lstColumns.FormattingEnabled = True
Me.lstColumns.Location = New System.Drawing.Point(12, 161)
Me.lstColumns.Name = "lstColumns"
Me.lstColumns.Size = New System.Drawing.Size(291, 273)
Me.lstColumns.TabIndex = 5
'
'txtExpression
'
Me.txtExpression.Location = New System.Drawing.Point(12, 28)
Me.txtExpression.Name = "txtExpression"
Me.txtExpression.Properties.ScrollBars = System.Windows.Forms.ScrollBars.Both
Me.txtExpression.Properties.WordWrap = False
Me.txtExpression.Size = New System.Drawing.Size(876, 113)
Me.txtExpression.StyleController = Me.layoutControl1
Me.txtExpression.TabIndex = 4
'
'Root
'
Me.Root.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
Me.Root.GroupBordersVisible = False
Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.layoutControlItem1, Me.layoutControlItem2, Me.layoutControlItem3, Me.layoutControlItem4, Me.layoutControlItem5, Me.layoutControlItem6, Me.layoutControlItem7, Me.emptySpaceItem1, Me.layoutControlItem8, Me.layoutControlItem9, Me.layoutControlItem10})
Me.Root.Name = "Root"
Me.Root.Size = New System.Drawing.Size(900, 600)
Me.Root.TextVisible = False
'
'layoutControlItem1
'
Me.layoutControlItem1.Control = Me.txtExpression
Me.layoutControlItem1.Location = New System.Drawing.Point(0, 0)
Me.layoutControlItem1.Name = "layoutControlItem1"
Me.layoutControlItem1.Size = New System.Drawing.Size(880, 133)
Me.layoutControlItem1.Text = "Expression:"
Me.layoutControlItem1.TextLocation = DevExpress.Utils.Locations.Top
Me.layoutControlItem1.TextSize = New System.Drawing.Size(61, 13)
'
'layoutControlItem2
'
Me.layoutControlItem2.Control = Me.lstColumns
Me.layoutControlItem2.Location = New System.Drawing.Point(0, 133)
Me.layoutControlItem2.Name = "layoutControlItem2"
Me.layoutControlItem2.Size = New System.Drawing.Size(295, 293)
Me.layoutControlItem2.Text = "Verfügbare Spalten:"
Me.layoutControlItem2.TextLocation = DevExpress.Utils.Locations.Top
Me.layoutControlItem2.TextSize = New System.Drawing.Size(61, 13)
'
'layoutControlItem3
'
Me.layoutControlItem3.Control = Me.lstFunctions
Me.layoutControlItem3.Location = New System.Drawing.Point(295, 133)
Me.layoutControlItem3.Name = "layoutControlItem3"
Me.layoutControlItem3.Size = New System.Drawing.Size(295, 293)
Me.layoutControlItem3.Text = "Funktionen:"
Me.layoutControlItem3.TextLocation = DevExpress.Utils.Locations.Top
Me.layoutControlItem3.TextSize = New System.Drawing.Size(61, 13)
'
'layoutControlItem4
'
Me.layoutControlItem4.Control = Me.panelOperators
Me.layoutControlItem4.Location = New System.Drawing.Point(590, 133)
Me.layoutControlItem4.Name = "layoutControlItem4"
Me.layoutControlItem4.Size = New System.Drawing.Size(290, 293)
Me.layoutControlItem4.Text = "Operatoren:"
Me.layoutControlItem4.TextLocation = DevExpress.Utils.Locations.Top
Me.layoutControlItem4.TextSize = New System.Drawing.Size(61, 13)
'
'layoutControlItem5
'
Me.layoutControlItem5.Control = Me.btnValidate
Me.layoutControlItem5.Location = New System.Drawing.Point(0, 426)
Me.layoutControlItem5.MaxSize = New System.Drawing.Size(104, 34)
Me.layoutControlItem5.MinSize = New System.Drawing.Size(104, 34)
Me.layoutControlItem5.Name = "layoutControlItem5"
Me.layoutControlItem5.Size = New System.Drawing.Size(104, 34)
Me.layoutControlItem5.SizeConstraintsType = DevExpress.XtraLayout.SizeConstraintsType.Custom
Me.layoutControlItem5.TextSize = New System.Drawing.Size(0, 0)
Me.layoutControlItem5.TextVisible = False
'
'layoutControlItem6
'
Me.layoutControlItem6.Control = Me.lblValidation
Me.layoutControlItem6.Location = New System.Drawing.Point(104, 426)
Me.layoutControlItem6.Name = "layoutControlItem6"
Me.layoutControlItem6.Size = New System.Drawing.Size(776, 34)
Me.layoutControlItem6.TextSize = New System.Drawing.Size(0, 0)
Me.layoutControlItem6.TextVisible = False
'
'layoutControlItem7
'
Me.layoutControlItem7.Control = Me.lblColumnCount
Me.layoutControlItem7.Location = New System.Drawing.Point(0, 460)
Me.layoutControlItem7.Name = "layoutControlItem7"
Me.layoutControlItem7.Size = New System.Drawing.Size(880, 24)
Me.layoutControlItem7.TextSize = New System.Drawing.Size(0, 0)
Me.layoutControlItem7.TextVisible = False
'
'emptySpaceItem1
'
Me.emptySpaceItem1.AllowHotTrack = False
Me.emptySpaceItem1.Location = New System.Drawing.Point(0, 484)
Me.emptySpaceItem1.Name = "emptySpaceItem1"
Me.emptySpaceItem1.Size = New System.Drawing.Size(632, 62)
Me.emptySpaceItem1.TextSize = New System.Drawing.Size(0, 0)
'
'layoutControlItem8
'
Me.layoutControlItem8.Control = Me.btnOK
Me.layoutControlItem8.Location = New System.Drawing.Point(632, 546)
Me.layoutControlItem8.MaxSize = New System.Drawing.Size(80, 34)
Me.layoutControlItem8.MinSize = New System.Drawing.Size(80, 34)
Me.layoutControlItem8.Name = "layoutControlItem8"
Me.layoutControlItem8.Size = New System.Drawing.Size(80, 34)
Me.layoutControlItem8.SizeConstraintsType = DevExpress.XtraLayout.SizeConstraintsType.Custom
Me.layoutControlItem8.TextSize = New System.Drawing.Size(0, 0)
Me.layoutControlItem8.TextVisible = False
'
'layoutControlItem9
'
Me.layoutControlItem9.Control = Me.btnCancel
Me.layoutControlItem9.Location = New System.Drawing.Point(712, 546)
Me.layoutControlItem9.MaxSize = New System.Drawing.Size(85, 34)
Me.layoutControlItem9.MinSize = New System.Drawing.Size(85, 34)
Me.layoutControlItem9.Name = "layoutControlItem9"
Me.layoutControlItem9.Size = New System.Drawing.Size(85, 34)
Me.layoutControlItem9.SizeConstraintsType = DevExpress.XtraLayout.SizeConstraintsType.Custom
Me.layoutControlItem9.TextSize = New System.Drawing.Size(0, 0)
Me.layoutControlItem9.TextVisible = False
'
'layoutControlItem10
'
Me.layoutControlItem10.Control = Me.btnClear
Me.layoutControlItem10.Location = New System.Drawing.Point(797, 546)
Me.layoutControlItem10.MaxSize = New System.Drawing.Size(83, 34)
Me.layoutControlItem10.MinSize = New System.Drawing.Size(83, 34)
Me.layoutControlItem10.Name = "layoutControlItem10"
Me.layoutControlItem10.Size = New System.Drawing.Size(83, 34)
Me.layoutControlItem10.SizeConstraintsType = DevExpress.XtraLayout.SizeConstraintsType.Custom
Me.layoutControlItem10.TextSize = New System.Drawing.Size(0, 0)
Me.layoutControlItem10.TextVisible = False
'
'btnAdd
'
Me.btnAdd.Name = "btnAdd"
Me.btnAdd.Size = New System.Drawing.Size(50, 30)
Me.btnAdd.TabIndex = 0
Me.btnAdd.Text = "+"
'
'btnSubtract
'
Me.btnSubtract.Name = "btnSubtract"
Me.btnSubtract.Size = New System.Drawing.Size(50, 30)
Me.btnSubtract.TabIndex = 1
Me.btnSubtract.Text = "-"
'
'btnMultiply
'
Me.btnMultiply.Name = "btnMultiply"
Me.btnMultiply.Size = New System.Drawing.Size(50, 30)
Me.btnMultiply.TabIndex = 2
Me.btnMultiply.Text = "*"
'
'btnDivide
'
Me.btnDivide.Name = "btnDivide"
Me.btnDivide.Size = New System.Drawing.Size(50, 30)
Me.btnDivide.TabIndex = 3
Me.btnDivide.Text = "/"
'
'btnEquals
'
Me.btnEquals.Name = "btnEquals"
Me.btnEquals.Size = New System.Drawing.Size(50, 30)
Me.btnEquals.TabIndex = 4
Me.btnEquals.Text = "="
'
'btnNotEquals
'
Me.btnNotEquals.Name = "btnNotEquals"
Me.btnNotEquals.Size = New System.Drawing.Size(50, 30)
Me.btnNotEquals.TabIndex = 5
Me.btnNotEquals.Text = "<>"
'
'btnGreater
'
Me.btnGreater.Name = "btnGreater"
Me.btnGreater.Size = New System.Drawing.Size(50, 30)
Me.btnGreater.TabIndex = 6
Me.btnGreater.Text = ">"
'
'btnLess
'
Me.btnLess.Name = "btnLess"
Me.btnLess.Size = New System.Drawing.Size(50, 30)
Me.btnLess.TabIndex = 7
Me.btnLess.Text = "<"
'
'btnAnd
'
Me.btnAnd.Name = "btnAnd"
Me.btnAnd.Size = New System.Drawing.Size(50, 30)
Me.btnAnd.TabIndex = 8
Me.btnAnd.Text = "AND"
'
'btnOr
'
Me.btnOr.Name = "btnOr"
Me.btnOr.Size = New System.Drawing.Size(50, 30)
Me.btnOr.TabIndex = 9
Me.btnOr.Text = "OR"
'
'btnNot
'
Me.btnNot.Name = "btnNot"
Me.btnNot.Size = New System.Drawing.Size(50, 30)
Me.btnNot.TabIndex = 10
Me.btnNot.Text = "NOT"
'
'btnOpenBracket
'
Me.btnOpenBracket.Name = "btnOpenBracket"
Me.btnOpenBracket.Size = New System.Drawing.Size(50, 30)
Me.btnOpenBracket.TabIndex = 11
Me.btnOpenBracket.Text = "("
'
'btnCloseBracket
'
Me.btnCloseBracket.Name = "btnCloseBracket"
Me.btnCloseBracket.Size = New System.Drawing.Size(50, 30)
Me.btnCloseBracket.TabIndex = 12
Me.btnCloseBracket.Text = ")"
'
'frmExpression_Designer
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(900, 600)
Me.Controls.Add(Me.layoutControl1)
Me.Name = "frmExpression_Designer"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
Me.Text = "Expression Designer"
CType(Me.layoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.layoutControl1.ResumeLayout(False)
CType(Me.txtExpression.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.Root, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.layoutControlItem1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.layoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.layoutControlItem3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.layoutControlItem4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.layoutControlItem5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.layoutControlItem6, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.layoutControlItem7, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.emptySpaceItem1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.layoutControlItem8, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.layoutControlItem9, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.layoutControlItem10, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
Friend WithEvents layoutControl1 As DevExpress.XtraLayout.LayoutControl
Friend WithEvents btnClear As DevExpress.XtraEditors.SimpleButton
Friend WithEvents btnCancel As DevExpress.XtraEditors.SimpleButton
Friend WithEvents btnOK As DevExpress.XtraEditors.SimpleButton
Friend WithEvents lblColumnCount As Label
Friend WithEvents lblValidation As Label
Friend WithEvents btnValidate As DevExpress.XtraEditors.SimpleButton
Friend WithEvents panelOperators As Panel
Friend WithEvents lstFunctions As ListBox
Friend WithEvents lstColumns As ListBox
Friend WithEvents txtExpression As DevExpress.XtraEditors.MemoEdit
Friend WithEvents Root As DevExpress.XtraLayout.LayoutControlGroup
Friend WithEvents layoutControlItem1 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents layoutControlItem2 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents layoutControlItem3 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents layoutControlItem4 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents layoutControlItem5 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents layoutControlItem6 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents layoutControlItem7 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents emptySpaceItem1 As DevExpress.XtraLayout.EmptySpaceItem
Friend WithEvents layoutControlItem8 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents layoutControlItem9 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents layoutControlItem10 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents btnAdd As DevExpress.XtraEditors.SimpleButton
Friend WithEvents btnSubtract As DevExpress.XtraEditors.SimpleButton
Friend WithEvents btnMultiply As DevExpress.XtraEditors.SimpleButton
Friend WithEvents btnDivide As DevExpress.XtraEditors.SimpleButton
Friend WithEvents btnEquals As DevExpress.XtraEditors.SimpleButton
Friend WithEvents btnNotEquals As DevExpress.XtraEditors.SimpleButton
Friend WithEvents btnGreater As DevExpress.XtraEditors.SimpleButton
Friend WithEvents btnLess As DevExpress.XtraEditors.SimpleButton
Friend WithEvents btnAnd As DevExpress.XtraEditors.SimpleButton
Friend WithEvents btnOr As DevExpress.XtraEditors.SimpleButton
Friend WithEvents btnNot As DevExpress.XtraEditors.SimpleButton
Friend WithEvents btnOpenBracket As DevExpress.XtraEditors.SimpleButton
Friend WithEvents btnCloseBracket As DevExpress.XtraEditors.SimpleButton
End Class

View File

@@ -117,10 +117,4 @@
<resheader name="writer"> <resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader> </resheader>
<metadata name="RadialMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<metadata name="BarManager1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>140, 17</value>
</metadata>
</root> </root>

View File

@@ -0,0 +1,284 @@
Imports System.Text.RegularExpressions
Imports DevExpress.XtraEditors
Public Class frmExpression_Designer
Private _availableColumns As DataTable
Private _currentExpression As String = ""
Public Property Expression As String
Get
Return _currentExpression
End Get
Set(value As String)
_currentExpression = value
txtExpression.Text = value
End Set
End Property
Public Sub New(pAvailableColumns As DataTable, pCurrentExpression As String)
InitializeComponent()
_availableColumns = pAvailableColumns
_currentExpression = pCurrentExpression
End Sub
Private Sub ConfigureOperatorButtons()
Dim yPos As Integer = 10
' Arithmetische Operatoren
AddOperatorButton(btnAdd, "+", 10, yPos, "Addition")
AddOperatorButton(btnSubtract, "-", 70, yPos, "Subtraktion")
AddOperatorButton(btnMultiply, "*", 130, yPos, "Multiplikation")
AddOperatorButton(btnDivide, "/", 190, yPos, "Division")
yPos += 40
' Vergleichsoperatoren
AddOperatorButton(btnEquals, "=", 10, yPos, "Gleich")
AddOperatorButton(btnNotEquals, "<>", 70, yPos, "Ungleich")
AddOperatorButton(btnGreater, ">", 130, yPos, "Größer")
AddOperatorButton(btnLess, "<", 190, yPos, "Kleiner")
yPos += 40
' Logische Operatoren
AddOperatorButton(btnAnd, "AND", 10, yPos, "Und")
AddOperatorButton(btnOr, "OR", 70, yPos, "Oder")
AddOperatorButton(btnNot, "NOT", 130, yPos, "Nicht")
yPos += 40
' Klammern
AddOperatorButton(btnOpenBracket, "(", 10, yPos, "Öffnende Klammer")
AddOperatorButton(btnCloseBracket, ")", 70, yPos, "Schließende Klammer")
End Sub
Private Sub AddOperatorButton(btn As SimpleButton, text As String, x As Integer, y As Integer, tooltip As String)
btn.Text = text
btn.Location = New Point(x, y)
btn.Size = New Size(50, 30)
btn.ToolTip = tooltip
Me.panelOperators.Controls.Add(btn)
End Sub
Private Sub frmExpressionDesigner_Load(sender As Object, e As EventArgs) Handles MyBase.Load
' ZUERST Operatoren-Buttons erstellen
ConfigureOperatorButtons()
' Spalten laden
LoadAvailableColumns()
' Funktionen laden
LoadFunctions()
' Operatoren laden
LoadOperators()
' Aktuelle Expression anzeigen
txtExpression.Text = _currentExpression
' Syntax-Highlighting aktivieren (optional)
UpdateSyntaxHighlighting()
' Event-Handler für Text-Änderungen hinzufügen
AddHandler txtExpression.EditValueChanged, AddressOf txtExpression_EditValueChanged
End Sub
Private Sub txtExpression_EditValueChanged(sender As Object, e As EventArgs)
' Validierungsmeldung zurücksetzen
lblValidation.Text = String.Empty
lblValidation.ForeColor = Color.Black
' Syntax-Highlighting aktualisieren
UpdateSyntaxHighlighting()
' Aktuellen Wert speichern
_currentExpression = txtExpression.Text
End Sub
Private Sub LoadAvailableColumns()
lstColumns.Items.Clear()
For Each row As DataRow In _availableColumns.Rows
Dim columnName As String = row.Item("SPALTENNAME").ToString()
Dim columnType As String = row.Item("TYPE_COLUMN").ToString()
Dim displayText As String = $"{columnName} ({columnType})"
lstColumns.Items.Add(New ListBoxItem With {
.DisplayText = displayText,
.ColumnName = columnName,
.DataType = columnType
})
Next
End Sub
Private Sub LoadFunctions()
lstFunctions.Items.Clear()
' Mathematische Funktionen
lstFunctions.Items.Add(New FunctionItem("IIF", "IIF([Bedingung], Wahr, Falsch)", "Bedingte Verzweigung"))
lstFunctions.Items.Add(New FunctionItem("IsNull", "IsNull([Spalte], Ersatzwert)", "Null-Behandlung"))
lstFunctions.Items.Add(New FunctionItem("Convert", "Convert([Spalte], 'System.Double')", "Typkonvertierung"))
' String-Funktionen
lstFunctions.Items.Add(New FunctionItem("Len", "Len([Text])", "Länge eines Textes"))
lstFunctions.Items.Add(New FunctionItem("Trim", "Trim([Text])", "Leerzeichen entfernen"))
lstFunctions.Items.Add(New FunctionItem("Substring", "Substring([Text], Start, Länge)", "Teilstring extrahieren"))
End Sub
Private Sub LoadOperators()
' Arithmetische Operatoren
btnAdd.Tag = " + "
btnSubtract.Tag = " - "
btnMultiply.Tag = " * "
btnDivide.Tag = " / "
' Vergleichsoperatoren
btnEquals.Tag = " = "
btnNotEquals.Tag = " <> "
btnGreater.Tag = " > "
btnLess.Tag = " < "
' Logische Operatoren
btnAnd.Tag = " AND "
btnOr.Tag = " OR "
btnNot.Tag = " NOT "
' Klammern
btnOpenBracket.Tag = "("
btnCloseBracket.Tag = ")"
End Sub
Private Sub lstColumns_DoubleClick(sender As Object, e As EventArgs) Handles lstColumns.DoubleClick
If lstColumns.SelectedItem IsNot Nothing Then
Dim item As ListBoxItem = CType(lstColumns.SelectedItem, ListBoxItem)
InsertText($"[{item.ColumnName}]")
End If
End Sub
Private Sub lstFunctions_DoubleClick(sender As Object, e As EventArgs) Handles lstFunctions.DoubleClick
If lstFunctions.SelectedItem IsNot Nothing Then
Dim item As FunctionItem = CType(lstFunctions.SelectedItem, FunctionItem)
InsertText(item.Template)
End If
End Sub
Private Sub Operator_Click(sender As Object, e As EventArgs) Handles btnAdd.Click, btnSubtract.Click, btnMultiply.Click, btnDivide.Click,
btnEquals.Click, btnNotEquals.Click, btnGreater.Click, btnLess.Click,
btnAnd.Click, btnOr.Click, btnNot.Click,
btnOpenBracket.Click, btnCloseBracket.Click
Dim btn As SimpleButton = CType(sender, SimpleButton)
InsertText(btn.Tag.ToString())
End Sub
Private Sub InsertText(text As String)
Dim selectionStart As Integer = txtExpression.SelectionStart
txtExpression.Text = txtExpression.Text.Insert(selectionStart, text)
txtExpression.SelectionStart = selectionStart + text.Length
txtExpression.Focus()
_currentExpression = txtExpression.Text
' UpdateSyntaxHighlighting() wird jetzt im Event-Handler aufgerufen
End Sub
Private Sub btnValidate_Click(sender As Object, e As EventArgs) Handles btnValidate.Click
ValidateExpression()
End Sub
Private Sub ValidateExpression()
Try
' Testdatatable erstellen
Dim testTable As New DataTable()
' Spalten hinzufügen
For Each row As DataRow In _availableColumns.Rows
Dim colName As String = row.Item("SPALTENNAME").ToString()
Dim colType As String = row.Item("TYPE_COLUMN").ToString()
Dim dataType As Type = GetType(String)
Select Case colType
Case "INTEGER"
dataType = GetType(Integer)
Case "DOUBLE", "CURRENCY"
dataType = GetType(Double)
Case "BOOLEAN"
dataType = GetType(Boolean)
End Select
testTable.Columns.Add(colName, dataType)
Next
' Test-Spalte mit Expression erstellen
Dim testColumn As New DataColumn("TEST_EXPRESSION") With {
.Expression = txtExpression.Text
}
testTable.Columns.Add(testColumn)
' Erfolg!
lblValidation.Text = "✓ Expression ist gültig!"
lblValidation.ForeColor = Color.Green
Catch ex As Exception
lblValidation.Text = $"⚠️ Fehler: {ex.Message}"
lblValidation.ForeColor = Color.Red
End Try
End Sub
Private Sub UpdateSyntaxHighlighting()
' Optional: Einfaches Syntax-Highlighting
' Spalten-Referenzen markieren
Dim pattern As String = "\[([^\]]+)\]"
Dim matches = Regex.Matches(txtExpression.Text, pattern)
' Anzahl der referenzierten Spalten anzeigen
lblColumnCount.Text = $"Referenzierte Spalten: {matches.Count}"
End Sub
Private Sub btnOK_Click(sender As Object, e As EventArgs) Handles btnOK.Click
' Finale Validierung
ValidateExpression()
If lblValidation.ForeColor = Color.Green Then
_currentExpression = txtExpression.Text
Me.DialogResult = DialogResult.OK
Me.Close()
Else
MessageBox.Show("Bitte korrigieren Sie die Expression zuerst!", "Validierung fehlgeschlagen", MessageBoxButtons.OK, MessageBoxIcon.Warning)
End If
End Sub
Private Sub btnCancel_Click(sender As Object, e As EventArgs) Handles btnCancel.Click
Me.DialogResult = DialogResult.Cancel
Me.Close()
End Sub
Private Sub btnClear_Click(sender As Object, e As EventArgs) Handles btnClear.Click
txtExpression.EditValue = String.Empty
_currentExpression = ""
End Sub
' Hilfeklassen
Private Class ListBoxItem
Public Property DisplayText As String
Public Property ColumnName As String
Public Property DataType As String
Public Overrides Function ToString() As String
Return DisplayText
End Function
End Class
Private Class FunctionItem
Public Property Name As String
Public Property Template As String
Public Property Description As String
Public Sub New(name As String, template As String, description As String)
Me.Name = name
Me.Template = template
Me.Description = description
End Sub
Public Overrides Function ToString() As String
Return $"{Name} - {Description}"
End Function
End Class
End Class

View File

@@ -25,6 +25,8 @@ Partial Class frmFormDesigner
Me.components = New System.ComponentModel.Container() Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmFormDesigner)) Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmFormDesigner))
Me.SplitContainerDesigner = New System.Windows.Forms.SplitContainer() Me.SplitContainerDesigner = New System.Windows.Forms.SplitContainer()
Me.TBPM_CONTROL_TABLEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.DD_DMSLiteDataSet = New taskFLOW.DD_DMSLiteDataSet()
Me.pnldesigner = New DigitalData.Controls.SnapPanel.ClassSnapPanel() Me.pnldesigner = New DigitalData.Controls.SnapPanel.ClassSnapPanel()
Me.Panel1 = New System.Windows.Forms.Panel() Me.Panel1 = New System.Windows.Forms.Panel()
Me.pgControlsNew = New DevExpress.XtraVerticalGrid.PropertyGridControl() Me.pgControlsNew = New DevExpress.XtraVerticalGrid.PropertyGridControl()
@@ -49,45 +51,43 @@ Partial Class frmFormDesigner
Me.bbtniheight_plus = New DevExpress.XtraBars.BarButtonItem() Me.bbtniheight_plus = New DevExpress.XtraBars.BarButtonItem()
Me.bbtniheight_min = New DevExpress.XtraBars.BarButtonItem() Me.bbtniheight_min = New DevExpress.XtraBars.BarButtonItem()
Me.tslblAenderungen = New DevExpress.XtraBars.BarStaticItem() Me.tslblAenderungen = New DevExpress.XtraBars.BarStaticItem()
Me.bstitmProfilID = New DevExpress.XtraBars.BarStaticItem() Me.BarStaticItem2 = New DevExpress.XtraBars.BarStaticItem()
Me.bsitmProfilID = New DevExpress.XtraBars.BarStaticItem()
Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage() Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonGroupControlFunctions = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.RibbonGroupControlFunctions = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonGroupControls = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.RibbonGroupControls = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibPGCtrlWidth = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.RibPGCtrlWidth = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibPGCtrlHeightreal = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.RibPGCtrlheight = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar() Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
Me.TBPM_PROFILE_CONTROLSBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_PROFILE_CONTROLSBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet()
Me.TBDD_CONNECTIONBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBDD_CONNECTIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components) Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
Me.GridControlContextMenu = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.GridControlContextMenu = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.MenuItemAddColumn = New System.Windows.Forms.ToolStripMenuItem() Me.MenuItemAddColumn = New System.Windows.Forms.ToolStripMenuItem()
Me.TBPM_PROFILE_CONTROLSTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_CONTROLSTableAdapter() Me.TBPM_PROFILE_CONTROLSTableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_CONTROLSTableAdapter()
Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager() Me.TableAdapterManager = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
Me.TBDD_CONNECTIONTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter() Me.TBDD_CONNECTIONTableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter()
Me.TBWH_CHECK_PROFILE_CONTROLSBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBWH_CHECK_PROFILE_CONTROLSBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBWH_CHECK_PROFILE_CONTROLSTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBWH_CHECK_PROFILE_CONTROLSTableAdapter() Me.TBWH_CHECK_PROFILE_CONTROLSTableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBWH_CHECK_PROFILE_CONTROLSTableAdapter()
Me.TBPM_CONTROL_TABLEBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_CONTROL_TABLETableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter()
Me.TBPM_CONTROL_TABLETableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter()
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage() Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RPGControlFunction = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.RPGControlFunction = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPage3 = New DevExpress.XtraBars.Ribbon.RibbonPage() Me.RibbonPage3 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroup4 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.RibbonPageGroup4 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibPGCtrlheight = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
CType(Me.SplitContainerDesigner, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.SplitContainerDesigner, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SplitContainerDesigner.Panel1.SuspendLayout() Me.SplitContainerDesigner.Panel1.SuspendLayout()
Me.SplitContainerDesigner.Panel2.SuspendLayout() Me.SplitContainerDesigner.Panel2.SuspendLayout()
Me.SplitContainerDesigner.SuspendLayout() Me.SplitContainerDesigner.SuspendLayout()
CType(Me.TBPM_CONTROL_TABLEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
Me.Panel1.SuspendLayout() Me.Panel1.SuspendLayout()
CType(Me.pgControlsNew, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.pgControlsNew, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBPM_PROFILE_CONTROLSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBPM_PROFILE_CONTROLSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
Me.GridControlContextMenu.SuspendLayout() Me.GridControlContextMenu.SuspendLayout()
CType(Me.TBWH_CHECK_PROFILE_CONTROLSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBWH_CHECK_PROFILE_CONTROLSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBPM_CONTROL_TABLEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout() Me.SuspendLayout()
' '
'SplitContainerDesigner 'SplitContainerDesigner
@@ -97,12 +97,23 @@ Partial Class frmFormDesigner
' '
'SplitContainerDesigner.Panel1 'SplitContainerDesigner.Panel1
' '
resources.ApplyResources(Me.SplitContainerDesigner.Panel1, "SplitContainerDesigner.Panel1")
Me.SplitContainerDesigner.Panel1.Controls.Add(Me.pnldesigner) Me.SplitContainerDesigner.Panel1.Controls.Add(Me.pnldesigner)
' '
'SplitContainerDesigner.Panel2 'SplitContainerDesigner.Panel2
' '
Me.SplitContainerDesigner.Panel2.Controls.Add(Me.Panel1) Me.SplitContainerDesigner.Panel2.Controls.Add(Me.Panel1)
' '
'TBPM_CONTROL_TABLEBindingSource
'
Me.TBPM_CONTROL_TABLEBindingSource.DataMember = "TBPM_CONTROL_TABLE"
Me.TBPM_CONTROL_TABLEBindingSource.DataSource = Me.DD_DMSLiteDataSet
'
'DD_DMSLiteDataSet
'
Me.DD_DMSLiteDataSet.DataSetName = "DD_DMSLiteDataSet"
Me.DD_DMSLiteDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
'
'pnldesigner 'pnldesigner
' '
resources.ApplyResources(Me.pnldesigner, "pnldesigner") resources.ApplyResources(Me.pnldesigner, "pnldesigner")
@@ -127,9 +138,9 @@ Partial Class frmFormDesigner
'RibbonControl1 'RibbonControl1
' '
Me.RibbonControl1.ExpandCollapseItem.Id = 0 Me.RibbonControl1.ExpandCollapseItem.Id = 0
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bbtnItemFinishSQL, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarStaticItem1, Me.BarButtonItem4, Me.BarButtonItem5, Me.bbtnitLabel, Me.bbtnitTextBox, Me.bbtnitLU, Me.bbtnitTable, Me.bbtnitDatePicker, Me.bbtnitCheckBox, Me.bbtnitButton, Me.bbtnitLine, Me.bbtniwidth_plus, Me.bbtniwidth_min, Me.bbtniheight_plus, Me.bbtniheight_min, Me.tslblAenderungen, Me.bstitmProfilID}) Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bbtnItemFinishSQL, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarStaticItem1, Me.BarButtonItem4, Me.BarButtonItem5, Me.bbtnitLabel, Me.bbtnitTextBox, Me.bbtnitLU, Me.bbtnitTable, Me.bbtnitDatePicker, Me.bbtnitCheckBox, Me.bbtnitButton, Me.bbtnitLine, Me.bbtniwidth_plus, Me.bbtniwidth_min, Me.bbtniheight_plus, Me.bbtniheight_min, Me.tslblAenderungen, Me.BarStaticItem2, Me.bsitmProfilID})
resources.ApplyResources(Me.RibbonControl1, "RibbonControl1") resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
Me.RibbonControl1.MaxItemId = 22 Me.RibbonControl1.MaxItemId = 23
Me.RibbonControl1.Name = "RibbonControl1" Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1}) Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False] Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
@@ -197,56 +208,56 @@ Partial Class frmFormDesigner
' '
resources.ApplyResources(Me.bbtnitLabel, "bbtnitLabel") resources.ApplyResources(Me.bbtnitLabel, "bbtnitLabel")
Me.bbtnitLabel.Id = 8 Me.bbtnitLabel.Id = 8
Me.bbtnitLabel.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.color Me.bbtnitLabel.ImageOptions.SvgImage = Global.taskFLOW.My.Resources.Resources.color
Me.bbtnitLabel.Name = "bbtnitLabel" Me.bbtnitLabel.Name = "bbtnitLabel"
' '
'bbtnitTextBox 'bbtnitTextBox
' '
resources.ApplyResources(Me.bbtnitTextBox, "bbtnitTextBox") resources.ApplyResources(Me.bbtnitTextBox, "bbtnitTextBox")
Me.bbtnitTextBox.Id = 9 Me.bbtnitTextBox.Id = 9
Me.bbtnitTextBox.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.textthatcontains Me.bbtnitTextBox.ImageOptions.SvgImage = Global.taskFLOW.My.Resources.Resources.textthatcontains
Me.bbtnitTextBox.Name = "bbtnitTextBox" Me.bbtnitTextBox.Name = "bbtnitTextBox"
' '
'bbtnitLU 'bbtnitLU
' '
resources.ApplyResources(Me.bbtnitLU, "bbtnitLU") resources.ApplyResources(Me.bbtnitLU, "bbtnitLU")
Me.bbtnitLU.Id = 10 Me.bbtnitLU.Id = 10
Me.bbtnitLU.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.insertcombobox Me.bbtnitLU.ImageOptions.SvgImage = Global.taskFLOW.My.Resources.Resources.insertcombobox
Me.bbtnitLU.Name = "bbtnitLU" Me.bbtnitLU.Name = "bbtnitLU"
' '
'bbtnitTable 'bbtnitTable
' '
resources.ApplyResources(Me.bbtnitTable, "bbtnitTable") resources.ApplyResources(Me.bbtnitTable, "bbtnitTable")
Me.bbtnitTable.Id = 11 Me.bbtnitTable.Id = 11
Me.bbtnitTable.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.actions_table Me.bbtnitTable.ImageOptions.SvgImage = Global.taskFLOW.My.Resources.Resources.actions_table
Me.bbtnitTable.Name = "bbtnitTable" Me.bbtnitTable.Name = "bbtnitTable"
' '
'bbtnitDatePicker 'bbtnitDatePicker
' '
resources.ApplyResources(Me.bbtnitDatePicker, "bbtnitDatePicker") resources.ApplyResources(Me.bbtnitDatePicker, "bbtnitDatePicker")
Me.bbtnitDatePicker.Id = 12 Me.bbtnitDatePicker.Id = 12
Me.bbtnitDatePicker.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.adateoccuring Me.bbtnitDatePicker.ImageOptions.SvgImage = Global.taskFLOW.My.Resources.Resources.adateoccuring
Me.bbtnitDatePicker.Name = "bbtnitDatePicker" Me.bbtnitDatePicker.Name = "bbtnitDatePicker"
' '
'bbtnitCheckBox 'bbtnitCheckBox
' '
resources.ApplyResources(Me.bbtnitCheckBox, "bbtnitCheckBox") resources.ApplyResources(Me.bbtnitCheckBox, "bbtnitCheckBox")
Me.bbtnitCheckBox.Id = 13 Me.bbtnitCheckBox.Id = 13
Me.bbtnitCheckBox.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.itemtypechecked Me.bbtnitCheckBox.ImageOptions.SvgImage = Global.taskFLOW.My.Resources.Resources.itemtypechecked
Me.bbtnitCheckBox.Name = "bbtnitCheckBox" Me.bbtnitCheckBox.Name = "bbtnitCheckBox"
' '
'bbtnitButton 'bbtnitButton
' '
resources.ApplyResources(Me.bbtnitButton, "bbtnitButton") resources.ApplyResources(Me.bbtnitButton, "bbtnitButton")
Me.bbtnitButton.Id = 14 Me.bbtnitButton.Id = 14
Me.bbtnitButton.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.groupby Me.bbtnitButton.ImageOptions.SvgImage = Global.taskFLOW.My.Resources.Resources.groupby
Me.bbtnitButton.Name = "bbtnitButton" Me.bbtnitButton.Name = "bbtnitButton"
' '
'bbtnitLine 'bbtnitLine
' '
resources.ApplyResources(Me.bbtnitLine, "bbtnitLine") resources.ApplyResources(Me.bbtnitLine, "bbtnitLine")
Me.bbtnitLine.Id = 15 Me.bbtnitLine.Id = 15
Me.bbtnitLine.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.pencolor Me.bbtnitLine.ImageOptions.SvgImage = Global.taskFLOW.My.Resources.Resources.pencolor
Me.bbtnitLine.Name = "bbtnitLine" Me.bbtnitLine.Name = "bbtnitLine"
' '
'bbtniwidth_plus 'bbtniwidth_plus
@@ -281,19 +292,27 @@ Partial Class frmFormDesigner
' '
resources.ApplyResources(Me.tslblAenderungen, "tslblAenderungen") resources.ApplyResources(Me.tslblAenderungen, "tslblAenderungen")
Me.tslblAenderungen.Id = 20 Me.tslblAenderungen.Id = 20
Me.tslblAenderungen.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.save1 Me.tslblAenderungen.ImageOptions.SvgImage = Global.taskFLOW.My.Resources.Resources.save1
Me.tslblAenderungen.Name = "tslblAenderungen" Me.tslblAenderungen.Name = "tslblAenderungen"
Me.tslblAenderungen.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph Me.tslblAenderungen.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
' '
'bstitmProfilID 'BarStaticItem2
' '
resources.ApplyResources(Me.bstitmProfilID, "bstitmProfilID") resources.ApplyResources(Me.BarStaticItem2, "BarStaticItem2")
Me.bstitmProfilID.Id = 21 Me.BarStaticItem2.Id = 21
Me.bstitmProfilID.Name = "bstitmProfilID" Me.BarStaticItem2.Name = "BarStaticItem2"
'
'bsitmProfilID
'
resources.ApplyResources(Me.bsitmProfilID, "bsitmProfilID")
Me.bsitmProfilID.Id = 22
Me.bsitmProfilID.ItemAppearance.Normal.Font = CType(resources.GetObject("bsitmProfilID.ItemAppearance.Normal.Font"), System.Drawing.Font)
Me.bsitmProfilID.ItemAppearance.Normal.Options.UseFont = True
Me.bsitmProfilID.Name = "bsitmProfilID"
' '
'RibbonPage1 'RibbonPage1
' '
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonGroupControlFunctions, Me.RibbonGroupControls, Me.RibPGCtrlWidth, Me.RibPGCtrlHeightreal}) Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonGroupControlFunctions, Me.RibbonGroupControls, Me.RibPGCtrlWidth, Me.RibPGCtrlheight})
Me.RibbonPage1.Name = "RibbonPage1" Me.RibbonPage1.Name = "RibbonPage1"
resources.ApplyResources(Me.RibbonPage1, "RibbonPage1") resources.ApplyResources(Me.RibbonPage1, "RibbonPage1")
' '
@@ -326,23 +345,21 @@ Partial Class frmFormDesigner
' '
'RibPGCtrlWidth 'RibPGCtrlWidth
' '
Me.RibPGCtrlWidth.AllowTextClipping = False
Me.RibPGCtrlWidth.ItemLinks.Add(Me.bbtniwidth_plus) Me.RibPGCtrlWidth.ItemLinks.Add(Me.bbtniwidth_plus)
Me.RibPGCtrlWidth.ItemLinks.Add(Me.bbtniwidth_min) Me.RibPGCtrlWidth.ItemLinks.Add(Me.bbtniwidth_min)
Me.RibPGCtrlWidth.Name = "RibPGCtrlWidth" Me.RibPGCtrlWidth.Name = "RibPGCtrlWidth"
resources.ApplyResources(Me.RibPGCtrlWidth, "RibPGCtrlWidth") resources.ApplyResources(Me.RibPGCtrlWidth, "RibPGCtrlWidth")
' '
'RibPGCtrlHeightreal 'RibPGCtrlheight
' '
Me.RibPGCtrlHeightreal.AllowTextClipping = False Me.RibPGCtrlheight.ItemLinks.Add(Me.bbtniheight_plus)
Me.RibPGCtrlHeightreal.ItemLinks.Add(Me.bbtniheight_plus) Me.RibPGCtrlheight.ItemLinks.Add(Me.bbtniheight_min)
Me.RibPGCtrlHeightreal.ItemLinks.Add(Me.bbtniheight_min) Me.RibPGCtrlheight.Name = "RibPGCtrlheight"
Me.RibPGCtrlHeightreal.Name = "RibPGCtrlHeightreal" resources.ApplyResources(Me.RibPGCtrlheight, "RibPGCtrlheight")
resources.ApplyResources(Me.RibPGCtrlHeightreal, "RibPGCtrlHeightreal")
' '
'RibbonStatusBar1 'RibbonStatusBar1
' '
Me.RibbonStatusBar1.ItemLinks.Add(Me.bstitmProfilID) Me.RibbonStatusBar1.ItemLinks.Add(Me.bsitmProfilID)
Me.RibbonStatusBar1.ItemLinks.Add(Me.tslblAenderungen) Me.RibbonStatusBar1.ItemLinks.Add(Me.tslblAenderungen)
resources.ApplyResources(Me.RibbonStatusBar1, "RibbonStatusBar1") resources.ApplyResources(Me.RibbonStatusBar1, "RibbonStatusBar1")
Me.RibbonStatusBar1.Name = "RibbonStatusBar1" Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
@@ -353,11 +370,6 @@ Partial Class frmFormDesigner
Me.TBPM_PROFILE_CONTROLSBindingSource.DataMember = "TBPM_PROFILE_CONTROLS" Me.TBPM_PROFILE_CONTROLSBindingSource.DataMember = "TBPM_PROFILE_CONTROLS"
Me.TBPM_PROFILE_CONTROLSBindingSource.DataSource = Me.DD_DMSLiteDataSet Me.TBPM_PROFILE_CONTROLSBindingSource.DataSource = Me.DD_DMSLiteDataSet
' '
'DD_DMSLiteDataSet
'
Me.DD_DMSLiteDataSet.DataSetName = "DD_DMSLiteDataSet"
Me.DD_DMSLiteDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
'
'TBDD_CONNECTIONBindingSource 'TBDD_CONNECTIONBindingSource
' '
Me.TBDD_CONNECTIONBindingSource.DataMember = "TBDD_CONNECTION" Me.TBDD_CONNECTIONBindingSource.DataMember = "TBDD_CONNECTION"
@@ -393,7 +405,7 @@ Partial Class frmFormDesigner
Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete Me.TableAdapterManager.UpdateOrder = taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
' '
'TBDD_CONNECTIONTableAdapter 'TBDD_CONNECTIONTableAdapter
' '
@@ -408,11 +420,6 @@ Partial Class frmFormDesigner
' '
Me.TBWH_CHECK_PROFILE_CONTROLSTableAdapter.ClearBeforeFill = True Me.TBWH_CHECK_PROFILE_CONTROLSTableAdapter.ClearBeforeFill = True
' '
'TBPM_CONTROL_TABLEBindingSource
'
Me.TBPM_CONTROL_TABLEBindingSource.DataMember = "TBPM_CONTROL_TABLE"
Me.TBPM_CONTROL_TABLEBindingSource.DataSource = Me.DD_DMSLiteDataSet
'
'TBPM_CONTROL_TABLETableAdapter 'TBPM_CONTROL_TABLETableAdapter
' '
Me.TBPM_CONTROL_TABLETableAdapter.ClearBeforeFill = True Me.TBPM_CONTROL_TABLETableAdapter.ClearBeforeFill = True
@@ -437,14 +444,6 @@ Partial Class frmFormDesigner
Me.RibbonPageGroup4.Name = "RibbonPageGroup4" Me.RibbonPageGroup4.Name = "RibbonPageGroup4"
resources.ApplyResources(Me.RibbonPageGroup4, "RibbonPageGroup4") resources.ApplyResources(Me.RibbonPageGroup4, "RibbonPageGroup4")
' '
'RibPGCtrlheight
'
Me.RibPGCtrlheight.AllowTextClipping = False
Me.RibPGCtrlheight.ItemLinks.Add(Me.bbtniheight_plus)
Me.RibPGCtrlheight.ItemLinks.Add(Me.bbtniheight_min)
Me.RibPGCtrlheight.Name = "RibPGCtrlheight"
resources.ApplyResources(Me.RibPGCtrlheight, "RibPGCtrlheight")
'
'frmFormDesigner 'frmFormDesigner
' '
Me.Appearance.Options.UseFont = True Me.Appearance.Options.UseFont = True
@@ -454,7 +453,7 @@ Partial Class frmFormDesigner
Me.Controls.Add(Me.RibbonStatusBar1) Me.Controls.Add(Me.RibbonStatusBar1)
Me.Controls.Add(Me.RibbonControl1) Me.Controls.Add(Me.RibbonControl1)
Me.IconOptions.Icon = CType(resources.GetObject("frmFormDesigner.IconOptions.Icon"), System.Drawing.Icon) Me.IconOptions.Icon = CType(resources.GetObject("frmFormDesigner.IconOptions.Icon"), System.Drawing.Icon)
Me.IconOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.chartdesigner1 Me.IconOptions.SvgImage = Global.taskFLOW.My.Resources.Resources.chartdesigner1
Me.KeyPreview = True Me.KeyPreview = True
Me.MinimizeBox = False Me.MinimizeBox = False
Me.Name = "frmFormDesigner" Me.Name = "frmFormDesigner"
@@ -465,30 +464,30 @@ Partial Class frmFormDesigner
Me.SplitContainerDesigner.Panel2.ResumeLayout(False) Me.SplitContainerDesigner.Panel2.ResumeLayout(False)
CType(Me.SplitContainerDesigner, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.SplitContainerDesigner, System.ComponentModel.ISupportInitialize).EndInit()
Me.SplitContainerDesigner.ResumeLayout(False) Me.SplitContainerDesigner.ResumeLayout(False)
CType(Me.TBPM_CONTROL_TABLEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).EndInit()
Me.Panel1.ResumeLayout(False) Me.Panel1.ResumeLayout(False)
CType(Me.pgControlsNew, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.pgControlsNew, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBPM_PROFILE_CONTROLSBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBPM_PROFILE_CONTROLSBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
Me.GridControlContextMenu.ResumeLayout(False) Me.GridControlContextMenu.ResumeLayout(False)
CType(Me.TBWH_CHECK_PROFILE_CONTROLSBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBWH_CHECK_PROFILE_CONTROLSBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBPM_CONTROL_TABLEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False) Me.ResumeLayout(False)
Me.PerformLayout() Me.PerformLayout()
End Sub End Sub
Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet Friend WithEvents DD_DMSLiteDataSet As taskFLOW.DD_DMSLiteDataSet
Friend WithEvents TBPM_PROFILE_CONTROLSBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPM_PROFILE_CONTROLSBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBPM_PROFILE_CONTROLSTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_CONTROLSTableAdapter Friend WithEvents TBPM_PROFILE_CONTROLSTableAdapter As taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_CONTROLSTableAdapter
Friend WithEvents TableAdapterManager As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager Friend WithEvents TableAdapterManager As taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
Friend WithEvents TBDD_CONNECTIONBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBDD_CONNECTIONBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBDD_CONNECTIONTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter Friend WithEvents TBDD_CONNECTIONTableAdapter As taskFLOW.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter
Friend WithEvents TBWH_CHECK_PROFILE_CONTROLSBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBWH_CHECK_PROFILE_CONTROLSBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBWH_CHECK_PROFILE_CONTROLSTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBWH_CHECK_PROFILE_CONTROLSTableAdapter Friend WithEvents TBWH_CHECK_PROFILE_CONTROLSTableAdapter As taskFLOW.DD_DMSLiteDataSetTableAdapters.TBWH_CHECK_PROFILE_CONTROLSTableAdapter
Friend WithEvents ToolTip1 As System.Windows.Forms.ToolTip Friend WithEvents ToolTip1 As System.Windows.Forms.ToolTip
Friend WithEvents TBPM_CONTROL_TABLEBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPM_CONTROL_TABLEBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBPM_CONTROL_TABLETableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter Friend WithEvents TBPM_CONTROL_TABLETableAdapter As taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter
Friend WithEvents GridControlContextMenu As ContextMenuStrip Friend WithEvents GridControlContextMenu As ContextMenuStrip
Friend WithEvents MenuItemAddColumn As ToolStripMenuItem Friend WithEvents MenuItemAddColumn As ToolStripMenuItem
Friend WithEvents SplitContainerDesigner As SplitContainer Friend WithEvents SplitContainerDesigner As SplitContainer
@@ -523,10 +522,10 @@ Partial Class frmFormDesigner
Friend WithEvents bbtniheight_plus As DevExpress.XtraBars.BarButtonItem Friend WithEvents bbtniheight_plus As DevExpress.XtraBars.BarButtonItem
Friend WithEvents bbtniheight_min As DevExpress.XtraBars.BarButtonItem Friend WithEvents bbtniheight_min As DevExpress.XtraBars.BarButtonItem
Friend WithEvents RibPGCtrlWidth As DevExpress.XtraBars.Ribbon.RibbonPageGroup Friend WithEvents RibPGCtrlWidth As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents RibPGCtrlheight As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents pnldesigner As DigitalData.Controls.SnapPanel.ClassSnapPanel Friend WithEvents pnldesigner As DigitalData.Controls.SnapPanel.ClassSnapPanel
Friend WithEvents tslblAenderungen As DevExpress.XtraBars.BarStaticItem Friend WithEvents tslblAenderungen As DevExpress.XtraBars.BarStaticItem
Friend WithEvents pgControlsNew As DevExpress.XtraVerticalGrid.PropertyGridControl Friend WithEvents pgControlsNew As DevExpress.XtraVerticalGrid.PropertyGridControl
Friend WithEvents bstitmProfilID As DevExpress.XtraBars.BarStaticItem Friend WithEvents BarStaticItem2 As DevExpress.XtraBars.BarStaticItem
Friend WithEvents RibPGCtrlHeightreal As DevExpress.XtraBars.Ribbon.RibbonPageGroup Friend WithEvents bsitmProfilID As DevExpress.XtraBars.BarStaticItem
Friend WithEvents RibPGCtrlheight As DevExpress.XtraBars.Ribbon.RibbonPageGroup
End Class End Class

View File

@@ -126,6 +126,9 @@
<value>0, 132</value> <value>0, 132</value>
</data> </data>
<assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" /> <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="SplitContainerDesigner.Panel1.AutoScroll" type="System.Boolean, mscorlib">
<value>True</value>
</data>
<data name="pnldesigner.AutoScroll" type="System.Boolean, mscorlib"> <data name="pnldesigner.AutoScroll" type="System.Boolean, mscorlib">
<value>True</value> <value>True</value>
</data> </data>
@@ -136,10 +139,10 @@
<value>0, 0</value> <value>0, 0</value>
</data> </data>
<data name="pnldesigner.Size" type="System.Drawing.Size, System.Drawing"> <data name="pnldesigner.Size" type="System.Drawing.Size, System.Drawing">
<value>820, 453</value> <value>820, 455</value>
</data> </data>
<data name="pnldesigner.TabIndex" type="System.Int32, mscorlib"> <data name="pnldesigner.TabIndex" type="System.Int32, mscorlib">
<value>0</value> <value>1</value>
</data> </data>
<data name="&gt;&gt;pnldesigner.Name" xml:space="preserve"> <data name="&gt;&gt;pnldesigner.Name" xml:space="preserve">
<value>pnldesigner</value> <value>pnldesigner</value>
@@ -200,7 +203,7 @@
</value> </value>
</data> </data>
<data name="BarButtonItem1.Caption" xml:space="preserve"> <data name="BarButtonItem1.Caption" xml:space="preserve">
<value>Löschen (entf)</value> <value>Control löschen (del)</value>
</data> </data>
<data name="BarButtonItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="BarButtonItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
@@ -336,7 +339,7 @@
<value>Linie</value> <value>Linie</value>
</data> </data>
<data name="bbtniwidth_plus.Caption" xml:space="preserve"> <data name="bbtniwidth_plus.Caption" xml:space="preserve">
<value>Breiter</value> <value>Breiter (+)</value>
</data> </data>
<data name="bbtniwidth_plus.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="bbtniwidth_plus.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
@@ -358,7 +361,7 @@
</value> </value>
</data> </data>
<data name="bbtniwidth_min.Caption" xml:space="preserve"> <data name="bbtniwidth_min.Caption" xml:space="preserve">
<value>Schmaler</value> <value>Schmaler (-)</value>
</data> </data>
<data name="bbtniwidth_min.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="bbtniwidth_min.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
@@ -380,7 +383,7 @@
</value> </value>
</data> </data>
<data name="bbtniheight_plus.Caption" xml:space="preserve"> <data name="bbtniheight_plus.Caption" xml:space="preserve">
<value>Größer</value> <value>Größer (Strg und +)</value>
</data> </data>
<data name="bbtniheight_plus.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="bbtniheight_plus.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
@@ -399,7 +402,7 @@
</value> </value>
</data> </data>
<data name="bbtniheight_min.Caption" xml:space="preserve"> <data name="bbtniheight_min.Caption" xml:space="preserve">
<value>Kleiner</value> <value>Kleiner (Strg und -)</value>
</data> </data>
<data name="bbtniheight_min.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="bbtniheight_min.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
@@ -421,9 +424,15 @@
<data name="tslblAenderungen.Caption" xml:space="preserve"> <data name="tslblAenderungen.Caption" xml:space="preserve">
<value>Noch keine Änderungen</value> <value>Noch keine Änderungen</value>
</data> </data>
<data name="bstitmProfilID.Caption" xml:space="preserve"> <data name="BarStaticItem2.Caption" xml:space="preserve">
<value>BarStaticItem2</value>
</data>
<data name="bsitmProfilID.Caption" xml:space="preserve">
<value>ProfilID: </value> <value>ProfilID: </value>
</data> </data>
<data name="bsitmProfilID.ItemAppearance.Normal.Font" type="System.Drawing.Font, System.Drawing">
<value>Microsoft Sans Serif, 8.25pt, style=Bold</value>
</data>
<data name="RibbonControl1.Location" type="System.Drawing.Point, System.Drawing"> <data name="RibbonControl1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 0</value> <value>0, 0</value>
</data> </data>
@@ -437,10 +446,10 @@
<value>Controls einfügen</value> <value>Controls einfügen</value>
</data> </data>
<data name="RibPGCtrlWidth.Text" xml:space="preserve"> <data name="RibPGCtrlWidth.Text" xml:space="preserve">
<value>Control - Breite (+/-)</value> <value>Control - Breite</value>
</data> </data>
<data name="RibPGCtrlHeightreal.Text" xml:space="preserve"> <data name="RibPGCtrlheight.Text" xml:space="preserve">
<value>Control-Höhe (ctrl &amp; +/-)</value> <value>Control - Höhe</value>
</data> </data>
<data name="RibbonPage1.Text" xml:space="preserve"> <data name="RibbonPage1.Text" xml:space="preserve">
<value>Start</value> <value>Start</value>
@@ -449,10 +458,10 @@
<value>1199, 132</value> <value>1199, 132</value>
</data> </data>
<data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing"> <data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 585</value> <value>0, 587</value>
</data> </data>
<data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing"> <data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing">
<value>1199, 24</value> <value>1199, 22</value>
</data> </data>
<data name="&gt;&gt;RibbonStatusBar1.Name" xml:space="preserve"> <data name="&gt;&gt;RibbonStatusBar1.Name" xml:space="preserve">
<value>RibbonStatusBar1</value> <value>RibbonStatusBar1</value>
@@ -479,7 +488,7 @@
<value>3</value> <value>3</value>
</data> </data>
<data name="pgControlsNew.Size" type="System.Drawing.Size, System.Drawing"> <data name="pgControlsNew.Size" type="System.Drawing.Size, System.Drawing">
<value>375, 453</value> <value>375, 455</value>
</data> </data>
<data name="pgControlsNew.TabIndex" type="System.Int32, mscorlib"> <data name="pgControlsNew.TabIndex" type="System.Int32, mscorlib">
<value>0</value> <value>0</value>
@@ -506,7 +515,7 @@
<value>3, 2, 3, 2</value> <value>3, 2, 3, 2</value>
</data> </data>
<data name="Panel1.Size" type="System.Drawing.Size, System.Drawing"> <data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
<value>375, 453</value> <value>375, 455</value>
</data> </data>
<data name="Panel1.TabIndex" type="System.Int32, mscorlib"> <data name="Panel1.TabIndex" type="System.Int32, mscorlib">
<value>23</value> <value>23</value>
@@ -536,13 +545,13 @@
<value>1</value> <value>1</value>
</data> </data>
<data name="SplitContainerDesigner.Size" type="System.Drawing.Size, System.Drawing"> <data name="SplitContainerDesigner.Size" type="System.Drawing.Size, System.Drawing">
<value>1199, 453</value> <value>1199, 455</value>
</data> </data>
<data name="SplitContainerDesigner.SplitterDistance" type="System.Int32, mscorlib"> <data name="SplitContainerDesigner.SplitterDistance" type="System.Int32, mscorlib">
<value>820</value> <value>820</value>
</data> </data>
<data name="SplitContainerDesigner.TabIndex" type="System.Int32, mscorlib"> <data name="SplitContainerDesigner.TabIndex" type="System.Int32, mscorlib">
<value>0</value> <value>25</value>
</data> </data>
<data name="&gt;&gt;SplitContainerDesigner.Name" xml:space="preserve"> <data name="&gt;&gt;SplitContainerDesigner.Name" xml:space="preserve">
<value>SplitContainerDesigner</value> <value>SplitContainerDesigner</value>
@@ -556,12 +565,15 @@
<data name="&gt;&gt;SplitContainerDesigner.ZOrder" xml:space="preserve"> <data name="&gt;&gt;SplitContainerDesigner.ZOrder" xml:space="preserve">
<value>1</value> <value>1</value>
</data> </data>
<metadata name="TBPM_PROFILE_CONTROLSBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="TBPM_CONTROL_TABLEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>368, 17</value> <value>17, 95</value>
</metadata> </metadata>
<metadata name="DD_DMSLiteDataSet.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="DD_DMSLiteDataSet.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>206, 17</value> <value>206, 17</value>
</metadata> </metadata>
<metadata name="TBPM_PROFILE_CONTROLSBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>368, 17</value>
</metadata>
<metadata name="TBDD_CONNECTIONBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="TBDD_CONNECTIONBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 56</value> <value>17, 56</value>
</metadata> </metadata>
@@ -601,9 +613,6 @@
<metadata name="TBWH_CHECK_PROFILE_CONTROLSTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="TBWH_CHECK_PROFILE_CONTROLSTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>823, 56</value> <value>823, 56</value>
</metadata> </metadata>
<metadata name="TBPM_CONTROL_TABLEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 95</value>
</metadata>
<metadata name="TBPM_CONTROL_TABLETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="TBPM_CONTROL_TABLETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>278, 95</value> <value>278, 95</value>
</metadata> </metadata>
@@ -619,9 +628,6 @@
<data name="RibbonPageGroup4.Text" xml:space="preserve"> <data name="RibbonPageGroup4.Text" xml:space="preserve">
<value>RibbonPageGroup4</value> <value>RibbonPageGroup4</value>
</data> </data>
<data name="RibPGCtrlheight.Text" xml:space="preserve">
<value>Control - Höhe (Strg + +/-)</value>
</data>
<metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089"> <metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value> <value>True</value>
</metadata> </metadata>
@@ -1065,6 +1071,18 @@
<data name="$this.Text" xml:space="preserve"> <data name="$this.Text" xml:space="preserve">
<value>Formular Designer</value> <value>Formular Designer</value>
</data> </data>
<data name="&gt;&gt;TBPM_CONTROL_TABLEBindingSource.Name" xml:space="preserve">
<value>TBPM_CONTROL_TABLEBindingSource</value>
</data>
<data name="&gt;&gt;TBPM_CONTROL_TABLEBindingSource.Type" xml:space="preserve">
<value>System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;DD_DMSLiteDataSet.Name" xml:space="preserve">
<value>DD_DMSLiteDataSet</value>
</data>
<data name="&gt;&gt;DD_DMSLiteDataSet.Type" xml:space="preserve">
<value>taskFLOW.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data>
<data name="&gt;&gt;bbtnItemFinishSQL.Name" xml:space="preserve"> <data name="&gt;&gt;bbtnItemFinishSQL.Name" xml:space="preserve">
<value>bbtnItemFinishSQL</value> <value>bbtnItemFinishSQL</value>
</data> </data>
@@ -1185,10 +1203,16 @@
<data name="&gt;&gt;tslblAenderungen.Type" xml:space="preserve"> <data name="&gt;&gt;tslblAenderungen.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;bstitmProfilID.Name" xml:space="preserve"> <data name="&gt;&gt;BarStaticItem2.Name" xml:space="preserve">
<value>bstitmProfilID</value> <value>BarStaticItem2</value>
</data> </data>
<data name="&gt;&gt;bstitmProfilID.Type" xml:space="preserve"> <data name="&gt;&gt;BarStaticItem2.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;bsitmProfilID.Name" xml:space="preserve">
<value>bsitmProfilID</value>
</data>
<data name="&gt;&gt;bsitmProfilID.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;RibbonPage1.Name" xml:space="preserve"> <data name="&gt;&gt;RibbonPage1.Name" xml:space="preserve">
@@ -1221,10 +1245,10 @@
<data name="&gt;&gt;RibPGCtrlWidth.Type" xml:space="preserve"> <data name="&gt;&gt;RibPGCtrlWidth.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;RibPGCtrlHeightreal.Name" xml:space="preserve"> <data name="&gt;&gt;RibPGCtrlheight.Name" xml:space="preserve">
<value>RibPGCtrlHeightreal</value> <value>RibPGCtrlheight</value>
</data> </data>
<data name="&gt;&gt;RibPGCtrlHeightreal.Type" xml:space="preserve"> <data name="&gt;&gt;RibPGCtrlheight.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;TBPM_PROFILE_CONTROLSBindingSource.Name" xml:space="preserve"> <data name="&gt;&gt;TBPM_PROFILE_CONTROLSBindingSource.Name" xml:space="preserve">
@@ -1233,12 +1257,6 @@
<data name="&gt;&gt;TBPM_PROFILE_CONTROLSBindingSource.Type" xml:space="preserve"> <data name="&gt;&gt;TBPM_PROFILE_CONTROLSBindingSource.Type" xml:space="preserve">
<value>System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value> <value>System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="&gt;&gt;DD_DMSLiteDataSet.Name" xml:space="preserve">
<value>DD_DMSLiteDataSet</value>
</data>
<data name="&gt;&gt;DD_DMSLiteDataSet.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data>
<data name="&gt;&gt;TBDD_CONNECTIONBindingSource.Name" xml:space="preserve"> <data name="&gt;&gt;TBDD_CONNECTIONBindingSource.Name" xml:space="preserve">
<value>TBDD_CONNECTIONBindingSource</value> <value>TBDD_CONNECTIONBindingSource</value>
</data> </data>
@@ -1261,19 +1279,19 @@
<value>TBPM_PROFILE_CONTROLSTableAdapter</value> <value>TBPM_PROFILE_CONTROLSTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBPM_PROFILE_CONTROLSTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBPM_PROFILE_CONTROLSTableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_CONTROLSTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_PROFILE_CONTROLSTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve"> <data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve">
<value>TableAdapterManager</value> <value>TableAdapterManager</value>
</data> </data>
<data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve"> <data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBDD_CONNECTIONTableAdapter.Name" xml:space="preserve"> <data name="&gt;&gt;TBDD_CONNECTIONTableAdapter.Name" xml:space="preserve">
<value>TBDD_CONNECTIONTableAdapter</value> <value>TBDD_CONNECTIONTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBDD_CONNECTIONTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBDD_CONNECTIONTableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBDD_CONNECTIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBWH_CHECK_PROFILE_CONTROLSBindingSource.Name" xml:space="preserve"> <data name="&gt;&gt;TBWH_CHECK_PROFILE_CONTROLSBindingSource.Name" xml:space="preserve">
<value>TBWH_CHECK_PROFILE_CONTROLSBindingSource</value> <value>TBWH_CHECK_PROFILE_CONTROLSBindingSource</value>
@@ -1285,19 +1303,13 @@
<value>TBWH_CHECK_PROFILE_CONTROLSTableAdapter</value> <value>TBWH_CHECK_PROFILE_CONTROLSTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBWH_CHECK_PROFILE_CONTROLSTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBWH_CHECK_PROFILE_CONTROLSTableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBWH_CHECK_PROFILE_CONTROLSTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBWH_CHECK_PROFILE_CONTROLSTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data>
<data name="&gt;&gt;TBPM_CONTROL_TABLEBindingSource.Name" xml:space="preserve">
<value>TBPM_CONTROL_TABLEBindingSource</value>
</data>
<data name="&gt;&gt;TBPM_CONTROL_TABLEBindingSource.Type" xml:space="preserve">
<value>System.Windows.Forms.BindingSource, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data> </data>
<data name="&gt;&gt;TBPM_CONTROL_TABLETableAdapter.Name" xml:space="preserve"> <data name="&gt;&gt;TBPM_CONTROL_TABLETableAdapter.Name" xml:space="preserve">
<value>TBPM_CONTROL_TABLETableAdapter</value> <value>TBPM_CONTROL_TABLETableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBPM_CONTROL_TABLETableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBPM_CONTROL_TABLETableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;RibbonPage2.Name" xml:space="preserve"> <data name="&gt;&gt;RibbonPage2.Name" xml:space="preserve">
<value>RibbonPage2</value> <value>RibbonPage2</value>
@@ -1323,12 +1335,6 @@
<data name="&gt;&gt;RibbonPageGroup4.Type" xml:space="preserve"> <data name="&gt;&gt;RibbonPageGroup4.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;RibPGCtrlheight.Name" xml:space="preserve">
<value>RibPGCtrlheight</value>
</data>
<data name="&gt;&gt;RibPGCtrlheight.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;$this.Name" xml:space="preserve"> <data name="&gt;&gt;$this.Name" xml:space="preserve">
<value>frmFormDesigner</value> <value>frmFormDesigner</value>
</data> </data>

View File

@@ -1,17 +1,14 @@
Imports System.ComponentModel Imports System.ComponentModel
Imports DD_LIB_Standards
Imports DevExpress.XtraGrid Imports DevExpress.XtraGrid
Imports DevExpress.XtraGrid.Columns Imports DevExpress.XtraGrid.Columns
Imports DevExpress.XtraGrid.Views.Grid Imports DevExpress.XtraGrid.Views.Grid
Imports DevExpress.XtraGrid.Views.Grid.ViewInfo Imports DevExpress.XtraGrid.Views.Grid.ViewInfo
Imports DigitalData.Controls.LookupGrid Imports DigitalData.Controls.LookupGrid
Imports DigitalData.Modules.Language.Utils
Imports DigitalData.Modules.Language
Imports System.Drawing Imports System.Drawing
Imports DigitalData.GUIs.Common Imports DigitalData.GUIs.Common
Imports DevExpress.Utils.Filtering.Internal Imports DevExpress.Utils.Filtering.Internal
Imports DevExpress.XtraEditors Imports DevExpress.XtraEditors
Imports DevExpress.Utils.Controls
Public Class frmFormDesigner Public Class frmFormDesigner
Public ProfileId As Integer Public ProfileId As Integer
@@ -40,6 +37,7 @@ Public Class frmFormDesigner
Private Source_LookupIndicies As List(Of String) Private Source_LookupIndicies As List(Of String)
Private CurrentColumnId As Integer = 0 Private CurrentColumnId As Integer = 0
Private pgControls_Focused As Boolean = False
Public Sub Reload_ControlNameList() Public Sub Reload_ControlNameList()
_Logger.debug("Reloading control name list") _Logger.debug("Reloading control name list")
@@ -52,7 +50,7 @@ Public Class frmFormDesigner
ORDER BY NAME" ORDER BY NAME"
) )
CURRENT_CONTROL_NAME_LIST = oControlNameList.AsEnumerable(). CURRENT_CONTROL_NAME_LIST = oControlNameList.AsEnumerable().
Select(Function(row) row.ItemEx("NAME", String.Empty)). Select(Function(row) ClassAllgemeineFunktionen.NotNullString(row.Item("NAME"), String.Empty)).
ToList() ToList()
_Logger.debug("Reloading control name list done!") _Logger.debug("Reloading control name list done!")
End Sub End Sub
@@ -64,7 +62,7 @@ Public Class frmFormDesigner
BarButtonItem3.ItemAppearance.Normal.BackColor = Color.Red BarButtonItem3.ItemAppearance.Normal.BackColor = Color.Red
Designer_Locked = True Designer_Locked = True
Mouse_IsPressed = False Mouse_IsPressed = False
RibPGCtrlHeightreal.Enabled = False RibPGCtrlheight.Enabled = False
RibPGCtrlWidth.Enabled = False RibPGCtrlWidth.Enabled = False
RibbonGroupControls.Enabled = False RibbonGroupControls.Enabled = False
RibbonGroupControlFunctions.Enabled = False RibbonGroupControlFunctions.Enabled = False
@@ -72,14 +70,14 @@ Public Class frmFormDesigner
' Setzt den typ des SQL-Befehls für frmSQL_DESIGNER ' Setzt den typ des SQL-Befehls für frmSQL_DESIGNER
CURRENT_DESIGN_TYPE = "INPUT_INDEX" CURRENT_DESIGN_TYPE = "INPUT_INDEX"
CHANGES_FORM_DESIGN = False CHANGES_FORM_DESIGN = False
bstitmProfilID.Caption = $"ProfilID: {ProfileId.ToString}"
' Profil Name in Fenstertitel setzen ' Profil Name in Fenstertitel setzen
Text = $"Validation Designer - Profil: {ProfileName}" Text = $"Validation Designer - Profil: {ProfileName}"
bsitmProfilID.Caption = $"ProfilID: {ProfileId}"
' Try ' Try
' Windream initialisieren ' Windream initialisieren
If IDB_ACTIVE = False Then If IDB_ACTIVE = False Then
clsWindream.Create_Session() 'clsWindream.Create_Session()
bbtnitButton.Visibility = DevExpress.XtraBars.BarItemVisibility.Never bbtnitButton.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
Else Else
bbtnitButton.Visibility = DevExpress.XtraBars.BarItemVisibility.Always bbtnitButton.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
@@ -90,7 +88,7 @@ Public Class frmFormDesigner
Dim unsortedIndicies Dim unsortedIndicies
Dim sortedIndicies As List(Of String) Dim sortedIndicies As List(Of String)
If IDB_ACTIVE = False Then If IDB_ACTIVE = False Then
unsortedIndicies = clsWD_GET.GetIndicesByObjecttype(CURRENT_OBJECTTYPE).ToList() unsortedIndicies = WINDREAM_MOD.GetIndiciesByObjecttype(CURRENT_OBJECTTYPE).ToList()
sortedIndicies = unsortedIndicies '.OrderBy(Function(index As String) index).ToList() sortedIndicies = unsortedIndicies '.OrderBy(Function(index As String) index).ToList()
sortedIndicies = sortedIndicies.OrderBy(Function(index As String) index).ToList sortedIndicies = sortedIndicies.OrderBy(Function(index As String) index).ToList
Else Else
@@ -99,7 +97,6 @@ Public Class frmFormDesigner
sortedIndicies.Add("@@DISPLAY_ONLY") sortedIndicies.Add("@@DISPLAY_ONLY")
Source_AllIndicies = sortedIndicies Source_AllIndicies = sortedIndicies
MVSource_AllIndicies = Source_AllIndicies
Source_VectorIndicies = Source_AllIndicies.FindAll(AddressOf IsVectorIndex) Source_VectorIndicies = Source_AllIndicies.FindAll(AddressOf IsVectorIndex)
Source_SimpleIndicies = Source_AllIndicies.Except(Source_VectorIndicies).ToList() Source_SimpleIndicies = Source_AllIndicies.Except(Source_VectorIndicies).ToList()
Source_LookupIndicies = Source_AllIndicies. Source_LookupIndicies = Source_AllIndicies.
@@ -113,7 +110,7 @@ Public Class frmFormDesigner
If IDB_ACTIVE = False Then If IDB_ACTIVE = False Then
Windream_ChoiceLists = New List(Of String) Windream_ChoiceLists = New List(Of String)
Windream_ChoiceLists.Add(String.Empty) Windream_ChoiceLists.Add(String.Empty)
Windream_ChoiceLists.AddRange(clsWD_GET.GetChoiceLists()) Windream_ChoiceLists.AddRange(WINDREAM_MOD.GetChoiceLists())
End If End If
'Catch ex As Exception 'Catch ex As Exception
@@ -147,7 +144,7 @@ Public Class frmFormDesigner
Dim missingIndexControls As New List(Of String) Dim missingIndexControls As New List(Of String)
For Each row As DataRow In dt.Rows For Each row As DataRow In dt.Rows
If NotNull(row.Item("INDEX_NAME"), String.Empty) = String.Empty Then If ClassAllgemeineFunktionen.NotNullString(row.Item("INDEX_NAME"), String.Empty) = String.Empty Then
missingIndexControls.Add(row.Item("NAME")) missingIndexControls.Add(row.Item("NAME"))
End If End If
Next Next
@@ -176,8 +173,11 @@ Public Class frmFormDesigner
''' </summary> ''' </summary>
Private Function IsVectorIndex(IndexName As String) As Boolean Private Function IsVectorIndex(IndexName As String) As Boolean
Dim oType As Integer Dim oType As Integer
If IndexName = "@@DISPLAY_ONLY" Then
Return 0
End If
If IDB_ACTIVE = False Then If IDB_ACTIVE = False Then
oType = clsWD_GET.GetTypeOfIndexAsIntByName(IndexName) oType = WINDREAM_MOD.GetIndexType(IndexName)
Else Else
oType = IDBData.GetTypeOfIndex(IndexName) oType = IDBData.GetTypeOfIndex(IndexName)
End If End If
@@ -186,9 +186,9 @@ Public Class frmFormDesigner
End Function End Function
Private Function IsNotBooleanIndex(IndexName As String) As Boolean Private Function IsNotBooleanIndex(IndexName As String) As Boolean
Dim oType As Integer '= clsWD_GET.GetTypeOfIndexAsIntByName(IndexName) Dim oType As Integer '= WINDREAM_MOD.GetIndexType(IndexName)
If IDB_ACTIVE = False Then If IDB_ACTIVE = False Then
oType = clsWD_GET.GetTypeOfIndexAsIntByName(IndexName) oType = WINDREAM_MOD.GetIndexType(IndexName)
Else Else
oType = IDBData.GetTypeOfIndex(IndexName) oType = IDBData.GetTypeOfIndex(IndexName)
End If End If
@@ -196,9 +196,9 @@ Public Class frmFormDesigner
End Function End Function
Private Function IsNotDateIndex(IndexName As String) As Boolean Private Function IsNotDateIndex(IndexName As String) As Boolean
Dim oType As Integer '= clsWD_GET.GetTypeOfIndexAsIntByName(IndexName) Dim oType As Integer '= WINDREAM_MOD.GetIndexType(IndexName)
If IDB_ACTIVE = False Then If IDB_ACTIVE = False Then
oType = clsWD_GET.GetTypeOfIndexAsIntByName(IndexName) oType = WINDREAM_MOD.GetIndexType(IndexName)
Else Else
oType = IDBData.GetTypeOfIndex(IndexName) oType = IDBData.GetTypeOfIndex(IndexName)
End If End If
@@ -206,9 +206,9 @@ Public Class frmFormDesigner
End Function End Function
Private Function IsNotVectorBooleanIndex(IndexName As String) As Boolean Private Function IsNotVectorBooleanIndex(IndexName As String) As Boolean
Dim oType As Integer '= clsWD_GET.GetTypeOfIndexAsIntByName(IndexName) Dim oType As Integer '= WINDREAM_MOD.GetIndexType(IndexName)
If IDB_ACTIVE = False Then If IDB_ACTIVE = False Then
oType = clsWD_GET.GetTypeOfIndexAsIntByName(IndexName) oType = WINDREAM_MOD.GetIndexType(IndexName)
Else Else
oType = IDBData.GetTypeOfIndex(IndexName) oType = IDBData.GetTypeOfIndex(IndexName)
End If End If
@@ -216,9 +216,9 @@ Public Class frmFormDesigner
End Function End Function
Private Function IsNotVectorDateIndex(IndexName As String) As Boolean Private Function IsNotVectorDateIndex(IndexName As String) As Boolean
Dim oType As Integer '= clsWD_GET.GetTypeOfIndexAsIntByName(IndexName) Dim oType As Integer '= WINDREAM_MOD.GetIndexType(IndexName)
If IDB_ACTIVE = False Then If IDB_ACTIVE = False Then
oType = clsWD_GET.GetTypeOfIndexAsIntByName(IndexName) oType = WINDREAM_MOD.GetIndexType(IndexName)
Else Else
oType = IDBData.GetTypeOfIndex(IndexName) oType = IDBData.GetTypeOfIndex(IndexName)
End If End If
@@ -226,9 +226,9 @@ Public Class frmFormDesigner
End Function End Function
Private Function IsNotVectorDatetimeIndex(IndexName As String) As Boolean Private Function IsNotVectorDatetimeIndex(IndexName As String) As Boolean
Dim oType As Integer '= clsWD_GET.GetTypeOfIndexAsIntByName(IndexName) Dim oType As Integer '= WINDREAM_MOD.GetIndexType(IndexName)
If IDB_ACTIVE = False Then If IDB_ACTIVE = False Then
oType = clsWD_GET.GetTypeOfIndexAsIntByName(IndexName) oType = WINDREAM_MOD.GetIndexType(IndexName)
Else Else
oType = IDBData.GetTypeOfIndex(IndexName) oType = IDBData.GetTypeOfIndex(IndexName)
End If End If
@@ -249,12 +249,12 @@ Public Class frmFormDesigner
Dim name As String = row.Item("NAME") Dim name As String = row.Item("NAME")
Dim x As Integer = row.Item("X_LOC") Dim x As Integer = row.Item("X_LOC")
Dim y As Integer = row.Item("Y_LOC") Dim y As Integer = row.Item("Y_LOC")
Dim style As FontStyle = NotNull(row.Item("FONT_STYLE"), FontStyle.Regular) Dim style As FontStyle = ClassAllgemeineFunktionen.NotNullString(row.Item("FONT_STYLE"), FontStyle.Regular)
Dim size As Single = NotNull(row.Item("FONT_SIZE"), 10) Dim size As Single = ClassAllgemeineFunktionen.NotNullString(row.Item("FONT_SIZE"), 10)
Dim familyString As String = NotNull(row.Item("FONT_FAMILY"), "Arial") Dim familyString As String = ClassAllgemeineFunktionen.NotNullString(row.Item("FONT_FAMILY"), "Arial")
Dim family As FontFamily = New FontFamily(familyString) Dim family As FontFamily = New FontFamily(familyString)
Dim font As New Font(family, size, style, GraphicsUnit.Point) Dim font As New Font(family, size, style, GraphicsUnit.Point)
Dim color As Color = IntToColor(NotNull(row.Item("FONT_COLOR"), 0)) Dim color As Color = IntToColor(ClassAllgemeineFunktionen.NotNullString(row.Item("FONT_COLOR"), 0))
' Jetzt die Control spezifischen Eigenschaften zuweisen ' Jetzt die Control spezifischen Eigenschaften zuweisen
@@ -291,20 +291,25 @@ Public Class frmFormDesigner
SetMovementHandlers(dgv) SetMovementHandlers(dgv)
Case "TABLE" Case "TABLE"
Try
Dim oSQL = $"SELECT IIF(LANG.CAPTION IS NULL,T.SPALTEN_HEADER,LANG.CAPTION) SPALTEN_HEADER_LANG, T.* FROM TBPM_CONTROL_TABLE T Dim oSQL = $"Select IIF(LANG.CAPTION Is NULL,T.SPALTEN_HEADER,LANG.CAPTION) SPALTEN_HEADER_LANG, T.* FROM TBPM_CONTROL_TABLE T
INNER JOIN TBPM_PROFILE_CONTROLS T1 ON T.CONTROL_ID = T1.GUID LEFT JOIN (SELECT * FROM TBPM_CONTOL_TABLE_LANG WHERE LANG_CODE = '{USER_LANGUAGE}') LANG ON T.GUID = LANG.COL_ID INNER JOIN TBPM_PROFILE_CONTROLS T1 ON T.CONTROL_ID = T1.GUID LEFT JOIN (SELECT * FROM TBPM_CONTOL_TABLE_LANG WHERE LANG_CODE = '{USER_LANGUAGE}') LANG ON T.GUID = LANG.COL_ID
WHERE T1.CONTROL_ACTIVE = 1 AND T.CONTROL_ID = T1.GUID AND T.CONTROL_ID = {guid} ORDER BY T.SEQUENCE" WHERE T1.CONTROL_ACTIVE = 1 AND T.CONTROL_ID = T1.GUID AND T.CONTROL_ID = {guid} ORDER BY T.SEQUENCE"
Dim oDTColumnsPerDevExGrid As DataTable = DatabaseFallback.GetDatatableECM(oSQL) ', "FDesignLaodControls") Dim oDTColumnsPerDevExGrid As DataTable = DatabaseFallback.GetDatatableECM(oSQL) ', "FDesignLaodControls")
Dim table = ControlCreator.CreateExistingGridControl(row, oDTColumnsPerDevExGrid, True) Dim table = ControlCreator.CreateExistingGridControl(row, oDTColumnsPerDevExGrid, True, "EUR")
AddHandler table.MouseClick, AddressOf gridControl_MouseClick AddHandler table.MouseClick, AddressOf gridControl_MouseClick
' AddHandler table.ColumnHeaderMouseClick, AddressOf table_ColumnHeaderMouseClick ' AddHandler table.ColumnHeaderMouseClick, AddressOf table_ColumnHeaderMouseClick
pnldesigner.Controls.Add(table) pnldesigner.Controls.Add(table)
SetMovementHandlers(table) SetMovementHandlers(table)
Catch ex As Exception
_Logger.Error(ex)
MsgBox("Error while loading Table Control with Id " & guid & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:")
End Try
Case "LOOKUP" Case "LOOKUP"
Dim lookup = ControlCreator.CreateExistingLookupControl(row, True) Dim lookup = ControlCreator.CreateExistingLookupControl(row, True)
@@ -321,7 +326,6 @@ Public Class frmFormDesigner
SetMovementHandlers(oButton) SetMovementHandlers(oButton)
End Select End Select
Next Next
Catch ex As Exception Catch ex As Exception
_Logger.Error(ex) _Logger.Error(ex)
MsgBox("Unexpected error in LoadControls " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:") MsgBox("Unexpected error in LoadControls " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:")
@@ -355,7 +359,7 @@ Public Class frmFormDesigner
oControl.BackColor = Color.Transparent oControl.BackColor = Color.Transparent
Case GetType(System.Windows.Forms.CheckBox) Case GetType(System.Windows.Forms.CheckBox)
oControl.BackColor = Color.Transparent oControl.BackColor = Color.Transparent
Case GetType(DD_ProcessManager.ClassControlCreator.LineLabel) Case GetType(taskFLOW.ClassControlCreator.LineLabel)
oControl.BackColor = oControl.ForeColor oControl.BackColor = oControl.ForeColor
Case GetType(DigitalData.Controls.LookupGrid.LookupControl3) Case GetType(DigitalData.Controls.LookupGrid.LookupControl3)
oControl.BackColor = Color.White oControl.BackColor = Color.White
@@ -406,8 +410,25 @@ Public Class frmFormDesigner
MsgBox("Error while loading Column Configuration: " & vbCrLf & ex.Message, MsgBoxStyle.Critical) MsgBox("Error while loading Column Configuration: " & vbCrLf & ex.Message, MsgBoxStyle.Critical)
End Try End Try
End Sub End Sub
Sub Control_Delete()
If CurrentControl Is Nothing = False Then
Dim result As MsgBoxResult = MsgBox("Wollen Sie das Control: " & CurrentControl.Name & " wirklich löschen?", MsgBoxStyle.YesNo, "Bestätigung:")
' wenn Speichern ja
If result = MsgBoxResult.Yes Then
DeleteControl(CurrentControl.Name)
'pgControls.Enabled = False
pgControlsNew.Enabled = False
tslblAenderungen.Caption = $"Control {CurrentControl.Name} deleted - " + Now.ToString
CurrentControl = Nothing
RibPGCtrlheight.Enabled = False
RibPGCtrlWidth.Enabled = False
Reload_ControlNameList()
End If
End If
End Sub
Sub DeleteControl(controlName As String) Sub DeleteControl(controlName As String)
Try Try
Dim controlId As Integer = TBPM_PROFILE_CONTROLSTableAdapter.cmdGetGUID(ProfileId, controlName) Dim controlId As Integer = TBPM_PROFILE_CONTROLSTableAdapter.cmdGetGUID(ProfileId, controlName)
@@ -421,6 +442,8 @@ Public Class frmFormDesigner
MsgBox(ex.Message, MsgBoxStyle.Critical, "DeleteControl:") MsgBox(ex.Message, MsgBoxStyle.Critical, "DeleteControl:")
End Try End Try
End Sub End Sub
' +++ Public Helper Methods +++ ' +++ Public Helper Methods +++
Public Function GetCursorPosition() As Point Public Function GetCursorPosition() As Point
Return pnldesigner.PointToClient(Cursor.Position) Return pnldesigner.PointToClient(Cursor.Position)
@@ -446,7 +469,7 @@ Public Class frmFormDesigner
sender.BringToFront() sender.BringToFront()
RibbonGroupControlFunctions.Enabled = True RibbonGroupControlFunctions.Enabled = True
Mouse_IsPressed = True Mouse_IsPressed = True
RibPGCtrlHeightreal.Enabled = True RibPGCtrlheight.Enabled = True
RibPGCtrlWidth.Enabled = True RibPGCtrlWidth.Enabled = True
Console.WriteLine("CURRENT_CONTROL:" & CurrentControl.Name) Console.WriteLine("CURRENT_CONTROL:" & CurrentControl.Name)
End If End If
@@ -458,7 +481,11 @@ Public Class frmFormDesigner
Exit Sub Exit Sub
End If End If
Mouse_IsPressed = False Mouse_IsPressed = False
If (TypeOf sender Is LookupControl3 Or TypeOf sender Is Windows.Forms.ComboBox) Then
RibPGCtrlheight.Enabled = False
Else
RibPGCtrlheight.Enabled = True
End If
' Control Eigenschaften laden ' Control Eigenschaften laden
LoadControlProperties(sender) LoadControlProperties(sender)
@@ -560,19 +587,20 @@ Public Class frmFormDesigner
obj.Location = New Point(row.Item("X_LOC"), row.Item("Y_LOC")) obj.Location = New Point(row.Item("X_LOC"), row.Item("Y_LOC"))
obj.Name = row.Item("NAME") obj.Name = row.Item("NAME")
obj.Size = New Size(row.Item("WIDTH"), row.Item("HEIGHT")) obj.Size = New Size(row.Item("WIDTH"), row.Item("HEIGHT"))
obj.ChangedAt = NotNull(row.Item("CHANGED_WHEN"), Nothing) obj.ChangedAt = ClassAllgemeineFunktionen.NotNullDate(row.Item("CHANGED_WHEN"), Nothing)
obj.ChangedWho = NotNull(row.Item("CHANGED_WHO"), "") obj.ChangedWho = ClassAllgemeineFunktionen.NotNullString(row.Item("CHANGED_WHO"), "")
Dim style As FontStyle = NotNull(row.Item("FONT_STYLE"), FontStyle.Regular) Dim oStyle As FontStyle = ClassAllgemeineFunktionen.NotNullString(row.Item("FONT_STYLE"), FontStyle.Regular)
Dim size As Single = NotNull(row.Item("FONT_SIZE"), 10) Dim oSize As Single = ClassAllgemeineFunktionen.NotNullString(row.Item("FONT_SIZE"), 10)
Dim familyString As String = NotNull(row.Item("FONT_FAMILY"), "Arial") Dim oFamilyString As String = ClassAllgemeineFunktionen.NotNullString(row.Item("FONT_FAMILY"), "Arial")
Dim family As FontFamily = New FontFamily(familyString) Dim oFamily As FontFamily = New FontFamily(oFamilyString)
obj.Font = New Font(family, size, style) obj.Font = New Font(oFamily, oSize, oStyle)
Dim color As Integer = NotNull(row.Item("FONT_COLOR"), 0) Dim oColor As Integer = ClassAllgemeineFunktionen.NotNullString(row.Item("FONT_COLOR"), 0)
obj.TextColor = IntToColor(color) obj.TextColor = IntToColor(oColor)
obj.TextAlignment = ClassAllgemeineFunktionen.NotNullString(row.Item("TEXT_ALIGNMENT"), "Near")
Return obj Return obj
End Function End Function
@@ -593,13 +621,12 @@ Public Class frmFormDesigner
obj.SaveChangeOnReadOnly = StrToBool(row.Item("SAVE_CHANGE_ON_ENABLED")) obj.SaveChangeOnReadOnly = StrToBool(row.Item("SAVE_CHANGE_ON_ENABLED"))
obj.Required = StrToBool(row.Item("VALIDATION")) obj.Required = StrToBool(row.Item("VALIDATION"))
obj.Active = StrToBool(row.Item("CONTROL_ACTIVE")) obj.Active = StrToBool(row.Item("CONTROL_ACTIVE"))
obj.Index = NotNull(row.Item("INDEX_NAME"), "") obj.Index = ClassAllgemeineFunktionen.NotNullString(row.Item("INDEX_NAME"), "")
obj.DefaultValue = NotNull(row.Item("DEFAULT_VALUE"), Nothing) obj.DefaultValue = ClassAllgemeineFunktionen.NotNullString(row.Item("DEFAULT_VALUE"), Nothing)
obj.TextAlignment = ClassAllgemeineFunktionen.NotNullString(row.Item("TEXT_ALIGNMENT"), "Near")
' Default value for ConnectionID ' Default value for ConnectionID
'Dim oConnectionId = row.ItemEx("CONNECTION_ID", 0) Dim oConnectionId = ClassAllgemeineFunktionen.NotNullString(row.Item("CONNECTION_ID"), 0)
obj.SQLCommand = New SQLValue(row.Item("SQL_UEBERPRUEFUNG")) ', oConnectionId obj.SQLCommand = New SQLValue(row.Item("SQL_UEBERPRUEFUNG"))
' obj.SQLConnection = oConnectionId
Return obj Return obj
End Function End Function
@@ -659,9 +686,9 @@ Public Class frmFormDesigner
Dim check As CheckBox = sender Dim check As CheckBox = sender
Dim checkProps As CheckboxProperties = CreatePropsObjectWithIndicies(New CheckboxProperties, oRow, Source_AllIndicies) Dim checkProps As CheckboxProperties = CreatePropsObjectWithIndicies(New CheckboxProperties, oRow, Source_AllIndicies)
checkProps.Text = check.Text checkProps.Text = check.Text
checkProps.Enable_SQL = New SQLValue(NotNull(oRow.Item("SQL_ENABLE"), "")) checkProps.Enable_SQL = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SQL_ENABLE"), ""))
checkProps.Enable_SQL_OnLoad = New SQLValue(NotNull(oRow.Item("SQL_ENABLE_ON_LOAD"), "")) checkProps.Enable_SQL_OnLoad = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SQL_ENABLE_ON_LOAD"), ""))
checkProps.SetControlData = New SQLValue(NotNull(oRow.Item("SET_CONTROL_DATA"), "")) checkProps.SetControlData = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SET_CONTROL_DATA"), ""))
props = checkProps props = checkProps
ElseIf TypeOf sender Is LookupControl3 Then ElseIf TypeOf sender Is LookupControl3 Then
Dim oLookup As LookupControl3 = sender Dim oLookup As LookupControl3 = sender
@@ -670,20 +697,20 @@ Public Class frmFormDesigner
lookupProps.PreventDuplicates = StrToBool(oRow.Item("VKT_PREVENT_MULTIPLE_VALUES")) lookupProps.PreventDuplicates = StrToBool(oRow.Item("VKT_PREVENT_MULTIPLE_VALUES"))
lookupProps.AllowAddNewValues = StrToBool(oRow.Item("VKT_ADD_ITEM")) lookupProps.AllowAddNewValues = StrToBool(oRow.Item("VKT_ADD_ITEM"))
lookupProps.DisplayAsComboBox = False lookupProps.DisplayAsComboBox = False
lookupProps.Enable_SQL = New SQLValue(NotNull(oRow.Item("SQL_ENABLE"), "")) lookupProps.Enable_SQL = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SQL_ENABLE"), ""))
lookupProps.Enable_SQL_OnLoad = New SQLValue(NotNull(oRow.Item("SQL_ENABLE_ON_LOAD"), "")) lookupProps.Enable_SQL_OnLoad = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SQL_ENABLE_ON_LOAD"), ""))
lookupProps.SetControlData = New SQLValue(NotNull(oRow.Item("SET_CONTROL_DATA"), "")) lookupProps.SetControlData = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SET_CONTROL_DATA"), ""))
props = lookupProps props = lookupProps
ElseIf TypeOf sender Is TextEdit Then ElseIf TypeOf sender Is TextEdit Then
'Dim txt As TextEdit = sender 'Dim txt As TextEdit = sender
Dim txtProps As TextboxProperties = CreatePropsObjectWithIndicies(New TextboxProperties, oRow, Source_AllIndicies) Dim txtProps As TextboxProperties = CreatePropsObjectWithIndicies(New TextboxProperties, oRow, Source_AllIndicies)
txtProps.Regex = NotNull(oRow.Item("REGEX_MATCH"), String.Empty) txtProps.Regex = ClassAllgemeineFunktionen.NotNullString(oRow.Item("REGEX_MATCH"), String.Empty)
txtProps.RegexMessage = NotNull(oRow.Item("REGEX_MESSAGE_DE"), String.Empty) txtProps.RegexMessage = ClassAllgemeineFunktionen.NotNullString(oRow.Item("REGEX_MESSAGE_DE"), String.Empty)
txtProps.Enable_SQL = New SQLValue(NotNull(oRow.Item("SQL_ENABLE"), "")) txtProps.Enable_SQL = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SQL_ENABLE"), ""))
txtProps.Enable_SQL_OnLoad = New SQLValue(NotNull(oRow.Item("SQL_ENABLE_ON_LOAD"), "")) txtProps.Enable_SQL_OnLoad = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SQL_ENABLE_ON_LOAD"), ""))
txtProps.SetControlData = New SQLValue(NotNull(oRow.Item("SET_CONTROL_DATA"), "")) txtProps.SetControlData = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SET_CONTROL_DATA"), ""))
txtProps.DisplayFormat = oRow.ItemEx("FORMAT_STRING", ClassControlCreator.CONTROL_TYPE_TEXT) txtProps.DisplayFormat = ClassAllgemeineFunktionen.NotNullString(oRow.Item("FORMAT_STRING"), ClassControlCreator.CONTROL_TYPE_TEXT)
props = txtProps props = txtProps
@@ -691,18 +718,18 @@ Public Class frmFormDesigner
Dim cmb As Windows.Forms.ComboBox = sender Dim cmb As Windows.Forms.ComboBox = sender
Dim cmbProps As ComboboxProperties = CreatePropsObjectWithIndicies(New ComboboxProperties, oRow, Source_AllIndicies) Dim cmbProps As ComboboxProperties = CreatePropsObjectWithIndicies(New ComboboxProperties, oRow, Source_AllIndicies)
cmbProps.ChoiceLists = Windream_ChoiceLists cmbProps.ChoiceLists = Windream_ChoiceLists
cmbProps.ChoiceList = NotNull(oRow.Item("CHOICE_LIST"), String.Empty) cmbProps.ChoiceList = ClassAllgemeineFunktionen.NotNullString(oRow.Item("CHOICE_LIST"), String.Empty)
cmbProps.Enable_SQL = New SQLValue(NotNull(oRow.Item("SQL_ENABLE"), "")) cmbProps.Enable_SQL = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SQL_ENABLE"), ""))
cmbProps.Enable_SQL_OnLoad = New SQLValue(NotNull(oRow.Item("SQL_ENABLE_ON_LOAD"), "")) cmbProps.Enable_SQL_OnLoad = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SQL_ENABLE_ON_LOAD"), ""))
cmbProps.SetControlData = New SQLValue(NotNull(oRow.Item("SET_CONTROL_DATA"), "")) cmbProps.SetControlData = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SET_CONTROL_DATA"), ""))
props = cmbProps props = cmbProps
cmbProps.DisplayAsLookUpControl = False cmbProps.DisplayAsLookUpControl = False
ElseIf TypeOf sender Is DateTimePicker Then ElseIf TypeOf sender Is DateTimePicker Then
Dim dtp As DateTimePicker = sender Dim dtp As DateTimePicker = sender
Dim dtpProps As DatepickerProperties = CreatePropsObjectWithIndicies(New DatepickerProperties, oRow, Source_AllIndicies) Dim dtpProps As DatepickerProperties = CreatePropsObjectWithIndicies(New DatepickerProperties, oRow, Source_AllIndicies)
dtpProps.Enable_SQL = New SQLValue(NotNull(oRow.Item("SQL_ENABLE"), "")) dtpProps.Enable_SQL = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SQL_ENABLE"), ""))
dtpProps.Enable_SQL_OnLoad = New SQLValue(NotNull(oRow.Item("SQL_ENABLE_ON_LOAD"), "")) dtpProps.Enable_SQL_OnLoad = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SQL_ENABLE_ON_LOAD"), ""))
props = dtpProps props = dtpProps
ElseIf TypeOf sender Is DataGridView Then ElseIf TypeOf sender Is DataGridView Then
@@ -717,17 +744,17 @@ Public Class frmFormDesigner
Dim oGridControl As GridControl = sender Dim oGridControl As GridControl = sender
Dim oGridProps As GridControlProperties = CreatePropsObjectWithIndicies(New GridControlProperties, oRow, Source_VectorIndicies) Dim oGridProps As GridControlProperties = CreatePropsObjectWithIndicies(New GridControlProperties, oRow, Source_VectorIndicies)
oGridProps.AllowAddNewValues = StrToBool(oRow.Item("VKT_ADD_ITEM")) oGridProps.AllowAddNewValues = StrToBool(oRow.Item("VKT_ADD_ITEM"))
oGridProps.Enable_SQL = New SQLValue(NotNull(oRow.Item("SQL_ENABLE"), "")) oGridProps.Enable_SQL = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SQL_ENABLE"), ""))
oGridProps.Enable_SQL_OnLoad = New SQLValue(NotNull(oRow.Item("SQL_ENABLE_ON_LOAD"), "")) oGridProps.Enable_SQL_OnLoad = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SQL_ENABLE_ON_LOAD"), ""))
props = oGridProps props = oGridProps
ElseIf TypeOf sender Is Button Then ElseIf TypeOf sender Is Button Then
Dim oButton As Button = sender Dim oButton As Button = sender
Dim oButtonProps As ButtonProperties = CreatePropsObject(New ButtonProperties, oRow, Source_VectorIndicies) Dim oButtonProps As ButtonProperties = CreatePropsObject(New ButtonProperties, oRow, Source_VectorIndicies)
oButtonProps.Text = oButton.Text oButtonProps.Text = oButton.Text
oButtonProps.SQLCommand = New SQLValue(oRow.Item("SQL_UEBERPRUEFUNG")) oButtonProps.SQLCommand = New SQLValue(oRow.Item("SQL_UEBERPRUEFUNG"))
oButtonProps.Override_SQL = New SQLValue(NotNull(oRow.Item("SQL2"), "")) oButtonProps.Override_SQL = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SQL2"), ""))
oButtonProps.Enable_SQL = New SQLValue(NotNull(oRow.Item("SQL_ENABLE"), "")) oButtonProps.Enable_SQL = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SQL_ENABLE"), ""))
oButtonProps.Enable_SQL_OnLoad = New SQLValue(NotNull(oRow.Item("SQL_ENABLE_ON_LOAD"), "")) oButtonProps.Enable_SQL_OnLoad = New SQLValue(ClassAllgemeineFunktionen.NotNullString(oRow.Item("SQL_ENABLE_ON_LOAD"), ""))
If Not IsDBNull(oRow.Item("IMAGE_CONTROL")) Then If Not IsDBNull(oRow.Item("IMAGE_CONTROL")) Then
Dim obimg() As Byte = oRow.Item("IMAGE_CONTROL") Dim obimg() As Byte = oRow.Item("IMAGE_CONTROL")
Dim oBitmap As Bitmap = ByteArrayToBitmap(obimg) Dim oBitmap As Bitmap = ByteArrayToBitmap(obimg)
@@ -754,7 +781,7 @@ Public Class frmFormDesigner
If e.ChangeType <> DevExpress.XtraVerticalGrid.RowChangeTypeEnum.Value Then If e.ChangeType <> DevExpress.XtraVerticalGrid.RowChangeTypeEnum.Value Then
Exit Sub Exit Sub
End If End If
pgControls_Focused = True
Dim prop = e.Properties.FieldName Dim prop = e.Properties.FieldName
Dim newValue = e.Properties.Value Dim newValue = e.Properties.Value
@@ -887,7 +914,19 @@ Public Class frmFormDesigner
Case "DisplayFormat" Case "DisplayFormat"
UpdateSingleValue("FORMAT_STRING", newValue) UpdateSingleValue("FORMAT_STRING", newValue)
Case "TextAlignment"
UpdateSingleValue("TEXT_ALIGNMENT", newValue)
Select Case CurrentControl.GetType()
Case GetType(TextEdit)
If TypeOf CurrentControl Is DevExpress.XtraEditors.TextEdit Then
Dim txt = DirectCast(CurrentControl, DevExpress.XtraEditors.TextEdit)
Select Case newValue
Case "Near" : txt.Properties.Appearance.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Near
Case "Center" : txt.Properties.Appearance.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Center
Case "Far" : txt.Properties.Appearance.TextOptions.HAlignment = DevExpress.Utils.HorzAlignment.Far
End Select
End If
End Select
End Select End Select
End Sub End Sub
@@ -960,7 +999,7 @@ Public Class frmFormDesigner
Private Sub MenuItemAddColumn_Click(sender As Object, e As EventArgs) Handles MenuItemAddColumn.Click Private Sub MenuItemAddColumn_Click(sender As Object, e As EventArgs) Handles MenuItemAddColumn.Click
Try Try
Dim oGuid = clsTools.ShortGuid() Dim oGuid = ClassAllgemeineFunktionen.NewShortGuid()
Dim oColumnName As String = "colNew" & oGuid Dim oColumnName As String = "colNew" & oGuid
Dim oColumnCaption As String = "New Column " & oGuid Dim oColumnCaption As String = "New Column " & oGuid
If DatabaseFallback.ExecuteNonQueryECM($"INSERT INTO TBPM_CONTROL_TABLE (CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE) VALUES({CURRENT_CONTROL_ID}, '{oColumnName}', '{oColumnCaption}', 95)") = True Then If DatabaseFallback.ExecuteNonQueryECM($"INSERT INTO TBPM_CONTROL_TABLE (CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE) VALUES({CURRENT_CONTROL_ID}, '{oColumnName}', '{oColumnCaption}', 95)") = True Then
@@ -983,17 +1022,11 @@ Public Class frmFormDesigner
Dim oldSQL = DatabaseFallback.GetScalarValueECM(oSQL) Dim oldSQL = DatabaseFallback.GetScalarValueECM(oSQL)
Dim oForm As New frmSQLEditor(LOGCONFIG, DatabaseECM) With { Dim oForm As New frmSQLEditor(LOGCONFIG, DatabaseECM) With {
.SQLCommand = oldSQL, .SQLCommand = oldSQL,
.SQLConnection = 0, .SQLConnection = 1,
.PlaceholdersManualPrefix = "CTRL", .PlaceholdersManualPrefix = "CTRL",
.PlaceholdersManualTitle = "Controls", .PlaceholdersManualTitle = "Controls",
.PlaceholdersManual = CURRENT_CONTROL_NAME_LIST.ToDictionary(Function(name) name, Function(name) name) .PlaceholdersManual = CURRENT_CONTROL_NAME_LIST.ToDictionary(Function(name) name, Function(name) name)
} }
If IDB_ACTIVE = False Then
oForm.PlaceholdersWindream = MVSource_AllIndicies
oForm.ATTRIBUTE_STORE = "WM"
Else
oForm.ATTRIBUTE_STORE = "IDB"
End If
oForm.ShowDialog() oForm.ShowDialog()
If oForm.DialogResult = DialogResult.OK Then If oForm.DialogResult = DialogResult.OK Then
@@ -1016,30 +1049,20 @@ Public Class frmFormDesigner
End Sub End Sub
Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick Private Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
Control_Delete()
End Sub
Sub Control_Delete()
If CurrentControl Is Nothing = False Then If CurrentControl Is Nothing = False Then
Dim result As MsgBoxResult = MsgBox("Wollen Sie das Control: " & CurrentControl.Name & " wirklich löschen?", MsgBoxStyle.YesNo, "Bestätigung:")
' wenn Speichern ja
If result = MsgBoxResult.Yes Then
DeleteControl(CurrentControl.Name) DeleteControl(CurrentControl.Name)
'pgControls.Enabled = False 'pgControls.Enabled = False
pgControlsNew.Enabled = False pgControlsNew.Enabled = False
tslblAenderungen.Caption = $"Control {CurrentControl.Name} deleted - " + Now.ToString
CurrentControl = Nothing CurrentControl = Nothing
RibPGCtrlHeightreal.Enabled = False RibPGCtrlheight.Enabled = False
RibPGCtrlWidth.Enabled = False RibPGCtrlWidth.Enabled = False
Reload_ControlNameList() Reload_ControlNameList()
End If
End If End If
End Sub End Sub
Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
LoadControls() LoadControls()
tslblAenderungen.Caption = "Controls loaded - " + Now.ToString
End Sub End Sub
Private Sub BarButtonItem3_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem3.ItemClick Private Sub BarButtonItem3_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem3.ItemClick
@@ -1099,35 +1122,14 @@ Public Class frmFormDesigner
End Sub End Sub
Private Sub frmFormDesigner_down(sender As Object, e As KeyEventArgs) Handles MyBase.KeyDown Private Sub frmFormDesigner_KeyUp(sender As Object, e As KeyEventArgs) Handles MyBase.KeyUp
If e.Control AndAlso (e.KeyCode = e.KeyCode.Add Or e.KeyCode = e.KeyCode.Oemplus) Then If e.KeyCode = Keys.Escape Then
Height_plus()
ElseIf e.Control AndAlso (e.KeyCode = e.KeyCode.Subtract Or e.KeyCode = e.KeyCode.OemMinus) Then
Height_minus()
Else
If e.KeyCode = e.KeyCode.Delete Then
Control_Delete()
ElseIf e.KeyCode = e.KeyCode.F5 Then
LoadControls()
tslblAenderungen.Caption = "Controls loaded - " + Now.ToString
ElseIf e.KeyCode = Keys.Escape Then
If Me.Cursor = Cursors.Cross Then If Me.Cursor = Cursors.Cross Then
Mouse_IsPressed = False Mouse_IsPressed = False
Me.Cursor = Cursors.Default Me.Cursor = Cursors.Default
End If End If
ElseIf e.KeyCode = e.KeyCode.Add Then
Width_More()
ElseIf e.KeyCode = e.KeyCode.Subtract Then
Width_min()
End If
End If
If e.Control Then
LOGGER.Debug($"KeyDown-Event: e.Control is pressed!")
End If
LOGGER.Debug($"KeyDown-Event: e.KeyCode: {e.KeyCode.ToString}")
End If
End Sub End Sub
Private Sub pnldesigner_MouseDown(sender As Object, e As MouseEventArgs) Handles pnldesigner.MouseDown Private Sub pnldesigner_MouseDown(sender As Object, e As MouseEventArgs) Handles pnldesigner.MouseDown
@@ -1138,14 +1140,13 @@ Public Class frmFormDesigner
If Cursor = Cursors.Cross And Mouse_IsPressed = True Then If Cursor = Cursors.Cross And Mouse_IsPressed = True Then
Dim cursorPosition As Point = pnldesigner.PointToClient(Cursor.Position) Dim cursorPosition As Point = pnldesigner.PointToClient(Cursor.Position)
Mouse_IsPressed = False Mouse_IsPressed = False
Try Try
Select Case NewControlSelected Select Case NewControlSelected
Case ClassControlCreator.PREFIX_LABEL Case ClassControlCreator.PREFIX_LABEL
Dim label = ControlCreator.CreateNewLabel(cursorPosition) Dim label = ControlCreator.CreateNewLabel(cursorPosition)
SetMovementHandlers(label) SetMovementHandlers(label)
TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, label.Name, "LBL", label.Text, label.Location.X, label.Location.Y, USER_USERNAME, label.Size.Height, label.Size.Width) TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, label.Name, "LBL", label.Text, label.Location.X, label.Location.Y, USER_USERNAME, label.Size.Height, label.Size.Width, label.TextAlign)
CHANGES_FORM_DESIGN = True CHANGES_FORM_DESIGN = True
CurrentControl = label CurrentControl = label
CurrentControl.Tag = New ClassControlCreator.ControlMetadata() With { CurrentControl.Tag = New ClassControlCreator.ControlMetadata() With {
@@ -1153,14 +1154,13 @@ Public Class frmFormDesigner
.ReadOnly = False .ReadOnly = False
} }
pnldesigner.Controls.Add(label) pnldesigner.Controls.Add(label)
Case ClassControlCreator.PREFIX_TEXTBOX Case ClassControlCreator.PREFIX_TEXTBOX
Dim txt = ControlCreator.CreateNewTextBox(cursorPosition) Dim txt = ControlCreator.CreateNewTextBox(cursorPosition)
SetMovementHandlers(txt) SetMovementHandlers(txt)
TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, txt.Name, "TXT", txt.Name, txt.Location.X, txt.Location.Y, USER_USERNAME, txt.Size.Height, txt.Size.Width) TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, txt.Name, "TXT", txt.Name, txt.Location.X, txt.Location.Y, USER_USERNAME, txt.Size.Height, txt.Size.Width, txt.Properties.Appearance.TextOptions.HAlignment)
CHANGES_FORM_DESIGN = True CHANGES_FORM_DESIGN = True
CurrentControl = txt CurrentControl = txt
CurrentControl.Tag = New ClassControlCreator.ControlMetadata() With { CurrentControl.Tag = New ClassControlCreator.ControlMetadata() With {
@@ -1174,7 +1174,7 @@ Public Class frmFormDesigner
Dim cmb = ControlCreator.CreateNewCombobox(cursorPosition) Dim cmb = ControlCreator.CreateNewCombobox(cursorPosition)
SetMovementHandlers(cmb) SetMovementHandlers(cmb)
TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, cmb.Name, "CMB", cmb.Name, cmb.Location.X, cmb.Location.Y, USER_USERNAME, cmb.Size.Height, cmb.Size.Width) TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, cmb.Name, "CMB", cmb.Name, cmb.Location.X, cmb.Location.Y, USER_USERNAME, cmb.Size.Height, cmb.Size.Width, "NONE")
CHANGES_FORM_DESIGN = True CHANGES_FORM_DESIGN = True
CurrentControl = cmb CurrentControl = cmb
CurrentControl.Tag = New ClassControlCreator.ControlMetadata() With { CurrentControl.Tag = New ClassControlCreator.ControlMetadata() With {
@@ -1188,7 +1188,7 @@ Public Class frmFormDesigner
Dim dtp = ControlCreator.CreateNewDatetimepicker(cursorPosition) Dim dtp = ControlCreator.CreateNewDatetimepicker(cursorPosition)
SetMovementHandlers(dtp) SetMovementHandlers(dtp)
TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, dtp.Name, "DTP", dtp.Name, dtp.Location.X, dtp.Location.Y, USER_USERNAME, dtp.Size.Height, dtp.Size.Width) TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, dtp.Name, "DTP", dtp.Name, dtp.Location.X, dtp.Location.Y, USER_USERNAME, dtp.Size.Height, dtp.Size.Width, "NONE")
CHANGES_FORM_DESIGN = True CHANGES_FORM_DESIGN = True
CurrentControl = dtp CurrentControl = dtp
CurrentControl.Tag = New ClassControlCreator.ControlMetadata() With { CurrentControl.Tag = New ClassControlCreator.ControlMetadata() With {
@@ -1202,7 +1202,7 @@ Public Class frmFormDesigner
Dim chk = ControlCreator.CreateNewCheckbox(cursorPosition) Dim chk = ControlCreator.CreateNewCheckbox(cursorPosition)
SetMovementHandlers(chk) SetMovementHandlers(chk)
TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, chk.Name, "CHK", chk.Text, chk.Location.X, chk.Location.Y, USER_USERNAME, chk.Size.Height, chk.Size.Width) TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, chk.Name, "CHK", chk.Text, chk.Location.X, chk.Location.Y, USER_USERNAME, chk.Size.Height, chk.Size.Width, "NONE")
CHANGES_FORM_DESIGN = True CHANGES_FORM_DESIGN = True
CurrentControl = chk CurrentControl = chk
CurrentControl.Tag = New ClassControlCreator.ControlMetadata() With { CurrentControl.Tag = New ClassControlCreator.ControlMetadata() With {
@@ -1217,7 +1217,7 @@ Public Class frmFormDesigner
SetMovementHandlers(lc) SetMovementHandlers(lc)
TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, lc.Name, "LOOKUP", lc.Name, lc.Location.X, lc.Location.Y, USER_USERNAME, lc.Size.Height, lc.Size.Width) TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, lc.Name, "LOOKUP", lc.Name, lc.Location.X, lc.Location.Y, USER_USERNAME, lc.Size.Height, lc.Size.Width, lc.Properties.Appearance.TextOptions.HAlignment)
CHANGES_FORM_DESIGN = True CHANGES_FORM_DESIGN = True
CurrentControl = lc CurrentControl = lc
CurrentControl.Tag = New ClassControlCreator.ControlMetadata() With { CurrentControl.Tag = New ClassControlCreator.ControlMetadata() With {
@@ -1233,7 +1233,7 @@ Public Class frmFormDesigner
SetMovementHandlers(tb) SetMovementHandlers(tb)
AddHandler tb.MouseClick, AddressOf gridControl_MouseClick AddHandler tb.MouseClick, AddressOf gridControl_MouseClick
TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, tb.Name, "TABLE", tb.Name, tb.Location.X, tb.Location.Y, USER_USERNAME, tb.Size.Height, tb.Size.Width) TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, tb.Name, "TABLE", tb.Name, tb.Location.X, tb.Location.Y, USER_USERNAME, tb.Size.Height, tb.Size.Width, "NONE")
CHANGES_FORM_DESIGN = True CHANGES_FORM_DESIGN = True
Dim oControlId = GetLastID() Dim oControlId = GetLastID()
@@ -1243,8 +1243,8 @@ Public Class frmFormDesigner
.ReadOnly = False .ReadOnly = False
} }
TBPM_CONTROL_TABLETableAdapter.Insert(oControlId, "column1", "Column1", 95, USER_USERNAME, "TEXT") TBPM_CONTROL_TABLETableAdapter.Insert(oControlId, "column1", "Column1", 95, USER_USERNAME, "TEXT", 0)
TBPM_CONTROL_TABLETableAdapter.Insert(oControlId, "column2", "Column2", 95, USER_USERNAME, "TEXT") TBPM_CONTROL_TABLETableAdapter.Insert(oControlId, "column2", "Column2", 95, USER_USERNAME, "TEXT", 0)
pnldesigner.Controls.Add(tb) pnldesigner.Controls.Add(tb)
Case ClassControlCreator.PREFIX_LINE Case ClassControlCreator.PREFIX_LINE
@@ -1252,7 +1252,7 @@ Public Class frmFormDesigner
SetMovementHandlers(line) SetMovementHandlers(line)
TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, line.Name, "LINE", line.Name, line.Location.X, line.Location.Y, USER_USERNAME, line.Size.Height, line.Size.Width) TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, line.Name, "LINE", line.Name, line.Location.X, line.Location.Y, USER_USERNAME, line.Size.Height, line.Size.Width, "NONE")
CHANGES_FORM_DESIGN = True CHANGES_FORM_DESIGN = True
CurrentControl = line CurrentControl = line
CurrentControl.Tag = New ClassControlCreator.ControlMetadata() With { CurrentControl.Tag = New ClassControlCreator.ControlMetadata() With {
@@ -1267,7 +1267,7 @@ Public Class frmFormDesigner
SetMovementHandlers(oButton) SetMovementHandlers(oButton)
TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, oButton.Name, "BUTTON", oButton.Name, oButton.Location.X, oButton.Location.Y, USER_USERNAME, oButton.Size.Height, oButton.Size.Width) TBPM_PROFILE_CONTROLSTableAdapter.cmdInsertAnlage(ProfileId, oButton.Name, "BUTTON", oButton.Name, oButton.Location.X, oButton.Location.Y, USER_USERNAME, oButton.Size.Height, oButton.Size.Width, "NONE")
CHANGES_FORM_DESIGN = True CHANGES_FORM_DESIGN = True
CurrentControl = oButton CurrentControl = oButton
CurrentControl.Tag = New ClassControlCreator.ControlMetadata() With { CurrentControl.Tag = New ClassControlCreator.ControlMetadata() With {
@@ -1283,7 +1283,7 @@ Public Class frmFormDesigner
End If End If
If Not IsNothing(CurrentControl) Then If Not IsNothing(CurrentControl) Then
RibPGCtrlHeightreal.Enabled = True RibPGCtrlheight.Enabled = True
RibPGCtrlWidth.Enabled = True RibPGCtrlWidth.Enabled = True
End If End If
Catch ex As Exception Catch ex As Exception
@@ -1297,23 +1297,61 @@ Public Class frmFormDesigner
End Sub End Sub
Private Sub bbtniwidth_plus_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtniwidth_plus.ItemClick Private Sub bbtniwidth_plus_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtniwidth_plus.ItemClick
Width_More() Width_Plus()
End Sub End Sub
Sub Width_More()
Private Sub bbtniwidth_min_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtniwidth_min.ItemClick
Width_Min()
End Sub
Private Sub bbtniheight_min_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtniheight_min.ItemClick
Height_minus()
End Sub
Private Sub bbtniheight_plus_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtniheight_plus.ItemClick
Height_plus()
End Sub
Private Sub frmFormDesigner_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown
If e.Control AndAlso (e.KeyCode = e.KeyCode.Add Or e.KeyCode = e.KeyCode.Oemplus) Then
Height_plus()
ElseIf e.Control AndAlso (e.KeyCode = e.KeyCode.Subtract Or e.KeyCode = e.KeyCode.Oemplus) Then
Height_minus()
Else
Console.WriteLine("e.keycode: " + e.KeyCode.ToString)
If e.KeyCode = e.KeyCode.Delete And pgControls_Focused = False Then
Control_Delete()
ElseIf e.KeyCode = e.KeyCode.F5 Then
LoadControls()
tslblAenderungen.Caption = "Controls loaded - " + Now.ToString
ElseIf e.KeyCode = Keys.Escape Then
If Me.Cursor = Cursors.Cross Then
Mouse_IsPressed = False
Me.Cursor = Cursors.Default
End If
ElseIf (e.KeyCode = e.KeyCode.Add Or e.KeyCode = e.KeyCode.Oemplus) Then
Width_Plus()
ElseIf (e.KeyCode = e.KeyCode.Subtract Or e.KeyCode = e.KeyCode.Oemplus) Then
Width_Min()
End If
End If
End Sub
Sub Width_Plus()
If CurrentControl Is Nothing = False Then If CurrentControl Is Nothing = False Then
CurrentControl.Size = New Size(CurrentControl.Width + 5, CurrentControl.Height) CurrentControl.Size = New Size(CurrentControl.Width + 5, CurrentControl.Height)
DirectCast(pgControlsNew.SelectedObject, BaseProperties).Size = CurrentControl.Size DirectCast(pgControlsNew.SelectedObject, BaseProperties).Size = CurrentControl.Size
pgControlsNew.UpdateData() pgControlsNew.UpdateData()
UpdateSingleValue("WIDTH", CurrentControl.Size.Width) UpdateSingleValue("WIDTH", CurrentControl.Size.Width)
Else
MsgBox("Please choose a control!", MsgBoxStyle.Information)
End If End If
End Sub End Sub
Private Sub bbtniwidth_min_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtniwidth_min.ItemClick Sub Width_Min()
Width_min()
End Sub
Sub Width_min()
If CurrentControl Is Nothing = False Then If CurrentControl Is Nothing = False Then
Dim newWidth = CurrentControl.Width - 5 Dim newWidth = CurrentControl.Width - 5
' Verhindert, dass das Control unsichtbar wird ' Verhindert, dass das Control unsichtbar wird
@@ -1325,57 +1363,75 @@ Public Class frmFormDesigner
pgControlsNew.UpdateData() pgControlsNew.UpdateData()
UpdateSingleValue("WIDTH", CurrentControl.Size.Width) UpdateSingleValue("WIDTH", CurrentControl.Size.Width)
Else
MsgBox("Please choose a control!", MsgBoxStyle.Information)
End If End If
End Sub End Sub
Private Sub bbtniheight_min_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtniheight_min.ItemClick
Height_minus()
End Sub
Sub Height_minus() Sub Height_minus()
If CurrentControl Is Nothing = False Then If CurrentControl Is Nothing = False Then
Dim newHeight As Integer = CurrentControl.Height - 5 Dim newHeight As Integer = CurrentControl.Height - 5
Dim oReloadNeeded As Boolean = False
If newHeight <= 22 And TypeOf CurrentControl Is DevExpress.XtraEditors.MemoEdit Then
' TODO: Implement Multiline TextBox oReloadNeeded = True
'If newHeight < 22 And TypeOf CurrentControl Is TextBox Then
' DirectCast(CurrentControl, TextBox).Multiline = True ' DirectCast(CurrentControl, TextBox).Multiline = True
'End If ElseIf newHeight <= 20 Then
' Verhindert, dass das Control unsichtbar wird
If newHeight < 1 Then
Exit Sub Exit Sub
End If End If
CurrentControl.Size = New Size(CurrentControl.Width, newHeight) CurrentControl.Size = New Size(CurrentControl.Width, newHeight)
DirectCast(pgControlsNew.SelectedObject, BaseProperties).Size = CurrentControl.Size DirectCast(pgControlsNew.SelectedObject, BaseProperties).Size = CurrentControl.Size
pgControlsNew.UpdateData() pgControlsNew.UpdateData()
UpdateSingleValue("HEIGHT", newHeight) If UpdateSingleValue("HEIGHT", newHeight) And oReloadNeeded Then
Else LoadControls()
MsgBox("Please choose a control!", MsgBoxStyle.Information) LoadControlProperties(CurrentControl)
End If
End If End If
End Sub
Private Sub bbtniheight_plus_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles bbtniheight_plus.ItemClick
Height_plus()
End Sub End Sub
Sub Height_plus() Sub Height_plus()
If CurrentControl Is Nothing = False Then If CurrentControl Is Nothing = False Then
Dim newHeight As Integer = CurrentControl.Height + 5 Dim newHeight As Integer = CurrentControl.Height + 5
Dim oReloadNeeded As Boolean = False
' TODO: Implement Multiline Textbox ' TODO: Implement Multiline Textbox
'If newHeight > 21 And TypeOf CurrentControl Is TextBox Then If newHeight > 21 And TypeOf CurrentControl Is DevExpress.XtraEditors.TextEdit Then
Console.WriteLine("Multiline directcast")
oReloadNeeded = True
' DirectCast(CurrentControl, TextBox).Multiline = True ' DirectCast(CurrentControl, TextBox).Multiline = True
'End If End If
CurrentControl.Size = New Size(CurrentControl.Width, newHeight) CurrentControl.Size = New Size(CurrentControl.Width, newHeight)
DirectCast(pgControlsNew.SelectedObject, BaseProperties).Size = CurrentControl.Size DirectCast(pgControlsNew.SelectedObject, BaseProperties).Size = CurrentControl.Size
pgControlsNew.UpdateData() pgControlsNew.UpdateData()
UpdateSingleValue("HEIGHT", newHeight) If UpdateSingleValue("HEIGHT", newHeight) And oReloadNeeded Then
Else LoadControls()
MsgBox("Please choose a control!", MsgBoxStyle.Information) CurrentControl.Select()
CurrentControl.BackColor = Color.Orange
End If
End If End If
End Sub End Sub
Private Sub pgControlsNew_KeyPress(sender As Object, e As KeyPressEventArgs) Handles pgControlsNew.KeyPress
pgControls_Focused = True
End Sub
Private Sub pgControlsNew_Leave(sender As Object, e As EventArgs) Handles pgControlsNew.Leave
pgControls_Focused = False
End Sub
Private Sub pgControlsNew_KeyUp(sender As Object, e As KeyEventArgs) Handles pgControlsNew.KeyUp
pgControls_Focused = True
End Sub
Private Sub pgControlsNew_Click(sender As Object, e As EventArgs) Handles pgControlsNew.Click
pgControls_Focused = True
End Sub
Private Sub pgControlsNew_GotFocus(sender As Object, e As EventArgs) Handles pgControlsNew.GotFocus
pgControls_Focused = True
End Sub
Private Sub pgControlsNew_Enter(sender As Object, e As EventArgs) Handles pgControlsNew.Enter
pgControls_Focused = True
End Sub
End Class End Class

View File

@@ -1,11 +1,11 @@
Public Class frmGhostMode Public Class frmGhostMode
Private Sub frmGhostMode_Load(sender As Object, e As EventArgs) Handles Me.Load Private Sub frmGhostMode_Load(sender As Object, e As EventArgs) Handles Me.Load
Dim oSQL = "SELECT [SQL_COMMAND] FROM TBDD_SQL_COMMANDS where TITLE = 'GHOST_SELECT'" Dim oSQL = "SELECT [SQL_COMMAND] FROM TBDD_SQL_COMMANDS WITH (NOLOCK) where TITLE = 'GHOST_SELECT'"
Dim DT_USER = DatabaseFallback.GetDatatableECM(oSQL) Dim DT_USER = DatabaseFallback.GetDatatableECM(oSQL)
' '
If IsNothing(DT_USER) Then If IsNothing(DT_USER) Then
LOGGER.Info("GHOST Select 1 was nothing, now trying 2nd..") LOGGER.Info("GHOST Select 1 was nothing, now trying 2nd..")
oSQL = "SELECT CONFIG_VALUE FROM TBIDB_BASE WHERE CONFIG_NAME = 'GHOST_SELECT'" oSQL = "SELECT CONFIG_VALUE FROM TBIDB_BASE WITH (NOLOCK) WHERE CONFIG_NAME = 'GHOST_SELECT'"
If Not IsNothing(oSQL) Then If Not IsNothing(oSQL) Then
oSQL = DatabaseFallback.GetScalarValueIDB(oSQL) oSQL = DatabaseFallback.GetScalarValueIDB(oSQL)
DT_USER = DatabaseFallback.GetDatatableIDB(oSQL) DT_USER = DatabaseFallback.GetDatatableIDB(oSQL)

View File

@@ -193,10 +193,10 @@ Partial Class frmInvDashboard
Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar() Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage() Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet() Me.DD_DMSLiteDataSet = New taskFLOW.DD_DMSLiteDataSet()
Me.VWPM_CHART_INVOICE_MONITOR_SERIESBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.VWPM_CHART_INVOICE_MONITOR_SERIESBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter() Me.VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.VWPM_CHART_INVOICE_MONITOR_SERIESTableAdapter()
Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager() Me.TableAdapterManager = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
Me.GridControl1 = New DevExpress.XtraGrid.GridControl() Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
Me.TileView1 = New DevExpress.XtraGrid.Views.Tile.TileView() Me.TileView1 = New DevExpress.XtraGrid.Views.Tile.TileView()
Me.Label1 = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label()
@@ -210,7 +210,7 @@ Partial Class frmInvDashboard
Me.SplitContainerDashboard = New System.Windows.Forms.SplitContainer() Me.SplitContainerDashboard = New System.Windows.Forms.SplitContainer()
Me.SplitContainerTop = New System.Windows.Forms.SplitContainer() Me.SplitContainerTop = New System.Windows.Forms.SplitContainer()
Me.ChartTopLeft = New DevExpress.XtraCharts.ChartControl() Me.ChartTopLeft = New DevExpress.XtraCharts.ChartControl()
Me.VWPM_CHART_TOP5TableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.VWPM_CHART_TOP5TableAdapter() Me.VWPM_CHART_TOP5TableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.VWPM_CHART_TOP5TableAdapter()
Me.ChartTopRight = New DevExpress.XtraCharts.ChartControl() Me.ChartTopRight = New DevExpress.XtraCharts.ChartControl()
Me.SplitContainerBottom = New System.Windows.Forms.SplitContainer() Me.SplitContainerBottom = New System.Windows.Forms.SplitContainer()
Me.ChartBottomLeft = New DevExpress.XtraCharts.ChartControl() Me.ChartBottomLeft = New DevExpress.XtraCharts.ChartControl()
@@ -1140,7 +1140,7 @@ Partial Class frmInvDashboard
Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete Me.TableAdapterManager.UpdateOrder = taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
' '
'GridControl1 'GridControl1
' '

View File

@@ -60,10 +60,10 @@ Partial Class frmKonfig
Me.LogNachrichtenLeerenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.LogNachrichtenLeerenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.SpeichereLogAlsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.SpeichereLogAlsToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.gvLogs = New DevExpress.XtraGrid.Views.Grid.GridView() Me.gvLogs = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet() Me.DD_DMSLiteDataSet = New taskFLOW.DD_DMSLiteDataSet()
Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBPM_KONFIGURATIONTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter() Me.TBPM_KONFIGURATIONTableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter()
Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager() Me.TableAdapterManager = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
Me.SaveFileDialog1 = New System.Windows.Forms.SaveFileDialog() Me.SaveFileDialog1 = New System.Windows.Forms.SaveFileDialog()
Me.TabControl1.SuspendLayout() Me.TabControl1.SuspendLayout()
Me.TabPage2.SuspendLayout() Me.TabPage2.SuspendLayout()
@@ -176,7 +176,7 @@ Partial Class frmKonfig
' '
'BtnConnect 'BtnConnect
' '
Me.BtnConnect.Image = Global.DD_ProcessManager.My.Resources.Resources.database_go Me.BtnConnect.Image = Global.taskFLOW.My.Resources.Resources.database_go
resources.ApplyResources(Me.BtnConnect, "BtnConnect") resources.ApplyResources(Me.BtnConnect, "BtnConnect")
Me.BtnConnect.Name = "BtnConnect" Me.BtnConnect.Name = "BtnConnect"
Me.BtnConnect.UseVisualStyleBackColor = True Me.BtnConnect.UseVisualStyleBackColor = True
@@ -227,7 +227,7 @@ Partial Class frmKonfig
' '
'BtnCreateLogfiles 'BtnCreateLogfiles
' '
Me.BtnCreateLogfiles.Image = Global.DD_ProcessManager.My.Resources.Resources.AttachFileHS Me.BtnCreateLogfiles.Image = Global.taskFLOW.My.Resources.Resources.AttachFileHS
resources.ApplyResources(Me.BtnCreateLogfiles, "BtnCreateLogfiles") resources.ApplyResources(Me.BtnCreateLogfiles, "BtnCreateLogfiles")
Me.BtnCreateLogfiles.Name = "BtnCreateLogfiles" Me.BtnCreateLogfiles.Name = "BtnCreateLogfiles"
Me.BtnCreateLogfiles.UseVisualStyleBackColor = True Me.BtnCreateLogfiles.UseVisualStyleBackColor = True
@@ -245,10 +245,10 @@ Partial Class frmKonfig
' '
'txtIntervall 'txtIntervall
' '
Me.txtIntervall.DataBindings.Add(New System.Windows.Forms.Binding("Text", Global.DD_ProcessManager.My.MySettings.Default, "IntervallReminder", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged)) Me.txtIntervall.DataBindings.Add(New System.Windows.Forms.Binding("Text", Global.taskFLOW.My.MySettings.Default, "IntervallReminder", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged))
resources.ApplyResources(Me.txtIntervall, "txtIntervall") resources.ApplyResources(Me.txtIntervall, "txtIntervall")
Me.txtIntervall.Name = "txtIntervall" Me.txtIntervall.Name = "txtIntervall"
Me.txtIntervall.Text = Global.DD_ProcessManager.My.MySettings.Default.IntervallReminder Me.txtIntervall.Text = Global.taskFLOW.My.MySettings.Default.IntervallReminder
' '
'Label6 'Label6
' '
@@ -356,7 +356,7 @@ Partial Class frmKonfig
Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete Me.TableAdapterManager.UpdateOrder = taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
' '
'frmKonfig 'frmKonfig
' '
@@ -397,10 +397,10 @@ Partial Class frmKonfig
Friend WithEvents txtActualConnection As System.Windows.Forms.TextBox Friend WithEvents txtActualConnection As System.Windows.Forms.TextBox
Friend WithEvents chkbxUserAut As System.Windows.Forms.CheckBox Friend WithEvents chkbxUserAut As System.Windows.Forms.CheckBox
Friend WithEvents TabPage3 As System.Windows.Forms.TabPage Friend WithEvents TabPage3 As System.Windows.Forms.TabPage
Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet Friend WithEvents DD_DMSLiteDataSet As taskFLOW.DD_DMSLiteDataSet
Friend WithEvents TBPM_KONFIGURATIONBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPM_KONFIGURATIONBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBPM_KONFIGURATIONTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter Friend WithEvents TBPM_KONFIGURATIONTableAdapter As taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter
Friend WithEvents TableAdapterManager As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager Friend WithEvents TableAdapterManager As taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
Friend WithEvents Button1 As System.Windows.Forms.Button Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents LinkLabel1 As System.Windows.Forms.LinkLabel Friend WithEvents LinkLabel1 As System.Windows.Forms.LinkLabel
Friend WithEvents btnOpenAppDataFolder As System.Windows.Forms.Button Friend WithEvents btnOpenAppDataFolder As System.Windows.Forms.Button

View File

@@ -39,10 +39,10 @@ Partial Class frmLicense
Me.txtlicenseCount = New System.Windows.Forms.TextBox() Me.txtlicenseCount = New System.Windows.Forms.TextBox()
Me.lblnewlicenses = New System.Windows.Forms.Label() Me.lblnewlicenses = New System.Windows.Forms.Label()
Me.lblAktuelleLizenzen = New System.Windows.Forms.Label() Me.lblAktuelleLizenzen = New System.Windows.Forms.Label()
Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet() Me.DD_DMSLiteDataSet = New taskFLOW.DD_DMSLiteDataSet()
Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBPM_KONFIGURATIONTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter() Me.TBPM_KONFIGURATIONTableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter()
Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager() Me.TableAdapterManager = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
Me.Label4 = New System.Windows.Forms.Label() Me.Label4 = New System.Windows.Forms.Label()
Me.txtModules = New System.Windows.Forms.TextBox() Me.txtModules = New System.Windows.Forms.TextBox()
Me.grbBoxlicense.SuspendLayout() Me.grbBoxlicense.SuspendLayout()
@@ -125,7 +125,7 @@ Partial Class frmLicense
' '
'btnnewLicenses 'btnnewLicenses
' '
Me.btnnewLicenses.Image = Global.DD_ProcessManager.My.Resources.Resources.key_go Me.btnnewLicenses.Image = Global.taskFLOW.My.Resources.Resources.key_go
resources.ApplyResources(Me.btnnewLicenses, "btnnewLicenses") resources.ApplyResources(Me.btnnewLicenses, "btnnewLicenses")
Me.btnnewLicenses.Name = "btnnewLicenses" Me.btnnewLicenses.Name = "btnnewLicenses"
Me.btnnewLicenses.UseVisualStyleBackColor = True Me.btnnewLicenses.UseVisualStyleBackColor = True
@@ -175,7 +175,7 @@ Partial Class frmLicense
Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete Me.TableAdapterManager.UpdateOrder = taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
' '
'Label4 'Label4
' '
@@ -217,10 +217,10 @@ Partial Class frmLicense
Friend WithEvents txtlicenseCount As System.Windows.Forms.TextBox Friend WithEvents txtlicenseCount As System.Windows.Forms.TextBox
Friend WithEvents lblnewlicenses As System.Windows.Forms.Label Friend WithEvents lblnewlicenses As System.Windows.Forms.Label
Friend WithEvents lblAktuelleLizenzen As System.Windows.Forms.Label Friend WithEvents lblAktuelleLizenzen As System.Windows.Forms.Label
Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet Friend WithEvents DD_DMSLiteDataSet As taskFLOW.DD_DMSLiteDataSet
Friend WithEvents TBPM_KONFIGURATIONBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPM_KONFIGURATIONBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBPM_KONFIGURATIONTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter Friend WithEvents TBPM_KONFIGURATIONTableAdapter As taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter
Friend WithEvents TableAdapterManager As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager Friend WithEvents TableAdapterManager As taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents dtp_Gültigkeit As System.Windows.Forms.DateTimePicker Friend WithEvents dtp_Gültigkeit As System.Windows.Forms.DateTimePicker
Friend WithEvents Label3 As System.Windows.Forms.Label Friend WithEvents Label3 As System.Windows.Forms.Label

View File

@@ -781,7 +781,7 @@
<value>DD_DMSLiteDataSet</value> <value>DD_DMSLiteDataSet</value>
</data> </data>
<data name="&gt;&gt;DD_DMSLiteDataSet.Type" xml:space="preserve"> <data name="&gt;&gt;DD_DMSLiteDataSet.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBPM_KONFIGURATIONBindingSource.Name" xml:space="preserve"> <data name="&gt;&gt;TBPM_KONFIGURATIONBindingSource.Name" xml:space="preserve">
<value>TBPM_KONFIGURATIONBindingSource</value> <value>TBPM_KONFIGURATIONBindingSource</value>
@@ -793,13 +793,13 @@
<value>TBPM_KONFIGURATIONTableAdapter</value> <value>TBPM_KONFIGURATIONTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBPM_KONFIGURATIONTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBPM_KONFIGURATIONTableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve"> <data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve">
<value>TableAdapterManager</value> <value>TableAdapterManager</value>
</data> </data>
<data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve"> <data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;$this.Name" xml:space="preserve"> <data name="&gt;&gt;$this.Name" xml:space="preserve">
<value>frmLicense</value> <value>frmLicense</value>

View File

@@ -28,10 +28,10 @@ Partial Class frmLoginAdmin
Me.Label1 = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label()
Me.btnAbbruch = New System.Windows.Forms.Button() Me.btnAbbruch = New System.Windows.Forms.Button()
Me.btnok = New System.Windows.Forms.Button() Me.btnok = New System.Windows.Forms.Button()
Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet() Me.DD_DMSLiteDataSet = New taskFLOW.DD_DMSLiteDataSet()
Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBPM_KONFIGURATIONTableAdapter = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter() Me.TBPM_KONFIGURATIONTableAdapter = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter()
Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager() Me.TableAdapterManager = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
Me.Button1 = New System.Windows.Forms.Button() Me.Button1 = New System.Windows.Forms.Button()
CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBPM_KONFIGURATIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBPM_KONFIGURATIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -88,11 +88,11 @@ Partial Class frmLoginAdmin
Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete Me.TableAdapterManager.UpdateOrder = taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
' '
'Button1 'Button1
' '
Me.Button1.Image = Global.DD_ProcessManager.My.Resources.Resources.asterisk_yellow Me.Button1.Image = Global.taskFLOW.My.Resources.Resources.asterisk_yellow
resources.ApplyResources(Me.Button1, "Button1") resources.ApplyResources(Me.Button1, "Button1")
Me.Button1.Name = "Button1" Me.Button1.Name = "Button1"
Me.Button1.UseVisualStyleBackColor = True Me.Button1.UseVisualStyleBackColor = True
@@ -120,9 +120,9 @@ Partial Class frmLoginAdmin
Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents btnAbbruch As System.Windows.Forms.Button Friend WithEvents btnAbbruch As System.Windows.Forms.Button
Friend WithEvents btnok As System.Windows.Forms.Button Friend WithEvents btnok As System.Windows.Forms.Button
Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet Friend WithEvents DD_DMSLiteDataSet As taskFLOW.DD_DMSLiteDataSet
Friend WithEvents TBPM_KONFIGURATIONBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPM_KONFIGURATIONBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBPM_KONFIGURATIONTableAdapter As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter Friend WithEvents TBPM_KONFIGURATIONTableAdapter As taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter
Friend WithEvents TableAdapterManager As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager Friend WithEvents TableAdapterManager As taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
Friend WithEvents Button1 As System.Windows.Forms.Button Friend WithEvents Button1 As System.Windows.Forms.Button
End Class End Class

View File

@@ -280,7 +280,7 @@
<value>DD_DMSLiteDataSet</value> <value>DD_DMSLiteDataSet</value>
</data> </data>
<data name="&gt;&gt;DD_DMSLiteDataSet.Type" xml:space="preserve"> <data name="&gt;&gt;DD_DMSLiteDataSet.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSet, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBPM_KONFIGURATIONBindingSource.Name" xml:space="preserve"> <data name="&gt;&gt;TBPM_KONFIGURATIONBindingSource.Name" xml:space="preserve">
<value>TBPM_KONFIGURATIONBindingSource</value> <value>TBPM_KONFIGURATIONBindingSource</value>
@@ -292,13 +292,13 @@
<value>TBPM_KONFIGURATIONTableAdapter</value> <value>TBPM_KONFIGURATIONTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBPM_KONFIGURATIONTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBPM_KONFIGURATIONTableAdapter.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve"> <data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve">
<value>TableAdapterManager</value> <value>TableAdapterManager</value>
</data> </data>
<data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve"> <data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve">
<value>DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager, DD_DMSLiteDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;$this.Name" xml:space="preserve"> <data name="&gt;&gt;$this.Name" xml:space="preserve">
<value>frmLoginAdmin</value> <value>frmLoginAdmin</value>

View File

@@ -25,8 +25,8 @@ Partial Class frmMain
Me.components = New System.ComponentModel.Container() Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMain)) Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMain))
Me.ImageListProfile = New System.Windows.Forms.ImageList(Me.components) Me.ImageListProfile = New System.Windows.Forms.ImageList(Me.components)
Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet() Me.DD_DMSLiteDataSet = New taskFLOW.DD_DMSLiteDataSet()
Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager() Me.TableAdapterManager = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
Me.Panel1 = New System.Windows.Forms.Panel() Me.Panel1 = New System.Windows.Forms.Panel()
Me.GridControlWorkflows = New DevExpress.XtraGrid.GridControl() Me.GridControlWorkflows = New DevExpress.XtraGrid.GridControl()
Me.GridViewWorkflows = New DevExpress.XtraGrid.Views.Grid.GridView() Me.GridViewWorkflows = New DevExpress.XtraGrid.Views.Grid.GridView()
@@ -83,6 +83,7 @@ Partial Class frmMain
Me.BBtnItmNotfications = New DevExpress.XtraBars.BarButtonItem() Me.BBtnItmNotfications = New DevExpress.XtraBars.BarButtonItem()
Me.BSIVERSION1 = New DevExpress.XtraBars.BarStaticItem() Me.BSIVERSION1 = New DevExpress.XtraBars.BarStaticItem()
Me.barbtnitmsaveLogfiles = New DevExpress.XtraBars.BarButtonItem() Me.barbtnitmsaveLogfiles = New DevExpress.XtraBars.BarButtonItem()
Me.bsitmCount = New DevExpress.XtraBars.BarStaticItem()
Me.RibbonPageStart = New DevExpress.XtraBars.Ribbon.RibbonPage() Me.RibbonPageStart = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
@@ -241,10 +242,11 @@ Partial Class frmMain
Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete Me.TableAdapterManager.UpdateOrder = taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
' '
'Panel1 'Panel1
' '
Me.Panel1.BackColor = System.Drawing.Color.Transparent
Me.Panel1.Controls.Add(Me.GridControlWorkflows) Me.Panel1.Controls.Add(Me.GridControlWorkflows)
Me.Panel1.Controls.Add(Me.Panel2) Me.Panel1.Controls.Add(Me.Panel2)
Me.Panel1.Controls.Add(Me.NavBarControl1) Me.Panel1.Controls.Add(Me.NavBarControl1)
@@ -263,6 +265,8 @@ Partial Class frmMain
' '
Me.GridViewWorkflows.Appearance.EvenRow.BackColor = System.Drawing.Color.Azure Me.GridViewWorkflows.Appearance.EvenRow.BackColor = System.Drawing.Color.Azure
Me.GridViewWorkflows.Appearance.EvenRow.Options.UseBackColor = True Me.GridViewWorkflows.Appearance.EvenRow.Options.UseBackColor = True
Me.GridViewWorkflows.Appearance.FooterPanel.Font = CType(resources.GetObject("GridViewWorkflows.Appearance.FooterPanel.Font"), System.Drawing.Font)
Me.GridViewWorkflows.Appearance.FooterPanel.Options.UseFont = True
Me.GridViewWorkflows.Appearance.ViewCaption.Font = CType(resources.GetObject("GridViewWorkflows.Appearance.ViewCaption.Font"), System.Drawing.Font) Me.GridViewWorkflows.Appearance.ViewCaption.Font = CType(resources.GetObject("GridViewWorkflows.Appearance.ViewCaption.Font"), System.Drawing.Font)
Me.GridViewWorkflows.Appearance.ViewCaption.ForeColor = System.Drawing.Color.Black Me.GridViewWorkflows.Appearance.ViewCaption.ForeColor = System.Drawing.Color.Black
Me.GridViewWorkflows.Appearance.ViewCaption.Options.UseFont = True Me.GridViewWorkflows.Appearance.ViewCaption.Options.UseFont = True
@@ -289,9 +293,9 @@ Partial Class frmMain
'RibbonControl1 'RibbonControl1
' '
Me.RibbonControl1.ExpandCollapseItem.Id = 0 Me.RibbonControl1.ExpandCollapseItem.Id = 0
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bbtniRefresh, Me.bbtniMonitor, Me.bbiProfilverwaltung, Me.bbiKonfiguration, Me.bbtniGrundeinstellung, Me.bbtnitemInfo, Me.BarButtonItem1, Me.bsiUser, Me.bsiLicenses, Me.bsiUserLoggedIn, Me.bsiVersion, Me.bsilastsync, Me.bsiDebug, Me.bsiMessage, Me.bbtniMetadataFile, Me.BarEditItem1, Me.bbtnitDashboardInv, Me.bsiGeneralInfo, Me.bbtnitmGhostMode, Me.bsi_GhostMode, Me.BarButtonItemGhostMode, Me.SearchItem1, Me.SearchItem2, Me.BarStaticItemAppServer, Me.bbtniCW, Me.bsiInactivityCheck, Me.BarButtonItem2, Me.BarCheckItemAutofilter, Me.BarCheckItem2, Me.BarButtonItemResetLayout, Me.BarButtonItem4, Me.BarButtonItemExportExcel, Me.BarButtonItem6, Me.BarButtonItem7, Me.BarButtonItemWFSingle, Me.BarButtonItemWFGroup, Me.BarButtonItemFileLink, Me.BarButtonItemMassValidation, Me.BarCheckItemShowSearch, Me.barItemGridFontSize, Me.BarButtonItem8, Me.BbtnitmAHWF1, Me.BbtnitmAHWF2, Me.BbtnitmAHWF3, Me.BbtnitmAHWF4, Me.bbtnitmLanguage_Change, Me.BarButtonItem10, Me.BBtnItmNotfications, Me.BSIVERSION1, Me.barbtnitmsaveLogfiles}) Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bbtniRefresh, Me.bbtniMonitor, Me.bbiProfilverwaltung, Me.bbiKonfiguration, Me.bbtniGrundeinstellung, Me.bbtnitemInfo, Me.BarButtonItem1, Me.bsiUser, Me.bsiLicenses, Me.bsiUserLoggedIn, Me.bsiVersion, Me.bsilastsync, Me.bsiDebug, Me.bsiMessage, Me.bbtniMetadataFile, Me.BarEditItem1, Me.bbtnitDashboardInv, Me.bsiGeneralInfo, Me.bbtnitmGhostMode, Me.bsi_GhostMode, Me.BarButtonItemGhostMode, Me.SearchItem1, Me.SearchItem2, Me.BarStaticItemAppServer, Me.bbtniCW, Me.bsiInactivityCheck, Me.BarButtonItem2, Me.BarCheckItemAutofilter, Me.BarCheckItem2, Me.BarButtonItemResetLayout, Me.BarButtonItem4, Me.BarButtonItemExportExcel, Me.BarButtonItem6, Me.BarButtonItem7, Me.BarButtonItemWFSingle, Me.BarButtonItemWFGroup, Me.BarButtonItemFileLink, Me.BarButtonItemMassValidation, Me.BarCheckItemShowSearch, Me.barItemGridFontSize, Me.BarButtonItem8, Me.BbtnitmAHWF1, Me.BbtnitmAHWF2, Me.BbtnitmAHWF3, Me.BbtnitmAHWF4, Me.bbtnitmLanguage_Change, Me.BarButtonItem10, Me.BBtnItmNotfications, Me.BSIVERSION1, Me.barbtnitmsaveLogfiles, Me.bsitmCount})
resources.ApplyResources(Me.RibbonControl1, "RibbonControl1") resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
Me.RibbonControl1.MaxItemId = 56 Me.RibbonControl1.MaxItemId = 57
Me.RibbonControl1.Name = "RibbonControl1" Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPageStart, Me.RibbonPageTabelle, Me.RibbonPageAktionen}) Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPageStart, Me.RibbonPageTabelle, Me.RibbonPageAktionen})
Me.RibbonControl1.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemProgressBar1, Me.RepositoryItemTrackBar1, Me.cmbGridFontSize}) Me.RibbonControl1.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemProgressBar1, Me.RepositoryItemTrackBar1, Me.cmbGridFontSize})
@@ -362,7 +366,7 @@ Partial Class frmMain
' '
resources.ApplyResources(Me.bsiUser, "bsiUser") resources.ApplyResources(Me.bsiUser, "bsiUser")
Me.bsiUser.Id = 8 Me.bsiUser.Id = 8
Me.bsiUser.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.actions_user Me.bsiUser.ImageOptions.SvgImage = Global.taskFLOW.My.Resources.Resources.actions_user
Me.bsiUser.Name = "bsiUser" Me.bsiUser.Name = "bsiUser"
Me.bsiUser.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph Me.bsiUser.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
' '
@@ -370,14 +374,14 @@ Partial Class frmMain
' '
resources.ApplyResources(Me.bsiLicenses, "bsiLicenses") resources.ApplyResources(Me.bsiLicenses, "bsiLicenses")
Me.bsiLicenses.Id = 9 Me.bsiLicenses.Id = 9
Me.bsiLicenses.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.security_key Me.bsiLicenses.ImageOptions.SvgImage = Global.taskFLOW.My.Resources.Resources.security_key
Me.bsiLicenses.Name = "bsiLicenses" Me.bsiLicenses.Name = "bsiLicenses"
Me.bsiLicenses.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph Me.bsiLicenses.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
' '
'bsiUserLoggedIn 'bsiUserLoggedIn
' '
Me.bsiUserLoggedIn.Id = 10 Me.bsiUserLoggedIn.Id = 10
Me.bsiUserLoggedIn.ImageOptions.Image = Global.DD_ProcessManager.My.Resources.Resources.group_key Me.bsiUserLoggedIn.ImageOptions.Image = Global.taskFLOW.My.Resources.Resources.group_key
Me.bsiUserLoggedIn.Name = "bsiUserLoggedIn" Me.bsiUserLoggedIn.Name = "bsiUserLoggedIn"
Me.bsiUserLoggedIn.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph Me.bsiUserLoggedIn.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionGlyph
' '
@@ -511,7 +515,7 @@ Partial Class frmMain
' '
resources.ApplyResources(Me.bbtniCW, "bbtniCW") resources.ApplyResources(Me.bbtniCW, "bbtniCW")
Me.bbtniCW.Id = 25 Me.bbtniCW.Id = 25
Me.bbtniCW.ImageOptions.Image = Global.DD_ProcessManager.My.Resources.Resources.search Me.bbtniCW.ImageOptions.Image = Global.taskFLOW.My.Resources.Resources.search
Me.bbtniCW.Name = "bbtniCW" Me.bbtniCW.Name = "bbtniCW"
Me.bbtniCW.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.Large Me.bbtniCW.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.Large
Me.bbtniCW.Visibility = DevExpress.XtraBars.BarItemVisibility.Never Me.bbtniCW.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
@@ -721,6 +725,13 @@ Partial Class frmMain
Me.barbtnitmsaveLogfiles.Name = "barbtnitmsaveLogfiles" Me.barbtnitmsaveLogfiles.Name = "barbtnitmsaveLogfiles"
Me.barbtnitmsaveLogfiles.Visibility = DevExpress.XtraBars.BarItemVisibility.Never Me.barbtnitmsaveLogfiles.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
' '
'bsitmCount
'
resources.ApplyResources(Me.bsitmCount, "bsitmCount")
Me.bsitmCount.Id = 56
Me.bsitmCount.Name = "bsitmCount"
Me.bsitmCount.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
'
'RibbonPageStart 'RibbonPageStart
' '
Me.RibbonPageStart.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2, Me.RibbonPageGroup3, Me.RibbonPageGroupBasicConf, Me.RibbonPageGroup7, Me.RibbonPageGroup4, Me.RibbonPageGroupAHW}) Me.RibbonPageStart.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2, Me.RibbonPageGroup3, Me.RibbonPageGroupBasicConf, Me.RibbonPageGroup7, Me.RibbonPageGroup4, Me.RibbonPageGroupAHW})
@@ -847,6 +858,7 @@ Partial Class frmMain
Me.RibbonStatusBar1.ItemLinks.Add(Me.BSIVERSION1) Me.RibbonStatusBar1.ItemLinks.Add(Me.BSIVERSION1)
Me.RibbonStatusBar1.ItemLinks.Add(Me.bsilastsync) Me.RibbonStatusBar1.ItemLinks.Add(Me.bsilastsync)
Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiDebug) Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiDebug)
Me.RibbonStatusBar1.ItemLinks.Add(Me.bsitmCount)
resources.ApplyResources(Me.RibbonStatusBar1, "RibbonStatusBar1") resources.ApplyResources(Me.RibbonStatusBar1, "RibbonStatusBar1")
Me.RibbonStatusBar1.Name = "RibbonStatusBar1" Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1 Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
@@ -892,7 +904,7 @@ Partial Class frmMain
' '
'tsmiValidationProfil 'tsmiValidationProfil
' '
Me.tsmiValidationProfil.Image = Global.DD_ProcessManager.My.Resources.Resources.database_go1 Me.tsmiValidationProfil.Image = Global.taskFLOW.My.Resources.Resources.database_go1
Me.tsmiValidationProfil.Name = "tsmiValidationProfil" Me.tsmiValidationProfil.Name = "tsmiValidationProfil"
resources.ApplyResources(Me.tsmiValidationProfil, "tsmiValidationProfil") resources.ApplyResources(Me.tsmiValidationProfil, "tsmiValidationProfil")
' '
@@ -930,7 +942,7 @@ Partial Class frmMain
' '
'PopupErinnerungInaktivierenToolStripMenuItem 'PopupErinnerungInaktivierenToolStripMenuItem
' '
Me.PopupErinnerungInaktivierenToolStripMenuItem.Image = Global.DD_ProcessManager.My.Resources.Resources.user_red Me.PopupErinnerungInaktivierenToolStripMenuItem.Image = Global.taskFLOW.My.Resources.Resources.user_red
Me.PopupErinnerungInaktivierenToolStripMenuItem.Name = "PopupErinnerungInaktivierenToolStripMenuItem" Me.PopupErinnerungInaktivierenToolStripMenuItem.Name = "PopupErinnerungInaktivierenToolStripMenuItem"
resources.ApplyResources(Me.PopupErinnerungInaktivierenToolStripMenuItem, "PopupErinnerungInaktivierenToolStripMenuItem") resources.ApplyResources(Me.PopupErinnerungInaktivierenToolStripMenuItem, "PopupErinnerungInaktivierenToolStripMenuItem")
' '
@@ -941,7 +953,7 @@ Partial Class frmMain
' '
'AnzeigenToolStripMenuItem 'AnzeigenToolStripMenuItem
' '
Me.AnzeigenToolStripMenuItem.Image = Global.DD_ProcessManager.My.Resources.Resources.Files_7954 Me.AnzeigenToolStripMenuItem.Image = Global.taskFLOW.My.Resources.Resources.Files_7954
Me.AnzeigenToolStripMenuItem.Name = "AnzeigenToolStripMenuItem" Me.AnzeigenToolStripMenuItem.Name = "AnzeigenToolStripMenuItem"
resources.ApplyResources(Me.AnzeigenToolStripMenuItem, "AnzeigenToolStripMenuItem") resources.ApplyResources(Me.AnzeigenToolStripMenuItem, "AnzeigenToolStripMenuItem")
' '
@@ -1602,7 +1614,7 @@ Partial Class frmMain
Me.Controls.Add(Me.barDockControlBottom) Me.Controls.Add(Me.barDockControlBottom)
Me.Controls.Add(Me.barDockControlTop) Me.Controls.Add(Me.barDockControlTop)
Me.IconOptions.Icon = CType(resources.GetObject("frmMain.IconOptions.Icon"), System.Drawing.Icon) Me.IconOptions.Icon = CType(resources.GetObject("frmMain.IconOptions.Icon"), System.Drawing.Icon)
Me.IconOptions.Image = Global.DD_ProcessManager.My.Resources.Resources.DD_taskFLOW_ICON Me.IconOptions.Image = Global.taskFLOW.My.Resources.Resources.DD_taskFLOW_ICON
Me.KeyPreview = True Me.KeyPreview = True
Me.Name = "frmMain" Me.Name = "frmMain"
Me.Ribbon = Me.RibbonControl1 Me.Ribbon = Me.RibbonControl1
@@ -1630,8 +1642,8 @@ Partial Class frmMain
Me.PerformLayout() Me.PerformLayout()
End Sub End Sub
Friend WithEvents DD_DMSLiteDataSet As DD_ProcessManager.DD_DMSLiteDataSet Friend WithEvents DD_DMSLiteDataSet As taskFLOW.DD_DMSLiteDataSet
Friend WithEvents TableAdapterManager As DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager Friend WithEvents TableAdapterManager As taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
Friend WithEvents ImageListProfile As System.Windows.Forms.ImageList Friend WithEvents ImageListProfile As System.Windows.Forms.ImageList
Friend WithEvents NotifyIcon1 As System.Windows.Forms.NotifyIcon Friend WithEvents NotifyIcon1 As System.Windows.Forms.NotifyIcon
Friend WithEvents TimerRefresh As System.Windows.Forms.Timer Friend WithEvents TimerRefresh As System.Windows.Forms.Timer
@@ -1799,4 +1811,5 @@ Partial Class frmMain
Friend WithEvents GridViewWorkflows As DevExpress.XtraGrid.Views.Grid.GridView Friend WithEvents GridViewWorkflows As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents BSIVERSION1 As DevExpress.XtraBars.BarStaticItem Friend WithEvents BSIVERSION1 As DevExpress.XtraBars.BarStaticItem
Friend WithEvents barbtnitmsaveLogfiles As DevExpress.XtraBars.BarButtonItem Friend WithEvents barbtnitmsaveLogfiles As DevExpress.XtraBars.BarButtonItem
Friend WithEvents bsitmCount As DevExpress.XtraBars.BarStaticItem
End Class End Class

File diff suppressed because it is too large Load Diff

File diff suppressed because it is too large Load Diff

View File

@@ -31,8 +31,8 @@ Partial Class frmMassValidator
Me.TITLELabel1 = New System.Windows.Forms.Label() Me.TITLELabel1 = New System.Windows.Forms.Label()
Me.btnSave = New System.Windows.Forms.Button() Me.btnSave = New System.Windows.Forms.Button()
Me.DESCRIPTIONLabel = New System.Windows.Forms.Label() Me.DESCRIPTIONLabel = New System.Windows.Forms.Label()
Me.DD_DMSLiteDataSet = New DD_ProcessManager.DD_DMSLiteDataSet() Me.DD_DMSLiteDataSet = New taskFLOW.DD_DMSLiteDataSet()
Me.TableAdapterManager = New DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager() Me.TableAdapterManager = New taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
Me.pnldesigner = New DevExpress.XtraEditors.PanelControl() Me.pnldesigner = New DevExpress.XtraEditors.PanelControl()
Me.StatusStrip1.SuspendLayout() Me.StatusStrip1.SuspendLayout()
CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -81,7 +81,7 @@ Partial Class frmMassValidator
Me.btnSave.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _ Me.btnSave.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.btnSave.Font = New System.Drawing.Font("Tahoma", 9.75!) Me.btnSave.Font = New System.Drawing.Font("Tahoma", 9.75!)
Me.btnSave.Image = Global.DD_ProcessManager.My.Resources.Resources.flag_pink Me.btnSave.Image = Global.taskFLOW.My.Resources.Resources.flag_pink
Me.btnSave.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnSave.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnSave.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.btnSave.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.btnSave.Location = New System.Drawing.Point(12, 464) Me.btnSave.Location = New System.Drawing.Point(12, 464)
@@ -125,7 +125,7 @@ Partial Class frmMassValidator
Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = Nothing
Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing Me.TableAdapterManager.TBPM_PROFILETableAdapter = Nothing
Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing Me.TableAdapterManager.TBPM_TYPETableAdapter = Nothing
Me.TableAdapterManager.UpdateOrder = DD_ProcessManager.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete Me.TableAdapterManager.UpdateOrder = taskFLOW.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
' '
'pnldesigner 'pnldesigner
' '

View File

@@ -323,7 +323,7 @@ Public Class frmMassValidator
lookup.Properties.AllowAddNewValues = oControlRow.Item("VKT_ADD_ITEM") lookup.Properties.AllowAddNewValues = oControlRow.Item("VKT_ADD_ITEM")
lookup.Properties.MultiSelect = oMultiselect lookup.Properties.MultiSelect = oMultiselect
If NotNull(oControlRow.Item("DEFAULT_VALUE"), "") <> "" Then If ClassAllgemeineFunktionen.NotNullString(oControlRow.Item("DEFAULT_VALUE"), "") <> "" Then
lookup.Properties.SelectedValues = New List(Of String) From {oControlRow.Item("DEFAULT_VALUE")} lookup.Properties.SelectedValues = New List(Of String) From {oControlRow.Item("DEFAULT_VALUE")}
End If End If
@@ -355,7 +355,7 @@ Public Class frmMassValidator
LOGGER.Debug("Versuch Tabelle zu laden") LOGGER.Debug("Versuch Tabelle zu laden")
Dim oDTMyColumns As DataTable = DatabaseFallback.GetDatatableECM($"SELECT * FROM TBPM_CONTROL_TABLE WHERE CONTROL_ID = {oControlRow.Item("GUID")} ORDER BY SEQUENCE") ', "MV_LoadControls1") Dim oDTMyColumns As DataTable = DatabaseFallback.GetDatatableECM($"SELECT * FROM TBPM_CONTROL_TABLE WHERE CONTROL_ID = {oControlRow.Item("GUID")} ORDER BY SEQUENCE") ', "MV_LoadControls1")
oControl = ControlCreator.CreateExistingGridControl(oControlRow, oDTMyColumns, False) oControl = ControlCreator.CreateExistingGridControl(oControlRow, oDTMyColumns, False, CURRENT_DOC_CURRENCY)
End Select End Select
If oControl IsNot Nothing AndAlso TypeOf oControl IsNot Label Then If oControl IsNot Nothing AndAlso TypeOf oControl IsNot Label Then
@@ -449,7 +449,7 @@ Public Class frmMassValidator
End If End If
Dim idxname As String = controlRow.Item("INDEX_NAME") Dim idxname As String = controlRow.Item("INDEX_NAME")
' Wenn kein defaultValue existiert, leeren String setzen ' Wenn kein defaultValue existiert, leeren String setzen
Dim defaultValue As String = NotNull(controlRow.Item("DEFAULT_VALUE"), String.Empty) Dim defaultValue As String = ClassAllgemeineFunktionen.NotNullString(controlRow.Item("DEFAULT_VALUE"), String.Empty)
indexname = idxname indexname = idxname
Dim LoadIDX As Boolean = controlRow.Item("LOAD_IDX_VALUE") Dim LoadIDX As Boolean = controlRow.Item("LOAD_IDX_VALUE")
LOGGER.Debug("INDEX: " & idxname & " - CONTROLNAME: " & oControl.Name & " - LOAD IDXVALUES: " & LoadIDX.ToString) LOGGER.Debug("INDEX: " & idxname & " - CONTROLNAME: " & oControl.Name & " - LOAD IDXVALUES: " & LoadIDX.ToString)
@@ -474,7 +474,7 @@ Public Class frmMassValidator
If wertWD = "" And defaultValue <> "" Then If wertWD = "" And defaultValue <> "" Then
oControl.Text = defaultValue oControl.Text = defaultValue
Else Else
oControl.Text = NotNull(wertWD, defaultValue) oControl.Text = ClassAllgemeineFunktionen.NotNullString(wertWD, defaultValue)
End If End If
End If End If
@@ -539,12 +539,15 @@ Public Class frmMassValidator
Select Case Typ Select Case Typ
'Tabellendarstellung 'Tabellendarstellung
Case "TABLE" Case "TABLE"
Dim dt As DataTable = DatabaseFallback.GetDatatableECM($"SELECT * FROM TBPM_CONTROL_TABLE WHERE CONTROL_ID = {CONTROL_ID} ORDER BY SEQUENCE") ', "MV_FillIndexValues") Dim osqlControlTable = String.Format("SELECT * FROM TBPM_CONTROL_TABLE WHERE CONTROL_ID = {0} ORDER BY SEQUENCE", CONTROL_ID)
Dim oDTCONTROL_TABLE As DataTable = DatabaseFallback.GetDatatable("TBPM_CONTROL_TABLE", New GetDatatableOptions(osqlControlTable, DatabaseType.ECM) With {
.FilterExpression = $"CONTROL_ID = {CONTROL_ID}' ",
.SortByColumn = "SEQUENCE"}) ', "MV_FillIndexValues")
Dim SpaltenWerte As String() Dim SpaltenWerte As String()
If dt.Rows.Count > 1 Then If oDTCONTROL_TABLE.Rows.Count > 1 Then
For Each Zeile As Object In wertWD For Each Zeile As Object In wertWD
SpaltenWerte = Split(Zeile, Delimiter) SpaltenWerte = Split(Zeile, Delimiter)
Select Case dt.Rows.Count Select Case oDTCONTROL_TABLE.Rows.Count
Case 2 Case 2
If SpaltenWerte.Length = 2 Then If SpaltenWerte.Length = 2 Then
dgv.Rows.Add(New String() {SpaltenWerte(0), SpaltenWerte(1)}) dgv.Rows.Add(New String() {SpaltenWerte(0), SpaltenWerte(1)})
@@ -915,7 +918,7 @@ Public Class frmMassValidator
Else Else
'not implemented 'not implemented
LOGGER.Warn("Depending_Control_Set_Result for [{0}] NOT IMPLEMENTED", displayboxname) LOGGER.Warn("⚠️ Depending_Control_Set_Result for [{0}] NOT IMPLEMENTED", displayboxname)
End If End If
Else Else
If oResultTable.Rows.Count = 1 Then If oResultTable.Rows.Count = 1 Then
@@ -926,7 +929,7 @@ Public Class frmMassValidator
End If End If
End If End If
Else Else
LOGGER.Warn("Result Table is nothing!") LOGGER.Warn("⚠️ Result Table is nothing!")
End If End If
Catch ex As Exception Catch ex As Exception
LOGGER.Info("Unexpected Ersror in Depending_Control_Set_Result - ERROR: " & ex.Message) LOGGER.Info("Unexpected Ersror in Depending_Control_Set_Result - ERROR: " & ex.Message)
@@ -1339,7 +1342,6 @@ Public Class frmMassValidator
Dim oSQL = $"SELECT [dbo].[FNPM_GET_WM_FILE_PATH] ({CURRENT_DOC_GUID},{_CheckStandard})" Dim oSQL = $"SELECT [dbo].[FNPM_GET_WM_FILE_PATH] ({CURRENT_DOC_GUID},{_CheckStandard})"
oResult = DatabaseFallback.GetScalarValueECM(oSQL) oResult = DatabaseFallback.GetScalarValueECM(oSQL)
LOGGER.Debug($"Checking file 0 GDP [{oResult}] exists?...") LOGGER.Debug($"Checking file 0 GDP [{oResult}] exists?...")
If File.Exists(oResult) = False Then
LOGGER.Debug($"GetWMDocPathWindows returned false - trying with standard again...") LOGGER.Debug($"GetWMDocPathWindows returned false - trying with standard again...")
oSQL = $"SELECT [dbo].[FNPM_GET_WM_FILE_PATH] ({CURRENT_DOC_GUID},1)" oSQL = $"SELECT [dbo].[FNPM_GET_WM_FILE_PATH] ({CURRENT_DOC_GUID},1)"
oResult = DatabaseFallback.GetScalarValueECM(oSQL) oResult = DatabaseFallback.GetScalarValueECM(oSQL)
@@ -1347,7 +1349,7 @@ Public Class frmMassValidator
If File.Exists(oResult) = False Then If File.Exists(oResult) = False Then
Return False Return False
End If End If
End If
WMDocPathWindows = oResult WMDocPathWindows = oResult
CURRENT_DOC_PATH = WMDocPathWindows CURRENT_DOC_PATH = WMDocPathWindows

View File

@@ -36,7 +36,7 @@ Public Class frmMonitor
Try Try
oDocID = GridView1.GetFocusedRowCellValue(GridView1.Columns("ObjectID")) oDocID = GridView1.GetFocusedRowCellValue(GridView1.Columns("ObjectID"))
Catch ex1 As Exception Catch ex1 As Exception
LOGGER.Warn("Could not get Doc/ObjectReference: " & ex.Message) LOGGER.Warn("⚠️ Could not get Doc/ObjectReference: " & ex.Message)
MsgBox("Could not get Doc/ObjectReference: " & ex.Message, MsgBoxStyle.Critical, "Load_Detail") MsgBox("Could not get Doc/ObjectReference: " & ex.Message, MsgBoxStyle.Critical, "Load_Detail")
Exit Sub Exit Sub
End Try End Try
@@ -174,7 +174,7 @@ Public Class frmMonitor
'_frmDocView.LoadFile(oDocPath) '_frmDocView.LoadFile(oDocPath)
If File.Exists(oDocPath) Then If File.Exists(oDocPath) Then
DocumentViewerMonitor.LoadFile(oDocPath) DocumentViewerMonitor.LoadFile_FromPath(oDocPath)
BarStaticItemInfo.Visibility = DevExpress.XtraBars.BarItemVisibility.Never BarStaticItemInfo.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
DocumentViewerMonitor.Visible = True DocumentViewerMonitor.Visible = True
' DocumentViewerMonitor.RightOnlyView(USER_RIGHT_VIEW_ONLY) ' DocumentViewerMonitor.RightOnlyView(USER_RIGHT_VIEW_ONLY)
@@ -230,7 +230,12 @@ Public Class frmMonitor
SplitContainerControl3.SplitterPosition = CONFIG.Config.MonitorSplitter3_Distance SplitContainerControl3.SplitterPosition = CONFIG.Config.MonitorSplitter3_Distance
End Select End Select
Try Try
DocumentViewerMonitor.Init(LOGCONFIG, GDPICTURE_LICENSE) DocumentViewerMonitor.Init(LOGCONFIG, GDPICTURE_LICENSE, New DigitalData.Controls.DocumentViewer.DocumentViewer.ToolbarSettings() With {
.ShowPrintButton = True,
.ShowRotateButton = True,
.ShowFlipButton = True,
.ShowSettingButton = True
})
Catch ex As Exception Catch ex As Exception
LOGGER.Error(ex) LOGGER.Error(ex)
End Try End Try
@@ -518,7 +523,7 @@ Public Class frmMonitor
LOGGER.Warn($"Error getting DocPath in Monitor: {ex.Message}") LOGGER.Warn($"Error getting DocPath in Monitor: {ex.Message}")
Exit Sub Exit Sub
End Try End Try
DocumentViewerMonitor?.LoadFile(oDocPath) DocumentViewerMonitor?.LoadFile_FromPath(oDocPath)
'If oDocPath <> "" Then 'If oDocPath <> "" Then
' If Not Application.OpenForms().OfType(Of frmValidator).Any Then ' If Not Application.OpenForms().OfType(Of frmValidator).Any Then

Some files were not shown because too many files have changed in this diff Show More