MS New Properties

This commit is contained in:
2019-11-15 14:35:14 +01:00
parent 9e20642257
commit fefb26b556
28 changed files with 2132 additions and 4130 deletions

View File

@@ -157,13 +157,6 @@ Public Class ClassAllgemeineFunktionen
Public Function Move2Folder(ByVal vMove_File As String, ByVal vZiel_Pfad As String, Profile_ID As Integer, clsWD As ClassWindream_allgemein)
Try
If VIEWER_PDF <> "internal" And vMove_File.EndsWith("pdf") Then
Do While clsWD.CheckFileExists(vMove_File) = True 'func_check_file_use(vMove_File)
LOGGER.Info(">> MoveRename: Datei noch geöffnet - Warten")
System.Threading.Thread.Sleep(500)
Loop
End If
Dim extension As String = IO.Path.GetExtension(vMove_File)
Dim Filename As String = IO.Path.GetFileName(vMove_File)

View File

@@ -31,6 +31,7 @@ Public Class ClassControlCreator
Public Const PREFIX_DATAGRIDVIEW = "DGV"
Public Const PREFIX_TABLE = "TB"
Public Const PREFIX_LINE = "LINE"
Public Const PREFIX_BUTTON = "BTN"
''' <summary>
@@ -87,6 +88,7 @@ Public Class ClassControlCreator
ctrl.Font = props.Font
ctrl.ForeColor = props.Color
If designMode Then
ctrl.Cursor = Cursors.Hand
End If
@@ -222,6 +224,16 @@ Public Class ClassControlCreator
Return control
End Function
Public Shared Function CreateNewButton(location As Point) As Button
Dim control As New Button With {
.Name = $"{PREFIX_BUTTON}_{clsTools.ShortGuid}",
.Size = New Size(DEFAULT_WIDTH, DEFAULT_HEIGHT),
.Cursor = Cursors.Hand,
.Location = location
}
Return control
End Function
' ----------------------- EXISITING CONTROLS -----------------------
@@ -258,7 +270,33 @@ Public Class ClassControlCreator
Return control
End Function
Private Shared Function ByteArrayToBitmap(bytearray() As Byte) As Bitmap
Return New Bitmap(New System.IO.MemoryStream(bytearray))
End Function
Public Shared Function CreateExistingButton(row As DataRow, designMode As Boolean) As Button
Dim oControl As Button = CreateBaseControl(New Button(), row, designMode)
Dim ctrl_image As Bitmap = Nothing
Dim oBitmap As Bitmap
If Not IsDBNull(row.Item("IMAGE_CONTROL")) Then
Dim obimg() As Byte = row.Item("IMAGE_CONTROL")
oBitmap = ByteArrayToBitmap(obimg)
ctrl_image = oBitmap
End If
oControl.Text = row.Item("CTRL_TEXT")
oControl.Height = row.Item("HEIGHT")
oControl.Width = row.Item("WIDTH")
If Not IsNothing(ctrl_image) And Not IsNothing(oBitmap) Then
oControl.Image = oBitmap
oControl.ImageAlign = ContentAlignment.MiddleLeft
oControl.TextAlign = ContentAlignment.MiddleRight
End If
oControl.AutoSize = True
Return oControl
End Function
Public Shared Function CreateExistingCombobox(row As DataRow, designMode As Boolean) As Windows.Forms.ComboBox
Dim control As Windows.Forms.ComboBox = CreateBaseControl(New Windows.Forms.ComboBox(), row, designMode)
@@ -473,6 +511,33 @@ Public Class ClassControlCreator
Return 0
End Try
End Function
Public Shared Function GET_CONTROL_PROPERTY(DT_CONTROL As DataTable, ControlGUID As Integer, ColNAME As String)
Try
CURRENT_CONTROL_ID = 0
CURR_CON_ID = 0
CURR_SELECT_CONTROL = ""
CURR_CHOICE_LIST = ""
Dim dt As New DataTable
dt = DT_CONTROL
' Define the filter
Dim filter As String = "GUID = " & ControlGUID
' Filter the rows using Select() method of DataTable
Dim FilteredRows As DataRow() = dt.Select(filter)
If FilteredRows.Count = 1 Then
Dim oRESULT = FilteredRows(0).Item(ColNAME)
If IsDBNull(oRESULT) Then Return Nothing
Return oRESULT
Else
Return Nothing
End If
Catch ex As Exception
LOGGER.Error(ex)
LOGGER.Info("Unexpected Error in GET_CONTROL_PROPERTY (" & ControlGUID & "#" & ColNAME & "):" & ex.Message)
Return Nothing
End Try
End Function
Public Shared Function GET_DEPENDING_CONTROLS(DT_CONTROLS As DataTable, ControlName As String)
Try

View File

@@ -0,0 +1,27 @@
Imports System.ComponentModel
Imports System.Drawing.Design
Imports DD_PM_WINDREAM.InputProperties
Public Class ClassImageSelector
Inherits UITypeEditor
Public Overrides Function GetEditStyle(context As ITypeDescriptorContext) As UITypeEditorEditStyle
Return UITypeEditorEditStyle.Modal
End Function
Public Overrides Function EditValue(context As ITypeDescriptorContext, provider As IServiceProvider, value As Object) As Object
'Return MyBase.EditValue(context, provider, value)
Dim oDialog = New OpenFileDialog
If oDialog.ShowDialog() = DialogResult.OK Then
If oDialog.FileName = "" Then
value = "NONE"
Else
value = oDialog.FileName
End If
Else
value = "No selection"
End If
Return value
End Function
End Class

View File

@@ -0,0 +1,16 @@
Imports System.ComponentModel
Imports System.Drawing.Design
''' <summary>
''' Hilfsklasse, die für das anzeigen und abspeichern von SQL-Befehlen verwendet wird
''' </summary>
<Editor(GetType(ClassImageSelector), GetType(UITypeEditor))>
<TypeConverter(GetType(ClassImageSelector))>
Public Class ImageValue
Public Property Value As String
Public Sub New()
Me.Value = ""
End Sub
Public Sub New(value As String)
Me.Value = value
End Sub
End Class

View File

@@ -32,12 +32,12 @@ Public Class ClassInit
CONNECTION_STRING = DecryptConnectionString(CONFIG.Config.ConnectionString)
End If
VIEWER_UNIVERSAL = CONFIG.Config.UniversalViewerPath
VIEWER_XCHANGE = CONFIG.Config.XChangeViewerPath
VIEWER_SUMATRA = CONFIG.Config.SumatraViewerPath
VIEWER_ZOOM_LEVEL = CONFIG.Config.PDFViewerZoomLevel
VIEWER_PDF = CONFIG.Config.PDFViewer
VIEWER_ALL = CONFIG.Config.DefaultViewer
'VIEWER_UNIVERSAL = CONFIG.Config.UniversalViewerPath
'VIEWER_XCHANGE = CONFIG.Config.XChangeViewerPath
'VIEWER_SUMATRA = CONFIG.Config.SumatraViewerPath
'VIEWER_ZOOM_LEVEL = CONFIG.Config.PDFViewerZoomLevel
'VIEWER_PDF = CONFIG.Config.PDFViewer
'VIEWER_ALL = CONFIG.Config.DefaultViewer
INDEX_DMS_ERSTELLT = CONFIG.Config.IndexDmsErstellt
INDEX_DMS_ERSTELLT_ZEIT = CONFIG.Config.IndexDmsErstelltZeit

File diff suppressed because it is too large Load Diff

View File

