AppStd/RecordOrganizer
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

MS

Browse Source
This commit is contained in:
Digital Data - Marlon Schreiber 2017-12-13 10:28:24 +01:00
parent 290871b3dc
commit 673895755d
23 changed files with 744 additions and 1380 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

40
app/DD-Record-Organizer/ClassControlBuilder.vb
View File

@ -18,6 +18,7 @@ Public Class ClassControlBuilder
Public IsInsert As Boolean Public IsInsert As Boolean
Public IsEdit As Boolean Public IsEdit As Boolean
Public IsCancelCheck As Boolean = False
' +++ Constructor +++ ' +++ Constructor +++
Public Sub New(MasterPanel As Panel, Public Sub New(MasterPanel As Panel,
@ -738,6 +739,10 @@ Public Class ClassControlBuilder
Dim CONTROL_VALUE As String = ClassControlCommandsUI.GetControlValue(control) Dim CONTROL_VALUE As String = ClassControlCommandsUI.GetControlValue(control)
If CURRENT_CONTROL_VALUE_COUNT > 3 Then
End If
If CURRENT_RECORD_ID = 0 Then If CURRENT_RECORD_ID = 0 Then
Exit Sub Exit Sub
End If End If
@ -772,8 +777,9 @@ Public Class ClassControlBuilder
End If End If
End Try End Try
End Sub End Sub
Public Sub OnCheckedChanged(sender As Object, ByVal e As EventArgs) Public Sub OnCheckedChanged(sender As Object, ByVal e As DevExpress.Data.SelectionChangedEventArgs)
If CURRENT_RECORD_ENABLED = False Then Exit Sub If CURRENT_RECORD_ENABLED = False Then Exit Sub
If IsCancelCheck = True Then Exit Sub
Try Try
Dim GridView As DevExpress.XtraGrid.Views.Grid.GridView = sender Dim GridView As DevExpress.XtraGrid.Views.Grid.GridView = sender
@ -797,7 +803,37 @@ Public Class ClassControlBuilder
Exit Sub Exit Sub
End If End If
If CURRENT_CONTROL_VALUE_COUNT > 3 Then
Dim msgtitle = "Mehr als 3 Werte gewählt:"
If USER_LANGUAGE <> "de-DE" Then
msgtitle = "More than 3 values selected:"
End If
Dim msg = String.Format("Sind Sie sicher dass Sie '{0}' Werte hinterlegen wollen?", CURRENT_CONTROL_VALUE_COUNT)
If USER_LANGUAGE <> "de-DE" Then
msg = String.Format("Do You really want to add '{0}' values?", CURRENT_CONTROL_VALUE_COUNT)
End If
Dim result As MsgBoxResult
result = MessageBox.Show(msg, msgtitle, MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If result = MsgBoxResult.No Then
Dim type = control.GetType().Name
Select Case type
Case "GridControl"
Dim chk_grid As DevExpress.XtraGrid.GridControl
chk_grid = DirectCast(control, DevExpress.XtraGrid.GridControl)
Dim gridview1 As DevExpress.XtraGrid.Views.Grid.GridView = chk_grid.MainView
gridview1.ClearSelection()
IsCancelCheck = True
'For Each index As Integer In GridView.GetSelectedRows()
' gridview1.UnselectRow(index)
' 'Dim fieldName As String = GridView.Columns(0).FieldName
' 'Dim value As String = GridView.GetRowCellValue(index, fieldName)
' 'GridView.
'Next
End Select
IsCancelCheck = False
Exit Sub
End If
End If
' Da wir beim Klick auf Hinzfügen einen Record anlegen, ' Da wir beim Klick auf Hinzfügen einen Record anlegen,
' muss UpdateMultipleValues auch aufgerufen werden, wenn wir IsInsert = True ist ' muss UpdateMultipleValues auch aufgerufen werden, wenn wir IsInsert = True ist
'If CtrlCommandUI.IsInsert = False Then 'If CtrlCommandUI.IsInsert = False Then

20
app/DD-Record-Organizer/ClassControlCommandsUI.vb
View File

@ -507,7 +507,10 @@ Public Class ClassControlCommandsUI
UpsertImage(id, RecordID, ctrl.BackgroundImage) UpsertImage(id, RecordID, ctrl.BackgroundImage)
Continue For Continue For
End If End If
If TypeOf ctrl Is DevExpress.XtraEditors.DateEdit Then
Console.WriteLine("Updating DateEdit " + ctrl.Name)
End If
If TypeOf ctrl Is GroupBox Then If TypeOf ctrl Is GroupBox Then
Dim ctrls As Control.ControlCollection = DirectCast(ctrl, GroupBox).Controls Dim ctrls As Control.ControlCollection = DirectCast(ctrl, GroupBox).Controls
UpdateAllControls(FormID, RecordID, ctrls) UpdateAllControls(FormID, RecordID, ctrls)
@ -603,7 +606,7 @@ Public Class ClassControlCommandsUI
Dim oldValues = dt.AsEnumerable().Select(Of String)(Function(r) Dim oldValues = dt.AsEnumerable().Select(Of String)(Function(r)
Return r.Item("VALUE") Return r.Item("VALUE")
End Function).ToList() End Function).ToList()
If IsNothing(value) And dt.Rows.Count = 0 Then If (IsNothing(value) Or value = String.Empty) And dt.Rows.Count = 0 Then
Exit Sub Exit Sub
End If End If
Dim values As New List(Of String) Dim values As New List(Of String)
@ -615,6 +618,7 @@ Public Class ClassControlCommandsUI
End If End If
'Dim values As New List(Of String)(value.Split(";")) 'Dim values As New List(Of String)(value.Split(";"))
Dim AddValues = values.Except(oldValues).ToList() Dim AddValues = values.Except(oldValues).ToList()
Dim RemoveValues = oldValues.Except(values).ToList() Dim RemoveValues = oldValues.Except(values).ToList()
For Each _addValue As String In AddValues For Each _addValue As String In AddValues
If Not _addValue = "" Then If Not _addValue = "" Then
@ -658,7 +662,13 @@ Public Class ClassControlCommandsUI
If IsDBNull(Value) Or IsNothing(Value) Then If IsDBNull(Value) Or IsNothing(Value) Then
Return "" Return ""
Else Else
Return DirectCast(ctrl, DevExpress.XtraEditors.DateEdit).DateTime.ToString("yyyy-MM-dd") Dim datevalue = DirectCast(ctrl, DevExpress.XtraEditors.DateEdit).DateTime.ToString("yyyy-MM-dd")
If datevalue = "0001-01-01" Then
Return ""
Else
Return datevalue
End If
End If End If
Case "PictureBox" Case "PictureBox"
'Return "PictureBox" 'Es ist egal was für ein String hier zurückgegeben wird, hauptsache nicht Nothing 'Return "PictureBox" 'Es ist egal was für ein String hier zurückgegeben wird, hauptsache nicht Nothing
@ -778,7 +788,7 @@ Public Class ClassControlCommandsUI
Dim value As String = gridview.GetRowCellValue(index, fieldName) Dim value As String = gridview.GetRowCellValue(index, fieldName)
result.Add(value) result.Add(value)
Next Next
CURRENT_CONTROL_VALUE_COUNT = result.Count
result_string = String.Join(";", result) result_string = String.Join(";", result)
If Not IsNothing(result_string) Then If Not IsNothing(result_string) Then
@ -889,7 +899,9 @@ Public Class ClassControlCommandsUI
_result = 0 _result = 0
End If End If
Catch ex As Exception Catch ex As Exception
ClassHelper.MSGBOX_Handler("ERROR", "Error", "Error in CreateControlProcedure: ", ex.Message) Dim name = clsDatabase.Execute_Scalar("SELECT NAME FROM TBPMO_CONTROL WHERE GUID = " & ControlID, True)
MsgBox(ex.Message, MsgBoxStyle.Critical, "Error in CreateControlProcedure für Control: " & name)
ClassLogger.Add("Error in CreateControlProcedure: " & ex.Message, True)
Return 0 Return 0
End Try End Try
End Function End Function

20
app/DD-Record-Organizer/ClassDOC_SEARCH.vb
View File

@ -61,16 +61,16 @@ Public Class ClassDOC_SEARCH
Dim SQL_DOC_SEARCH Dim SQL_DOC_SEARCH
If CURRENT_SEARCH_TYPE = "ENTITY" Then If CURRENT_SEARCH_TYPE = "ENTITY" Then
SQL_DOC_SEARCH = String.Format("SELECT DISTINCT T.*," & vbNewLine & SQL_DOC_SEARCH = String.Format("SELECT DISTINCT T.*," & vbNewLine &
"[dbo].[FNPMO_GET_CONTROL_VALUES_DOC_ENTITY] ({3},T.DocID,{0}) AS OPTION1," & vbNewLine & "'NO OPTION IN ENTITY-SEARCH' AS OPTION1," & vbNewLine &
"[dbo].[FNPMO_GET_CONTROL_VALUES_DOC_ENTITY] ({4},T.DocID,{0}) AS OPTION2," & vbNewLine & "'NO OPTION IN ENTITY-SEARCH' AS OPTION2," & vbNewLine &
"[dbo].[FNPMO_DOC_GET_IDX] (T.DocID,{0},'DOCIDX1') AS DOCIDX1," & vbNewLine & "'NO INDEX IN ENTITY-SEARCH' AS DOCIDX1," & vbNewLine &
"[dbo].[FNPMO_DOC_GET_IDX] (T.DocID,{0},'DOCIDX2') AS DOCIDX2," & vbNewLine & "'NO INDEX IN ENTITY-SEARCH' AS DOCIDX2," & vbNewLine &
"[dbo].[FNPMO_DOC_GET_IDX] (T.DocID,{0},'DOCIDX3') AS DOCIDX3," & vbNewLine & "'NO INDEX IN ENTITY-SEARCH' AS DOCIDX3," & vbNewLine &
"[dbo].[FNPMO_DOC_GET_IDX] (T.DocID,{0},'DOCIDX4') AS DOCIDX4," & vbNewLine & "'NO INDEX IN ENTITY-SEARCH' AS DOCIDX4," & vbNewLine &
"[dbo].[FNPMO_DOC_GET_DROPDOWN_VALUE] (T.DocID,{0},'DROPDOWN1','{1}',0) AS DROPDOWN1," & vbNewLine & "'NO DROPDOWN IN ENTITY-SEARCH' AS DROPDOWN1," & vbNewLine &
"[dbo].[FNPMO_DOC_GET_DROPDOWN_VALUE] (T.DocID,{0},'DROPDOWN2','{1}',0) AS DROPDOWN2," & vbNewLine & "'NO DROPDOWN IN ENTITY-SEARCH' AS DROPDOWN2," & vbNewLine &
"[dbo].[FNPMO_DOC_GET_DROPDOWN_VALUE] (T.DocID,{0},'DROPDOWN3','{1}',0) AS DROPDOWN3," & vbNewLine & "'NO DROPDOWN IN ENTITY-SEARCH' AS DROPDOWN3," & vbNewLine &
"[dbo].[FNPMO_DOC_GET_DROPDOWN_VALUE] (T.DocID,{0},'DROPDOWN4','{1}',0) AS DROPDOWN4" & vbNewLine & "'NO DROPDOWN IN ENTITY-SEARCH' AS DROPDOWN4" & vbNewLine &
"FROM " & vbNewLine & "FROM " & vbNewLine &
"VWPMO_DOC_SEARCH T" & vbNewLine & "VWPMO_DOC_SEARCH T" & vbNewLine &
"WHERE T.DocID IN (select DISTINCT T.DOC_ID from TBPMO_DOC_RECORD_LINK T, TBPMO_RECORD T1 WHERE T.RECORD_ID = T1.GUID AND T1.FORM_ID = {0}) " & vbNewLine & "WHERE T.DocID IN (select DISTINCT T.DOC_ID from TBPMO_DOC_RECORD_LINK T, TBPMO_RECORD T1 WHERE T.RECORD_ID = T1.GUID AND T1.FORM_ID = {0}) " & vbNewLine &

8
app/DD-Record-Organizer/ClassRecordCommands.vb
View File

@ -23,14 +23,16 @@ Public Class ClassRecordCommands
Dim GUID As Integer = cmd.Parameters("@pRESULT").Value Dim GUID As Integer = cmd.Parameters("@pRESULT").Value
If GUID > 0 And clsDatabase.DB_PROXY_INITIALIZED = True Then If GUID > 0 And clsDatabase.DB_PROXY_INITIALIZED = True Then
If ClassProxy.PRPROXY_RECORD_UPD_INS(formId, GUID) = True Then If ClassProxy.PRPROXY_RECORD_UPD_INS(formId, GUID) = True Then
ClassProxy.PRPROXY_CONTROL_VALUE_RENEW(GUID) ClassProxy.PRPROXY_CONTROL_VALUE_RENEW(GUID)
End If End If
End If End If
Return GUID Return GUID
End Using End Using
Catch ex As Exception Catch ex As Exception
ClassHelper.MSGBOX_Handler("ERROR", "Error", "Error in CreateRecordProcedure: ", ex.Message) MsgBox(ex.Message, MsgBoxStyle.Critical, "Error in CreateRecordProcedure: ")
ClassLogger.Add("Error in CreateRecordProcedure: " & ex.Message, True)
ClassHelper.InsertEssential_Log(formId, "ENTITY-ID", "ENTITY-ID: " & formId & ": " & ex.Message)
Return 0 Return 0
End Try End Try
End Function End Function
@ -50,7 +52,7 @@ Public Class ClassRecordCommands
Return ClassDatabase.Execute_non_Query(SQL) Return ClassDatabase.Execute_non_Query(SQL)
End Function End Function
Public Shared Function CHECK_RECORD_FINAL(RecordId As Integer, IsInsert As Boolean) Public Shared Function CHECK_RECORD_FINAL(RecordId As Integer, IsInsert As Boolean)
Dim SQL = String.Format("EXEC PRPMO_RECORD_CHECK_INTEGRITY {0},{1},{2}", RecordId, Environment.UserName, IsInsert) Dim SQL = String.Format("EXEC PRPMO_RECORD_CHECK_INTEGRITY {0},'{1}',{2}", RecordId, Environment.UserName, IsInsert)
Return ClassDatabase.Execute_non_Query(SQL) Return ClassDatabase.Execute_non_Query(SQL)
End Function End Function

2
app/DD-Record-Organizer/ClassUpdate.vb
View File

@ -71,7 +71,7 @@ Public Class ClassUpdate
End If End If
Next Next
If RecExe_found = False Then If RecExe_found = False Then
MsgBox("Could not find the path for RecordOrganizer - Please check your installation!", MsgBoxStyle.Critical) ClassLogger.Add("Could not find the path for RecordOrganizer", True)
Return False Return False
End If End If
End If End If

6
app/DD-Record-Organizer/ClassUser.vb
View File

@ -3,11 +3,7 @@
Public Shared Sub LogoutUser() Public Shared Sub LogoutUser()
Try Try
Dim SQL Dim SQL
SQL = $"DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = {USER_GUID} AND MODULE = 'Record-Organizer'"
SQL = $"UPDATE TBDD_USER SET LOGGED_IN = {0}, LOGGED_WHERE = '' WHERE LOWER(USERNAME) = LOWER('{USER_USERNAME}')"
ClassDatabase.Execute_non_Query(sql)
sql = $"DELETE FROM TBDD_USER_MODULE_LOG_IN WHERE USER_ID = {USER_GUID} AND MODULE = 'Record-Organizer'"
ClassDatabase.Execute_non_Query(sql) ClassDatabase.Execute_non_Query(sql)
Catch ex As Exception Catch ex As Exception
ClassLogger.Add("Error while logging out user: " & ex.Message) ClassLogger.Add("Error while logging out user: " & ex.Message)

3
app/DD-Record-Organizer/ModuleRuntimeVariables.vb
View File

@ -166,4 +166,7 @@
Public MSG_LABLE2 As String Public MSG_LABLE2 As String
Public MSG_ERROR2 As String Public MSG_ERROR2 As String
Public INSERT_IN_ACTION As Boolean = False
Public CURRENT_CONTROL_VALUE_COUNT As Integer = 1
End Module End Module

2
app/DD-Record-Organizer/My Project/AssemblyInfo.vb
View File

@ -33,7 +33,7 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("2.4.9.5")> <Assembly: AssemblyVersion("2.4.9.6")>
<Assembly: AssemblyFileVersion("1.0.0.0")> <Assembly: AssemblyFileVersion("1.0.0.0")>
<Assembly: NeutralResourcesLanguageAttribute("")> <Assembly: NeutralResourcesLanguageAttribute("")>

12
app/DD-Record-Organizer/frmConstructorDesigner.Designer.vb generated
View File

@ -47,8 +47,8 @@ Partial Class frmConstructorDesigner
Dim Label19 As System.Windows.Forms.Label Dim Label19 As System.Windows.Forms.Label
Dim SQL_RIGHT_READ_AND_VIEW_ONLYLabel As System.Windows.Forms.Label Dim SQL_RIGHT_READ_AND_VIEW_ONLYLabel As System.Windows.Forms.Label
Dim SQL_RIGHT_WINDREAM_VIEWLabel As System.Windows.Forms.Label Dim SQL_RIGHT_WINDREAM_VIEWLabel As System.Windows.Forms.Label
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Me.DD_ECMAdmin = New DD_Record_Organizer.DD_ECMAdmin() Me.DD_ECMAdmin = New DD_Record_Organizer.DD_ECMAdmin()
Me.TBPMO_FORM_CONSTRUCTORBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPMO_FORM_CONSTRUCTORBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBPMO_FORM_CONSTRUCTORTableAdapter = New DD_Record_Organizer.DD_ECMAdminTableAdapters.TBPMO_FORM_CONSTRUCTORTableAdapter() Me.TBPMO_FORM_CONSTRUCTORTableAdapter = New DD_Record_Organizer.DD_ECMAdminTableAdapters.TBPMO_FORM_CONSTRUCTORTableAdapter()
@ -1250,8 +1250,8 @@ Partial Class frmConstructorDesigner
' '
Me.dgvResult.AllowUserToAddRows = False Me.dgvResult.AllowUserToAddRows = False
Me.dgvResult.AllowUserToDeleteRows = False Me.dgvResult.AllowUserToDeleteRows = False
DataGridViewCellStyle3.BackColor = System.Drawing.Color.Cyan DataGridViewCellStyle1.BackColor = System.Drawing.Color.Cyan
Me.dgvResult.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3 Me.dgvResult.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
resources.ApplyResources(Me.dgvResult, "dgvResult") resources.ApplyResources(Me.dgvResult, "dgvResult")
Me.dgvResult.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.dgvResult.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.dgvResult.Name = "dgvResult" Me.dgvResult.Name = "dgvResult"
@ -1261,8 +1261,8 @@ Partial Class frmConstructorDesigner
' '
Me.dgvPlaceholders.AllowUserToAddRows = False Me.dgvPlaceholders.AllowUserToAddRows = False
Me.dgvPlaceholders.AllowUserToDeleteRows = False Me.dgvPlaceholders.AllowUserToDeleteRows = False
DataGridViewCellStyle4.BackColor = System.Drawing.Color.Cyan DataGridViewCellStyle2.BackColor = System.Drawing.Color.Cyan
Me.dgvPlaceholders.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle4 Me.dgvPlaceholders.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle2
Me.dgvPlaceholders.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.dgvPlaceholders.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.dgvPlaceholders.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.colPlaceholder, Me.colReplace}) Me.dgvPlaceholders.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.colPlaceholder, Me.colReplace})
resources.ApplyResources(Me.dgvPlaceholders, "dgvPlaceholders") resources.ApplyResources(Me.dgvPlaceholders, "dgvPlaceholders")

1298
app/DD-Record-Organizer/frmConstructorDesigner.resx
View File

File diff suppressed because it is too large Load Diff

18
app/DD-Record-Organizer/frmConstructor_Main.Designer.vb generated
View File

@ -1,9 +1,9 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Class frmConstructor_Main Partial Class frmConstructor_Main
Inherits System.Windows.Forms.Form Inherits System.Windows.Forms.Form
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<System.Diagnostics.DebuggerNonUserCode()> _ <System.Diagnostics.DebuggerNonUserCode()>
Protected Overrides Sub Dispose(ByVal disposing As Boolean) Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try Try
If disposing AndAlso components IsNot Nothing Then If disposing AndAlso components IsNot Nothing Then
@ -20,7 +20,7 @@ Partial Class frmConstructor_Main
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich. 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
'Das Bearbeiten ist mit dem Windows Form-Designer möglich. 'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
'Das Bearbeiten mit dem Code-Editor ist nicht möglich. 'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()> _ <System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent() Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container() Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmConstructor_Main)) Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmConstructor_Main))
@ -110,7 +110,6 @@ Partial Class frmConstructor_Main
Me.tslblLocked = New System.Windows.Forms.ToolStripLabel() Me.tslblLocked = New System.Windows.Forms.ToolStripLabel()
Me.tslblFileslocked = New System.Windows.Forms.ToolStripLabel() Me.tslblFileslocked = New System.Windows.Forms.ToolStripLabel()
Me.TabPos = New DevExpress.XtraTab.XtraTabPage() Me.TabPos = New DevExpress.XtraTab.XtraTabPage()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.GridControlPos = New DevExpress.XtraGrid.GridControl() Me.GridControlPos = New DevExpress.XtraGrid.GridControl()
Me.grvwGridPos = New DevExpress.XtraGrid.Views.Grid.GridView() Me.grvwGridPos = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.BindingNavigatorPOS = New System.Windows.Forms.BindingNavigator(Me.components) Me.BindingNavigatorPOS = New System.Windows.Forms.BindingNavigator(Me.components)
@ -244,7 +243,6 @@ Partial Class frmConstructor_Main
Me.statStripDoc.SuspendLayout() Me.statStripDoc.SuspendLayout()
Me.ToolStripEdit.SuspendLayout() Me.ToolStripEdit.SuspendLayout()
Me.TabPos.SuspendLayout() Me.TabPos.SuspendLayout()
Me.Panel1.SuspendLayout()
CType(Me.GridControlPos, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.GridControlPos, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.grvwGridPos, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.grvwGridPos, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.BindingNavigatorPOS, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.BindingNavigatorPOS, System.ComponentModel.ISupportInitialize).BeginInit()
@ -813,19 +811,13 @@ Partial Class frmConstructor_Main
' '
'TabPos 'TabPos
' '
Me.TabPos.Controls.Add(Me.Panel1) Me.TabPos.Controls.Add(Me.GridControlPos)
Me.TabPos.Controls.Add(Me.BindingNavigatorPOS) Me.TabPos.Controls.Add(Me.BindingNavigatorPOS)
Me.TabPos.Image = CType(resources.GetObject("TabPos.Image"), System.Drawing.Image) Me.TabPos.Image = CType(resources.GetObject("TabPos.Image"), System.Drawing.Image)
Me.TabPos.Name = "TabPos" Me.TabPos.Name = "TabPos"
Me.TabPos.PageVisible = False Me.TabPos.PageVisible = False
resources.ApplyResources(Me.TabPos, "TabPos") resources.ApplyResources(Me.TabPos, "TabPos")
' '
'Panel1
'
Me.Panel1.Controls.Add(Me.GridControlPos)
resources.ApplyResources(Me.Panel1, "Panel1")
Me.Panel1.Name = "Panel1"
'
'GridControlPos 'GridControlPos
' '
resources.ApplyResources(Me.GridControlPos, "GridControlPos") resources.ApplyResources(Me.GridControlPos, "GridControlPos")
@ -1622,7 +1614,6 @@ Partial Class frmConstructor_Main
Me.ToolStripEdit.PerformLayout() Me.ToolStripEdit.PerformLayout()
Me.TabPos.ResumeLayout(False) Me.TabPos.ResumeLayout(False)
Me.TabPos.PerformLayout() Me.TabPos.PerformLayout()
Me.Panel1.ResumeLayout(False)
CType(Me.GridControlPos, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.GridControlPos, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.grvwGridPos, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.grvwGridPos, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.BindingNavigatorPOS, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.BindingNavigatorPOS, System.ComponentModel.ISupportInitialize).EndInit()
@ -1759,7 +1750,6 @@ Partial Class frmConstructor_Main
Friend WithEvents tsButtonCancel As System.Windows.Forms.ToolStripButton Friend WithEvents tsButtonCancel As System.Windows.Forms.ToolStripButton
Friend WithEvents tsbtnRedo As System.Windows.Forms.ToolStripButton Friend WithEvents tsbtnRedo As System.Windows.Forms.ToolStripButton
Friend WithEvents SucheAnzeigenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents SucheAnzeigenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents Panel1 As System.Windows.Forms.Panel
Friend WithEvents MassenänderungToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents MassenänderungToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents ToolStripSeparator10 As System.Windows.Forms.ToolStripSeparator Friend WithEvents ToolStripSeparator10 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents docCM_linkRecord As System.Windows.Forms.ToolStripMenuItem Friend WithEvents docCM_linkRecord As System.Windows.Forms.ToolStripMenuItem

