MS_1204.2016_2

This commit is contained in:
SchreiberM 2016-04-13 12:51:46 +02:00
parent 5a1aaed2f4
commit dab2f6ff83
8 changed files with 3575 additions and 1 deletions

Binary file not shown.

After

Width:  |  Height:  |  Size: 325 B

View File

@ -804,7 +804,6 @@ Public Class frmConstructor_Main
' ..und einfügen
LEVEL2_NODE.Nodes.Add(LEVEL3_NODE)
Next
Next
End If

View File

@ -0,0 +1,538 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmRight_Management
Inherits System.Windows.Forms.Form
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Wird vom Windows Form-Designer benötigt.
Private components As System.ComponentModel.IContainer
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmRight_Management))
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Me.BindingNavigator1 = New System.Windows.Forms.BindingNavigator(Me.components)
Me.BindingNavigatorAddNewItem = New System.Windows.Forms.ToolStripButton()
Me.TBPMO_RIGHT_GROUPBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.DD_DMSDataSet = New DD_Record_Organiser.DD_DMSDataSet()
Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel()
Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorMoveFirstItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorMovePreviousItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorSeparator = New System.Windows.Forms.ToolStripSeparator()
Me.BindingNavigatorPositionItem = New System.Windows.Forms.ToolStripTextBox()
Me.BindingNavigatorSeparator1 = New System.Windows.Forms.ToolStripSeparator()
Me.BindingNavigatorMoveNextItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorMoveLastItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorSeparator2 = New System.Windows.Forms.ToolStripSeparator()
Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
Me.TBPMO_RIGHT_GROUPDataGridView = New System.Windows.Forms.DataGridView()
Me.TBWH_ENTITIESBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.DD_ECMAdmin = New DD_Record_Organiser.DD_ECMAdmin()
Me.TBDD_USER_GROUPSBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBWH_ENTITIESTableAdapter = New DD_Record_Organiser.DD_ECMAdminTableAdapters.TBWH_ENTITIESTableAdapter()
Me.TableAdapterManager1 = New DD_Record_Organiser.DD_ECMAdminTableAdapters.TableAdapterManager()
Me.TBWH_USER_GROUPSBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TBWH_USER_GROUPSTableAdapter = New DD_Record_Organiser.DD_ECMAdminTableAdapters.TBWH_USER_GROUPSTableAdapter()
Me.TBDD_USER_GROUPSTableAdapter = New DD_Record_Organiser.DD_DMSDataSetTableAdapters.TBDD_USER_GROUPSTableAdapter()
Me.TableAdapterManager = New DD_Record_Organiser.DD_DMSDataSetTableAdapters.TableAdapterManager()
Me.TBPMO_RIGHT_GROUPTableAdapter = New DD_Record_Organiser.DD_DMSDataSetTableAdapters.TBPMO_RIGHT_GROUPTableAdapter()
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
Me.tschangedlabel = New System.Windows.Forms.ToolStripStatusLabel()
Me.TabControl1 = New System.Windows.Forms.TabControl()
Me.TabPage1 = New System.Windows.Forms.TabPage()
Me.TabPage2 = New System.Windows.Forms.TabPage()
Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewComboBoxColumn()
Me.DataGridViewTextBoxColumn3 = New System.Windows.Forms.DataGridViewComboBoxColumn()
Me.DataGridViewCheckBoxColumn1 = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.DataGridViewCheckBoxColumn2 = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.DataGridViewCheckBoxColumn3 = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.DataGridViewCheckBoxColumn4 = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.DataGridViewCheckBoxColumn5 = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.DataGridViewCheckBoxColumn6 = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.DataGridViewTextBoxColumn4 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn5 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn6 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn7 = New System.Windows.Forms.DataGridViewTextBoxColumn()
CType(Me.BindingNavigator1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.BindingNavigator1.SuspendLayout()
CType(Me.TBPMO_RIGHT_GROUPBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DD_DMSDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBPMO_RIGHT_GROUPDataGridView, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBWH_ENTITIESBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DD_ECMAdmin, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBDD_USER_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBWH_USER_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
Me.StatusStrip1.SuspendLayout()
Me.TabControl1.SuspendLayout()
Me.TabPage1.SuspendLayout()
Me.SuspendLayout()
'
'BindingNavigator1
'
Me.BindingNavigator1.AddNewItem = Me.BindingNavigatorAddNewItem
Me.BindingNavigator1.BindingSource = Me.TBPMO_RIGHT_GROUPBindingSource
Me.BindingNavigator1.CountItem = Me.BindingNavigatorCountItem
Me.BindingNavigator1.DeleteItem = Me.BindingNavigatorDeleteItem
Me.BindingNavigator1.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.ToolStripButton1, Me.ToolStripButton2})
Me.BindingNavigator1.Location = New System.Drawing.Point(3, 3)
Me.BindingNavigator1.MoveFirstItem = Me.BindingNavigatorMoveFirstItem
Me.BindingNavigator1.MoveLastItem = Me.BindingNavigatorMoveLastItem
Me.BindingNavigator1.MoveNextItem = Me.BindingNavigatorMoveNextItem
Me.BindingNavigator1.MovePreviousItem = Me.BindingNavigatorMovePreviousItem
Me.BindingNavigator1.Name = "BindingNavigator1"
Me.BindingNavigator1.PositionItem = Me.BindingNavigatorPositionItem
Me.BindingNavigator1.Size = New System.Drawing.Size(1193, 25)
Me.BindingNavigator1.TabIndex = 4
Me.BindingNavigator1.Text = "BindingNavigator1"
'
'BindingNavigatorAddNewItem
'
Me.BindingNavigatorAddNewItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorAddNewItem.Image = CType(resources.GetObject("BindingNavigatorAddNewItem.Image"), System.Drawing.Image)
Me.BindingNavigatorAddNewItem.Name = "BindingNavigatorAddNewItem"
Me.BindingNavigatorAddNewItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorAddNewItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorAddNewItem.Text = "Add new"
'
'TBPMO_RIGHT_GROUPBindingSource
'
Me.TBPMO_RIGHT_GROUPBindingSource.DataMember = "TBPMO_RIGHT_GROUP"
Me.TBPMO_RIGHT_GROUPBindingSource.DataSource = Me.DD_DMSDataSet
'
'DD_DMSDataSet
'
Me.DD_DMSDataSet.DataSetName = "DD_DMSDataSet"
Me.DD_DMSDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
'
'BindingNavigatorCountItem
'
Me.BindingNavigatorCountItem.Name = "BindingNavigatorCountItem"
Me.BindingNavigatorCountItem.Size = New System.Drawing.Size(44, 22)
Me.BindingNavigatorCountItem.Text = "von {0}"
Me.BindingNavigatorCountItem.ToolTipText = "Die Gesamtanzahl der Elemente."
'
'BindingNavigatorDeleteItem
'
Me.BindingNavigatorDeleteItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorDeleteItem.Image = CType(resources.GetObject("BindingNavigatorDeleteItem.Image"), System.Drawing.Image)
Me.BindingNavigatorDeleteItem.Name = "BindingNavigatorDeleteItem"
Me.BindingNavigatorDeleteItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorDeleteItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorDeleteItem.Text = "Delete"
'
'BindingNavigatorMoveFirstItem
'
Me.BindingNavigatorMoveFirstItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveFirstItem.Image = CType(resources.GetObject("BindingNavigatorMoveFirstItem.Image"), System.Drawing.Image)
Me.BindingNavigatorMoveFirstItem.Name = "BindingNavigatorMoveFirstItem"
Me.BindingNavigatorMoveFirstItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveFirstItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMoveFirstItem.Text = "Erste verschieben"
'
'BindingNavigatorMovePreviousItem
'
Me.BindingNavigatorMovePreviousItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMovePreviousItem.Image = CType(resources.GetObject("BindingNavigatorMovePreviousItem.Image"), System.Drawing.Image)
Me.BindingNavigatorMovePreviousItem.Name = "BindingNavigatorMovePreviousItem"
Me.BindingNavigatorMovePreviousItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMovePreviousItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMovePreviousItem.Text = "Vorherige verschieben"
'
'BindingNavigatorSeparator
'
Me.BindingNavigatorSeparator.Name = "BindingNavigatorSeparator"
Me.BindingNavigatorSeparator.Size = New System.Drawing.Size(6, 25)
'
'BindingNavigatorPositionItem
'
Me.BindingNavigatorPositionItem.AccessibleName = "Position"
Me.BindingNavigatorPositionItem.AutoSize = False
Me.BindingNavigatorPositionItem.Name = "BindingNavigatorPositionItem"
Me.BindingNavigatorPositionItem.Size = New System.Drawing.Size(50, 23)
Me.BindingNavigatorPositionItem.Text = "0"
Me.BindingNavigatorPositionItem.ToolTipText = "Aktuelle Position"
'
'BindingNavigatorSeparator1
'
Me.BindingNavigatorSeparator1.Name = "BindingNavigatorSeparator1"
Me.BindingNavigatorSeparator1.Size = New System.Drawing.Size(6, 25)
'
'BindingNavigatorMoveNextItem
'
Me.BindingNavigatorMoveNextItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveNextItem.Image = CType(resources.GetObject("BindingNavigatorMoveNextItem.Image"), System.Drawing.Image)
Me.BindingNavigatorMoveNextItem.Name = "BindingNavigatorMoveNextItem"
Me.BindingNavigatorMoveNextItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveNextItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMoveNextItem.Text = "Nächste verschieben"
'
'BindingNavigatorMoveLastItem
'
Me.BindingNavigatorMoveLastItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveLastItem.Image = CType(resources.GetObject("BindingNavigatorMoveLastItem.Image"), System.Drawing.Image)
Me.BindingNavigatorMoveLastItem.Name = "BindingNavigatorMoveLastItem"
Me.BindingNavigatorMoveLastItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveLastItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMoveLastItem.Text = "Letzte verschieben"
'
'BindingNavigatorSeparator2
'
Me.BindingNavigatorSeparator2.Name = "BindingNavigatorSeparator2"
Me.BindingNavigatorSeparator2.Size = New System.Drawing.Size(6, 25)
'
'ToolStripButton1
'
Me.ToolStripButton1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.ToolStripButton1.Image = Global.DD_Record_Organiser.My.Resources.Resources.save
Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton1.Name = "ToolStripButton1"
Me.ToolStripButton1.Size = New System.Drawing.Size(23, 22)
Me.ToolStripButton1.Text = "Save Group Rights"
'
'ToolStripButton2
'
Me.ToolStripButton2.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.ToolStripButton2.Image = Global.DD_Record_Organiser.My.Resources.Resources.refresh_16xLG
Me.ToolStripButton2.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton2.Name = "ToolStripButton2"
Me.ToolStripButton2.Size = New System.Drawing.Size(23, 22)
Me.ToolStripButton2.Text = "Refresh"
'
'TBPMO_RIGHT_GROUPDataGridView
'
DataGridViewCellStyle1.BackColor = System.Drawing.Color.Lime
Me.TBPMO_RIGHT_GROUPDataGridView.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
Me.TBPMO_RIGHT_GROUPDataGridView.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.TBPMO_RIGHT_GROUPDataGridView.AutoGenerateColumns = False
Me.TBPMO_RIGHT_GROUPDataGridView.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.TBPMO_RIGHT_GROUPDataGridView.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.DataGridViewTextBoxColumn1, Me.DataGridViewTextBoxColumn2, Me.DataGridViewTextBoxColumn3, Me.DataGridViewCheckBoxColumn1, Me.DataGridViewCheckBoxColumn2, Me.DataGridViewCheckBoxColumn3, Me.DataGridViewCheckBoxColumn4, Me.DataGridViewCheckBoxColumn5, Me.DataGridViewCheckBoxColumn6, Me.DataGridViewTextBoxColumn4, Me.DataGridViewTextBoxColumn5, Me.DataGridViewTextBoxColumn6, Me.DataGridViewTextBoxColumn7})
Me.TBPMO_RIGHT_GROUPDataGridView.DataSource = Me.TBPMO_RIGHT_GROUPBindingSource
Me.TBPMO_RIGHT_GROUPDataGridView.Location = New System.Drawing.Point(6, 31)
Me.TBPMO_RIGHT_GROUPDataGridView.Name = "TBPMO_RIGHT_GROUPDataGridView"
Me.TBPMO_RIGHT_GROUPDataGridView.Size = New System.Drawing.Size(1190, 506)
Me.TBPMO_RIGHT_GROUPDataGridView.TabIndex = 4
'
'TBWH_ENTITIESBindingSource
'
Me.TBWH_ENTITIESBindingSource.DataMember = "TBWH_ENTITIES"
Me.TBWH_ENTITIESBindingSource.DataSource = Me.DD_ECMAdmin
'
'DD_ECMAdmin
'
Me.DD_ECMAdmin.DataSetName = "DD_ECMAdmin"
Me.DD_ECMAdmin.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
'
'TBDD_USER_GROUPSBindingSource
'
Me.TBDD_USER_GROUPSBindingSource.DataMember = "TBDD_USER_GROUPS"
Me.TBDD_USER_GROUPSBindingSource.DataSource = Me.DD_DMSDataSet
'
'TBWH_ENTITIESTableAdapter
'
Me.TBWH_ENTITIESTableAdapter.ClearBeforeFill = True
'
'TableAdapterManager1
'
Me.TableAdapterManager1.BackupDataSetBeforeUpdate = False
Me.TableAdapterManager1.Connection = Nothing
Me.TableAdapterManager1.TBDD_CONNECTIONTableAdapter = Nothing
Me.TableAdapterManager1.TBPMO_FORM_CONSTRUCTOR_DETAILTableAdapter = Nothing
Me.TableAdapterManager1.TBPMO_FORM_CONSTRUCTORTableAdapter = Nothing
Me.TableAdapterManager1.UpdateOrder = DD_Record_Organiser.DD_ECMAdminTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
'
'TBWH_USER_GROUPSBindingSource
'
Me.TBWH_USER_GROUPSBindingSource.DataMember = "TBWH_USER_GROUPS"
Me.TBWH_USER_GROUPSBindingSource.DataSource = Me.DD_ECMAdmin
'
'TBWH_USER_GROUPSTableAdapter
'
Me.TBWH_USER_GROUPSTableAdapter.ClearBeforeFill = True
'
'TBDD_USER_GROUPSTableAdapter
'
Me.TBDD_USER_GROUPSTableAdapter.ClearBeforeFill = True
'
'TableAdapterManager
'
Me.TableAdapterManager.BackupDataSetBeforeUpdate = False
Me.TableAdapterManager.TBDD_CLIENTTableAdapter = Nothing
Me.TableAdapterManager.TBDD_CONNECTIONTableAdapter = Nothing
Me.TableAdapterManager.TBDD_DOKUMENTARTTableAdapter = Nothing
Me.TableAdapterManager.TBDD_EINGANGSARTENTableAdapter = Nothing
Me.TableAdapterManager.TBDD_EMAIL_ACCOUNTTableAdapter = Nothing
Me.TableAdapterManager.TBDD_GROUPS_USERTableAdapter = Nothing
Me.TableAdapterManager.TBDD_INDEX_AUTOMTableAdapter = Nothing
Me.TableAdapterManager.TBDD_USER_GROUPSTableAdapter = Me.TBDD_USER_GROUPSTableAdapter
Me.TableAdapterManager.TBDD_USERTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_CONSTRUCTOR_USER_SQLTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_FILES_USERTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_FOLLOW_UP_EMAILTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_FOLLUPEMAIL_USERTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_FORM_CONSTRUCTOR_DETAILTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_FORM_CONSTRUCTORTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_FORM_TYPETableAdapter = Nothing
Me.TableAdapterManager.TBPMO_FORM_VIEWTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_FORMTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_KONFIGURATIONTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_LANGUAGE_OBJECTTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_RECORD_LOG_CONFIGTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_RECORDTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_RIGHT_GROUPTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_TEMPLATE_ENTITYTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_TEMPLATE_PATTERNTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_TEMPLATETableAdapter = Nothing
Me.TableAdapterManager.TBPMO_WD_FVIEW_DT_INDEXTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_WD_IMPORT_PROFILE_IDXTableAdapter = Nothing
Me.TableAdapterManager.TBPMO_WD_IMPORT_PROFILETableAdapter = Nothing
Me.TableAdapterManager.TBPMO_WD_OBJECTTYPETableAdapter = Nothing
Me.TableAdapterManager.TBPMO_WORKFLOW_TASK_STATETableAdapter = Nothing
Me.TableAdapterManager.TBPMO_WORKFLOWTableAdapter = Nothing
Me.TableAdapterManager.UpdateOrder = DD_Record_Organiser.DD_DMSDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
'
'TBPMO_RIGHT_GROUPTableAdapter
'
Me.TBPMO_RIGHT_GROUPTableAdapter.ClearBeforeFill = True
'
'StatusStrip1
'
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tschangedlabel})
Me.StatusStrip1.Location = New System.Drawing.Point(0, 569)
Me.StatusStrip1.Name = "StatusStrip1"
Me.StatusStrip1.Size = New System.Drawing.Size(1207, 22)
Me.StatusStrip1.TabIndex = 5
Me.StatusStrip1.Text = "StatusStrip1"
'
'tschangedlabel
'
Me.tschangedlabel.BackColor = System.Drawing.Color.Yellow
Me.tschangedlabel.Name = "tschangedlabel"
Me.tschangedlabel.Size = New System.Drawing.Size(0, 17)
Me.tschangedlabel.Visible = False
'
'TabControl1
'
Me.TabControl1.Controls.Add(Me.TabPage1)
Me.TabControl1.Controls.Add(Me.TabPage2)
Me.TabControl1.Dock = System.Windows.Forms.DockStyle.Fill
Me.TabControl1.Location = New System.Drawing.Point(0, 0)
Me.TabControl1.Name = "TabControl1"
Me.TabControl1.SelectedIndex = 0
Me.TabControl1.Size = New System.Drawing.Size(1207, 569)
Me.TabControl1.TabIndex = 6
'
'TabPage1
'
Me.TabPage1.Controls.Add(Me.BindingNavigator1)
Me.TabPage1.Controls.Add(Me.TBPMO_RIGHT_GROUPDataGridView)
Me.TabPage1.Location = New System.Drawing.Point(4, 22)
Me.TabPage1.Name = "TabPage1"
Me.TabPage1.Padding = New System.Windows.Forms.Padding(3)
Me.TabPage1.Size = New System.Drawing.Size(1199, 543)
Me.TabPage1.TabIndex = 0
Me.TabPage1.Text = "Gruppen Rechte"
Me.TabPage1.UseVisualStyleBackColor = True
'
'TabPage2
'
Me.TabPage2.Location = New System.Drawing.Point(4, 22)
Me.TabPage2.Name = "TabPage2"
Me.TabPage2.Padding = New System.Windows.Forms.Padding(3)
Me.TabPage2.Size = New System.Drawing.Size(1199, 543)
Me.TabPage2.TabIndex = 1
Me.TabPage2.Text = "TabPage2"
Me.TabPage2.UseVisualStyleBackColor = True
'
'DataGridViewTextBoxColumn1
'
Me.DataGridViewTextBoxColumn1.DataPropertyName = "GUID"
Me.DataGridViewTextBoxColumn1.HeaderText = "ID"
Me.DataGridViewTextBoxColumn1.Name = "DataGridViewTextBoxColumn1"
Me.DataGridViewTextBoxColumn1.ReadOnly = True
Me.DataGridViewTextBoxColumn1.Width = 40
'
'DataGridViewTextBoxColumn2
'
Me.DataGridViewTextBoxColumn2.DataPropertyName = "ENTITY_ID"
Me.DataGridViewTextBoxColumn2.DataSource = Me.TBWH_ENTITIESBindingSource
Me.DataGridViewTextBoxColumn2.DisplayMember = "CAPTION"
Me.DataGridViewTextBoxColumn2.HeaderText = "Entität"
Me.DataGridViewTextBoxColumn2.Name = "DataGridViewTextBoxColumn2"
Me.DataGridViewTextBoxColumn2.Resizable = System.Windows.Forms.DataGridViewTriState.[True]
Me.DataGridViewTextBoxColumn2.SortMode = System.Windows.Forms.DataGridViewColumnSortMode.Automatic
Me.DataGridViewTextBoxColumn2.ValueMember = "GUID"
Me.DataGridViewTextBoxColumn2.Width = 150
'
'DataGridViewTextBoxColumn3
'
Me.DataGridViewTextBoxColumn3.DataPropertyName = "GROUP_ID"
Me.DataGridViewTextBoxColumn3.DataSource = Me.TBDD_USER_GROUPSBindingSource
Me.DataGridViewTextBoxColumn3.DisplayMember = "NAME"
Me.DataGridViewTextBoxColumn3.HeaderText = "Gruppe"
Me.DataGridViewTextBoxColumn3.Name = "DataGridViewTextBoxColumn3"
Me.DataGridViewTextBoxColumn3.Resizable = System.Windows.Forms.DataGridViewTriState.[True]
Me.DataGridViewTextBoxColumn3.SortMode = System.Windows.Forms.DataGridViewColumnSortMode.Automatic
Me.DataGridViewTextBoxColumn3.ValueMember = "GUID"
Me.DataGridViewTextBoxColumn3.Width = 150
'
'DataGridViewCheckBoxColumn1
'
Me.DataGridViewCheckBoxColumn1.DataPropertyName = "EDIT_REC"
Me.DataGridViewCheckBoxColumn1.HeaderText = "Edit Record"
Me.DataGridViewCheckBoxColumn1.Name = "DataGridViewCheckBoxColumn1"
Me.DataGridViewCheckBoxColumn1.Width = 60
'
'DataGridViewCheckBoxColumn2
'
Me.DataGridViewCheckBoxColumn2.DataPropertyName = "ADD_REC"
Me.DataGridViewCheckBoxColumn2.HeaderText = "Add Record"
Me.DataGridViewCheckBoxColumn2.Name = "DataGridViewCheckBoxColumn2"
Me.DataGridViewCheckBoxColumn2.Width = 60
'
'DataGridViewCheckBoxColumn3
'
Me.DataGridViewCheckBoxColumn3.DataPropertyName = "DELETE_REC"
Me.DataGridViewCheckBoxColumn3.HeaderText = "Delete Record"
Me.DataGridViewCheckBoxColumn3.Name = "DataGridViewCheckBoxColumn3"
Me.DataGridViewCheckBoxColumn3.Width = 60
'
'DataGridViewCheckBoxColumn4
'
Me.DataGridViewCheckBoxColumn4.DataPropertyName = "ADD_DOC"
Me.DataGridViewCheckBoxColumn4.HeaderText = "Add Doc"
Me.DataGridViewCheckBoxColumn4.Name = "DataGridViewCheckBoxColumn4"
Me.DataGridViewCheckBoxColumn4.Width = 60
'
'DataGridViewCheckBoxColumn5
'
Me.DataGridViewCheckBoxColumn5.DataPropertyName = "VIEW_DOC"
Me.DataGridViewCheckBoxColumn5.HeaderText = "View Doc"
Me.DataGridViewCheckBoxColumn5.Name = "DataGridViewCheckBoxColumn5"
Me.DataGridViewCheckBoxColumn5.Width = 60
'
'DataGridViewCheckBoxColumn6
'
Me.DataGridViewCheckBoxColumn6.DataPropertyName = "DELETE_DOC"
Me.DataGridViewCheckBoxColumn6.HeaderText = "Delete Doc"
Me.DataGridViewCheckBoxColumn6.Name = "DataGridViewCheckBoxColumn6"
Me.DataGridViewCheckBoxColumn6.Width = 60
'
'DataGridViewTextBoxColumn4
'
Me.DataGridViewTextBoxColumn4.DataPropertyName = "ADDED_WHO"
Me.DataGridViewTextBoxColumn4.HeaderText = "Added who"
Me.DataGridViewTextBoxColumn4.Name = "DataGridViewTextBoxColumn4"
'
'DataGridViewTextBoxColumn5
'
Me.DataGridViewTextBoxColumn5.DataPropertyName = "ADDED_WHEN"
Me.DataGridViewTextBoxColumn5.HeaderText = "Added when"
Me.DataGridViewTextBoxColumn5.Name = "DataGridViewTextBoxColumn5"
'
'DataGridViewTextBoxColumn6
'
Me.DataGridViewTextBoxColumn6.DataPropertyName = "CHANGED_WHO"
Me.DataGridViewTextBoxColumn6.HeaderText = "Changed who"
Me.DataGridViewTextBoxColumn6.Name = "DataGridViewTextBoxColumn6"
'
'DataGridViewTextBoxColumn7
'
Me.DataGridViewTextBoxColumn7.DataPropertyName = "CHANGED_WHEN"
Me.DataGridViewTextBoxColumn7.HeaderText = "Changed when"
Me.DataGridViewTextBoxColumn7.Name = "DataGridViewTextBoxColumn7"
'
'frmRight_Management
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(1207, 591)
Me.Controls.Add(Me.TabControl1)
Me.Controls.Add(Me.StatusStrip1)
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.Name = "frmRight_Management"
Me.Text = "Rechte Konfiguration Recordmanagement und Dateihandling"
CType(Me.BindingNavigator1, System.ComponentModel.ISupportInitialize).EndInit()
Me.BindingNavigator1.ResumeLayout(False)
Me.BindingNavigator1.PerformLayout()
CType(Me.TBPMO_RIGHT_GROUPBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DD_DMSDataSet, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBPMO_RIGHT_GROUPDataGridView, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBWH_ENTITIESBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DD_ECMAdmin, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBDD_USER_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBWH_USER_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
Me.StatusStrip1.ResumeLayout(False)
Me.StatusStrip1.PerformLayout()
Me.TabControl1.ResumeLayout(False)
Me.TabPage1.ResumeLayout(False)
Me.TabPage1.PerformLayout()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents DD_DMSDataSet As DD_Record_Organiser.DD_DMSDataSet
Friend WithEvents TBDD_USER_GROUPSBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBDD_USER_GROUPSTableAdapter As DD_Record_Organiser.DD_DMSDataSetTableAdapters.TBDD_USER_GROUPSTableAdapter
Friend WithEvents TableAdapterManager As DD_Record_Organiser.DD_DMSDataSetTableAdapters.TableAdapterManager
Friend WithEvents TBPMO_RIGHT_GROUPBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBPMO_RIGHT_GROUPTableAdapter As DD_Record_Organiser.DD_DMSDataSetTableAdapters.TBPMO_RIGHT_GROUPTableAdapter
Friend WithEvents BindingNavigator1 As System.Windows.Forms.BindingNavigator
Friend WithEvents BindingNavigatorAddNewItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorCountItem As System.Windows.Forms.ToolStripLabel
Friend WithEvents BindingNavigatorDeleteItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorMoveFirstItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorMovePreviousItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorSeparator As System.Windows.Forms.ToolStripSeparator
Friend WithEvents BindingNavigatorPositionItem As System.Windows.Forms.ToolStripTextBox
Friend WithEvents BindingNavigatorSeparator1 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents BindingNavigatorMoveNextItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorMoveLastItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorSeparator2 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents TBPMO_RIGHT_GROUPDataGridView As System.Windows.Forms.DataGridView
Friend WithEvents DD_ECMAdmin As DD_Record_Organiser.DD_ECMAdmin
Friend WithEvents TBWH_ENTITIESBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBWH_ENTITIESTableAdapter As DD_Record_Organiser.DD_ECMAdminTableAdapters.TBWH_ENTITIESTableAdapter
Friend WithEvents TableAdapterManager1 As DD_Record_Organiser.DD_ECMAdminTableAdapters.TableAdapterManager
Friend WithEvents TBWH_USER_GROUPSBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBWH_USER_GROUPSTableAdapter As DD_Record_Organiser.DD_ECMAdminTableAdapters.TBWH_USER_GROUPSTableAdapter
Friend WithEvents ToolStripButton1 As System.Windows.Forms.ToolStripButton
Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip
Friend WithEvents TabControl1 As System.Windows.Forms.TabControl
Friend WithEvents TabPage1 As System.Windows.Forms.TabPage
Friend WithEvents TabPage2 As System.Windows.Forms.TabPage
Friend WithEvents tschangedlabel As System.Windows.Forms.ToolStripStatusLabel
Friend WithEvents ToolStripButton2 As System.Windows.Forms.ToolStripButton
Friend WithEvents DataGridViewTextBoxColumn1 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn2 As System.Windows.Forms.DataGridViewComboBoxColumn
Friend WithEvents DataGridViewTextBoxColumn3 As System.Windows.Forms.DataGridViewComboBoxColumn
Friend WithEvents DataGridViewCheckBoxColumn1 As System.Windows.Forms.DataGridViewCheckBoxColumn
Friend WithEvents DataGridViewCheckBoxColumn2 As System.Windows.Forms.DataGridViewCheckBoxColumn
Friend WithEvents DataGridViewCheckBoxColumn3 As System.Windows.Forms.DataGridViewCheckBoxColumn
Friend WithEvents DataGridViewCheckBoxColumn4 As System.Windows.Forms.DataGridViewCheckBoxColumn
Friend WithEvents DataGridViewCheckBoxColumn5 As System.Windows.Forms.DataGridViewCheckBoxColumn
Friend WithEvents DataGridViewCheckBoxColumn6 As System.Windows.Forms.DataGridViewCheckBoxColumn
Friend WithEvents DataGridViewTextBoxColumn4 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn5 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn6 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn7 As System.Windows.Forms.DataGridViewTextBoxColumn
End Class

View File

@ -0,0 +1,260 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="BindingNavigator1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>405, 56</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="BindingNavigatorAddNewItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAAUpJREFUOE9jGLzg7gL2/7fmcf6/Oofr/8UZvP+hwsSD60CNfx41/v/zsOH/yckC
pBtwfjov3ICDPSKkG3B8kiBQc93/Pw+q/u9oFydswKWZPP/PTuX7fxKo8Ui/0P993SJAzeX//94r+r++
Qeb/qhq5/0srFf/PL1X+P6tIFdPAU0B//nlYD9RUC8SV///cKwHivP9/72b+/3sn+f/f23H//92MAOKQ
/5NyNDENONQrDHbu3/ulQI0FQI3ZQI2pQI0J///digZqDPv/70bQ/3/X/f53peliGrCzXeL/lmap/+vA
zpX/v6RC8f/fWzFAjeH/p+Zp/J+QpfW/O0P3f3uq/v/mREPCYTIb6E+Qc//dCPjfk6FDWAM6APnz3w1/
IPb735qsT7oB3em6YP+CcH2cEekGtCQZ/G+IN/xfE2v8vzLahHQD6AQYGAAkI9iedfyIaQAAAABJRU5E
rkJggg==
</value>
</data>
<metadata name="TBPMO_RIGHT_GROUPBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>822, 17</value>
</metadata>
<metadata name="DD_DMSDataSet.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<data name="BindingNavigatorDeleteItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAAW9JREFUOE+1kE0ow2Ecx3dV3krt4oJaOSCTvIRkMqSxyITIzCQHDouEdnFwIOVC
DrhIDiQl5UTiNG/z2ppafy1S2gX/uDwfY6i1v7Hie3nqeb7fz+/7/FR/Ilwn0G0Exw4fV5GJlXlEZxXC
rIet9bAQvB5Ymgn2sLYAvSZEux7RUQFzE4qQt4bCXAYjPaHvnDoCkLpsRGMB2JqCTGLIijDlwqQ9bEMV
i9OIytR3EMNWcJ/BWH8A6j8/bOGFxwXNxYEvGbMQ9XnQ1/K78KfY3/VXzkMY0qFGG2H4RoLGQshJQNbG
86CNhdrsX9a/uQZTPhQl4rMY4OLofbl3aX7I8uwPC7y/g1YdjyVJuEvT8e1tfwUYteHUxCCfHChDeHmG
QQvokjlOU+PbWA0x3pZnILVVI3uvQyHsbiLnqnGmRCF1NYD8pDhpRxOH7HQoAKZGkFKjceszQbpSrumX
bO+G80MFwKUTxgfgcO/b8D9IpXoFiiMDHIQm0skAAAAASUVORK5CYII=
</value>
</data>
<data name="BindingNavigatorMoveFirstItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77
wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0
v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg
UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA
Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu
lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII=
</value>
</data>
<data name="BindingNavigatorMovePreviousItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w
5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f
Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+
08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC
</value>
</data>
<data name="BindingNavigatorMoveNextItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78
n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI
N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f
oAc0QjgAAAAASUVORK5CYII=
</value>
</data>
<data name="BindingNavigatorMoveLastItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+//
h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B
twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA
kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG
WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9
8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg==
</value>
</data>
<metadata name="TBWH_ENTITIESBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>694, 56</value>
</metadata>
<metadata name="DD_ECMAdmin.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>559, 56</value>
</metadata>
<metadata name="TBDD_USER_GROUPSBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>160, 17</value>
</metadata>
<metadata name="TBWH_ENTITIESTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>911, 56</value>
</metadata>
<metadata name="TableAdapterManager1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 95</value>
</metadata>
<metadata name="TBWH_USER_GROUPSBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>197, 95</value>
</metadata>
<metadata name="TBWH_USER_GROUPSTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>447, 95</value>
</metadata>
<metadata name="TBDD_USER_GROUPSTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>407, 17</value>
</metadata>
<metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>649, 17</value>
</metadata>
<metadata name="TBPMO_RIGHT_GROUPTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 56</value>
</metadata>
<metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>692, 95</value>
</metadata>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAIAEBAQAAEABAAoAQAAJgAAABAQAAABAAgAaAUAAE4BAAAoAAAAEAAAACAAAAABAAQAAAAAAIAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAgAAAAICAAIAAAACAAIAAgIAAAICAgADAwMAAAAD/AAD/
AAAA//8A/wAAAP8A/wD//wAA////AAD/////////APf/93d3d38A93f3d3d3fwD3//d3d3d/APd393d3
d38A9//3d3d3fwD393d4h3d/+Hd4d3/3d3/3eHf///////ePh/93d/AA93h393d3fwD4d3j3d3d/AA//
//d3d38AAAAA93d3fwAAAAAPd3fwAAAAAAD//wAAwAAAAMAAAADAAAAAwAAAAMAAAADAAAAAwAAAAAAA
AAAAAAAAAAcAAAADAAAAAwAAgAMAAPwDAAD+BwAA/w8AACgAAAAQAAAAIAAAAAEACAAAAAAAAAEAAAAA
AAAAAAAAAAEAAAABAAAAAAAAQkJCAE1NTQBZWVkAZGRkAG9vbwCGhoYAnJycAKenpwCzs7MAvr6+AMnJ
yQDU1NQA4ODgAOvr6wD29vYA+fn5AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAD///8AAAAPDw8PDw8PDw8PDw8PDwAADwEPDw8BAQEBAQEBAQ8AAA8BAQEPAQEB
AQEBAQEPAAAPAQ8PDwEBAQEBAQEBDwAADwEBAQ8BAQEBAQEBAQ8AAA8BDw8PAQEEBAEBAQEPAAAPAQ0C
AQEBDAwBAQEBDxAJAgECCAMBBw8PBwEBAQ8PAgYLBgIPDw8PDw8PDw8PDwELDwsBDw4FAQEFDgAAAA8C
BgsGAg8FAQEBAQUPAAAQCgIBAgoPAQEBAQEBDQAAABAPDw8QDwEBAQEBAQ8AAAAAAAAAAA8FAQEBAQUP
AAAAAAAAAAAADgUBAQUOAAAAAAAAAAAAAAAPDw8PAAAAAMAAAADAAAAAwAAAAMAAAADAAAAAwAAAAMAA
AAAAAAAAAAAAAAAHAAAAAwAAAAMAAIADAAD8AwAA/gcAAP8PAAA=
</value>
</data>
</root>

View File

@ -0,0 +1,104 @@
Public Class frmRight_Management
Private Shared _Instance As frmRight_Management = Nothing
Private insert As Boolean = False
Public Shared Function Instance() As frmRight_Management
If _Instance Is Nothing OrElse _Instance.IsDisposed = True Then
_Instance = New frmRight_Management
End If
_Instance.BringToFront()
Return _Instance
End Function
Private Sub Save_Data()
Try
Me.Validate()
Me.TBPMO_RIGHT_GROUPBindingSource.EndEdit()
If DD_DMSDataSet.TBPMO_RIGHT_GROUP.GetChanges Is Nothing = False Then
Me.TBPMO_RIGHT_GROUPDataGridView.CurrentRow.Cells("DataGridViewTextBoxColumn6").Value = Environment.UserName
Me.TBPMO_RIGHT_GROUPBindingSource.EndEdit()
Me.TBPMO_RIGHT_GROUPTableAdapter.Update(DD_DMSDataSet.TBPMO_RIGHT_GROUP)
tschangedlabel.Text = "Right Group changed - " & Now
tschangedlabel.Visible = True
Else
tschangedlabel.Visible = False
End If
Catch ex As Exception
MsgBox("Error in Save_Data:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Sub Load_Datagrid(ByVal _Datagrid As DataGridView, ByVal _settings_String As String)
Dim settings() As String
If My.Settings(_settings_String) <> String.Empty Then
settings = My.Settings(_settings_String).Split("$"c)
For idx As Integer = 0 To _Datagrid.Columns.Count - 1
Dim sv() As String = settings(idx).Split("/"c)
_Datagrid.Columns(idx).DisplayIndex = CInt(sv(0))
_Datagrid.Columns(idx).Width = CInt(sv(1))
Next
End If
End Sub
Sub Save_Datagrid(ByVal _Datagrid As DataGridView, ByVal _settings_String As String)
Dim settings As String = String.Empty
For idx As Integer = 0 To _Datagrid.Columns.Count - 1
settings += _Datagrid.Columns(idx).DisplayIndex.ToString()
settings += "/"
settings += _Datagrid.Columns(idx).Width.ToString
settings += "$"
Next
My.Settings(_settings_String) = settings
End Sub
Private Sub frmRight_Management_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
Save_Datagrid(TBPMO_RIGHT_GROUPDataGridView, "TBPMO_RIGHT_GROUPDataGridView")
End Sub
Private Sub frmGroup_Rights_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Refresh_Entities()
Try
Me.TBWH_USER_GROUPSTableAdapter.Connection.ConnectionString = MyConnectionString
Me.TBWH_USER_GROUPSTableAdapter.Fill(Me.DD_ECMAdmin.TBWH_USER_GROUPS)
Me.TBDD_USER_GROUPSTableAdapter.Connection.ConnectionString = MyConnectionString
Me.TBDD_USER_GROUPSTableAdapter.Fill(Me.DD_DMSDataSet.TBDD_USER_GROUPS)
Catch ex As Exception
MsgBox("Error in Loading Form:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
Refresh_Rights_Groups()
Load_Datagrid(TBPMO_RIGHT_GROUPDataGridView, "TBPMO_RIGHT_GROUPDataGridView")
End Sub
Sub Refresh_Rights_Groups()
Try
Me.TBPMO_RIGHT_GROUPTableAdapter.Connection.ConnectionString = MyConnectionString
Me.TBPMO_RIGHT_GROUPTableAdapter.Fill(Me.DD_DMSDataSet.TBPMO_RIGHT_GROUP)
Catch ex As Exception
MsgBox("Error in Refresh_Rights_Groups:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Private Sub Refresh_Entities()
Try
Me.TBWH_ENTITIESTableAdapter.Connection.ConnectionString = MyConnectionString
Me.TBWH_ENTITIESTableAdapter.Fill(Me.DD_ECMAdmin.TBWH_ENTITIES, USER_LANGUAGE, 1, USER_GUID)
Catch ex As System.Exception
MsgBox("Error in Refresh_Entities:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Private Sub TBPMO_RIGHT_GROUPBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBPMO_RIGHT_GROUPBindingSource.AddingNew
Me.DD_DMSDataSet.TBPMO_RIGHT_GROUP.ADDED_WHOColumn.DefaultValue = Environment.UserName
End Sub
Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click
Save_Data()
End Sub
Private Sub TBPMO_RIGHT_GROUPBindingSource_CurrentChanged(sender As Object, e As EventArgs) Handles TBPMO_RIGHT_GROUPBindingSource.CurrentChanged
tschangedlabel.Visible = False
End Sub
Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click
Refresh_Rights_Groups()
End Sub
End Class

File diff suppressed because it is too large Load Diff

View File

@ -0,0 +1,811 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="GUIDLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="NAMELabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="WD_SEARCHLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="UNIQUE_DOC_SQLLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="NEW_OBJECTTYPELabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="CONNECTION_IDLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="ADDED_WHOLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="ADDED_WHENLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="CHANGED_WHOLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="CHANGED_WHENLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="ENTITY_IDLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="SQL_DOCTYPELabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="OLD_OBJECTTYPELabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="GUIDLabel1.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="STRING1Label.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="STRING2Label.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="ADDED_WHOLabel1.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="ADDED_WHENLabel1.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="CHANGED_WHOLabel1.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="CHANGED_WHENLabel1.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="IDX_FILE_WORKEDLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="BindingNavigator1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>332, 95</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="ToolStripButton1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAAUpJREFUOE9jGLzg7gL2/7fmcf6/Oofr/8UZvP+hwsSD60CNfx41/v/zsOH/yckC
pBtwfjov3ICDPSKkG3B8kiBQc93/Pw+q/u9oFydswKWZPP/PTuX7fxKo8Ui/0P993SJAzeX//94r+r++
Qeb/qhq5/0srFf/PL1X+P6tIFdPAU0B//nlYD9RUC8SV///cKwHivP9/72b+/3sn+f/f23H//92MAOKQ
/5NyNDENONQrDHbu3/ulQI0FQI3ZQI2pQI0J///digZqDPv/70bQ/3/X/f53peliGrCzXeL/lmap/+vA
zpX/v6RC8f/fWzFAjeH/p+Zp/J+QpfW/O0P3f3uq/v/mREPCYTIb6E+Qc//dCPjfk6FDWAM6APnz3w1/
IPb735qsT7oB3em6YP+CcH2cEekGtCQZ/G+IN/xfE2v8vzLahHQD6AQYGAAkI9iedfyIaQAAAABJRU5E
rkJggg==
</value>
</data>
<metadata name="TBPMO_WD_IMPORT_PROFILE_IDXBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>656, 56</value>
</metadata>
<metadata name="DD_DMSDataSet.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<data name="ToolStripButton2.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAAW9JREFUOE+1kE0ow2Ecx3dV3krt4oJaOSCTvIRkMqSxyITIzCQHDouEdnFwIOVC
DrhIDiQl5UTiNG/z2ppafy1S2gX/uDwfY6i1v7Hie3nqeb7fz+/7/FR/Ilwn0G0Exw4fV5GJlXlEZxXC
rIet9bAQvB5Ymgn2sLYAvSZEux7RUQFzE4qQt4bCXAYjPaHvnDoCkLpsRGMB2JqCTGLIijDlwqQ9bEMV
i9OIytR3EMNWcJ/BWH8A6j8/bOGFxwXNxYEvGbMQ9XnQ1/K78KfY3/VXzkMY0qFGG2H4RoLGQshJQNbG
86CNhdrsX9a/uQZTPhQl4rMY4OLofbl3aX7I8uwPC7y/g1YdjyVJuEvT8e1tfwUYteHUxCCfHChDeHmG
QQvokjlOU+PbWA0x3pZnILVVI3uvQyHsbiLnqnGmRCF1NYD8pDhpRxOH7HQoAKZGkFKjceszQbpSrumX
bO+G80MFwKUTxgfgcO/b8D9IpXoFiiMDHIQm0skAAAAASUVORK5CYII=
</value>
</data>
<data name="ToolStripButton3.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77
wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0
v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg
UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA
Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu
lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII=
</value>
</data>
<data name="ToolStripButton4.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w
5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f
Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+
08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC
</value>
</data>
<data name="ToolStripButton5.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78
n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI
N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f
oAc0QjgAAAAASUVORK5CYII=
</value>
</data>
<data name="ToolStripButton6.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+//
h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B
twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA
kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG
WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9
8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg==
</value>
</data>
<data name="ToolStripButton7.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAAExJREFUOE9joAr49u3bf1IxVCsEgAWC58Dxh/cf4RhZDETHTNiHaQgpBoAwzBCo
dtINAGGiDUDGyGpoawAxeNSAQWkAORiqnRLAwAAA9EMMU8Daa3MAAAAASUVORK5CYII=
</value>
</data>
<metadata name="TBPMO_WD_IMPORT_PROFILEBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>160, 17</value>
</metadata>
<metadata name="SQL_PARENT_RECORDLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="TBPMO_WD_IMPORT_PROFILEBindingNavigator.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>920, 17</value>
</metadata>
<data name="BindingNavigatorAddNewItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAAUpJREFUOE9jGLzg7gL2/7fmcf6/Oofr/8UZvP+hwsSD60CNfx41/v/zsOH/yckC
pBtwfjov3ICDPSKkG3B8kiBQc93/Pw+q/u9oFydswKWZPP/PTuX7fxKo8Ui/0P993SJAzeX//94r+r++
Qeb/qhq5/0srFf/PL1X+P6tIFdPAU0B//nlYD9RUC8SV///cKwHivP9/72b+/3sn+f/f23H//92MAOKQ
/5NyNDENONQrDHbu3/ulQI0FQI3ZQI2pQI0J///digZqDPv/70bQ/3/X/f53peliGrCzXeL/lmap/+vA
zpX/v6RC8f/fWzFAjeH/p+Zp/J+QpfW/O0P3f3uq/v/mREPCYTIb6E+Qc//dCPjfk6FDWAM6APnz3w1/
IPb735qsT7oB3em6YP+CcH2cEekGtCQZ/G+IN/xfE2v8vzLahHQD6AQYGAAkI9iedfyIaQAAAABJRU5E
rkJggg==
</value>
</data>
<data name="BindingNavigatorDeleteItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAAW9JREFUOE+1kE0ow2Ecx3dV3krt4oJaOSCTvIRkMqSxyITIzCQHDouEdnFwIOVC
DrhIDiQl5UTiNG/z2ppafy1S2gX/uDwfY6i1v7Hie3nqeb7fz+/7/FR/Ilwn0G0Exw4fV5GJlXlEZxXC
rIet9bAQvB5Ymgn2sLYAvSZEux7RUQFzE4qQt4bCXAYjPaHvnDoCkLpsRGMB2JqCTGLIijDlwqQ9bEMV
i9OIytR3EMNWcJ/BWH8A6j8/bOGFxwXNxYEvGbMQ9XnQ1/K78KfY3/VXzkMY0qFGG2H4RoLGQshJQNbG
86CNhdrsX9a/uQZTPhQl4rMY4OLofbl3aX7I8uwPC7y/g1YdjyVJuEvT8e1tfwUYteHUxCCfHChDeHmG
QQvokjlOU+PbWA0x3pZnILVVI3uvQyHsbiLnqnGmRCF1NYD8pDhpRxOH7HQoAKZGkFKjceszQbpSrumX
bO+G80MFwKUTxgfgcO/b8D9IpXoFiiMDHIQm0skAAAAASUVORK5CYII=
</value>
</data>
<data name="BindingNavigatorMoveFirstItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77
wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0
v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg
UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA
Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu
lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII=
</value>
</data>
<data name="BindingNavigatorMovePreviousItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w
5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f
Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+
08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC
</value>
</data>
<data name="BindingNavigatorMoveNextItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78
n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI
N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f
oAc0QjgAAAAASUVORK5CYII=
</value>
</data>
<data name="BindingNavigatorMoveLastItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+//
h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B
twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA
kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG
WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9
8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg==
</value>
</data>
<data name="TBPMO_WD_IMPORT_PROFILEBindingNavigatorSaveItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wwAADsMBx2+oZAAAAExJREFUOE9joAr49u3bf1IxVCsEgAWC58Dxh/cf4RhZDETHTNiHaQgpBoAwzBCo
dtINAGGiDUDGyGpoawAxeNSAQWkAORiqnRLAwAAA9EMMU8Daa3MAAAAASUVORK5CYII=
</value>
</data>
<metadata name="dlgWindreamsuche.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 56</value>
</metadata>
<metadata name="TBDD_CONNECTIONBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>174, 56</value>
</metadata>
<metadata name="TBPMO_WD_IMPORT_PROFILETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>456, 17</value>
</metadata>
<metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>747, 17</value>
</metadata>
<metadata name="TBDD_CONNECTIONTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>418, 56</value>
</metadata>
<metadata name="TBPMO_WD_IMPORT_PROFILE_IDXTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 95</value>
</metadata>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAgAEBAAAAEACABoBQAAhgAAABAQAAABACAAaAQAAO4FAAAYGAAAAQAIAMgGAABWCgAAGBgAAAEA
IACICQAAHhEAACAgAAABAAgAqAgAAKYaAAAgIAAAAQAgAKgQAABOIwAAMDAAAAEACACoDgAA9jMAADAw
AAABACAAqCUAAJ5CAAAoAAAAEAAAACAAAAABAAgAAAAAAEABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAP//
/wARbfQAnJqWAHPc/wBZWVkAU2uwAM3NzQBMmOUAn63ZAHp6egB0j8cAVbv/ALS0tADl5eUALJD8AEl7
2gCJiYkAcGlqADmI5gBubooAHn/4APv36wCmpKYASG3KAGPL/wDBwcEAQrP/AD2Z8wDZ2NkAtq+iABNh
6ABSjNsA7+/vADWG9ACSkpIAZWVlAPf39wBzc3MAgoKCAKysrAAadfQATbP/AFvE/QBIjuQAn5+fAMfH
xwAykfQAM4vtADaA5ABeXl4ANZr2AKOemADz8/MA6enpAH5+fgCOjo4Acm9pAMzKxQBFrv8AGXn4AEm3
/wAUb/AA+vr6AOLi4gBwcHAAd3d3AMTExACGhoYAlpOVAJ2cnADs7OoASrD/AFKQ2wBWvv0AUrv9AFtb
WwB1dXUAfHx8AJCQkACqqqoALpH6AFvB/QDa2toAXMX/AEu0/wBOs/0AWcL9APn5+QD29vYA8PDwAGZm
ZgB9fX0AxsbGAMDAwACTk5MApaWlAEmv/wDl5OUAx8bHAFa9/QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAATwUAAAAAAAAAAAAAAABEQwEKW0EAAAAAAAAAACMtNVkBTTdOMhEA
AAAAAF8HNg4hWFMjQlxBJAAAAABgU0A/Y0UXHV0nQkwAAAAAUCUuJjkUNDpHWl5bAAAAACgHGgMSKR8J
FmINOAAAAAAAAEYeEBs9PgYAAAAAAAAAAAAAC1E7SEsPGAAAAAAAAAAAABNVYVYrSiIAAAAAAAAAACBX
ZCpSAgAAAAAAAAAAAABJCC8MGTwAAAAAAAAAAAAAAAAzVAQVAAAAAAAAAAAAAAAAMBwsMQAAAAAAAAAA
AAAAAAAAAAAAAAAAAAD//wAA/n8AAPgfAADgBwAAwAMAAMADAADAAwAAwAMAAPAfAAD4DwAA+A8AAPA/
AADwPwAA/D8AAPw/AAD//wAAKAAAABAAAAAgAAAAAQAgAAAAAABABAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABMTEw3j4+P5U9PT+FSUlIzAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAE5OTgp4eHi1xsbG/v////96enr/Z2dn/ldXV7JaWloKAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAG9vb3ChoaH48/Pz//b29v//////dXV1/35+fv98fHz/XV1d91lZ
WW4AAAAAAAAAAAAAAAAAAAAAAAAAAI2NjcrNzc3/6enp/+Xl5f/v7+//+fn5/9ra2v+SkpL/d3d3/319
ff9wcHD/V1dX0wAAAAAAAAAAAAAAAAAAAACmpqb32tra/+Li4v/6+vr/x8bH/5aTlf+mpKb/2djZ/8bG
xv+CgoL/d3d3/1tbW/sAAAAAAAAAAAAAAAAAAAAAq6ur/Pf39//Hx8f/c3Nz/3Jvaf9ubor/o56Y/8zK
xf/s7Or/8PDw/8DAwP9nZ2f+AAAAAAAAAAAAAAAAAAAAAKysrKrQ0ND3wcHB/5yalv9waWr/GnX0/xRi
6v6frdn//fnt/ufm5/62trb3gICAsAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIOAgGG+sZyYR3vd+UKz
//9Jt///FXDy/kRgsthKQiYyAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADlrzXS6S
/P1Frv//SrD//1O9//4skf79CETcnAAA/wEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD/ASGB
9NFLtP//Sa///0+1//5cxv/+V8D//imD/eYAHdNCAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABN1
+5daxP/+V7///k2z//9cw//+EW30/wAZzEUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAYf/ubLpP5wTKS9v1Vu///Y8v//xl5+P8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAA/wI1m/j9XMX//3Pc//8fgfr+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAYf8DJ4n25Tqa+PUviPTLGnbzzQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAD//wAA/n8AAPgfAADgBwAAwAMAAMADAADAAwAAwAMAAPAfAAD4DwAA+A8AAPA/AADwPwAA/D8AAPw/
AAD//wAAKAAAABgAAAAwAAAAAQAIAAAAAACgAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///8AAHz/AH5x
YABw1f0Ara2tAGCb0gDe180ANZ//AJiPhwApeN8Au8njAFO5/wDq6uoAZWt2ACCG/wB+fn4AxsbFAJ2d
nQBFnusAdqDMAGJiYgC5ubkAVZbiAKGqvADf398ASan9ABN5/wBjyP0ApJqNAPX19QB0dHQAiIiIAAdt
+gBpqNkAI5f/ACiE8QDR0dEA9u/kAJWVlQClpaUAM3zmADua9QBra2sA19faAOrk3QBXn+kAiIN8AESz
/wBbwP0Ab5rQAEOg9QDLy8sATbL9AD2i/QDw8PAAAGz/AHl5eQC0tLQAg4ODAHZybABpzv0AQar/AOTk
4wB1mcgAoJaIAKejngAwmv0AWpzWAGqi1QCSkZAAFX/8APn5+QBvb28Avb29AJmZmQA6nPwA29vbACSK
/wBIrv8ACm/+ACeU/QDt7e0A5+fnAKioqACioqIAYMT9AGWb0gDo4doARqf6ALCwrwAdg/8A1tbWADyj
+QBQtv8AVrz/AMjIyAA6pP8AOaH9AEOo/ABKsv8A/f39APPz8wBycnIAdnZ2ANPT0wB7e3sAgYGBAIqK
igCTk5MAl5eXALKysgCfn58Aq6urAG5ubADt6+oAdaPMAOLi4gDZ2dkARKr/AFm//wBYvf0Am5uaADKc
/QBGrP8ATrT/AFO3/QBewv0AQan9AEmu/QBozv8AmpmXAGjM/QBavv0ASrD/AEyy/wD+/v4A9vb2APT0
9ADy8vIA7+/vAO7u7gDs7OwA6+vrAOnp6QDo6OgA5ubmAHNzcwB1dXUA4ODgAHd3dwB4eHgA3t7eAHp6
egDc3NwAfHx8AH19fQDY2NgAf39/AISEhACJiYkAnJycAJ6engC1tbUApKSkAKenpwDj4+MAR63/AEmv
/wBLsf8ATbP/AE6z/QBRt/8AUrj/AFS6/wBVu/8AWL7/AFrA/wCampoAdHNzAEat/wBOtf8AAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGyfAAAAAAAAAAAAAAAAAAAAAAAAAAChpWVnOaIAAAAAAAAA
AAAAAAAAAAAAAG6YAWUfapkgAAAAAAAAAAAAAAAAAACyBYkeZgGWnpyZaCcAAAAAAAAAAAAAAEudjJCQ
jYibORCbapRqAAAAAAAAAACko5J1GaZTi0hIb2g5mzloH20AAAAAAABVlZ12mg0BdSg6Uo8Skzk5lmoA
AAAAAACkXCUZAYxwa0Z6EkqRJaCTl5cAAAAAAACkaYplpBVyLwlBQmBTj5EWnGcAAAAAAABxZYxJK7M8
DgIpWC0/jkiNGTsAAAAAAAAAVDQ3TYMDCjBRUCwmcxFUSwAAAAAAAAAAAAAAWgcLI7RkCDgYHQAAAAAA
AAAAAAAAAAAAAAAkPndPtYAhQAAAAAAAAAAAAAAAAAAAAHRhfHyoqa1+RwYAAAAAAAAAAAAAAAAAACqG
fE+pqnlWf0NEAAAAAAAAAAAAAAAARadPqKl9qzViE1cAAAAAAAAAAAAAAAAAXa4xh6qtNhsAAAAAAAAA
AAAAAAAAAAAihYSBXl6vfFsAAAAAAAAAAAAAAAAAAAAAABRMrwywhw8AAAAAAAAAAAAAAAAAAAAAAABj
eF+xrE4AAAAAAAAAAAAAAAAAAAAAAAAaHD0EgnsAAAAAAAAAAAAAAAAAAAAAAAAuWTMXMgAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///8A/+f/AP+B/wD/AP8A/AA/APgAHwDgAAcA4AAHAOAA
BwDgAAcA4AAHAPAADwD+AH8A/4B/AP8APwD/AB8A/gA/AP4B/wD8Af8A/wH/AP+B/wD/gf8A/4P/AP//
/wAoAAAAGAAAADAAAAABACAAAAAAAGAJAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHFx
cRd4eHina2trnnd3dxMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABgYGBYaioqOz////+cnJy/3V1demEhIRbAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJKS
kiWQkJC93t7e///////////+dHR0/3t7e/96enr/e3t7uYODgyIAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB1dXUFhoaGeK+vr/X29vb/9fX1//Pz8///////d3d3/39/
f/99fX3/enp6/3V1dfR4eHh2pqamBAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJmZ
mTaVlZXQ2NjY/+/v7//p6en/6enp/+7u7v/+/v7/fHx8/3l5ef9+fn7/fHx8/3t7e/91dXX/cHBwz3x8
fDYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAlpaWb7e3t/vm5ub/4uLi/9/f3//j4+P/5+fn//Ly
8v/5+fn/+fn5/7Kysv92dnb/eXl5/3x8fP95eXn/dnZ2/3R0dPx3d3d9AAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAn5+fseDg4P/Y2Nj/2dnZ/9zc3P/q6ur//////+Li4v+lpaX/tLS0/+3t7f/r6+v/nZ2d/3Nz
c/95eXn/eXl5/3d3d/9vb2/KAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAo6OjwtbW1v/R0dH/39/f////
///v7+//n5+f/4GBgf+SkZD/m5ua/52dnf+9vb3/6Ojo/9HR0f+JiYn/c3Nz/3h4eP9wcHDYAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAApKSk1NPT0//09PT//f39/6SkpP9iYmL/bm5s/4iDfP+Yj4f/oJaI/6ej
nv/IyMj/5+fn/+vr6//o6Oj/u7u7/n5+fv5tbW3lAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAArKys3v//
//7v7+//b29v/2tra/90c3P/dnJs/2Vrdv8AfP//M3zm/+jh2v/q5N3/5OTj/+zs7P/7+/v+8PDw/uHh
4f6BgYHrAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAn5+fEKCgoG3S0tLT8vLy/tvb2/+amZf/fnFg/yl4
3/9Es///KJb//gpv/v/X19r/9u/k/+/t7P7IyMf+qKio0X9/f25/f38SAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAApKSkPLOzsaPh2tD2u8nj/yOX//9Grf//SrL//zWf//8AbP//oqy+9J6O
eJqMiII2AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AACIhI0WHYL56kGq//9Eqv//SK7//061//9Cq//+AGz/9ABw/1QAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAATj/9fOqT//0as//9GrP//Sa///0ux
//9SuP//U7n//RN///oChP9zAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAABuc/woumf/jSrD//0as//9Irv//S7H//02z//9Zv//+Ycb//l/E//4xnP/+CYv/gQAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACSX/31Hrf//SK7//0mv
//9Lsf//TrT//0+1//5OtP/+OKL//Cab/8QMhP9zCI7/HgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAIbH/GTik//JUuv//XML//kyy//9Ns///Urj//z6k//4Tef//CoL/PQAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALaP/iVvA
//5pzv/+SrD//lC2//9Qtv//Vbv//0as//8dg///AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJdL/CCed/0sfjP9iOJ3/+VW7//9Tuf//WL7//0yy
//8ghv//AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAARv8DQqn/+lm///9WvP//WsD//1G3//8kiv//AAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAuv8FSav//WTK
//5q0P/+cdf//mjO//8znv/+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAjv8EOpv/vkOp//U4oP/kKIz/qBl+/2wbj/8vAAD/AQAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAA////AP/n/wD/gf8A/wD/APwAPwD4AB8A4AAHAOAABwDgAAcA4AAHAOAABwDwAA8A/gB/AP+A
fwD/AD8A/wAfAP4APwD+Af8A/AH/AP8B/wD/gf8A/4H/AP+D/wD///8AKAAAACAAAABAAAAAAQAIAAAA
AACABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///8AF2b/AJ6akgB1y/8AXnXJAMzMzABsbGwAAy7TAEKY
+QArUdkA5ubmALOzswB6hJoAYKDfADB45gCX2/0AVLn/AD1qvwCHhnsAB0joAHOMzAAaO9gAbHeIACeB
+wBZof8AoKS2AGiBqQA7YtsAWIzYANnZ2QD48ugAHFvlAMDAwABptv0AR1vLAHx4cACOjo4AQHfbAHOB
uABRj/8ApaWlAECA6wANV/8AF0vfAIfU/wBae9sAJmvqADaJ9QBhhswAInL3AFWW4wAsX+MAaZfXAPb2
9gAYY/AAfX19AF/B/wDn49kATKL8AFyu/wAQUO0AMXn5AA4+2gBEke8A7u7uAKysrACHh4cAKn/wAHzD
/ABvv/8Ad4PCADiU+gAbcf8Ac3NzAN/f3wDT09MAubm5AJSUlACfn58AK3TuAFSY/wBlrP0AxcXFADRc
2wBfuP8AcYKpAD9XzAAsh/cAeHh4AIKCggCZmZkAR5P+ABVc7AAELNsAI3bvACl3+AAXRNsAL4H7ADqQ
9AB9yv4AXaf9AB5s9wBku/8AUab/AEGR+QD7+/sA8vLyAOrq6gCpqakAM4P1AGOy+wAcY/UANGHfAJ+d
mABBl/8AcYnHACN4+ABUs/8AbnByAEeV+ACMiocAE0/gAFy8/wDj4+MA3NzcANbW1gDQ0NAAyMjIALy8
vAC2trYAr6+vAJGRkQCioqIAQ5L0AOrp5QBkwv8AYLH/AFad/wAlffkAFEfdAIaEgQAhdPMAZ7L9AFmo
/wBQpPsAFWL/ABls/wCYlpQAU5P/AIuLiwA3YdwAwsLCACRu6ACcm5sANZL4AF+q/wBcsv8AFmbxADFf
4AB0zv0ALHbrADlh2ABmtf8Abb3/AGG5/wA/lvkAX6T9AF5zzAD9/f0A+Pj4APT09ADw8PAA7OzsAOjo
6ADh4eEAbm5uAHV1dQB6enoAf39/AIWFhQCJiYkAsbGxAKampgBFk/oAcXFxAFqm/ABaq/8AWKX/AEGU
+ABmuv0AX7P+AJaWlgB6w/4AZL39AGC1/wBjrP8A5eXkAOHg3gAGR+YA3t7dADVf3gAELdkA5ePaAHV0
dACRkJAAXrT/AF6x/wBarv4AZ7X9AFWb/wBXov8AV5//AFOV/wBcrP8A+vr6APf39wD19fUA8fHxAO/v
7wDt7e0A6+vrAOnp6QDn5+cA4uLiAODg4ADb29sA2NjYAG9vbwDX19cAcHBwANXV1QDU1NQAdnZ2ANHR
0QB3d3cAeXl5AM3NzQB7e3sAy8vLAHx8fAB+fn4AgICAAIGBgQDDw8MAg4ODACuG9gCIiIgAioqKALq6
ugCMjIwAj4+PALW1tQCgnJcAkpKSAJOTkwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAOlZAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPfyyPDktQAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAFux+QGpWrLMuf8AAAAAAAAAAAAAAAAAAAAAAAAAAABaW92q2alDOPBZuesAAAAA
AAAAAAAAAAAAAAAAAAD/9QarQdprAZbxOO6yzLC0AAAAAAAAAAAAAAAAAACF84Pe3mzd3KypJfPy8e7s
WbmwzQAAAAAAAAAAAAAA/lt+xXzFC97dQamDOPPy8fDs67GwSgAAAAAAAAAAhfiBS33IS+DFC6w2rNmv
T+6z8fCy6+m5ByUAAAAAAABOmON+HuLIyK7Z2WxNId9r5/7uOPCy7LFKWQAAAAAAAM1TTOh+40tr10H8
hFtPKfTF3ICW7PCyWenMAAAAAAAAJYB/6uXcqau28/fNlJqFt21Tr6/5WrKy67kAAAAAAAD67+3FAWqC
SuTpjQ1WA3Ip9OHfxch9Qu7s5gAAAAAAACXFqWqB8Fmy68x3XTd6dDpL4cXe267Ifm25AAAAAAAAT23o
auIp7uzsJBJuiGLHLsvG4N+t3h629/cAAAAAAAAAAE/7DMXYIXkXnlVVpXMUVMiHxZhbss0AAAAAAAAA
AAAAAAApwP4hHyq9pc6dv2g9YRoTtU8AAAAAAAAAAAAAAAAAAAAAAP0bjqWdPDw81jxwCCcAAAAAAAAA
AAAAAAAAAAAAAAAAAKGRzjzWu5CQvIk+yqgAAAAAAAAAAAAAAAAAAAAAAAA1MMM8u5C8vNPT1JxcXlcA
AAAAAAAAAAAAAAAAAAAAAETQPLuQvNPU1GXRZzkRLCMAAAAAAAAAAAAAAAAAAAAzCc+7kLzT1KO+wnam
Lz8WRwAAAAAAAAAAAAAAAAAAAFjP1pC809TSRitgjAoFAAAAAAAAAAAAAAAAAAAAAABAO78EpNPUitIi
kmaiAAAAAAAAAAAAAAAAAAAAAAAAAJtkEEW604rSUY8CMhwAAAAAAAAAAAAAAAAAAAAAAAAADmP2X2kZ
ilHVj5N1lwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAuNTSUZVSSYvJAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAC41NLVKKdJGHEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALiKUcSkoHtInwAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAeMEtb4ZQIDQVAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAdD5kmMQAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA///////+f///+B///+AH///AA///AAD//AAAP/gA
AB/gAAAH4AAAB+AAAAfgAAAH4AAAB+AAAAfgAAAH+AAAH/4AAH//wAH//+AA///AAH//wAA//4AAP/+A
Af//AAf//wAH//8AB///8Af///AH///wB///8Af///B///////8oAAAAIAAAAEAAAAABACAAAAAAAIAQ
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAHh4eEdsbGzWbm5u0nNzc0QAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAICAgBt1dXWpgoKC/uDg4P58fHz/cHBw/nd3d6l3d3cdAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAEBAQASAgIBxc3Nz8bq6uv///////////oKCgv96enr/dHR0/29v
b/N3d3d4Xl5eBgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACKioo6eXl5z5qamv/r6+v/+Pj4//X19f/////+h4eH/319
ff98fHz/eHh4/3Fxcf9vb2/YeXl5RwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACIiIgTg4ODm4SEhPzMzMz/9PT0/+7u7v/x8fH/8vLy////
//+Li4v/fn5+/319ff97e3v/enp6/3R0dP9vb2/+dHR0rnV1dSAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABkZGRYn5+fuqurq7/6enp/+np6f/q6ur/6+vr/+3t
7f/w8PD//f39/46Ojv+BgYH/gICA/35+fv97e3v/eXl5/3h4eP9xcXH/bW1t9HFxcXx9fX0HAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAl5eXLoqKisOYmJj/1tbW/+Tk5P/j4+P/5OTk/+bm
5v/p6en/6+vr/+7u7v/9/f3/r6+v/319ff+BgYH/gICA/35+fv98fHz/eXl5/3d3d/91dXX/bm5u/2tr
a9t2dnZLAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJGRkWGLi4v6vLy8/9/f3//c3Nz/3d3d/9/f
3//i4uL/5OTk/+bm5v/w8PD/9vb2//Dw8P/19fX/4eHh/56env97e3v/f39//35+fv98fHz/enp6/3d3
d/92dnb/cXFx/21tbf5zc3OHAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAiIiIqsLCwv/Y2Nj/1tbW/9nZ
2f/b29v/3d3d/97e3v/o6Oj/9fX1//X19f/q6ur/ubm5/8DAwP/n5+f/8vLy/9XV1f+SkpL/e3t7/319
ff98fHz/enp6/3l5ef91dXX/c3Nz/2tra8wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACHh4e+xcXF/9PT
0//U1NT/1tbW/9jY2P/f39//8vLy//r6+v/u7u7/tbW1/5GRkf+YmJj/n5+f/6SkpP/Dw8P/5OTk/+3t
7f/IyMj/i4uL/3l5ef98fHz/enp6/3h4eP92dnb/bGxs3AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIiI
iNHIyMj/0NDQ/9HR0f/X19f/7e3t//39/f/09PT/sbGx/4GBgf+IiIj/kZCP/5iWlP+cm5v/oaGh/6am
pv+pqan/xcXF/+Hh4f/j4+P+urq6/4KCgv96enr/enp6/3d3d/9ubm7rAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAioqK5cvLy//Nzc3/5eXl///////7+/v/tra2/3Nzc/9vb2//dnZ2/4aEgf96hJr/cYKp/56a
kv+fnZj/pKSk/8PDw//g4OD/5+fn/+Tk5P/e3t7/3Nzc/66urv58fHz+eXl5/3BwcPgAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAACOjo735eXl//39/f/7+/v/vLy8/3x8fP94eHj/enp6/3d3d/91dHP/bnBy/xVc
7P8YY/D/E0/g/3GJx//n49n/397e/+Dg4P/l5eX/6enp/+/v7//o6Oj/3d3d/9jY2P6oqKj/cnJy/gAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAJqamsOqqqr+1NTU//v7+//b29v/paWl/3t7e/95eXn/eXl5/3x4
cP89ar//M4P1/2TC//8vgfv/Bkfm/1p72//l49r/4eDe/+Li4v/n5+f/7Ozs/+np6f/Z2dn/sbGx/4mJ
if15eXmyAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAaGhoTmUlJSZjo6O8LOzs//k5OT/9/f3/8DA
wP+Miof/bHeI/xZm8f9et///X7j//2K6//9Bl///B0jo/zRc2//e3t3/6unl/+Xl5P/CwsL/mJiY/3d3
d+x4eHiPhoaGKwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACPj48KlZWVW4+P
j7uTk5P8wMC///jy6P9AgOv/QZT4/2G5//9dtP//XLL//1+y/v9Rpv//EFDt/xdE2/+gpLb/iId8/X19
fL+CgoJaaWlpCAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAJ6dnB+Sin99Yn6q5SF08/9huP//XLH//1yv//9brf//XK3//1ys//9cr///HGP1/wQv
1f4vTcR2AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAA55/gsdcfXiUKT7/16z//9brv//W6z//1qq//9ZqP//Waf//1mm
//9gsf//MXn5/wMs2/wGMu95AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKIL/gzaJ9f9gtf//W63//1qr//9aqf//Wab//1ik
//9Yo///V6L//1eg//9fqv//R5P+/wUt3f4DKN+kAB/jCQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACuL/yEmf/X1Wq7+/1yu//9aq///Waj//1il
//9Yo///V6D//1ef//9eqf/+aLf//mS7//9fwf//VLn//xdL3/8DJOGYAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKoz/q0KY+f9esf//Wqv//1mo
//9Ypf//WKP//1ef//9mtf//Z7z//mW///5Us///P5b5/yZr6v8PP9z+BCrg3QMn71EAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAC+Z/0Itifn+XrD//1us
//9aqf//WKX//1ij//9XoP//VZz//2+///8NV///KXf4/xRH3/0LO+bLCjjnfAUx9i0AAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAj9IELoz/0Uyi
/P9gtf/+dcv//229//9Yo///V6D//1ad//9Vmv//arj//hVi//8ebPf/EEbquwAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAA2lPr+fcr+/5nd//58w/z/Wqb8/1eh//9Wnv//VZv//1SX//9otP/+F2b//yJy9/8SSO67AAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAADCY/50qjf/fK4f4/SB28/hBkfn/WaH//1ac//9Umf//U5X//2iz//4ZbP//I3j4/xFJ
7cAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAESS+f9Xn///VZv//1SX//9Tk///Zq7//htw
//8lffn/EknuxAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAARZP6/1ee//9Vmv//U5X//1GP
//9gpv/+G3H//yeB+/8STO7GAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABGlPv/Vp3//1SY
//9jrP//bbz//3XQ//5cvP//OJT6/xJM78sAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEeV
+P96w/7/h9T//2Oy+/9DkvT/K3Tu/xtb5/wVUu/XFVf/YQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAJXnzoB9y8d4ebO7yG2XsvRpi6YQbWudLAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAP///////n////gf///gB///wAP//wAA//wA
AD/4AAAf4AAAB+AAAAfgAAAH4AAAB+AAAAfgAAAH4AAAB/gAAB/+AAB//8AB///gAP//wAB//8AAP/+A
AD//gAH//wAH//8AB///AAf///AH///wB///8Af///AH///wf///////KAAAADAAAABgAAAAAQAIAAAA
AACACgAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///8AGGj/AJ6akgB0yf4AZnfGAMzMzABsbGwABirRAEOY
+gAtTdQA5ubmALS0tAB6hJoAYKDfADZ26ACQ2v8AVLn/AEJsvQCHhnsAC0jpAHmWzAAgO8kAcnSCACeB
/QBZov8AlKzQAGl5mgA7YtsAV4bWANra2gD48ugAH1jkAMDAvwBqt/0ATWXKAHt4cQCOjo4AQHfbAHOB
uABRj/8ApaWlAECA6wAPV/8AF0vfAIXU/gBYeNsAKG3qADiK9wBpfMoAIG/0AFuZ4AApWeMAcZ7TAPb2
9gAXYu8AfX19AF/B/wDo5NoASKT/AFyu/wAPS/IAMXn5AAk52QBGju0A7u7uAKysrACHh4cAKX3xAHzD
/ABwwf0Ad4PCADqR/wAfc/8Ac3NzAN/f3wDT09MAuLi4AJWVlQCfn58ALHTuAFSY/wBlrP0AxcXFADRc
2wBguP8Ac4eqADVPyAAujPkAd3h6AIKCggCZmZkARpj+ABNZ7gAELNsAJXbvACd3/gAXRtoALoP+ADuN
9wCAzP0AXaj/AB5r+ABjvP8AUKr9AD6O+AD8+/sA8/PzAOrq6gCpqakAM4PyAGOy+wAcYvUANGHfAJ+d
mAA8m/0Ab4XEACN5+wBTr/8AbnByAEaV+gCNi4kAFE7gAFy9/QDj4+MA3NzcANbW1gDQ0NAAyMjIAL29
vQC2trYArq6uAJGRkQCioqIARJL1AOrp5QBmw/8AYLH/AFad/wAnfvsAEUbfAIaEgQAicfMAZ7P9AFmo
/wBPovkAFGD/ABtt/wCYlpEAU5P/AIuLiwA4XtwAu8HKAB5p6QCcnJwANo/3AGGq/QBdsv8AF2rxADFf
4ABz0P8ALHbrADlh2ABjtP8Abb3/AGG6/wA/lvkAX6T9AF5zzAD9/f0A+fn5APT09ADw8PAA7OzsAOjo
6ADh4eEAbm5uAHV1dQB7enoAf39/AIWFhQCJiYkAsbGxAKenpwBFk/oAc3JvAFqm/ABZq/8AWKX/AEGT
9gBnvP8AX7P+AJeXlwB2wf4AYr7/AGC1/wBjrP8A5eXkAOHg3gAIPecA3t7bADVf3gAELdkA4+HYAHV1
cwCVkYoAXrT/AF2x/wBYrf0AZ7X9AFWb/wBYov8AV5//AFOV/wBbrP8A+vr6APf39wD19fUA8fHxAO/v
7wDt7e0A6+vrAOnp6QDn5+cA4uLiAODg4ADb29sA2NjYAG9vbwDX19cAcHBwANXV1QDU1NQAdnZ2ANHR
0QB3d3cAeXl5AM7OzgB7e3sAxcnSAHx8fAB+fn4AgICAAIGBgQDDw8MAg4ODACiD9gCIiIgAioqKALq6
ugCMjIwAj4+PALm2sgCgnJcAkpKSAJOTkwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJaWAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAACa5CVKzFsAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAALTM76m0sbBaAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD+5oXY
qWr37uxK5CUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPD1Hqk2qqn4OO7useTMmgAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD76QzZq2ur2QH7ODg4suxKB7QAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAmrJOfGvb29prqwH+8vE48LKy6+aw+wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AABDs1Os3WytQdvaawHA8vKzOPCy7FlKsLEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAW/Apxa7f395srUHb
2gFbWlryszjwsuzr6eYHQwAAAAAAAAAAAAAAAAAAAAAAALdDJe0L4HzFC9/ebK1B2wGa8/Va8rM48O7s
WevMsLD+AAAAAAAAAAAAAAAAAAAAwPO24UvI4a98xQvf3t3c2NitQrNaWvKz8fDu7Fnp6bkH6wAAAAAA
AAAAAAAAALdDmkx94uLIyOGvfMULrms229zcq8VPOPPys/Hw7uxZ6bHMsAf+AAAAAAAAAAAAAFtCHn7j
4x7iyMjhr+Ctqmvba+N9Qd1rHk4487Px8O7sWeuxsbnMAAAAAAAAAAAAAE6B6Ojn5eMe4sjIC6ur2qvI
QltPTchs36wGtfCz8fDuslnrsUrkAAAAAAAAAAAAAIQhTEzo5+XjHsjbqquqxW0lwJpPhYWByAvF3YFa
8PE47rJZ68wHAAAAAAAAAAAAAJZTf+pM6OfjbKo212xt9fqETluaTym3bSF94a98tvDwOO6yWekHAAAA
AAAAAAAAAPjvf3/q6uDYqmqst+vzQ/glhE5bmoUpbW1C5+F9S8iF7PDusuywAAAAAAAAAAAAAPft7e0e
a2qpNgxKSkqx8vd5zZSUmk9Pt/Thxd/FyB7I6sDr7rLmAAAAAAAAAAAAACXt7dypqWoh8Ovs67FK5swb
IBJWA4UhfeHh4MXe3Qsefh6YtexKAAAAAAAAAAAAAMDbqWpqU1ruszju7OuxSrkgUDcUIO/IHn3Ir8Xf
bEFrruN+HoFZAAAAAAAAAAAAAIRt56kBrIG17jjx8LLrJBI3paViXYway33I4XwLbK3cfB7ng7RZAAAA
AAAAAAAAAAApwJb8xQEBfk/s7vCyWTe9wlWlSF0/FTp9S+ALxUviIcBKtE8AAAAAAAAAAAAAAAAAAABP
lsCY2gFBTbQkEo5nzs7OVTs3Py46xXzhTG3zWf4AAAAAAAAAAAAAAAAAAAAAAAAAALdbQynq2GqYN5Gl
zp2dnb/QZj+XfSH/6fhPAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAE+W+PxARGednZ08PDw8zmA/PxeU
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFae0M6dPDw81ru7kKMwxz8AAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAA9jw508PNa7u5CQkLyJOxQIMQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAANV+dzzw81ruQkLy8vNPTZc49CCMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAARAnOPDy7
u5CQvLzT09PT1NS+cAhXAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAzRMPPPLuQkLy809PT1IrSZUaI
oFw/FgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABEkc88u5CQvLzT09QZIkYEiGg7O3NQCAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAECbiTy7kJC8vNPTigRGpdB2dgkvYQgKBQAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAGva7PNa7kLy809TU0qArYglQjD8KBQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAmJPLuQvLzT
09SKUQQrkzdhdAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA1WDy7paAtvNPT1IrSUUaSSXA0AAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACbkQQtEC3B09PUitJR1UaSSWY0AAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAABYaEYtwZFp09SK0tJR1UaSdTI0AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAVMzBEREQwGdSK0lHVlUYCdY4gAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwvIrS
0lHVlUYCi3U0AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwGYrSUdWVKCKTGHUgAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABjGYrSUdWVKI+TGIsgAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAABpGdLS1ZUoKMFiGBggAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAABpilHVnEagLaCge24gAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4wWQt
ZMHQhlAgejQVAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABEboaRbpkgDx0VAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFR0dFQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD///////8AAP//
/n///wAA///4H///AAD///AP//8AAP//wAP//wAA//+AAP//AAD//gAAf/8AAP/4AAAf/wAA//AAAA//
AAD/wAAAA/8AAP8AAAAA/wAA/gAAAAB/AAD4AAAAAB8AAPgAAAAAHwAA+AAAAAAfAAD4AAAAAB8AAPgA
AAAAHwAA+AAAAAAfAAD4AAAAAB8AAPgAAAAAHwAA+AAAAAAfAAD4AAAAAB8AAPwAAAAAPwAA/4AAAAH/
AAD/4AAAB/8AAP/8AAA//wAA//+AAH//AAD//4AAH/8AAP//AAAP/wAA//8AAAf/AAD//gAAA/8AAP/+
AAAD/wAA//wAAAP/AAD/+AAAH/8AAP/4AAD//wAA//AAAf//AAD/8AAB//8AAP/wAAH//wAA//AAAf//
AAD//8AB//8AAP//wAH//wAA///AAf//AAD//8AB//8AAP//wAH//wAA///AAf//AAD//8AP//8AAP//
4f///wAA////////AAAoAAAAMAAAAGAAAAABACAAAAAAAIAlAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHR0dBVwcHCPb29vjHp6ehIAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgICAYmtra+uNjY3/c3Nz/29v
b+l8fHxhAAAAAgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIaGhit3d3fAdXV1/svL
y//////+hISE/3V1df9vb2/+dnZ2wnx8fC8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACSkpIKenp6hnBw
cPiioqL/9/f3//39/f/+/v78iIiI/3t7e/95eXn/cnJy/29vb/l2dnaNfX19DgAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAImJ
iUl1dXXbg4OD/9ra2v/9/f3/9vb2//j4+P/////+ioqK/319ff97e3v/e3t7/3V1df9vb2//bm5u4n5+
flUAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AACMjIwbgICAqXd3d/20tLT/9fX1//T09P/y8vL/9PT0//X19f//////j4+P/319ff99fX3/fX19/3p6
ev95eXn/cnJy/25ubv52dna3enp6JgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAkZGRBIWFhWx3d3fvlJSU/+Pj4//y8vL/7+/v/+/v7//x8fH/8vLy//T09P//////kpKS/4CA
gP9+fn7/fX19/3x8fP96enr/enp6/3d3d/9wcHD/bW1t9nNzc4GCgoIJAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAACPj480fHx8yYGBgf7ExMT/8PDw/+vr6//q6ur/7Ozs/+7u7v/v7+//8fHx//Ly
8v//////l5eX/4CAgP+AgID/f39//319ff98fHz/enp6/3l5ef94eHj/c3Nz/25ubv9tbW3aeHh4SgAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAh4eHD4qKipB8fHz6paWl/+Tk5P/o6Oj/5+fn/+fn5//p6en/6urq/+zs
7P/u7u7/7+/v//Hx8f//////mJiY/4KCgv+CgoL/gICA/39/f/99fX3/fHx8/3p6ev95eXn/d3d3/3Z2
dv9wcHD/bW1t/XR0dKx5eXkfAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGVlZVTgoKC4Y6Ojv/Ozs7/5ubm/+Li4v/j4+P/5OTk/+bm
5v/n5+f/6enp/+rq6v/s7Oz/7u7u/+/v7///////nJyc/4GBgf+Dg4P/goKC/4CAgP9/f3//fX19/3x8
fP97e3v/eXl5/3h4eP93d3f/dHR0/25ubv9sbGzxc3NzdV5eXgYAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAm5ubIo2NjbKDg4P+sbGx/+Dg4P/f39//3t7e/+Dg
4P/h4eH/4+Pj/+Tk5P/m5ub/5+fn/+np6f/r6+v/7e3t//f39//39/f/7Ozs/6urq/9/f3//goKC/4KC
gv+AgID/f39//35+fv98fHz/e3t7/3l5ef94eHj/dnZ2/3Z2dv9xcXH/bGxs/m1tbdJ1dXVAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACamppThYWF85ycnP/T09P/3Nzc/9vb
2//b29v/3d3d/97e3v/g4OD/4eHh/+Pj4//k5OT/5ubm/+jo6P/y8vL/9vb2/+/v7//t7e3/7e3t//T0
9P/l5eX/oKCg/319ff+BgYH/gICA/39/f/9+fn7/fHx8/3t7e/95eXn/eHh4/3Z2dv91dXX/dHR0/25u
bv9sbGz8eXl5hgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACSkpLBra2t/9ra
2v/W1tb/2NjY/9jY2P/a2tr/29vb/93d3f/e3t7/4ODg/+Hh4f/i4uL/7Ozs//j4+P/y8vL/7+/v//Ly
8v/Y2Nj/3Nzc/+7u7v/r6+v/8vLy/9nZ2f+UlJT/fX19/4GBgf9/f3//fn5+/3x8fP97e3v/eXl5/3h4
eP93d3f/dXV1/3V1df9xcXH/cXFx7wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AACSkpLVvb29/9TU1P/U1NT/1dXV/9fX1//Y2Nj/2tra/9vb2//d3d3/3d3d/+bm5v/09PT/9PT0//Hx
8f/09PT/3t7e/6ysrP+ZmZn/n5+f/7i4uP/e3t7/6urq/+fn5//w8PD/zMzM/4mJif98fHz/f39//35+
fv98fHz/e3t7/3p6ev94eHj/d3d3/3V1df9ycnL/b29v+VhYWAYAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAACQkJDowcHB/9PT0//S0tL/1NTU/9XV1f/X19f/2NjY/9nZ2f/e3t7/7+/v//j4
+P/09PT/+Pj4/+Tk5P+pqan/jo6O/5aWlv+bm5v/n5+f/6Kiov+jo6P/vLy8/93d3f/m5ub/5OTk/+vr
6/+9vb3/goKC/3x8fP9+fn7/fX19/3t7e/96enr/eHh4/3d3d/90dHT/bGxs/WpqahEAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACLi4v2xcXF/9DQ0P/R0dH/0tLS/9TU1P/V1dX/2NjY/+rq
6v/4+Pj/9vb2//r6+v/q6ur/qamp/4ODg/+MjIz/kZGR/5SUlP+YmJj/nJyc/6CgoP+kpKT/p6en/6mp
qf/AwMD/3Nzc/+Dg4P/h4eH/5eXl/rGxsf98fHz/fHx8/319ff97e3v/enp6/3h4eP92dnb/bW1t/gAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACLi4v8y8vL/8/Pz//Pz8//0dHR/9HR
0f/i4uL/9/f3//n5+f/8/Pz/8PDw/6ampv93d3f/gYGB/4aGhv+Kior/jY2N/5GRkf+VlZX/mZmZ/52d
nf+hoaH/paWl/6mpqf+pqan/rKys/9XV1f/g4OD/3Nzc/9/f3//d3d3/o6Oj/3l5ef98fHz/e3t7/3p6
ev95eXn/b29v/gAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACKior+zs7O/83N
zf/Nzc3/2dnZ//Pz8//7+/v//f39//b29v+zs7P/cnJy/3Jycv9ycnL/dXV1/4CAgP+IiIj/jYuJ/5WR
iv+YlY//mZeV/5uamv+enp7/oKCg/6enp//Dw8P/4ODg/+Tk5P/n5+f/5eXl/93d3f/Z2dn/3t7e/9HR
0f+Wlpb/d3d3/3t7e/96enr/cHBw/wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AACQkJD+zs7O/8/Pz/7t7e3//f39//39/f/7+/v/vr6+/3x8fP93d3f/eXl5/3d3d/91dXX/c3Nz/3Bw
cP92dXL/aXma/x9d4v8+acr/d4Wm/56akv+joqD/wMDA/9zc3P/g4OD/4ODg/+Li4v/l5eX/6enp/+vr
6//m5ub/2dnZ/9bW1v/b29v+xMTE/ouLi/55eXn/cnJy/wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAACWlpb/7+/v//////78/Pz/+/v7/8bGxv+CgoL/e3t7/39/f/99fX3/e3t7/3l5
ef93d3f/dXV1/3Nzc/91cm3/HV/h/yx48P8bY+3/DE7m/x5V3P+/xtj/4N7X/9ra2v/c3Nz/3t7e/+Hh
4f/k5OT/5+fn/+rq6v/u7u7/8vLy/+jo6P/Y2Nj/1tbW/9zc3P69vb3/eHh4/wAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACQkJDwqKio/9XV1f/9/f3///////Dw8P+9vb3/iYmJ/3t7
e/99fX3/fn5+/3x8fP96enr/d3d3/3l2cf9KbKz/F2Dt/2C8//9fu///LH/9/xNX6/8NRt//orDY/+Ph
2P/c3Nv/3d3d/+Dg4P/j4+P/5ubm/+rq6v/s7Oz/7e3t/+Pj4//a2tr/1dXV/66urv+Ghob+cnJy3gAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACmpqYVmZmZcZSUlNKNjY3+tbW1/+Tk
5P///////////9bW1v+fn5//eXl5/3t7e/98fHz/e3p6/3Z3fP8ZYuz/QZP2/2K+//9fuP//Ybv//zqR
//8TWvH/BT7e/32V2v/o5Nn/3d3c/9/f3//i4uL/5ubm/+Xl5f/f39//29vb/8HBwf+Xl5f/c3Nz/Hd3
d7h6enpQc3NzBQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AACjo6M3lZWVmIqKiu+Wlpb/wsLC//Hx8f//////7u7u/7i4uP+EhIT/fHlx/z9vwv8hbfD/Y7z//162
//9etf//XrX//2C3/v9JoP//FV/2/wQ73f9YeNv/6OTb/+bl4//j4+P/4ODg/9PT0/+pqan/gYGB/3R0
dOh8fHyIhISEIwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAJ+fnwuZmZldk5OTv4iIiP2kpKT/0dHR//f39//9+/n/tL/R/xJi
7v9Oovn/YLn//120//9ds///XbL//12y//9fs/7/Vq3//xxo+/8DOd3/OF7c/9zc2//BwLz/k5OT/3d3
d/1/f3+/goKCWHt7ewcAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKGhoSSTk5OFiYmJ4oqK
iv+8tq7/SYjv/yp88f9iu///XbP//12y//9csf//XK///1uu//9brf//XK3+/1+0//8nd/7/Bzvi/w84
zP9vcoHuhYF1j46NiykAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAj4+NBJSMgkpggK/LF2rx/1et/P9etP//XLH//1yw//9brv//W63//1us//9aq///Wqr//1up
//9jtP//N4n//wg95/8DL9ruADHqRgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAABZ3+Akec/TcOo71/2C2//9csf//XK///1uu//9brP//Wqv//1qq
//9aqf//Waj//1mn//9Zpv//Ya/+/0yh//8KQuz/CjLW+gg282oAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACeB/3cmd/H+XbL+/12x//9cr///W63//1us
//9aqv//Wqn//1mn//9Zpv//WKX//1ik//9Yo///WKP//1yn/v9etP//D0vy/wct1P4GMOKSAADpBQAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIpL/GCV59PBGmvn/XrP//1yv
//9brf//Wqv//1qq//9ZqP//Waf//1il//9YpP//WKP//1ei//9Xof//V6H//1eg//9Xn/7/Z7z//xpc
+P8CJtT+BSnTtgAi6hAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKYb/my2B
9P9gtP//XbD//1ut//9aq///Wqn//1mo//9Zpv//WKT//1ij//9Xov//V6H//1ef//9Vnf//VZv//12o
//9uwP//asT//27S//9GmP7/DTTa/wMk0NMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAvlf8xJn/2+1Cl/P9esf//W63//1qr//9aqf//Waf//1mm//9YpP//WKL//1eh//9Wn///WaP//2u7
//5xxv/+b8n//mLC//9Mqv//R6f//0Wo//88m/3/K3Ts/wUn0f4AAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAqi/++N474/2Cy//9brf//Wqv//1qp//9Zp///WaX//1ik//9Xov//V6H//1Wd
//90yv//b8f//mK6//5Yr//+U6///1Kv//9BmPn/KG3q/xJC3P8FJ9T7BSnfyAQo5W8AAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAADKZ/1Ephfj+WKz+/1yv//9brP//Wqr//1mo//9Zpv//WKT//1ei
//9XoP//Vp///1Wa//95z///DFP//y1///9Clvr/LG/r/xRG3v8KNdn4CTfkvgkz52wJL/IeAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKKf/ByyK/NpBmfr/X7H//1ut//9Zqv//WKf//1mm
//9YpP//V6L//1eh//9Wn///Vp3//1SY//95zv//EVv//x1t//8aZPH/D0Dd6Q1F6WIMQPwWAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAMJf/dS6K+f9cr///Waz//2O3
//971P//fdT//1ek//9Yo///V6H//1af//9Wnf//VZv//1WX//9xxf/+E13//x5x//8dZ/H/EEnr0wAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAqoP8ULo797k6n
/P90x//+iNf//pDa//+M0P//ecD//1ii//9Xof//V6D//1ad//9Vm///VZn//1OV//9xw//+FGD//x90
//8fbfT/EErv0wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAL5D6/lOp+/9zvPz/jdD//3a//f9Qn/j/P4/4/1ij//9XoP//Vp7//1Wc//9Vmv//VJj//1KV
//9xwv/+FWP//yJ4//8gb/T/Ekrv2QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAANZv/XS6U/6gqifrmJoH1/iN99PUiefPsN4j2/1mj//9Wn///Vp3//1Wb
//9Umf//VJb//1KS//9xw//+GGf//yN5//8idPX/EUnt3QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAOor3/1mk
//9Wnv//VZz//1Wa//9Ul///U5X//1OR//9ywf/+GGn//yV8//8jd/b/Ekrv3QAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAO4v3/1qi//9Wnf//VZv//1SZ//9Ulv//U5T//1GQ//9qt//+Gmz//yV///8levb/EUvu5QAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAPIz4/1ig//9Wnf//VZr//1SY//9Tlf//U5P//1GP//9otf/+Gm7//yeC
//8of/f/Ek3w5QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPY34/1ih//9VnP//VZr//1SW//9Sk///UI7//1GN
//92xv/+Mor//yaC//8ogfj/Ekvv6wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPo75/1ae//9Tmf//U5f//mKs
//5wwf/+edH//33b//9sy///a87//1y9/f8zhvL/E07w6gAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAARpX6/3fA
//+Czf/+idf//oHP//50w///W6z8/0KR9f8tdu//G13n/xRO4v0UUfHdFVb/bAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAJnz0+y+C8/9Gk/X/UZz2/zeC8v8fauv+GGDq+Bxj+MgZYveOGmD5UxRh/xsAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAKYn/FCV38lEic/CQH2/urR5t7ngcauo+Gm31CgAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA////////AAD///5///8AAP//+B///wAA///wD///
AAD//8AD//8AAP//gAD//wAA//4AAH//AAD/+AAAH/8AAP/wAAAP/wAA/8AAAAP/AAD/AAAAAP8AAP4A
AAAAfwAA+AAAAAAfAAD4AAAAAB8AAPgAAAAAHwAA+AAAAAAfAAD4AAAAAB8AAPgAAAAAHwAA+AAAAAAf
AAD4AAAAAB8AAPgAAAAAHwAA+AAAAAAfAAD8AAAAAD8AAP+AAAAB/wAA/+AAAAf/AAD//AAAP/8AAP//
gAB//wAA//+AAB//AAD//wAAD/8AAP//AAAH/wAA//4AAAP/AAD//gAAA/8AAP/8AAAD/wAA//gAAB//
AAD/+AAA//8AAP/wAAH//wAA//AAAf//AAD/8AAB//8AAP/wAAH//wAA///AAf//AAD//8AB//8AAP//
wAH//wAA///AAf//AAD//8AB//8AAP//wAH//wAA///AD///AAD//+H///8AAP///////wAA
</value>
</data>
</root>

View File

@ -0,0 +1,679 @@
Imports System.ComponentModel
Imports WINDREAMLib
Public Class frmWD_Import_Doc_Record
Private bwsearch As New BackgroundWorker
Private windreamSucheErgebnisse As WMObjects
Private aktivesDokument As WMObject
Private PROFILE_WD_SEARCH, PROFILE_SQL_DOCTYPE, PROFILE_SQL_UNIQUE, PROFILE_OBJECTTYPE, PROFILE_IDX_WORKED, PROFILE_SQL_PARENT, PROFILE_NEW_OT As String
Private PROFILE_ENTITY As Integer
Private PROFILE_ONLY_RECORD As Boolean = False
Private Search_Completed As Boolean = False
Private _Filesimported As Integer = 0
Private _RecordsAdded As Integer = 0
Private IMPORT_REC_ID
Private IMP_REC_EXISTS As Boolean = False
Private IMP_PARENT_REC_ID
Private Sub TBPMO_WD_IMPORT_PROFILEBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs) Handles TBPMO_WD_IMPORT_PROFILEBindingNavigatorSaveItem.Click
save_Profile()
End Sub
Sub save_Profile()
Try
Dim msg = "Profil gespeichert - " & Now.ToString
If USER_LANGUAGE <> "de-DE" Then
msg = "profile saved - " & Now.ToString
End If
lblSaveProfile.Text = msg
Me.TBPMO_WD_IMPORT_PROFILEBindingSource.EndEdit()
If DD_DMSDataSet.TBPMO_WD_IMPORT_PROFILE.GetChanges Is Nothing = False Then
Me.CHANGED_WHOTextBox.Text = Environment.UserName
Me.TBPMO_WD_IMPORT_PROFILEBindingSource.EndEdit()
Me.TBPMO_WD_IMPORT_PROFILETableAdapter.Update(Me.DD_DMSDataSet.TBPMO_WD_IMPORT_PROFILE)
Me.lblSaveProfile.Visible = True
Else
Me.lblSaveProfile.Visible = False
End If
Catch ex As Exception
MsgBox("Error in Save Profiles:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Private Sub frmWD_Import_Doc_Recordvb_Load(sender As Object, e As EventArgs) Handles MyBase.Load
If ClassWindream.Init() = True Then
ObjektTypenEintragen()
End If
Try
Me.TBPMO_WD_IMPORT_PROFILETableAdapter.Connection.ConnectionString = MyConnectionString
Me.TBDD_CONNECTIONTableAdapter.Connection.ConnectionString = MyConnectionString
Me.TBDD_CONNECTIONTableAdapter.Fill(Me.DD_DMSDataSet.TBDD_CONNECTION)
Catch ex As Exception
MsgBox("Error in Loading form:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
Laod_Profiles()
Load_Profiles_ComboBox()
'TODO: Diese Codezeile lädt Daten in die Tabelle "DD_DMSDataSet.TBPMO_WD_IMPORT_PROFILE". Sie können sie bei Bedarf verschieben oder entfernen.
End Sub
Sub Laod_Profiles()
Try
Me.TBPMO_WD_IMPORT_PROFILETableAdapter.Fill(Me.DD_DMSDataSet.TBPMO_WD_IMPORT_PROFILE)
Dim sql = String.Format("SELECT T.GUID, T1.FORM_TITLE,[dbo].[FNPMO_GETOBJECTCAPTION]('{0}','FORMVIEW_TITLE' + CONVERT(VARCHAR(5), T1.GUID), {1}) AS 'CAPTION' FROM " & _
"TBPMO_FORM T, TBPMO_FORM_VIEW T1 WHERE T.GUID = T1.FORM_ID AND T.GUID IN (select DISTINCT ENTITY_ID FROM TBPMO_CLIENT_ENTITY WHERE CLIENT_ID IN (select client_Id from TBDD_CLIENT_USER where USER_ID = {2}))", USER_LANGUAGE, CURRENT_SCREEN_ID, USER_GUID)
Dim DT As DataTable = ClassDatabase.Return_Datatable(sql)
cmbentity.DataSource = DT
cmbentity.DisplayMember = DT.Columns(1).ColumnName
cmbentity.ValueMember = DT.Columns(0).ColumnName
Catch ex As Exception
MsgBox("Error in Loading Profiles:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Sub Load_Profiles_ComboBox()
Try
Dim DT = ClassDatabase.Return_Datatable("SELECT T.GUID, T.NAME FROM TBPMO_WD_IMPORT_PROFILE T ORDER BY T.NAME", "LOAD Profiles Combobox")
cmbImportProfile.DataSource = DT
cmbImportProfile.DisplayMember = DT.Columns(1).ColumnName
cmbImportProfile.ValueMember = DT.Columns(0).ColumnName
Catch ex As Exception
MsgBox("Error in Loading Profiles to Combobox:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Private Sub ObjektTypenEintragen()
Try
Dim oDokumentTyp As WINDREAMLib.WMObject
' Combobox leeren
Me.NEW_OBJECTTYPEComboBox.Items.Clear()
Me.OLD_OBJECTTYPEComboBox.Items.Clear()
' alle Objekttypen durchlaufen
For Each oDokumentTyp In ClassWindream.GetObjecttypesAsObjects
' und in die Combobox eintragen
Me.NEW_OBJECTTYPEComboBox.Items.Add(oDokumentTyp.aName)
Me.OLD_OBJECTTYPEComboBox.Items.Add(oDokumentTyp.aName)
Next
Catch ex As Exception
MsgBox("Error in loading Objecttypes:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Private Sub btnWDSearch_Click(sender As Object, e As EventArgs) Handles btnWDSearch.Click
If Not Me.WD_SEARCHTextBox.Text = "" Then
Me.dlgWindreamsuche.FileName = Me.WD_SEARCHTextBox.Text
End If
If Me.dlgWindreamsuche.ShowDialog = Windows.Forms.DialogResult.OK Then
Me.WD_SEARCHTextBox.Text = Me.dlgWindreamsuche.FileName
End If
End Sub
Private Sub TBPMO_WD_IMPORT_PROFILEBindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBPMO_WD_IMPORT_PROFILEBindingSource.AddingNew
Me.DD_DMSDataSet.TBPMO_WD_IMPORT_PROFILE.ADDED_WHOColumn.DefaultValue = Environment.UserName
End Sub
Private Sub btnStartStop_Click(sender As Object, e As EventArgs) Handles btnStartStop.Click
Start_Threads()
End Sub
Sub Start_Threads()
If bwsearch.IsBusy Then
MsgBox("Sorry but Import is still running!", MsgBoxStyle.Exclamation)
Exit Sub
End If
Try
Dim sql = "select * FROM TBPMO_WD_IMPORT_PROFILE where GUID = " & cmbImportProfile.SelectedValue.ToString
Dim DT As DataTable = ClassDatabase.Return_Datatable(sql)
PROFILE_WD_SEARCH = DT.Rows(0).Item("WD_SEARCH")
PROFILE_SQL_DOCTYPE = DT.Rows(0).Item("SQL_DOCTYPE")
PROFILE_SQL_UNIQUE = DT.Rows(0).Item("UNIQUE_DOC_SQL")
PROFILE_ENTITY = DT.Rows(0).Item("ENTITY_ID")
PROFILE_OBJECTTYPE = DT.Rows(0).Item("OLD_OBJECTTYPE")
PROFILE_IDX_WORKED = DT.Rows(0).Item("IDX_FILE_WORKED")
PROFILE_SQL_PARENT = DT.Rows(0).Item("SQL_PARENT_RECORD")
PROFILE_ONLY_RECORD = DT.Rows(0).Item("ONLY_RECORD_CREATING")
If PROFILE_ONLY_RECORD = True Then
ClassLogger.Add(">> Only Records shall be created", False)
End If
PROFILE_NEW_OT = DT.Rows(0).Item("NEW_OBJECTTYPE")
Catch ex As Exception
MsgBox("Error in getting Profile Parameters:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
windreamSucheErgebnisse = Nothing
'Die NI wird ganz normal gestartet
Me.btnStartStop.Text = "Import stoppen"
Search_Completed = False
'Variable für den Fall Programmabbruch und Neustart!
bwsearch = New BackgroundWorker
AddHandler bwsearch.DoWork, AddressOf Work_Search
AddHandler bwsearch.RunWorkerCompleted, AddressOf bwsearch_RunWorkerCompleted
bwsearch.WorkerSupportsCancellation = True
bwsearch.WorkerReportsProgress = True
' den Indexierungsvorgang direkt (zum ersten Mal) durchführen
Me.Start_Profile()
Me.btnStartStop.Text = "Import starten"
Me.lblStatusThread.Text = "Status: Import beendet"
End Sub
Public Sub Start_Profile()
Try
If ClassWindream.Init = False Then
MsgBox("windream could not be init'ed!!", MsgBoxStyle.Critical)
Exit Sub
End If
'nur weiter machen wenn kein BackgroundWorker mehr läuft
If Not Me.bwsearch.IsBusy Then
ClassLogger.Add("======================================================================", False)
ClassLogger.Add("Import RecordFiles started ", False)
ClassLogger.Add(Now, False)
ClassLogger.Add("======================================================================", False)
Me.lblStatusThread.Text = "Status: Import läuft"
bwsearch.RunWorkerAsync()
Do While Search_Completed = False
Loop
If Not IsNothing(windreamSucheErgebnisse) Then
If windreamSucheErgebnisse.Count > 0 Then
Me.ProgressBar1.Minimum = 0
Me.ProgressBar1.Maximum = windreamSucheErgebnisse.Count
Me.ProgressBar1.Value = 0
Me.Refresh()
ClassWindream._WDObjekttyp = PROFILE_NEW_OT
_Filesimported = 0
_RecordsAdded = 0
Work_File()
MsgBox(_Filesimported.ToString & " Files were imported to ADDI!" & vbNewLine & _
_RecordsAdded.ToString & " Records were added!", MsgBoxStyle.Information)
Else
MsgBox("No Results for windream-Search!", MsgBoxStyle.Information)
End If
End If
Else
If Me.bwsearch.IsBusy Then
ClassLogger.Add(">> Attention: Thread Search still working - Threads will be aborted.", False)
Me.bwsearch.CancelAsync()
MsgBox("Threads were cancelled!", MsgBoxStyle.Information)
End If
End If
Catch ex As Exception
MsgBox("Unexpexted error in Start_Profile: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
ClassLogger.Add("Unexpexted error in Start_Profile: " & ex.Message, True)
End Try
End Sub
Sub Work_Search()
Try
RUN_SEARCH()
Catch ex As Exception
MsgBox("Unexpexted error in Start_Search: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
ClassLogger.Add("Unexpexted error in Start_Search: " & ex.Message, True)
End Try
End Sub
Sub RUN_SEARCH()
Try
windreamSucheErgebnisse = ClassWindream.GetSearchDocuments(PROFILE_WD_SEARCH)
ClassLogger.Add(">> Files Result: " & windreamSucheErgebnisse.Count, False)
Search_Completed = True
Catch ex As Exception
ClassLogger.Add("Error in RUN_SEARCH - Error: " & ex.Message)
End Try
End Sub
Private Sub bwsearch_RunWorkerCompleted(ByVal sender As Object, ByVal e As System.ComponentModel.RunWorkerCompletedEventArgs)
'Dim minutes = CInt(System.DateTime.Now.Subtract(CURRENT_START_DATETIME).Minutes)
'If minutes >= 1 Then
' Logger(" >> Suchdauer >= 1 Minute aber letzendlich ausgeführt (" & Now & ")", True)
'End If
End Sub
Sub Work_File()
Try
IMP_PARENT_REC_ID = Nothing
IMPORT_REC_ID = Nothing
'Liefert nur den Pfad des aktiven Dokumens
Dim Folder As String
For Each dok As WMObject In windreamSucheErgebnisse
Dim REC_EXISTS As Boolean = False
' aktuelles Dokument der Klasse mitteilen
Me.aktivesDokument = dok
Dim filename = "W:" & aktivesDokument.aPath
Dim DOK_FOLDER As String = IO.Path.GetDirectoryName(filename)
If LogErrorsOnly = False Then ClassLogger.Add(" >> Working on file '" & IO.Path.GetFileName(filename) & "'", False)
If Folder <> DOK_FOLDER Then
If LogErrorsOnly = False Then ClassLogger.Add(" >> Folderpath '" & DOK_FOLDER & "'", False)
Folder = DOK_FOLDER
End If
If Create_Record() = True Then
If PROFILE_SQL_PARENT <> "" Then
If Create_Parent_Record() = False Then
ClassLogger.Add(">> Create Parent-Record not successful!", False)
End If
End If
If PROFILE_ONLY_RECORD = False Then 'Es sollen auch Dateien importiert werden
If Import_File() = False Then
ClassLogger.Add(">> No import of file! Exit For each!", False)
Continue For
End If
End If
If IMP_REC_EXISTS = False Then
Dim sql As String
sql = "SELECT * FROM TBPMO_WD_IMPORT_PROFILE_IDX WHERE STRING1 NOT IN ('DOCTYPE_ORIGIN','INDEX_RECORD_ID','INDEX_DOCTYPE','INDEX_ENTITY_ID') AND PROFILE_ID = " & cmbImportProfile.SelectedValue
Dim DT As DataTable = ClassDatabase.Return_Datatable(sql)
If DT Is Nothing = False Then 'CHECK DD
If DT.Rows.Count >= 0 Then
If LogErrorsOnly = False Then ClassLogger.Add(" >> " & DT.Rows.Count & " Control-Index-Rows", False)
Dim err As Boolean = False
For Each row As DataRow In DT.Rows
'Den Wert aus dem Index des Dokuments auslesen und in den ControlValue schreiben
Dim idxvalue
Dim indexname_old = row.Item("STRING2").ToString
If LogErrorsOnly = False Then ClassLogger.Add(" >> Read Value 2 for windream-index: '" & indexname_old & "'", False)
Try
idxvalue = aktivesDokument.GetVariableValue(indexname_old)
If LogErrorsOnly = False Then ClassLogger.Add(" >> idxvalue from windream: '" & idxvalue.ToString & "'", False)
Catch ex As Exception
err = True
ClassLogger.Add(">> Error Reading Value 2 for windream-index '" & indexname_old & "' - Error: " & ex.Message, False)
Continue For
End Try
Dim CONTROL_ID = row.Item("STRING1").ToString
If CONTROL_ID = -1 Then
Continue For
End If
Dim ins = String.Format("INSERT INTO TBPMO_CONTROL_VALUE (CONTROL_ID,RECORD_ID,VALUE,ADDED_WHO) VALUES ({0},{1},'{2}','{3}')", CONTROL_ID, IMPORT_REC_ID, idxvalue, Environment.UserName)
ClassDatabase.Execute_non_Query(ins)
'ByVal WD_File As String, ByVal _Indexname As String, ByVal _Value As String
Next
Else
ClassLogger.Add(">>There are no control-index relations defined!", False)
End If
Else
If LogErrorsOnly = False Then ClassLogger.Add(" >> No control-values configured!", False)
End If
Else
If LogErrorsOnly = False Then ClassLogger.Add(" >> REC_EXISTS = True - no control values to be set!", False)
End If
Else
ClassLogger.Add(">> Create Record not successful!", False)
End If
'
'####### Go für das Dokument ##########
ProgressBar1.Value += 1
' bwsearch.ReportProgress(-1)
Next
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Function Import_File()
Try
Dim Sql As String
Dim SQL_FILE_DOCTYPE = PROFILE_SQL_DOCTYPE
'Regulären Ausdruck zum Auslesen der windream-Indexe definieren
Dim preg As String = "\[%{1}[a-zA-Z0-9\!\$\&\/\(\)\=\?\,\.\-\;\:_öÖüÜäÄ\#\'\+\*\~\{\}\@\€\<\>\ ]+]{1}"
' einen Regulären Ausdruck laden
Dim regulärerAusdruck As System.Text.RegularExpressions.Regex = New System.Text.RegularExpressions.Regex(preg)
' die Vorkommen im SQL-String auslesen
Dim elemente As System.Text.RegularExpressions.MatchCollection = regulärerAusdruck.Matches(SQL_FILE_DOCTYPE)
' alle Vorkommen der windream-Indexe im SQL-String durchlaufen
'#####
' alle Vorkommen der windream-Indexe im SQL-String durchlaufen
For Each element As System.Text.RegularExpressions.Match In elemente
Dim elementohneSZ = element.Value.Replace("[%", "")
elementohneSZ = elementohneSZ.Replace("]", "")
' für den Platzhalter den WErt aus windream auslesen
If LogErrorsOnly = False Then ClassLogger.Add(" >> Read value for windream-index: '" & elementohneSZ & "'", False)
Dim idxvalue
Try
idxvalue = aktivesDokument.GetVariableValue(elementohneSZ)
If LogErrorsOnly = False Then ClassLogger.Add(" >> idxvalue from windream: '" & idxvalue.ToString & "'", False)
Catch ex As Exception
ClassLogger.Add(">> Regex Doctype SQL: Error reading Value for windream-index '" & elementohneSZ & "' - Error: " & ex.Message, False)
Continue For
End Try
' den Platzhalter für den auszulesenden View durch den Viewnamen ersetzen
SQL_FILE_DOCTYPE = SQL_FILE_DOCTYPE.Replace(element.Value, idxvalue.ToString)
Next
If LogErrorsOnly = False Then ClassLogger.Add(" >> Executing Doctype SQL: " & SQL_FILE_DOCTYPE, False)
Dim DokTYPE_ID = ClassDatabase.Execute_Scalar(SQL_FILE_DOCTYPE)
'#####
If Not IsNothing(DokTYPE_ID) Then
Sql = "SELECT ZIEL_PFAD FROM TBDD_DOKUMENTART WHERE GUID = " & DokTYPE_ID
Dim Targetpath = ClassDatabase.Execute_Scalar(Sql)
Dim document_ID
Try
document_ID = aktivesDokument.GetVariableValue("dwDocID")
Catch ex As Exception
End Try
Dim ww
Try
ww = aktivesDokument.GetVariableValue("Dokument-ID")
Catch ex As Exception
End Try
If ClassImport_Windream.Version_Ueberprüfen(Targetpath & "\" & IO.Path.GetFileName("W:" & aktivesDokument.aPath)) = True Then
'CURRENT_NEWFILENAME = Targetpath & "\" & IO.Path.GetFileName("W:" & aktivesDokument.aPath)
Dim streamresult = ClassWindream.Stream_File("W:" & aktivesDokument.aPath, Targetpath, True)
If streamresult = True Then
'Die EntitätsID indexieren
Sql = "SELECT STRING2 FROM TBPMO_WD_IMPORT_PROFILE_IDX WHERE STRING1 = 'INDEX_ENTITY_ID' AND PROFILE_ID = " & cmbImportProfile.SelectedValue
Dim ENTITY_INDEX As String = ClassDatabase.Execute_Scalar(Sql)
If Not IsNothing(ENTITY_INDEX) Then
ClassWindream.DateiIndexieren(CURRENT_FILEIN_WD, ENTITY_INDEX, PROFILE_ENTITY)
End If
If Not IsNothing(IMP_PARENT_REC_ID) Then
'Die Parent-Entität indexieren
Sql = "SELECT IDXNAME_ENTITYID FROM TBPMO_WD_OBJECTTYPE WHERE OBJECT_TYPE = '" & PROFILE_NEW_OT & "'"
Dim PIDENT As String = ClassDatabase.Execute_Scalar(Sql)
If Not IsNothing(PIDENT) Then
ClassWindream.DateiIndexieren(CURRENT_FILEIN_WD, PIDENT, IMP_PARENT_REC_ID.ToString)
End If
End If
'Die Dokumentart indexieren
Sql = String.Format("SELECT dbo.FNPMO_GETOBJECTCAPTION('{0}', 'DOCTYPE_TITLE' + CONVERT(VARCHAR(5), GUID), 1) FROM TBDD_DOKUMENTART WHERE GUID = {1}", USER_LANGUAGE, DokTYPE_ID)
Dim DOCTYPE_STRING = ClassDatabase.Execute_Scalar(Sql)
Sql = "SELECT IDXNAME_DOCTYPE FROM TBPMO_WD_OBJECTTYPE WHERE OBJECT_TYPE = '" & PROFILE_NEW_OT & "'"
Dim DoctypeIndex As String = ClassDatabase.Execute_Scalar(Sql)
If Not IsNothing(DoctypeIndex) Then
ClassWindream.DateiIndexieren(CURRENT_FILEIN_WD, DoctypeIndex, DOCTYPE_STRING.ToString)
Else
Sql = "SELECT STRING2 FROM TBPMO_WD_IMPORT_PROFILE_IDX WHERE STRING1 = 'INDEX_DOCTYPE' AND PROFILE_ID = " & cmbImportProfile.SelectedValue
DoctypeIndex = ClassDatabase.Execute_Scalar(Sql)
If Not IsNothing(DoctypeIndex) Then
ClassWindream.DateiIndexieren(CURRENT_FILEIN_WD, DoctypeIndex, DOCTYPE_STRING)
End If
End If
'#####
Sql = "SELECT IDXNAME_RECORDID FROM TBPMO_WD_OBJECTTYPE WHERE OBJECT_TYPE = '" & PROFILE_NEW_OT & "'"
Dim RecordIndex As String = ClassDatabase.Execute_Scalar(Sql)
If Not IsNothing(RecordIndex) Then
ClassWindream.DateiIndexieren(CURRENT_FILEIN_WD, RecordIndex, IMPORT_REC_ID)
Else
Sql = "SELECT STRING2 FROM TBPMO_WD_IMPORT_PROFILE_IDX WHERE STRING1 = 'INDEX_RECORD_ID' AND PROFILE_ID = " & cmbImportProfile.SelectedValue
RecordIndex = ClassDatabase.Execute_Scalar(Sql)
If ClassWindream.DateiIndexieren(CURRENT_FILEIN_WD, RecordIndex, IMPORT_REC_ID) Then
If LogErrorsOnly = False Then ClassLogger.Add(" >> Record Index was written", False)
End If
End If
If PROFILE_IDX_WORKED <> "" Then
If LogErrorsOnly = False Then ClassLogger.Add(" >> Setting the Exported to ADDI-Flag - windream-index '" & PROFILE_IDX_WORKED & "'", False)
ClassWindream.File_SetBooleanIndex(True, aktivesDokument, PROFILE_IDX_WORKED, False)
End If
_Filesimported += 1
Return True
Else
ClassLogger.Add(">> File was not imported!", False)
Return False
End If
End If
Else
ClassLogger.Add(">> No doctype-ID found", False)
ClassLogger.Add(">> SQL: " & SQL_FILE_DOCTYPE, False)
Return False
End If
Catch ex As Exception
ClassLogger.Add(">> Unexpected Error in Import/IndexFile: " & ex.Message, False)
MsgBox("Unexpected Error in Import/IndexFile: " & ex.Message, MsgBoxStyle.Critical)
Return False
End Try
End Function
Function Create_Record()
Try
IMP_REC_EXISTS = False
Dim SQL_UNIQUE_FILE
If PROFILE_SQL_UNIQUE <> "" Then
SQL_UNIQUE_FILE = PROFILE_SQL_UNIQUE
'Regulären Ausdruck zum Auslesen der windream-Indexe definieren
Dim preg As String = "\[%{1}[a-zA-Z0-9\!\$\&\/\(\)\=\?\,\.\-\;\:_öÖüÜäÄ\#\'\+\*\~\{\}\@\€\<\>\ ]+]{1}"
' einen Regulären Ausdruck laden
Dim regulärerAusdruck As System.Text.RegularExpressions.Regex = New System.Text.RegularExpressions.Regex(preg)
' die Vorkommen im SQL-String auslesen
Dim elemente As System.Text.RegularExpressions.MatchCollection = regulärerAusdruck.Matches(SQL_UNIQUE_FILE)
' alle Vorkommen der windream-Indexe im SQL-String durchlaufen
For Each element As System.Text.RegularExpressions.Match In elemente
Dim elementohneSZ = element.Value.Replace("[%", "")
elementohneSZ = elementohneSZ.Replace("]", "")
' für den Platzhalter den WErt aus windream auslesen
If LogErrorsOnly = False Then ClassLogger.Add(" >> Read value 1 for windream-index: '" & elementohneSZ & "'", False)
Dim idxvalue
Try
idxvalue = aktivesDokument.GetVariableValue(elementohneSZ)
If LogErrorsOnly = False Then ClassLogger.Add(" >> idxvalue from windream: '" & idxvalue.ToString & "'", False)
Catch ex As Exception
ClassLogger.Add(">> Regex Unique SQL: Error reading Value 1 for windream-index '" & elementohneSZ & "' - Error: " & ex.Message, False)
Continue For
End Try
' den Platzhalter für den auszulesenden View durch den Viewnamen ersetzen
SQL_UNIQUE_FILE = SQL_UNIQUE_FILE.Replace(element.Value, idxvalue.ToString)
Next
If LogErrorsOnly = False Then ClassLogger.Add(" >> Executing Unique SQL: " & SQL_UNIQUE_FILE, False)
IMPORT_REC_ID = ClassDatabase.Execute_Scalar(SQL_UNIQUE_FILE)
End If
If IMPORT_REC_ID = Nothing Then
If LogErrorsOnly = False Then ClassLogger.Add(" >> Record is new!", False)
'Den Record inserten
ClassControlCommandsUI.CreateRecord(PROFILE_ENTITY)
IMPORT_REC_ID = ClassControlCommandsUI.GetLastRecord()
If LogErrorsOnly = False Then ClassLogger.Add(" >> New Record-ID: " & IMPORT_REC_ID.ToString, False)
_RecordsAdded += 1
Else
ClassLogger.Add(">> ## RECORD already exists - Record-ID: '" & IMPORT_REC_ID.ToString & "' ##", False)
If LogErrorsOnly = True Then ClassLogger.Add(">> Unique SQL: " & SQL_UNIQUE_FILE, False)
IMP_REC_EXISTS = True
End If
Return True
Catch ex As Exception
ClassLogger.Add(">> Unexpected Error in Create-Record: " & ex.Message, False)
MsgBox("Unexpected Error in Create-Record: " & ex.Message, MsgBoxStyle.Critical)
Return False
End Try
End Function
Function Create_Parent_Record()
Try
Dim SQL_PARENT As String
SQL_PARENT = PROFILE_SQL_PARENT
'Regulären Ausdruck zum Auslesen der windream-Indexe definieren
Dim preg As String = "\[%{1}[a-zA-Z0-9\!\$\&\/\(\)\=\?\,\.\-\;\:_öÖüÜäÄ\#\'\+\*\~\{\}\@\€\<\>\ ]+]{1}"
' einen Regulären Ausdruck laden
Dim regulärerAusdruck As System.Text.RegularExpressions.Regex = New System.Text.RegularExpressions.Regex(preg)
' die Vorkommen im SQL-String auslesen
Dim elemente As System.Text.RegularExpressions.MatchCollection = regulärerAusdruck.Matches(SQL_PARENT)
' alle Vorkommen der windream-Indexe im SQL-String durchlaufen
For Each element As System.Text.RegularExpressions.Match In elemente
Dim elementohneSZ = element.Value.Replace("[%", "")
elementohneSZ = elementohneSZ.Replace("]", "")
' für den Platzhalter den WErt aus windream auslesen
If LogErrorsOnly = False Then ClassLogger.Add(" >> Read parent value for windream-index: '" & elementohneSZ & "'", False)
Dim idxvalue
Try
idxvalue = aktivesDokument.GetVariableValue(elementohneSZ)
If LogErrorsOnly = False Then ClassLogger.Add(" >> parent idxvalue from windream: '" & idxvalue.ToString & "'", False)
Catch ex As Exception
ClassLogger.Add(">> Regex Unique SQL: Error reading parent Value for windream-index '" & elementohneSZ & "' - Error: " & ex.Message, False)
Continue For
End Try
' den Platzhalter für den auszulesenden View durch den Viewnamen ersetzen
SQL_PARENT = SQL_PARENT.Replace(element.Value, idxvalue.ToString)
Next
If LogErrorsOnly = False Then ClassLogger.Add(" >> Executing parent SQL: " & SQL_PARENT, False)
IMP_PARENT_REC_ID = ClassDatabase.Execute_Scalar(SQL_PARENT)
If IMP_PARENT_REC_ID = Nothing Then
If LogErrorsOnly = False Then ClassLogger.Add(" >> No PARENT_RECORD found!", False)
'Den Record inserten
ClassControlCommandsUI.CreateRecord(PROFILE_ENTITY)
IMP_PARENT_REC_ID = ClassControlCommandsUI.GetLastRecord()
If LogErrorsOnly = False Then ClassLogger.Add(" >> New PARENT_RECORD-ID: " & IMP_PARENT_REC_ID.ToString, False)
_RecordsAdded += 1
Else
ClassLogger.Add(">> ## RECORD already exists - PARENT_RECORD-ID: '" & IMP_PARENT_REC_ID.ToString & "' ##", False)
If LogErrorsOnly = True Then ClassLogger.Add(">> parent SQL: " & SQL_PARENT, False)
End If
Dim sql = String.Format("SELECT GUID FROM TBPMO_RECORD_CONNECT WHERE RECORD1_ID = {0} AND RECORD2_ID = {1}", IMP_PARENT_REC_ID, IMPORT_REC_ID)
Dim result = ClassDatabase.Execute_Scalar(sql)
If result Is Nothing Then
ClassControlCommandsUI.ConnectRecord(IMP_PARENT_REC_ID, IMPORT_REC_ID, "IMP CONNECT")
End If
Return True
Catch ex As Exception
ClassLogger.Add(">> Unexpected Error in Create-Parent-Record: " & ex.Message, False)
MsgBox("Unexpected Error in Create-Parent-Record: " & ex.Message, MsgBoxStyle.Critical)
Return False
End Try
End Function
Private Sub Load_INDEXE()
If GUIDTextBox.Text = "" Then Exit Sub
Try
Me.TBPMO_WD_IMPORT_PROFILE_IDXTableAdapter.Connection.ConnectionString = MyConnectionString
Me.TBPMO_WD_IMPORT_PROFILE_IDXTableAdapter.Fill(Me.DD_DMSDataSet.TBPMO_WD_IMPORT_PROFILE_IDX, CType(GUIDTextBox.Text, Integer))
Catch ex As System.Exception
MsgBox("Error loading INDEX-Relations: " & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Private Sub TBDD_CONNECTIONBindingSource_CurrentChanged(sender As Object, e As EventArgs) Handles TBDD_CONNECTIONBindingSource.CurrentChanged
Load_INDEXE()
End Sub
Private Sub frmWD_Import_Doc_Record_Shown(sender As Object, e As EventArgs) Handles Me.Shown
End Sub
Private Sub TabControl1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles TabControl1.SelectedIndexChanged
If TabControl1.SelectedIndex = 1 Then
Load_INDEXE()
End If
End Sub
Private Sub cmbentity_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbentity.SelectedIndexChanged
If cmbentity.SelectedIndex = -1 Or cmbentity.Text = "" Then Exit Sub
Load_StringBox1()
End Sub
Private Sub TBPMO_WD_IMPORT_PROFILEBindingSource_CurrentChanged(sender As Object, e As EventArgs) Handles TBPMO_WD_IMPORT_PROFILEBindingSource.CurrentChanged
If Not cmbentity.SelectedIndex = -1 And Not cmbentity.Text = "" Then
Load_StringBox1()
End If
If Not OLD_OBJECTTYPEComboBox.Text = "" Then
Load_StringBox2()
End If
End Sub
Sub Load_StringBox2()
Try
Me.STRING2ComboBox.Items.Clear()
Dim indexe = ClassWindream.GetIndicesByObjecttype(OLD_OBJECTTYPEComboBox.Text)
If indexe IsNot Nothing Then
For Each index As String In indexe
Me.STRING2ComboBox.Items.Add(index)
Next
End If
Catch ex As Exception
MsgBox("Error in Loading String 2 Combobox:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Sub Load_StringBox1()
Try
' STRING1ComboBox.Items.Clear()
Dim Type = cmbentity.SelectedValue.GetType.ToString
If Type = "System.Data.DataRowView" Then
Exit Sub
End If
Dim sql = "SELECT CONVERT(VARCHAR(5),GUID) AS GUID, NAME FROM TBPMO_CONTROL where FORM_ID = " & cmbentity.SelectedValue & " UNION ALL SELECT 'DOCTYPE_ORIGIN','DOCTYPE_ORIGIN' UNION ALL " & _
"SELECT 'INDEX_RECORD_ID','INDEX_RECORD_ID' UNION ALL " & _
"SELECT 'INDEX_ENTITY_ID','INDEX_ENTITY_ID' UNION ALL " & _
"SELECT 'INDEX_DOCTYPE','INDEX_DOCTYPE'"
Dim DT = ClassDatabase.Return_Datatable(sql, "Load String1 Data")
STRING1ComboBox.DataSource = DT
STRING1ComboBox.DisplayMember = DT.Columns(1).ColumnName
STRING1ComboBox.ValueMember = DT.Columns(0).ColumnName
Catch ex As Exception
MsgBox("Error in Loading String 1 Combobox:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Private Sub OLD_OBJECTTYPEComboBox_SelectedIndexChanged(sender As Object, e As EventArgs) Handles OLD_OBJECTTYPEComboBox.SelectedIndexChanged
If Not OLD_OBJECTTYPEComboBox.Text = "" Then
Load_StringBox2()
End If
End Sub
Private Sub ToolStripButton7_Click(sender As Object, e As EventArgs) Handles ToolStripButton7.Click
Try
Dim msg = "Index Zuordnung gespeichert - " & Now.ToString
If USER_LANGUAGE <> "de-DE" Then
msg = "Index Mapping saved- " & Now.ToString
End If
lblSaveProfile.Text = msg
Me.TBPMO_WD_IMPORT_PROFILE_IDXBindingSource.EndEdit()
If DD_DMSDataSet.TBPMO_WD_IMPORT_PROFILE_IDX.GetChanges Is Nothing = False Then
Me.CHANGED_WHOTextBox1.Text = Environment.UserName
Me.TBPMO_WD_IMPORT_PROFILE_IDXBindingSource.EndEdit()
Me.TBPMO_WD_IMPORT_PROFILE_IDXTableAdapter.Update(Me.DD_DMSDataSet.TBPMO_WD_IMPORT_PROFILE_IDX)
Me.lblSaveIDX.Visible = True
Else
Me.lblSaveIDX.Visible = False
End If
Catch ex As Exception
MsgBox("Error in Save Index-Mapping:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Private Sub NEW_OBJECTTYPEComboBox_SelectedIndexChanged(sender As Object, e As EventArgs) Handles NEW_OBJECTTYPEComboBox.SelectedIndexChanged
If NEW_OBJECTTYPEComboBox.Text = "" Or NEW_OBJECTTYPEComboBox.SelectedIndex = -1 Then Exit Sub
Dim indexe = ClassWindream.GetIndicesByObjecttype(OLD_OBJECTTYPEComboBox.Text)
If indexe IsNot Nothing Then
Me.IDX_FILE_WORKEDComboBox.Items.Add("")
For Each index As String In indexe
Select Case ClassWindream.GetTypeOfIndexAsIntByName(index)
Case 4
Me.IDX_FILE_WORKEDComboBox.Items.Add(index)
'Case 1
' Me.cmbCrFolderIndex.Items.Add(index)
' cmbMOREDokumentart.Items.Add(index)
' cmbMoReKundenindex.Items.Add(index)
'Case 2
' Me.cmbCrFolderIndex.Items.Add(index)
' cmbMOREDokumentart.Items.Add(index)
' cmbMoReKundenindex.Items.Add(index)
'Case 5
' Me.cmbCrFolderIndex.Items.Add(index)
' cmbMOREDokumentart.Items.Add(index)
' cmbMoReKundenindex.Items.Add(index)
'Case Else
'MsgBox(_windream.GetTypeOfIndexAsIntByName(index) & vbNewLine & index)
End Select
Next
'Me.cmbIndexValidierung.SelectedIndex = -1
'Me.cmbIndexValidierung.SelectedItem = 0
'Me.cmbIndexFehler.SelectedIndex = -1
'Me.cmbIndexFehler.SelectedItem = 0
'Me.cmbCrFolderIndex.SelectedIndex = -1
'Me.cmbCrFolderIndex.SelectedValue = 0
End If
End Sub
End Class