@@ -905,55 +905,7 @@ WHERE (PROFIL_ID = @PROFIL_ID)</CommandText>
</DbCommand>
</DeleteCommand>
</DbSource>
<DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="cmdGet_Anzahl" Modifier="Public" Name="cmdGet_Anzahl" QueryType="Scalar" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy4" UserSourceName="cmdGet_Anzahl">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT COUNT(GUID) AS Expr1
FROM TBPM_PROFILE_FILES
WHERE (PROFIL_ID = @Profil_id) AND (EDIT = 0) AND (ACTIVE = 1) AND (IN_WORK = 0)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="Profil_id" ColumnName="PROFIL_ID" DataSourceName="DD_DMS.dbo.TBPM_PROFILE_FILES" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Profil_id" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
</DbSource>
<DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="DD_DMS.dbo.TBPM_PROFILE_FILES" DbObjectType="Table" GenerateShortCommands="true" GeneratorSourceName="cmdGetNextFile_GUID" Modifier="Public" Name="cmdGetNextFile_GUID" QueryType="Scalar" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy5" UserSourceName="cmdGetNextFile_GUID">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT GUID
FROM TBPM_PROFILE_FILES
WHERE (PROFIL_ID = @Profil_id) AND (EDIT = 0) AND (UPPER(FILE_PATH) &lt;&gt; UPPER(@FILEPATH)) AND (IN_WORK = 0) AND (FILE_PATH NOT IN
(SELECT FILE_PATH
FROM TBPM_FILES_USER_NOT_INDEXED
WHERE (PROFIL_ID = @Profil_id) AND (UPPER(USR_NAME) = UPPER(@User))))
ORDER BY DMS_ERSTELLT_DATE,FILE_PATH</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="Profil_id" ColumnName="PROFIL_ID" DataSourceName="DD_DMS.dbo.TBPM_PROFILE_FILES" 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="FILEPATH" ColumnName="" DataSourceName="" DataTypeServer="unknown" DbType="AnsiString" Direction="Input" ParameterName="@FILEPATH" Precision="0" Scale="0" Size="1024" SourceColumn="" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="User" ColumnName="" DataSourceName="" DataTypeServer="unknown" DbType="AnsiString" Direction="Input" ParameterName="@User" Precision="0" Scale="0" Size="1024" SourceColumn="" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
</DbSource>
<DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="DD_DMS.dbo.TBPM_PROFILE_FILES" DbObjectType="Table" GenerateShortCommands="true" GeneratorSourceName="cmdgetNextFile_GUID_Newest" Modifier="Public" Name="cmdgetNextFile_GUID_Newest" QueryType="Scalar" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy6" UserSourceName="cmdgetNextFile_GUID_Newest">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT GUID
FROM TBPM_PROFILE_FILES
WHERE (PROFIL_ID = @Profil_id) AND (EDIT = 0) AND (IN_WORK = 0) AND (UPPER(FILE_PATH) &lt;&gt; UPPER(@FILEPATH)) AND (FILE_PATH NOT IN
(SELECT FILE_PATH
FROM TBPM_FILES_USER_NOT_INDEXED
WHERE (PROFIL_ID = @Profil_id) AND (UPPER(USR_NAME) = UPPER(@User))))
ORDER BY DMS_ERSTELLT_DATE DESC</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="Profil_id" ColumnName="PROFIL_ID" DataSourceName="DD_DMS.dbo.TBPM_PROFILE_FILES" 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="FILEPATH" ColumnName="" DataSourceName="" DataTypeServer="unknown" DbType="AnsiString" Direction="Input" ParameterName="@FILEPATH" Precision="0" Scale="0" Size="1024" SourceColumn="" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="User" ColumnName="" DataSourceName="" DataTypeServer="unknown" DbType="AnsiString" Direction="Input" ParameterName="@User" Precision="0" Scale="0" Size="1024" SourceColumn="" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
</DbSource>
<DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="CmdSetEdit" Modifier="Public" Name="CmdSetEdit" QueryType="NoData" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy7" UserSourceName="CmdSetEdit">
<DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="CmdSetEdit" Modifier="Public" Name="CmdSetEdit" QueryType="NoData" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy4" UserSourceName="CmdSetEdit">
<UpdateCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>UPDATE TBPM_PROFILE_FILES
@@ -965,33 +917,6 @@ WHERE (GUID = @GUID)</CommandText>
</DbCommand>
</UpdateCommand>
</DbSource>
<DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="DD_DMS.dbo.TBPM_PROFILE_FILES" DbObjectType="Table" GenerateShortCommands="true" GeneratorSourceName="CmdSETWORK" Modifier="Public" Name="CmdSETWORK" QueryType="Scalar" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy8" UserSourceName="CmdSETWORK">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>UPDATE TBPM_PROFILE_FILES
SET IN_WORK = @WORK, WORK_USER = @USer
WHERE (GUID = @GUID)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="WORK" ColumnName="IN_WORK" DataSourceName="DD_DMS.dbo.TBPM_PROFILE_FILES" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@WORK" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="IN_WORK" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="USer" ColumnName="WORK_USER" DataSourceName="DD_DMS.dbo.TBPM_PROFILE_FILES" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@USer" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="WORK_USER" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_DMS.dbo.TBPM_PROFILE_FILES" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
</DbSource>
<DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="DD_DMSLite.dbo.TBPM_PROFILE_FILES" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="FillBy_Newest" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetDataBy_Newest" GeneratorSourceName="FillBy_Newest" GetMethodModifier="Public" GetMethodName="GetDataBy_Newest" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy_Newest" UserSourceName="FillBy_Newest">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT DMS_ERSTELLT_DATE, FILE_PATH, GUID
FROM TBPM_PROFILE_FILES
WHERE (EDIT = 0) AND (PROFIL_ID = @Profil_id) AND (ACTIVE = 1)
ORDER BY DMS_ERSTELLT_DATE DESC</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="Profil_id" ColumnName="PROFIL_ID" DataSourceName="DD_DMSLite.dbo.TBPM_PROFILE_FILES" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Profil_id" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
</DbSource>
</Sources>
</TableAdapter>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBPM_PROFILETableAdapter" GeneratorDataComponentClassName="TBPM_PROFILETableAdapter" Name="TBPM_PROFILE" UserDataComponentName="TBPM_PROFILETableAdapter">
@@ -1283,58 +1208,65 @@ WHERE (PROFIL_ID = @P_ID) AND (CTRL_TYPE &lt;&gt; 'LBL')</CommandText>
<MainSource>
<DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<DeleteCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>DELETE FROM TBPM_PROFILE_CONTROLS
WHERE (GUID = @Original_GUID)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.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="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</DeleteCommand>
<InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<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], [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]) 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);
<DbCommand CommandType="Text" ModifiedByUser="true">
<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,
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)
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);
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>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@PROFIL_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@CTRL_TYPE" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CTRL_TYPE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@CTRL_TEXT" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CTRL_TEXT" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Double" Direction="Input" ParameterName="@X_LOC" Precision="0" ProviderType="Float" Scale="0" Size="0" SourceColumn="X_LOC" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Double" Direction="Input" ParameterName="@Y_LOC" Precision="0" ProviderType="Float" Scale="0" Size="0" SourceColumn="Y_LOC" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@INDEX_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="INDEX_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@TYP" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="TYP" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@VALIDATION" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="VALIDATION" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@CHOICE_LIST" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHOICE_LIST" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@CONNECTION_ID" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="CONNECTION_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@SQL_UEBERPRUEFUNG" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="SQL_UEBERPRUEFUNG" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@HEIGHT" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="HEIGHT" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@WIDTH" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="WIDTH" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@FONT_STYLE" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="FONT_STYLE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@FONT_SIZE" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="FONT_SIZE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@FONT_FAMILY" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="FONT_FAMILY" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int64" Direction="Input" ParameterName="@FONT_COLOR" Precision="0" ProviderType="BigInt" Scale="0" Size="0" SourceColumn="FONT_COLOR" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@READ_ONLY" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="READ_ONLY" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@LOAD_IDX_VALUE" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="LOAD_IDX_VALUE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@DEFAULT_VALUE" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="DEFAULT_VALUE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@MULTISELECT" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="MULTISELECT" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@VKT_ADD_ITEM" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="VKT_ADD_ITEM" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@VKT_PREVENT_MULTIPLE_VALUES" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="VKT_PREVENT_MULTIPLE_VALUES" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MATCH" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX_MATCH" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MESSAGE_DE" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX_MESSAGE_DE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MESSAGE_EN" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX_MESSAGE_EN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="PROFIL_ID" ColumnName="PROFIL_ID" DataSourceName="DD_ECM_TEST.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_TEST.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_TEST.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_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@CTRL_TEXT" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="CTRL_TEXT" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="X_LOC" ColumnName="X_LOC" DataSourceName="DD_ECM_TEST.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_TEST.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_TEST.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="ADDED_WHEN" ColumnName="ADDED_WHEN" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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="INDEX_NAME" ColumnName="INDEX_NAME" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@INDEX_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="INDEX_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="TYP" ColumnName="TYP" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@TYP" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="TYP" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="VALIDATION" ColumnName="VALIDATION" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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_UEBERPRUEFUNG" ColumnName="SQL_UEBERPRUEFUNG" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@SQL_UEBERPRUEFUNG" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="SQL_UEBERPRUEFUNG" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="HEIGHT" ColumnName="HEIGHT" DataSourceName="DD_ECM_TEST.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_TEST.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="true" AutogeneratedName="FONT_STYLE" ColumnName="FONT_STYLE" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="smallint" DbType="Int16" Direction="Input" ParameterName="@FONT_STYLE" Precision="0" ProviderType="SmallInt" Scale="0" Size="2" SourceColumn="FONT_STYLE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="FONT_SIZE" ColumnName="FONT_SIZE" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="smallint" DbType="Int16" Direction="Input" ParameterName="@FONT_SIZE" Precision="0" ProviderType="SmallInt" Scale="0" Size="2" SourceColumn="FONT_SIZE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="FONT_FAMILY" ColumnName="FONT_FAMILY" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@FONT_FAMILY" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="FONT_FAMILY" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="FONT_COLOR" ColumnName="FONT_COLOR" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="bigint" DbType="Int64" Direction="Input" ParameterName="@FONT_COLOR" Precision="0" ProviderType="BigInt" Scale="0" Size="8" SourceColumn="FONT_COLOR" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="READ_ONLY" ColumnName="READ_ONLY" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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_PROFILE_CONTROLS" 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="DEFAULT_VALUE" ColumnName="DEFAULT_VALUE" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@DEFAULT_VALUE" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="DEFAULT_VALUE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="MULTISELECT" ColumnName="MULTISELECT" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@MULTISELECT" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="MULTISELECT" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="VKT_ADD_ITEM" ColumnName="VKT_ADD_ITEM" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@VKT_ADD_ITEM" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="VKT_ADD_ITEM" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="VKT_PREVENT_MULTIPLE_VALUES" ColumnName="VKT_PREVENT_MULTIPLE_VALUES" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@VKT_PREVENT_MULTIPLE_VALUES" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="VKT_PREVENT_MULTIPLE_VALUES" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="REGEX_MATCH" ColumnName="REGEX_MATCH" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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_DE" ColumnName="REGEX_MESSAGE_DE" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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_EN" ColumnName="REGEX_MESSAGE_EN" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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="true" AutogeneratedName="IMAGE_CONTROL" ColumnName="IMAGE_CONTROL" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varbinary(MAX)" DbType="Binary" Direction="Input" ParameterName="@IMAGE_CONTROL" Precision="0" ProviderType="VarBinary" Scale="0" Size="2147483647" SourceColumn="IMAGE_CONTROL" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="SQL2" ColumnName="SQL2" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@SQL2" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="SQL2" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="SQL_ENABLE" ColumnName="SQL_ENABLE" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@SQL_ENABLE" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="SQL_ENABLE" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</InsertCommand>
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<DbCommand CommandType="Text" ModifiedByUser="false">
<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
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
FROM TBPM_PROFILE_CONTROLS
WHERE (GUID = @guid)
ORDER BY Y_LOC, X_LOC</CommandText>
@@ -1344,85 +1276,49 @@ ORDER BY Y_LOC, X_LOC</CommandText>
</DbCommand>
</SelectCommand>
<UpdateCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>UPDATE [TBPM_PROFILE_CONTROLS] SET [PROFIL_ID] = @PROFIL_ID, [NAME] = @NAME, [CTRL_TYPE] = @CTRL_TYPE, [CTRL_TEXT] = @CTRL_TEXT, [X_LOC] = @X_LOC, [Y_LOC] = @Y_LOC, [ADDED_WHO] = @ADDED_WHO, [ADDED_WHEN] = @ADDED_WHEN, [CHANGED_WHO] = @CHANGED_WHO, [CHANGED_WHEN] = @CHANGED_WHEN, [INDEX_NAME] = @INDEX_NAME, [TYP] = @TYP, [VALIDATION] = @VALIDATION, [CHOICE_LIST] = @CHOICE_LIST, [CONNECTION_ID] = @CONNECTION_ID, [SQL_UEBERPRUEFUNG] = @SQL_UEBERPRUEFUNG, [HEIGHT] = @HEIGHT, [WIDTH] = @WIDTH, [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, [REGEX_MESSAGE_DE] = @REGEX_MESSAGE_DE, [REGEX_MESSAGE_EN] = @REGEX_MESSAGE_EN WHERE (([GUID] = @Original_GUID) AND ([PROFIL_ID] = @Original_PROFIL_ID) AND ([NAME] = @Original_NAME) AND ([CTRL_TYPE] = @Original_CTRL_TYPE) AND ([CTRL_TEXT] = @Original_CTRL_TEXT) AND ([X_LOC] = @Original_X_LOC) AND ([Y_LOC] = @Original_Y_LOC) AND ([ADDED_WHO] = @Original_ADDED_WHO) AND ([ADDED_WHEN] = @Original_ADDED_WHEN) AND ((@IsNull_CHANGED_WHO = 1 AND [CHANGED_WHO] IS NULL) OR ([CHANGED_WHO] = @Original_CHANGED_WHO)) AND ((@IsNull_CHANGED_WHEN = 1 AND [CHANGED_WHEN] IS NULL) OR ([CHANGED_WHEN] = @Original_CHANGED_WHEN)) AND ((@IsNull_INDEX_NAME = 1 AND [INDEX_NAME] IS NULL) OR ([INDEX_NAME] = @Original_INDEX_NAME)) AND ((@IsNull_TYP = 1 AND [TYP] IS NULL) OR ([TYP] = @Original_TYP)) AND ([VALIDATION] = @Original_VALIDATION) AND ((@IsNull_CHOICE_LIST = 1 AND [CHOICE_LIST] IS NULL) OR ([CHOICE_LIST] = @Original_CHOICE_LIST)) AND ((@IsNull_CONNECTION_ID = 1 AND [CONNECTION_ID] IS NULL) OR ([CONNECTION_ID] = @Original_CONNECTION_ID)) AND ([HEIGHT] = @Original_HEIGHT) AND ([WIDTH] = @Original_WIDTH) AND ((@IsNull_FONT_STYLE = 1 AND [FONT_STYLE] IS NULL) OR ([FONT_STYLE] = @Original_FONT_STYLE)) AND ((@IsNull_FONT_SIZE = 1 AND [FONT_SIZE] IS NULL) OR ([FONT_SIZE] = @Original_FONT_SIZE)) AND ((@IsNull_FONT_FAMILY = 1 AND [FONT_FAMILY] IS NULL) OR ([FONT_FAMILY] = @Original_FONT_FAMILY)) AND ((@IsNull_FONT_COLOR = 1 AND [FONT_COLOR] IS NULL) OR ([FONT_COLOR] = @Original_FONT_COLOR)) AND ([READ_ONLY] = @Original_READ_ONLY) AND ([LOAD_IDX_VALUE] = @Original_LOAD_IDX_VALUE) AND ((@IsNull_DEFAULT_VALUE = 1 AND [DEFAULT_VALUE] IS NULL) OR ([DEFAULT_VALUE] = @Original_DEFAULT_VALUE)) AND ([MULTISELECT] = @Original_MULTISELECT) AND ([VKT_ADD_ITEM] = @Original_VKT_ADD_ITEM) AND ([VKT_PREVENT_MULTIPLE_VALUES] = @Original_VKT_PREVENT_MULTIPLE_VALUES) AND ((@IsNull_REGEX_MATCH = 1 AND [REGEX_MATCH] IS NULL) OR ([REGEX_MATCH] = @Original_REGEX_MATCH)) AND ([REGEX_MESSAGE_DE] = @Original_REGEX_MESSAGE_DE) AND ([REGEX_MESSAGE_EN] = @Original_REGEX_MESSAGE_EN));
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>UPDATE TBPM_PROFILE_CONTROLS
SET PROFIL_ID = @PROFIL_ID, NAME = @NAME, CTRL_TYPE = @CTRL_TYPE, CTRL_TEXT = @CTRL_TEXT, X_LOC = @X_LOC, Y_LOC = @Y_LOC, CHANGED_WHO = @CHANGED_WHO, INDEX_NAME = @INDEX_NAME,
TYP = @TYP, VALIDATION = @VALIDATION, CHOICE_LIST = @CHOICE_LIST, CONNECTION_ID = @CONNECTION_ID, SQL_UEBERPRUEFUNG = @SQL_UEBERPRUEFUNG, HEIGHT = @HEIGHT, WIDTH = @WIDTH,
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,
REGEX_MESSAGE_DE = @REGEX_MESSAGE_DE, REGEX_MESSAGE_EN = @REGEX_MESSAGE_EN, IMAGE_CONTROL = @IMAGE_CONTROL, SQL2 = @SQL2, SQL_ENABLE = @SQL_ENABLE
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>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@PROFIL_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@CTRL_TYPE" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CTRL_TYPE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@CTRL_TEXT" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CTRL_TEXT" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Double" Direction="Input" ParameterName="@X_LOC" Precision="0" ProviderType="Float" Scale="0" Size="0" SourceColumn="X_LOC" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Double" Direction="Input" ParameterName="@Y_LOC" Precision="0" ProviderType="Float" Scale="0" Size="0" SourceColumn="Y_LOC" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@INDEX_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="INDEX_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@TYP" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="TYP" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@VALIDATION" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="VALIDATION" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@CHOICE_LIST" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHOICE_LIST" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@CONNECTION_ID" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="CONNECTION_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@SQL_UEBERPRUEFUNG" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="SQL_UEBERPRUEFUNG" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@HEIGHT" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="HEIGHT" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@WIDTH" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="WIDTH" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@FONT_STYLE" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="FONT_STYLE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@FONT_SIZE" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="FONT_SIZE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@FONT_FAMILY" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="FONT_FAMILY" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int64" Direction="Input" ParameterName="@FONT_COLOR" Precision="0" ProviderType="BigInt" Scale="0" Size="0" SourceColumn="FONT_COLOR" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@READ_ONLY" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="READ_ONLY" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@LOAD_IDX_VALUE" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="LOAD_IDX_VALUE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@DEFAULT_VALUE" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="DEFAULT_VALUE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@MULTISELECT" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="MULTISELECT" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@VKT_ADD_ITEM" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="VKT_ADD_ITEM" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@VKT_PREVENT_MULTIPLE_VALUES" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="VKT_PREVENT_MULTIPLE_VALUES" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MATCH" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX_MATCH" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MESSAGE_DE" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX_MESSAGE_DE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@REGEX_MESSAGE_EN" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX_MESSAGE_EN" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_PROFIL_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="PROFIL_ID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_CTRL_TYPE" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CTRL_TYPE" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_CTRL_TEXT" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CTRL_TEXT" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Double" Direction="Input" ParameterName="@Original_X_LOC" Precision="0" ProviderType="Float" Scale="0" Size="0" SourceColumn="X_LOC" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Double" Direction="Input" ParameterName="@Original_Y_LOC" Precision="0" ProviderType="Float" Scale="0" Size="0" SourceColumn="Y_LOC" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_ADDED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="ADDED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CHANGED_WHO" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CHANGED_WHEN" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@Original_CHANGED_WHEN" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="CHANGED_WHEN" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_INDEX_NAME" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="INDEX_NAME" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_INDEX_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="INDEX_NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_TYP" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="TYP" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_TYP" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="TYP" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_VALIDATION" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="VALIDATION" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CHOICE_LIST" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CHOICE_LIST" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_CHOICE_LIST" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="CHOICE_LIST" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_CONNECTION_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="CONNECTION_ID" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@Original_CONNECTION_ID" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="CONNECTION_ID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@Original_HEIGHT" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="HEIGHT" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@Original_WIDTH" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="WIDTH" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_FONT_STYLE" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="FONT_STYLE" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@Original_FONT_STYLE" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="FONT_STYLE" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_FONT_SIZE" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="FONT_SIZE" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int16" Direction="Input" ParameterName="@Original_FONT_SIZE" Precision="0" ProviderType="SmallInt" Scale="0" Size="0" SourceColumn="FONT_SIZE" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_FONT_FAMILY" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="FONT_FAMILY" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_FONT_FAMILY" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="FONT_FAMILY" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_FONT_COLOR" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="FONT_COLOR" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int64" Direction="Input" ParameterName="@Original_FONT_COLOR" Precision="0" ProviderType="BigInt" Scale="0" Size="0" SourceColumn="FONT_COLOR" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_READ_ONLY" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="READ_ONLY" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_LOAD_IDX_VALUE" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="LOAD_IDX_VALUE" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_DEFAULT_VALUE" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="DEFAULT_VALUE" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_DEFAULT_VALUE" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="DEFAULT_VALUE" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_MULTISELECT" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="MULTISELECT" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_VKT_ADD_ITEM" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="VKT_ADD_ITEM" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_VKT_PREVENT_MULTIPLE_VALUES" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="VKT_PREVENT_MULTIPLE_VALUES" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@IsNull_REGEX_MATCH" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="REGEX_MATCH" SourceColumnNullMapping="true" SourceVersion="Original" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_REGEX_MATCH" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX_MATCH" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_REGEX_MESSAGE_DE" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX_MESSAGE_DE" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="AnsiString" Direction="Input" ParameterName="@Original_REGEX_MESSAGE_EN" Precision="0" ProviderType="VarChar" Scale="0" Size="0" SourceColumn="REGEX_MESSAGE_EN" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.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="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="PROFIL_ID" ColumnName="PROFIL_ID" DataSourceName="DD_ECM_TEST.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_TEST.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_TEST.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_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@CTRL_TEXT" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="CTRL_TEXT" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="X_LOC" ColumnName="X_LOC" DataSourceName="DD_ECM_TEST.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_TEST.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="true" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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="INDEX_NAME" ColumnName="INDEX_NAME" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@INDEX_NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="INDEX_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="TYP" ColumnName="TYP" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@TYP" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="TYP" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="VALIDATION" ColumnName="VALIDATION" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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_UEBERPRUEFUNG" ColumnName="SQL_UEBERPRUEFUNG" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@SQL_UEBERPRUEFUNG" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="SQL_UEBERPRUEFUNG" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="HEIGHT" ColumnName="HEIGHT" DataSourceName="DD_ECM_TEST.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_TEST.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="true" AutogeneratedName="FONT_STYLE" ColumnName="FONT_STYLE" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="smallint" DbType="Int16" Direction="Input" ParameterName="@FONT_STYLE" Precision="0" ProviderType="SmallInt" Scale="0" Size="2" SourceColumn="FONT_STYLE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="FONT_SIZE" ColumnName="FONT_SIZE" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="smallint" DbType="Int16" Direction="Input" ParameterName="@FONT_SIZE" Precision="0" ProviderType="SmallInt" Scale="0" Size="2" SourceColumn="FONT_SIZE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="FONT_FAMILY" ColumnName="FONT_FAMILY" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@FONT_FAMILY" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="FONT_FAMILY" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="FONT_COLOR" ColumnName="FONT_COLOR" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="bigint" DbType="Int64" Direction="Input" ParameterName="@FONT_COLOR" Precision="0" ProviderType="BigInt" Scale="0" Size="8" SourceColumn="FONT_COLOR" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="READ_ONLY" ColumnName="READ_ONLY" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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_PROFILE_CONTROLS" 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="DEFAULT_VALUE" ColumnName="DEFAULT_VALUE" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@DEFAULT_VALUE" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="DEFAULT_VALUE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="MULTISELECT" ColumnName="MULTISELECT" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@MULTISELECT" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="MULTISELECT" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="VKT_ADD_ITEM" ColumnName="VKT_ADD_ITEM" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@VKT_ADD_ITEM" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="VKT_ADD_ITEM" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="VKT_PREVENT_MULTIPLE_VALUES" ColumnName="VKT_PREVENT_MULTIPLE_VALUES" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@VKT_PREVENT_MULTIPLE_VALUES" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="VKT_PREVENT_MULTIPLE_VALUES" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="REGEX_MATCH" ColumnName="REGEX_MATCH" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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_DE" ColumnName="REGEX_MESSAGE_DE" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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_EN" ColumnName="REGEX_MESSAGE_EN" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" 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="true" AutogeneratedName="IMAGE_CONTROL" ColumnName="IMAGE_CONTROL" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varbinary(MAX)" DbType="Binary" Direction="Input" ParameterName="@IMAGE_CONTROL" Precision="0" ProviderType="VarBinary" Scale="0" Size="2147483647" SourceColumn="IMAGE_CONTROL" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="SQL2" ColumnName="SQL2" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@SQL2" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="SQL2" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="SQL_ENABLE" ColumnName="SQL_ENABLE" DataSourceName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DataTypeServer="varchar(MAX)" DbType="AnsiString" Direction="Input" ParameterName="@SQL_ENABLE" Precision="0" ProviderType="VarChar" Scale="0" Size="2147483647" SourceColumn="SQL_ENABLE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM_TEST.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_TEST.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>
</DbCommand>
</UpdateCommand>
@@ -1461,6 +1357,9 @@ SELECT GUID, PROFIL_ID, NAME, CTRL_TYPE, CTRL_TEXT, X_LOC, Y_LOC, ADDED_WHO, ADD
<Mapping SourceColumn="REGEX_MATCH" DataSetColumn="REGEX_MATCH" />
<Mapping SourceColumn="REGEX_MESSAGE_DE" DataSetColumn="REGEX_MESSAGE_DE" />
<Mapping SourceColumn="REGEX_MESSAGE_EN" DataSetColumn="REGEX_MESSAGE_EN" />
<Mapping SourceColumn="IMAGE_CONTROL" DataSetColumn="IMAGE_CONTROL" />
<Mapping SourceColumn="SQL2" DataSetColumn="SQL2" />
<Mapping SourceColumn="SQL_ENABLE" DataSetColumn="SQL_ENABLE" />
</Mappings>
<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">
@@ -1599,7 +1498,12 @@ WHERE (GUID = @Original_GUID);</CommandText>
<DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="DD_ECM_TEST.dbo.TBPM_PROFILE_CONTROLS" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="FillByProfil" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetDataByProfil" GeneratorSourceName="FillByProfil" GetMethodModifier="Public" GetMethodName="GetDataByProfil" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataByProfil" UserSourceName="FillByProfil">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT 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, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, SQL_UEBERPRUEFUNG, TYP, VALIDATION, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES, WIDTH, X_LOC, Y_LOC FROM TBPM_PROFILE_CONTROLS WHERE (PROFIL_ID = @profil_id) ORDER BY Y_LOC, X_LOC</CommandText>
<CommandText>SELECT 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, 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
FROM TBPM_PROFILE_CONTROLS
WHERE (PROFIL_ID = @profil_id)
ORDER BY Y_LOC, X_LOC</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="profil_id" ColumnName="PROFIL_ID" DataSourceName="DD_ECM_TEST.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" />
</Parameters>
@@ -1941,7 +1845,7 @@ FROM dbo.FNPM_GET_FREE_USER_FOR_PROFILE(@PROFILE_ID) AS FNPM_GET_FREE
<xs:element name="DD_DMSLiteDataSet" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="True" msprop:Generator_DataSetName="DD_DMSLiteDataSet" msprop:Generator_UserDSName="DD_DMSLiteDataSet">
<xs:complexType>
<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_TableClassName="TBPM_PROFILE_FINAL_INDEXINGDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_FINAL_INDEXING" 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_UserTableName="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowChangedName="TBPM_PROFILE_FINAL_INDEXINGRowChanged" msprop:Generator_RowEvArgName="TBPM_PROFILE_FINAL_INDEXINGRowChangeEvent" msprop:Generator_RowClassName="TBPM_PROFILE_FINAL_INDEXINGRow">
<xs:complexType>
<xs:sequence>
<xs:element name="INDEXNAME" msprop:Generator_ColumnVarNameInTable="columnINDEXNAME" msprop:Generator_ColumnPropNameInRow="INDEXNAME" msprop:Generator_ColumnPropNameInTable="INDEXNAMEColumn" msprop:Generator_UserColumnName="INDEXNAME">
@@ -2001,7 +1905,7 @@ FROM dbo.FNPM_GET_FREE_USER_FOR_PROFILE(@PROFILE_ID) AS FNPM_GET_FREE
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBPM_KONFIGURATION" msprop:Generator_TableClassName="TBPM_KONFIGURATIONDataTable" msprop:Generator_TableVarName="tableTBPM_KONFIGURATION" msprop:Generator_RowChangedName="TBPM_KONFIGURATIONRowChanged" msprop:Generator_TablePropName="TBPM_KONFIGURATION" msprop:Generator_RowDeletingName="TBPM_KONFIGURATIONRowDeleting" msprop:Generator_RowChangingName="TBPM_KONFIGURATIONRowChanging" msprop:Generator_RowEvHandlerName="TBPM_KONFIGURATIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_KONFIGURATIONRowDeleted" msprop:Generator_RowClassName="TBPM_KONFIGURATIONRow" msprop:Generator_UserTableName="TBPM_KONFIGURATION" msprop:Generator_RowEvArgName="TBPM_KONFIGURATIONRowChangeEvent">
<xs:element name="TBPM_KONFIGURATION" msprop:Generator_TableClassName="TBPM_KONFIGURATIONDataTable" msprop:Generator_TableVarName="tableTBPM_KONFIGURATION" msprop:Generator_TablePropName="TBPM_KONFIGURATION" msprop:Generator_RowDeletingName="TBPM_KONFIGURATIONRowDeleting" msprop:Generator_RowChangingName="TBPM_KONFIGURATIONRowChanging" msprop:Generator_RowEvHandlerName="TBPM_KONFIGURATIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_KONFIGURATIONRowDeleted" msprop:Generator_UserTableName="TBPM_KONFIGURATION" msprop:Generator_RowChangedName="TBPM_KONFIGURATIONRowChanged" msprop:Generator_RowEvArgName="TBPM_KONFIGURATIONRowChangeEvent" msprop:Generator_RowClassName="TBPM_KONFIGURATIONRow">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:unsignedByte" />
@@ -2097,7 +2001,7 @@ FROM dbo.FNPM_GET_FREE_USER_FOR_PROFILE(@PROFILE_ID) AS FNPM_GET_FREE
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBDD_USER" msprop:Generator_TableClassName="TBDD_USERDataTable" msprop:Generator_TableVarName="tableTBDD_USER" msprop:Generator_RowChangedName="TBDD_USERRowChanged" msprop:Generator_TablePropName="TBDD_USER" msprop:Generator_RowDeletingName="TBDD_USERRowDeleting" msprop:Generator_RowChangingName="TBDD_USERRowChanging" msprop:Generator_RowEvHandlerName="TBDD_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_USERRowDeleted" msprop:Generator_RowClassName="TBDD_USERRow" msprop:Generator_UserTableName="TBDD_USER" msprop:Generator_RowEvArgName="TBDD_USERRowChangeEvent">
<xs:element name="TBDD_USER" msprop:Generator_TableClassName="TBDD_USERDataTable" msprop:Generator_TableVarName="tableTBDD_USER" msprop:Generator_TablePropName="TBDD_USER" msprop:Generator_RowDeletingName="TBDD_USERRowDeleting" msprop:Generator_RowChangingName="TBDD_USERRowChanging" msprop:Generator_RowEvHandlerName="TBDD_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_USERRowDeleted" msprop:Generator_UserTableName="TBDD_USER" msprop:Generator_RowChangedName="TBDD_USERRowChanged" msprop:Generator_RowEvArgName="TBDD_USERRowChangeEvent" msprop:Generator_RowClassName="TBDD_USERRow">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -2162,7 +2066,7 @@ FROM dbo.FNPM_GET_FREE_USER_FOR_PROFILE(@PROFILE_ID) AS FNPM_GET_FREE
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBPM_TYPE" msprop:Generator_TableClassName="TBPM_TYPEDataTable" msprop:Generator_TableVarName="tableTBPM_TYPE" msprop:Generator_RowChangedName="TBPM_TYPERowChanged" msprop:Generator_TablePropName="TBPM_TYPE" msprop:Generator_RowDeletingName="TBPM_TYPERowDeleting" msprop:Generator_RowChangingName="TBPM_TYPERowChanging" msprop:Generator_RowEvHandlerName="TBPM_TYPERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_TYPERowDeleted" msprop:Generator_RowClassName="TBPM_TYPERow" msprop:Generator_UserTableName="TBPM_TYPE" msprop:Generator_RowEvArgName="TBPM_TYPERowChangeEvent">
<xs:element name="TBPM_TYPE" msprop:Generator_TableClassName="TBPM_TYPEDataTable" msprop:Generator_TableVarName="tableTBPM_TYPE" msprop:Generator_TablePropName="TBPM_TYPE" msprop:Generator_RowDeletingName="TBPM_TYPERowDeleting" msprop:Generator_RowChangingName="TBPM_TYPERowChanging" msprop:Generator_RowEvHandlerName="TBPM_TYPERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_TYPERowDeleted" msprop:Generator_UserTableName="TBPM_TYPE" msprop:Generator_RowChangedName="TBPM_TYPERowChanged" msprop:Generator_RowEvArgName="TBPM_TYPERowChangeEvent" msprop:Generator_RowClassName="TBPM_TYPERow">
<xs:complexType>
<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:short" />
@@ -2192,7 +2096,7 @@ FROM dbo.FNPM_GET_FREE_USER_FOR_PROFILE(@PROFILE_ID) AS FNPM_GET_FREE
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBPM_ERROR_LOG" msprop:Generator_TableClassName="TBPM_ERROR_LOGDataTable" msprop:Generator_TableVarName="tableTBPM_ERROR_LOG" msprop:Generator_RowChangedName="TBPM_ERROR_LOGRowChanged" msprop:Generator_TablePropName="TBPM_ERROR_LOG" msprop:Generator_RowDeletingName="TBPM_ERROR_LOGRowDeleting" msprop:Generator_RowChangingName="TBPM_ERROR_LOGRowChanging" msprop:Generator_RowEvHandlerName="TBPM_ERROR_LOGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_ERROR_LOGRowDeleted" msprop:Generator_RowClassName="TBPM_ERROR_LOGRow" msprop:Generator_UserTableName="TBPM_ERROR_LOG" msprop:Generator_RowEvArgName="TBPM_ERROR_LOGRowChangeEvent">
<xs:element name="TBPM_ERROR_LOG" msprop:Generator_TableClassName="TBPM_ERROR_LOGDataTable" msprop:Generator_TableVarName="tableTBPM_ERROR_LOG" msprop:Generator_TablePropName="TBPM_ERROR_LOG" msprop:Generator_RowDeletingName="TBPM_ERROR_LOGRowDeleting" msprop:Generator_RowChangingName="TBPM_ERROR_LOGRowChanging" msprop:Generator_RowEvHandlerName="TBPM_ERROR_LOGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_ERROR_LOGRowDeleted" msprop:Generator_UserTableName="TBPM_ERROR_LOG" msprop:Generator_RowChangedName="TBPM_ERROR_LOGRowChanged" msprop:Generator_RowEvArgName="TBPM_ERROR_LOGRowChangeEvent" msprop:Generator_RowClassName="TBPM_ERROR_LOGRow">
<xs:complexType>
<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" />
@@ -2215,7 +2119,7 @@ FROM dbo.FNPM_GET_FREE_USER_FOR_PROFILE(@PROFILE_ID) AS FNPM_GET_FREE
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBDD_CONNECTION" msprop:Generator_TableClassName="TBDD_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBDD_CONNECTION" msprop:Generator_RowChangedName="TBDD_CONNECTIONRowChanged" msprop:Generator_TablePropName="TBDD_CONNECTION" msprop:Generator_RowDeletingName="TBDD_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBDD_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBDD_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_CONNECTIONRowDeleted" msprop:Generator_RowClassName="TBDD_CONNECTIONRow" msprop:Generator_UserTableName="TBDD_CONNECTION" msprop:Generator_RowEvArgName="TBDD_CONNECTIONRowChangeEvent">
<xs:element name="TBDD_CONNECTION" msprop:Generator_TableClassName="TBDD_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBDD_CONNECTION" msprop:Generator_TablePropName="TBDD_CONNECTION" msprop:Generator_RowDeletingName="TBDD_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBDD_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBDD_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_CONNECTIONRowDeleted" msprop:Generator_UserTableName="TBDD_CONNECTION" msprop:Generator_RowChangedName="TBDD_CONNECTIONRowChanged" msprop:Generator_RowEvArgName="TBDD_CONNECTIONRowChangeEvent" msprop:Generator_RowClassName="TBDD_CONNECTIONRow">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:short" />
@@ -2288,7 +2192,7 @@ FROM dbo.FNPM_GET_FREE_USER_FOR_PROFILE(@PROFILE_ID) AS FNPM_GET_FREE
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBPROFILE_USER" msprop:Generator_TableClassName="TBPROFILE_USERDataTable" msprop:Generator_TableVarName="tableTBPROFILE_USER" msprop:Generator_RowChangedName="TBPROFILE_USERRowChanged" msprop:Generator_TablePropName="TBPROFILE_USER" msprop:Generator_RowDeletingName="TBPROFILE_USERRowDeleting" msprop:Generator_RowChangingName="TBPROFILE_USERRowChanging" msprop:Generator_RowEvHandlerName="TBPROFILE_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPROFILE_USERRowDeleted" msprop:Generator_RowClassName="TBPROFILE_USERRow" msprop:Generator_UserTableName="TBPROFILE_USER" msprop:Generator_RowEvArgName="TBPROFILE_USERRowChangeEvent">
<xs:element name="TBPROFILE_USER" msprop:Generator_TableClassName="TBPROFILE_USERDataTable" msprop:Generator_TableVarName="tableTBPROFILE_USER" msprop:Generator_TablePropName="TBPROFILE_USER" msprop:Generator_RowDeletingName="TBPROFILE_USERRowDeleting" msprop:Generator_RowChangingName="TBPROFILE_USERRowChanging" msprop:Generator_RowEvHandlerName="TBPROFILE_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPROFILE_USERRowDeleted" msprop:Generator_UserTableName="TBPROFILE_USER" msprop:Generator_RowChangedName="TBPROFILE_USERRowChanged" msprop:Generator_RowEvArgName="TBPROFILE_USERRowChangeEvent" msprop:Generator_RowClassName="TBPROFILE_USERRow">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -2337,7 +2241,7 @@ FROM dbo.FNPM_GET_FREE_USER_FOR_PROFILE(@PROFILE_ID) AS FNPM_GET_FREE
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBPM_PROFILE_FILES" msprop:Generator_TableClassName="TBPM_PROFILE_FILESDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_FILES" msprop:Generator_RowChangedName="TBPM_PROFILE_FILESRowChanged" msprop:Generator_TablePropName="TBPM_PROFILE_FILES" msprop:Generator_RowDeletingName="TBPM_PROFILE_FILESRowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILE_FILESRowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_FILESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_FILESRowDeleted" msprop:Generator_RowClassName="TBPM_PROFILE_FILESRow" msprop:Generator_UserTableName="TBPM_PROFILE_FILES" msprop:Generator_RowEvArgName="TBPM_PROFILE_FILESRowChangeEvent">
<xs:element name="TBPM_PROFILE_FILES" msprop:Generator_TableClassName="TBPM_PROFILE_FILESDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_FILES" msprop:Generator_TablePropName="TBPM_PROFILE_FILES" msprop:Generator_RowDeletingName="TBPM_PROFILE_FILESRowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILE_FILESRowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_FILESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_FILESRowDeleted" msprop:Generator_UserTableName="TBPM_PROFILE_FILES" msprop:Generator_RowChangedName="TBPM_PROFILE_FILESRowChanged" msprop:Generator_RowEvArgName="TBPM_PROFILE_FILESRowChangeEvent" msprop:Generator_RowClassName="TBPM_PROFILE_FILESRow">
<xs:complexType>
<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" />
@@ -2352,7 +2256,7 @@ FROM dbo.FNPM_GET_FREE_USER_FOR_PROFILE(@PROFILE_ID) AS FNPM_GET_FREE
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBPM_PROFILE" msprop:Generator_TableClassName="TBPM_PROFILEDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE" msprop:Generator_RowChangedName="TBPM_PROFILERowChanged" msprop:Generator_TablePropName="TBPM_PROFILE" msprop:Generator_RowDeletingName="TBPM_PROFILERowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILERowDeleted" msprop:Generator_RowClassName="TBPM_PROFILERow" msprop:Generator_UserTableName="TBPM_PROFILE" msprop:Generator_RowEvArgName="TBPM_PROFILERowChangeEvent">
<xs:element name="TBPM_PROFILE" msprop:Generator_TableClassName="TBPM_PROFILEDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE" msprop:Generator_TablePropName="TBPM_PROFILE" msprop:Generator_RowDeletingName="TBPM_PROFILERowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILERowDeleted" msprop:Generator_UserTableName="TBPM_PROFILE" msprop:Generator_RowChangedName="TBPM_PROFILERowChanged" msprop:Generator_RowEvArgName="TBPM_PROFILERowChangeEvent" msprop:Generator_RowClassName="TBPM_PROFILERow">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -2467,7 +2371,7 @@ FROM dbo.FNPM_GET_FREE_USER_FOR_PROFILE(@PROFILE_ID) AS FNPM_GET_FREE
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBWH_CONNECTION" msprop:Generator_TableClassName="TBWH_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBWH_CONNECTION" msprop:Generator_TablePropName="TBWH_CONNECTION" msprop:Generator_RowDeletingName="TBWH_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBWH_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBWH_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_CONNECTIONRowDeleted" msprop:Generator_UserTableName="TBWH_CONNECTION" msprop:Generator_RowChangedName="TBWH_CONNECTIONRowChanged" msprop:Generator_RowEvArgName="TBWH_CONNECTIONRowChangeEvent" msprop:Generator_RowClassName="TBWH_CONNECTIONRow">
<xs:element name="TBWH_CONNECTION" msprop:Generator_TableClassName="TBWH_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBWH_CONNECTION" msprop:Generator_RowChangedName="TBWH_CONNECTIONRowChanged" msprop:Generator_TablePropName="TBWH_CONNECTION" msprop:Generator_RowDeletingName="TBWH_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBWH_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBWH_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_CONNECTIONRowDeleted" msprop:Generator_RowClassName="TBWH_CONNECTIONRow" msprop:Generator_UserTableName="TBWH_CONNECTION" msprop:Generator_RowEvArgName="TBWH_CONNECTIONRowChangeEvent">
<xs:complexType>
<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:short" />
@@ -2540,7 +2444,7 @@ FROM dbo.FNPM_GET_FREE_USER_FOR_PROFILE(@PROFILE_ID) AS FNPM_GET_FREE
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_TableClassName="TBWH_CHECK_PROFILE_CONTROLSDataTable" msprop:Generator_TableVarName="tableTBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_TablePropName="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_RowDeletingName="TBWH_CHECK_PROFILE_CONTROLSRowDeleting" msprop:Generator_RowChangingName="TBWH_CHECK_PROFILE_CONTROLSRowChanging" msprop:Generator_RowEvHandlerName="TBWH_CHECK_PROFILE_CONTROLSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_CHECK_PROFILE_CONTROLSRowDeleted" msprop:Generator_UserTableName="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_RowChangedName="TBWH_CHECK_PROFILE_CONTROLSRowChanged" msprop:Generator_RowEvArgName="TBWH_CHECK_PROFILE_CONTROLSRowChangeEvent" msprop:Generator_RowClassName="TBWH_CHECK_PROFILE_CONTROLSRow">
<xs:element name="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_TableClassName="TBWH_CHECK_PROFILE_CONTROLSDataTable" msprop:Generator_TableVarName="tableTBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_RowChangedName="TBWH_CHECK_PROFILE_CONTROLSRowChanged" msprop:Generator_TablePropName="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_RowDeletingName="TBWH_CHECK_PROFILE_CONTROLSRowDeleting" msprop:Generator_RowChangingName="TBWH_CHECK_PROFILE_CONTROLSRowChanging" msprop:Generator_RowEvHandlerName="TBWH_CHECK_PROFILE_CONTROLSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_CHECK_PROFILE_CONTROLSRowDeleted" msprop:Generator_RowClassName="TBWH_CHECK_PROFILE_CONTROLSRow" msprop:Generator_UserTableName="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_RowEvArgName="TBWH_CHECK_PROFILE_CONTROLSRowChangeEvent">
<xs:complexType>
<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" />
@@ -2591,7 +2495,7 @@ FROM dbo.FNPM_GET_FREE_USER_FOR_PROFILE(@PROFILE_ID) AS FNPM_GET_FREE
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBPM_PROFILE_CONTROLS" msprop:Generator_TableClassName="TBPM_PROFILE_CONTROLSDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_CONTROLS" msprop:Generator_TablePropName="TBPM_PROFILE_CONTROLS" msprop:Generator_RowDeletingName="TBPM_PROFILE_CONTROLSRowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILE_CONTROLSRowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_CONTROLSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_CONTROLSRowDeleted" msprop:Generator_UserTableName="TBPM_PROFILE_CONTROLS" msprop:Generator_RowChangedName="TBPM_PROFILE_CONTROLSRowChanged" msprop:Generator_RowEvArgName="TBPM_PROFILE_CONTROLSRowChangeEvent" msprop:Generator_RowClassName="TBPM_PROFILE_CONTROLSRow">
<xs:element name="TBPM_PROFILE_CONTROLS" msprop:Generator_TableClassName="TBPM_PROFILE_CONTROLSDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_CONTROLS" msprop:Generator_RowChangedName="TBPM_PROFILE_CONTROLSRowChanged" msprop:Generator_TablePropName="TBPM_PROFILE_CONTROLS" msprop:Generator_RowDeletingName="TBPM_PROFILE_CONTROLSRowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILE_CONTROLSRowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_CONTROLSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_CONTROLSRowDeleted" msprop:Generator_RowClassName="TBPM_PROFILE_CONTROLSRow" msprop:Generator_UserTableName="TBPM_PROFILE_CONTROLS" msprop:Generator_RowEvArgName="TBPM_PROFILE_CONTROLSRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -2704,10 +2608,25 @@ FROM dbo.FNPM_GET_FREE_USER_FOR_PROFILE(@PROFILE_ID) AS FNPM_GET_FREE
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="IMAGE_CONTROL" msprop:Generator_ColumnVarNameInTable="columnIMAGE_CONTROL" msprop:Generator_ColumnPropNameInRow="IMAGE_CONTROL" msprop:Generator_ColumnPropNameInTable="IMAGE_CONTROLColumn" msprop:Generator_UserColumnName="IMAGE_CONTROL" type="xs:base64Binary" minOccurs="0" />
<xs:element name="SQL2" msprop:Generator_ColumnVarNameInTable="columnSQL2" msprop:Generator_ColumnPropNameInRow="SQL2" msprop:Generator_ColumnPropNameInTable="SQL2Column" msprop:Generator_UserColumnName="SQL2" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="SQL_ENABLE" msprop:Generator_ColumnVarNameInTable="columnSQL_ENABLE" msprop:Generator_ColumnPropNameInRow="SQL_ENABLE" msprop:Generator_ColumnPropNameInTable="SQL_ENABLEColumn" msprop:Generator_UserColumnName="SQL_ENABLE" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBPM_CONTROL_TABLE" msprop:Generator_TableClassName="TBPM_CONTROL_TABLEDataTable" msprop:Generator_TableVarName="tableTBPM_CONTROL_TABLE" msprop:Generator_TablePropName="TBPM_CONTROL_TABLE" msprop:Generator_RowDeletingName="TBPM_CONTROL_TABLERowDeleting" msprop:Generator_RowChangingName="TBPM_CONTROL_TABLERowChanging" msprop:Generator_RowEvHandlerName="TBPM_CONTROL_TABLERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_CONTROL_TABLERowDeleted" msprop:Generator_UserTableName="TBPM_CONTROL_TABLE" msprop:Generator_RowChangedName="TBPM_CONTROL_TABLERowChanged" msprop:Generator_RowEvArgName="TBPM_CONTROL_TABLERowChangeEvent" msprop:Generator_RowClassName="TBPM_CONTROL_TABLERow">
<xs:element name="TBPM_CONTROL_TABLE" msprop:Generator_TableClassName="TBPM_CONTROL_TABLEDataTable" msprop:Generator_TableVarName="tableTBPM_CONTROL_TABLE" msprop:Generator_RowChangedName="TBPM_CONTROL_TABLERowChanged" msprop:Generator_TablePropName="TBPM_CONTROL_TABLE" msprop:Generator_RowDeletingName="TBPM_CONTROL_TABLERowDeleting" msprop:Generator_RowChangingName="TBPM_CONTROL_TABLERowChanging" msprop:Generator_RowEvHandlerName="TBPM_CONTROL_TABLERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_CONTROL_TABLERowDeleted" msprop:Generator_RowClassName="TBPM_CONTROL_TABLERow" msprop:Generator_UserTableName="TBPM_CONTROL_TABLE" msprop:Generator_RowEvArgName="TBPM_CONTROL_TABLERowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@@ -2785,7 +2704,7 @@ FROM dbo.FNPM_GET_FREE_USER_FOR_PROFILE(@PROFILE_ID) AS FNPM_GET_FREE
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBDD_GROUPS" msprop:Generator_TableClassName="TBDD_GROUPSDataTable" msprop:Generator_TableVarName="tableTBDD_GROUPS" msprop:Generator_RowChangedName="TBDD_GROUPSRowChanged" msprop:Generator_TablePropName="TBDD_GROUPS" msprop:Generator_RowDeletingName="TBDD_GROUPSRowDeleting" msprop:Generator_RowChangingName="TBDD_GROUPSRowChanging" msprop:Generator_RowEvHandlerName="TBDD_GROUPSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_GROUPSRowDeleted" msprop:Generator_RowClassName="TBDD_GROUPSRow" msprop:Generator_UserTableName="TBDD_GROUPS" msprop:Generator_RowEvArgName="TBDD_GROUPSRowChangeEvent">
<xs:element name="TBDD_GROUPS" msprop:Generator_TableClassName="TBDD_GROUPSDataTable" msprop:Generator_TableVarName="tableTBDD_GROUPS" msprop:Generator_TablePropName="TBDD_GROUPS" msprop:Generator_RowDeletingName="TBDD_GROUPSRowDeleting" msprop:Generator_RowChangingName="TBDD_GROUPSRowChanging" msprop:Generator_RowEvHandlerName="TBDD_GROUPSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_GROUPSRowDeleted" msprop:Generator_UserTableName="TBDD_GROUPS" msprop:Generator_RowChangedName="TBDD_GROUPSRowChanged" msprop:Generator_RowEvArgName="TBDD_GROUPSRowChangeEvent" msprop:Generator_RowClassName="TBDD_GROUPSRow">
<xs:complexType>
<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" />
@@ -2826,7 +2745,7 @@ FROM dbo.FNPM_GET_FREE_USER_FOR_PROFILE(@PROFILE_ID) AS FNPM_GET_FREE
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBPROFILE_GROUP" msprop:Generator_TableClassName="TBPROFILE_GROUPDataTable" msprop:Generator_TableVarName="tableTBPROFILE_GROUP" msprop:Generator_TablePropName="TBPROFILE_GROUP" msprop:Generator_RowDeletingName="TBPROFILE_GROUPRowDeleting" msprop:Generator_RowChangingName="TBPROFILE_GROUPRowChanging" msprop:Generator_RowEvHandlerName="TBPROFILE_GROUPRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPROFILE_GROUPRowDeleted" msprop:Generator_UserTableName="TBPROFILE_GROUP" msprop:Generator_RowChangedName="TBPROFILE_GROUPRowChanged" msprop:Generator_RowEvArgName="TBPROFILE_GROUPRowChangeEvent" msprop:Generator_RowClassName="TBPROFILE_GROUPRow">
<xs:element name="TBPROFILE_GROUP" msprop:Generator_TableClassName="TBPROFILE_GROUPDataTable" msprop:Generator_TableVarName="tableTBPROFILE_GROUP" msprop:Generator_RowChangedName="TBPROFILE_GROUPRowChanged" msprop:Generator_TablePropName="TBPROFILE_GROUP" msprop:Generator_RowDeletingName="TBPROFILE_GROUPRowDeleting" msprop:Generator_RowChangingName="TBPROFILE_GROUPRowChanging" msprop:Generator_RowEvHandlerName="TBPROFILE_GROUPRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPROFILE_GROUPRowDeleted" msprop:Generator_RowClassName="TBPROFILE_GROUPRow" msprop:Generator_UserTableName="TBPROFILE_GROUP" msprop:Generator_RowEvArgName="TBPROFILE_GROUPRowChangeEvent">
<xs:complexType>
<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" />
@@ -2864,7 +2783,7 @@ FROM dbo.FNPM_GET_FREE_USER_FOR_PROFILE(@PROFILE_ID) AS FNPM_GET_FREE
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="FNPM_GET_FREE_USER_FOR_PROFILE" msprop:Generator_TableClassName="FNPM_GET_FREE_USER_FOR_PROFILEDataTable" msprop:Generator_TableVarName="tableFNPM_GET_FREE_USER_FOR_PROFILE" msprop:Generator_TablePropName="FNPM_GET_FREE_USER_FOR_PROFILE" msprop:Generator_RowDeletingName="FNPM_GET_FREE_USER_FOR_PROFILERowDeleting" msprop:Generator_RowChangingName="FNPM_GET_FREE_USER_FOR_PROFILERowChanging" msprop:Generator_RowEvHandlerName="FNPM_GET_FREE_USER_FOR_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="FNPM_GET_FREE_USER_FOR_PROFILERowDeleted" msprop:Generator_UserTableName="FNPM_GET_FREE_USER_FOR_PROFILE" msprop:Generator_RowChangedName="FNPM_GET_FREE_USER_FOR_PROFILERowChanged" msprop:Generator_RowEvArgName="FNPM_GET_FREE_USER_FOR_PROFILERowChangeEvent" msprop:Generator_RowClassName="FNPM_GET_FREE_USER_FOR_PROFILERow">
<xs:element name="FNPM_GET_FREE_USER_FOR_PROFILE" msprop:Generator_TableClassName="FNPM_GET_FREE_USER_FOR_PROFILEDataTable" msprop:Generator_TableVarName="tableFNPM_GET_FREE_USER_FOR_PROFILE" msprop:Generator_RowChangedName="FNPM_GET_FREE_USER_FOR_PROFILERowChanged" msprop:Generator_TablePropName="FNPM_GET_FREE_USER_FOR_PROFILE" msprop:Generator_RowDeletingName="FNPM_GET_FREE_USER_FOR_PROFILERowDeleting" msprop:Generator_RowChangingName="FNPM_GET_FREE_USER_FOR_PROFILERowChanging" msprop:Generator_RowEvHandlerName="FNPM_GET_FREE_USER_FOR_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="FNPM_GET_FREE_USER_FOR_PROFILERowDeleted" msprop:Generator_RowClassName="FNPM_GET_FREE_USER_FOR_PROFILERow" msprop:Generator_UserTableName="FNPM_GET_FREE_USER_FOR_PROFILE" msprop:Generator_RowEvArgName="FNPM_GET_FREE_USER_FOR_PROFILERowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="SequentialOrder" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnSequentialOrder" msprop:Generator_ColumnPropNameInRow="SequentialOrder" msprop:Generator_ColumnPropNameInTable="SequentialOrderColumn" msprop:Generator_UserColumnName="SequentialOrder" type="xs:int" />
@@ -2994,11 +2913,11 @@ FROM dbo.FNPM_GET_FREE_USER_FOR_PROFILE(@PROFILE_ID) AS FNPM_GET_FREE
</xs:element>
<xs:annotation>
<xs:appinfo>
<msdata:Relationship name="FK_TBPM_ERROR_LOG_PROFILE1" msdata:parent="TBPM_PROFILE" msdata:child="TBPM_ERROR_LOG" msdata:parentkey="GUID" msdata:childkey="PROFIL_ID" msprop:Generator_UserChildTable="TBPM_ERROR_LOG" msprop:Generator_ChildPropName="GetTBPM_ERROR_LOGRows" msprop:Generator_UserRelationName="FK_TBPM_ERROR_LOG_PROFILE1" msprop:Generator_ParentPropName="TBPM_PROFILERow" msprop:Generator_RelationVarName="relationFK_TBPM_ERROR_LOG_PROFILE1" msprop:Generator_UserParentTable="TBPM_PROFILE" />
<msdata:Relationship name="FK_TBPM_PROFILE_TYPE1" msdata:parent="TBPM_TYPE" msdata:child="TBPM_PROFILE" msdata:parentkey="GUID" msdata:childkey="TYPE" msprop:Generator_UserChildTable="TBPM_PROFILE" msprop:Generator_ChildPropName="GetTBPM_PROFILERows" msprop:Generator_UserRelationName="FK_TBPM_PROFILE_TYPE1" msprop:Generator_RelationVarName="relationFK_TBPM_PROFILE_TYPE1" msprop:Generator_UserParentTable="TBPM_TYPE" msprop:Generator_ParentPropName="TBPM_TYPERow" />
<msdata:Relationship name="FK_TBPM_PROFILE_CONTROLS_PROFILE1" msdata:parent="TBPM_PROFILE" msdata:child="TBPM_PROFILE_CONTROLS" msdata:parentkey="GUID" msdata:childkey="PROFIL_ID" msprop:Generator_UserChildTable="TBPM_PROFILE_CONTROLS" msprop:Generator_ChildPropName="GetTBPM_PROFILE_CONTROLSRows" msprop:Generator_UserRelationName="FK_TBPM_PROFILE_CONTROLS_PROFILE1" msprop:Generator_ParentPropName="TBPM_PROFILERow" msprop:Generator_RelationVarName="relationFK_TBPM_PROFILE_CONTROLS_PROFILE1" msprop:Generator_UserParentTable="TBPM_PROFILE" />
<msdata:Relationship name="FK_TBPM_CONTROL_TABLE_CONTROL1" msdata:parent="TBPM_PROFILE_CONTROLS" msdata:child="TBPM_CONTROL_TABLE" msdata:parentkey="GUID" msdata:childkey="CONTROL_ID" msprop:Generator_UserChildTable="TBPM_CONTROL_TABLE" msprop:Generator_ChildPropName="GetTBPM_CONTROL_TABLERows" msprop:Generator_UserRelationName="FK_TBPM_CONTROL_TABLE_CONTROL1" msprop:Generator_ParentPropName="TBPM_PROFILE_CONTROLSRow" msprop:Generator_RelationVarName="relationFK_TBPM_CONTROL_TABLE_CONTROL1" msprop:Generator_UserParentTable="TBPM_PROFILE_CONTROLS" />
<msdata:Relationship name="FK_TBPM_CONTROL_TABLE_CONTROL" msdata:parent="TBWH_CHECK_PROFILE_CONTROLS" msdata:child="TBPM_CONTROL_TABLE" msdata:parentkey="GUID" msdata:childkey="CONTROL_ID" msprop:Generator_UserChildTable="TBPM_CONTROL_TABLE" msprop:Generator_ChildPropName="GetTBPM_CONTROL_TABLERows" msprop:Generator_UserRelationName="FK_TBPM_CONTROL_TABLE_CONTROL" msprop:Generator_RelationVarName="relationFK_TBPM_CONTROL_TABLE_CONTROL" msprop:Generator_UserParentTable="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_ParentPropName="TBWH_CHECK_PROFILE_CONTROLSRow" />
<msdata:Relationship name="FK_TBPM_ERROR_LOG_PROFILE1" msdata:parent="TBPM_PROFILE" msdata:child="TBPM_ERROR_LOG" msdata:parentkey="GUID" msdata:childkey="PROFIL_ID" msprop:Generator_UserChildTable="TBPM_ERROR_LOG" msprop:Generator_ChildPropName="GetTBPM_ERROR_LOGRows" msprop:Generator_UserRelationName="FK_TBPM_ERROR_LOG_PROFILE1" msprop:Generator_RelationVarName="relationFK_TBPM_ERROR_LOG_PROFILE1" msprop:Generator_UserParentTable="TBPM_PROFILE" msprop:Generator_ParentPropName="TBPM_PROFILERow" />
<msdata:Relationship name="FK_TBPM_PROFILE_TYPE1" msdata:parent="TBPM_TYPE" msdata:child="TBPM_PROFILE" msdata:parentkey="GUID" msdata:childkey="TYPE" msprop:Generator_UserChildTable="TBPM_PROFILE" msprop:Generator_ChildPropName="GetTBPM_PROFILERows" msprop:Generator_UserRelationName="FK_TBPM_PROFILE_TYPE1" msprop:Generator_ParentPropName="TBPM_TYPERow" msprop:Generator_RelationVarName="relationFK_TBPM_PROFILE_TYPE1" msprop:Generator_UserParentTable="TBPM_TYPE" />
<msdata:Relationship name="FK_TBPM_PROFILE_CONTROLS_PROFILE1" msdata:parent="TBPM_PROFILE" msdata:child="TBPM_PROFILE_CONTROLS" msdata:parentkey="GUID" msdata:childkey="PROFIL_ID" msprop:Generator_UserChildTable="TBPM_PROFILE_CONTROLS" msprop:Generator_ChildPropName="GetTBPM_PROFILE_CONTROLSRows" msprop:Generator_UserRelationName="FK_TBPM_PROFILE_CONTROLS_PROFILE1" msprop:Generator_RelationVarName="relationFK_TBPM_PROFILE_CONTROLS_PROFILE1" msprop:Generator_UserParentTable="TBPM_PROFILE" msprop:Generator_ParentPropName="TBPM_PROFILERow" />
<msdata:Relationship name="FK_TBPM_CONTROL_TABLE_CONTROL1" msdata:parent="TBPM_PROFILE_CONTROLS" msdata:child="TBPM_CONTROL_TABLE" msdata:parentkey="GUID" msdata:childkey="CONTROL_ID" msprop:Generator_UserChildTable="TBPM_CONTROL_TABLE" msprop:Generator_ChildPropName="GetTBPM_CONTROL_TABLERows" msprop:Generator_UserRelationName="FK_TBPM_CONTROL_TABLE_CONTROL1" msprop:Generator_RelationVarName="relationFK_TBPM_CONTROL_TABLE_CONTROL1" msprop:Generator_UserParentTable="TBPM_PROFILE_CONTROLS" msprop:Generator_ParentPropName="TBPM_PROFILE_CONTROLSRow" />
<msdata:Relationship name="FK_TBPM_CONTROL_TABLE_CONTROL" msdata:parent="TBWH_CHECK_PROFILE_CONTROLS" msdata:child="TBPM_CONTROL_TABLE" msdata:parentkey="GUID" msdata:childkey="CONTROL_ID" msprop:Generator_UserChildTable="TBPM_CONTROL_TABLE" msprop:Generator_ChildPropName="GetTBPM_CONTROL_TABLERows" msprop:Generator_UserRelationName="FK_TBPM_CONTROL_TABLE_CONTROL" msprop:Generator_ParentPropName="TBWH_CHECK_PROFILE_CONTROLSRow" msprop:Generator_RelationVarName="relationFK_TBPM_CONTROL_TABLE_CONTROL" msprop:Generator_UserParentTable="TBWH_CHECK_PROFILE_CONTROLS" />
</xs:appinfo>
</xs:annotation>
</xs:schema>

View File

@@ -4,19 +4,19 @@
Changes to this file may cause incorrect behavior and will be lost if
the code is regenerated.
</autogenerated>-->
<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="668" ViewPortY="294" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="-27" ViewPortY="163" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
<Shapes>
<Shape ID="DesignTable:TBPM_PROFILE_FINAL_INDEXING" ZOrder="1" 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="2" X="1688" Y="-74" Height="324" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" />
<Shape ID="DesignTable:TBPM_KONFIGURATION" ZOrder="21" X="-17" Y="232" Height="262" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="97" />
<Shape ID="DesignTable:TBDD_USER" ZOrder="8" X="608" Y="446" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
<Shape ID="DesignTable:TBPM_TYPE" ZOrder="12" X="17" Y="113" Height="203" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
<Shape ID="DesignTable:TBPM_ERROR_LOG" ZOrder="14" X="443" Y="-87" Height="111" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="21" />
<Shape ID="DesignTable:TBDD_CONNECTION" ZOrder="9" X="410" Y="114" Height="186" Width="178" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="80" />
<Shape ID="DesignTable:TBPROFILE_USER" ZOrder="2" 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="324" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="83" />
<Shape ID="DesignTable:TBPROFILE_USER" ZOrder="3" 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="1" X="1391" Y="-70" Height="229" Width="268" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="83" />
<Shape ID="DesignTable:TBPM_PROFILE" ZOrder="4" X="303" Y="316" Height="381" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBWH_CHECK_PROFILE_CONTROLS" ZOrder="17" 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="5" X="948" Y="407" Height="381" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="24" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBPM_PROFILE_CONTROLS" ZOrder="5" X="946" Y="402" Height="381" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="24" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBPM_CONTROL_TABLE" ZOrder="10" X="1300" Y="326" Height="381" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="24" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBDD_GROUPS" ZOrder="7" X="19" Y="320" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
<Shape ID="DesignTable:TBPROFILE_GROUP" ZOrder="11" X="1054" Y="47" Height="286" Width="277" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="178" />
@@ -56,23 +56,23 @@
<RoutePoints>
<Point>
<X>603</X>
<Y>508</Y>
<Y>503</Y>
</Point>
<Point>
<X>948</X>
<Y>508</Y>
<X>946</X>
<Y>503</Y>
</Point>
</RoutePoints>
</Connector>
<Connector ID="DesignRelation:FK_TBPM_CONTROL_TABLE_CONTROL1" ZOrder="15" LineWidth="11">
<RoutePoints>
<Point>
<X>1248</X>
<Y>549</Y>
<X>1246</X>
<Y>544</Y>
</Point>
<Point>
<X>1300</X>
<Y>549</Y>
<Y>544</Y>
</Point>
</RoutePoints>
</Connector>

View File

@@ -160,9 +160,6 @@
<Reference Include="FormsUtils">
<HintPath>P:\Visual Studio Projekte\Bibliotheken\FormsUtils.dll</HintPath>
</Reference>
<Reference Include="GdPicture.NET.14">
<HintPath>D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET (.NET Framework 4.5)\GdPicture.NET.14.dll</HintPath>
</Reference>
<Reference Include="Independentsoft.Msg, Version=2.0.140.29929, Culture=neutral, PublicKeyToken=76be97fe952f1ec7, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\..\..\DDMonorepo\Controls.DocumentViewer\bin\Debug\Independentsoft.Msg.dll</HintPath>
@@ -219,6 +216,8 @@
<Compile Include="ClassFinalIndex.vb" />
<Compile Include="ClassFinalizeDoc.vb" />
<Compile Include="ClassIDBData.vb" />
<Compile Include="ClassImageSelector.vb" />
<Compile Include="ClassImageValue.vb" />
<Compile Include="ClassIndexListConverter.vb" />
<Compile Include="ClassInit.vb" />
<Compile Include="ClassParamRefresh.vb" />

View File

@@ -78,30 +78,27 @@ Public Module ModuleControlProperties
Private _index_type As String
Private _sql_command As String
Private _Override_SQL As String
Private _Enable_SQL As String
Private _image_Value As String
Private _default_value
Public Property Required() As Boolean
<Category("Validierung")>
Public Property [ReadOnly]() As Boolean
<Browsable(False)>
<Category("Indexierung")>
Public Property IndexType() As IndexTypes
''' <summary>
''' Diese Eigenschaft enthält die auswählbaren Indicies, die für das Control verfügbar sind. Wird nicht direkt angezeigt.
''' </summary>
<Browsable(False)>
Public Property Indicies() As List(Of String)
''' <summary>
''' Diese Eigenschaft enthält des ausgewählten Index
''' </summary>
<Category("Indexierung")>
<TypeConverter(GetType(IndexListConverter))>
Public Property Index() As String
<Category("Daten")>
Public Property SQLCommand() As SQLValue
Get
@@ -111,7 +108,31 @@ Public Module ModuleControlProperties
_sql_command = value.Value
End Set
End Property
Public Property Override_SQL() As SQLValue
Get
Return New SQLValue(NotNull(_Override_SQL, ""))
End Get
Set(ByVal value As SQLValue)
_Override_SQL = value.Value
End Set
End Property
Public Property Enable_SQL() As SQLValue
Get
Return New SQLValue(NotNull(_Enable_SQL, ""))
End Get
Set(ByVal value As SQLValue)
_Enable_SQL = value.Value
End Set
End Property
<Category("Image")>
Public Property CtrlImage() As ImageValue
Get
Return New ImageValue(NotNull(_image_Value, ""))
End Get
Set(ByVal value As ImageValue)
_image_Value = value.Value
End Set
End Property
<Category("Daten")>
Public Property DefaultValue() As String
Get
@@ -201,7 +222,11 @@ Public Module ModuleControlProperties
<Category("Einstellungen")>
Public Property AllowAddNewValues As Boolean
End Class
Public Class ButtonProperties
Inherits InputProperties
<Category("Allgemein")>
Public Property Text() As String
End Class
Public Class LookupControlProperties
Inherits InputProperties

View File

@@ -11,12 +11,13 @@
Public LOG_ERRORS_ONLY As Boolean = True
' Viewer Settings
Public VIEWER_UNIVERSAL As String = ""
Public VIEWER_XCHANGE As String = ""
Public VIEWER_SUMATRA As String = ""
Public VIEWER_ZOOM_LEVEL As Integer = 3
Public VIEWER_PDF As String = "internal"
Public VIEWER_ALL As String = "docview"
'Public VIEWER_UNIVERSAL As String = ""
'Public VIEWER_XCHANGE As String = ""
'Public VIEWER_SUMATRA As String = ""
'Public VIEWER_ZOOM_LEVEL As Integer = 3
'Public VIEWER_PDF As String = "internal"
'Public VIEWER_ALL As String = "docview"
Public INDEX_DMS_ERSTELLT = "DMS erstellt"
Public INDEX_DMS_ERSTELLT_ZEIT = "DMS erstellt (Zeit)"

View File

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.9.6.8")>
<Assembly: AssemblyVersion("1.9.9.0")>
<Assembly: AssemblyFileVersion("1.0.0.0")>

View File

@@ -27,7 +27,6 @@ Partial Class frmAdministration
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmAdministration))
Dim NAMELabel As System.Windows.Forms.Label
Dim DESCRIPTIONLabel As System.Windows.Forms.Label
Dim WD_SEARCHLabel As System.Windows.Forms.Label
Dim PRIORITYLabel As System.Windows.Forms.Label
Dim ADDED_WHOLabel As System.Windows.Forms.Label
Dim ADDED_WHENLabel As System.Windows.Forms.Label
@@ -122,8 +121,8 @@ Partial Class frmAdministration
Me.MOVE2FOLDERTextBox = New System.Windows.Forms.TextBox()
Me.btnmovetoFolderDialog = New System.Windows.Forms.Button()
Me.PRIORITYNumericUpDown = New System.Windows.Forms.NumericUpDown()
Me.btnopenSuche = New System.Windows.Forms.Button()
Me.btnWDSuche = New System.Windows.Forms.Button()
Me.btnWMopenSuche = New System.Windows.Forms.Button()
Me.btnWMSuche = New System.Windows.Forms.Button()
Me.TITLETextBox = New System.Windows.Forms.TextBox()
Me.PROFILGUIDTextBox = New System.Windows.Forms.TextBox()
Me.NAMETextBox = New System.Windows.Forms.TextBox()
@@ -250,10 +249,10 @@ Partial Class frmAdministration
Me.FNPM_GET_FREE_USER_FOR_PROFILETableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.FNPM_GET_FREE_USER_FOR_PROFILETableAdapter()
Me.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = New DD_PM_WINDREAM.FinalIndexDataSetTableAdapters.TBPM_PROFILE_FINAL_INDEXINGTableAdapter()
Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
Me.Label7 = New System.Windows.Forms.Label()
GUIDLabel = New System.Windows.Forms.Label()
NAMELabel = New System.Windows.Forms.Label()
DESCRIPTIONLabel = New System.Windows.Forms.Label()
WD_SEARCHLabel = New System.Windows.Forms.Label()
PRIORITYLabel = New System.Windows.Forms.Label()
ADDED_WHOLabel = New System.Windows.Forms.Label()
ADDED_WHENLabel = New System.Windows.Forms.Label()
@@ -654,11 +653,6 @@ Partial Class frmAdministration
resources.ApplyResources(DESCRIPTIONLabel, "DESCRIPTIONLabel")
DESCRIPTIONLabel.Name = "DESCRIPTIONLabel"
'
'WD_SEARCHLabel
'
resources.ApplyResources(WD_SEARCHLabel, "WD_SEARCHLabel")
WD_SEARCHLabel.Name = "WD_SEARCHLabel"
'
'PRIORITYLabel
'
resources.ApplyResources(PRIORITYLabel, "PRIORITYLabel")
@@ -988,18 +982,18 @@ Partial Class frmAdministration
resources.ApplyResources(Me.PRIORITYNumericUpDown, "PRIORITYNumericUpDown")
Me.PRIORITYNumericUpDown.Name = "PRIORITYNumericUpDown"
'
'btnopenSuche
'btnWMopenSuche
'
resources.ApplyResources(Me.btnopenSuche, "btnopenSuche")
Me.btnopenSuche.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.flag_green
Me.btnopenSuche.Name = "btnopenSuche"
Me.btnopenSuche.UseVisualStyleBackColor = True
resources.ApplyResources(Me.btnWMopenSuche, "btnWMopenSuche")
Me.btnWMopenSuche.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.flag_green
Me.btnWMopenSuche.Name = "btnWMopenSuche"
Me.btnWMopenSuche.UseVisualStyleBackColor = True
'
'btnWDSuche
'btnWMSuche
'
resources.ApplyResources(Me.btnWDSuche, "btnWDSuche")
Me.btnWDSuche.Name = "btnWDSuche"
Me.btnWDSuche.UseVisualStyleBackColor = True
resources.ApplyResources(Me.btnWMSuche, "btnWMSuche")
Me.btnWMSuche.Name = "btnWMSuche"
Me.btnWMSuche.UseVisualStyleBackColor = True
'
'TITLETextBox
'
@@ -1115,6 +1109,7 @@ Partial Class frmAdministration
'TabPage5
'
resources.ApplyResources(Me.TabPage5, "TabPage5")
Me.TabPage5.Controls.Add(Me.Label7)
Me.TabPage5.Controls.Add(Me.Label4)
Me.TabPage5.Controls.Add(Me.Label1)
Me.TabPage5.Controls.Add(Me.Label9)
@@ -1128,7 +1123,6 @@ Partial Class frmAdministration
Me.TabPage5.Controls.Add(Me.Label2)
Me.TabPage5.Controls.Add(Me.DESCRIPTIONTextBox)
Me.TabPage5.Controls.Add(DESCRIPTIONLabel)
Me.TabPage5.Controls.Add(WD_SEARCHLabel)
Me.TabPage5.Controls.Add(Me.cmbObjekttypen)
Me.TabPage5.Controls.Add(Me.WD_SEARCHTextBox)
Me.TabPage5.Controls.Add(PRIORITYLabel)
@@ -1137,10 +1131,10 @@ Partial Class frmAdministration
Me.TabPage5.Controls.Add(Me.ADDED_WHOTextBox)
Me.TabPage5.Controls.Add(ADDED_WHENLabel)
Me.TabPage5.Controls.Add(CHANGED_WHENLabel)
Me.TabPage5.Controls.Add(Me.btnWDSuche)
Me.TabPage5.Controls.Add(Me.btnWMSuche)
Me.TabPage5.Controls.Add(Me.ADDED_WHENTextBox)
Me.TabPage5.Controls.Add(Me.CHANGED_WHOTextBox)
Me.TabPage5.Controls.Add(Me.btnopenSuche)
Me.TabPage5.Controls.Add(Me.btnWMopenSuche)
Me.TabPage5.Controls.Add(Me.PRIORITYNumericUpDown)
Me.TabPage5.Controls.Add(CHANGED_WHOLabel)
Me.TabPage5.Name = "TabPage5"
@@ -1876,6 +1870,11 @@ Partial Class frmAdministration
'
Me.TBPM_PROFILE_FINAL_INDEXINGTableAdapter.ClearBeforeFill = True
'
'Label7
'
resources.ApplyResources(Me.Label7, "Label7")
Me.Label7.Name = "Label7"
'
'frmAdministration
'
resources.ApplyResources(Me, "$this")
@@ -1982,7 +1981,7 @@ Partial Class frmAdministration
Friend WithEvents BindingNavigatorSeparator2 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents VWPM_PROFILE_USERBindingNavigatorSaveItem As System.Windows.Forms.ToolStripButton
Friend WithEvents TBPM_PROFILEBindingNavigator As System.Windows.Forms.BindingNavigator
Friend WithEvents btnWDSuche As System.Windows.Forms.Button
Friend WithEvents btnWMSuche As System.Windows.Forms.Button
Friend WithEvents TITLETextBox As System.Windows.Forms.TextBox
Friend WithEvents PROFILGUIDTextBox As System.Windows.Forms.TextBox
Friend WithEvents NAMETextBox As System.Windows.Forms.TextBox
@@ -1996,7 +1995,7 @@ Partial Class frmAdministration
Friend WithEvents CHANGED_WHENTextBox As System.Windows.Forms.TextBox
Friend WithEvents FINAL_TEXTTextBox As System.Windows.Forms.TextBox
Friend WithEvents dlgWindreamsuche As System.Windows.Forms.OpenFileDialog
Friend WithEvents btnopenSuche As System.Windows.Forms.Button
Friend WithEvents btnWMopenSuche As System.Windows.Forms.Button
Friend WithEvents tstrpbtn_add As System.Windows.Forms.ToolStripButton
Friend WithEvents PRIORITYNumericUpDown As System.Windows.Forms.NumericUpDown
Friend WithEvents tstrlblSave As System.Windows.Forms.ToolStripLabel
@@ -2171,4 +2170,5 @@ Partial Class frmAdministration
Friend WithEvents Label9 As Label
Friend WithEvents ToolTip1 As ToolTip
Friend WithEvents Label4 As Label
Friend WithEvents Label7 As Label
End Class