34
app/DD-Record-Organizer/frmConstructor_Main.resx
View File

@ -1092,7 +1092,7 @@
<value>Fill</value> <value>Fill</value>
</data> </data>
<data name="GridControlPos.Location" type="System.Drawing.Point, System.Drawing"> <data name="GridControlPos.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 0</value> <value>0, 25</value>
</data> </data>
<data name="grvwGridPos.Appearance.EvenRow.BackColor" type="System.Drawing.Color, System.Drawing"> <data name="grvwGridPos.Appearance.EvenRow.BackColor" type="System.Drawing.Color, System.Drawing">
<value>Cyan</value> <value>Cyan</value>
@ -1113,33 +1113,9 @@
<value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;GridControlPos.Parent" xml:space="preserve"> <data name="&gt;&gt;GridControlPos.Parent" xml:space="preserve">
<value>Panel1</value>
</data>
<data name="&gt;&gt;GridControlPos.ZOrder" xml:space="preserve">
<value>0</value>
</data>
<data name="Panel1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
<value>Fill</value>
</data>
<data name="Panel1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 25</value>
</data>
<data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
<value>1270, 347</value>
</data>
<data name="Panel1.TabIndex" type="System.Int32, mscorlib">
<value>2</value>
</data>
<data name="&gt;&gt;Panel1.Name" xml:space="preserve">
<value>Panel1</value>
</data>
<data name="&gt;&gt;Panel1.Type" xml:space="preserve">
<value>System.Windows.Forms.Panel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="&gt;&gt;Panel1.Parent" xml:space="preserve">
<value>TabPos</value> <value>TabPos</value>
</data> </data>
<data name="&gt;&gt;Panel1.ZOrder" xml:space="preserve"> <data name="&gt;&gt;GridControlPos.ZOrder" xml:space="preserve">
<value>0</value> <value>0</value>
</data> </data>
<metadata name="BindingNavigatorPOS.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="BindingNavigatorPOS.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
@ -1341,10 +1317,10 @@
</value> </value>
</data> </data>
<data name="tslblPoslocked.Size" type="System.Drawing.Size, System.Drawing"> <data name="tslblPoslocked.Size" type="System.Drawing.Size, System.Drawing">
<value>109, 22</value> <value>132, 22</value>
</data> </data>
<data name="tslblPoslocked.Text" xml:space="preserve"> <data name="tslblPoslocked.Text" xml:space="preserve">
<value>Ansicht gesperrt</value> <value>Nur lesenden Zugriff</value>
</data> </data>
<data name="BindingNavigatorPOS.Location" type="System.Drawing.Point, System.Drawing"> <data name="BindingNavigatorPOS.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 0</value> <value>0, 0</value>
@ -2454,7 +2430,7 @@
<value>Ansicht zurücksetzen</value> <value>Ansicht zurücksetzen</value>
</data> </data>
<data name="ContextMenuStripResultFiles.Size" type="System.Drawing.Size, System.Drawing"> <data name="ContextMenuStripResultFiles.Size" type="System.Drawing.Size, System.Drawing">
<value>252, 392</value> <value>252, 370</value>
</data> </data>
<data name="&gt;&gt;ContextMenuStripResultFiles.Name" xml:space="preserve"> <data name="&gt;&gt;ContextMenuStripResultFiles.Name" xml:space="preserve">
<value>ContextMenuStripResultFiles</value> <value>ContextMenuStripResultFiles</value>

61
app/DD-Record-Organizer/frmConstructor_Main.vb
View File

@ -1080,7 +1080,7 @@ Public Class frmConstructor_Main
tslblLocked.Visible = False tslblLocked.Visible = False
tslblFileslocked.Visible = False tslblFileslocked.Visible = False
TabFollowUp.PageEnabled = True TabFollowUp.PageEnabled = True
TabPos.PageEnabled = True 'pnlPositions.Enabled = True
TabWindream.PageEnabled = True TabWindream.PageEnabled = True
tsbtnDoc_Refresh.Enabled = True tsbtnDoc_Refresh.Enabled = True
tsmientitySearch.Enabled = True tsmientitySearch.Enabled = True
@ -1092,7 +1092,7 @@ Public Class frmConstructor_Main
tsButtonEdit.Enabled = False tsButtonEdit.Enabled = False
tslblLocked.Visible = True tslblLocked.Visible = True
TabFollowUp.PageEnabled = False TabFollowUp.PageEnabled = False
TabPos.PageEnabled = False 'pnlPositions.Enabled = False
' tsButtonShowTaskOverview.Enabled = False ' tsButtonShowTaskOverview.Enabled = False
End If End If
If RIGHT_READ_ONLY_DOC = True Then If RIGHT_READ_ONLY_DOC = True Then
@ -1703,7 +1703,7 @@ Public Class frmConstructor_Main
' IsInsert muss true sein, damit wir wissen ob wir bei ' IsInsert muss true sein, damit wir wissen ob wir bei
' Abbruch den Record Wieder löschen können ' Abbruch den Record Wieder löschen können
CtrlCommandUI.IsInsert = True CtrlCommandUI.IsInsert = True
INSERT_IN_ACTION = True
' Alle Tabs außer Detailansicht deaktivierne ' Alle Tabs außer Detailansicht deaktivierne
' DeactivateTabs() ' DeactivateTabs()
@ -1933,6 +1933,7 @@ Public Class frmConstructor_Main
End If End If
CtrlCommandUI.IsInsert = False CtrlCommandUI.IsInsert = False
CtrlCommandUI.IsEdit = False CtrlCommandUI.IsEdit = False
INSERT_IN_ACTION = False
'Jetzt den Record nochmal laden 'Jetzt den Record nochmal laden
' Show_Selected_Record_Data(SELECTED_RECORD_ID) ' Show_Selected_Record_Data(SELECTED_RECORD_ID)
Update_Status_Label(True, "Record saved - " & Now, EditState.Update) Update_Status_Label(True, "Record saved - " & Now, EditState.Update)
@ -1978,6 +1979,7 @@ Public Class frmConstructor_Main
DisableEditMode() DisableEditMode()
CtrlCommandUI.IsInsert = False CtrlCommandUI.IsInsert = False
INSERT_IN_ACTION = False
EDIT_STATE = EditState.None EDIT_STATE = EditState.None
RECORD_CHANGED = False RECORD_CHANGED = False
SAVE_ROUTINE_ACTIVE = False SAVE_ROUTINE_ACTIVE = False
@ -2884,6 +2886,7 @@ Public Class frmConstructor_Main
End If End If
CtrlCommandUI.IsEdit = False CtrlCommandUI.IsEdit = False
CtrlCommandUI.IsInsert = False CtrlCommandUI.IsInsert = False
INSERT_IN_ACTION = False
RECORD_CHANGED = False RECORD_CHANGED = False
End If End If
End Sub End Sub
@ -4114,6 +4117,7 @@ Public Class frmConstructor_Main
tslblPoslocked.Visible = False tslblPoslocked.Visible = False
BindingNavigatorAddNewItem.Enabled = True BindingNavigatorAddNewItem.Enabled = True
BindingNavigatorDeleteItem.Enabled = True BindingNavigatorDeleteItem.Enabled = True
tsbtnWork.Enabled = True
grvwGridPos.OptionsBehavior.ReadOnly = False grvwGridPos.OptionsBehavior.ReadOnly = False
If USER_LANGUAGE = "de-DE" Then If USER_LANGUAGE = "de-DE" Then
stg = "Bearbeiten beenden" stg = "Bearbeiten beenden"
@ -4130,6 +4134,7 @@ Public Class frmConstructor_Main
tslblPoslocked.Visible = True tslblPoslocked.Visible = True
BindingNavigatorAddNewItem.Enabled = False BindingNavigatorAddNewItem.Enabled = False
BindingNavigatorDeleteItem.Enabled = False BindingNavigatorDeleteItem.Enabled = False
tsbtnWork.Enabled = False
grvwGridPos.OptionsBehavior.ReadOnly = True grvwGridPos.OptionsBehavior.ReadOnly = True
End If End If
Me.tsbtnWork.Text = stg Me.tsbtnWork.Text = stg
@ -5247,6 +5252,7 @@ Public Class frmConstructor_Main
tsButtonAdd.Enabled = True tsButtonAdd.Enabled = True
End If End If
CtrlCommandUI.IsInsert = False CtrlCommandUI.IsInsert = False
INSERT_IN_ACTION = False
RECORD_CHANGED = False RECORD_CHANGED = False
' Den derzeitigen Record Neuladen ' Den derzeitigen Record Neuladen
@ -5390,7 +5396,10 @@ Public Class frmConstructor_Main
Else ' Änderungen sollen nicht gespeichert werden Else ' Änderungen sollen nicht gespeichert werden
' Angelegten Record löschen ' Angelegten Record löschen
If CtrlCommandUI.IsInsert Then If CtrlCommandUI.IsInsert Then
ClassHelper.DeleteRecord(SELECTED_RECORD_ID, "TrySave - UserdecidedNotToSave - ENTITY-ID: " & CURRENT_ENTITY_ID) If ClassHelper.DeleteRecord(SELECTED_RECORD_ID, "TrySave - UserdecidedNotToSave - ENTITY-ID: " & CURRENT_ENTITY_ID) = True Then
CtrlCommandUI.IsInsert = False
INSERT_IN_ACTION = False
End If
End If End If
' Änderungen sollen nicht gespeichert werden ' Änderungen sollen nicht gespeichert werden
@ -5909,6 +5918,7 @@ Public Class frmConstructor_Main
Private Sub TreeViewMain_DragDrop(sender As Object, e As DragEventArgs) Handles TreeViewMain.DragDrop Private Sub TreeViewMain_DragDrop(sender As Object, e As DragEventArgs) Handles TreeViewMain.DragDrop
Try Try
If Not IsNothing(e.Data) Then If Not IsNothing(e.Data) Then
Me.Cursor = Cursors.WaitCursor Me.Cursor = Cursors.WaitCursor
Dim pt As Point Dim pt As Point
@ -5948,6 +5958,22 @@ Public Class frmConstructor_Main
Save_Grid_Layout() Save_Grid_Layout()
For Each _RECORD As String In e.Data.GetData(GetType(String())) For Each _RECORD As String In e.Data.GetData(GetType(String()))
'hh
ClassRightManagement.Check_Set_Rights(_RECORD, ENTITY_ID)
If RIGHT_EDIT_R = False Then
msg = String.Format("USER {0} WANTED TO CHANGE ENTITY OF RECORD {1} to {2} but was rejected due to rights", USER_USERNAME, _RECORD, ENTITY_STRING)
ClassHelper.InsertEssential_Log(_RECORD, "RECORD-ID", msg)
Continue For
End If
Dim sql1 = String.Format("SELECT [dbo].[FNPMO_CUST_ALLOW_ENTITY_RELINK] ({0},{1})", _RECORD, USER_GUID)
If ClassDatabase.Execute_Scalar(sql1, True) = 0 Then
msg = String.Format("Verschieben von Datensatz {0} nicht möglich. Kriterien nicht erfüllt!", _RECORD.ToString)
If USER_LANGUAGE <> "de-DE" Then
msg = String.Format("Changing of entity-link for record {0}not possible - Criteria is invalid!", _RECORD.ToString)
End If
MsgBox(msg, MsgBoxStyle.Information)
Continue For
End If
ClassLogger.Add(String.Format("Relinking entity of record '{0}' to entity '{1}'?", _RECORD, ENTITY_STRING.ToString), False) ClassLogger.Add(String.Format("Relinking entity of record '{0}' to entity '{1}'?", _RECORD, ENTITY_STRING.ToString), False)
Dim upd = String.Format("UPDATE TBPMO_RECORD SET FORM_ID = {0} where GUID = {1}", node_tag, _RECORD) Dim upd = String.Format("UPDATE TBPMO_RECORD SET FORM_ID = {0} where GUID = {1}", node_tag, _RECORD)
@ -5977,15 +6003,26 @@ Public Class frmConstructor_Main
ClassDatabase.Execute_non_Query(upd, True) ClassDatabase.Execute_non_Query(upd, True)
End If End If
Next Next
Dim execsql = String.Format("EXEC PRPMO_DELETE_RECORD_PMO_TABLE {0},{1}", ENTITY_ID, _RECORD)
If ClassDatabase.Execute_non_Query(execsql) = True Then
If DD_LIB_Standards.clsDatabase.DB_PROXY_INITIALIZED = True Then
ClassDatabase.Execute_non_Query(execsql, True)
End If
End If
execsql = String.Format("EXEC PRPMO_ENTITY_TABLE_RENEW_RECORD {0},{1}", node_tag, _RECORD)
If ClassDatabase.Execute_non_Query(execsql) = True Then
ClassDatabase.Execute_non_Query(execsql, True)
End If
End If End If
Next Next
msg = String.Format("Der Datensatz wurde erfolgreich auf die Entität {0} verlinked!", ENTITY_STRING.ToString) msg = String.Format("Datensatz/-sätze erfolgreich auf die Entität {0} verlinked (wenn Kriterien erfüllt)!", ENTITY_STRING.ToString)
If USER_LANGUAGE <> "de-DE" Then If USER_LANGUAGE <> "de-DE" Then
msg = String.Format("The record was successfully relinked with entity {0}", ENTITY_STRING.ToString) msg = String.Format("The record/s was/were successfully relinked with entity {0} (if criteria matched)", ENTITY_STRING.ToString)
End If End If
MsgBox(msg, MsgBoxStyle.Information) MsgBox(msg, MsgBoxStyle.Information)
If DD_LIB_Standards.clsDatabase.DB_PROXY_INITIALIZED = True Then If DD_LIB_Standards.clsDatabase.DB_PROXY_INITIALIZED = True Then
msg = "Sie benutzen einen Proxyserver. Die Daten des neu verlinkten Datensatzes werden Sie erst nach vollständiger Proxysynchronisation einsehen können!" msg = "Sie benutzen einen Proxyserver. Die Daten des neu verlinkten Datensatzes werden Sie evtl. erst nach vollständiger Proxysynchronisation einsehen können!"
If USER_LANGUAGE <> "de-DE" Then If USER_LANGUAGE <> "de-DE" Then
msg = String.Format("You are using a proxy-Server. The new linked record in entity '{0}' will only be displayed after a full synchronisation!", ENTITY_STRING) msg = String.Format("You are using a proxy-Server. The new linked record in entity '{0}' will only be displayed after a full synchronisation!", ENTITY_STRING)
End If End If
@ -6796,5 +6833,13 @@ Public Class frmConstructor_Main
End Sub End Sub
Private Sub tslblPoslocked_VisibleChanged(sender As Object, e As EventArgs) Handles tslblPoslocked.VisibleChanged
If tslblPoslocked.Visible = True Then
Dim msg = "Nur lesenden Zugriff"
If USER_LANGUAGE <> "de-DE" Then
msg = "Positions are read only"
End If
tslblPoslocked.Text = msg
End If
End Sub
End Class End Class