View File

@@ -856,39 +856,6 @@
<value>TabPage5</value>
</data>
<data name="&gt;&gt;DESCRIPTIONLabel.ZOrder" xml:space="preserve">
<value>12</value>
</data>
<metadata name="WD_SEARCHLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<data name="WD_SEARCHLabel.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
</data>
<data name="WD_SEARCHLabel.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 9.75pt</value>
</data>
<data name="WD_SEARCHLabel.Location" type="System.Drawing.Point, System.Drawing">
<value>16, 99</value>
</data>
<data name="WD_SEARCHLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>82, 16</value>
</data>
<data name="WD_SEARCHLabel.TabIndex" type="System.Int32, mscorlib">
<value>8</value>
</data>
<data name="WD_SEARCHLabel.Text" xml:space="preserve">
<value>Datei-Suche:</value>
</data>
<data name="&gt;&gt;WD_SEARCHLabel.Name" xml:space="preserve">
<value>WD_SEARCHLabel</value>
</data>
<data name="&gt;&gt;WD_SEARCHLabel.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;WD_SEARCHLabel.Parent" xml:space="preserve">
<value>TabPage5</value>
</data>
<data name="&gt;&gt;WD_SEARCHLabel.ZOrder" xml:space="preserve">
<value>13</value>
</data>
<metadata name="PRIORITYLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
@@ -1477,7 +1444,7 @@
<value>TabPage5</value>
</data>
<data name="&gt;&gt;DISPLAY_MODELabel.ZOrder" xml:space="preserve">
<value>6</value>
<value>7</value>
</data>
<metadata name="TBDD_USERBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>727, 56</value>
@@ -1769,7 +1736,7 @@
<value>TabPage5</value>
</data>
<data name="&gt;&gt;Label2.ZOrder" xml:space="preserve">
<value>10</value>
<value>11</value>
</data>
<data name="cmbObjekttypen.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 9.75pt</value>
@@ -1820,7 +1787,7 @@
<value>TabPage5</value>
</data>
<data name="&gt;&gt;FINAL_PROFILECheckBox.ZOrder" xml:space="preserve">
<value>5</value>
<value>6</value>
</data>
<data name="FINAL_TEXTTextBox.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 9.75pt</value>
@@ -1844,7 +1811,7 @@
<value>TabPage5</value>
</data>
<data name="&gt;&gt;FINAL_TEXTTextBox.ZOrder" xml:space="preserve">
<value>4</value>
<value>5</value>
</data>
<data name="Label1.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
@@ -1874,7 +1841,7 @@
<value>TabPage5</value>
</data>
<data name="&gt;&gt;Label1.ZOrder" xml:space="preserve">
<value>1</value>
<value>2</value>
</data>
<metadata name="TBPM_TYPEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>174, 56</value>
@@ -1901,7 +1868,7 @@
<value>TabPage5</value>
</data>
<data name="&gt;&gt;cmbType.ZOrder" xml:space="preserve">
<value>3</value>
<value>4</value>
</data>
<data name="MOVE2FOLDERTextBox.Font" type="System.Drawing.Font, System.Drawing">
<value>Segoe UI, 9pt</value>
@@ -2005,67 +1972,67 @@
<data name="&gt;&gt;PRIORITYNumericUpDown.ZOrder" xml:space="preserve">
<value>26</value>
</data>
<data name="btnopenSuche.Font" type="System.Drawing.Font, System.Drawing">
<data name="btnWMopenSuche.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 9.75pt</value>
</data>
<data name="btnopenSuche.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
<data name="btnWMopenSuche.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
<value>MiddleLeft</value>
</data>
<data name="btnopenSuche.Location" type="System.Drawing.Point, System.Drawing">
<data name="btnWMopenSuche.Location" type="System.Drawing.Point, System.Drawing">
<value>791, 101</value>
</data>
<data name="btnopenSuche.Padding" type="System.Windows.Forms.Padding, System.Windows.Forms">
<data name="btnWMopenSuche.Padding" type="System.Windows.Forms.Padding, System.Windows.Forms">
<value>0, 0, 2, 2</value>
</data>
<data name="btnopenSuche.Size" type="System.Drawing.Size, System.Drawing">
<data name="btnWMopenSuche.Size" type="System.Drawing.Size, System.Drawing">
<value>111, 23</value>
</data>
<data name="btnopenSuche.TabIndex" type="System.Int32, mscorlib">
<data name="btnWMopenSuche.TabIndex" type="System.Int32, mscorlib">
<value>49</value>
</data>
<data name="btnopenSuche.Text" xml:space="preserve">
<data name="btnWMopenSuche.Text" xml:space="preserve">
<value>Teste Suche</value>
</data>
<data name="btnopenSuche.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
<data name="btnWMopenSuche.TextAlign" type="System.Drawing.ContentAlignment, System.Drawing">
<value>MiddleRight</value>
</data>
<data name="&gt;&gt;btnopenSuche.Name" xml:space="preserve">
<value>btnopenSuche</value>
<data name="&gt;&gt;btnWMopenSuche.Name" xml:space="preserve">
<value>btnWMopenSuche</value>
</data>
<data name="&gt;&gt;btnopenSuche.Type" xml:space="preserve">
<data name="&gt;&gt;btnWMopenSuche.Type" xml:space="preserve">
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;btnopenSuche.Parent" xml:space="preserve">
<data name="&gt;&gt;btnWMopenSuche.Parent" xml:space="preserve">
<value>TabPage5</value>
</data>
<data name="&gt;&gt;btnopenSuche.ZOrder" xml:space="preserve">
<data name="&gt;&gt;btnWMopenSuche.ZOrder" xml:space="preserve">
<value>25</value>
</data>
<data name="btnWDSuche.Font" type="System.Drawing.Font, System.Drawing">
<data name="btnWMSuche.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 9.75pt</value>
</data>
<data name="btnWDSuche.Location" type="System.Drawing.Point, System.Drawing">
<data name="btnWMSuche.Location" type="System.Drawing.Point, System.Drawing">
<value>754, 101</value>
</data>
<data name="btnWDSuche.Size" type="System.Drawing.Size, System.Drawing">
<data name="btnWMSuche.Size" type="System.Drawing.Size, System.Drawing">
<value>31, 23</value>
</data>
<data name="btnWDSuche.TabIndex" type="System.Int32, mscorlib">
<data name="btnWMSuche.TabIndex" type="System.Int32, mscorlib">
<value>29</value>
</data>
<data name="btnWDSuche.Text" xml:space="preserve">
<data name="btnWMSuche.Text" xml:space="preserve">
<value>...</value>
</data>
<data name="&gt;&gt;btnWDSuche.Name" xml:space="preserve">
<value>btnWDSuche</value>
<data name="&gt;&gt;btnWMSuche.Name" xml:space="preserve">
<value>btnWMSuche</value>
</data>
<data name="&gt;&gt;btnWDSuche.Type" xml:space="preserve">
<data name="&gt;&gt;btnWMSuche.Type" xml:space="preserve">
<value>System.Windows.Forms.Button, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;btnWDSuche.Parent" xml:space="preserve">
<data name="&gt;&gt;btnWMSuche.Parent" xml:space="preserve">
<value>TabPage5</value>
</data>
<data name="&gt;&gt;btnWDSuche.ZOrder" xml:space="preserve">
<data name="&gt;&gt;btnWMSuche.ZOrder" xml:space="preserve">
<value>22</value>
</data>
<data name="TITLETextBox.Location" type="System.Drawing.Point, System.Drawing">
@@ -2153,7 +2120,7 @@
<value>TabPage5</value>
</data>
<data name="&gt;&gt;DESCRIPTIONTextBox.ZOrder" xml:space="preserve">
<value>11</value>
<value>12</value>
</data>
<data name="WD_SEARCHTextBox.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 9.75pt</value>
@@ -2320,6 +2287,36 @@
<data name="TabPage5.AutoScroll" type="System.Boolean, mscorlib">
<value>True</value>
</data>
<data name="Label7.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
</data>
<data name="Label7.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 9.75pt</value>
</data>
<data name="Label7.Location" type="System.Drawing.Point, System.Drawing">
<value>16, 104</value>
</data>
<data name="Label7.Size" type="System.Drawing.Size, System.Drawing">
<value>45, 16</value>
</data>
<data name="Label7.TabIndex" type="System.Int32, mscorlib">
<value>89</value>
</data>
<data name="Label7.Text" xml:space="preserve">
<value>Label7</value>
</data>
<data name="&gt;&gt;Label7.Name" xml:space="preserve">
<value>Label7</value>
</data>
<data name="&gt;&gt;Label7.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;Label7.Parent" xml:space="preserve">
<value>TabPage5</value>
</data>
<data name="&gt;&gt;Label7.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="Label4.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
</data>
@@ -2348,7 +2345,7 @@
<value>TabPage5</value>
</data>
<data name="&gt;&gt;Label4.ZOrder" xml:space="preserve">
<value>0</value>
<value>1</value>
</data>
<data name="Label9.AutoSize" type="System.Boolean, mscorlib">
<value>True</value>
@@ -2378,7 +2375,7 @@
<value>TabPage5</value>
</data>
<data name="&gt;&gt;Label9.ZOrder" xml:space="preserve">
<value>2</value>
<value>3</value>
</data>
<data name="DISPLAY_MODEComboBox.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 9.75pt</value>
@@ -2411,7 +2408,7 @@
<value>TabPage5</value>
</data>
<data name="&gt;&gt;DISPLAY_MODEComboBox.ZOrder" xml:space="preserve">
<value>7</value>
<value>8</value>
</data>
<data name="cmbLOGIndex.Location" type="System.Drawing.Point, System.Drawing">
<value>202, 188</value>
@@ -2432,7 +2429,7 @@
<value>TabPage5</value>
</data>
<data name="&gt;&gt;cmbLOGIndex.ZOrder" xml:space="preserve">
<value>8</value>
<value>9</value>
</data>
<data name="PM_VEKTOR_INDEXComboBox.Location" type="System.Drawing.Point, System.Drawing">
<value>202, 158</value>
@@ -2453,7 +2450,7 @@
<value>TabPage5</value>
</data>
<data name="&gt;&gt;PM_VEKTOR_INDEXComboBox.ZOrder" xml:space="preserve">
<value>9</value>
<value>10</value>
</data>
<data name="TabPage5.Font" type="System.Drawing.Font, System.Drawing">
<value>Tahoma, 9.75pt, style=Bold</value>
@@ -2573,7 +2570,7 @@
<value>6</value>
</data>
<data name="gridFinalIndex.Size" type="System.Drawing.Size, System.Drawing">
<value>627, 275</value>
<value>627, 278</value>
</data>
<data name="gridFinalIndex.TabIndex" type="System.Int32, mscorlib">
<value>93</value>
@@ -2600,7 +2597,7 @@
<value>627, 0</value>
</data>
<data name="PropertyGrid1.Size" type="System.Drawing.Size, System.Drawing">
<value>323, 275</value>
<value>323, 278</value>
</data>
<data name="PropertyGrid1.TabIndex" type="System.Int32, mscorlib">
<value>91</value>
@@ -2621,7 +2618,7 @@
<value>3, 166</value>
</data>
<data name="Panel5.Size" type="System.Drawing.Size, System.Drawing">
<value>950, 275</value>
<value>950, 278</value>
</data>
<data name="Panel5.TabIndex" type="System.Int32, mscorlib">
<value>94</value>