10
app/DD-Record-Organizer/frmEntities.vb
View File

@ -309,6 +309,16 @@ Public Class frmEntities
End Sub End Sub
Private Sub btninsert_Click(sender As Object, e As EventArgs) Handles btninsert.Click Private Sub btninsert_Click(sender As Object, e As EventArgs) Handles btninsert.Click
Dim anz_ent = ClassDatabase.Execute_Scalar("SELECT Count(GUID) FROM TBPMO_FORM where PARENT_ID = 0 and FORM_TYPE_ID = 1")
anz_ent += 1
If anz_ent > LICENSE_DOSSIER_COUNT Then
Dim msg = String.Format("Die Anzahl an lizensierten Sichten/Akten {0} ist erreicht! Bitte kontaktieren Sie Digital Data!", LICENSE_DOSSIER_COUNT.ToString)
If USER_LANGUAGE <> "de-DE" Then
msg = String.Format("The number of licensed views {0} was reached! Please contact Digital Data", LICENSE_DOSSIER_COUNT.ToString)
End If
MsgBox(msg, MsgBoxStyle.Exclamation)
Exit Sub
End If
TBPMO_FORMBindingSource.AddNew() TBPMO_FORMBindingSource.AddNew()
End Sub End Sub

11
app/DD-Record-Organizer/frmMain.vb
View File

@ -182,6 +182,17 @@ Public Class frmMain
If ERROR_INIT = "INVALID USER" Then If ERROR_INIT = "INVALID USER" Then
Exit Sub Exit Sub
End If End If
If frmConstructor_Main.IsHandleCreated Then
If INSERT_IN_ACTION = True Then
Dim msg = "Bitte schliessen Sie zuerst das Hinzufügen des Datensatzes ab!"
If USER_LANGUAGE <> "de-DE" Then
msg = "Please finish Your Adding-Procedure first!"
End If
MsgBox(msg, MsgBoxStyle.Information)
e.Cancel = True
End If
End If
Try Try
ClassUser.LogoutUser() ClassUser.LogoutUser()
ClassWindowLocation.SaveFormLocationSize(Me, 1, CURRENT_SCREEN_ID, "frmMain") ClassWindowLocation.SaveFormLocationSize(Me, 1, CURRENT_SCREEN_ID, "frmMain")

5
app/DD-Record-Organizer/frmMass_Change.vb
View File