View File

@@ -59,6 +59,11 @@ Public Class frmAdministration
End Try
If IDB_ACTIVE = True Then
IDBData.Init()
Label7.Text = "Datei-Suche (SQL):"
btnWMopenSuche.Visible = False
Else
Label7.Text = "windream-Suche:"
btnWMopenSuche.Visible = True
End If
ObjekttypenEintragen()
Indexe_eintragen()
@@ -193,7 +198,13 @@ Public Class frmAdministration
End Sub
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles btnWDSuche.Click
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles btnWMSuche.Click
If IDB_ACTIVE = True Then
CURRENT_DESIGN_TYPE = "IDB_SEARCH"
Dim oForm As New frmSQL_DESIGNER() With {.SQLCommand = Me.WD_SEARCHTextBox.Text}
Dim oResult = oForm.ShowDialog()
Me.WD_SEARCHTextBox.Text = oForm.SQLCommand
Else
If Not Me.WD_SEARCHTextBox.Text = "" Then
Me.dlgWindreamsuche.FileName = Me.WD_SEARCHTextBox.Text
End If
@@ -201,9 +212,11 @@ Public Class frmAdministration
If Me.dlgWindreamsuche.ShowDialog = Windows.Forms.DialogResult.OK Then
Me.WD_SEARCHTextBox.Text = Me.dlgWindreamsuche.FileName
End If
End If
End Sub
Private Sub btnopenSuche_Click(sender As System.Object, e As System.EventArgs) Handles btnopenSuche.Click
Private Sub btnopenSuche_Click(sender As System.Object, e As System.EventArgs) Handles btnWMopenSuche.Click
Try
If Not Me.WD_SEARCHTextBox.Text = "" Then
Dim p As New Process()

View File

@@ -63,6 +63,7 @@ Partial Class frmFormDesigner
Me.GridControlContextMenu = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.MenuItemAddColumn = New System.Windows.Forms.ToolStripMenuItem()
Me.SplitContainer1 = New System.Windows.Forms.SplitContainer()
Me.btnButton = New System.Windows.Forms.Button()
Me.GroupBox1.SuspendLayout()
Me.pnldesigner.SuspendLayout()
Me.TabControlEigenschaften.SuspendLayout()
@@ -85,6 +86,7 @@ Partial Class frmFormDesigner
'
Me.GroupBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.GroupBox1.Controls.Add(Me.btnButton)
Me.GroupBox1.Controls.Add(Me.btnLine)
Me.GroupBox1.Controls.Add(Me.btnTabelle)
Me.GroupBox1.Controls.Add(Me.btnCheckbox)
@@ -269,10 +271,10 @@ Partial Class frmFormDesigner
Me.pageFormat.Controls.Add(Me.btnwidth_minus)
Me.pageFormat.Controls.Add(Me.btnwidth_plus)
Me.pageFormat.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.pageFormat.Location = New System.Drawing.Point(4, 25)
Me.pageFormat.Location = New System.Drawing.Point(4, 22)
Me.pageFormat.Name = "pageFormat"
Me.pageFormat.Padding = New System.Windows.Forms.Padding(3)
Me.pageFormat.Size = New System.Drawing.Size(468, 332)
Me.pageFormat.Size = New System.Drawing.Size(532, 523)
Me.pageFormat.TabIndex = 1
Me.pageFormat.Text = "Format"
Me.pageFormat.UseVisualStyleBackColor = True
@@ -477,6 +479,19 @@ Partial Class frmFormDesigner
Me.SplitContainer1.SplitterDistance = 601
Me.SplitContainer1.TabIndex = 25
'
'btnButton
'
Me.btnButton.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnButton.Image = CType(resources.GetObject("btnButton.Image"), System.Drawing.Image)
Me.btnButton.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnButton.Location = New System.Drawing.Point(290, 22)
Me.btnButton.Name = "btnButton"
Me.btnButton.Size = New System.Drawing.Size(112, 27)
Me.btnButton.TabIndex = 8
Me.btnButton.Text = "Button"
Me.btnButton.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnButton.UseVisualStyleBackColor = True
'
'frmFormDesigner
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!)
@@ -553,4 +568,5 @@ Partial Class frmFormDesigner
Friend WithEvents GridControlContextMenu As ContextMenuStrip
Friend WithEvents MenuItemAddColumn As ToolStripMenuItem
Friend WithEvents SplitContainer1 As SplitContainer
Friend WithEvents btnButton As Button
End Class

View File

@@ -118,6 +118,15 @@
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="btnButton.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsQAAA7EAZUrDhsAAACKSURBVDhPpZPdDYAgDIQZiRkYjnFkNPSF19qiJRWV8kNy
hpa7L01AAwBLuj64UkoWFVHQIfLZHCQAFdT03oNzThX5CuQGdIdZDGFAOQhbgD0ev6Jz9lLuBfgK1X0V
IPetWp2AazbLmnvNCWQ9DKgDQwBpqvcqYPYalx/S2lOmxRBUHk3R82eaF5gT0trMYS6noX8AAAAASUVO
RK5CYII=
</value>
</data>
<data name="btnLine.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABYAAAAWCAYAAADEtGw7AAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
@@ -132,9 +141,6 @@
<metadata name="DD_DMSLiteDataSet.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>206, 17</value>
</metadata>
<metadata name="DD_DMSLiteDataSet.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>206, 17</value>
</metadata>
<metadata name="TBDD_CONNECTIONBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 56</value>
</metadata>

View File

@@ -99,7 +99,7 @@ Public Class frmFormDesigner
Private Sub frmFormDesigner_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
If ProfileId > 0 Then
Dim sql As String = $"SELECT NAME, INDEX_NAME FROM TBPM_PROFILE_CONTROLS WHERE PROFIL_ID = {ProfileId} AND CTRL_TYPE <> 'LBL' AND CTRL_TYPE <> 'LINE'"
Dim sql As String = $"SELECT NAME, INDEX_NAME FROM TBPM_PROFILE_CONTROLS WHERE PROFIL_ID = {ProfileId} AND CTRL_TYPE NOT IN ('BUTTON','LBL','LINE')"
Dim dt As DataTable = ClassDatabase.Return_Datatable(sql)
Dim missingIndexControls As New List(Of String)
@@ -191,7 +191,9 @@ Public Class frmFormDesigner
End If
Return oType <> FINALINDICES.INDEX_TYPE_VECTOR_DATETIME
End Function
Public Function ByteArrayToBitmap(bytearray() As Byte) As Bitmap
Return New Bitmap(New System.IO.MemoryStream(bytearray))
End Function
Sub LoadControls()
Try
TBPM_PROFILE_CONTROLSTableAdapter.FillByProfil(DD_DMSLiteDataSet.TBPM_PROFILE_CONTROLS, ProfileId)
@@ -214,6 +216,7 @@ Public Class frmFormDesigner
Dim font As New Font(family, size, style, GraphicsUnit.Point)
Dim color As Color = IntToColor(NotNull(row.Item("FONT_COLOR"), 0))
' Jetzt die Control spezifischen Eigenschaften zuweisen
Select Case row.Item("CTRL_TYPE")
Case "TXT"
@@ -269,6 +272,10 @@ Public Class frmFormDesigner
Dim line = ClassControlCreator.CreateExistingLine(row, True)
pnldesigner.Controls.Add(line)
SetMovementHandlers(line)
Case "BUTTON"
Dim oButton = ClassControlCreator.CreateExistingButton(row, True)
pnldesigner.Controls.Add(oButton)
SetMovementHandlers(oButton)
End Select
Next
Catch ex As Exception
@@ -277,7 +284,7 @@ Public Class frmFormDesigner
End Try
End Sub
Private Sub DragDropButtons_MouseDown(sender As Object, e As MouseEventArgs) Handles btnlabel.MouseDown, btntextbox.MouseDown, btndtp.MouseDown, btnVektor.MouseDown, btnTabelle.MouseDown, btnCheckbox.MouseDown, btnLine.MouseDown
Private Sub DragDropButtons_MouseDown(sender As Object, e As MouseEventArgs) Handles btnlabel.MouseDown, btntextbox.MouseDown, btndtp.MouseDown, btnVektor.MouseDown, btnTabelle.MouseDown, btnCheckbox.MouseDown, btnLine.MouseDown, btnButton.MouseDown
Mouse_IsPressed = True
CurrentControl = Nothing
@@ -288,7 +295,7 @@ Public Class frmFormDesigner
End Try
End Sub
Private Sub DragDropButtons_MouseMove(sender As Object, e As MouseEventArgs) Handles btnlabel.MouseMove, btntextbox.MouseMove, btndtp.MouseMove, btnVektor.MouseMove, btnTabelle.MouseMove, btnCheckbox.MouseMove, btnLine.MouseMove
Private Sub DragDropButtons_MouseMove(sender As Object, e As MouseEventArgs) Handles btnlabel.MouseMove, btntextbox.MouseMove, btndtp.MouseMove, btnVektor.MouseMove, btnTabelle.MouseMove, btnCheckbox.MouseMove, btnLine.MouseMove, btnButton.MouseMove
If Mouse_IsPressed Then
Dim btn As Button = sender
Dim dragDropData As String
@@ -310,13 +317,15 @@ Public Class frmFormDesigner
dragDropData = ClassControlCreator.PREFIX_CHECKBOX
Case "btnLine"
dragDropData = ClassControlCreator.PREFIX_LINE
Case "btnButton"
dragDropData = ClassControlCreator.PREFIX_BUTTON
End Select
btn.DoDragDrop(dragDropData, DragDropEffects.Copy)
End If
End Sub
Private Sub DragDropButtons_MouseUp(sender As Object, e As MouseEventArgs) Handles btnlabel.MouseUp, btntextbox.MouseUp, btndtp.MouseUp, btnVektor.MouseUp, btnTabelle.MouseUp, btnCheckbox.MouseUp, btnLine.MouseUp
Private Sub DragDropButtons_MouseUp(sender As Object, e As MouseEventArgs) Handles btnlabel.MouseUp, btntextbox.MouseUp, btndtp.MouseUp, btnVektor.MouseUp, btnTabelle.MouseUp, btnCheckbox.MouseUp, btnLine.MouseUp, btnButton.MouseUp
Mouse_IsPressed = False
End Sub
@@ -448,6 +457,21 @@ Public Class frmFormDesigner
pnldesigner.Controls.Add(line)
Case ClassControlCreator.PREFIX_BUTTON
Dim oButton = ClassControlCreator.CreateNewButton(cursorPosition)
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)
CurrentControl = oButton
CurrentControl.Tag = New ClassControlCreator.ControlMetadata() With {
.Guid = GetLastID(),
.ReadOnly = False
}
pnldesigner.Controls.Add(oButton)
End Select
Catch ex As Exception
LOGGER.Error(ex)
@@ -752,6 +776,7 @@ Public Class frmFormDesigner
Dim color As Integer = NotNull(row.Item("FONT_COLOR"), 0)
obj.TextColor = IntToColor(color)
Return obj
End Function
@@ -776,6 +801,7 @@ Public Class frmFormDesigner
End Function
Private Sub LoadControlProperties(sender As Control)
Try
Dim props
Dim dt As DataTable = DD_DMSLiteDataSet.TBPM_PROFILE_CONTROLS
Dim row As DataRow
@@ -829,14 +855,14 @@ Public Class frmFormDesigner
Dim check As CheckBox = sender
Dim checkProps As CheckboxProperties = CreatePropsObjectWithIndicies(New CheckboxProperties, row, Source_AllIndicies)
checkProps.Text = check.Text
checkProps.Enable_SQL = New SQLValue(row.Item("SQL_ENABLE"))
props = checkProps
ElseIf TypeOf sender Is TextBox Then
Dim txt As TextBox = sender
Dim txtProps As TextboxProperties = CreatePropsObjectWithIndicies(New TextboxProperties, row, Source_AllIndicies)
txtProps.Regex = NotNull(row.Item("REGEX_MATCH"), String.Empty)
txtProps.RegexMessage = NotNull(row.Item("REGEX_MESSAGE_DE"), String.Empty)
txtProps.Enable_SQL = New SQLValue(NotNull(row.Item("SQL_ENABLE"), ""))
props = txtProps
ElseIf TypeOf sender Is ComboBox Then
@@ -844,14 +870,14 @@ Public Class frmFormDesigner
Dim cmbProps As ComboboxProperties = CreatePropsObjectWithIndicies(New ComboboxProperties, row, Source_AllIndicies)
cmbProps.ChoiceLists = Windream_ChoiceLists
cmbProps.ChoiceList = NotNull(row.Item("CHOICE_LIST"), String.Empty)
cmbProps.Enable_SQL = New SQLValue(NotNull(row.Item("SQL_ENABLE"), ""))
props = cmbProps
cmbProps.DisplayAsLookUpControl = False
ElseIf TypeOf sender Is DateTimePicker Then
Dim dtp As DateTimePicker = sender
Dim dtpProps As DatepickerProperties = CreatePropsObjectWithIndicies(New DatepickerProperties, row, Source_AllIndicies)
dtpProps.Enable_SQL = New SQLValue(NotNull(row.Item("SQL_ENABLE"), ""))
props = dtpProps
ElseIf TypeOf sender Is DataGridView Then
@@ -867,14 +893,26 @@ Public Class frmFormDesigner
lookupProps.PreventDuplicates = StrToBool(row.Item("VKT_PREVENT_MULTIPLE_VALUES"))
lookupProps.AllowAddNewValues = StrToBool(row.Item("VKT_ADD_ITEM"))
lookupProps.DisplayAsComboBox = False
lookupProps.Enable_SQL = New SQLValue(NotNull(row.Item("SQL_ENABLE"), ""))
props = lookupProps
ElseIf TypeOf sender Is GridControl Then
Dim oGridControl As GridControl = sender
Dim oGridProps As GridControlProperties = CreatePropsObjectWithIndicies(New GridControlProperties, row, Source_VectorIndicies)
oGridProps.AllowAddNewValues = StrToBool(row.Item("VKT_ADD_ITEM"))
oGridProps.Enable_SQL = New SQLValue(NotNull(row.Item("SQL_ENABLE"), ""))
props = oGridProps
ElseIf TypeOf sender Is Button Then
Dim oButton As Button = sender
Dim oButtonProps As ButtonProperties = CreatePropsObject(New ButtonProperties, row, Source_VectorIndicies)
oButtonProps.Text = oButton.Text
oButtonProps.SQLCommand = New SQLValue(row.Item("SQL_UEBERPRUEFUNG"))
oButtonProps.Override_SQL = New SQLValue(NotNull(row.Item("SQL2"), ""))
oButtonProps.Enable_SQL = New SQLValue(NotNull(row.Item("SQL_ENABLE"), ""))
If Not IsDBNull(row.Item("IMAGE_CONTROL")) Then
oButtonProps.CtrlImage = New ImageValue(row.Item("IMAGE_CONTROL"))
End If
props = oButtonProps
Else
MsgBox("This is not a supported control type!")
Exit Sub
@@ -882,6 +920,10 @@ Public Class frmFormDesigner
' Zum Schluss wird das Eigenschaften-Objekt ins PropertyGrid geladen
pgControls.SelectedObject = props
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Private Sub pgControls_PropertyValueChanged(s As Object, e As PropertyValueChangedEventArgs) Handles pgControls.PropertyValueChanged

View File

@@ -24,26 +24,8 @@ Partial Class frmKonfig
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmKonfig))
Me.btnuniversalview = New System.Windows.Forms.Button()
Me.Label13 = New System.Windows.Forms.Label()
Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog()
Me.rbuviewer = New System.Windows.Forms.RadioButton()
Me.rbwddocview = New System.Windows.Forms.RadioButton()
Me.btnpdfxchange = New System.Windows.Forms.Button()
Me.lblpdfxchange = New System.Windows.Forms.Label()
Me.TabControl1 = New System.Windows.Forms.TabControl()
Me.TabPage1 = New System.Windows.Forms.TabPage()
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.rbPDF_internal = New System.Windows.Forms.RadioButton()
Me.rbSystem = New System.Windows.Forms.RadioButton()
Me.btnno_pdf_viewer = New System.Windows.Forms.Button()
Me.rbSumatra = New System.Windows.Forms.RadioButton()
Me.rbPDFX_Change = New System.Windows.Forms.RadioButton()
Me.btnSumatra = New System.Windows.Forms.Button()
Me.txtpdfxchange = New System.Windows.Forms.TextBox()
Me.txtSumatra = New System.Windows.Forms.TextBox()
Me.lblSumatra = New System.Windows.Forms.Label()
Me.txtUniversalViewer = New System.Windows.Forms.TextBox()
Me.TabPage2 = New System.Windows.Forms.TabPage()
Me.RadioAlternativeConnection = New System.Windows.Forms.RadioButton()
Me.RadioDefaultConnection = New System.Windows.Forms.RadioButton()
@@ -83,8 +65,6 @@ Partial Class frmKonfig
Me.TableAdapterManager = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
Me.SaveFileDialog1 = New System.Windows.Forms.SaveFileDialog()
Me.TabControl1.SuspendLayout()
Me.TabPage1.SuspendLayout()
Me.GroupBox1.SuspendLayout()
Me.TabPage2.SuspendLayout()
Me.TabPage3.SuspendLayout()
Me.TabPage4.SuspendLayout()
@@ -95,49 +75,12 @@ Partial Class frmKonfig
CType(Me.TBPM_KONFIGURATIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'btnuniversalview
'
resources.ApplyResources(Me.btnuniversalview, "btnuniversalview")
Me.btnuniversalview.Name = "btnuniversalview"
Me.btnuniversalview.UseVisualStyleBackColor = True
'
'Label13
'
resources.ApplyResources(Me.Label13, "Label13")
Me.Label13.Name = "Label13"
'
'OpenFileDialog1
'
Me.OpenFileDialog1.FileName = "OpenFileDialog1"
'
'rbuviewer
'
resources.ApplyResources(Me.rbuviewer, "rbuviewer")
Me.rbuviewer.Name = "rbuviewer"
Me.rbuviewer.TabStop = True
Me.rbuviewer.UseVisualStyleBackColor = True
'
'rbwddocview
'
resources.ApplyResources(Me.rbwddocview, "rbwddocview")
Me.rbwddocview.Name = "rbwddocview"
Me.rbwddocview.TabStop = True
Me.rbwddocview.UseVisualStyleBackColor = True
'
'btnpdfxchange
'
resources.ApplyResources(Me.btnpdfxchange, "btnpdfxchange")
Me.btnpdfxchange.Name = "btnpdfxchange"
Me.btnpdfxchange.UseVisualStyleBackColor = True
'
'lblpdfxchange
'
resources.ApplyResources(Me.lblpdfxchange, "lblpdfxchange")
Me.lblpdfxchange.Name = "lblpdfxchange"
'
'TabControl1
'
Me.TabControl1.Controls.Add(Me.TabPage1)
Me.TabControl1.Controls.Add(Me.TabPage2)
Me.TabControl1.Controls.Add(Me.TabPage3)
Me.TabControl1.Controls.Add(Me.TabPage4)
@@ -145,95 +88,6 @@ Partial Class frmKonfig
Me.TabControl1.Name = "TabControl1"
Me.TabControl1.SelectedIndex = 0
'
'TabPage1
'
Me.TabPage1.Controls.Add(Me.GroupBox1)
Me.TabPage1.Controls.Add(Me.Label13)
Me.TabPage1.Controls.Add(Me.txtUniversalViewer)
Me.TabPage1.Controls.Add(Me.btnuniversalview)
Me.TabPage1.Controls.Add(Me.rbuviewer)
Me.TabPage1.Controls.Add(Me.rbwddocview)
resources.ApplyResources(Me.TabPage1, "TabPage1")
Me.TabPage1.Name = "TabPage1"
Me.TabPage1.UseVisualStyleBackColor = True
'
'GroupBox1
'
Me.GroupBox1.Controls.Add(Me.rbPDF_internal)
Me.GroupBox1.Controls.Add(Me.rbSystem)
Me.GroupBox1.Controls.Add(Me.btnno_pdf_viewer)
Me.GroupBox1.Controls.Add(Me.rbSumatra)
Me.GroupBox1.Controls.Add(Me.rbPDFX_Change)
Me.GroupBox1.Controls.Add(Me.lblpdfxchange)
Me.GroupBox1.Controls.Add(Me.btnSumatra)
Me.GroupBox1.Controls.Add(Me.txtpdfxchange)
Me.GroupBox1.Controls.Add(Me.txtSumatra)
Me.GroupBox1.Controls.Add(Me.btnpdfxchange)
Me.GroupBox1.Controls.Add(Me.lblSumatra)
resources.ApplyResources(Me.GroupBox1, "GroupBox1")
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.TabStop = False
'
'rbPDF_internal
'
resources.ApplyResources(Me.rbPDF_internal, "rbPDF_internal")
Me.rbPDF_internal.Name = "rbPDF_internal"
Me.rbPDF_internal.TabStop = True
Me.rbPDF_internal.UseVisualStyleBackColor = True
'
'rbSystem
'
resources.ApplyResources(Me.rbSystem, "rbSystem")
Me.rbSystem.Name = "rbSystem"
Me.rbSystem.TabStop = True
Me.rbSystem.UseVisualStyleBackColor = True
'
'btnno_pdf_viewer
'
resources.ApplyResources(Me.btnno_pdf_viewer, "btnno_pdf_viewer")
Me.btnno_pdf_viewer.Name = "btnno_pdf_viewer"
Me.btnno_pdf_viewer.UseVisualStyleBackColor = True
'
'rbSumatra
'
resources.ApplyResources(Me.rbSumatra, "rbSumatra")
Me.rbSumatra.Name = "rbSumatra"
Me.rbSumatra.TabStop = True
Me.rbSumatra.UseVisualStyleBackColor = True
'
'rbPDFX_Change
'
resources.ApplyResources(Me.rbPDFX_Change, "rbPDFX_Change")
Me.rbPDFX_Change.Name = "rbPDFX_Change"
Me.rbPDFX_Change.TabStop = True
Me.rbPDFX_Change.UseVisualStyleBackColor = True
'
'btnSumatra
'
resources.ApplyResources(Me.btnSumatra, "btnSumatra")
Me.btnSumatra.Name = "btnSumatra"
Me.btnSumatra.UseVisualStyleBackColor = True
'
'txtpdfxchange
'
resources.ApplyResources(Me.txtpdfxchange, "txtpdfxchange")
Me.txtpdfxchange.Name = "txtpdfxchange"
'
'txtSumatra
'
resources.ApplyResources(Me.txtSumatra, "txtSumatra")
Me.txtSumatra.Name = "txtSumatra"
'
'lblSumatra
'
resources.ApplyResources(Me.lblSumatra, "lblSumatra")
Me.lblSumatra.Name = "lblSumatra"
'
'txtUniversalViewer
'
resources.ApplyResources(Me.txtUniversalViewer, "txtUniversalViewer")
Me.txtUniversalViewer.Name = "txtUniversalViewer"
'
'TabPage2
'
Me.TabPage2.Controls.Add(Me.RadioAlternativeConnection)
@@ -454,7 +308,7 @@ Partial Class frmKonfig
'
'gvLogs
'
Me.gvLogs.Appearance.OddRow.BackColor = CType(resources.GetObject("GridView1.Appearance.OddRow.BackColor"), System.Drawing.Color)
Me.gvLogs.Appearance.OddRow.BackColor = CType(resources.GetObject("gvLogs.Appearance.OddRow.BackColor"), System.Drawing.Color)
Me.gvLogs.Appearance.OddRow.Options.UseBackColor = True
Me.gvLogs.GridControl = Me.GridControlLogs
Me.gvLogs.Name = "gvLogs"
@@ -499,10 +353,6 @@ Partial Class frmKonfig
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
Me.Name = "frmKonfig"
Me.TabControl1.ResumeLayout(False)
Me.TabPage1.ResumeLayout(False)
Me.TabPage1.PerformLayout()
Me.GroupBox1.ResumeLayout(False)
Me.GroupBox1.PerformLayout()
Me.TabPage2.ResumeLayout(False)
Me.TabPage2.PerformLayout()
Me.TabPage3.ResumeLayout(False)
@@ -516,17 +366,8 @@ Partial Class frmKonfig
Me.ResumeLayout(False)
End Sub
Friend WithEvents btnuniversalview As System.Windows.Forms.Button
Friend WithEvents txtUniversalViewer As System.Windows.Forms.TextBox
Friend WithEvents Label13 As System.Windows.Forms.Label
Friend WithEvents OpenFileDialog1 As System.Windows.Forms.OpenFileDialog
Friend WithEvents rbuviewer As System.Windows.Forms.RadioButton
Friend WithEvents rbwddocview As System.Windows.Forms.RadioButton
Friend WithEvents btnpdfxchange As System.Windows.Forms.Button
Friend WithEvents txtpdfxchange As System.Windows.Forms.TextBox
Friend WithEvents lblpdfxchange As System.Windows.Forms.Label
Friend WithEvents TabControl1 As System.Windows.Forms.TabControl
Friend WithEvents TabPage1 As System.Windows.Forms.TabPage
Friend WithEvents TabPage2 As System.Windows.Forms.TabPage
Friend WithEvents cmbDatenbank As System.Windows.Forms.ComboBox
Friend WithEvents Label4 As System.Windows.Forms.Label
@@ -539,13 +380,6 @@ Partial Class frmKonfig
Friend WithEvents txtPasswort As System.Windows.Forms.TextBox
Friend WithEvents Label5 As System.Windows.Forms.Label
Friend WithEvents txtActualConnection As System.Windows.Forms.TextBox
Friend WithEvents btnSumatra As System.Windows.Forms.Button
Friend WithEvents txtSumatra As System.Windows.Forms.TextBox
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents rbSumatra As System.Windows.Forms.RadioButton
Friend WithEvents rbPDFX_Change As System.Windows.Forms.RadioButton
Friend WithEvents lblSumatra As System.Windows.Forms.Label
Friend WithEvents btnno_pdf_viewer As System.Windows.Forms.Button
Friend WithEvents chkbxUserAut As System.Windows.Forms.CheckBox
Friend WithEvents TabPage3 As System.Windows.Forms.TabPage
Friend WithEvents btnLogMail As System.Windows.Forms.Button
@@ -554,9 +388,7 @@ Partial Class frmKonfig
Friend WithEvents TBPM_KONFIGURATIONTableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter
Friend WithEvents TableAdapterManager As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents rbSystem As System.Windows.Forms.RadioButton
Friend WithEvents Button2 As System.Windows.Forms.Button
Friend WithEvents rbPDF_internal As System.Windows.Forms.RadioButton
Friend WithEvents LinkLabel1 As System.Windows.Forms.LinkLabel
Friend WithEvents Button3 As System.Windows.Forms.Button
Friend WithEvents chkLogErrorsOnly As System.Windows.Forms.CheckBox

File diff suppressed because it is too large Load Diff

View File

@@ -3,20 +3,7 @@
Public Class frmKonfig
Private email As New ClassEmail
Dim formshown As Boolean = False
Private Sub btnuniversalview_Click(sender As System.Object, e As System.EventArgs) Handles btnuniversalview.Click
With OpenFileDialog1
' Do
.Filter = "Viewer.Exe|*.exe"
.FilterIndex = 1
.Title = "Pfad zu Universal Viewer.exe:"
If .ShowDialog() = DialogResult.OK Then
Me.txtUniversalViewer.Text = .FileName
CONFIG.Config.UniversalViewerPath = txtUniversalViewer.Text
CONFIG.Save()
'SaveMySettingsValue("UniversalViewer", txtUniversalViewer.Text)
End If
End With
End Sub
Private Sub frmKonfig_Load(sender As Object, e As System.EventArgs) Handles Me.Load
Try
' Initialize Log Grid
@@ -24,11 +11,7 @@ Public Class frmKonfig
GridControlLogs.ForceInitialize()
gvLogs.Columns.First().Caption = "Log Nachricht"
If VIEWER_ALL = "uviewer" Then
rbuviewer.Checked = True
Else
rbwddocview.Checked = True
End If
If CONNECTION_STRING = String.Empty Then
Me.TabControl1.SelectedIndex = 1
Load_ConString("")
@@ -37,18 +20,9 @@ Public Class frmKonfig
Me.TBPM_KONFIGURATIONTableAdapter.Connection.ConnectionString = CONNECTION_STRING
Me.TBPM_KONFIGURATIONTableAdapter.Fill(Me.DD_DMSLiteDataSet.TBPM_KONFIGURATION)
End If
If VIEWER_UNIVERSAL = String.Empty Then
VIEWER_UNIVERSAL = Application.StartupPath & "\programs\Universal Viewer\Viewer.exe"
CONFIG.Config.UniversalViewerPath = VIEWER_UNIVERSAL
CONFIG.Save()
'SaveMySettingsValue("UniversalViewer", VIEWER_UNIVERSAL)
End If
txtUniversalViewer.Text = VIEWER_UNIVERSAL
txtUniversalViewer.Text = VIEWER_UNIVERSAL
txtpdfxchange.Text = VIEWER_XCHANGE
txtSumatra.Text = VIEWER_SUMATRA
chkLogErrorsOnly.Checked = CBool(LOG_ERRORS_ONLY)
Me.txtpdfxchange.Text = VIEWER_XCHANGE
Catch ex As Exception
LOGGER.Error(ex)
@@ -56,38 +30,7 @@ Public Class frmKonfig
End Try
End Sub
Private Sub rbuviewer_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles rbuviewer.CheckedChanged
If rbuviewer.Checked Then
VIEWER_ALL = "uviewer"
txtUniversalViewer.Text = VIEWER_UNIVERSAL
GroupBox1.Visible = False
rbSumatra.Checked = False
rbPDFX_Change.Checked = False
Else
VIEWER_ALL = "docview"
GroupBox1.Visible = True
End If
CONFIG.Config.DefaultViewer = VIEWER_ALL
CONFIG.Save()
'SaveMySettingsValue("Viewer", VIEWER_ALL)
End Sub
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles btnpdfxchange.Click
With OpenFileDialog1
' Do
.Filter = "PDFXCview.Exe|*.exe"
.FilterIndex = 1
.Title = "Pfad zu PDF XChange Viewer.exe:"
If .ShowDialog() = DialogResult.OK Then
Me.txtpdfxchange.Text = .FileName
VIEWER_XCHANGE = .FileName
CONFIG.Config.XChangeViewerPath = txtpdfxchange.Text
CONFIG.Save()
'SaveMySettingsValue("PDFXChangeViewer", txtpdfxchange.Text)
End If
End With
End Sub
Private Sub cmbDatenbank_Click(sender As System.Object, e As System.EventArgs) Handles cmbDatenbank.Click
Try
Me.Cursor = Cursors.WaitCursor
@@ -178,90 +121,10 @@ Public Class frmKonfig
End Try
End Sub
Private Sub btnSumatra_Click(sender As System.Object, e As System.EventArgs) Handles btnSumatra.Click
With OpenFileDialog1
' Do
.Filter = "SumatraPDF.exe|*.exe"
.FilterIndex = 1
.Title = "Pfad zu SumatraPDF.exe:"
If .ShowDialog() = DialogResult.OK Then
Me.txtSumatra.Text = .FileName
CONFIG.Config.SumatraViewerPath = txtSumatra.Text
VIEWER_SUMATRA = txtSumatra.Text
'SaveMySettingsValue("SumatraViewer", txtSumatra.Text)
End If
End With
End Sub
Private Sub frmKonfig_Shown(sender As Object, e As System.EventArgs) Handles Me.Shown
formshown = True
Select Case VIEWER_PDF
Case "internal"
rbPDF_internal.Checked = True
Case "none"
rbPDFX_Change.Checked = False
rbSumatra.Checked = False
Case "pdfxchange"
rbPDFX_Change.Checked = True
rbSumatra.Checked = False
Case "sumatra"
rbPDFX_Change.Checked = False
rbSumatra.Checked = True
If VIEWER_SUMATRA = String.Empty Then
VIEWER_SUMATRA = Application.StartupPath & "\programs\SumatraPDF\SumatraPDF.exe"
txtSumatra.Text = VIEWER_SUMATRA
End If
Case "system"
rbSystem.Checked = True
End Select
End Sub
Private Sub rbPDFX_Change_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles rbPDFX_Change.CheckedChanged
If rbPDFX_Change.Checked And formshown = True Then
If VIEWER_XCHANGE = String.Empty Then
MsgBox("Bitte geben Sie den Installationspfad von PDF XChange-Viewer an!", MsgBoxStyle.Exclamation)
End If
VIEWER_PDF = "pdfxchange"
CONFIG.Config.PDFViewer = VIEWER_PDF
CONFIG.Save()
'SaveMySettingsValue("vpdfviewer", VIEWER_PDF)
End If
End Sub
Private Sub rbSumatra_CheckedChanged(sender As Object, e As System.EventArgs) Handles rbSumatra.CheckedChanged
If rbSumatra.Checked And formshown = True Then
VIEWER_PDF = "sumatra"
CONFIG.Config.PDFViewer = VIEWER_PDF
CONFIG.Save()
'VIEWER_PDF = "sumatra"
'SaveMySettingsValue("vpdfviewer", VIEWER_PDF)
' lblSumatra.Visible = True
' txtSumatra.Visible = True
' btnSumatra.Visible = True
'Else
' lblSumatra.Visible = False
' txtSumatra.Visible = False
' btnSumatra.Visible = False
End If
End Sub
Private Sub btnno_pdf_viewer_Click(sender As System.Object, e As System.EventArgs) Handles btnno_pdf_viewer.Click
VIEWER_PDF = "none"
CONFIG.Config.PDFViewer = VIEWER_PDF
CONFIG.Save()
'SaveMySettingsValue("vpdfviewer", VIEWER_PDF)
rbPDF_internal.Checked = False
rbPDFX_Change.Checked = False
txtpdfxchange.Text = ""
rbSumatra.Checked = False
txtSumatra.Text = ""
rbSystem.Checked = False
End Sub
Private Sub chkbxUserAut_CheckedChanged(sender As Object, e As EventArgs) Handles chkbxUserAut.CheckedChanged
If chkbxUserAut.Checked Then
Me.txtPasswort.Enabled = False
@@ -288,15 +151,6 @@ Public Class frmKonfig
"CurrentUICulture-Name: " & CultureInfo.CurrentUICulture.Name & vbNewLine & "CurrentUICulture-ThreeLetterISOLanguageName: " & CultureInfo.CurrentUICulture.ThreeLetterISOLanguageName)
End Sub
Private Sub rbSystem_CheckedChanged(sender As Object, e As EventArgs) Handles rbSystem.CheckedChanged
If rbSystem.Checked And formshown = True Then
VIEWER_PDF = "system"
CONFIG.Config.PDFViewer = VIEWER_PDF
CONFIG.Save()
'SaveMySettingsValue("vpdfviewer", VIEWER_PDF)
End If
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Dim p As Process
Dim processes As Process()
@@ -315,20 +169,6 @@ Public Class frmKonfig
Private Sub CheckBox2_CheckedChanged(sender As Object, e As EventArgs)
My.Settings.Save()
End Sub
Private Sub RadioButton1_CheckedChanged(sender As Object, e As EventArgs) Handles rbPDF_internal.CheckedChanged
If rbPDF_internal.Checked And formshown = True Then
VIEWER_PDF = "internal"
rbPDFX_Change.Checked = False
txtpdfxchange.Text = ""
rbSumatra.Checked = False
txtSumatra.Text = ""
rbSystem.Checked = False
CONFIG.Config.PDFViewer = VIEWER_PDF
CONFIG.Save()
'SaveMySettingsValue("vpdfviewer", VIEWER_PDF)
End If
End Sub
Sub Load_ConString(constr As String)
txtActualConnection.Text = MaskConnectionStringPassword(constr)
End Sub

View File

@@ -160,7 +160,7 @@
<value>0</value>
</data>
<metadata name="ToolStripTopLeft.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>422, 95</value>
<value>662, 95</value>
</metadata>
<data name="ToolStripTopLeft.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 0</value>
@@ -223,7 +223,7 @@
<value>0</value>
</data>
<metadata name="ToolStripTopRight.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>564, 95</value>
<value>804, 95</value>
</metadata>
<data name="ToolStripTopRight.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 0</value>
@@ -325,7 +325,7 @@
<value>0</value>
</data>
<metadata name="ToolStripBottomLeft.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>715, 95</value>
<value>955, 95</value>
</metadata>
<data name="ToolStripBottomLeft.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 0</value>
@@ -388,7 +388,7 @@
<value>0</value>
</data>
<metadata name="ToolStripBottomRight.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>877, 95</value>
<value>1117, 95</value>
</metadata>
<data name="ToolStripBottomRight.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 0</value>
@@ -488,7 +488,7 @@
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAADw
CAAAAk1TRnQBSQFMAgEBAgEAAVwBBAFcAQQBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
CAAAAk1TRnQBSQFMAgEBAgEAAWQBBAFkAQQBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
@@ -701,7 +701,7 @@
<value>4</value>
</data>
<metadata name="ContextMenuGrid.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>152, 95</value>
<value>392, 95</value>
</metadata>
<data name="CMGroupStart.Size" type="System.Drawing.Size, System.Drawing">
<value>269, 26</value>
@@ -782,10 +782,10 @@
<value>0</value>
</data>
<metadata name="BindingNavigator1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1047, 95</value>
<value>17, 134</value>
</metadata>
<metadata name="bindsourcegrid.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1201, 95</value>
<value>171, 134</value>
</metadata>
<data name="BindingNavigatorCountItem.Size" type="System.Drawing.Size, System.Drawing">
<value>87, 24</value>
@@ -982,7 +982,7 @@
</value>
</data>
<metadata name="cmsNavPane.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>301, 95</value>
<value>541, 95</value>
</metadata>
<data name="tsmiValidationProfil.Size" type="System.Drawing.Size, System.Drawing">
<value>219, 26</value>
@@ -1390,40 +1390,40 @@
<value>True</value>
</data>
<metadata name="TimerRefresh.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1247, 17</value>
</metadata>
<metadata name="TBPM_USERBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 56</value>
</metadata>
<metadata name="TBPM_USERBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>140, 56</value>
</metadata>
<metadata name="TBPM_USERTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>213, 56</value>
<value>336, 56</value>
</metadata>
<metadata name="TBPM_KONFIGURATIONBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>403, 56</value>
<value>526, 56</value>
</metadata>
<metadata name="TBPM_KONFIGURATIONTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>666, 56</value>
<value>789, 56</value>
</metadata>
<metadata name="TBPM_PROFILE_FILESBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>923, 56</value>
<value>1046, 56</value>
</metadata>
<metadata name="TBPM_PROFILE_FILESTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1168, 56</value>
</metadata>
<metadata name="TimerReminder.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 95</value>
</metadata>
<metadata name="TimerReminder.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>257, 95</value>
</metadata>
<metadata name="Timer5Mins.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1335, 95</value>
<value>305, 134</value>
</metadata>
<metadata name="ToolTip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>73, 134</value>
<value>420, 134</value>
</metadata>
<metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>141</value>
<value>198</value>
</metadata>
<data name="$this.AutoScaleDimensions" type="System.Drawing.SizeF, System.Drawing">
<value>9, 19</value>

View File

@@ -10,6 +10,7 @@ Imports DevExpress.XtraCharts
Imports DevExpress.XtraGrid.Views.Base
Imports DevExpress.XtraEditors.Controls
Imports System.Threading
Imports System.ComponentModel
Public Class frmMain
'Private _windreamPM As ClassPMWindream
@@ -44,12 +45,16 @@ Public Class frmMain
LOGGER.Error(ex)
LOGGER.Info("Error in Save FormLayout: " & ex.Message)
End Try
If IDB_ACTIVE = False Then
Try
If WINDREAM?.oSession?.aLoggedin = True Then
WINDREAM.Stop_WMCC_andCo()
End If
'If _windreamPM.oSession.aLoggedin = True Then
' _windreamPM.Stop_WMCC_andCo()
'End If
Catch ex As Exception
End Try
End If
Try
ClassAllgemeineFunktionen.LoginOut("LOGOUT")
@@ -72,12 +77,12 @@ Public Class frmMain
Private Sub frmMain_Load(sender As Object, e As System.EventArgs) Handles Me.Load
formopenClose = True
LOGGER.Debug("Initializing MainForm....")
Try
UserLookAndFeel.Default.SetSkinStyle("VS2010")
Catch ex As Exception
LOGGER.Error(ex)
'Try
' UserLookAndFeel.Default.SetSkinStyle("VS2010")
'Catch ex As Exception
' LOGGER.Error(ex)
End Try
'End Try
' Create helper to save/load expanded GroupColumns at runtime
RefreshHelper = New RefreshHelper(GridView_Docs, "GUID")
@@ -142,10 +147,6 @@ Public Class frmMain
Try
If VIEWER_UNIVERSAL = "" And VIEWER_ALL = "uviewer" Then
MsgBox("Definieren Sie wo UniversalViewer abgelegt wurde!", MsgBoxStyle.Critical, "Fehlende Konfiguration")
frmKonfig.ShowDialog()
End If
If TimerRefresh.Enabled = False Then
TimerRefresh.Start()
End If
@@ -980,7 +981,7 @@ Public Class frmMain
TimerRefresh.Stop()
End If
frmValidator.ShowDialog()
frmValidator.Show()
'Catch ex As Exception
' LOGGER.Error(ex)
' MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Load_Profil_from_Grid: ")
@@ -1673,4 +1674,8 @@ Public Class frmMain
MsgBox("UserDebugMode is activated remotely. Debugdata will be transferred to database and will be deleted after 10 days!!", MsgBoxStyle.Information)
End Sub
Private Sub frmMain_Closing(sender As Object, e As CancelEventArgs) Handles Me.Closing
End Sub
End Class

View File