@ -35,10 +35,11 @@ Public Class frmMass_Change
If USER_LANGUAGE <> "de-DE" Then If USER_LANGUAGE <> "de-DE" Then
msg = "Are You sure You want to execute this mass change?" & vbNewLine & MASS_RECORD_IDs2CHANGE.Count.ToString & " records will be changed!" msg = "Are You sure You want to execute this mass change?" & vbNewLine & MASS_RECORD_IDs2CHANGE.Count.ToString & " records will be changed!"
End If End If
Cursor = Cursors.WaitCursor
Dim result As MsgBoxResult Dim result As MsgBoxResult
result = MessageBox.Show(msg, "Confirmation:", MessageBoxButtons.YesNo, MessageBoxIcon.Question) result = MessageBox.Show(msg, "Confirmation:", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If result = MsgBoxResult.Yes Then If result = MsgBoxResult.Yes Then
Cursor = Cursors.WaitCursor
ClassLogger.Add(String.Format("### Starting MassChange of column '{0}' with value '{1}'....###", cmbColumn.Text, txtNewValue.Text), False) ClassLogger.Add(String.Format("### Starting MassChange of column '{0}' with value '{1}'....###", cmbColumn.Text, txtNewValue.Text), False)
Me.Cursor = Cursors.WaitCursor Me.Cursor = Cursors.WaitCursor
SQL = String.Format("SELECT GUID FROM TBPMO_CONTROL WHERE COL_NAME = '{0}' AND FORM_ID = {1}", cmbColumn.Text, CURRENT_ENTITY_ID) SQL = String.Format("SELECT GUID FROM TBPMO_CONTROL WHERE COL_NAME = '{0}' AND FORM_ID = {1}", cmbColumn.Text, CURRENT_ENTITY_ID)
@ -137,7 +138,7 @@ Public Class frmMass_Change
_Error = True _Error = True
End If End If
Else Else
ClassLogger.Add("No defined column found! (2)") ClassLogger.Add("No defined column found! (2) - SQL: " & SQL)
_Error = True _Error = True
End If End If

38
app/DD-Record-Organizer/frmRecordView.resx
View File

@ -493,7 +493,7 @@
<value>0, 0</value> <value>0, 0</value>
</data> </data>
<data name="pnlDetails.Size" type="System.Drawing.Size, System.Drawing"> <data name="pnlDetails.Size" type="System.Drawing.Size, System.Drawing">
<value>1336, 304</value> <value>1332, 301</value>
</data> </data>
<data name="pnlDetails.TabIndex" type="System.Int32, mscorlib"> <data name="pnlDetails.TabIndex" type="System.Int32, mscorlib">
<value>0</value> <value>0</value>
@ -511,7 +511,7 @@
<value>0</value> <value>0</value>
</data> </data>
<data name="TabDetails.Size" type="System.Drawing.Size, System.Drawing"> <data name="TabDetails.Size" type="System.Drawing.Size, System.Drawing">
<value>1336, 304</value> <value>1332, 301</value>
</data> </data>
<data name="TabDetails.Text" xml:space="preserve"> <data name="TabDetails.Text" xml:space="preserve">
<value>Detailansicht</value> <value>Detailansicht</value>
@ -553,7 +553,7 @@
<value>14, 35</value> <value>14, 35</value>
</data> </data>
<data name="ListViewFollowUps.Size" type="System.Drawing.Size, System.Drawing"> <data name="ListViewFollowUps.Size" type="System.Drawing.Size, System.Drawing">
<value>263, 129</value> <value>263, 126</value>
</data> </data>
<data name="ListViewFollowUps.TabIndex" type="System.Int32, mscorlib"> <data name="ListViewFollowUps.TabIndex" type="System.Int32, mscorlib">
<value>8</value> <value>8</value>
@ -783,7 +783,7 @@
<value>177, 20</value> <value>177, 20</value>
</data> </data>
<data name="GroupBox4.Size" type="System.Drawing.Size, System.Drawing"> <data name="GroupBox4.Size" type="System.Drawing.Size, System.Drawing">
<value>594, 111</value> <value>594, 108</value>
</data> </data>
<data name="GroupBox4.TabIndex" type="System.Int32, mscorlib"> <data name="GroupBox4.TabIndex" type="System.Int32, mscorlib">
<value>4</value> <value>4</value>
@ -924,7 +924,7 @@
<value>283, 27</value> <value>283, 27</value>
</data> </data>
<data name="grpbxFU_Profile.Size" type="System.Drawing.Size, System.Drawing"> <data name="grpbxFU_Profile.Size" type="System.Drawing.Size, System.Drawing">
<value>774, 137</value> <value>774, 134</value>
</data> </data>
<data name="grpbxFU_Profile.TabIndex" type="System.Int32, mscorlib"> <data name="grpbxFU_Profile.TabIndex" type="System.Int32, mscorlib">
<value>7</value> <value>7</value>
@ -972,7 +972,7 @@
<value>2</value> <value>2</value>
</data> </data>
<data name="TabFollowUp.Size" type="System.Drawing.Size, System.Drawing"> <data name="TabFollowUp.Size" type="System.Drawing.Size, System.Drawing">
<value>1336, 304</value> <value>1332, 301</value>
</data> </data>
<data name="TabFollowUp.Text" xml:space="preserve"> <data name="TabFollowUp.Text" xml:space="preserve">
<value>Wiedervorlage</value> <value>Wiedervorlage</value>
@ -999,7 +999,7 @@
<value>Cyan</value> <value>Cyan</value>
</data> </data>
<data name="GridControlPos.Size" type="System.Drawing.Size, System.Drawing"> <data name="GridControlPos.Size" type="System.Drawing.Size, System.Drawing">
<value>1336, 279</value> <value>1332, 276</value>
</data> </data>
<data name="GridControlPos.TabIndex" type="System.Int32, mscorlib"> <data name="GridControlPos.TabIndex" type="System.Int32, mscorlib">
<value>0</value> <value>0</value>
@ -1023,7 +1023,7 @@
<value>0, 25</value> <value>0, 25</value>
</data> </data>
<data name="Panel1.Size" type="System.Drawing.Size, System.Drawing"> <data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
<value>1336, 279</value> <value>1332, 276</value>
</data> </data>
<data name="Panel1.TabIndex" type="System.Int32, mscorlib"> <data name="Panel1.TabIndex" type="System.Int32, mscorlib">
<value>2</value> <value>2</value>
@ -1198,7 +1198,7 @@
<value>0, 0</value> <value>0, 0</value>
</data> </data>
<data name="BindingNavigatorPOS.Size" type="System.Drawing.Size, System.Drawing"> <data name="BindingNavigatorPOS.Size" type="System.Drawing.Size, System.Drawing">
<value>1336, 25</value> <value>1332, 25</value>
</data> </data>
<data name="BindingNavigatorPOS.TabIndex" type="System.Int32, mscorlib"> <data name="BindingNavigatorPOS.TabIndex" type="System.Int32, mscorlib">
<value>1</value> <value>1</value>
@ -1227,7 +1227,7 @@
</value> </value>
</data> </data>
<data name="TabPos.Size" type="System.Drawing.Size, System.Drawing"> <data name="TabPos.Size" type="System.Drawing.Size, System.Drawing">
<value>1336, 304</value> <value>1332, 301</value>
</data> </data>
<data name="TabPos.Text" xml:space="preserve"> <data name="TabPos.Text" xml:space="preserve">
<value>Positionen</value> <value>Positionen</value>
@ -1314,7 +1314,7 @@
<value>0, 25</value> <value>0, 25</value>
</data> </data>
<data name="GridControlDocSearch.Size" type="System.Drawing.Size, System.Drawing"> <data name="GridControlDocSearch.Size" type="System.Drawing.Size, System.Drawing">
<value>1336, 305</value> <value>1332, 302</value>
</data> </data>
<data name="GridControlDocSearch.TabIndex" type="System.Int32, mscorlib"> <data name="GridControlDocSearch.TabIndex" type="System.Int32, mscorlib">
<value>8</value> <value>8</value>
@ -1347,7 +1347,7 @@
<value>0, 0</value> <value>0, 0</value>
</data> </data>
<data name="ToolStrip2.Size" type="System.Drawing.Size, System.Drawing"> <data name="ToolStrip2.Size" type="System.Drawing.Size, System.Drawing">
<value>1336, 25</value> <value>1332, 25</value>
</data> </data>
<data name="ToolStrip2.TabIndex" type="System.Int32, mscorlib"> <data name="ToolStrip2.TabIndex" type="System.Int32, mscorlib">
<value>2</value> <value>2</value>
@ -1368,7 +1368,7 @@
<value>1</value> <value>1</value>
</data> </data>
<data name="TabPageDoc.Size" type="System.Drawing.Size, System.Drawing"> <data name="TabPageDoc.Size" type="System.Drawing.Size, System.Drawing">
<value>1336, 330</value> <value>1332, 327</value>
</data> </data>
<data name="TabPageDoc.Text" xml:space="preserve"> <data name="TabPageDoc.Text" xml:space="preserve">
<value>Dateien</value> <value>Dateien</value>
@ -1476,7 +1476,7 @@
<value>102</value> <value>102</value>
</data> </data>
<data name="GridControlUsersSelection.Size" type="System.Drawing.Size, System.Drawing"> <data name="GridControlUsersSelection.Size" type="System.Drawing.Size, System.Drawing">
<value>284, 226</value> <value>284, 223</value>
</data> </data>
<data name="GridControlUsersSelection.TabIndex" type="System.Int32, mscorlib"> <data name="GridControlUsersSelection.TabIndex" type="System.Int32, mscorlib">
<value>88</value> <value>88</value>
@ -1512,7 +1512,7 @@
<value>16, 24</value> <value>16, 24</value>
</data> </data>
<data name="ListViewExclusiveUser.Size" type="System.Drawing.Size, System.Drawing"> <data name="ListViewExclusiveUser.Size" type="System.Drawing.Size, System.Drawing">
<value>174, 226</value> <value>174, 223</value>
</data> </data>
<data name="ListViewExclusiveUser.TabIndex" type="System.Int32, mscorlib"> <data name="ListViewExclusiveUser.TabIndex" type="System.Int32, mscorlib">
<value>27</value> <value>27</value>
@ -1663,7 +1663,7 @@ zuordnen</value>
<value>5</value> <value>5</value>
</data> </data>
<data name="XtraTabPage3.Size" type="System.Drawing.Size, System.Drawing"> <data name="XtraTabPage3.Size" type="System.Drawing.Size, System.Drawing">
<value>624, 270</value> <value>620, 267</value>
</data> </data>
<data name="XtraTabPage3.Text" xml:space="preserve"> <data name="XtraTabPage3.Text" xml:space="preserve">
<value>User zuordnen</value> <value>User zuordnen</value>
@ -1759,7 +1759,7 @@ zuordnen</value>
<value>4</value> <value>4</value>
</data> </data>
<data name="GridControl1.Size" type="System.Drawing.Size, System.Drawing"> <data name="GridControl1.Size" type="System.Drawing.Size, System.Drawing">
<value>595, 261</value> <value>595, 258</value>
</data> </data>
<data name="GridControl1.TabIndex" type="System.Int32, mscorlib"> <data name="GridControl1.TabIndex" type="System.Int32, mscorlib">
<value>89</value> <value>89</value>
@ -1777,7 +1777,7 @@ zuordnen</value>
<value>0</value> <value>0</value>
</data> </data>
<data name="XtraTabPage4.Size" type="System.Drawing.Size, System.Drawing"> <data name="XtraTabPage4.Size" type="System.Drawing.Size, System.Drawing">
<value>624, 270</value> <value>620, 267</value>
</data> </data>
<data name="XtraTabPage4.Text" xml:space="preserve"> <data name="XtraTabPage4.Text" xml:space="preserve">
<value>Workflow - History</value> <value>Workflow - History</value>
@ -2122,7 +2122,7 @@ zuordnen</value>
<value>23</value> <value>23</value>
</data> </data>
<data name="XtraTabPage1.Size" type="System.Drawing.Size, System.Drawing"> <data name="XtraTabPage1.Size" type="System.Drawing.Size, System.Drawing">
<value>1336, 330</value> <value>1332, 327</value>
</data> </data>
<data name="XtraTabPage1.Text" xml:space="preserve"> <data name="XtraTabPage1.Text" xml:space="preserve">
<value>Workflows/Tasks</value> <value>Workflows/Tasks</value>

408
app/DD-Record-Organizer/frmSAP_FuBa.Designer.vb generated
View File

@ -51,13 +51,13 @@ Partial Class frmSAP_FuBa
Dim Label13 As System.Windows.Forms.Label Dim Label13 As System.Windows.Forms.Label
Dim Label14 As System.Windows.Forms.Label Dim Label14 As System.Windows.Forms.Label
Dim Label15 As System.Windows.Forms.Label Dim Label15 As System.Windows.Forms.Label
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSAP_FuBa))
Dim Label16 As System.Windows.Forms.Label Dim Label16 As System.Windows.Forms.Label
Dim Label17 As System.Windows.Forms.Label Dim Label17 As System.Windows.Forms.Label
Dim Label18 As System.Windows.Forms.Label Dim Label18 As System.Windows.Forms.Label
Dim Label19 As System.Windows.Forms.Label Dim Label19 As System.Windows.Forms.Label
Dim Label20 As System.Windows.Forms.Label Dim Label20 As System.Windows.Forms.Label
Dim Label21 As System.Windows.Forms.Label Dim Label21 As System.Windows.Forms.Label
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSAP_FuBa))
Me.DD_ECMAdmin = New DD_Record_Organizer.DD_ECMAdmin() Me.DD_ECMAdmin = New DD_Record_Organizer.DD_ECMAdmin()
Me.TBPMO_SAP_FUBABindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPMO_SAP_FUBABindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBPMO_SAP_FUBATableAdapter = New DD_Record_Organizer.DD_ECMAdminTableAdapters.TBPMO_SAP_FUBATableAdapter() Me.TBPMO_SAP_FUBATableAdapter = New DD_Record_Organizer.DD_ECMAdminTableAdapters.TBPMO_SAP_FUBATableAdapter()
@ -115,6 +115,15 @@ Partial Class frmSAP_FuBa
Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl() Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl()
Me.XtraTabPage1 = New DevExpress.XtraTab.XtraTabPage() Me.XtraTabPage1 = New DevExpress.XtraTab.XtraTabPage()
Me.XtraTabPage2 = New DevExpress.XtraTab.XtraTabPage() Me.XtraTabPage2 = New DevExpress.XtraTab.XtraTabPage()
Me.txtBARCODESendlist = New System.Windows.Forms.TextBox()
Me.lblResultBAPI = New System.Windows.Forms.Label()
Me.lblresultFunction = New System.Windows.Forms.Label()
Me.txtDOC_IDSendList = New System.Windows.Forms.TextBox()
Me.txtDoctypeSendList = New System.Windows.Forms.TextBox()
Me.txtCONTREPSendList = New System.Windows.Forms.TextBox()
Me.txtARDATESendList = New System.Windows.Forms.TextBox()
Me.txtTableSendList = New System.Windows.Forms.TextBox()
Me.Button2 = New System.Windows.Forms.Button()
Me.testSAP_OBJECT = New System.Windows.Forms.TextBox() Me.testSAP_OBJECT = New System.Windows.Forms.TextBox()
Me.testDOCTYPE = New System.Windows.Forms.TextBox() Me.testDOCTYPE = New System.Windows.Forms.TextBox()
Me.testOBJECT_ID = New System.Windows.Forms.TextBox() Me.testOBJECT_ID = New System.Windows.Forms.TextBox()
@ -131,15 +140,6 @@ Partial Class frmSAP_FuBa
Me.Button1 = New System.Windows.Forms.Button() Me.Button1 = New System.Windows.Forms.Button()
Me.testClient = New System.Windows.Forms.TextBox() Me.testClient = New System.Windows.Forms.TextBox()
Me.testLanguage = New System.Windows.Forms.TextBox() Me.testLanguage = New System.Windows.Forms.TextBox()
Me.Button2 = New System.Windows.Forms.Button()
Me.txtDOC_IDSendList = New System.Windows.Forms.TextBox()
Me.txtDoctypeSendList = New System.Windows.Forms.TextBox()
Me.txtCONTREPSendList = New System.Windows.Forms.TextBox()
Me.txtARDATESendList = New System.Windows.Forms.TextBox()
Me.txtTableSendList = New System.Windows.Forms.TextBox()
Me.lblresultFunction = New System.Windows.Forms.Label()
Me.lblResultBAPI = New System.Windows.Forms.Label()
Me.txtBARCODESendlist = New System.Windows.Forms.TextBox()
GUIDLabel = New System.Windows.Forms.Label() GUIDLabel = New System.Windows.Forms.Label()
NAMELabel = New System.Windows.Forms.Label() NAMELabel = New System.Windows.Forms.Label()
COMMENTLabel = New System.Windows.Forms.Label() COMMENTLabel = New System.Windows.Forms.Label()
@ -189,7 +189,7 @@ Partial Class frmSAP_FuBa
'GUIDLabel 'GUIDLabel
' '
GUIDLabel.AutoSize = True GUIDLabel.AutoSize = True
GUIDLabel.Location = New System.Drawing.Point(137, 28) GUIDLabel.Location = New System.Drawing.Point(257, 28)
GUIDLabel.Name = "GUIDLabel" GUIDLabel.Name = "GUIDLabel"
GUIDLabel.Size = New System.Drawing.Size(36, 13) GUIDLabel.Size = New System.Drawing.Size(36, 13)
GUIDLabel.TabIndex = 1 GUIDLabel.TabIndex = 1
@ -198,7 +198,7 @@ Partial Class frmSAP_FuBa
'NAMELabel 'NAMELabel
' '
NAMELabel.AutoSize = True NAMELabel.AutoSize = True
NAMELabel.Location = New System.Drawing.Point(190, 28) NAMELabel.Location = New System.Drawing.Point(310, 28)
NAMELabel.Name = "NAMELabel" NAMELabel.Name = "NAMELabel"
NAMELabel.Size = New System.Drawing.Size(69, 13) NAMELabel.Size = New System.Drawing.Size(69, 13)
NAMELabel.TabIndex = 3 NAMELabel.TabIndex = 3
@ -207,7 +207,7 @@ Partial Class frmSAP_FuBa
'COMMENTLabel 'COMMENTLabel
' '
COMMENTLabel.AutoSize = True COMMENTLabel.AutoSize = True
COMMENTLabel.Location = New System.Drawing.Point(381, 28) COMMENTLabel.Location = New System.Drawing.Point(501, 28)
COMMENTLabel.Name = "COMMENTLabel" COMMENTLabel.Name = "COMMENTLabel"
COMMENTLabel.Size = New System.Drawing.Size(65, 13) COMMENTLabel.Size = New System.Drawing.Size(65, 13)
COMMENTLabel.TabIndex = 5 COMMENTLabel.TabIndex = 5
@ -216,7 +216,7 @@ Partial Class frmSAP_FuBa
'HostLabel 'HostLabel
' '
HostLabel.AutoSize = True HostLabel.AutoSize = True
HostLabel.Location = New System.Drawing.Point(190, 69) HostLabel.Location = New System.Drawing.Point(310, 69)
HostLabel.Name = "HostLabel" HostLabel.Name = "HostLabel"
HostLabel.Size = New System.Drawing.Size(272, 13) HostLabel.Size = New System.Drawing.Size(272, 13)
HostLabel.TabIndex = 9 HostLabel.TabIndex = 9
@ -225,7 +225,7 @@ Partial Class frmSAP_FuBa
'SystemNumberLabel 'SystemNumberLabel
' '
SystemNumberLabel.AutoSize = True SystemNumberLabel.AutoSize = True
SystemNumberLabel.Location = New System.Drawing.Point(490, 69) SystemNumberLabel.Location = New System.Drawing.Point(610, 69)
SystemNumberLabel.Name = "SystemNumberLabel" SystemNumberLabel.Name = "SystemNumberLabel"
SystemNumberLabel.Size = New System.Drawing.Size(147, 13) SystemNumberLabel.Size = New System.Drawing.Size(147, 13)
SystemNumberLabel.TabIndex = 11 SystemNumberLabel.TabIndex = 11
@ -234,7 +234,7 @@ Partial Class frmSAP_FuBa
'UserNameLabel 'UserNameLabel
' '
UserNameLabel.AutoSize = True UserNameLabel.AutoSize = True
UserNameLabel.Location = New System.Drawing.Point(190, 110) UserNameLabel.Location = New System.Drawing.Point(310, 110)
UserNameLabel.Name = "UserNameLabel" UserNameLabel.Name = "UserNameLabel"
UserNameLabel.Size = New System.Drawing.Size(63, 13) UserNameLabel.Size = New System.Drawing.Size(63, 13)
UserNameLabel.TabIndex = 13 UserNameLabel.TabIndex = 13
@ -243,7 +243,7 @@ Partial Class frmSAP_FuBa
'PasswordLabel 'PasswordLabel
' '
PasswordLabel.AutoSize = True PasswordLabel.AutoSize = True
PasswordLabel.Location = New System.Drawing.Point(381, 110) PasswordLabel.Location = New System.Drawing.Point(501, 110)
PasswordLabel.Name = "PasswordLabel" PasswordLabel.Name = "PasswordLabel"
PasswordLabel.Size = New System.Drawing.Size(57, 13) PasswordLabel.Size = New System.Drawing.Size(57, 13)
PasswordLabel.TabIndex = 15 PasswordLabel.TabIndex = 15
@ -252,7 +252,7 @@ Partial Class frmSAP_FuBa
'ClientLabel 'ClientLabel
' '
ClientLabel.AutoSize = True ClientLabel.AutoSize = True
ClientLabel.Location = New System.Drawing.Point(490, 110) ClientLabel.Location = New System.Drawing.Point(610, 110)
ClientLabel.Name = "ClientLabel" ClientLabel.Name = "ClientLabel"
ClientLabel.Size = New System.Drawing.Size(105, 13) ClientLabel.Size = New System.Drawing.Size(105, 13)
ClientLabel.TabIndex = 17 ClientLabel.TabIndex = 17
@ -261,7 +261,7 @@ Partial Class frmSAP_FuBa
'LanguageLabel 'LanguageLabel
' '
LanguageLabel.AutoSize = True LanguageLabel.AutoSize = True
LanguageLabel.Location = New System.Drawing.Point(675, 110) LanguageLabel.Location = New System.Drawing.Point(795, 110)
LanguageLabel.Name = "LanguageLabel" LanguageLabel.Name = "LanguageLabel"
LanguageLabel.Size = New System.Drawing.Size(58, 13) LanguageLabel.Size = New System.Drawing.Size(58, 13)
LanguageLabel.TabIndex = 19 LanguageLabel.TabIndex = 19
@ -270,7 +270,7 @@ Partial Class frmSAP_FuBa
'TempTableNameLabel 'TempTableNameLabel
' '
TempTableNameLabel.AutoSize = True TempTableNameLabel.AutoSize = True
TempTableNameLabel.Location = New System.Drawing.Point(258, 149) TempTableNameLabel.Location = New System.Drawing.Point(378, 149)
TempTableNameLabel.Name = "TempTableNameLabel" TempTableNameLabel.Name = "TempTableNameLabel"
TempTableNameLabel.Size = New System.Drawing.Size(98, 13) TempTableNameLabel.Size = New System.Drawing.Size(98, 13)
TempTableNameLabel.TabIndex = 21 TempTableNameLabel.TabIndex = 21
@ -279,7 +279,7 @@ Partial Class frmSAP_FuBa
'ADDED_WHOLabel 'ADDED_WHOLabel
' '
ADDED_WHOLabel.AutoSize = True ADDED_WHOLabel.AutoSize = True
ADDED_WHOLabel.Location = New System.Drawing.Point(190, 280) ADDED_WHOLabel.Location = New System.Drawing.Point(310, 280)
ADDED_WHOLabel.Name = "ADDED_WHOLabel" ADDED_WHOLabel.Name = "ADDED_WHOLabel"
ADDED_WHOLabel.Size = New System.Drawing.Size(65, 13) ADDED_WHOLabel.Size = New System.Drawing.Size(65, 13)
ADDED_WHOLabel.TabIndex = 25 ADDED_WHOLabel.TabIndex = 25
@ -288,7 +288,7 @@ Partial Class frmSAP_FuBa
'ADDED_WHENLabel 'ADDED_WHENLabel
' '
ADDED_WHENLabel.AutoSize = True ADDED_WHENLabel.AutoSize = True
ADDED_WHENLabel.Location = New System.Drawing.Point(332, 280) ADDED_WHENLabel.Location = New System.Drawing.Point(452, 280)
ADDED_WHENLabel.Name = "ADDED_WHENLabel" ADDED_WHENLabel.Name = "ADDED_WHENLabel"
ADDED_WHENLabel.Size = New System.Drawing.Size(73, 13) ADDED_WHENLabel.Size = New System.Drawing.Size(73, 13)
ADDED_WHENLabel.TabIndex = 27 ADDED_WHENLabel.TabIndex = 27
@ -297,7 +297,7 @@ Partial Class frmSAP_FuBa
'CHANGED_WHOLabel 'CHANGED_WHOLabel
' '
CHANGED_WHOLabel.AutoSize = True CHANGED_WHOLabel.AutoSize = True
CHANGED_WHOLabel.Location = New System.Drawing.Point(466, 279) CHANGED_WHOLabel.Location = New System.Drawing.Point(586, 279)
CHANGED_WHOLabel.Name = "CHANGED_WHOLabel" CHANGED_WHOLabel.Name = "CHANGED_WHOLabel"
CHANGED_WHOLabel.Size = New System.Drawing.Size(77, 13) CHANGED_WHOLabel.Size = New System.Drawing.Size(77, 13)
CHANGED_WHOLabel.TabIndex = 29 CHANGED_WHOLabel.TabIndex = 29
@ -306,7 +306,7 @@ Partial Class frmSAP_FuBa
'CHANGED_WHENLabel 'CHANGED_WHENLabel
' '
CHANGED_WHENLabel.AutoSize = True CHANGED_WHENLabel.AutoSize = True
CHANGED_WHENLabel.Location = New System.Drawing.Point(607, 279) CHANGED_WHENLabel.Location = New System.Drawing.Point(727, 279)
CHANGED_WHENLabel.Name = "CHANGED_WHENLabel" CHANGED_WHENLabel.Name = "CHANGED_WHENLabel"
CHANGED_WHENLabel.Size = New System.Drawing.Size(85, 13) CHANGED_WHENLabel.Size = New System.Drawing.Size(85, 13)
CHANGED_WHENLabel.TabIndex = 31 CHANGED_WHENLabel.TabIndex = 31
@ -315,7 +315,7 @@ Partial Class frmSAP_FuBa
'WHERE_CLAUSELabel 'WHERE_CLAUSELabel
' '
WHERE_CLAUSELabel.AutoSize = True WHERE_CLAUSELabel.AutoSize = True
WHERE_CLAUSELabel.Location = New System.Drawing.Point(190, 238) WHERE_CLAUSELabel.Location = New System.Drawing.Point(310, 238)
WHERE_CLAUSELabel.Name = "WHERE_CLAUSELabel" WHERE_CLAUSELabel.Name = "WHERE_CLAUSELabel"
WHERE_CLAUSELabel.Size = New System.Drawing.Size(425, 13) WHERE_CLAUSELabel.Size = New System.Drawing.Size(425, 13)
WHERE_CLAUSELabel.TabIndex = 83 WHERE_CLAUSELabel.TabIndex = 83
@ -438,6 +438,60 @@ Partial Class frmSAP_FuBa
Label15.TabIndex = 126 Label15.TabIndex = 126
Label15.Text = "SAP_OBJECT:" Label15.Text = "SAP_OBJECT:"
' '
'Label16
'
Label16.AutoSize = True
Label16.Location = New System.Drawing.Point(735, 312)
Label16.Name = "Label16"
Label16.Size = New System.Drawing.Size(44, 13)
Label16.TabIndex = 137
Label16.Text = "DOCID:"
'
'Label17
'
Label17.AutoSize = True
Label17.Location = New System.Drawing.Point(438, 354)
Label17.Name = "Label17"
Label17.Size = New System.Drawing.Size(57, 13)
Label17.TabIndex = 135
Label17.Text = "DOCTYPE:"
'
'Label18
'
Label18.AutoSize = True
Label18.Location = New System.Drawing.Point(438, 312)
Label18.Name = "Label18"
Label18.Size = New System.Drawing.Size(58, 13)
Label18.TabIndex = 133
Label18.Text = "CONTREP:"
'
'Label19
'
Label19.AutoSize = True
Label19.Location = New System.Drawing.Point(138, 353)
Label19.Name = "Label19"
Label19.Size = New System.Drawing.Size(51, 13)
Label19.TabIndex = 131
Label19.Text = "ARDATE:"
'
'Label20
'
Label20.AutoSize = True
Label20.Location = New System.Drawing.Point(138, 312)
Label20.Name = "Label20"
Label20.Size = New System.Drawing.Size(213, 13)
Label20.TabIndex = 128
Label20.Text = "Tablename: (TOA01 oder BARCODETABLE)"
'
'Label21
'
Label21.AutoSize = True
Label21.Location = New System.Drawing.Point(138, 394)
Label21.Name = "Label21"
Label21.Size = New System.Drawing.Size(59, 13)
Label21.TabIndex = 141
Label21.Text = "BARCODE:"
'
'DD_ECMAdmin 'DD_ECMAdmin
' '
Me.DD_ECMAdmin.DataSetName = "DD_ECMAdmin" Me.DD_ECMAdmin.DataSetName = "DD_ECMAdmin"
@ -456,9 +510,11 @@ Partial Class frmSAP_FuBa
' '
Me.TableAdapterManager.BackupDataSetBeforeUpdate = False Me.TableAdapterManager.BackupDataSetBeforeUpdate = False
Me.TableAdapterManager.TBDD_CONNECTIONTableAdapter = Nothing Me.TableAdapterManager.TBDD_CONNECTIONTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_DOCRESULT_DROPDOWN_ITEMSTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_DOCSEARCH_RESULTLIST_CONFIGTableAdapter = Nothing Me.TableAdapterManager.TBPMO_DOCSEARCH_RESULTLIST_CONFIGTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_FORM_CONSTRUCTOR_DETAILTableAdapter = Nothing Me.TableAdapterManager.TBPMO_FORM_CONSTRUCTOR_DETAILTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_FORM_CONSTRUCTORTableAdapter = Nothing Me.TableAdapterManager.TBPMO_FORM_CONSTRUCTORTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_LOG_ESSENTIALSTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_SAP_FUBATableAdapter = Me.TBPMO_SAP_FUBATableAdapter Me.TableAdapterManager.TBPMO_SAP_FUBATableAdapter = Me.TBPMO_SAP_FUBATableAdapter
Me.TableAdapterManager.UpdateOrder = DD_Record_Organizer.DD_ECMAdminTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete Me.TableAdapterManager.UpdateOrder = DD_Record_Organizer.DD_ECMAdminTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
' '
@ -467,7 +523,7 @@ Partial Class frmSAP_FuBa
Me.TBPMO_SAP_FUBABindingNavigator.AddNewItem = Me.BindingNavigatorAddNewItem Me.TBPMO_SAP_FUBABindingNavigator.AddNewItem = Me.BindingNavigatorAddNewItem
Me.TBPMO_SAP_FUBABindingNavigator.BindingSource = Me.TBPMO_SAP_FUBABindingSource Me.TBPMO_SAP_FUBABindingNavigator.BindingSource = Me.TBPMO_SAP_FUBABindingSource
Me.TBPMO_SAP_FUBABindingNavigator.CountItem = Me.BindingNavigatorCountItem Me.TBPMO_SAP_FUBABindingNavigator.CountItem = Me.BindingNavigatorCountItem
Me.TBPMO_SAP_FUBABindingNavigator.CountItemFormat = "von {0} Bausteinverknüpfngen" Me.TBPMO_SAP_FUBABindingNavigator.CountItemFormat = "von {0} Bausteinverknüpfungen"
Me.TBPMO_SAP_FUBABindingNavigator.DeleteItem = Me.BindingNavigatorDeleteItem Me.TBPMO_SAP_FUBABindingNavigator.DeleteItem = Me.BindingNavigatorDeleteItem
Me.TBPMO_SAP_FUBABindingNavigator.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem, Me.BindingNavigatorMovePreviousItem, Me.BindingNavigatorSeparator, Me.BindingNavigatorPositionItem, Me.BindingNavigatorCountItem, Me.BindingNavigatorSeparator1, Me.BindingNavigatorMoveNextItem, Me.BindingNavigatorMoveLastItem, Me.BindingNavigatorSeparator2, Me.BindingNavigatorAddNewItem, Me.BindingNavigatorDeleteItem, Me.TBPMO_SAP_FUBABindingNavigatorSaveItem, Me.ToolStripButton1}) Me.TBPMO_SAP_FUBABindingNavigator.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem, Me.BindingNavigatorMovePreviousItem, Me.BindingNavigatorSeparator, Me.BindingNavigatorPositionItem, Me.BindingNavigatorCountItem, Me.BindingNavigatorSeparator1, Me.BindingNavigatorMoveNextItem, Me.BindingNavigatorMoveLastItem, Me.BindingNavigatorSeparator2, Me.BindingNavigatorAddNewItem, Me.BindingNavigatorDeleteItem, Me.TBPMO_SAP_FUBABindingNavigatorSaveItem, Me.ToolStripButton1})
Me.TBPMO_SAP_FUBABindingNavigator.Location = New System.Drawing.Point(0, 0) Me.TBPMO_SAP_FUBABindingNavigator.Location = New System.Drawing.Point(0, 0)
@ -477,7 +533,7 @@ Partial Class frmSAP_FuBa
Me.TBPMO_SAP_FUBABindingNavigator.MovePreviousItem = Me.BindingNavigatorMovePreviousItem Me.TBPMO_SAP_FUBABindingNavigator.MovePreviousItem = Me.BindingNavigatorMovePreviousItem
Me.TBPMO_SAP_FUBABindingNavigator.Name = "TBPMO_SAP_FUBABindingNavigator" Me.TBPMO_SAP_FUBABindingNavigator.Name = "TBPMO_SAP_FUBABindingNavigator"
Me.TBPMO_SAP_FUBABindingNavigator.PositionItem = Me.BindingNavigatorPositionItem Me.TBPMO_SAP_FUBABindingNavigator.PositionItem = Me.BindingNavigatorPositionItem
Me.TBPMO_SAP_FUBABindingNavigator.Size = New System.Drawing.Size(987, 25) Me.TBPMO_SAP_FUBABindingNavigator.Size = New System.Drawing.Size(1188, 25)
Me.TBPMO_SAP_FUBABindingNavigator.TabIndex = 0 Me.TBPMO_SAP_FUBABindingNavigator.TabIndex = 0
Me.TBPMO_SAP_FUBABindingNavigator.Text = "BindingNavigator1" Me.TBPMO_SAP_FUBABindingNavigator.Text = "BindingNavigator1"
' '
@ -493,8 +549,8 @@ Partial Class frmSAP_FuBa
'BindingNavigatorCountItem 'BindingNavigatorCountItem
' '
Me.BindingNavigatorCountItem.Name = "BindingNavigatorCountItem" Me.BindingNavigatorCountItem.Name = "BindingNavigatorCountItem"
Me.BindingNavigatorCountItem.Size = New System.Drawing.Size(166, 22) Me.BindingNavigatorCountItem.Size = New System.Drawing.Size(173, 22)
Me.BindingNavigatorCountItem.Text = "von {0} Bausteinverknüpfngen" Me.BindingNavigatorCountItem.Text = "von {0} Bausteinverknüpfungen"
Me.BindingNavigatorCountItem.ToolTipText = "Die Gesamtanzahl der Elemente." Me.BindingNavigatorCountItem.ToolTipText = "Die Gesamtanzahl der Elemente."
' '
'BindingNavigatorDeleteItem 'BindingNavigatorDeleteItem
@ -589,7 +645,7 @@ Partial Class frmSAP_FuBa
Me.GUIDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "GUID", True)) Me.GUIDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "GUID", True))
Me.GUIDTextBox.Enabled = False Me.GUIDTextBox.Enabled = False
Me.GUIDTextBox.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.GUIDTextBox.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.GUIDTextBox.Location = New System.Drawing.Point(140, 44) Me.GUIDTextBox.Location = New System.Drawing.Point(260, 44)
Me.GUIDTextBox.Name = "GUIDTextBox" Me.GUIDTextBox.Name = "GUIDTextBox"
Me.GUIDTextBox.Size = New System.Drawing.Size(47, 22) Me.GUIDTextBox.Size = New System.Drawing.Size(47, 22)
Me.GUIDTextBox.TabIndex = 2 Me.GUIDTextBox.TabIndex = 2
@ -597,7 +653,7 @@ Partial Class frmSAP_FuBa
'NAMETextBox 'NAMETextBox
' '
Me.NAMETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "NAME", True)) Me.NAMETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "NAME", True))
Me.NAMETextBox.Location = New System.Drawing.Point(193, 44) Me.NAMETextBox.Location = New System.Drawing.Point(313, 44)
Me.NAMETextBox.Name = "NAMETextBox" Me.NAMETextBox.Name = "NAMETextBox"
Me.NAMETextBox.Size = New System.Drawing.Size(182, 21) Me.NAMETextBox.Size = New System.Drawing.Size(182, 21)
Me.NAMETextBox.TabIndex = 4 Me.NAMETextBox.TabIndex = 4
@ -605,7 +661,7 @@ Partial Class frmSAP_FuBa
'COMMENTTextBox 'COMMENTTextBox
' '
Me.COMMENTTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "COMMENT", True)) Me.COMMENTTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "COMMENT", True))
Me.COMMENTTextBox.Location = New System.Drawing.Point(384, 44) Me.COMMENTTextBox.Location = New System.Drawing.Point(504, 44)
Me.COMMENTTextBox.Name = "COMMENTTextBox" Me.COMMENTTextBox.Name = "COMMENTTextBox"
Me.COMMENTTextBox.Size = New System.Drawing.Size(505, 21) Me.COMMENTTextBox.Size = New System.Drawing.Size(505, 21)
Me.COMMENTTextBox.TabIndex = 6 Me.COMMENTTextBox.TabIndex = 6
@ -613,7 +669,7 @@ Partial Class frmSAP_FuBa
'TableNameTextBox 'TableNameTextBox
' '
Me.TableNameTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "TableName", True)) Me.TableNameTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "TableName", True))
Me.TableNameTextBox.Location = New System.Drawing.Point(193, 205) Me.TableNameTextBox.Location = New System.Drawing.Point(313, 205)
Me.TableNameTextBox.Name = "TableNameTextBox" Me.TableNameTextBox.Name = "TableNameTextBox"
Me.TableNameTextBox.Size = New System.Drawing.Size(182, 21) Me.TableNameTextBox.Size = New System.Drawing.Size(182, 21)
Me.TableNameTextBox.TabIndex = 8 Me.TableNameTextBox.TabIndex = 8
@ -621,7 +677,7 @@ Partial Class frmSAP_FuBa
'HostTextBox 'HostTextBox
' '
Me.HostTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "Host", True)) Me.HostTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "Host", True))
Me.HostTextBox.Location = New System.Drawing.Point(193, 85) Me.HostTextBox.Location = New System.Drawing.Point(313, 85)
Me.HostTextBox.Name = "HostTextBox" Me.HostTextBox.Name = "HostTextBox"
Me.HostTextBox.Size = New System.Drawing.Size(291, 21) Me.HostTextBox.Size = New System.Drawing.Size(291, 21)
Me.HostTextBox.TabIndex = 10 Me.HostTextBox.TabIndex = 10
@ -629,7 +685,7 @@ Partial Class frmSAP_FuBa
'SystemNumberTextBox 'SystemNumberTextBox
' '
Me.SystemNumberTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "SystemNumber", True)) Me.SystemNumberTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "SystemNumber", True))
Me.SystemNumberTextBox.Location = New System.Drawing.Point(493, 85) Me.SystemNumberTextBox.Location = New System.Drawing.Point(613, 85)
Me.SystemNumberTextBox.Name = "SystemNumberTextBox" Me.SystemNumberTextBox.Name = "SystemNumberTextBox"
Me.SystemNumberTextBox.Size = New System.Drawing.Size(86, 21) Me.SystemNumberTextBox.Size = New System.Drawing.Size(86, 21)
Me.SystemNumberTextBox.TabIndex = 12 Me.SystemNumberTextBox.TabIndex = 12
@ -637,7 +693,7 @@ Partial Class frmSAP_FuBa
'UserNameTextBox 'UserNameTextBox
' '
Me.UserNameTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "UserName", True)) Me.UserNameTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "UserName", True))
Me.UserNameTextBox.Location = New System.Drawing.Point(193, 123) Me.UserNameTextBox.Location = New System.Drawing.Point(313, 123)
Me.UserNameTextBox.Name = "UserNameTextBox" Me.UserNameTextBox.Name = "UserNameTextBox"
Me.UserNameTextBox.Size = New System.Drawing.Size(182, 21) Me.UserNameTextBox.Size = New System.Drawing.Size(182, 21)
Me.UserNameTextBox.TabIndex = 14 Me.UserNameTextBox.TabIndex = 14
@ -645,7 +701,7 @@ Partial Class frmSAP_FuBa
'PasswordTextBox 'PasswordTextBox
' '
Me.PasswordTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "Password", True)) Me.PasswordTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "Password", True))
Me.PasswordTextBox.Location = New System.Drawing.Point(384, 123) Me.PasswordTextBox.Location = New System.Drawing.Point(504, 123)
Me.PasswordTextBox.Name = "PasswordTextBox" Me.PasswordTextBox.Name = "PasswordTextBox"
Me.PasswordTextBox.Size = New System.Drawing.Size(100, 21) Me.PasswordTextBox.Size = New System.Drawing.Size(100, 21)
Me.PasswordTextBox.TabIndex = 16 Me.PasswordTextBox.TabIndex = 16
@ -654,7 +710,7 @@ Partial Class frmSAP_FuBa
'ClientTextBox 'ClientTextBox
' '
Me.ClientTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "Client", True)) Me.ClientTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "Client", True))
Me.ClientTextBox.Location = New System.Drawing.Point(493, 123) Me.ClientTextBox.Location = New System.Drawing.Point(613, 123)
Me.ClientTextBox.Name = "ClientTextBox" Me.ClientTextBox.Name = "ClientTextBox"
Me.ClientTextBox.Size = New System.Drawing.Size(176, 21) Me.ClientTextBox.Size = New System.Drawing.Size(176, 21)
Me.ClientTextBox.TabIndex = 18 Me.ClientTextBox.TabIndex = 18
@ -662,7 +718,7 @@ Partial Class frmSAP_FuBa
'LanguageTextBox 'LanguageTextBox
' '
Me.LanguageTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "Language", True)) Me.LanguageTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "Language", True))
Me.LanguageTextBox.Location = New System.Drawing.Point(678, 123) Me.LanguageTextBox.Location = New System.Drawing.Point(798, 123)
Me.LanguageTextBox.Name = "LanguageTextBox" Me.LanguageTextBox.Name = "LanguageTextBox"
Me.LanguageTextBox.Size = New System.Drawing.Size(84, 21) Me.LanguageTextBox.Size = New System.Drawing.Size(84, 21)
Me.LanguageTextBox.TabIndex = 20 Me.LanguageTextBox.TabIndex = 20
@ -670,7 +726,7 @@ Partial Class frmSAP_FuBa
'TempTableNameTextBox 'TempTableNameTextBox
' '
Me.TempTableNameTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "TempTableName", True)) Me.TempTableNameTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "TempTableName", True))
Me.TempTableNameTextBox.Location = New System.Drawing.Point(261, 164) Me.TempTableNameTextBox.Location = New System.Drawing.Point(381, 164)
Me.TempTableNameTextBox.Name = "TempTableNameTextBox" Me.TempTableNameTextBox.Name = "TempTableNameTextBox"
Me.TempTableNameTextBox.Size = New System.Drawing.Size(223, 21) Me.TempTableNameTextBox.Size = New System.Drawing.Size(223, 21)
Me.TempTableNameTextBox.TabIndex = 22 Me.TempTableNameTextBox.TabIndex = 22
@ -678,7 +734,7 @@ Partial Class frmSAP_FuBa
'ACTIVECheckBox 'ACTIVECheckBox
' '
Me.ACTIVECheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBPMO_SAP_FUBABindingSource, "ACTIVE", True)) Me.ACTIVECheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBPMO_SAP_FUBABindingSource, "ACTIVE", True))
Me.ACTIVECheckBox.Location = New System.Drawing.Point(904, 42) Me.ACTIVECheckBox.Location = New System.Drawing.Point(1024, 42)
Me.ACTIVECheckBox.Name = "ACTIVECheckBox" Me.ACTIVECheckBox.Name = "ACTIVECheckBox"
Me.ACTIVECheckBox.Size = New System.Drawing.Size(65, 24) Me.ACTIVECheckBox.Size = New System.Drawing.Size(65, 24)
Me.ACTIVECheckBox.TabIndex = 24 Me.ACTIVECheckBox.TabIndex = 24
@ -691,7 +747,7 @@ Partial Class frmSAP_FuBa
Me.ADDED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "ADDED_WHO", True)) Me.ADDED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "ADDED_WHO", True))
Me.ADDED_WHOTextBox.Enabled = False Me.ADDED_WHOTextBox.Enabled = False
Me.ADDED_WHOTextBox.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.ADDED_WHOTextBox.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.ADDED_WHOTextBox.Location = New System.Drawing.Point(193, 296) Me.ADDED_WHOTextBox.Location = New System.Drawing.Point(313, 296)
Me.ADDED_WHOTextBox.Name = "ADDED_WHOTextBox" Me.ADDED_WHOTextBox.Name = "ADDED_WHOTextBox"
Me.ADDED_WHOTextBox.Size = New System.Drawing.Size(136, 22) Me.ADDED_WHOTextBox.Size = New System.Drawing.Size(136, 22)
Me.ADDED_WHOTextBox.TabIndex = 26 Me.ADDED_WHOTextBox.TabIndex = 26
@ -702,7 +758,7 @@ Partial Class frmSAP_FuBa
Me.ADDED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "ADDED_WHEN", True)) Me.ADDED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "ADDED_WHEN", True))
Me.ADDED_WHENTextBox.Enabled = False Me.ADDED_WHENTextBox.Enabled = False
Me.ADDED_WHENTextBox.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.ADDED_WHENTextBox.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.ADDED_WHENTextBox.Location = New System.Drawing.Point(335, 296) Me.ADDED_WHENTextBox.Location = New System.Drawing.Point(455, 296)
Me.ADDED_WHENTextBox.Name = "ADDED_WHENTextBox" Me.ADDED_WHENTextBox.Name = "ADDED_WHENTextBox"
Me.ADDED_WHENTextBox.Size = New System.Drawing.Size(130, 22) Me.ADDED_WHENTextBox.Size = New System.Drawing.Size(130, 22)
Me.ADDED_WHENTextBox.TabIndex = 28 Me.ADDED_WHENTextBox.TabIndex = 28
@ -713,7 +769,7 @@ Partial Class frmSAP_FuBa
Me.CHANGED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "CHANGED_WHO", True)) Me.CHANGED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "CHANGED_WHO", True))
Me.CHANGED_WHOTextBox.Enabled = False Me.CHANGED_WHOTextBox.Enabled = False
Me.CHANGED_WHOTextBox.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.CHANGED_WHOTextBox.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.CHANGED_WHOTextBox.Location = New System.Drawing.Point(469, 295) Me.CHANGED_WHOTextBox.Location = New System.Drawing.Point(589, 295)
Me.CHANGED_WHOTextBox.Name = "CHANGED_WHOTextBox" Me.CHANGED_WHOTextBox.Name = "CHANGED_WHOTextBox"
Me.CHANGED_WHOTextBox.Size = New System.Drawing.Size(132, 22) Me.CHANGED_WHOTextBox.Size = New System.Drawing.Size(132, 22)
Me.CHANGED_WHOTextBox.TabIndex = 30 Me.CHANGED_WHOTextBox.TabIndex = 30
@ -724,7 +780,7 @@ Partial Class frmSAP_FuBa
Me.CHANGED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "CHANGED_WHEN", True)) Me.CHANGED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "CHANGED_WHEN", True))
Me.CHANGED_WHENTextBox.Enabled = False Me.CHANGED_WHENTextBox.Enabled = False
Me.CHANGED_WHENTextBox.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.CHANGED_WHENTextBox.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.CHANGED_WHENTextBox.Location = New System.Drawing.Point(610, 295) Me.CHANGED_WHENTextBox.Location = New System.Drawing.Point(730, 295)
Me.CHANGED_WHENTextBox.Name = "CHANGED_WHENTextBox" Me.CHANGED_WHENTextBox.Name = "CHANGED_WHENTextBox"
Me.CHANGED_WHENTextBox.Size = New System.Drawing.Size(147, 22) Me.CHANGED_WHENTextBox.Size = New System.Drawing.Size(147, 22)
Me.CHANGED_WHENTextBox.TabIndex = 32 Me.CHANGED_WHENTextBox.TabIndex = 32
@ -736,7 +792,7 @@ Partial Class frmSAP_FuBa
Me.ListBox1.FormattingEnabled = True Me.ListBox1.FormattingEnabled = True
Me.ListBox1.Location = New System.Drawing.Point(11, 28) Me.ListBox1.Location = New System.Drawing.Point(11, 28)
Me.ListBox1.Name = "ListBox1" Me.ListBox1.Name = "ListBox1"
Me.ListBox1.Size = New System.Drawing.Size(120, 186) Me.ListBox1.Size = New System.Drawing.Size(240, 290)
Me.ListBox1.TabIndex = 33 Me.ListBox1.TabIndex = 33
' '
'btnERPConnect 'btnERPConnect
@ -745,7 +801,7 @@ Partial Class frmSAP_FuBa
Me.btnERPConnect.Image = Global.DD_Record_Organizer.My.Resources.Resources.database_connect Me.btnERPConnect.Image = Global.DD_Record_Organizer.My.Resources.Resources.database_connect
Me.btnERPConnect.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnERPConnect.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnERPConnect.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.btnERPConnect.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.btnERPConnect.Location = New System.Drawing.Point(768, 117) Me.btnERPConnect.Location = New System.Drawing.Point(888, 117)
Me.btnERPConnect.Name = "btnERPConnect" Me.btnERPConnect.Name = "btnERPConnect"
Me.btnERPConnect.Size = New System.Drawing.Size(191, 29) Me.btnERPConnect.Size = New System.Drawing.Size(191, 29)
Me.btnERPConnect.TabIndex = 78 Me.btnERPConnect.TabIndex = 78
@ -761,7 +817,7 @@ Partial Class frmSAP_FuBa
Me.GridControl2.Location = New System.Drawing.Point(11, 340) Me.GridControl2.Location = New System.Drawing.Point(11, 340)
Me.GridControl2.MainView = Me.GridView2 Me.GridControl2.MainView = Me.GridView2
Me.GridControl2.Name = "GridControl2" Me.GridControl2.Name = "GridControl2"
Me.GridControl2.Size = New System.Drawing.Size(948, 223) Me.GridControl2.Size = New System.Drawing.Size(1153, 223)
Me.GridControl2.TabIndex = 83 Me.GridControl2.TabIndex = 83
Me.GridControl2.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView2}) Me.GridControl2.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView2})
' '
@ -784,7 +840,7 @@ Partial Class frmSAP_FuBa
'WHERE_CLAUSETextBox 'WHERE_CLAUSETextBox
' '
Me.WHERE_CLAUSETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "WHERE_CLAUSE", True)) Me.WHERE_CLAUSETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "WHERE_CLAUSE", True))
Me.WHERE_CLAUSETextBox.Location = New System.Drawing.Point(193, 254) Me.WHERE_CLAUSETextBox.Location = New System.Drawing.Point(313, 254)
Me.WHERE_CLAUSETextBox.Name = "WHERE_CLAUSETextBox" Me.WHERE_CLAUSETextBox.Name = "WHERE_CLAUSETextBox"
Me.WHERE_CLAUSETextBox.Size = New System.Drawing.Size(766, 21) Me.WHERE_CLAUSETextBox.Size = New System.Drawing.Size(766, 21)
Me.WHERE_CLAUSETextBox.TabIndex = 84 Me.WHERE_CLAUSETextBox.TabIndex = 84
@ -795,7 +851,7 @@ Partial Class frmSAP_FuBa
Me.lblSave.BackColor = System.Drawing.Color.Yellow Me.lblSave.BackColor = System.Drawing.Color.Yellow
Me.lblSave.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold) Me.lblSave.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold)
Me.lblSave.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.lblSave.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.lblSave.Location = New System.Drawing.Point(786, 299) Me.lblSave.Location = New System.Drawing.Point(906, 299)
Me.lblSave.Name = "lblSave" Me.lblSave.Name = "lblSave"
Me.lblSave.Size = New System.Drawing.Size(132, 13) Me.lblSave.Size = New System.Drawing.Size(132, 13)
Me.lblSave.TabIndex = 85 Me.lblSave.TabIndex = 85
@ -808,7 +864,7 @@ Partial Class frmSAP_FuBa
Me.lblConnectionopen.BackColor = System.Drawing.Color.Yellow Me.lblConnectionopen.BackColor = System.Drawing.Color.Yellow
Me.lblConnectionopen.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold) Me.lblConnectionopen.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold)
Me.lblConnectionopen.ImeMode = System.Windows.Forms.ImeMode.NoControl Me.lblConnectionopen.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.lblConnectionopen.Location = New System.Drawing.Point(810, 149) Me.lblConnectionopen.Location = New System.Drawing.Point(930, 149)
Me.lblConnectionopen.Name = "lblConnectionopen" Me.lblConnectionopen.Name = "lblConnectionopen"
Me.lblConnectionopen.Size = New System.Drawing.Size(149, 13) Me.lblConnectionopen.Size = New System.Drawing.Size(149, 13)
Me.lblConnectionopen.TabIndex = 86 Me.lblConnectionopen.TabIndex = 86
@ -833,7 +889,7 @@ Partial Class frmSAP_FuBa
Me.btnInsertData.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.btnInsertData.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnInsertData.Image = Global.DD_Record_Organizer.My.Resources.Resources.InsertColumn_5626 Me.btnInsertData.Image = Global.DD_Record_Organizer.My.Resources.Resources.InsertColumn_5626
Me.btnInsertData.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnInsertData.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnInsertData.Location = New System.Drawing.Point(493, 161) Me.btnInsertData.Location = New System.Drawing.Point(613, 161)
Me.btnInsertData.Name = "btnInsertData" Me.btnInsertData.Name = "btnInsertData"
Me.btnInsertData.Size = New System.Drawing.Size(176, 24) Me.btnInsertData.Size = New System.Drawing.Size(176, 24)
Me.btnInsertData.TabIndex = 88 Me.btnInsertData.TabIndex = 88
@ -845,7 +901,7 @@ Partial Class frmSAP_FuBa
' '
Me.Label1.AutoSize = True Me.Label1.AutoSize = True
Me.Label1.ForeColor = System.Drawing.Color.Brown Me.Label1.ForeColor = System.Drawing.Color.Brown
Me.Label1.Location = New System.Drawing.Point(816, 88) Me.Label1.Location = New System.Drawing.Point(936, 88)
Me.Label1.Name = "Label1" Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(85, 13) Me.Label1.Size = New System.Drawing.Size(85, 13)
Me.Label1.TabIndex = 89 Me.Label1.TabIndex = 89
@ -854,7 +910,7 @@ Partial Class frmSAP_FuBa
'txtLimitRows 'txtLimitRows
' '
Me.txtLimitRows.ForeColor = System.Drawing.Color.Brown Me.txtLimitRows.ForeColor = System.Drawing.Color.Brown
Me.txtLimitRows.Location = New System.Drawing.Point(914, 85) Me.txtLimitRows.Location = New System.Drawing.Point(1034, 85)
Me.txtLimitRows.Name = "txtLimitRows" Me.txtLimitRows.Name = "txtLimitRows"
Me.txtLimitRows.Size = New System.Drawing.Size(45, 21) Me.txtLimitRows.Size = New System.Drawing.Size(45, 21)
Me.txtLimitRows.TabIndex = 90 Me.txtLimitRows.TabIndex = 90
@ -864,7 +920,7 @@ Partial Class frmSAP_FuBa
'rBFuba 'rBFuba
' '
Me.rBFuba.AutoSize = True Me.rBFuba.AutoSize = True
Me.rBFuba.Location = New System.Drawing.Point(646, 86) Me.rBFuba.Location = New System.Drawing.Point(766, 86)
Me.rBFuba.Name = "rBFuba" Me.rBFuba.Name = "rBFuba"
Me.rBFuba.Size = New System.Drawing.Size(49, 17) Me.rBFuba.Size = New System.Drawing.Size(49, 17)
Me.rBFuba.TabIndex = 91 Me.rBFuba.TabIndex = 91
@ -875,7 +931,7 @@ Partial Class frmSAP_FuBa
'rbTable 'rbTable
' '
Me.rbTable.AutoSize = True Me.rbTable.AutoSize = True
Me.rbTable.Location = New System.Drawing.Point(713, 86) Me.rbTable.Location = New System.Drawing.Point(833, 86)
Me.rbTable.Name = "rbTable" Me.rbTable.Name = "rbTable"
Me.rbTable.Size = New System.Drawing.Size(81, 17) Me.rbTable.Size = New System.Drawing.Size(81, 17)
Me.rbTable.TabIndex = 92 Me.rbTable.TabIndex = 92
@ -888,7 +944,7 @@ Partial Class frmSAP_FuBa
Me.MethodTextBox.BackColor = System.Drawing.SystemColors.Control Me.MethodTextBox.BackColor = System.Drawing.SystemColors.Control
Me.MethodTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "Method", True)) Me.MethodTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "Method", True))
Me.MethodTextBox.ForeColor = System.Drawing.SystemColors.Control Me.MethodTextBox.ForeColor = System.Drawing.SystemColors.Control
Me.MethodTextBox.Location = New System.Drawing.Point(866, 181) Me.MethodTextBox.Location = New System.Drawing.Point(986, 181)
Me.MethodTextBox.Name = "MethodTextBox" Me.MethodTextBox.Name = "MethodTextBox"
Me.MethodTextBox.ReadOnly = True Me.MethodTextBox.ReadOnly = True
Me.MethodTextBox.Size = New System.Drawing.Size(10, 21) Me.MethodTextBox.Size = New System.Drawing.Size(10, 21)
@ -898,7 +954,7 @@ Partial Class frmSAP_FuBa
' '
Me.lblMethodname.AutoSize = True Me.lblMethodname.AutoSize = True
Me.lblMethodname.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.lblMethodname.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblMethodname.Location = New System.Drawing.Point(190, 189) Me.lblMethodname.Location = New System.Drawing.Point(310, 189)
Me.lblMethodname.Name = "lblMethodname" Me.lblMethodname.Name = "lblMethodname"
Me.lblMethodname.Size = New System.Drawing.Size(41, 13) Me.lblMethodname.Size = New System.Drawing.Size(41, 13)
Me.lblMethodname.TabIndex = 94 Me.lblMethodname.TabIndex = 94
@ -909,7 +965,7 @@ Partial Class frmSAP_FuBa
Me.btnGetResult.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.btnGetResult.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnGetResult.Image = Global.DD_Record_Organizer.My.Resources.Resources.TableView_nameonly_263 Me.btnGetResult.Image = Global.DD_Record_Organizer.My.Resources.Resources.TableView_nameonly_263
Me.btnGetResult.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft Me.btnGetResult.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnGetResult.Location = New System.Drawing.Point(493, 203) Me.btnGetResult.Location = New System.Drawing.Point(613, 203)
Me.btnGetResult.Name = "btnGetResult" Me.btnGetResult.Name = "btnGetResult"
Me.btnGetResult.Size = New System.Drawing.Size(176, 23) Me.btnGetResult.Size = New System.Drawing.Size(176, 23)
Me.btnGetResult.TabIndex = 95 Me.btnGetResult.TabIndex = 95
@ -919,7 +975,7 @@ Partial Class frmSAP_FuBa
'FuBa_SplitCharacterTextBox 'FuBa_SplitCharacterTextBox
' '
Me.FuBa_SplitCharacterTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "FuBa_SplitCharacter", True)) Me.FuBa_SplitCharacterTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "FuBa_SplitCharacter", True))
Me.FuBa_SplitCharacterTextBox.Location = New System.Drawing.Point(384, 205) Me.FuBa_SplitCharacterTextBox.Location = New System.Drawing.Point(504, 205)
Me.FuBa_SplitCharacterTextBox.Name = "FuBa_SplitCharacterTextBox" Me.FuBa_SplitCharacterTextBox.Name = "FuBa_SplitCharacterTextBox"
Me.FuBa_SplitCharacterTextBox.Size = New System.Drawing.Size(25, 21) Me.FuBa_SplitCharacterTextBox.Size = New System.Drawing.Size(25, 21)
Me.FuBa_SplitCharacterTextBox.TabIndex = 96 Me.FuBa_SplitCharacterTextBox.TabIndex = 96
@ -928,7 +984,7 @@ Partial Class frmSAP_FuBa
'lblSplitchr 'lblSplitchr
' '
Me.lblSplitchr.AutoSize = True Me.lblSplitchr.AutoSize = True
Me.lblSplitchr.Location = New System.Drawing.Point(384, 189) Me.lblSplitchr.Location = New System.Drawing.Point(504, 189)
Me.lblSplitchr.Name = "lblSplitchr" Me.lblSplitchr.Name = "lblSplitchr"
Me.lblSplitchr.Size = New System.Drawing.Size(75, 13) Me.lblSplitchr.Size = New System.Drawing.Size(75, 13)
Me.lblSplitchr.TabIndex = 97 Me.lblSplitchr.TabIndex = 97
@ -939,7 +995,7 @@ Partial Class frmSAP_FuBa
' '
Me.Label2.AutoSize = True Me.Label2.AutoSize = True
Me.Label2.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label2.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label2.Location = New System.Drawing.Point(190, 167) Me.Label2.Location = New System.Drawing.Point(310, 167)
Me.Label2.Name = "Label2" Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(70, 13) Me.Label2.Size = New System.Drawing.Size(70, 13)
Me.Label2.TabIndex = 98 Me.Label2.TabIndex = 98
@ -951,7 +1007,7 @@ Partial Class frmSAP_FuBa
Me.XtraTabControl1.Location = New System.Drawing.Point(0, 0) Me.XtraTabControl1.Location = New System.Drawing.Point(0, 0)
Me.XtraTabControl1.Name = "XtraTabControl1" Me.XtraTabControl1.Name = "XtraTabControl1"
Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPage1 Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPage1
Me.XtraTabControl1.Size = New System.Drawing.Size(989, 591) Me.XtraTabControl1.Size = New System.Drawing.Size(1194, 591)
Me.XtraTabControl1.TabIndex = 99 Me.XtraTabControl1.TabIndex = 99
Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage1, Me.XtraTabPage2}) Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage1, Me.XtraTabPage2})
' '
@ -1008,7 +1064,7 @@ Partial Class frmSAP_FuBa
Me.XtraTabPage1.Controls.Add(Me.ADDED_WHENTextBox) Me.XtraTabPage1.Controls.Add(Me.ADDED_WHENTextBox)
Me.XtraTabPage1.Controls.Add(ADDED_WHOLabel) Me.XtraTabPage1.Controls.Add(ADDED_WHOLabel)
Me.XtraTabPage1.Name = "XtraTabPage1" Me.XtraTabPage1.Name = "XtraTabPage1"
Me.XtraTabPage1.Size = New System.Drawing.Size(987, 566) Me.XtraTabPage1.Size = New System.Drawing.Size(1188, 563)
Me.XtraTabPage1.Text = "Fuba- und Table-Configurations" Me.XtraTabPage1.Text = "Fuba- und Table-Configurations"
' '
'XtraTabPage2 'XtraTabPage2
@ -1058,9 +1114,92 @@ Partial Class frmSAP_FuBa
Me.XtraTabPage2.Controls.Add(Me.testLanguage) Me.XtraTabPage2.Controls.Add(Me.testLanguage)
Me.XtraTabPage2.Controls.Add(Label9) Me.XtraTabPage2.Controls.Add(Label9)
Me.XtraTabPage2.Name = "XtraTabPage2" Me.XtraTabPage2.Name = "XtraTabPage2"
Me.XtraTabPage2.Size = New System.Drawing.Size(987, 566) Me.XtraTabPage2.Size = New System.Drawing.Size(983, 563)
Me.XtraTabPage2.Text = "Test und Funktionsbereich" Me.XtraTabPage2.Text = "Test und Funktionsbereich"
' '
'txtBARCODESendlist
'
Me.txtBARCODESendlist.Location = New System.Drawing.Point(141, 410)
Me.txtBARCODESendlist.Name = "txtBARCODESendlist"
Me.txtBARCODESendlist.Size = New System.Drawing.Size(291, 21)
Me.txtBARCODESendlist.TabIndex = 140
'
'lblResultBAPI
'
Me.lblResultBAPI.AutoSize = True
Me.lblResultBAPI.BackColor = System.Drawing.Color.Yellow
Me.lblResultBAPI.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold)
Me.lblResultBAPI.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.lblResultBAPI.Location = New System.Drawing.Point(656, 413)
Me.lblResultBAPI.Name = "lblResultBAPI"
Me.lblResultBAPI.Size = New System.Drawing.Size(47, 13)
Me.lblResultBAPI.TabIndex = 139
Me.lblResultBAPI.Text = "Label21"
Me.lblResultBAPI.Visible = False
'
'lblresultFunction
'
Me.lblresultFunction.AutoSize = True
Me.lblresultFunction.BackColor = System.Drawing.Color.Yellow
Me.lblresultFunction.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold)
Me.lblresultFunction.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.lblresultFunction.Location = New System.Drawing.Point(299, 274)
Me.lblresultFunction.Name = "lblresultFunction"
Me.lblresultFunction.Size = New System.Drawing.Size(95, 13)
Me.lblresultFunction.TabIndex = 138
Me.lblresultFunction.Text = "lblresultFunction"
Me.lblresultFunction.Visible = False
'
'txtDOC_IDSendList
'
Me.txtDOC_IDSendList.Location = New System.Drawing.Point(738, 328)
Me.txtDOC_IDSendList.Name = "txtDOC_IDSendList"
Me.txtDOC_IDSendList.Size = New System.Drawing.Size(291, 21)
Me.txtDOC_IDSendList.TabIndex = 136
'
'txtDoctypeSendList
'
Me.txtDoctypeSendList.Location = New System.Drawing.Point(441, 370)
Me.txtDoctypeSendList.Name = "txtDoctypeSendList"
Me.txtDoctypeSendList.Size = New System.Drawing.Size(291, 21)
Me.txtDoctypeSendList.TabIndex = 134
'
'txtCONTREPSendList
'
Me.txtCONTREPSendList.Location = New System.Drawing.Point(441, 328)
Me.txtCONTREPSendList.Name = "txtCONTREPSendList"
Me.txtCONTREPSendList.Size = New System.Drawing.Size(291, 21)
Me.txtCONTREPSendList.TabIndex = 132
'
'txtARDATESendList
'
Me.txtARDATESendList.Location = New System.Drawing.Point(141, 369)
Me.txtARDATESendList.Name = "txtARDATESendList"
Me.txtARDATESendList.Size = New System.Drawing.Size(291, 21)
Me.txtARDATESendList.TabIndex = 130
'
'txtTableSendList
'
Me.txtTableSendList.Location = New System.Drawing.Point(141, 328)
Me.txtTableSendList.Name = "txtTableSendList"
Me.txtTableSendList.Size = New System.Drawing.Size(291, 21)
Me.txtTableSendList.TabIndex = 129
Me.txtTableSendList.Text = "BARCODETABLE"
'
'Button2
'
Me.Button2.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle))
Me.Button2.Image = Global.DD_Record_Organizer.My.Resources.Resources.database_connect
Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button2.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.Button2.Location = New System.Drawing.Point(450, 404)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(194, 29)
Me.Button2.TabIndex = 127
Me.Button2.Text = "Execute BAPI_BARCODE"
Me.Button2.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.Button2.UseVisualStyleBackColor = True
'
'testSAP_OBJECT 'testSAP_OBJECT
' '
Me.testSAP_OBJECT.Location = New System.Drawing.Point(738, 159) Me.testSAP_OBJECT.Location = New System.Drawing.Point(738, 159)
@ -1202,148 +1341,11 @@ Partial Class frmSAP_FuBa
Me.testLanguage.Size = New System.Drawing.Size(84, 21) Me.testLanguage.Size = New System.Drawing.Size(84, 21)
Me.testLanguage.TabIndex = 104 Me.testLanguage.TabIndex = 104
' '
'Button2
'
Me.Button2.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle))
Me.Button2.Image = Global.DD_Record_Organizer.My.Resources.Resources.database_connect
Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button2.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.Button2.Location = New System.Drawing.Point(450, 404)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(194, 29)
Me.Button2.TabIndex = 127
Me.Button2.Text = "Execute BAPI_BARCODE"
Me.Button2.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.Button2.UseVisualStyleBackColor = True
'
'Label16
'
Label16.AutoSize = True
Label16.Location = New System.Drawing.Point(735, 312)
Label16.Name = "Label16"
Label16.Size = New System.Drawing.Size(44, 13)
Label16.TabIndex = 137
Label16.Text = "DOCID:"
'
'txtDOC_IDSendList
'
Me.txtDOC_IDSendList.Location = New System.Drawing.Point(738, 328)
Me.txtDOC_IDSendList.Name = "txtDOC_IDSendList"
Me.txtDOC_IDSendList.Size = New System.Drawing.Size(291, 21)
Me.txtDOC_IDSendList.TabIndex = 136
'
'Label17
'
Label17.AutoSize = True
Label17.Location = New System.Drawing.Point(438, 354)
Label17.Name = "Label17"
Label17.Size = New System.Drawing.Size(57, 13)
Label17.TabIndex = 135
Label17.Text = "DOCTYPE:"
'
'txtDoctypeSendList
'
Me.txtDoctypeSendList.Location = New System.Drawing.Point(441, 370)
Me.txtDoctypeSendList.Name = "txtDoctypeSendList"
Me.txtDoctypeSendList.Size = New System.Drawing.Size(291, 21)
Me.txtDoctypeSendList.TabIndex = 134
'
'Label18
'
Label18.AutoSize = True
Label18.Location = New System.Drawing.Point(438, 312)
Label18.Name = "Label18"
Label18.Size = New System.Drawing.Size(58, 13)
Label18.TabIndex = 133
Label18.Text = "CONTREP:"
'
'txtCONTREPSendList
'
Me.txtCONTREPSendList.Location = New System.Drawing.Point(441, 328)
Me.txtCONTREPSendList.Name = "txtCONTREPSendList"
Me.txtCONTREPSendList.Size = New System.Drawing.Size(291, 21)
Me.txtCONTREPSendList.TabIndex = 132
'
'Label19
'
Label19.AutoSize = True
Label19.Location = New System.Drawing.Point(138, 353)
Label19.Name = "Label19"
Label19.Size = New System.Drawing.Size(51, 13)
Label19.TabIndex = 131
Label19.Text = "ARDATE:"
'
'txtARDATESendList
'
Me.txtARDATESendList.Location = New System.Drawing.Point(141, 369)
Me.txtARDATESendList.Name = "txtARDATESendList"
Me.txtARDATESendList.Size = New System.Drawing.Size(291, 21)
Me.txtARDATESendList.TabIndex = 130
'
'txtTableSendList
'
Me.txtTableSendList.Location = New System.Drawing.Point(141, 328)
Me.txtTableSendList.Name = "txtTableSendList"
Me.txtTableSendList.Size = New System.Drawing.Size(291, 21)
Me.txtTableSendList.TabIndex = 129
Me.txtTableSendList.Text = "BARCODETABLE"
'
'Label20
'
Label20.AutoSize = True
Label20.Location = New System.Drawing.Point(138, 312)
Label20.Name = "Label20"
Label20.Size = New System.Drawing.Size(213, 13)
Label20.TabIndex = 128
Label20.Text = "Tablename: (TOA01 oder BARCODETABLE)"
'
'lblresultFunction
'
Me.lblresultFunction.AutoSize = True
Me.lblresultFunction.BackColor = System.Drawing.Color.Yellow
Me.lblresultFunction.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold)
Me.lblresultFunction.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.lblresultFunction.Location = New System.Drawing.Point(299, 274)
Me.lblresultFunction.Name = "lblresultFunction"
Me.lblresultFunction.Size = New System.Drawing.Size(95, 13)
Me.lblresultFunction.TabIndex = 138
Me.lblresultFunction.Text = "lblresultFunction"
Me.lblresultFunction.Visible = False
'
'lblResultBAPI
'
Me.lblResultBAPI.AutoSize = True
Me.lblResultBAPI.BackColor = System.Drawing.Color.Yellow
Me.lblResultBAPI.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold)
Me.lblResultBAPI.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.lblResultBAPI.Location = New System.Drawing.Point(656, 413)
Me.lblResultBAPI.Name = "lblResultBAPI"
Me.lblResultBAPI.Size = New System.Drawing.Size(47, 13)
Me.lblResultBAPI.TabIndex = 139
Me.lblResultBAPI.Text = "Label21"
Me.lblResultBAPI.Visible = False
'
'Label21
'
Label21.AutoSize = True
Label21.Location = New System.Drawing.Point(138, 394)
Label21.Name = "Label21"
Label21.Size = New System.Drawing.Size(59, 13)
Label21.TabIndex = 141
Label21.Text = "BARCODE:"
'
'txtBARCODESendlist
'
Me.txtBARCODESendlist.Location = New System.Drawing.Point(141, 410)
Me.txtBARCODESendlist.Name = "txtBARCODESendlist"
Me.txtBARCODESendlist.Size = New System.Drawing.Size(291, 21)
Me.txtBARCODESendlist.TabIndex = 140
'
'frmSAP_FuBa 'frmSAP_FuBa
' '
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(989, 591) Me.ClientSize = New System.Drawing.Size(1194, 591)
Me.Controls.Add(Me.XtraTabControl1) Me.Controls.Add(Me.XtraTabControl1)
Me.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)

36
app/DD-Record-Organizer/frmSAP_FuBa.resx
View File

@ -201,6 +201,24 @@
<metadata name="Label15.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089"> <metadata name="Label15.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value> <value>False</value>
</metadata> </metadata>
<metadata name="Label16.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="Label17.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="Label18.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="Label19.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="Label20.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="Label21.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="DD_ECMAdmin.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="DD_ECMAdmin.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value> <value>17, 17</value>
</metadata> </metadata>
@ -291,24 +309,6 @@
<metadata name="BackgroundWorker1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="BackgroundWorker1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 56</value> <value>17, 56</value>
</metadata> </metadata>
<metadata name="Label21.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="Label16.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="Label17.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="Label18.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="Label19.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="Label20.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
AAABAAoAMDAQAAEABABoBgAApgAAACAgEAABAAQA6AIAAA4HAAAQEBAAAQAEACgBAAD2CQAAMDAAAAEA AAABAAoAMDAQAAEABABoBgAApgAAACAgEAABAAQA6AIAAA4HAAAQEBAAAQAEACgBAAD2CQAAMDAAAAEA

6
app/DD-Record-Organizer/frmUserKonfig.resx
View File

@ -1800,7 +1800,7 @@
<value>3, 3, 3, 3</value> <value>3, 3, 3, 3</value>
</data> </data>
<data name="TabPage1.Size" type="System.Drawing.Size, System.Drawing"> <data name="TabPage1.Size" type="System.Drawing.Size, System.Drawing">
<value>1124, 293</value> <value>1128, 296</value>
</data> </data>
<data name="TabPage1.TabIndex" type="System.Int32, mscorlib"> <data name="TabPage1.TabIndex" type="System.Int32, mscorlib">
<value>0</value> <value>0</value>
@ -2164,7 +2164,7 @@ matchen</value>
<value>0, 0</value> <value>0, 0</value>
</data> </data>
<data name="TabControl1.Size" type="System.Drawing.Size, System.Drawing"> <data name="TabControl1.Size" type="System.Drawing.Size, System.Drawing">
<value>1132, 319</value> <value>1136, 322</value>
</data> </data>
<data name="TabControl1.TabIndex" type="System.Int32, mscorlib"> <data name="TabControl1.TabIndex" type="System.Int32, mscorlib">
<value>6</value> <value>6</value>
@ -2182,7 +2182,7 @@ matchen</value>
<value>0</value> <value>0</value>
</data> </data>
<data name="XtraTabPage1.Size" type="System.Drawing.Size, System.Drawing"> <data name="XtraTabPage1.Size" type="System.Drawing.Size, System.Drawing">
<value>1132, 319</value> <value>1136, 322</value>
</data> </data>
<data name="XtraTabPage1.Text" xml:space="preserve"> <data name="XtraTabPage1.Text" xml:space="preserve">
<value>User-/Gruppenzuordnung</value> <value>User-/Gruppenzuordnung</value>