@@ -371,7 +371,7 @@ Public Class frmMassValidator
oCount += 1
Next
LOGGER.Debug("Controls geladen")
LOGGER.Info("")
CTRLS_Loaded = True
FillIndexValues()
For Each oControl As Control In pnldesigner.Controls
@@ -379,7 +379,7 @@ Public Class frmMassValidator
Next
Catch ex As Exception
LOGGER.Info("Unvorhergesehener Fehler bei Load_Controls:" & ex.Message)
LOGGER.Info("")
End Try
End Sub
Public Sub onLookUp1(sender As Object, SelectedValues As List(Of String))
@@ -1120,7 +1120,6 @@ Public Class frmMassValidator
'Eingaben auf Form überprüfen
If CheckAndUpdateIndices() = False Then
Dim workedFiles As Integer
For Each docrow As DataRow In CURRENT_DT_MASS_CHANGE_DOCS.Rows
If docrow.Item("DOC_ID") = 0 Then
@@ -1133,7 +1132,6 @@ Public Class frmMassValidator
GetWMDocPathWindows(0)
If CreateWMObject() = True Then
If ClassFinalizeDoc.Write_Final_Metadata(CURRENT_WMFILE) = True Then
Dim sql = String.Format("UPDATE TBPM_PROFILE_FILES SET IN_WORK = 0, WORK_USER = '{0}', EDIT = 1 WHERE GUID = {1}", USER_USERNAME, CURRENT_DOC_GUID)
If ClassDatabase.Execute_non_Query(sql) = True Then
@@ -1311,12 +1309,12 @@ Public Class frmMassValidator
Dim oResult As String
Dim oSQL = $"SELECT [dbo].[FNPM_GET_WM_FILE_PATH] ({CURRENT_DOC_GUID},{_CheckStandard})"
oResult = ClassDatabase.Execute_Scalar(oSQL, CONNECTION_STRING)
LOGGER.Debug($"Checking file [{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...")
oSQL = $"SELECT [dbo].[FNPM_GET_WM_FILE_PATH] ({CURRENT_DOC_GUID},1)"
oResult = ClassDatabase.Execute_Scalar(oSQL, CONNECTION_STRING)
LOGGER.Debug($"Checking file [{oResult}] exists?...")
LOGGER.Debug($"Checking file 1 GDP [{oResult}] exists?...")
If File.Exists(oResult) = False Then
Return False
End If

View File

@@ -232,7 +232,6 @@ Public Class frmSQL_DESIGNER
'TBPM_PROFILE_FINAL_INDEXINGTableAdapter.cmdUpdateSQL(cmbConnection.SelectedValue, SQL_COMMANDTextBox.Text, Environment.UserName, CURRENT_INDEX_ID)
lblSaveFinalIndex.Visible = True
lblSaveFinalIndex.Text = "SQL für finalen Index wurde erfolgreich gespeichert! " & Now.ToString
Me.SQLCommand = SQL_COMMANDTextBox.Text
Me.ConnectionId = cmbConnection.SelectedValue
ElseIf CURRENT_DESIGN_TYPE = "INPUT_INDEX" Then
Dim command = SQL_COMMANDTextBox.Text
@@ -244,8 +243,8 @@ Public Class frmSQL_DESIGNER
Else
lblSaveFinalIndex.Visible = False
End If
Me.SQLCommand = SQL_COMMANDTextBox.Text
End If
Me.SQLCommand = SQL_COMMANDTextBox.Text
End Sub
Private Sub btnAddControl_Click(sender As Object, e As EventArgs) Handles btnAddControl.Click

View File

@@ -50,8 +50,6 @@ Partial Class frmValidator
Me.TBPM_PROFILEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBPM_CONTROL_TABLEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.pnlpdf = New System.Windows.Forms.Panel()
Me.PdfViewer1 = New DevExpress.XtraPdfViewer.PdfViewer()
Me.BarManager1 = New DevExpress.XtraBars.BarManager(Me.components)
Me.barDockControlTop = New DevExpress.XtraBars.BarDockControl()
Me.barDockControlBottom = New DevExpress.XtraBars.BarDockControl()
@@ -81,44 +79,10 @@ Partial Class frmValidator
Me.PdfSetFitWidthZoomModeCheckItem2 = New DevExpress.XtraPdfViewer.Bars.PdfSetFitWidthZoomModeCheckItem()
Me.PdfSetFitVisibleZoomModeCheckItem2 = New DevExpress.XtraPdfViewer.Bars.PdfSetFitVisibleZoomModeCheckItem()
Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
Me.StatusStrip2 = New System.Windows.Forms.StatusStrip()
Me.pdfstatuslblPageNumber = New System.Windows.Forms.ToolStripStatusLabel()
Me.ToolStripDropDownButton1 = New System.Windows.Forms.ToolStripDropDownButton()
Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
Me.PdfFilePrintBarItem1 = New DevExpress.XtraPdfViewer.Bars.PdfFilePrintBarItem()
Me.PdfPreviousPageBarItem1 = New DevExpress.XtraPdfViewer.Bars.PdfPreviousPageBarItem()
Me.PdfNextPageBarItem1 = New DevExpress.XtraPdfViewer.Bars.PdfNextPageBarItem()
Me.PdfFindTextBarItem1 = New DevExpress.XtraPdfViewer.Bars.PdfFindTextBarItem()
Me.PdfZoomOutBarItem1 = New DevExpress.XtraPdfViewer.Bars.PdfZoomOutBarItem()
Me.PdfZoomInBarItem1 = New DevExpress.XtraPdfViewer.Bars.PdfZoomInBarItem()
Me.PdfExactZoomListBarSubItem1 = New DevExpress.XtraPdfViewer.Bars.PdfExactZoomListBarSubItem()
Me.PdfZoom10CheckItem1 = New DevExpress.XtraPdfViewer.Bars.PdfZoom10CheckItem()
Me.PdfZoom25CheckItem1 = New DevExpress.XtraPdfViewer.Bars.PdfZoom25CheckItem()
Me.PdfZoom50CheckItem1 = New DevExpress.XtraPdfViewer.Bars.PdfZoom50CheckItem()
Me.PdfZoom75CheckItem1 = New DevExpress.XtraPdfViewer.Bars.PdfZoom75CheckItem()
Me.PdfZoom100CheckItem1 = New DevExpress.XtraPdfViewer.Bars.PdfZoom100CheckItem()
Me.PdfZoom125CheckItem1 = New DevExpress.XtraPdfViewer.Bars.PdfZoom125CheckItem()
Me.PdfZoom150CheckItem1 = New DevExpress.XtraPdfViewer.Bars.PdfZoom150CheckItem()
Me.PdfZoom200CheckItem1 = New DevExpress.XtraPdfViewer.Bars.PdfZoom200CheckItem()
Me.PdfZoom400CheckItem1 = New DevExpress.XtraPdfViewer.Bars.PdfZoom400CheckItem()
Me.PdfZoom500CheckItem1 = New DevExpress.XtraPdfViewer.Bars.PdfZoom500CheckItem()
Me.PdfSetActualSizeZoomModeCheckItem1 = New DevExpress.XtraPdfViewer.Bars.PdfSetActualSizeZoomModeCheckItem()
Me.PdfSetPageLevelZoomModeCheckItem1 = New DevExpress.XtraPdfViewer.Bars.PdfSetPageLevelZoomModeCheckItem()
Me.PdfSetFitWidthZoomModeCheckItem1 = New DevExpress.XtraPdfViewer.Bars.PdfSetFitWidthZoomModeCheckItem()
Me.PdfSetFitVisibleZoomModeCheckItem1 = New DevExpress.XtraPdfViewer.Bars.PdfSetFitVisibleZoomModeCheckItem()
Me.PdfRibbonPage1 = New DevExpress.XtraPdfViewer.Bars.PdfRibbonPage()
Me.PdfFileRibbonPageGroup1 = New DevExpress.XtraPdfViewer.Bars.PdfFileRibbonPageGroup()
Me.PdfNavigationRibbonPageGroup1 = New DevExpress.XtraPdfViewer.Bars.PdfNavigationRibbonPageGroup()
Me.PdfZoomRibbonPageGroup1 = New DevExpress.XtraPdfViewer.Bars.PdfZoomRibbonPageGroup()
Me.PdfBarController1 = New DevExpress.XtraPdfViewer.Bars.PdfBarController()
Me.PdfBarController2 = New DevExpress.XtraPdfViewer.Bars.PdfBarController()
Me.WebBrowser = New System.Windows.Forms.WebBrowser()
Me.StatusStrip3 = New System.Windows.Forms.StatusStrip()
Me.tslblWebbrowser = New System.Windows.Forms.ToolStripStatusLabel()
Me.grpBetreff = New System.Windows.Forms.GroupBox()
Me.txtBetreff = New System.Windows.Forms.TextBox()
Me.SplitContainer1 = New System.Windows.Forms.SplitContainer()
Me.grpbxMailBody = New System.Windows.Forms.GroupBox()
Me.DocumentViewer1 = New DigitalData.Controls.DocumentViewer.DocumentViewer()
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
Me.ToolStripDropDownButton2 = New System.Windows.Forms.ToolStripDropDownButton()
Me.DateiÖffnenToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
@@ -132,6 +96,7 @@ Partial Class frmValidator
Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBPM_PROFILE_FINAL_INDEXINGTableAdapter = New DD_PM_WINDREAM.FinalIndexDataSetTableAdapters.TBPM_PROFILE_FINAL_INDEXINGTableAdapter()
Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components)
Me.CheckBox1 = New System.Windows.Forms.CheckBox()
CType(Me.BarAndDockingController3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.BarAndDockingController2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.BarAndDockingController1, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -144,19 +109,13 @@ Partial Class frmValidator
CType(Me.TBPM_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBPM_KONFIGURATIONBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBPM_CONTROL_TABLEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
Me.pnlpdf.SuspendLayout()
CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.StatusStrip2.SuspendLayout()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PdfBarController1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PdfBarController2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.StatusStrip3.SuspendLayout()
Me.grpBetreff.SuspendLayout()
CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SplitContainer1.Panel1.SuspendLayout()
Me.SplitContainer1.Panel2.SuspendLayout()
Me.SplitContainer1.SuspendLayout()
Me.grpbxMailBody.SuspendLayout()
Me.ToolStrip1.SuspendLayout()
CType(Me.FinalIndexDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBPM_PROFILE_FINAL_INDEXINGBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -202,6 +161,7 @@ Partial Class frmValidator
'Panel1
'
Me.Panel1.BackColor = System.Drawing.SystemColors.ControlLight
Me.Panel1.Controls.Add(Me.CheckBox1)
Me.Panel1.Controls.Add(Me.TITLELabel1)
Me.Panel1.Controls.Add(Me.btnSave)
Me.Panel1.Controls.Add(Me.DESCRIPTIONLabel)
@@ -307,21 +267,6 @@ Partial Class frmValidator
Me.TBPM_CONTROL_TABLEBindingSource.DataMember = "TBPM_CONTROL_TABLE"
Me.TBPM_CONTROL_TABLEBindingSource.DataSource = Me.DD_DMSLiteDataSet
'
'pnlpdf
'
resources.ApplyResources(Me.pnlpdf, "pnlpdf")
Me.pnlpdf.Controls.Add(Me.PdfViewer1)
Me.pnlpdf.Controls.Add(Me.StatusStrip2)
Me.pnlpdf.Controls.Add(Me.RibbonControl1)
Me.pnlpdf.Name = "pnlpdf"
'
'PdfViewer1
'
resources.ApplyResources(Me.PdfViewer1, "PdfViewer1")
Me.PdfViewer1.MenuManager = Me.BarManager1
Me.PdfViewer1.Name = "PdfViewer1"
Me.PdfViewer1.TabStop = False
'
'BarManager1
'
Me.BarManager1.Controller = Me.BarAndDockingController3
@@ -359,50 +304,68 @@ Partial Class frmValidator
'
'PdfFileOpenBarItem1
'
resources.ApplyResources(Me.PdfFileOpenBarItem1, "PdfFileOpenBarItem1")
Me.PdfFileOpenBarItem1.Enabled = False
Me.PdfFileOpenBarItem1.Id = 1
Me.PdfFileOpenBarItem1.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.O))
Me.PdfFileOpenBarItem1.Name = "PdfFileOpenBarItem1"
'
'PdfFileSaveAsBarItem1
'
resources.ApplyResources(Me.PdfFileSaveAsBarItem1, "PdfFileSaveAsBarItem1")
Me.PdfFileSaveAsBarItem1.Enabled = False
Me.PdfFileSaveAsBarItem1.Id = 2
Me.PdfFileSaveAsBarItem1.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.S))
Me.PdfFileSaveAsBarItem1.Name = "PdfFileSaveAsBarItem1"
'
'PdfFilePrintBarItem2
'
resources.ApplyResources(Me.PdfFilePrintBarItem2, "PdfFilePrintBarItem2")
Me.PdfFilePrintBarItem2.Enabled = False
Me.PdfFilePrintBarItem2.Id = 3
Me.PdfFilePrintBarItem2.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.P))
Me.PdfFilePrintBarItem2.Name = "PdfFilePrintBarItem2"
'
'PdfPreviousPageBarItem2
'
resources.ApplyResources(Me.PdfPreviousPageBarItem2, "PdfPreviousPageBarItem2")
Me.PdfPreviousPageBarItem2.Enabled = False
Me.PdfPreviousPageBarItem2.Id = 4
Me.PdfPreviousPageBarItem2.Name = "PdfPreviousPageBarItem2"
'
'PdfNextPageBarItem2
'
resources.ApplyResources(Me.PdfNextPageBarItem2, "PdfNextPageBarItem2")
Me.PdfNextPageBarItem2.Enabled = False
Me.PdfNextPageBarItem2.Id = 5
Me.PdfNextPageBarItem2.Name = "PdfNextPageBarItem2"
'
'PdfFindTextBarItem2
'
resources.ApplyResources(Me.PdfFindTextBarItem2, "PdfFindTextBarItem2")
Me.PdfFindTextBarItem2.Enabled = False
Me.PdfFindTextBarItem2.Id = 6
Me.PdfFindTextBarItem2.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.F))
Me.PdfFindTextBarItem2.Name = "PdfFindTextBarItem2"
'
'PdfZoomOutBarItem2
'
resources.ApplyResources(Me.PdfZoomOutBarItem2, "PdfZoomOutBarItem2")
Me.PdfZoomOutBarItem2.Enabled = False
Me.PdfZoomOutBarItem2.Id = 7
Me.PdfZoomOutBarItem2.Name = "PdfZoomOutBarItem2"
'
'PdfZoomInBarItem2
'
resources.ApplyResources(Me.PdfZoomInBarItem2, "PdfZoomInBarItem2")
Me.PdfZoomInBarItem2.Enabled = False
Me.PdfZoomInBarItem2.Id = 8
Me.PdfZoomInBarItem2.Name = "PdfZoomInBarItem2"
'
'PdfExactZoomListBarSubItem2
'
resources.ApplyResources(Me.PdfExactZoomListBarSubItem2, "PdfExactZoomListBarSubItem2")
Me.PdfExactZoomListBarSubItem2.Enabled = False
Me.PdfExactZoomListBarSubItem2.Id = 9
Me.PdfExactZoomListBarSubItem2.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom10CheckItem2, True), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom25CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom50CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom75CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom100CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom125CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom150CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom200CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom400CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom500CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetActualSizeZoomModeCheckItem2, True), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetPageLevelZoomModeCheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetFitWidthZoomModeCheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetFitVisibleZoomModeCheckItem2)})
Me.PdfExactZoomListBarSubItem2.Name = "PdfExactZoomListBarSubItem2"
@@ -410,71 +373,99 @@ Partial Class frmValidator
'
'PdfZoom10CheckItem2
'
resources.ApplyResources(Me.PdfZoom10CheckItem2, "PdfZoom10CheckItem2")
Me.PdfZoom10CheckItem2.Enabled = False
Me.PdfZoom10CheckItem2.Id = 10
Me.PdfZoom10CheckItem2.Name = "PdfZoom10CheckItem2"
'
'PdfZoom25CheckItem2
'
resources.ApplyResources(Me.PdfZoom25CheckItem2, "PdfZoom25CheckItem2")
Me.PdfZoom25CheckItem2.Enabled = False
Me.PdfZoom25CheckItem2.Id = 11
Me.PdfZoom25CheckItem2.Name = "PdfZoom25CheckItem2"
'
'PdfZoom50CheckItem2
'
resources.ApplyResources(Me.PdfZoom50CheckItem2, "PdfZoom50CheckItem2")
Me.PdfZoom50CheckItem2.Enabled = False
Me.PdfZoom50CheckItem2.Id = 12
Me.PdfZoom50CheckItem2.Name = "PdfZoom50CheckItem2"
'
'PdfZoom75CheckItem2
'
resources.ApplyResources(Me.PdfZoom75CheckItem2, "PdfZoom75CheckItem2")
Me.PdfZoom75CheckItem2.Enabled = False
Me.PdfZoom75CheckItem2.Id = 13
Me.PdfZoom75CheckItem2.Name = "PdfZoom75CheckItem2"
'
'PdfZoom100CheckItem2
'
resources.ApplyResources(Me.PdfZoom100CheckItem2, "PdfZoom100CheckItem2")
Me.PdfZoom100CheckItem2.Enabled = False
Me.PdfZoom100CheckItem2.Id = 14
Me.PdfZoom100CheckItem2.Name = "PdfZoom100CheckItem2"
'
'PdfZoom125CheckItem2
'
resources.ApplyResources(Me.PdfZoom125CheckItem2, "PdfZoom125CheckItem2")
Me.PdfZoom125CheckItem2.Enabled = False
Me.PdfZoom125CheckItem2.Id = 15
Me.PdfZoom125CheckItem2.Name = "PdfZoom125CheckItem2"
'
'PdfZoom150CheckItem2
'
resources.ApplyResources(Me.PdfZoom150CheckItem2, "PdfZoom150CheckItem2")
Me.PdfZoom150CheckItem2.Enabled = False
Me.PdfZoom150CheckItem2.Id = 16
Me.PdfZoom150CheckItem2.Name = "PdfZoom150CheckItem2"
'
'PdfZoom200CheckItem2
'
resources.ApplyResources(Me.PdfZoom200CheckItem2, "PdfZoom200CheckItem2")
Me.PdfZoom200CheckItem2.Enabled = False
Me.PdfZoom200CheckItem2.Id = 17
Me.PdfZoom200CheckItem2.Name = "PdfZoom200CheckItem2"
'
'PdfZoom400CheckItem2
'
resources.ApplyResources(Me.PdfZoom400CheckItem2, "PdfZoom400CheckItem2")
Me.PdfZoom400CheckItem2.Enabled = False
Me.PdfZoom400CheckItem2.Id = 18
Me.PdfZoom400CheckItem2.Name = "PdfZoom400CheckItem2"
'
'PdfZoom500CheckItem2
'
resources.ApplyResources(Me.PdfZoom500CheckItem2, "PdfZoom500CheckItem2")
Me.PdfZoom500CheckItem2.Enabled = False
Me.PdfZoom500CheckItem2.Id = 19
Me.PdfZoom500CheckItem2.Name = "PdfZoom500CheckItem2"
'
'PdfSetActualSizeZoomModeCheckItem2
'
resources.ApplyResources(Me.PdfSetActualSizeZoomModeCheckItem2, "PdfSetActualSizeZoomModeCheckItem2")
Me.PdfSetActualSizeZoomModeCheckItem2.Enabled = False
Me.PdfSetActualSizeZoomModeCheckItem2.Id = 20
Me.PdfSetActualSizeZoomModeCheckItem2.Name = "PdfSetActualSizeZoomModeCheckItem2"
'
'PdfSetPageLevelZoomModeCheckItem2
'
resources.ApplyResources(Me.PdfSetPageLevelZoomModeCheckItem2, "PdfSetPageLevelZoomModeCheckItem2")
Me.PdfSetPageLevelZoomModeCheckItem2.Enabled = False
Me.PdfSetPageLevelZoomModeCheckItem2.Id = 21
Me.PdfSetPageLevelZoomModeCheckItem2.Name = "PdfSetPageLevelZoomModeCheckItem2"
'
'PdfSetFitWidthZoomModeCheckItem2
'
resources.ApplyResources(Me.PdfSetFitWidthZoomModeCheckItem2, "PdfSetFitWidthZoomModeCheckItem2")
Me.PdfSetFitWidthZoomModeCheckItem2.Enabled = False
Me.PdfSetFitWidthZoomModeCheckItem2.Id = 22
Me.PdfSetFitWidthZoomModeCheckItem2.Name = "PdfSetFitWidthZoomModeCheckItem2"
'
'PdfSetFitVisibleZoomModeCheckItem2
'
resources.ApplyResources(Me.PdfSetFitVisibleZoomModeCheckItem2, "PdfSetFitVisibleZoomModeCheckItem2")
Me.PdfSetFitVisibleZoomModeCheckItem2.Enabled = False
Me.PdfSetFitVisibleZoomModeCheckItem2.Id = 23
Me.PdfSetFitVisibleZoomModeCheckItem2.Name = "PdfSetFitVisibleZoomModeCheckItem2"
'
@@ -484,168 +475,6 @@ Partial Class frmValidator
Me.BarButtonItem1.Id = 0
Me.BarButtonItem1.Name = "BarButtonItem1"
'
'StatusStrip2
'
Me.StatusStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.pdfstatuslblPageNumber, Me.ToolStripDropDownButton1})
resources.ApplyResources(Me.StatusStrip2, "StatusStrip2")
Me.StatusStrip2.Name = "StatusStrip2"
'
'pdfstatuslblPageNumber
'
resources.ApplyResources(Me.pdfstatuslblPageNumber, "pdfstatuslblPageNumber")
Me.pdfstatuslblPageNumber.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.page_red
Me.pdfstatuslblPageNumber.Name = "pdfstatuslblPageNumber"
'
'ToolStripDropDownButton1
'
Me.ToolStripDropDownButton1.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.magifier_zoom_out1
resources.ApplyResources(Me.ToolStripDropDownButton1, "ToolStripDropDownButton1")
Me.ToolStripDropDownButton1.Name = "ToolStripDropDownButton1"
'
'RibbonControl1
'
Me.RibbonControl1.ExpandCollapseItem.Id = 0
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.PdfFilePrintBarItem1, Me.PdfPreviousPageBarItem1, Me.PdfNextPageBarItem1, Me.PdfFindTextBarItem1, Me.PdfZoomOutBarItem1, Me.PdfZoomInBarItem1, Me.PdfExactZoomListBarSubItem1, Me.PdfZoom10CheckItem1, Me.PdfZoom25CheckItem1, Me.PdfZoom50CheckItem1, Me.PdfZoom75CheckItem1, Me.PdfZoom100CheckItem1, Me.PdfZoom125CheckItem1, Me.PdfZoom150CheckItem1, Me.PdfZoom200CheckItem1, Me.PdfZoom400CheckItem1, Me.PdfZoom500CheckItem1, Me.PdfSetActualSizeZoomModeCheckItem1, Me.PdfSetPageLevelZoomModeCheckItem1, Me.PdfSetFitWidthZoomModeCheckItem1, Me.PdfSetFitVisibleZoomModeCheckItem1})
resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
Me.RibbonControl1.MaxItemId = 26
Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.PdfRibbonPage1})
Me.RibbonControl1.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonControlStyle.Office2010
Me.RibbonControl1.ToolbarLocation = DevExpress.XtraBars.Ribbon.RibbonQuickAccessToolbarLocation.Above
'
'PdfFilePrintBarItem1
'
Me.PdfFilePrintBarItem1.Id = 3
Me.PdfFilePrintBarItem1.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.P))
Me.PdfFilePrintBarItem1.Name = "PdfFilePrintBarItem1"
'
'PdfPreviousPageBarItem1
'
Me.PdfPreviousPageBarItem1.Id = 4
Me.PdfPreviousPageBarItem1.Name = "PdfPreviousPageBarItem1"
'
'PdfNextPageBarItem1
'
Me.PdfNextPageBarItem1.Id = 5
Me.PdfNextPageBarItem1.Name = "PdfNextPageBarItem1"
'
'PdfFindTextBarItem1
'
Me.PdfFindTextBarItem1.Id = 6
Me.PdfFindTextBarItem1.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.F))
Me.PdfFindTextBarItem1.Name = "PdfFindTextBarItem1"
'
'PdfZoomOutBarItem1
'
Me.PdfZoomOutBarItem1.Id = 7
Me.PdfZoomOutBarItem1.Name = "PdfZoomOutBarItem1"
'
'PdfZoomInBarItem1
'
Me.PdfZoomInBarItem1.Id = 8
Me.PdfZoomInBarItem1.Name = "PdfZoomInBarItem1"
'
'PdfExactZoomListBarSubItem1
'
Me.PdfExactZoomListBarSubItem1.Id = 9
Me.PdfExactZoomListBarSubItem1.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom10CheckItem1, True), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom25CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom50CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom75CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom100CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom125CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom150CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom200CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom400CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom500CheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetActualSizeZoomModeCheckItem1, True), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetPageLevelZoomModeCheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetFitWidthZoomModeCheckItem1), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetFitVisibleZoomModeCheckItem1)})
Me.PdfExactZoomListBarSubItem1.Name = "PdfExactZoomListBarSubItem1"
Me.PdfExactZoomListBarSubItem1.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionInMenu
'
'PdfZoom10CheckItem1
'
Me.PdfZoom10CheckItem1.Id = 10
Me.PdfZoom10CheckItem1.Name = "PdfZoom10CheckItem1"
'
'PdfZoom25CheckItem1
'
Me.PdfZoom25CheckItem1.Id = 11
Me.PdfZoom25CheckItem1.Name = "PdfZoom25CheckItem1"
'
'PdfZoom50CheckItem1
'
Me.PdfZoom50CheckItem1.Id = 12
Me.PdfZoom50CheckItem1.Name = "PdfZoom50CheckItem1"
'
'PdfZoom75CheckItem1
'
Me.PdfZoom75CheckItem1.Id = 13
Me.PdfZoom75CheckItem1.Name = "PdfZoom75CheckItem1"
'
'PdfZoom100CheckItem1
'
Me.PdfZoom100CheckItem1.Id = 14
Me.PdfZoom100CheckItem1.Name = "PdfZoom100CheckItem1"
'
'PdfZoom125CheckItem1
'
Me.PdfZoom125CheckItem1.Id = 15
Me.PdfZoom125CheckItem1.Name = "PdfZoom125CheckItem1"
'
'PdfZoom150CheckItem1
'
Me.PdfZoom150CheckItem1.Id = 16
Me.PdfZoom150CheckItem1.Name = "PdfZoom150CheckItem1"
'
'PdfZoom200CheckItem1
'
Me.PdfZoom200CheckItem1.Id = 17
Me.PdfZoom200CheckItem1.Name = "PdfZoom200CheckItem1"
'
'PdfZoom400CheckItem1
'
Me.PdfZoom400CheckItem1.Id = 18
Me.PdfZoom400CheckItem1.Name = "PdfZoom400CheckItem1"
'
'PdfZoom500CheckItem1
'
Me.PdfZoom500CheckItem1.Id = 19
Me.PdfZoom500CheckItem1.Name = "PdfZoom500CheckItem1"
'
'PdfSetActualSizeZoomModeCheckItem1
'
Me.PdfSetActualSizeZoomModeCheckItem1.Id = 20
Me.PdfSetActualSizeZoomModeCheckItem1.Name = "PdfSetActualSizeZoomModeCheckItem1"
'
'PdfSetPageLevelZoomModeCheckItem1
'
Me.PdfSetPageLevelZoomModeCheckItem1.Id = 21
Me.PdfSetPageLevelZoomModeCheckItem1.Name = "PdfSetPageLevelZoomModeCheckItem1"
'
'PdfSetFitWidthZoomModeCheckItem1
'
Me.PdfSetFitWidthZoomModeCheckItem1.Id = 22
Me.PdfSetFitWidthZoomModeCheckItem1.Name = "PdfSetFitWidthZoomModeCheckItem1"
'
'PdfSetFitVisibleZoomModeCheckItem1
'
Me.PdfSetFitVisibleZoomModeCheckItem1.Id = 23
Me.PdfSetFitVisibleZoomModeCheckItem1.Name = "PdfSetFitVisibleZoomModeCheckItem1"
'
'PdfRibbonPage1
'
Me.PdfRibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.PdfFileRibbonPageGroup1, Me.PdfNavigationRibbonPageGroup1, Me.PdfZoomRibbonPageGroup1})
Me.PdfRibbonPage1.Name = "PdfRibbonPage1"
'
'PdfFileRibbonPageGroup1
'
Me.PdfFileRibbonPageGroup1.ItemLinks.Add(Me.PdfFilePrintBarItem1)
Me.PdfFileRibbonPageGroup1.Name = "PdfFileRibbonPageGroup1"
'
'PdfNavigationRibbonPageGroup1
'
Me.PdfNavigationRibbonPageGroup1.ItemLinks.Add(Me.PdfPreviousPageBarItem1)
Me.PdfNavigationRibbonPageGroup1.ItemLinks.Add(Me.PdfNextPageBarItem1)
Me.PdfNavigationRibbonPageGroup1.ItemLinks.Add(Me.PdfFindTextBarItem1)
Me.PdfNavigationRibbonPageGroup1.Name = "PdfNavigationRibbonPageGroup1"
'
'PdfZoomRibbonPageGroup1
'
Me.PdfZoomRibbonPageGroup1.ItemLinks.Add(Me.PdfZoomOutBarItem1)
Me.PdfZoomRibbonPageGroup1.ItemLinks.Add(Me.PdfZoomInBarItem1)
Me.PdfZoomRibbonPageGroup1.ItemLinks.Add(Me.PdfExactZoomListBarSubItem1)
Me.PdfZoomRibbonPageGroup1.Name = "PdfZoomRibbonPageGroup1"
'
'PdfBarController2
'
Me.PdfBarController2.BarItems.Add(Me.PdfFileOpenBarItem1)
@@ -671,60 +500,6 @@ Partial Class frmValidator
Me.PdfBarController2.BarItems.Add(Me.PdfSetPageLevelZoomModeCheckItem2)
Me.PdfBarController2.BarItems.Add(Me.PdfSetFitWidthZoomModeCheckItem2)
Me.PdfBarController2.BarItems.Add(Me.PdfSetFitVisibleZoomModeCheckItem2)
Me.PdfBarController2.BarItems.Add(Me.PdfFilePrintBarItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfPreviousPageBarItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfNextPageBarItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfFindTextBarItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfZoomOutBarItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfZoomInBarItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfExactZoomListBarSubItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfZoom10CheckItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfZoom25CheckItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfZoom50CheckItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfZoom75CheckItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfZoom100CheckItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfZoom125CheckItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfZoom150CheckItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfZoom200CheckItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfZoom400CheckItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfZoom500CheckItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfSetActualSizeZoomModeCheckItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfSetPageLevelZoomModeCheckItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfSetFitWidthZoomModeCheckItem1)
Me.PdfBarController2.BarItems.Add(Me.PdfSetFitVisibleZoomModeCheckItem1)
Me.PdfBarController2.Control = Me.PdfViewer1
'
'WebBrowser
'
resources.ApplyResources(Me.WebBrowser, "WebBrowser")
Me.WebBrowser.Name = "WebBrowser"
Me.WebBrowser.TabStop = False
'
'StatusStrip3
'
Me.StatusStrip3.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tslblWebbrowser})
resources.ApplyResources(Me.StatusStrip3, "StatusStrip3")
Me.StatusStrip3.Name = "StatusStrip3"
'
'tslblWebbrowser
'
Me.tslblWebbrowser.Name = "tslblWebbrowser"
resources.ApplyResources(Me.tslblWebbrowser, "tslblWebbrowser")
'
'grpBetreff
'
Me.grpBetreff.Controls.Add(Me.txtBetreff)
resources.ApplyResources(Me.grpBetreff, "grpBetreff")
Me.grpBetreff.Name = "grpBetreff"
Me.grpBetreff.TabStop = False
'
'txtBetreff
'
Me.txtBetreff.BackColor = System.Drawing.SystemColors.Info
resources.ApplyResources(Me.txtBetreff, "txtBetreff")
Me.txtBetreff.Name = "txtBetreff"
Me.txtBetreff.ReadOnly = True
Me.txtBetreff.TabStop = False
'
'SplitContainer1
'
@@ -737,18 +512,13 @@ Partial Class frmValidator
'
'SplitContainer1.Panel2
'
Me.SplitContainer1.Panel2.Controls.Add(Me.grpbxMailBody)
Me.SplitContainer1.Panel2.Controls.Add(Me.pnlpdf)
Me.SplitContainer1.Panel2.Controls.Add(Me.grpBetreff)
Me.SplitContainer1.Panel2.Controls.Add(Me.DocumentViewer1)
Me.SplitContainer1.TabStop = False
'
'grpbxMailBody
'DocumentViewer1
'
Me.grpbxMailBody.Controls.Add(Me.WebBrowser)
Me.grpbxMailBody.Controls.Add(Me.StatusStrip3)
resources.ApplyResources(Me.grpbxMailBody, "grpbxMailBody")
Me.grpbxMailBody.Name = "grpbxMailBody"
Me.grpbxMailBody.TabStop = False
resources.ApplyResources(Me.DocumentViewer1, "DocumentViewer1")
Me.DocumentViewer1.Name = "DocumentViewer1"
'
'ToolStrip1
'
@@ -819,6 +589,12 @@ Partial Class frmValidator
'
Me.TBPM_PROFILE_FINAL_INDEXINGTableAdapter.ClearBeforeFill = True
'
'CheckBox1
'
resources.ApplyResources(Me.CheckBox1, "CheckBox1")
Me.CheckBox1.Name = "CheckBox1"
Me.CheckBox1.UseVisualStyleBackColor = True
'
'frmValidator
'
resources.ApplyResources(Me, "$this")
@@ -832,12 +608,14 @@ Partial Class frmValidator
Me.Controls.Add(Me.barDockControlTop)
Me.KeyPreview = True
Me.Name = "frmValidator"
Me.TopMost = True
CType(Me.BarAndDockingController3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.BarAndDockingController2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.BarAndDockingController1, System.ComponentModel.ISupportInitialize).EndInit()
Me.StatusStrip1.ResumeLayout(False)
Me.StatusStrip1.PerformLayout()
Me.Panel1.ResumeLayout(False)
Me.Panel1.PerformLayout()
CType(Me.DD_DMSLiteDataSet, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBPM_PROFILE_CONTROLSBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBDD_CONNECTIONBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
@@ -845,24 +623,13 @@ Partial Class frmValidator
CType(Me.TBPM_PROFILEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBPM_KONFIGURATIONBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBPM_CONTROL_TABLEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
Me.pnlpdf.ResumeLayout(False)
Me.pnlpdf.PerformLayout()
CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).EndInit()
Me.StatusStrip2.ResumeLayout(False)
Me.StatusStrip2.PerformLayout()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PdfBarController1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PdfBarController2, System.ComponentModel.ISupportInitialize).EndInit()
Me.StatusStrip3.ResumeLayout(False)
Me.StatusStrip3.PerformLayout()
Me.grpBetreff.ResumeLayout(False)
Me.grpBetreff.PerformLayout()
Me.SplitContainer1.Panel1.ResumeLayout(False)
Me.SplitContainer1.Panel2.ResumeLayout(False)
CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).EndInit()
Me.SplitContainer1.ResumeLayout(False)
Me.grpbxMailBody.ResumeLayout(False)
Me.grpbxMailBody.PerformLayout()
Me.ToolStrip1.ResumeLayout(False)
Me.ToolStrip1.PerformLayout()
CType(Me.FinalIndexDataSet, System.ComponentModel.ISupportInitialize).EndInit()
@@ -894,11 +661,7 @@ Partial Class frmValidator
Friend WithEvents TBPM_KONFIGURATIONBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBPM_CONTROL_TABLETableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_CONTROL_TABLETableAdapter
Friend WithEvents TBPM_CONTROL_TABLEBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents pnlpdf As System.Windows.Forms.Panel
Friend WithEvents StatusStrip2 As System.Windows.Forms.StatusStrip
Friend WithEvents pdfstatuslblPageNumber As System.Windows.Forms.ToolStripStatusLabel
Friend WithEvents PdfBarController1 As DevExpress.XtraPdfViewer.Bars.PdfBarController
Friend WithEvents PdfViewer1 As DevExpress.XtraPdfViewer.PdfViewer
Friend WithEvents BarManager1 As DevExpress.XtraBars.BarManager
Friend WithEvents PdfFileOpenBarItem1 As DevExpress.XtraPdfViewer.Bars.PdfFileOpenBarItem
Friend WithEvents PdfFileSaveAsBarItem1 As DevExpress.XtraPdfViewer.Bars.PdfFileSaveAsBarItem
@@ -929,43 +692,10 @@ Partial Class frmValidator
Friend WithEvents barDockControlLeft As DevExpress.XtraBars.BarDockControl
Friend WithEvents barDockControlRight As DevExpress.XtraBars.BarDockControl
Friend WithEvents PdfBarController2 As DevExpress.XtraPdfViewer.Bars.PdfBarController
Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
Friend WithEvents PdfFilePrintBarItem1 As DevExpress.XtraPdfViewer.Bars.PdfFilePrintBarItem
Friend WithEvents PdfPreviousPageBarItem1 As DevExpress.XtraPdfViewer.Bars.PdfPreviousPageBarItem
Friend WithEvents PdfNextPageBarItem1 As DevExpress.XtraPdfViewer.Bars.PdfNextPageBarItem
Friend WithEvents PdfFindTextBarItem1 As DevExpress.XtraPdfViewer.Bars.PdfFindTextBarItem
Friend WithEvents PdfZoomOutBarItem1 As DevExpress.XtraPdfViewer.Bars.PdfZoomOutBarItem
Friend WithEvents PdfZoomInBarItem1 As DevExpress.XtraPdfViewer.Bars.PdfZoomInBarItem
Friend WithEvents PdfExactZoomListBarSubItem1 As DevExpress.XtraPdfViewer.Bars.PdfExactZoomListBarSubItem
Friend WithEvents PdfZoom10CheckItem1 As DevExpress.XtraPdfViewer.Bars.PdfZoom10CheckItem
Friend WithEvents PdfZoom25CheckItem1 As DevExpress.XtraPdfViewer.Bars.PdfZoom25CheckItem
Friend WithEvents PdfZoom50CheckItem1 As DevExpress.XtraPdfViewer.Bars.PdfZoom50CheckItem
Friend WithEvents PdfZoom75CheckItem1 As DevExpress.XtraPdfViewer.Bars.PdfZoom75CheckItem
Friend WithEvents PdfZoom100CheckItem1 As DevExpress.XtraPdfViewer.Bars.PdfZoom100CheckItem
Friend WithEvents PdfZoom125CheckItem1 As DevExpress.XtraPdfViewer.Bars.PdfZoom125CheckItem
Friend WithEvents PdfZoom150CheckItem1 As DevExpress.XtraPdfViewer.Bars.PdfZoom150CheckItem
Friend WithEvents PdfZoom200CheckItem1 As DevExpress.XtraPdfViewer.Bars.PdfZoom200CheckItem
Friend WithEvents PdfZoom400CheckItem1 As DevExpress.XtraPdfViewer.Bars.PdfZoom400CheckItem
Friend WithEvents PdfZoom500CheckItem1 As DevExpress.XtraPdfViewer.Bars.PdfZoom500CheckItem
Friend WithEvents PdfSetActualSizeZoomModeCheckItem1 As DevExpress.XtraPdfViewer.Bars.PdfSetActualSizeZoomModeCheckItem
Friend WithEvents PdfSetPageLevelZoomModeCheckItem1 As DevExpress.XtraPdfViewer.Bars.PdfSetPageLevelZoomModeCheckItem
Friend WithEvents PdfSetFitWidthZoomModeCheckItem1 As DevExpress.XtraPdfViewer.Bars.PdfSetFitWidthZoomModeCheckItem
Friend WithEvents PdfSetFitVisibleZoomModeCheckItem1 As DevExpress.XtraPdfViewer.Bars.PdfSetFitVisibleZoomModeCheckItem
Friend WithEvents PdfRibbonPage1 As DevExpress.XtraPdfViewer.Bars.PdfRibbonPage
Friend WithEvents PdfFileRibbonPageGroup1 As DevExpress.XtraPdfViewer.Bars.PdfFileRibbonPageGroup
Friend WithEvents PdfNavigationRibbonPageGroup1 As DevExpress.XtraPdfViewer.Bars.PdfNavigationRibbonPageGroup
Friend WithEvents PdfZoomRibbonPageGroup1 As DevExpress.XtraPdfViewer.Bars.PdfZoomRibbonPageGroup
Friend WithEvents ToolStripDropDownButton1 As System.Windows.Forms.ToolStripDropDownButton
Friend WithEvents WebBrowser As System.Windows.Forms.WebBrowser
Friend WithEvents StatusStrip3 As System.Windows.Forms.StatusStrip
Friend WithEvents tslblWebbrowser As System.Windows.Forms.ToolStripStatusLabel
Friend WithEvents grpBetreff As System.Windows.Forms.GroupBox
Friend WithEvents txtBetreff As System.Windows.Forms.TextBox
Friend WithEvents BarAndDockingController1 As DevExpress.XtraBars.BarAndDockingController
Friend WithEvents BarAndDockingController2 As DevExpress.XtraBars.BarAndDockingController
Friend WithEvents BarAndDockingController3 As DevExpress.XtraBars.BarAndDockingController
Friend WithEvents SplitContainer1 As System.Windows.Forms.SplitContainer
Friend WithEvents grpbxMailBody As System.Windows.Forms.GroupBox
Friend WithEvents ToolStrip1 As ToolStrip
Friend WithEvents ToolStripButtonJumpFile As ToolStripButton
Friend WithEvents ToolStripButtonDeleteFile As ToolStripButton
@@ -979,4 +709,6 @@ Partial Class frmValidator
Friend WithEvents EigenschaftenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents ToolStripButtonSearchesReload As ToolStripButton
Friend WithEvents ToolTip1 As ToolTip
Friend WithEvents DocumentViewer1 As DigitalData.Controls.DocumentViewer.DocumentViewer
Friend WithEvents CheckBox1 As CheckBox
End Class