6
app/DD-Record-Organizer/frmUserKonfig.vb
View File

@ -601,12 +601,6 @@ Public Class frmUserKonfig
End If End If
End If End If
End Sub End Sub
Private Sub frmUserKonfig_KeyUp(sender As Object, e As KeyEventArgs) Handles MyBase.KeyUp
If e.KeyCode = Keys.Delete Then
Delete_user()
End If
End Sub
Private Sub btnopenfolder_Click(sender As Object, e As EventArgs) Handles btnopenfolder.Click Private Sub btnopenfolder_Click(sender As Object, e As EventArgs) Handles btnopenfolder.Click
Dim fbdia As New FolderBrowserDialog Dim fbdia As New FolderBrowserDialog
If fbdia.ShowDialog() = DialogResult.OK Then If fbdia.ShowDialog() = DialogResult.OK Then

14
app/DD-Record-Organizer/frmWD_Dokumentart_Konfig.Designer.vb generated
View File

@ -65,6 +65,7 @@ Partial Class frmWD_Dokumentart_Konfig
Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView() Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.colBEZEICHNUNG = New DevExpress.XtraGrid.Columns.GridColumn() Me.colBEZEICHNUNG = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colOBJEKTTYP = New DevExpress.XtraGrid.Columns.GridColumn() Me.colOBJEKTTYP = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colBESCHREIBUNG = New DevExpress.XtraGrid.Columns.GridColumn()
Me.Button1 = New System.Windows.Forms.Button() Me.Button1 = New System.Windows.Forms.Button()
Me.Label4 = New System.Windows.Forms.Label() Me.Label4 = New System.Windows.Forms.Label()
Me.ListBox3 = New System.Windows.Forms.ListBox() Me.ListBox3 = New System.Windows.Forms.ListBox()
@ -188,7 +189,6 @@ Partial Class frmWD_Dokumentart_Konfig
Me.TBPMO_WD_FORMVIEW_DOKTYPESTableAdapter = New DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBPMO_WD_FORMVIEW_DOKTYPESTableAdapter() Me.TBPMO_WD_FORMVIEW_DOKTYPESTableAdapter = New DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBPMO_WD_FORMVIEW_DOKTYPESTableAdapter()
Me.TBWH_DOKART_MODULETableAdapter = New DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBWH_DOKART_MODULETableAdapter() Me.TBWH_DOKART_MODULETableAdapter = New DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBWH_DOKART_MODULETableAdapter()
Me.ToolTipController1 = New DevExpress.Utils.ToolTipController(Me.components) Me.ToolTipController1 = New DevExpress.Utils.ToolTipController(Me.components)
Me.colBESCHREIBUNG = New DevExpress.XtraGrid.Columns.GridColumn()
GUIDLabel = New System.Windows.Forms.Label() GUIDLabel = New System.Windows.Forms.Label()
BEZEICHNUNGLabel = New System.Windows.Forms.Label() BEZEICHNUNGLabel = New System.Windows.Forms.Label()
KURZNAMELabel = New System.Windows.Forms.Label() KURZNAMELabel = New System.Windows.Forms.Label()
@ -509,6 +509,12 @@ Partial Class frmWD_Dokumentart_Konfig
Me.colOBJEKTTYP.FieldName = "OBJEKTTYP" Me.colOBJEKTTYP.FieldName = "OBJEKTTYP"
Me.colOBJEKTTYP.Name = "colOBJEKTTYP" Me.colOBJEKTTYP.Name = "colOBJEKTTYP"
' '
'colBESCHREIBUNG
'
resources.ApplyResources(Me.colBESCHREIBUNG, "colBESCHREIBUNG")
Me.colBESCHREIBUNG.FieldName = "BESCHREIBUNG"
Me.colBESCHREIBUNG.Name = "colBESCHREIBUNG"
'
'Button1 'Button1
' '
resources.ApplyResources(Me.Button1, "Button1") resources.ApplyResources(Me.Button1, "Button1")
@ -1383,12 +1389,6 @@ Partial Class frmWD_Dokumentart_Konfig
' '
Me.TBWH_DOKART_MODULETableAdapter.ClearBeforeFill = True Me.TBWH_DOKART_MODULETableAdapter.ClearBeforeFill = True
' '
'colBESCHREIBUNG
'
resources.ApplyResources(Me.colBESCHREIBUNG, "colBESCHREIBUNG")
Me.colBESCHREIBUNG.FieldName = "BESCHREIBUNG"
Me.colBESCHREIBUNG.Name = "colBESCHREIBUNG"
'
'frmWD_Dokumentart_Konfig 'frmWD_Dokumentart_Konfig
' '
resources.ApplyResources(Me, "$this") resources.ApplyResources(Me, "$this")