File diff suppressed because it is too large Load Diff

View File

@@ -9,11 +9,9 @@ Imports System.ComponentModel
Imports DD_LIB_Standards
Imports DigitalData.Controls.LookupGrid
Imports DevExpress.XtraGrid
Imports DigitalData.Controls.DocumentViewer
Imports System.Reflection
Public Class frmValidator
Dim viewerID
Dim strFileList()
Dim PROFIL_sortbynewest As Boolean
Dim PROFIL_VEKTORINDEX
@@ -50,18 +48,16 @@ Public Class frmValidator
Public Shared idxerr_message As String = ""
Dim DocView
Dim viewer_string As String
Dim pdfxchange As Boolean = False
Dim sumatra As Boolean = False
Private _CURRENT_INDEX_ARRAY(100, 250) As String
Dim MyDocViewer As DocumentViewer
Private _frmValidatorSearch As frmValidatorSearch 'You need a reference to Form1
Private _dependingControl_in_action As Boolean = False
Private DTCONTROLS As DataTable
Private DTVWCONTROL_INDEX As DataTable
Private FormLoaded As Boolean = False
Private ItemWorked As Boolean = False
Private Override As Boolean = False
Private Override_SQLCommand As String = ""
Private ControlHandleStarted As Boolean = False
@@ -91,13 +87,14 @@ Public Class frmValidator
End Function
Private Sub frmValidation_Load(sender As Object, e As System.EventArgs) Handles Me.Load
Override = False
SplitContainer1.Panel2Collapsed = True
docCounter = 1
OLD_Document_Path = ""
first_control = Nothing
me_closing = False
pdfxchange = False
sumatra = False
'pdfxchange = False
'sumatra = False
FormLoaded = False
If My.Settings.frmValidatorPosition.IsEmpty = False Then
If My.Settings.frmValidatorPosition.X > 0 And My.Settings.frmValidatorPosition.Y > 0 Then
@@ -109,14 +106,13 @@ Public Class frmValidator
End If
Dim _step = 0
Try
MyDocViewer = New DocumentViewer
MyDocViewer.Init(LOGCONFIG, "21182889975216572111813147150675976632")
DocumentViewer1.Init(LOGCONFIG, "21182889975216572111813147150675976632")
Catch ex As Exception
LOGGER.Error(ex)
End Try
Try
_step = 1
TBPM_PROFILE_CONTROLSTableAdapter.Connection.ConnectionString = CONNECTION_STRING
TBDD_CONNECTIONTableAdapter.Connection.ConnectionString = CONNECTION_STRING
TBPM_PROFILE_FILESTableAdapter.Connection.ConnectionString = CONNECTION_STRING
@@ -197,7 +193,7 @@ Public Class frmValidator
Anzahl_ValDoks = 1
Else
Anzahl_ValDoks = TBPM_PROFILE_FILESTableAdapter.cmdGet_Anzahl(CURRENT_ProfilGUID)
Anzahl_ValDoks = 0
End If
Next
@@ -244,23 +240,7 @@ Public Class frmValidator
LOGGER.Error(ex)
LOGGER.Info("Error in Load FormLayout: " & ex.Message)
End Try
Select Case Path.GetExtension(WMDocPathWindows).ToLower
Case ".pdf"
Select Case VIEWER_PDF
Case "internal"
My.Settings.frmValidation_Size_PDFViewer = Me.Size
Case "pdfxchange"
My.Settings.frmValidatorSize = Me.Size
Case "sumatra"
My.Settings.frmValidatorSize = Me.Size
Case "system"
My.Settings.frmValidatorSize = Me.Size
End Select
Case ".msg"
My.Settings.frmValidation_Size_Email = Me.Size
Case Else
My.Settings.frmValidatorSize = Me.Size
End Select
My.Settings.Save()
Try
_frmValidatorSearch.Close()
@@ -281,76 +261,36 @@ Public Class frmValidator
If CURRENT_DOC_GUID <> 0 Then
Try
TBPM_PROFILE_FILESTableAdapter.CmdSETWORK(False, "", CURRENT_DOC_GUID)
If ItemWorked = False Then
Dim sql = $"UPDATE TBPM_PROFILE_FILES SET IN_WORK = 0, IN_WORK_WHEN = NULL, WORK_USER = NULL, EDIT = 0 WHERE GUID = {CURRENT_DOC_GUID}"
ClassDatabase.Execute_non_Query(sql)
End If
Catch ex As Exception
LOGGER.Error(ex)
allgFunk.Insert_LogEntry(CURRENT_ProfilGUID, "Fehler bei Freigabe der Dok-ID: " & CURRENT_DOC_GUID & " - ERROR: " & ex.Message, USER_USERNAME)
End Try
End If
If VIEWER_ALL = "docview" Then
If IDB_ACTIVE = False Then
CloseWDDocview()
End If
'If VIEWER_ALL = "docview" Then
' If IDB_ACTIVE = False Then
' CloseWDDocview()
' End If
End If
'End If
If VIEWER_PDF = "system" Then
Kill_PDFAcrobat()
Else
If pdfxchange = True Or sumatra = True Then
Close_PDF_Viewer(WMDocPathWindows)
End If
KillU_Viewer()
End If
'If VIEWER_PDF = "system" Then
' Kill_PDFAcrobat()
'Else
' If pdfxchange = True Or sumatra = True Then
' Close_PDF_Viewer(WMDocPathWindows)
' End If
' KillU_Viewer()
'End If
End Sub
Sub KillU_Viewer()
Try
Dim Proc As New System.Diagnostics.Process
Dim psi As New ProcessStartInfo("taskkill.exe", "/im Viewer.exe")
psi.UseShellExecute = True
Proc.StartInfo = psi
psi.WindowStyle = ProcessWindowStyle.Minimized
Proc.Start()
pdfxchange = False
Dim p As Process
Dim processes As Process()
processes = Process.GetProcesses()
For Each p In processes
If p.ProcessName.ToLower = "viewer" Then
p.Kill()
End If
Next
Catch ex As Exception
LOGGER.Error(ex)
End Try
End Sub
Sub Kill_PDFAcrobat()
Try
Dim p As Process
Dim processes As Process()
processes = Process.GetProcesses()
For Each p In processes
If viewerID Is Nothing = False Then
If p.Id = viewerID Then p.Kill()
If p.ProcessName = "Acrobat.exe" Then p.Kill()
Else
If p.ProcessName = "Acrobat.exe" Then p.Kill()
If p.ProcessName = "AcroRd32.exe" Then p.Kill()
If p.ProcessName.ToLower = "acrord32" Then p.Kill()
If p.ProcessName.Contains("croRd") Then p.Kill()
End If
Next
Catch ex As Exception
LOGGER.Error(ex)
End Try
End Sub
Private Function process_User_exists(processname As String, Status As String)
Dim fi = New FileInfo(processname)
Dim filename As String = fi.Name.Replace(fi.Extension, "")
@@ -385,55 +325,6 @@ Public Class frmValidator
' LOGGER.Info(">> Fehler in process_terminate: " & ex.Message, True)
' End Try
'End Function
Sub Close_PDF_Viewer(vorherigefile As String)
Try
If VIEWER_PDF = "pdfxchange" Then
Dim Proc As New System.Diagnostics.Process
Dim psi As New ProcessStartInfo(VIEWER_XCHANGE, "/Close:save """ & vorherigefile & """")
psi.WindowStyle = ProcessWindowStyle.Minimized
psi.UseShellExecute = True
Proc.StartInfo = psi
Proc.Start()
pdfxchange = True
sumatra = False
'Dim count As Integer = 0
'sss()
'Do While process_User_exists("PDFXCview.exe", "CLOSE") = True
' 'Warten bis PDF geschlossen ist
' count += 1
' If count = 500 Then
' If process_terminate("PDFXCview.exe") Then
' process_terminate("PDFXCview.exe")
' End If
' End If
'Loop
End If
If VIEWER_PDF = "sumatra" Then
Try
Dim Proc As New System.Diagnostics.Process
Dim psi As New ProcessStartInfo("taskkill.exe", "/im SumatraPDF.exe")
psi.WindowStyle = ProcessWindowStyle.Minimized
psi.UseShellExecute = True
Proc.StartInfo = psi
Proc.Start()
pdfxchange = False
sumatra = True
Catch ex As Exception
LOGGER.Error(ex)
End Try
End If
If VIEWER_PDF = "system" Then
Kill_PDFAcrobat()
pdfxchange = False
sumatra = False
End If
Catch ex As Exception
LOGGER.Error(ex)
LOGGER.Info("Fehler in Close_PDFXCHANGE")
LOGGER.Info(ex.Message)
End Try
End Sub
Private Function Init_IDB()
Try
IDBData = New ClassIDBData
@@ -930,6 +821,12 @@ Public Class frmValidator
LOGGER.Debug("Versuch Linie zu laden")
oMyControl = ClassControlCreator.CreateExistingLine(oControlRow, False)
Case "BUTTON"
LOGGER.Debug("Loading button")
Dim obutton = ClassControlCreator.CreateExistingButton(oControlRow, False)
AddHandler obutton.Click, AddressOf onCustomButtonClick
oMyControl = obutton
End Select
If TypeOf oMyControl IsNot Label Then
@@ -953,8 +850,6 @@ Public Class frmValidator
If LOG_ERRORS_ONLY = False Then MsgBox("Error Load_Controls: " & ex.Message, MsgBoxStyle.Critical, "Attention error:")
allgFunk.Insert_LogEntry(CURRENT_ProfilGUID, "Error Load_Controls: " & ex.Message, USER_USERNAME)
LOGGER.Info("Unvorhergesehener Fehler bei Load_Controls:" & ex.Message)
LOGGER.Info("")
End Try
End Sub
@@ -1083,11 +978,84 @@ Public Class frmValidator
End If
End Sub
Private Sub onCustomButtonClick(sender As System.Object, e As System.EventArgs)
Dim oButton As Button = sender
Dim oControlID = DirectCast(oButton.Tag, ClassControlCreator.ControlMetadata).Guid
Dim oSQL = ClassControlCreator.GET_CONTROL_PROPERTY(DTCONTROLS, oControlID, "SQL_UEBERPRUEFUNG")
If IsNothing(oSQL) Then
Exit Sub
End If
Dim oSQL2 = ClassControlCreator.GET_CONTROL_PROPERTY(DTCONTROLS, oControlID, "SQL2")
If IsNothing(oSQL2) Then
oSQL2 = ""
End If
' = $"select SQL_UEBERPRUEFUNG,SQL2 FROM TBPM_PROFILE_CONTROLS WHERE GUID = {oControlID}"
oSQL = clsPatterns.ReplaceAllValues(oSQL, pnldesigner, CURRENT_WMFILE, USER_PRENAME, USER_SURNAME, USER_SHORTNAME, USER_EMAIL, USER_ID, CURRENT_CLICKED_PROFILE_ID)
LOGGER.Debug($"oSQL after replace {oSQL}")
Dim oDT_ACTIONS As DataTable = ClassDatabase.Return_Datatable(oSQL)
'Select Case'Override' as Action_Type, 'Sind Sie sicher dass Sie nicht zuständig sind?' as Question,'Nicht Zuständig' as Caption,'Red' as Color
Dim oAction
Dim oQuestion
Dim oTitle
Dim oCaption
Dim oColor
Try
oAction = oDT_ACTIONS?.Rows(0).Item("Action_Type")
Catch ex As Exception
oAction = ""
End Try
Try
oQuestion = oDT_ACTIONS?.Rows(0).Item("Question")
Catch ex As Exception
oQuestion = ""
End Try
Try
oTitle = oDT_ACTIONS?.Rows(0).Item("Title")
Catch ex As Exception
oTitle = ""
End Try
Try
oCaption = oDT_ACTIONS?.Rows(0).Item("Caption").ToString
Catch ex As Exception
oCaption = ""
End Try
Try
oColor = System.Drawing.Color.FromName(oDT_ACTIONS?.Rows(0).Item("Color"))
Catch ex As Exception
oColor = ""
End Try
Try
Override_SQLCommand = oSQL2
Override_SQLCommand = clsPatterns.ReplaceAllValues(Override_SQLCommand, pnldesigner, CURRENT_WMFILE, USER_PRENAME, USER_SURNAME, USER_SHORTNAME, USER_EMAIL, USER_ID, CURRENT_CLICKED_PROFILE_ID)
Catch ex As Exception
Override_SQLCommand = ""
End Try
Select Case oAction
Case "SetButton"
btnSave.Text = oCaption
btnSave.BackColor = oColor
Case "Override"
If oQuestion <> "" Then
Dim result As MsgBoxResult
result = MessageBox.Show(oQuestion, oTitle, MessageBoxButtons.YesNo, MessageBoxIcon.Exclamation)
If result = MsgBoxResult.Yes Then
Override = True
End If
End If
End Select
End Sub
Public Sub onDGVRowValidating(ByVal sender As Object, ByVal e As DataGridViewCellCancelEventArgs)
Dim dgv As DataGridView = sender
Try
Dim CONTROL_ID = DirectCast(dgv.Tag, ClassControlCreator.ControlMetadata).Guid ' VWPM_CONTROL_INDEXTableAdapter.cmdGetControlID(CURRENT_ProfilGUID, dgv.Name)
Dim sql = String.Format("select NAME,CONNECTION_ID,SQL_UEBERPRUEFUNG FROM TBPM_PROFILE_CONTROLS WHERE PROFIL_ID = {0} AND SQL_UEBERPRUEFUNG LIKE '%{1}%'", CURRENT_ProfilGUID, dgv.Name)
Dim sql = String.Format("select NAME,CONNECTION_ID,SQL_UEBERPRUEFUNG FROM TBPM_PROFILE_CONTROLS WHERE PROFIL_ID = {0} And SQL_UEBERPRUEFUNG Like '%{1}%'", CURRENT_ProfilGUID, dgv.Name)
Dim DT As DataTable = ClassDatabase.Return_Datatable(sql)
If Not IsNothing(DT) And DT.Rows.Count > 0 Then
For Each ROW As DataRow In DT.Rows
@@ -1159,17 +1127,17 @@ Public Class frmValidator
Dim oLOOKUPName = oLookup.Name
Dim oControlID = DirectCast(oLookup.Tag, ClassControlCreator.ControlMetadata).Guid
Dim filteredData As DataTable = DTCONTROLS.Clone()
Dim oFilteredDatatable As DataTable = DTCONTROLS.Clone()
Dim oExpression = $"SQL_UEBERPRUEFUNG like '%#CTRL#{oLOOKUPName}%'"
DTCONTROLS.Select(oExpression).CopyToDataTable(filteredData, LoadOption.PreserveChanges)
If filteredData.Rows.Count = 1 Then
Dim oDEPENDING_GUID = filteredData.Rows(0).Item("GUID")
Dim oDEPENDING_CtrlName = filteredData.Rows(0).Item("NAME")
DTCONTROLS.Select(oExpression).CopyToDataTable(oFilteredDatatable, LoadOption.PreserveChanges)
If oFilteredDatatable.Rows.Count = 1 Then
Dim oDEPENDING_GUID = oFilteredDatatable.Rows(0).Item("GUID")
Dim oDEPENDING_CtrlName = oFilteredDatatable.Rows(0).Item("NAME")
If _dependingControl_in_action = True Then
Exit Sub
End If
If Not IsDBNull(filteredData.Rows(0).Item("CONNECTION_ID")) And Not IsDBNull(filteredData.Rows(0).Item("SQL_UEBERPRUEFUNG")) Then
Dim oSqlCommand = IIf(IsDBNull(filteredData.Rows(0).Item("SQL_UEBERPRUEFUNG")), "", filteredData.Rows(0).Item("SQL_UEBERPRUEFUNG"))
If Not IsDBNull(oFilteredDatatable.Rows(0).Item("CONNECTION_ID")) And Not IsDBNull(oFilteredDatatable.Rows(0).Item("SQL_UEBERPRUEFUNG")) Then
Dim oSqlCommand = IIf(IsDBNull(oFilteredDatatable.Rows(0).Item("SQL_UEBERPRUEFUNG")), "", oFilteredDatatable.Rows(0).Item("SQL_UEBERPRUEFUNG"))
oSqlCommand = clsPatterns.ReplaceAllValues(oSqlCommand, pnldesigner, CURRENT_WMFILE, USER_PRENAME, USER_SURNAME, USER_SHORTNAME, USER_EMAIL, USER_ID, CURRENT_CLICKED_PROFILE_ID)
LOGGER.Debug(">>> sql after ReplaceAllValues: " & oSqlCommand)
_dependingControl_in_action = True
@@ -1372,21 +1340,6 @@ Public Class frmValidator
Return False
End Try
End Function
Sub ShowFile_UniversalViewer(AktuelleIndexfile As String)
Try
KillU_Viewer()
Dim Proc As New System.Diagnostics.Process
Dim psi As New ProcessStartInfo(VIEWER_UNIVERSAL, """" & AktuelleIndexfile & """")
psi.WindowStyle = ProcessWindowStyle.Minimized
Proc.EnableRaisingEvents = True
Proc.StartInfo = psi
Proc.Start()
Catch ex As Exception
LOGGER.Error(ex)
MsgBox("Fehler in ShowFile_UniversalViewer:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Public Function IsProcessRunning(name As String) As Boolean
'here we're going to get a list of all running processes on
@@ -1400,54 +1353,7 @@ Public Class frmValidator
'process not found, return false
Return False
End Function
Sub Open_PDFXCHANGE(AktuelleIndexfile As String)
Try
Dim Proc As New Process
Dim psi As New ProcessStartInfo(VIEWER_XCHANGE, """" & AktuelleIndexfile & """")
psi.WindowStyle = ProcessWindowStyle.Minimized
Proc.EnableRaisingEvents = True
psi.UseShellExecute = False
Proc.StartInfo = psi
Proc.Start()
Do While process_User_exists(VIEWER_XCHANGE, "START") = False
'Warten bis PDF geladen ist
Thread.Sleep(500)
Loop
Catch ex As Exception
LOGGER.Error(ex)
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler in Open_PDFXCHANGE:")
LOGGER.Info("Fehler in Open_PDFXCHANGE")
LOGGER.Info(ex.Message)
End Try
End Sub
Sub Open_Sumatra(AktuelleIndexfile As String)
Try
Dim Proc As New System.Diagnostics.Process
Dim psi As New ProcessStartInfo(VIEWER_SUMATRA, """" & AktuelleIndexfile & """")
psi.WindowStyle = ProcessWindowStyle.Minimized
Proc.EnableRaisingEvents = True
psi.UseShellExecute = False
Proc.StartInfo = psi
Proc.Start()
Catch ex As Exception
LOGGER.Error(ex)
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler in Open_Sumatra:")
LOGGER.Info("Fehler in Open_Sumatra")
LOGGER.Info(ex.Message)
End Try
End Sub
Sub Open_PDF_withStandard()
If WMDocPathWindows.ToLower.EndsWith(".pdf") = True Then
Dim Proc As New System.Diagnostics.Process
Dim psi As New ProcessStartInfo(WMDocPathWindows)
psi.WindowStyle = ProcessWindowStyle.Minimized
Proc.EnableRaisingEvents = True
Proc.StartInfo = psi
Proc.Start()
viewerID = Proc.Id
End If
End Sub
Function ReplaceWindreamDriveLetter(Filepath As String) As String
Return Filepath.
@@ -1489,57 +1395,25 @@ Public Class frmValidator
End Function
'lädt die windream-Files für das Profil
Sub Refresh_FileList()
'windream-Suche für Profil starten
'_windreamPM = New ClassPMWindream()
If PROFIL_sortbynewest = True Then
TBPM_PROFILE_FILESTableAdapter.FillBy_Newest(DD_DMSLiteDataSet.TBPM_PROFILE_FILES, CURRENT_ProfilGUID)
Else
TBPM_PROFILE_FILESTableAdapter.Fill(DD_DMSLiteDataSet.TBPM_PROFILE_FILES, CURRENT_ProfilGUID)
End If
If CURRENT_DOC_GUID = 0 Then
Dim DT As DataTable = DD_DMSLiteDataSet.TBPM_PROFILE_FILES
CURRENT_DOC_GUID = 0 'DT.Rows(0).Item("GUID")
AnzDoks = DT.Rows.Count
Else
AnzDoks = 1
WMDocPathWindows = CURRENT_DOC_PATH
End If
tsslblDocID.Text = "Document-ID: " & CURRENT_DOC_ID & " - GUID: " & CURRENT_DOC_GUID
End Sub
Sub Close_document_viewer()
'Vorherige Datei Schliessen
If CURRENT_HTML_DOC <> "" Then
If File.Exists(CURRENT_HTML_DOC) Then
File.Delete(CURRENT_HTML_DOC)
End If
End If
If pdfxchange = True Or sumatra = True Or VIEWER_PDF = "system" Then
Close_PDF_Viewer(WMDocPathWindows)
End If
If CURRENT_WMFILE Is Nothing = False Then
If CURRENT_WMFILE.aLocked Then
CURRENT_WMFILE.Save()
' unlock the windream object
CURRENT_WMFILE.unlock()
End If
End If
End Sub
Sub PdfControls_visible(visible As Boolean)
If visible = False Then
pnlpdf.Dock = DockStyle.None
Else
pnlpdf.Dock = DockStyle.Fill
End If
pnlpdf.Visible = visible
End Sub
'Sub Close_document_viewer()
' 'Vorherige Datei Schliessen
' If CURRENT_HTML_DOC <> "" Then
' If File.Exists(CURRENT_HTML_DOC) Then
' File.Delete(CURRENT_HTML_DOC)
' End If
' End If
' If pdfxchange = True Or sumatra = True Or VIEWER_PDF = "system" Then
' Close_PDF_Viewer(WMDocPathWindows)
' End If
' If CURRENT_WMFILE Is Nothing = False Then
' If CURRENT_WMFILE.aLocked Then
' CURRENT_WMFILE.Save()
' ' unlock the windream object
' CURRENT_WMFILE.unlock()
' End If
' End If
'End Sub
Private Function CreateWMObject() As String
LOGGER.Debug($"in GetWMDocFileString...'")
Dim oWMRELPATH As String = CURRENT_DT_CONFIG.Rows.Item(0).Item("WM_REL_PATH")
@@ -1573,7 +1447,7 @@ Public Class frmValidator
Dim oResult As String
Dim oSQL = $"SELECT dbo.FNPM_GET_FILEPATH ({CURRENT_DOC_GUID},{_CheckStandard})"
oResult = ClassDatabase.Execute_Scalar(oSQL, CONNECTION_STRING)
LOGGER.Debug($"Checking file [{oResult}] exists?...")
LOGGER.Debug($"Checking file 0 [{oResult}] exists?...")
If File.Exists(oResult) = False Then
If USER_USERNAME = "SchreiberM" Then
oResult = "\\dd-gan.local.digitaldata.works\DD-DFSR01\UserObjects\UserFiles\schreiberm\Desktop\AANG-3302-swbn.pdf"
@@ -1581,7 +1455,7 @@ Public Class frmValidator
LOGGER.Debug($"GetWMDocPathWindows returned false - trying with standard again...")
oSQL = $"SELECT [dbo].[FNPM_GET_FILEPATH] ({CURRENT_DOC_GUID},1)"
oResult = ClassDatabase.Execute_Scalar(oSQL, CONNECTION_STRING)
LOGGER.Debug($"Checking file [{oResult}] exists?...")
LOGGER.Debug($"Checking file 1[{oResult}] exists?...")
If File.Exists(oResult) = False Then
LOGGER.Warn($"File {oResult} not existing!")
Return False
@@ -1659,7 +1533,9 @@ Public Class frmValidator
'lblNavigator_anzDok.Text = position & " of " & Anzahl_ValDoks & " files"
If WMDocPathWindows <> String.Empty Then
' >> >> >> >> >> >>##### Das Dokument in Bearbeitung nehmen ###########################
TBPM_PROFILE_FILESTableAdapter.CmdSETWORK(True, USER_USERNAME, CURRENT_DOC_GUID)
Dim sql = $"UPDATE TBPM_PROFILE_FILES SET IN_WORK = 1, IN_WORK_WHEN = GETDATE(), WORK_USER = '{USER_USERNAME}' WHERE GUID = {CURRENT_DOC_GUID}"
ClassDatabase.Execute_non_Query(sql)
' ############ Infos eintragen #################
tsslblDocID.Text = "Document-ID: " & CURRENT_DOC_ID & " - DocGUID: " & CURRENT_DOC_GUID
' txtDateipfad.Text = Document_Path
@@ -1677,18 +1553,16 @@ Public Class frmValidator
If oErrorMessage = "" Then
Me.grpbxMailBody.Visible = False
Me.grpBetreff.Visible = False
load_viewer()
LOGGER.Debug("Viewer geladen")
If WMDocPathWindows.ToLower.EndsWith(".pdf") Then
ToolStripButtonAnnotation.Visible = True
Else
ToolStripButtonAnnotation.Visible = False
End If
LOGGER.Debug("Viewer geladen")
@@ -1743,9 +1617,13 @@ Public Class frmValidator
errormessage = oErrorMessage
frmError.ShowDialog()
Else
LOGGER.Info(" >> Ende des Profils - Kein weiteres Dokument!")
LOGGER.Info("")
LOGGER.Info("End of profile - no more document!")
If USER_LANGUAGE <> "de-DE" Then
MsgBox("No more document! End of profile!" & vbNewLine & "Validation will be closed.", MsgBoxStyle.Information, "")
Else
MsgBox("Kein weiteres Dokument gefunden - Ende des Profils!" & vbNewLine & "Das Formular wird nun geschlossen.", MsgBoxStyle.Information, "Hinweis:")
End If
activate_controls(True)
Me.Close()
End If
@@ -1761,126 +1639,10 @@ Public Class frmValidator
'End Try
End Sub
Sub load_viewer()
MyDocViewer.LoadFile(WMDocPathWindows)
DocumentViewer1.LoadFile(WMDocPathWindows)
SplitContainer1.Panel2Collapsed = False
'If VIEWER_ALL = "uviewer" Then
' pdfxchange = False
' sumatra = False
' If WMDocPathWindows.ToLower.EndsWith(".msg") Then
' Show_Email()
' Else
' ShowFile_UniversalViewer(WMDocPathWindows)
' End If
'ElseIf VIEWER_ALL = "docview" Then
' PdfControls_visible(False)
' If WMDocPathWindows.ToLower.EndsWith(".pdf") And VIEWER_PDF <> "none" Then
' Select Case VIEWER_PDF
' Case "internal"
' SplitContainer1.Panel2Collapsed = False
' PdfViewer1.LoadDocument(WMDocPathWindows)
' LOGGER.Debug("Internal Viewer Path: " & WMDocPathWindows)
' PdfControls_visible(True)
' Me.Size = My.Settings.frmValidation_Size_PDFViewer
' 'PdfViewer1.ZoomFactor = PDFViewer_ZoomMode
' PdfViewer1.ZoomMode = DevExpress.XtraPdfViewer.PdfZoomMode.FitToWidth
' pdfxchange = False
' sumatra = False
' Case "pdfxchange"
' SplitContainer1.Panel2Collapsed = True
' Open_PDFXCHANGE(WMDocPathWindows)
' pdfxchange = True
' sumatra = False
' System.Threading.Thread.Sleep(1000)
' Me.Size = My.Settings.frmValidatorSize
' Case "sumatra"
' SplitContainer1.Panel2Collapsed = True
' Open_Sumatra(WMDocPathWindows)
' sumatra = True
' pdfxchange = False
' System.Threading.Thread.Sleep(1000)
' Me.Size = My.Settings.frmValidatorSize
' Case "system"
' SplitContainer1.Panel2Collapsed = True
' sumatra = False
' pdfxchange = False
' Open_PDF_withStandard()
' System.Threading.Thread.Sleep(1000)
' Me.Size = My.Settings.frmValidatorSize
' End Select
' ElseIf WMDocPathWindows.ToLower.EndsWith(".msg") Then
' Show_Email()
' Else
' SplitContainer1.Panel2Collapsed = True
' Me.Size = My.Settings.frmValidatorSize
' pdfxchange = False
' sumatra = False
' DocView = Nothing
' DocView = CreateObject("WMPViewXNG.Viewer")
' ' open the viewer
' viewer_string = CURRENT_WMFILE.aPath.ToString
' DocView.ViewFile(viewer_string)
' End If
'Else
' SplitContainer1.Panel2Collapsed = True
' PdfControls_visible(False)
' Me.Size = My.Settings.frmValidatorSize
' pdfxchange = False
' sumatra = False
' DocView = Nothing
' DocView = CreateObject("WMPViewXNG.Viewer")
' ' open the viewer
' viewer_string = CURRENT_WMFILE.aPath.ToString
' DocView.ViewFile(viewer_string)
'End If
End Sub
'Sub Show_Email()
' Me.grpBetreff.Dock = DockStyle.Top
' Me.grpbxMailBody.Dock = DockStyle.Fill
' Dim msg_email As New Msg.Message(WMDocPathWindows)
' 'Eine tempfile generieren
' Dim tempFilename = My.Computer.FileSystem.GetTempFileName()
' Dim name = Path.GetFileNameWithoutExtension(tempFilename)
' tempFilename = Path.Combine(Path.GetDirectoryName(tempFilename), name & ".html")
' 'tempfile löschen
' If My.Computer.FileSystem.FileExists(tempFilename) Then
' My.Computer.FileSystem.DeleteFile(tempFilename)
' End If
' Me.txtBetreff.Text = msg_email.Subject
' Try
' Dim wFile As System.IO.FileStream
' Dim byteData() As Byte
' byteData = msg_email.BodyHtml
' ' MsgBox(msg_email.InternetCodePage)
' ' wFile = New FileStream(tempFilename, FileMode.Append)
' ' wFile.Write(byteData, 0, byteData.Length)
' ' wFile.Close()
' 'Catch ex As IOException
' ' MsgBox(ex.ToString)
' 'End Try
' Dim vIn() As Byte = msg_email.BodyHtml
' Dim vOut As String = System.Text.Encoding.UTF8.GetString(vIn)
' File.WriteAllText(tempFilename, vOut, System.Text.Encoding.UTF8)
' CURRENT_HTML_DOC = tempFilename
' Me.tslblWebbrowser.Text = CURRENT_HTML_DOC
' WebBrowser.Navigate("file:///" & CURRENT_HTML_DOC)
' SplitContainer1.Panel2Collapsed = False
' Me.Size = My.Settings.frmValidation_Size_Email
' Me.grpbxMailBody.Visible = True
' Me.grpBetreff.Visible = True
' Catch ex As Exception
' LOGGER.Error(ex)
' errormessage = "Unvorhergesehener Fehler bei Show_Email:" & ex.Message
' LOGGER.Info("Unvorhergesehener Fehler in Show_Email: " & ex.Message)
' My.Settings.Save()
' frmError.ShowDialog()
' End Try
'End Sub
Sub activate_controls(status As Boolean)
Me.pnldesigner.Enabled = status
Me.btnSave.Enabled = status
@@ -2847,6 +2609,7 @@ Public Class frmValidator
' Refresh_FileList()
Load_Next_Document(True)
_dependingControl_in_action = False
BringToFront()
FormLoaded = True
End Sub
Private Sub btnSave_Click(sender As System.Object, e As System.EventArgs) Handles btnSave.Click
@@ -2854,37 +2617,38 @@ Public Class frmValidator
Abschluss()
btnSave.Enabled = True
End Sub
Sub CloseWDDocview()
Try
Dim oFileName = New FileInfo(CURRENT_WMFILE.aPath)
Dim oProcesses As Process() = Process.GetProcesses()
Dim oViewerNames As New List(Of String) From {
"WMPViewX",
"WMPViewXNG"
}
'Sub CloseWDDocview()
' Try
' Dim oFileName = New FileInfo(CURRENT_WMFILE.aPath)
' Dim oProcesses As Process() = Process.GetProcesses()
' Dim oViewerNames As New List(Of String) From {
' "WMPViewX",
' "WMPViewXNG"
' }
For Each p In oProcesses
If oViewerNames.Contains(p.ProcessName) Then
p.Kill()
End If
Next
Catch ex As Exception
LOGGER.Error(ex)
LOGGER.Info(" ### FEHLER in CloseDocView")
LOGGER.Info("### " & ex.Message & " ###")
End Try
'Try
' If VIEWER_ALL = "docview" Then
' DocView.CloseView(CURRENT_WMFILE.aPath, 0)
' For Each p In oProcesses
' If oViewerNames.Contains(p.ProcessName) Then
' p.Kill()
' End If
'Catch ex As Exception
' Next
' Catch ex As Exception
' LOGGER.Error(ex)
' LOGGER.Info(" ### FEHLER in CloseDocView")
' LOGGER.Info("### " & ex.Message & " ###")
'End Try
End Sub
' End Try
' 'Try
' ' If VIEWER_ALL = "docview" Then
' ' DocView.CloseView(CURRENT_WMFILE.aPath, 0)
' ' End If
' 'Catch ex As Exception
' ' LOGGER.Error(ex)
' ' LOGGER.Info(" ### FEHLER in CloseDocView")
' ' LOGGER.Info("### " & ex.Message & " ###")
' 'End Try
'End Sub
Sub Abschluss()
btnSave.Enabled = False
LOGGER.Debug("Abschluss für Dok: " & CURRENT_DOC_PATH & " gestartet")
'Eingaben auf Form überprüfen
@@ -2892,7 +2656,7 @@ Public Class frmValidator
'lblerror.Visible = False
'Try
Dim oErrorOcurred As Boolean = False
ItemWorked = True
TBPM_PROFILE_FINAL_INDEXINGTableAdapter.Fill(FinalIndexDataSet.TBPM_PROFILE_FINAL_INDEXING, CURRENT_ProfilName)
Dim oDTFinalIndexes As DataTable = FinalIndexDataSet.TBPM_PROFILE_FINAL_INDEXING
If oDTFinalIndexes.Rows.Count > 0 Then
@@ -3001,7 +2765,7 @@ Public Class frmValidator
If oErrorOcurred = False Then
'Das Dokument freigeben und als editiert markieren
Dim sql = String.Format("UPDATE TBPM_PROFILE_FILES SET IN_WORK = 0, WORK_USER = '{0}', EDIT = 1 WHERE GUID = {1}", USER_USERNAME, CURRENT_DOC_GUID)
Dim sql = String.Format("UPDATE TBPM_PROFILE_FILES SET IN_WORK = 0, IN_WORK_WHEN = NULL, WORK_USER = '{0}', EDIT = 1 WHERE GUID = {1}", USER_USERNAME, CURRENT_DOC_GUID)
ClassDatabase.Execute_non_Query(sql)
'TBPM_PROFILE_FILESTableAdapter.CmdSETWORK(False, "", Document_ID)
''Das Dokument
@@ -3108,7 +2872,7 @@ Public Class frmValidator
Dim ins = String.Format("INSERT INTO TBPM_FILES_WORK_HISTORY (PROFIL_ID, DOC_ID,WORKED_BY,WORKED_WHERE,STATUS_COMMENT) VALUES ({0},{1},'{2}','{3}','{4}')", CURRENT_ProfilGUID, CURRENT_DOC_ID, USER_USERNAME, Environment.MachineName, WORK_HISTORY_ENTRY)
ClassDatabase.Execute_non_Query(ins)
Close_document_viewer()
'Close_document_viewer()
If WMDocPathWindows.ToLower.EndsWith(".pdf") Then
If Not IsNothing(WORK_HISTORY_ENTRY) Then
If CBool(CURRENT_DT_PROFILE.Rows(0).Item("ANNOTATE_WORK_HISTORY_ENTRY")) = True Then
@@ -3156,7 +2920,8 @@ Public Class frmValidator
'tstrlbl_Info.Text = "Anzahl Dateien: " & TBPM_PROFILE_FILESTableAdapter.cmdGet_Anzahl(PROFIL_ID)
LOGGER.Debug("Anzahl hochgesetzt")
LOGGER.Debug("Validierung erfolgreich abgeschlossen")
LOGGER.Info("")
Dim oPROCSQL = $"EXEC PRPM_CHECK_NEXT_WF {CURRENT_DOC_GUID}"
ClassDatabase.Execute_non_Query(oPROCSQL)
If CURRENT_JUMP_DOC_GUID <> 0 Then
Me.Close()
Else
@@ -4118,16 +3883,14 @@ Public Class frmValidator
Sub Datei_ueberspringen()
Try
LOGGER.Debug("Dokument überspringen")
Close_document_viewer()
LOGGER.Debug("Doc Viewer geschlossen")
'Das Dokument freigeben
TBPM_PROFILE_FILESTableAdapter.CmdSETWORK(False, "", CURRENT_DOC_GUID)
Dim sql = $"UPDATE TBPM_PROFILE_FILES SET IN_WORK = 0, IN_WORK_WHEN = NULL, WORK_USER = NULL WHERE GUID = {CURRENT_DOC_GUID}"
ClassDatabase.Execute_non_Query(sql)
Dim oSQL = $"EXECUTE PRPM_FILES_NOT_INDEXED '{USER_USERNAME}',{CURRENT_ProfilGUID},'{WMDocPathWindows}',{CURRENT_DOC_GUID}"
ClassDatabase.Execute_non_Query(oSQL)
LOGGER.Debug($"Skipped DocGUID {CURRENT_DOC_GUID}")
LOGGER.Info("")
Load_Next_Document(False)
Catch ex As Exception
LOGGER.Error(ex)
@@ -4140,7 +3903,7 @@ Public Class frmValidator
Dim result As MsgBoxResult
result = MessageBox.Show("Sind Sie sicher dass Sie dieses Dokument unwiderruflich löschen wollen?" & vbNewLine & "Danach wird die nächste Datei angezeigt!", "Bestätigung erforderlich:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If result = MsgBoxResult.Yes Then
Close_document_viewer()
' Close_document_viewer()
'Aus der Tabelle löschen
TBPM_PROFILE_FILESTableAdapter.CmdDelete(CURRENT_DOC_GUID)
Dim resul = allgFunk.Delete_xffres(WMDocPathWindows, _windream)
@@ -4160,8 +3923,8 @@ Public Class frmValidator
Private Function Delete_File()
Try
If CURRENT_WMFILE Is Nothing = False Then
Close_document_viewer()
Me.PdfViewer1.DocumentFilePath = ""
'Close_document_viewer()
'Me.PdfViewer1.DocumentFilePath = ""
Try
If CURRENT_WMFILE.aLocked Then
' unlock the windream object
@@ -4219,23 +3982,7 @@ Public Class frmValidator
End Structure
Private Sub frmValidation_ResizeEnd(sender As Object, e As EventArgs) Handles Me.ResizeEnd
If WMDocPathWindows Is Nothing = False Then
Select Case Path.GetExtension(WMDocPathWindows).ToLower
Case ".pdf"
Select Case VIEWER_PDF
Case "internal"
My.Settings.frmValidation_Size_PDFViewer = Me.Size
Case "pdfxchange"
My.Settings.frmValidatorSize = Me.Size
Case "sumatra"
My.Settings.frmValidatorSize = Me.Size
Case "system"
My.Settings.frmValidatorSize = Me.Size
End Select
Case ".msg"
My.Settings.frmValidation_Size_Email = Me.Size
Case Else
My.Settings.frmValidatorSize = Me.Size
End Select
My.Settings.Save()
End If
End Sub
@@ -4243,38 +3990,16 @@ Public Class frmValidator
Private Sub Splitter1_LocationChanged(sender As Object, e As EventArgs)
My.Settings.Save()
End Sub
Private Sub PdfViewer1_DocumentChanged(sender As Object, e As DevExpress.XtraPdfViewer.PdfDocumentChangedEventArgs) Handles PdfViewer1.DocumentChanged
PDF_Pagenumber()
End Sub
Private Sub PdfViewer1_CurrentPageChanged(sender As Object, e As DevExpress.XtraPdfViewer.PdfCurrentPageChangedEventArgs) Handles PdfViewer1.CurrentPageChanged
PDF_Pagenumber()
End Sub
Sub PDF_Pagenumber()
Try
pdfstatuslblPageNumber.Text = "Page " & PdfViewer1.CurrentPageNumber & "/" & PdfViewer1.PageCount
Catch ex As Exception
LOGGER.Error(ex)
End Try
End Sub
Private Sub MinimumToolStripMenuItem_Click(sender As Object, e As EventArgs)
PdfViewer1.ZoomFactor = 20
End Sub
Private Sub ToolStripDropDownButton1_Click(sender As Object, e As EventArgs) Handles ToolStripDropDownButton1.Click
PdfViewer1.ZoomFactor = 20
End Sub
Private Sub frmValidator_KeyUp(sender As Object, e As KeyEventArgs) Handles MyBase.KeyUp
If e.KeyCode = Keys.F4 Then
Datei_ueberspringen()
ElseIf e.KeyCode = Keys.F2 Then
btnSave.Enabled = False
Abschluss()
btnSave.Enabled = True
End If
'(e.Control AndAlso e.KeyCode = Keys.S) Then
' btnSave.Enabled = False
'Abschluss()
'btnSave.Enabled = True
'Else
End Sub
Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButtonJumpFile.Click
@@ -4286,8 +4011,8 @@ Public Class frmValidator
End Sub
Private Sub ToolStripButtonAnnotation_Click(sender As Object, e As EventArgs) Handles ToolStripButtonAnnotation.Click
PdfViewer1.CloseDocument()
Close_PDF_Viewer(WMDocPathWindows)
'PdfViewer1.CloseDocument()
'Close_PDF_Viewer(WMDocPathWindows)
Application.DoEvents()
frmAnnotations.ShowDialog()
@@ -4355,4 +4080,8 @@ Public Class frmValidator
Private Sub frmValidator_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown
End Sub
Private Sub CheckBox1_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox1.CheckedChanged
End Sub
End Class