66
app/DD-Record-Organizer/frmWD_Dokumentart_Konfig.resx
View File

@ -956,7 +956,7 @@
<value>GridControl1</value> <value>GridControl1</value>
</data> </data>
<data name="&gt;&gt;GridControl1.Type" xml:space="preserve"> <data name="&gt;&gt;GridControl1.Type" xml:space="preserve">
<value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;GridControl1.Parent" xml:space="preserve"> <data name="&gt;&gt;GridControl1.Parent" xml:space="preserve">
<value>GroupBox1</value> <value>GroupBox1</value>
@ -1470,7 +1470,7 @@
<value>403, 56</value> <value>403, 56</value>
</metadata> </metadata>
<data name="ToolStripStatusLabel1.Size" type="System.Drawing.Size, System.Drawing"> <data name="ToolStripStatusLabel1.Size" type="System.Drawing.Size, System.Drawing">
<value>121, 17</value> <value>120, 17</value>
</data> </data>
<data name="ToolStripStatusLabel1.Text" xml:space="preserve"> <data name="ToolStripStatusLabel1.Text" xml:space="preserve">
<value>ToolStripStatusLabel1</value> <value>ToolStripStatusLabel1</value>
@ -2025,7 +2025,7 @@
<value>0, 25</value> <value>0, 25</value>
</data> </data>
<data name="ListBox2.Size" type="System.Drawing.Size, System.Drawing"> <data name="ListBox2.Size" type="System.Drawing.Size, System.Drawing">
<value>305, 210</value> <value>305, 207</value>
</data> </data>
<data name="ListBox2.TabIndex" type="System.Int32, mscorlib"> <data name="ListBox2.TabIndex" type="System.Int32, mscorlib">
<value>2</value> <value>2</value>
@ -2234,7 +2234,7 @@
<value>22</value> <value>22</value>
</data> </data>
<data name="XtraTabPage1.Size" type="System.Drawing.Size, System.Drawing"> <data name="XtraTabPage1.Size" type="System.Drawing.Size, System.Drawing">
<value>1265, 252</value> <value>1261, 249</value>
</data> </data>
<data name="XtraTabPage1.Text" xml:space="preserve"> <data name="XtraTabPage1.Text" xml:space="preserve">
<value>Automatische Indexe</value> <value>Automatische Indexe</value>
@ -2243,7 +2243,7 @@
<value>XtraTabPage1</value> <value>XtraTabPage1</value>
</data> </data>
<data name="&gt;&gt;XtraTabPage1.Type" xml:space="preserve"> <data name="&gt;&gt;XtraTabPage1.Type" xml:space="preserve">
<value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;XtraTabPage1.Parent" xml:space="preserve"> <data name="&gt;&gt;XtraTabPage1.Parent" xml:space="preserve">
<value>XtraTabControl1</value> <value>XtraTabControl1</value>
@ -2270,7 +2270,7 @@
<value>0, 25</value> <value>0, 25</value>
</data> </data>
<data name="ListBox1.Size" type="System.Drawing.Size, System.Drawing"> <data name="ListBox1.Size" type="System.Drawing.Size, System.Drawing">
<value>305, 227</value> <value>305, 224</value>
</data> </data>
<data name="ListBox1.TabIndex" type="System.Int32, mscorlib"> <data name="ListBox1.TabIndex" type="System.Int32, mscorlib">
<value>3</value> <value>3</value>
@ -2458,7 +2458,7 @@
<value>0, 0</value> <value>0, 0</value>
</data> </data>
<data name="BindingNavigator2.Size" type="System.Drawing.Size, System.Drawing"> <data name="BindingNavigator2.Size" type="System.Drawing.Size, System.Drawing">
<value>1265, 25</value> <value>1261, 25</value>
</data> </data>
<data name="BindingNavigator2.TabIndex" type="System.Int32, mscorlib"> <data name="BindingNavigator2.TabIndex" type="System.Int32, mscorlib">
<value>2</value> <value>2</value>
@ -2479,7 +2479,7 @@
<value>1</value> <value>1</value>
</data> </data>
<data name="XtraTabPage3.Size" type="System.Drawing.Size, System.Drawing"> <data name="XtraTabPage3.Size" type="System.Drawing.Size, System.Drawing">
<value>1265, 252</value> <value>1261, 249</value>
</data> </data>
<data name="XtraTabPage3.Text" xml:space="preserve"> <data name="XtraTabPage3.Text" xml:space="preserve">
<value>Manuelle Indexe</value> <value>Manuelle Indexe</value>
@ -2488,7 +2488,7 @@
<value>XtraTabPage3</value> <value>XtraTabPage3</value>
</data> </data>
<data name="&gt;&gt;XtraTabPage3.Type" xml:space="preserve"> <data name="&gt;&gt;XtraTabPage3.Type" xml:space="preserve">
<value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;XtraTabPage3.Parent" xml:space="preserve"> <data name="&gt;&gt;XtraTabPage3.Parent" xml:space="preserve">
<value>XtraTabControl1</value> <value>XtraTabControl1</value>
@ -2817,7 +2817,7 @@
<value>0, 0</value> <value>0, 0</value>
</data> </data>
<data name="BindingNavigator1.Size" type="System.Drawing.Size, System.Drawing"> <data name="BindingNavigator1.Size" type="System.Drawing.Size, System.Drawing">
<value>1265, 25</value> <value>1261, 25</value>
</data> </data>
<data name="BindingNavigator1.TabIndex" type="System.Int32, mscorlib"> <data name="BindingNavigator1.TabIndex" type="System.Int32, mscorlib">
<value>2</value> <value>2</value>
@ -2838,7 +2838,7 @@
<value>5</value> <value>5</value>
</data> </data>
<data name="XtraTabPage2.Size" type="System.Drawing.Size, System.Drawing"> <data name="XtraTabPage2.Size" type="System.Drawing.Size, System.Drawing">
<value>1265, 252</value> <value>1261, 249</value>
</data> </data>
<data name="XtraTabPage2.Text" xml:space="preserve"> <data name="XtraTabPage2.Text" xml:space="preserve">
<value>Zurodnung Dokumentart - Entität</value> <value>Zurodnung Dokumentart - Entität</value>
@ -2847,7 +2847,7 @@
<value>XtraTabPage2</value> <value>XtraTabPage2</value>
</data> </data>
<data name="&gt;&gt;XtraTabPage2.Type" xml:space="preserve"> <data name="&gt;&gt;XtraTabPage2.Type" xml:space="preserve">
<value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;XtraTabPage2.Parent" xml:space="preserve"> <data name="&gt;&gt;XtraTabPage2.Parent" xml:space="preserve">
<value>XtraTabControl1</value> <value>XtraTabControl1</value>
@ -3222,7 +3222,7 @@
<value>4</value> <value>4</value>
</data> </data>
<data name="XtraTabPage4.Size" type="System.Drawing.Size, System.Drawing"> <data name="XtraTabPage4.Size" type="System.Drawing.Size, System.Drawing">
<value>1265, 252</value> <value>1261, 249</value>
</data> </data>
<data name="XtraTabPage4.Text" xml:space="preserve"> <data name="XtraTabPage4.Text" xml:space="preserve">
<value>Variabler Ordnerpfad</value> <value>Variabler Ordnerpfad</value>
@ -3231,7 +3231,7 @@
<value>XtraTabPage4</value> <value>XtraTabPage4</value>
</data> </data>
<data name="&gt;&gt;XtraTabPage4.Type" xml:space="preserve"> <data name="&gt;&gt;XtraTabPage4.Type" xml:space="preserve">
<value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraTab.XtraTabPage, DevExpress.XtraEditors.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;XtraTabPage4.Parent" xml:space="preserve"> <data name="&gt;&gt;XtraTabPage4.Parent" xml:space="preserve">
<value>XtraTabControl1</value> <value>XtraTabControl1</value>
@ -3243,7 +3243,7 @@
<value>XtraTabControl1</value> <value>XtraTabControl1</value>
</data> </data>
<data name="&gt;&gt;XtraTabControl1.Type" xml:space="preserve"> <data name="&gt;&gt;XtraTabControl1.Type" xml:space="preserve">
<value>DevExpress.XtraTab.XtraTabControl, DevExpress.XtraEditors.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraTab.XtraTabControl, DevExpress.XtraEditors.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;XtraTabControl1.Parent" xml:space="preserve"> <data name="&gt;&gt;XtraTabControl1.Parent" xml:space="preserve">
<value>$this</value> <value>$this</value>
@ -3325,7 +3325,7 @@
<value>DD_DMSDataSet</value> <value>DD_DMSDataSet</value>
</data> </data>
<data name="&gt;&gt;DD_DMSDataSet.Type" xml:space="preserve"> <data name="&gt;&gt;DD_DMSDataSet.Type" xml:space="preserve">
<value>DD_Record_Organizer.DD_DMSDataSet, DD_DMSDataSet.Designer.vb, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>DD_Record_Organizer.DD_DMSDataSet, DD_DMSDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;BindingNavigatorCountItem.Name" xml:space="preserve"> <data name="&gt;&gt;BindingNavigatorCountItem.Name" xml:space="preserve">
<value>BindingNavigatorCountItem</value> <value>BindingNavigatorCountItem</value>
@ -3409,19 +3409,25 @@
<value>GridView1</value> <value>GridView1</value>
</data> </data>
<data name="&gt;&gt;GridView1.Type" xml:space="preserve"> <data name="&gt;&gt;GridView1.Type" xml:space="preserve">
<value>DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraGrid.Views.Grid.GridView, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;colBEZEICHNUNG.Name" xml:space="preserve"> <data name="&gt;&gt;colBEZEICHNUNG.Name" xml:space="preserve">
<value>colBEZEICHNUNG</value> <value>colBEZEICHNUNG</value>
</data> </data>
<data name="&gt;&gt;colBEZEICHNUNG.Type" xml:space="preserve"> <data name="&gt;&gt;colBEZEICHNUNG.Type" xml:space="preserve">
<value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;colOBJEKTTYP.Name" xml:space="preserve"> <data name="&gt;&gt;colOBJEKTTYP.Name" xml:space="preserve">
<value>colOBJEKTTYP</value> <value>colOBJEKTTYP</value>
</data> </data>
<data name="&gt;&gt;colOBJEKTTYP.Type" xml:space="preserve"> <data name="&gt;&gt;colOBJEKTTYP.Type" xml:space="preserve">
<value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;colBESCHREIBUNG.Name" xml:space="preserve">
<value>colBESCHREIBUNG</value>
</data>
<data name="&gt;&gt;colBESCHREIBUNG.Type" xml:space="preserve">
<value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;TBWH_DOKART_MODULEBindingSource.Name" xml:space="preserve"> <data name="&gt;&gt;TBWH_DOKART_MODULEBindingSource.Name" xml:space="preserve">
<value>TBWH_DOKART_MODULEBindingSource</value> <value>TBWH_DOKART_MODULEBindingSource</value>
@ -3439,25 +3445,25 @@
<value>TBDD_EINGANGSARTENTableAdapter</value> <value>TBDD_EINGANGSARTENTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBDD_EINGANGSARTENTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBDD_EINGANGSARTENTableAdapter.Type" xml:space="preserve">
<value>DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBDD_EINGANGSARTENTableAdapter, DD_DMSDataSet.Designer.vb, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBDD_EINGANGSARTENTableAdapter, DD_DMSDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve"> <data name="&gt;&gt;TableAdapterManager.Name" xml:space="preserve">
<value>TableAdapterManager</value> <value>TableAdapterManager</value>
</data> </data>
<data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve"> <data name="&gt;&gt;TableAdapterManager.Type" xml:space="preserve">
<value>DD_Record_Organizer.DD_DMSDataSetTableAdapters.TableAdapterManager, DD_DMSDataSet.Designer.vb, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>DD_Record_Organizer.DD_DMSDataSetTableAdapters.TableAdapterManager, DD_DMSDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBDD_DOKUMENTARTTableAdapter.Name" xml:space="preserve"> <data name="&gt;&gt;TBDD_DOKUMENTARTTableAdapter.Name" xml:space="preserve">
<value>TBDD_DOKUMENTARTTableAdapter</value> <value>TBDD_DOKUMENTARTTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBDD_DOKUMENTARTTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBDD_DOKUMENTARTTableAdapter.Type" xml:space="preserve">
<value>DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBDD_DOKUMENTARTTableAdapter, DD_DMSDataSet.Designer.vb, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBDD_DOKUMENTARTTableAdapter, DD_DMSDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBDD_INDEX_AUTOMTableAdapter.Name" xml:space="preserve"> <data name="&gt;&gt;TBDD_INDEX_AUTOMTableAdapter.Name" xml:space="preserve">
<value>TBDD_INDEX_AUTOMTableAdapter</value> <value>TBDD_INDEX_AUTOMTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBDD_INDEX_AUTOMTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBDD_INDEX_AUTOMTableAdapter.Type" xml:space="preserve">
<value>DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBDD_INDEX_AUTOMTableAdapter, DD_DMSDataSet.Designer.vb, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBDD_INDEX_AUTOMTableAdapter, DD_DMSDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBDD_INDEX_AUTOMBindingSource.Name" xml:space="preserve"> <data name="&gt;&gt;TBDD_INDEX_AUTOMBindingSource.Name" xml:space="preserve">
<value>TBDD_INDEX_AUTOMBindingSource</value> <value>TBDD_INDEX_AUTOMBindingSource</value>
@ -3751,31 +3757,25 @@
<value>TBPMO_FORM_VIEWTableAdapter</value> <value>TBPMO_FORM_VIEWTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBPMO_FORM_VIEWTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBPMO_FORM_VIEWTableAdapter.Type" xml:space="preserve">
<value>DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBPMO_FORM_VIEWTableAdapter, DD_DMSDataSet.Designer.vb, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBPMO_FORM_VIEWTableAdapter, DD_DMSDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBPMO_WD_FORMVIEW_DOKTYPESTableAdapter.Name" xml:space="preserve"> <data name="&gt;&gt;TBPMO_WD_FORMVIEW_DOKTYPESTableAdapter.Name" xml:space="preserve">
<value>TBPMO_WD_FORMVIEW_DOKTYPESTableAdapter</value> <value>TBPMO_WD_FORMVIEW_DOKTYPESTableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBPMO_WD_FORMVIEW_DOKTYPESTableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBPMO_WD_FORMVIEW_DOKTYPESTableAdapter.Type" xml:space="preserve">
<value>DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBPMO_WD_FORMVIEW_DOKTYPESTableAdapter, DD_DMSDataSet.Designer.vb, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBPMO_WD_FORMVIEW_DOKTYPESTableAdapter, DD_DMSDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;TBWH_DOKART_MODULETableAdapter.Name" xml:space="preserve"> <data name="&gt;&gt;TBWH_DOKART_MODULETableAdapter.Name" xml:space="preserve">
<value>TBWH_DOKART_MODULETableAdapter</value> <value>TBWH_DOKART_MODULETableAdapter</value>
</data> </data>
<data name="&gt;&gt;TBWH_DOKART_MODULETableAdapter.Type" xml:space="preserve"> <data name="&gt;&gt;TBWH_DOKART_MODULETableAdapter.Type" xml:space="preserve">
<value>DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBWH_DOKART_MODULETableAdapter, DD_DMSDataSet.Designer.vb, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value> <value>DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBWH_DOKART_MODULETableAdapter, DD_DMSDataSet.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</value>
</data> </data>
<data name="&gt;&gt;ToolTipController1.Name" xml:space="preserve"> <data name="&gt;&gt;ToolTipController1.Name" xml:space="preserve">
<value>ToolTipController1</value> <value>ToolTipController1</value>
</data> </data>
<data name="&gt;&gt;ToolTipController1.Type" xml:space="preserve"> <data name="&gt;&gt;ToolTipController1.Type" xml:space="preserve">
<value>DevExpress.Utils.ToolTipController, DevExpress.Utils.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.Utils.ToolTipController, DevExpress.Utils.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;colBESCHREIBUNG.Name" xml:space="preserve">
<value>colBESCHREIBUNG</value>
</data>
<data name="&gt;&gt;colBESCHREIBUNG.Type" xml:space="preserve">
<value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v15.2, Version=15.2.9.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;$this.Name" xml:space="preserve"> <data name="&gt;&gt;$this.Name" xml:space="preserve">
<value>frmWD_Dokumentart_Konfig</value> <value>frmWD_Dokumentart_Konfig</value>