MS AdhocWorkflow
This commit is contained in:
parent
09a61da565
commit
2e0efa7670
@ -505,7 +505,7 @@ Public Class ClassControlCreator
|
||||
|
||||
Dim oColumn = New DataColumn() With {
|
||||
.ColumnName = oRow.Item("SPALTENNAME"),
|
||||
.Caption = oRow.Item("SPALTEN_HEADER"),
|
||||
.Caption = oRow.Item("SPALTEN_HEADER_LANG"),
|
||||
.ReadOnly = False
|
||||
}
|
||||
Select Case oRow.Item("TYPE_COLUMN")
|
||||
|
||||
@ -424,11 +424,12 @@ Public Class ClassInit
|
||||
Dim oStopWatch As New RefreshHelper.SW("InitBasics")
|
||||
Dim oSql = String.Format("select * from TBPM_KONFIGURATION WHERE GUID = 1")
|
||||
oStep = "TBPM_KONFIGURATION"
|
||||
'BASEDATA_DT_CONFIG = DataASorDB.GetDatatable("DD_ECM", oSql, "TBPM_KONFIGURATION", $"GUID = 1")
|
||||
|
||||
BASEDATA_DT_CONFIG = DatabaseFallback.GetDatatable("TBPM_KONFIGURATION", New GetDatatableOptions(oSql, DatabaseType.ECM) With {
|
||||
.FilterExpression = $"GUID = 1"
|
||||
})
|
||||
|
||||
WMSUFFIX = BASEDATA_DT_CONFIG.Rows.Item(0).Item("WM_REL_PATH")
|
||||
WMDriveLetter = "W"
|
||||
Settings_LoadBasicConfig()
|
||||
|
||||
oStep = "TBDD_CONNECTION"
|
||||
|
||||
@ -131,6 +131,21 @@ Public Class ClassPMWindream
|
||||
Return False
|
||||
End Try
|
||||
|
||||
If oDocument.aObjectType.aName <> CURRENT_WMObjecttype Then
|
||||
' ihr den entsprechenden Dokumenttyp zuweisen
|
||||
oDocument.aObjectType = Me.oSession.GetWMObjectByName(WINDREAMLib.WMEntity.WMEntityObjectType, CURRENT_WMObjecttype)
|
||||
' WMObject.aObjectType = Me.selectedProfile.Dokumenttyp
|
||||
LOGGER.Debug("Objekttyp '" & oDocument.aObjectType.aName & "' was changed to '" & CURRENT_WMObjecttype & "'.")
|
||||
Try
|
||||
oDocument.Save()
|
||||
Catch ex As Exception
|
||||
' wenn es einen Fehler beim speichern gab, dann konnte auch kein Dokumenttyp gesetzt werden -> es kann also auch keine
|
||||
' Indexierung stattfinden und die Indexierung muss nicht fortgesetzt werden
|
||||
Return False
|
||||
End Try
|
||||
End If
|
||||
|
||||
|
||||
Dim i As Integer = 0
|
||||
Dim indexname As String
|
||||
|
||||
|
||||
@ -236,16 +236,20 @@ LOGGER.Error(ex)
|
||||
|
||||
End Function
|
||||
|
||||
Public Function NormalizePath(Path As String)
|
||||
Public Function NormalizePath(pPath As String)
|
||||
Dim oNormalizedPath As String
|
||||
If Path.StartsWith("\\windream") Then
|
||||
oNormalizedPath = Path.Replace("\\windream\objects\", "")
|
||||
ElseIf Path.StartsWith("\\") Then
|
||||
oNormalizedPath = Path.Substring(1)
|
||||
ElseIf Path.StartsWith("\") Then
|
||||
Return Path
|
||||
If pPath.StartsWith(WMSUFFIX) Then
|
||||
oNormalizedPath = pPath.Replace(WMSUFFIX, "")
|
||||
ElseIf pPath.StartsWith("\\") Then
|
||||
oNormalizedPath = pPath.Substring(1)
|
||||
ElseIf pPath.StartsWith("\") Then
|
||||
Return pPath
|
||||
ElseIf pPath.StartsWith(WMDriveLetter) Then
|
||||
oNormalizedPath = pPath.Replace(WMDriveLetter & ":", "")
|
||||
ElseIf pPath.StartsWith("\") = False Then
|
||||
oNormalizedPath = "\" & pPath
|
||||
Else
|
||||
oNormalizedPath = "\" & Path
|
||||
oNormalizedPath = pPath
|
||||
End If
|
||||
|
||||
Return oNormalizedPath
|
||||
|
||||
@ -187,6 +187,9 @@
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>..\..\..\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DigitalData.Modules.Windream">
|
||||
<HintPath>..\..\..\DDModules\Windream\bin\Debug\DigitalData.Modules.Windream.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DigitalData.Modules.ZooFlow, Version=1.2.0.0, Culture=neutral, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>..\..\..\DDModules\ZooFlow\bin\Debug\DigitalData.Modules.ZooFlow.dll</HintPath>
|
||||
|
||||
@ -4,14 +4,19 @@ Imports DigitalData.Modules.Logging
|
||||
Imports DigitalData.Modules.EDMI.API
|
||||
Imports DigitalData.Modules.Database
|
||||
Imports DigitalData.Modules.ZooFlow
|
||||
Imports DigitalData.Modules.Windream
|
||||
|
||||
Module ModuleRuntimeVariables
|
||||
|
||||
Public Const ConstAHWorkflow_BlindFile = 1
|
||||
Public Const ConstAHWorkflow_IDB = 2
|
||||
Public Const ConstWorkflowTypeRegular = 99
|
||||
Public Property DatabaseECM As MSSQLServer
|
||||
Public Property DatabaseIDB As MSSQLServer
|
||||
Public Property EDMIService As New State.ServiceState
|
||||
Public Property User As New State.UserState
|
||||
' Diese Werte müssen später zur Laufzeit geladen werden
|
||||
Public Property ActiveWorkflowType As Integer
|
||||
Public Property BASEDATA_DT_TBDD_CONNECTION As DataTable
|
||||
Public Property BASEDATA_DT_TBDD_SQL_COMMANDS As DataTable
|
||||
Public Property BASEDATA_DT_CONFIG As DataTable
|
||||
@ -29,14 +34,14 @@ Module ModuleRuntimeVariables
|
||||
Public Property CURRENT_ProfilName As String
|
||||
Public Property CURRENT_PROFILE_LOG_INDEX As String
|
||||
|
||||
Public Property CURRENT_DOC_GUID As Integer
|
||||
Public Property CURRENT_DOC_ID As Integer
|
||||
Public Property CURRENT_DOC_GUID As Int64
|
||||
Public Property CURRENT_DOC_ID As Int64
|
||||
Public Property CURRENT_DOC_CREATION_DATE As String
|
||||
Public Property CURRENT_DOC_CREATION_TIME As String
|
||||
|
||||
Public Property CURRENT_CONVERSATION_NEW As Long
|
||||
|
||||
Public Property CURRENT_JUMP_DOC_GUID As Integer
|
||||
Public Property CURRENT_JUMP_DOC_GUID As Int64
|
||||
Public Property CURRENT_WMFILE As WMObject
|
||||
|
||||
Public Property CURRENT_DOC_PATH As String
|
||||
@ -105,6 +110,7 @@ Module ModuleRuntimeVariables
|
||||
|
||||
Public Property CURRENT_CLICKED_PROFILE_ID As Integer = 0
|
||||
Public Property CURRENT_CLICKED_PROFILE_TITLE As String
|
||||
Public Property CURRENT_WMObjecttype As String
|
||||
|
||||
Public Property DT_CLIENT_USER As DataTable
|
||||
Public Property CLIENT_SELECTED As Integer = 0
|
||||
@ -136,6 +142,7 @@ Module ModuleRuntimeVariables
|
||||
Public Property errormessage As String
|
||||
|
||||
Public Property WINDREAM As ClassPMWindream
|
||||
Public Property WINDREAM_MOD As Windream
|
||||
Public Property WINDREAM_ALLG As ClassWindream_allgemein
|
||||
Public Property FINALINDICES As ClassFinalIndex
|
||||
Public Property IDBData As ClassIDBData
|
||||
@ -160,4 +167,7 @@ Module ModuleRuntimeVariables
|
||||
Public Property TimerRefresh_running As Boolean = False
|
||||
|
||||
Public Property SQL_PROFILES_USER As String = ""
|
||||
Public WMDriveLetter As String = "W"
|
||||
Public WMSUFFIX As String = "\\windream\objects"
|
||||
Public WM_AHWF_docPath As String
|
||||
End Module
|
||||
|
||||
443
app/DD_PM_WINDREAM/frmAdministration.Designer.vb
generated
443
app/DD_PM_WINDREAM/frmAdministration.Designer.vb
generated
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
@ -2,6 +2,7 @@
|
||||
Imports System.Data.SqlClient
|
||||
Imports System.IO
|
||||
Imports DD_LIB_Standards
|
||||
Imports DevExpress.Utils.Frames
|
||||
Imports DevExpress.XtraGrid
|
||||
Imports DevExpress.XtraGrid.Views.Base
|
||||
Imports DevExpress.XtraGrid.Views.Grid
|
||||
@ -133,7 +134,7 @@ Public Class frmAdministration
|
||||
' MyIndicies_Types.Add(type)
|
||||
'Next
|
||||
Catch ex As Exception
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
MsgBox("Error in GetIndices windream: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:")
|
||||
PM_VEKTOR_INDEXComboBox.SelectedIndex = -1
|
||||
cmbLOGIndex.SelectedIndex = -1
|
||||
@ -168,7 +169,7 @@ Public Class frmAdministration
|
||||
MyIndicies_Types.Add(type)
|
||||
Next
|
||||
Catch ex As Exception
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
MsgBox("Error in GetIndices IDB: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
@ -217,7 +218,7 @@ Public Class frmAdministration
|
||||
Me.cmbObjekttypen.Items.Add(aType.aName)
|
||||
Next
|
||||
Catch ex As Exception
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
MsgBox("Es konnte keine Verbindung zum windream-Server hergestellt werden.", MsgBoxStyle.Critical, "Fehler beim Zugriff auf windream-Server")
|
||||
End Try
|
||||
Else
|
||||
@ -232,7 +233,13 @@ Public Class frmAdministration
|
||||
End Sub
|
||||
|
||||
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles btnWMSuche.Click
|
||||
If IDB_ACTIVE = True Then
|
||||
If DISPLAY_MODEComboBox.Text = "AdHoc BlindFile" Then
|
||||
Dim result As DialogResult = OpenFileDialog1.ShowDialog()
|
||||
' Test result.
|
||||
If result = Windows.Forms.DialogResult.OK Then
|
||||
Me.WD_SEARCHTextBox.Text = OpenFileDialog1.FileName
|
||||
End If
|
||||
ElseIf IDB_ACTIVE = True Then
|
||||
CURRENT_DESIGN_TYPE = "IDB_SEARCH"
|
||||
Dim oForm As New frmSQLEditor(LOGCONFIG, DatabaseECM) With {
|
||||
.SQLCommand = Me.WD_SEARCHTextBox.Text,
|
||||
@ -255,6 +262,9 @@ Public Class frmAdministration
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub btnopenSuche_Click(sender As System.Object, e As System.EventArgs) Handles btnWMopenSuche.Click
|
||||
@ -268,7 +278,7 @@ Public Class frmAdministration
|
||||
p.Close()
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei öffnen der windream-Suche:")
|
||||
End Try
|
||||
End Sub
|
||||
@ -309,7 +319,7 @@ Public Class frmAdministration
|
||||
|
||||
Catch ex As Exception
|
||||
'Profilzuordnung'
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
@ -337,7 +347,7 @@ Public Class frmAdministration
|
||||
TBPROFILE_USERTableAdapter.CMDInsert(profileId, userId, USER_USERNAME)
|
||||
FillProfile_Zuordnung(profileId)
|
||||
Catch ex As Exception
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Hinzufügen eines Users:")
|
||||
End Try
|
||||
End Sub
|
||||
@ -351,7 +361,7 @@ Public Class frmAdministration
|
||||
TBPROFILE_USERTableAdapter.CmdDelete(profileId, userId)
|
||||
FillProfile_Zuordnung(profileId)
|
||||
Catch ex As Exception
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Entfernen eines Users:")
|
||||
End Try
|
||||
End Sub
|
||||
@ -367,7 +377,7 @@ Public Class frmAdministration
|
||||
' TBPROFILE_USERTableAdapter.CMDInsert(profileId, userId, USER_USERNAME)
|
||||
FillProfile_Zuordnung(profileId)
|
||||
Catch ex As Exception
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Hinzufügen einer Gruppe:")
|
||||
End Try
|
||||
End Sub
|
||||
@ -383,7 +393,7 @@ Public Class frmAdministration
|
||||
'TBPROFILE_USERTableAdapter.cmdDelete(userId)
|
||||
FillProfile_Zuordnung(profileId)
|
||||
Catch ex As Exception
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Entfernen einer Gruppe:")
|
||||
End Try
|
||||
End Sub
|
||||
@ -541,7 +551,7 @@ Public Class frmAdministration
|
||||
SQLconnection.Close()
|
||||
Return True
|
||||
Catch ex As Exception
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
MsgBox("Fehler in Execute_SQL: " & vbNewLine & ex.Message & vbNewLine & vbNewLine & " SQL: " & SQL)
|
||||
Return False
|
||||
End Try
|
||||
@ -583,7 +593,7 @@ Public Class frmAdministration
|
||||
Try
|
||||
Me.TBDD_USERTableAdapter.Fill(Me.DD_DMSLiteDataSet.TBDD_USER)
|
||||
Catch ex As Exception
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
MsgBox("Fehler bei LoadUsers: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler:")
|
||||
End Try
|
||||
End Sub
|
||||
@ -714,9 +724,9 @@ Public Class frmAdministration
|
||||
Refresh_Final_indexe()
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
MsgBox($"Error while loading Final Index properties: {ex.Message}", MsgBoxStyle.Critical)
|
||||
_LOGGER.Info($"Error while loading Final Index properties: {ex.Message}")
|
||||
_Logger.Info($"Error while loading Final Index properties: {ex.Message}")
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
@ -868,7 +878,7 @@ Public Class frmAdministration
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
MsgBox("Fehler bei Anlage Profilkopie:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler:")
|
||||
End Try
|
||||
|
||||
@ -890,7 +900,7 @@ Public Class frmAdministration
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
MsgBox("Fehler bei Löschen des Profils:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Fehler:")
|
||||
End Try
|
||||
|
||||
@ -938,12 +948,12 @@ Public Class frmAdministration
|
||||
End Try
|
||||
|
||||
tsbStaticInfo.Caption = $"ProfileData saved - {Now.ToLongTimeString}"
|
||||
UNSAVED_CHANGES_PROFILE = False
|
||||
Else
|
||||
tsbStaticInfo.Caption = ""
|
||||
UNSAVED_CHANGES_PROFILE = False
|
||||
Else
|
||||
tsbStaticInfo.Caption = ""
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
If ex.Message.Contains("DataTable-Index") = False Then
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler bei Speichern des Profils:")
|
||||
End If
|
||||
@ -958,7 +968,7 @@ Public Class frmAdministration
|
||||
Try
|
||||
TBPM_PROFILEBindingSource.AddNew()
|
||||
Catch ex As Exception
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
End Try
|
||||
|
||||
End If
|
||||
@ -1001,7 +1011,7 @@ Public Class frmAdministration
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler beim Speichern: " & vbNewLine & vbNewLine & ex.Message)
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
@ -1116,9 +1126,9 @@ Public Class frmAdministration
|
||||
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
MsgBox("Error while Saving Final Index: " & ex.Message, MsgBoxStyle.Critical)
|
||||
_LOGGER.Info("Error while Saving Final Index: " & ex.Message)
|
||||
_Logger.Info("Error while Saving Final Index: " & ex.Message)
|
||||
Finally
|
||||
BarButtonItem19.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
|
||||
BarButtonItem16.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
|
||||
@ -1151,7 +1161,7 @@ Public Class frmAdministration
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Saving SQL Overview: " & vbNewLine & vbNewLine & ex.Message)
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
@ -1182,7 +1192,7 @@ Public Class frmAdministration
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Saving Profile SQL: " & vbNewLine & vbNewLine & ex.Message)
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
@ -1214,7 +1224,7 @@ Public Class frmAdministration
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Error in Saving Profile SQLFinish: " & vbNewLine & vbNewLine & ex.Message)
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
End Try
|
||||
End Sub
|
||||
Function CHECK_QUESTION_CHANGES() As Boolean
|
||||
@ -1272,7 +1282,7 @@ Public Class frmAdministration
|
||||
FillProfile_Zuordnung(profileId)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
_LOGGER.Error(ex)
|
||||
_Logger.Error(ex)
|
||||
MsgBox($"Error while calling FillProfile_User", MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End If
|
||||
@ -1524,5 +1534,31 @@ Public Class frmAdministration
|
||||
EditMode_Profile("Unlock")
|
||||
End Sub
|
||||
|
||||
Private Sub DISPLAY_MODEComboBox_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DISPLAY_MODEComboBox.SelectedIndexChanged
|
||||
If DISPLAY_MODEComboBox.SelectedIndex <> -1 Then
|
||||
If DISPLAY_MODEComboBox.Text = "AdHoc BlindFile" Then
|
||||
lblSearch.Text = "Select BlindDocument:"
|
||||
btnWMopenSuche.Visible = False
|
||||
lblDescription.Text = "Targetpath WM:"
|
||||
btnofbAHW.Visible = True
|
||||
Else
|
||||
btnofbAHW.Visible = False
|
||||
lblDescription.Text = "Beschreibung:"
|
||||
If IDB_ACTIVE Then
|
||||
lblSearch.Text = "SQL-Command:"
|
||||
Else
|
||||
lblSearch.Text = "WM-Search:"
|
||||
End If
|
||||
|
||||
btnWMopenSuche.Visible = True
|
||||
End If
|
||||
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub btnofbAHW_Click(sender As Object, e As EventArgs) Handles btnofbAHW.Click
|
||||
If Me.FolderBrowserDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
|
||||
Me.DESCRIPTIONTextBox.Text = Me.FolderBrowserDialog1.SelectedPath
|
||||
End If
|
||||
End Sub
|
||||
End Class
|
||||
459
app/DD_PM_WINDREAM/frmMain.Designer.vb
generated
459
app/DD_PM_WINDREAM/frmMain.Designer.vb
generated
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
@ -11,6 +11,7 @@ Imports System.IO
|
||||
Imports DevExpress.XtraPrinting
|
||||
Imports DigitalData.Modules.EDMI.API.DatabaseWithFallback
|
||||
Imports DigitalData.Modules.EDMI.API.Constants
|
||||
Imports DigitalData.Modules.Windream
|
||||
Imports DigitalData.GUIs.Common
|
||||
Imports DevExpress.XtraGrid.Views.BandedGrid
|
||||
Imports DevExpress.XtraBars.Ribbon
|
||||
@ -22,6 +23,7 @@ Public Class frmMain
|
||||
|
||||
Private UserLoggedin As Integer = 0
|
||||
Private CURR_DT_VWPM_PROFILE_ACTIVE As DataTable
|
||||
Private CURR_DT_VWPM_PROFILE_AH_WORKFLOW As DataTable
|
||||
Private CURR_DT_OVERVIEW As DataTable
|
||||
Private OVERVIEW_ADDED_WHEN As String
|
||||
Private OVERVIEW_CHANGED_WHEN As String
|
||||
@ -345,6 +347,32 @@ Public Class frmMain
|
||||
End Try
|
||||
LoadNavBar()
|
||||
AddHandler NavBarControl1.LinkClicked, AddressOf navBar_LinkClicked
|
||||
If Not IsNothing(CURR_DT_VWPM_PROFILE_AH_WORKFLOW) Then
|
||||
If CURR_DT_VWPM_PROFILE_AH_WORKFLOW.Rows.Count > 0 Then
|
||||
RibbonPageGroupAHW.Visible = True
|
||||
Dim OCounter As Integer = 1
|
||||
For Each oRow As DataRow In CURR_DT_VWPM_PROFILE_AH_WORKFLOW.Rows
|
||||
Select Case OCounter
|
||||
Case 1
|
||||
BbtnitmAHWF1.Caption = oRow.Item("TITLE")
|
||||
BbtnitmAHWF1.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
|
||||
BbtnitmAHWF1.Tag = oRow.Item("GUID")
|
||||
|
||||
Case 2
|
||||
BbtnitmAHWF2.Caption = oRow.Item("TITLE")
|
||||
BbtnitmAHWF2.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
|
||||
BbtnitmAHWF2.Tag = oRow.Item("GUID")
|
||||
Case 3
|
||||
BbtnitmAHWF3.Caption = oRow.Item("TITLE")
|
||||
BbtnitmAHWF3.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
|
||||
BbtnitmAHWF3.Tag = oRow.Item("GUID")
|
||||
Case 4
|
||||
End Select
|
||||
OCounter += 1
|
||||
Next
|
||||
End If
|
||||
Else
|
||||
End If
|
||||
Try
|
||||
If SHOW_CHARTS = True Then
|
||||
|
||||
@ -1369,7 +1397,7 @@ Public Class frmMain
|
||||
Sub Load_Profil_from_Grid(pProfilID As Integer)
|
||||
Try
|
||||
CURRENT_ProfilGUID = pProfilID
|
||||
|
||||
WM_AHWF_docPath = String.Empty
|
||||
|
||||
|
||||
|
||||
@ -1391,6 +1419,7 @@ Public Class frmMain
|
||||
CURRENT_DT_PROFILES.Select(oExpression).CopyToDataTable(CURRENT_DT_PROFILE, LoadOption.PreserveChanges)
|
||||
If CURRENT_DT_PROFILE.Rows.Count = 1 Then
|
||||
CURRENT_ProfilName = CURRENT_DT_PROFILE.Rows(0).Item("NAME")
|
||||
CURRENT_WMObjecttype = CURRENT_DT_PROFILES.Rows(0).Item("WD_OBJECTTYPE")
|
||||
Else
|
||||
MsgBox("Could not get a Profile - Check Your log!", MsgBoxStyle.Exclamation, ADDITIONAL_TITLE)
|
||||
Exit Sub
|
||||
@ -1744,11 +1773,9 @@ Public Class frmMain
|
||||
End Function
|
||||
Private Function Init_windream()
|
||||
Try
|
||||
'_windream = New ClassWindream_allgemein
|
||||
'_windream.Create_Session()
|
||||
'_windreamPM = New ClassPMWindream()
|
||||
'_windreamPM.Create_Session()
|
||||
WINDREAM = New ClassPMWindream()
|
||||
WINDREAM_MOD = New Windream(LOGCONFIG, False, WMDriveLetter, WMSUFFIX, True, "", "", "", "")
|
||||
|
||||
WINDREAM.Create_Session()
|
||||
WINDREAM_ALLG = New ClassWindream_allgemein
|
||||
Return WINDREAM.IsLoggedIn
|
||||
@ -2295,10 +2322,18 @@ Public Class frmMain
|
||||
If SQL_PROFILES_USER <> "" Then
|
||||
oSQL = SQL_PROFILES_USER.Replace("@USER_ID", USER_ID)
|
||||
Else
|
||||
|
||||
oSQL = String.Format("SELECT T.* FROM VWPM_PROFILE_ACTIVE T WHERE T.FILE_COUNT > 0 AND T.GUID IN (SELECT PROFILE_ID FROM [dbo].[FNPM_GET_ACTIVE_PROFILES_USER] ({0}))", USER_ID)
|
||||
End If
|
||||
|
||||
CURR_DT_VWPM_PROFILE_ACTIVE = DatabaseFallback.GetDatatableECM(oSQL)
|
||||
CURR_DT_VWPM_PROFILE_AH_WORKFLOW = CURR_DT_VWPM_PROFILE_ACTIVE.Copy
|
||||
CURR_DT_VWPM_PROFILE_AH_WORKFLOW.Clear()
|
||||
Dim AHWFRows As DataRow() = CURR_DT_VWPM_PROFILE_ACTIVE.Select("DISPLAY_MODE = 'AdHoc BlindFile' OR DISPLAY_MODE = 'AdHoc'", "PRIORITY")
|
||||
If AHWFRows.Length > 0 Then
|
||||
CURR_DT_VWPM_PROFILE_AH_WORKFLOW = AHWFRows.CopyToDataTable()
|
||||
End If
|
||||
|
||||
If pMode = "bwBasicData" Then bwBasicData.ReportProgress(30)
|
||||
LoadCURRENT_DT_PROFILES()
|
||||
|
||||
@ -3078,4 +3113,73 @@ where (CONVERT(DATE,GETDATE()) <= NOTE.DISPLAY_UNTIL or NOTE.DISPLAY_UNTIL IS NU
|
||||
GridLayout_Changed("GridViewWFItems_SubstituteFilter")
|
||||
RowCount()
|
||||
End Sub
|
||||
|
||||
Private Sub BbtnitmAHWF1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BbtnitmAHWF1.ItemClick
|
||||
AdHocWorkflow_BlindFile(BbtnitmAHWF1.Tag)
|
||||
End Sub
|
||||
Private Sub AdHocWorkflow_BlindFile(pProfileID As Int16)
|
||||
Try
|
||||
If Not Application.OpenForms().OfType(Of frmValidator).Any Then
|
||||
Dim oExpression = $"GUID = {pProfileID}"
|
||||
CURRENT_DT_PROFILE = Nothing
|
||||
CURRENT_DT_PROFILE = CURRENT_DT_PROFILES.Clone
|
||||
CURRENT_DT_PROFILES.Select(oExpression).CopyToDataTable(CURRENT_DT_PROFILE, LoadOption.PreserveChanges)
|
||||
CURRENT_ProfilGUID = pProfileID
|
||||
Dim sGUID As String
|
||||
sGUID = System.Guid.NewGuid.ToString()
|
||||
Dim oTargetPath = CURRENT_DT_PROFILES.Rows(0).Item("DESCRIPTION")
|
||||
Dim oSourcePath = CURRENT_DT_PROFILES.Rows(0).Item("WD_SEARCH")
|
||||
If oTargetPath = String.Empty Or oSourcePath = String.Empty Then
|
||||
Exit Sub
|
||||
End If
|
||||
oTargetPath = $"{oTargetPath}\{Now.Year}\{Now.Month}\{Now.Day}"
|
||||
oTargetPath = oTargetPath & "\" & sGUID & ".pdf"
|
||||
|
||||
Dim oResult = WINDREAM_MOD.NewFileStream(oSourcePath, oTargetPath)
|
||||
If oResult = True Then
|
||||
WM_AHWF_docPath = oTargetPath
|
||||
Dim oDocID = WINDREAM_MOD.NewDocumentID
|
||||
CURRENT_CLICKED_PROFILE_ID = pProfileID
|
||||
CURRENT_CLICKED_PROFILE_TITLE = CURRENT_DT_PROFILES.Rows(0).Item("TITLE")
|
||||
CURRENT_WMObjecttype = CURRENT_DT_PROFILES.Rows(0).Item("WD_OBJECTTYPE")
|
||||
CURRENT_DOC_ID = oDocID
|
||||
CURRENT_DOC_GUID = 99123456789
|
||||
ActiveWorkflowType = ConstAHWorkflow_BlindFile
|
||||
CURRENT_JUMP_DOC_GUID = CURRENT_DOC_GUID
|
||||
DT_FILTERED_PROFILE_SEARCHES_DOC = Nothing
|
||||
DT_FILTERED_PROFILE_SEARCHES_DOC = BASEDATA_DT_PROFILES_SEARCHES_DOC.Copy
|
||||
DT_FILTERED_PROFILE_SEARCHES_DOC.Clear()
|
||||
oExpression = $"PROFILE_ID = {CURRENT_ProfilGUID}"
|
||||
BASEDATA_DT_PROFILES_SEARCHES_DOC.Select(oExpression, "TAB_INDEX").CopyToDataTable(DT_FILTERED_PROFILE_SEARCHES_DOC, LoadOption.PreserveChanges)
|
||||
|
||||
BASEDATA_DT_PROFILE_SEARCHES_SQL = Nothing
|
||||
BASEDATA_DT_PROFILE_SEARCHES_SQL = BASEDATA_DT_PROFILES_SEARCHES_SQL.Copy
|
||||
BASEDATA_DT_PROFILE_SEARCHES_SQL.Clear()
|
||||
BASEDATA_DT_PROFILES_SEARCHES_SQL.Select(oExpression, "TAB_INDEX").CopyToDataTable(BASEDATA_DT_PROFILE_SEARCHES_SQL, LoadOption.PreserveChanges)
|
||||
|
||||
Try
|
||||
Dim oEnvironment = GetEnvironment()
|
||||
|
||||
_FormValidator = New frmValidator(oEnvironment)
|
||||
AddHandler _FormValidator.FormClosed, AddressOf ValidatorClosed
|
||||
_FormValidator.Show()
|
||||
Catch ex As Exception
|
||||
LOGGER.Warn($"Error opening Form frmValidator [{ex.Message}]")
|
||||
LOGGER.Warn($"ex.InnerException.Message [{ex.InnerException.Message}]")
|
||||
LOGGER.Warn($"ex.InnerException.Source [{ex.InnerException.Source}]")
|
||||
LOGGER.Error(ex.InnerException)
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
||||
End Try
|
||||
|
||||
|
||||
End If
|
||||
Else
|
||||
FormHelper.ShowInfoMessage(S.Bitte_schließen_Sie_den_offenen_Workflow_, omsgTitleWarning)
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
LOGGER.Error(ex)
|
||||
End Try
|
||||
End Sub
|
||||
End Class
|
||||
198
app/DD_PM_WINDREAM/frmValidator.Designer.vb
generated
198
app/DD_PM_WINDREAM/frmValidator.Designer.vb
generated
@ -137,22 +137,21 @@ Partial Class frmValidator
|
||||
'
|
||||
'SplitContainer2_DV_Chat
|
||||
'
|
||||
resources.ApplyResources(Me.SplitContainer2_DV_Chat, "SplitContainer2_DV_Chat")
|
||||
Me.SplitContainer2_DV_Chat.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel2
|
||||
resources.ApplyResources(Me.SplitContainer2_DV_Chat, "SplitContainer2_DV_Chat")
|
||||
Me.SplitContainer2_DV_Chat.FixedPanel = DevExpress.XtraEditors.SplitFixedPanel.None
|
||||
Me.SplitContainer2_DV_Chat.Name = "SplitContainer2_DV_Chat"
|
||||
'
|
||||
'SplitContainer2_DV_Chat.Panel1
|
||||
'
|
||||
resources.ApplyResources(Me.SplitContainer2_DV_Chat.Panel1, "SplitContainer2_DV_Chat.Panel1")
|
||||
Me.SplitContainer2_DV_Chat.Panel1.Controls.Add(Me.SplitContainer1)
|
||||
resources.ApplyResources(Me.SplitContainer2_DV_Chat.Panel1, "SplitContainer2_DV_Chat.Panel1")
|
||||
'
|
||||
'SplitContainer2_DV_Chat.Panel2
|
||||
'
|
||||
resources.ApplyResources(Me.SplitContainer2_DV_Chat.Panel2, "SplitContainer2_DV_Chat.Panel2")
|
||||
Me.SplitContainer2_DV_Chat.Panel2.Controls.Add(Me.ChatControl1)
|
||||
Me.SplitContainer2_DV_Chat.SplitterPosition = 919
|
||||
Me.ToolTip1.SetToolTip(Me.SplitContainer2_DV_Chat, resources.GetString("SplitContainer2_DV_Chat.ToolTip"))
|
||||
'
|
||||
'SplitContainer1
|
||||
'
|
||||
@ -161,34 +160,27 @@ Partial Class frmValidator
|
||||
'
|
||||
'SplitContainer1.Panel1
|
||||
'
|
||||
resources.ApplyResources(Me.SplitContainer1.Panel1, "SplitContainer1.Panel1")
|
||||
Me.SplitContainer1.Panel1.Controls.Add(Me.Panel1)
|
||||
Me.ToolTip1.SetToolTip(Me.SplitContainer1.Panel1, resources.GetString("SplitContainer1.Panel1.ToolTip"))
|
||||
'
|
||||
'SplitContainer1.Panel2
|
||||
'
|
||||
resources.ApplyResources(Me.SplitContainer1.Panel2, "SplitContainer1.Panel2")
|
||||
Me.SplitContainer1.Panel2.Controls.Add(Me.DocumentViewerValidator)
|
||||
Me.ToolTip1.SetToolTip(Me.SplitContainer1.Panel2, resources.GetString("SplitContainer1.Panel2.ToolTip"))
|
||||
Me.SplitContainer1.TabStop = False
|
||||
Me.ToolTip1.SetToolTip(Me.SplitContainer1, resources.GetString("SplitContainer1.ToolTip"))
|
||||
'
|
||||
'Panel1
|
||||
'
|
||||
resources.ApplyResources(Me.Panel1, "Panel1")
|
||||
Me.Panel1.BackColor = System.Drawing.SystemColors.ControlLight
|
||||
Me.Panel1.Controls.Add(Me.TITLELabel1)
|
||||
Me.Panel1.Controls.Add(Me.btnSave)
|
||||
Me.Panel1.Controls.Add(Me.DESCRIPTIONLabel)
|
||||
Me.Panel1.Controls.Add(Me.PanelValidatorControl)
|
||||
resources.ApplyResources(Me.Panel1, "Panel1")
|
||||
Me.Panel1.Name = "Panel1"
|
||||
Me.ToolTip1.SetToolTip(Me.Panel1, resources.GetString("Panel1.ToolTip"))
|
||||
'
|
||||
'TITLELabel1
|
||||
'
|
||||
resources.ApplyResources(Me.TITLELabel1, "TITLELabel1")
|
||||
Me.TITLELabel1.Name = "TITLELabel1"
|
||||
Me.ToolTip1.SetToolTip(Me.TITLELabel1, resources.GetString("TITLELabel1.ToolTip"))
|
||||
'
|
||||
'btnSave
|
||||
'
|
||||
@ -196,34 +188,29 @@ Partial Class frmValidator
|
||||
Me.btnSave.Image = Global.DD_ProcessManager.My.Resources.Resources.flag_pink
|
||||
Me.btnSave.Name = "btnSave"
|
||||
Me.btnSave.TabStop = False
|
||||
Me.ToolTip1.SetToolTip(Me.btnSave, resources.GetString("btnSave.ToolTip"))
|
||||
Me.btnSave.UseVisualStyleBackColor = True
|
||||
'
|
||||
'DESCRIPTIONLabel
|
||||
'
|
||||
resources.ApplyResources(Me.DESCRIPTIONLabel, "DESCRIPTIONLabel")
|
||||
Me.DESCRIPTIONLabel.Name = "DESCRIPTIONLabel"
|
||||
Me.ToolTip1.SetToolTip(Me.DESCRIPTIONLabel, resources.GetString("DESCRIPTIONLabel.ToolTip"))
|
||||
'
|
||||
'PanelValidatorControl
|
||||
'
|
||||
resources.ApplyResources(Me.PanelValidatorControl, "PanelValidatorControl")
|
||||
Me.PanelValidatorControl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.PanelValidatorControl.Name = "PanelValidatorControl"
|
||||
Me.ToolTip1.SetToolTip(Me.PanelValidatorControl, resources.GetString("PanelValidatorControl.ToolTip"))
|
||||
'
|
||||
'DocumentViewerValidator
|
||||
'
|
||||
resources.ApplyResources(Me.DocumentViewerValidator, "DocumentViewerValidator")
|
||||
Me.DocumentViewerValidator.FileLoaded = False
|
||||
Me.DocumentViewerValidator.Name = "DocumentViewerValidator"
|
||||
Me.ToolTip1.SetToolTip(Me.DocumentViewerValidator, resources.GetString("DocumentViewerValidator.ToolTip"))
|
||||
'
|
||||
'ChatControl1
|
||||
'
|
||||
resources.ApplyResources(Me.ChatControl1, "ChatControl1")
|
||||
Me.ChatControl1.Name = "ChatControl1"
|
||||
Me.ToolTip1.SetToolTip(Me.ChatControl1, resources.GetString("ChatControl1.ToolTip"))
|
||||
'
|
||||
'BarAndDockingController3
|
||||
'
|
||||
@ -253,40 +240,33 @@ Partial Class frmValidator
|
||||
'
|
||||
'barDockControlTop
|
||||
'
|
||||
resources.ApplyResources(Me.barDockControlTop, "barDockControlTop")
|
||||
Me.barDockControlTop.CausesValidation = False
|
||||
resources.ApplyResources(Me.barDockControlTop, "barDockControlTop")
|
||||
Me.barDockControlTop.Manager = Me.BarManager1
|
||||
Me.ToolTip1.SetToolTip(Me.barDockControlTop, resources.GetString("barDockControlTop.ToolTip"))
|
||||
'
|
||||
'barDockControlBottom
|
||||
'
|
||||
resources.ApplyResources(Me.barDockControlBottom, "barDockControlBottom")
|
||||
Me.barDockControlBottom.CausesValidation = False
|
||||
resources.ApplyResources(Me.barDockControlBottom, "barDockControlBottom")
|
||||
Me.barDockControlBottom.Manager = Me.BarManager1
|
||||
Me.ToolTip1.SetToolTip(Me.barDockControlBottom, resources.GetString("barDockControlBottom.ToolTip"))
|
||||
'
|
||||
'barDockControlLeft
|
||||
'
|
||||
resources.ApplyResources(Me.barDockControlLeft, "barDockControlLeft")
|
||||
Me.barDockControlLeft.CausesValidation = False
|
||||
resources.ApplyResources(Me.barDockControlLeft, "barDockControlLeft")
|
||||
Me.barDockControlLeft.Manager = Me.BarManager1
|
||||
Me.ToolTip1.SetToolTip(Me.barDockControlLeft, resources.GetString("barDockControlLeft.ToolTip"))
|
||||
'
|
||||
'barDockControlRight
|
||||
'
|
||||
resources.ApplyResources(Me.barDockControlRight, "barDockControlRight")
|
||||
Me.barDockControlRight.CausesValidation = False
|
||||
resources.ApplyResources(Me.barDockControlRight, "barDockControlRight")
|
||||
Me.barDockControlRight.Manager = Me.BarManager1
|
||||
Me.ToolTip1.SetToolTip(Me.barDockControlRight, resources.GetString("barDockControlRight.ToolTip"))
|
||||
'
|
||||
'PdfFileOpenBarItem1
|
||||
'
|
||||
resources.ApplyResources(Me.PdfFileOpenBarItem1, "PdfFileOpenBarItem1")
|
||||
Me.PdfFileOpenBarItem1.Enabled = False
|
||||
Me.PdfFileOpenBarItem1.Id = 1
|
||||
Me.PdfFileOpenBarItem1.ImageOptions.ImageIndex = CType(resources.GetObject("PdfFileOpenBarItem1.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfFileOpenBarItem1.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfFileOpenBarItem1.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfFileOpenBarItem1.ImageOptions.SvgImage = CType(resources.GetObject("PdfFileOpenBarItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfFileOpenBarItem1.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.O))
|
||||
Me.PdfFileOpenBarItem1.Name = "PdfFileOpenBarItem1"
|
||||
'
|
||||
@ -295,9 +275,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfFileSaveAsBarItem1, "PdfFileSaveAsBarItem1")
|
||||
Me.PdfFileSaveAsBarItem1.Enabled = False
|
||||
Me.PdfFileSaveAsBarItem1.Id = 2
|
||||
Me.PdfFileSaveAsBarItem1.ImageOptions.ImageIndex = CType(resources.GetObject("PdfFileSaveAsBarItem1.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfFileSaveAsBarItem1.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfFileSaveAsBarItem1.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfFileSaveAsBarItem1.ImageOptions.SvgImage = CType(resources.GetObject("PdfFileSaveAsBarItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfFileSaveAsBarItem1.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.S))
|
||||
Me.PdfFileSaveAsBarItem1.Name = "PdfFileSaveAsBarItem1"
|
||||
'
|
||||
@ -306,9 +283,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfFilePrintBarItem2, "PdfFilePrintBarItem2")
|
||||
Me.PdfFilePrintBarItem2.Enabled = False
|
||||
Me.PdfFilePrintBarItem2.Id = 3
|
||||
Me.PdfFilePrintBarItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfFilePrintBarItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfFilePrintBarItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfFilePrintBarItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfFilePrintBarItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfFilePrintBarItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfFilePrintBarItem2.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.P))
|
||||
Me.PdfFilePrintBarItem2.Name = "PdfFilePrintBarItem2"
|
||||
'
|
||||
@ -317,9 +291,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfPreviousPageBarItem2, "PdfPreviousPageBarItem2")
|
||||
Me.PdfPreviousPageBarItem2.Enabled = False
|
||||
Me.PdfPreviousPageBarItem2.Id = 4
|
||||
Me.PdfPreviousPageBarItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfPreviousPageBarItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfPreviousPageBarItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfPreviousPageBarItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfPreviousPageBarItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfPreviousPageBarItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfPreviousPageBarItem2.Name = "PdfPreviousPageBarItem2"
|
||||
'
|
||||
'PdfNextPageBarItem2
|
||||
@ -327,9 +298,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfNextPageBarItem2, "PdfNextPageBarItem2")
|
||||
Me.PdfNextPageBarItem2.Enabled = False
|
||||
Me.PdfNextPageBarItem2.Id = 5
|
||||
Me.PdfNextPageBarItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfNextPageBarItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfNextPageBarItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfNextPageBarItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfNextPageBarItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfNextPageBarItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfNextPageBarItem2.Name = "PdfNextPageBarItem2"
|
||||
'
|
||||
'PdfFindTextBarItem2
|
||||
@ -337,9 +305,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfFindTextBarItem2, "PdfFindTextBarItem2")
|
||||
Me.PdfFindTextBarItem2.Enabled = False
|
||||
Me.PdfFindTextBarItem2.Id = 6
|
||||
Me.PdfFindTextBarItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfFindTextBarItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfFindTextBarItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfFindTextBarItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfFindTextBarItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfFindTextBarItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfFindTextBarItem2.ItemShortcut = New DevExpress.XtraBars.BarShortcut((System.Windows.Forms.Keys.Control Or System.Windows.Forms.Keys.F))
|
||||
Me.PdfFindTextBarItem2.Name = "PdfFindTextBarItem2"
|
||||
'
|
||||
@ -348,9 +313,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfZoomOutBarItem2, "PdfZoomOutBarItem2")
|
||||
Me.PdfZoomOutBarItem2.Enabled = False
|
||||
Me.PdfZoomOutBarItem2.Id = 7
|
||||
Me.PdfZoomOutBarItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoomOutBarItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfZoomOutBarItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoomOutBarItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfZoomOutBarItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoomOutBarItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfZoomOutBarItem2.Name = "PdfZoomOutBarItem2"
|
||||
'
|
||||
'PdfZoomInBarItem2
|
||||
@ -358,9 +320,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfZoomInBarItem2, "PdfZoomInBarItem2")
|
||||
Me.PdfZoomInBarItem2.Enabled = False
|
||||
Me.PdfZoomInBarItem2.Id = 8
|
||||
Me.PdfZoomInBarItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoomInBarItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfZoomInBarItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoomInBarItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfZoomInBarItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoomInBarItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfZoomInBarItem2.Name = "PdfZoomInBarItem2"
|
||||
'
|
||||
'PdfExactZoomListBarSubItem2
|
||||
@ -368,9 +327,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfExactZoomListBarSubItem2, "PdfExactZoomListBarSubItem2")
|
||||
Me.PdfExactZoomListBarSubItem2.Enabled = False
|
||||
Me.PdfExactZoomListBarSubItem2.Id = 9
|
||||
Me.PdfExactZoomListBarSubItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfExactZoomListBarSubItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfExactZoomListBarSubItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfExactZoomListBarSubItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfExactZoomListBarSubItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfExactZoomListBarSubItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfExactZoomListBarSubItem2.LinksPersistInfo.AddRange(New DevExpress.XtraBars.LinkPersistInfo() {New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom10CheckItem2, True), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom25CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom50CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom75CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom100CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom125CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom150CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom200CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom400CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfZoom500CheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetActualSizeZoomModeCheckItem2, True), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetPageLevelZoomModeCheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetFitWidthZoomModeCheckItem2), New DevExpress.XtraBars.LinkPersistInfo(Me.PdfSetFitVisibleZoomModeCheckItem2)})
|
||||
Me.PdfExactZoomListBarSubItem2.Name = "PdfExactZoomListBarSubItem2"
|
||||
Me.PdfExactZoomListBarSubItem2.PaintStyle = DevExpress.XtraBars.BarItemPaintStyle.CaptionInMenu
|
||||
@ -380,9 +336,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfZoom10CheckItem2, "PdfZoom10CheckItem2")
|
||||
Me.PdfZoom10CheckItem2.Enabled = False
|
||||
Me.PdfZoom10CheckItem2.Id = 10
|
||||
Me.PdfZoom10CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom10CheckItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfZoom10CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom10CheckItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfZoom10CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom10CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfZoom10CheckItem2.Name = "PdfZoom10CheckItem2"
|
||||
'
|
||||
'PdfZoom25CheckItem2
|
||||
@ -390,9 +343,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfZoom25CheckItem2, "PdfZoom25CheckItem2")
|
||||
Me.PdfZoom25CheckItem2.Enabled = False
|
||||
Me.PdfZoom25CheckItem2.Id = 11
|
||||
Me.PdfZoom25CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom25CheckItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfZoom25CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom25CheckItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfZoom25CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom25CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfZoom25CheckItem2.Name = "PdfZoom25CheckItem2"
|
||||
'
|
||||
'PdfZoom50CheckItem2
|
||||
@ -400,9 +350,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfZoom50CheckItem2, "PdfZoom50CheckItem2")
|
||||
Me.PdfZoom50CheckItem2.Enabled = False
|
||||
Me.PdfZoom50CheckItem2.Id = 12
|
||||
Me.PdfZoom50CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom50CheckItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfZoom50CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom50CheckItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfZoom50CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom50CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfZoom50CheckItem2.Name = "PdfZoom50CheckItem2"
|
||||
'
|
||||
'PdfZoom75CheckItem2
|
||||
@ -410,9 +357,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfZoom75CheckItem2, "PdfZoom75CheckItem2")
|
||||
Me.PdfZoom75CheckItem2.Enabled = False
|
||||
Me.PdfZoom75CheckItem2.Id = 13
|
||||
Me.PdfZoom75CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom75CheckItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfZoom75CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom75CheckItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfZoom75CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom75CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfZoom75CheckItem2.Name = "PdfZoom75CheckItem2"
|
||||
'
|
||||
'PdfZoom100CheckItem2
|
||||
@ -420,9 +364,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfZoom100CheckItem2, "PdfZoom100CheckItem2")
|
||||
Me.PdfZoom100CheckItem2.Enabled = False
|
||||
Me.PdfZoom100CheckItem2.Id = 14
|
||||
Me.PdfZoom100CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom100CheckItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfZoom100CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom100CheckItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfZoom100CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom100CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfZoom100CheckItem2.Name = "PdfZoom100CheckItem2"
|
||||
'
|
||||
'PdfZoom125CheckItem2
|
||||
@ -430,9 +371,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfZoom125CheckItem2, "PdfZoom125CheckItem2")
|
||||
Me.PdfZoom125CheckItem2.Enabled = False
|
||||
Me.PdfZoom125CheckItem2.Id = 15
|
||||
Me.PdfZoom125CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom125CheckItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfZoom125CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom125CheckItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfZoom125CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom125CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfZoom125CheckItem2.Name = "PdfZoom125CheckItem2"
|
||||
'
|
||||
'PdfZoom150CheckItem2
|
||||
@ -440,9 +378,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfZoom150CheckItem2, "PdfZoom150CheckItem2")
|
||||
Me.PdfZoom150CheckItem2.Enabled = False
|
||||
Me.PdfZoom150CheckItem2.Id = 16
|
||||
Me.PdfZoom150CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom150CheckItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfZoom150CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom150CheckItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfZoom150CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom150CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfZoom150CheckItem2.Name = "PdfZoom150CheckItem2"
|
||||
'
|
||||
'PdfZoom200CheckItem2
|
||||
@ -450,9 +385,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfZoom200CheckItem2, "PdfZoom200CheckItem2")
|
||||
Me.PdfZoom200CheckItem2.Enabled = False
|
||||
Me.PdfZoom200CheckItem2.Id = 17
|
||||
Me.PdfZoom200CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom200CheckItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfZoom200CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom200CheckItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfZoom200CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom200CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfZoom200CheckItem2.Name = "PdfZoom200CheckItem2"
|
||||
'
|
||||
'PdfZoom400CheckItem2
|
||||
@ -460,9 +392,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfZoom400CheckItem2, "PdfZoom400CheckItem2")
|
||||
Me.PdfZoom400CheckItem2.Enabled = False
|
||||
Me.PdfZoom400CheckItem2.Id = 18
|
||||
Me.PdfZoom400CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom400CheckItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfZoom400CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom400CheckItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfZoom400CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom400CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfZoom400CheckItem2.Name = "PdfZoom400CheckItem2"
|
||||
'
|
||||
'PdfZoom500CheckItem2
|
||||
@ -470,9 +399,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfZoom500CheckItem2, "PdfZoom500CheckItem2")
|
||||
Me.PdfZoom500CheckItem2.Enabled = False
|
||||
Me.PdfZoom500CheckItem2.Id = 19
|
||||
Me.PdfZoom500CheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfZoom500CheckItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfZoom500CheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfZoom500CheckItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfZoom500CheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfZoom500CheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfZoom500CheckItem2.Name = "PdfZoom500CheckItem2"
|
||||
'
|
||||
'PdfSetActualSizeZoomModeCheckItem2
|
||||
@ -480,9 +406,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfSetActualSizeZoomModeCheckItem2, "PdfSetActualSizeZoomModeCheckItem2")
|
||||
Me.PdfSetActualSizeZoomModeCheckItem2.Enabled = False
|
||||
Me.PdfSetActualSizeZoomModeCheckItem2.Id = 20
|
||||
Me.PdfSetActualSizeZoomModeCheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfSetActualSizeZoomModeCheckItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfSetActualSizeZoomModeCheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfSetActualSizeZoomModeCheckItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfSetActualSizeZoomModeCheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfSetActualSizeZoomModeCheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfSetActualSizeZoomModeCheckItem2.Name = "PdfSetActualSizeZoomModeCheckItem2"
|
||||
'
|
||||
'PdfSetPageLevelZoomModeCheckItem2
|
||||
@ -490,9 +413,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfSetPageLevelZoomModeCheckItem2, "PdfSetPageLevelZoomModeCheckItem2")
|
||||
Me.PdfSetPageLevelZoomModeCheckItem2.Enabled = False
|
||||
Me.PdfSetPageLevelZoomModeCheckItem2.Id = 21
|
||||
Me.PdfSetPageLevelZoomModeCheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfSetPageLevelZoomModeCheckItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfSetPageLevelZoomModeCheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfSetPageLevelZoomModeCheckItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfSetPageLevelZoomModeCheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfSetPageLevelZoomModeCheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfSetPageLevelZoomModeCheckItem2.Name = "PdfSetPageLevelZoomModeCheckItem2"
|
||||
'
|
||||
'PdfSetFitWidthZoomModeCheckItem2
|
||||
@ -500,9 +420,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfSetFitWidthZoomModeCheckItem2, "PdfSetFitWidthZoomModeCheckItem2")
|
||||
Me.PdfSetFitWidthZoomModeCheckItem2.Enabled = False
|
||||
Me.PdfSetFitWidthZoomModeCheckItem2.Id = 22
|
||||
Me.PdfSetFitWidthZoomModeCheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfSetFitWidthZoomModeCheckItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfSetFitWidthZoomModeCheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfSetFitWidthZoomModeCheckItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfSetFitWidthZoomModeCheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfSetFitWidthZoomModeCheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfSetFitWidthZoomModeCheckItem2.Name = "PdfSetFitWidthZoomModeCheckItem2"
|
||||
'
|
||||
'PdfSetFitVisibleZoomModeCheckItem2
|
||||
@ -510,18 +427,12 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.PdfSetFitVisibleZoomModeCheckItem2, "PdfSetFitVisibleZoomModeCheckItem2")
|
||||
Me.PdfSetFitVisibleZoomModeCheckItem2.Enabled = False
|
||||
Me.PdfSetFitVisibleZoomModeCheckItem2.Id = 23
|
||||
Me.PdfSetFitVisibleZoomModeCheckItem2.ImageOptions.ImageIndex = CType(resources.GetObject("PdfSetFitVisibleZoomModeCheckItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.PdfSetFitVisibleZoomModeCheckItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("PdfSetFitVisibleZoomModeCheckItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.PdfSetFitVisibleZoomModeCheckItem2.ImageOptions.SvgImage = CType(resources.GetObject("PdfSetFitVisibleZoomModeCheckItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.PdfSetFitVisibleZoomModeCheckItem2.Name = "PdfSetFitVisibleZoomModeCheckItem2"
|
||||
'
|
||||
'BarButtonItem1
|
||||
'
|
||||
resources.ApplyResources(Me.BarButtonItem1, "BarButtonItem1")
|
||||
Me.BarButtonItem1.Id = 0
|
||||
Me.BarButtonItem1.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItem1.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarButtonItem1.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItem1.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarButtonItem1.Name = "BarButtonItem1"
|
||||
'
|
||||
'PdfBarController2
|
||||
@ -552,13 +463,9 @@ Partial Class frmValidator
|
||||
'
|
||||
'RibbonControl1
|
||||
'
|
||||
resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
|
||||
Me.RibbonControl1.ExpandCollapseItem.Id = 0
|
||||
Me.RibbonControl1.ExpandCollapseItem.ImageOptions.ImageIndex = CType(resources.GetObject("RibbonControl1.ExpandCollapseItem.ImageOptions.ImageIndex"), Integer)
|
||||
Me.RibbonControl1.ExpandCollapseItem.ImageOptions.LargeImageIndex = CType(resources.GetObject("RibbonControl1.ExpandCollapseItem.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.RibbonControl1.ExpandCollapseItem.ImageOptions.SvgImage = CType(resources.GetObject("RibbonControl1.ExpandCollapseItem.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.RibbonControl1.ExpandCollapseItem.SearchTags = resources.GetString("RibbonControl1.ExpandCollapseItem.SearchTags")
|
||||
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bsiError, Me.bsiInformation, Me.bsiDocID, Me.BarButtonItemFileView, Me.BarButtonItem3, Me.BarButtonItem4, Me.bbtniRefresh, Me.bbtniRefreshSearches, Me.bbtniNext, Me.bbtniDelete, Me.bbtniAnnotation, Me.bsiInfo1, Me.bsiInfo2, Me.BbtnitmSave, Me.BarButtonItem2, Me.BarLinkContainerItem1, Me.btnitemConversationEnd, Me.bbtnitem_ConversationNew, Me.BarLinkContainerItem2, Me.BarEditItem1, Me.BarEditItem2, Me.BarEditItem3, Me.btnitemConversation_reload, Me.BarButtonItem5, Me.Attmt_bbtnitmShow, Me.barbtnitmExport, Me.ToggleSwitchItemLoadonClick, Me.Attmnt_bbtnitm_LoadonClick})
|
||||
resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
|
||||
Me.RibbonControl1.MaxItemId = 32
|
||||
Me.RibbonControl1.Name = "RibbonControl1"
|
||||
Me.RibbonControl1.PageCategories.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageCategory() {Me.RibbonPageConversations})
|
||||
@ -569,15 +476,10 @@ Partial Class frmValidator
|
||||
Me.RibbonControl1.ShowToolbarCustomizeItem = False
|
||||
Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
|
||||
Me.RibbonControl1.Toolbar.ShowCustomizeItem = False
|
||||
Me.ToolTip1.SetToolTip(Me.RibbonControl1, resources.GetString("RibbonControl1.ToolTip"))
|
||||
'
|
||||
'bsiError
|
||||
'
|
||||
resources.ApplyResources(Me.bsiError, "bsiError")
|
||||
Me.bsiError.Id = 1
|
||||
Me.bsiError.ImageOptions.ImageIndex = CType(resources.GetObject("bsiError.ImageOptions.ImageIndex"), Integer)
|
||||
Me.bsiError.ImageOptions.LargeImageIndex = CType(resources.GetObject("bsiError.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.bsiError.ImageOptions.SvgImage = CType(resources.GetObject("bsiError.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.bsiError.ItemAppearance.Normal.Font = CType(resources.GetObject("bsiError.ItemAppearance.Normal.Font"), System.Drawing.Font)
|
||||
Me.bsiError.ItemAppearance.Normal.ForeColor = System.Drawing.Color.Red
|
||||
Me.bsiError.ItemAppearance.Normal.Options.UseFont = True
|
||||
@ -588,9 +490,6 @@ Partial Class frmValidator
|
||||
'
|
||||
resources.ApplyResources(Me.bsiInformation, "bsiInformation")
|
||||
Me.bsiInformation.Id = 2
|
||||
Me.bsiInformation.ImageOptions.ImageIndex = CType(resources.GetObject("bsiInformation.ImageOptions.ImageIndex"), Integer)
|
||||
Me.bsiInformation.ImageOptions.LargeImageIndex = CType(resources.GetObject("bsiInformation.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.bsiInformation.ImageOptions.SvgImage = CType(resources.GetObject("bsiInformation.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.bsiInformation.ItemAppearance.Normal.BackColor = System.Drawing.Color.Transparent
|
||||
Me.bsiInformation.ItemAppearance.Normal.Options.UseBackColor = True
|
||||
Me.bsiInformation.Name = "bsiInformation"
|
||||
@ -599,17 +498,12 @@ Partial Class frmValidator
|
||||
'
|
||||
resources.ApplyResources(Me.bsiDocID, "bsiDocID")
|
||||
Me.bsiDocID.Id = 3
|
||||
Me.bsiDocID.ImageOptions.ImageIndex = CType(resources.GetObject("bsiDocID.ImageOptions.ImageIndex"), Integer)
|
||||
Me.bsiDocID.ImageOptions.LargeImageIndex = CType(resources.GetObject("bsiDocID.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.bsiDocID.ImageOptions.SvgImage = CType(resources.GetObject("bsiDocID.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.bsiDocID.Name = "bsiDocID"
|
||||
'
|
||||
'BarButtonItemFileView
|
||||
'
|
||||
resources.ApplyResources(Me.BarButtonItemFileView, "BarButtonItemFileView")
|
||||
Me.BarButtonItemFileView.Id = 4
|
||||
Me.BarButtonItemFileView.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItemFileView.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarButtonItemFileView.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItemFileView.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarButtonItemFileView.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.enablesearch
|
||||
Me.BarButtonItemFileView.Name = "BarButtonItemFileView"
|
||||
'
|
||||
@ -618,10 +512,7 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.BarButtonItem3, "BarButtonItem3")
|
||||
Me.BarButtonItem3.Id = 5
|
||||
Me.BarButtonItem3.ImageOptions.Image = CType(resources.GetObject("BarButtonItem3.ImageOptions.Image"), System.Drawing.Image)
|
||||
Me.BarButtonItem3.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItem3.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarButtonItem3.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.LargeImage"), System.Drawing.Image)
|
||||
Me.BarButtonItem3.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItem3.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarButtonItem3.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarButtonItem3.Name = "BarButtonItem3"
|
||||
Me.BarButtonItem3.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.SmallWithText
|
||||
'
|
||||
@ -629,8 +520,6 @@ Partial Class frmValidator
|
||||
'
|
||||
resources.ApplyResources(Me.BarButtonItem4, "BarButtonItem4")
|
||||
Me.BarButtonItem4.Id = 6
|
||||
Me.BarButtonItem4.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItem4.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarButtonItem4.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItem4.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarButtonItem4.ImageOptions.SvgImage = Global.DD_ProcessManager.My.Resources.Resources.bo_unknown
|
||||
Me.BarButtonItem4.Name = "BarButtonItem4"
|
||||
Me.BarButtonItem4.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.SmallWithText
|
||||
@ -640,10 +529,7 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.bbtniRefresh, "bbtniRefresh")
|
||||
Me.bbtniRefresh.Id = 7
|
||||
Me.bbtniRefresh.ImageOptions.Image = CType(resources.GetObject("bbtniRefresh.ImageOptions.Image"), System.Drawing.Image)
|
||||
Me.bbtniRefresh.ImageOptions.ImageIndex = CType(resources.GetObject("bbtniRefresh.ImageOptions.ImageIndex"), Integer)
|
||||
Me.bbtniRefresh.ImageOptions.LargeImage = CType(resources.GetObject("bbtniRefresh.ImageOptions.LargeImage"), System.Drawing.Image)
|
||||
Me.bbtniRefresh.ImageOptions.LargeImageIndex = CType(resources.GetObject("bbtniRefresh.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.bbtniRefresh.ImageOptions.SvgImage = CType(resources.GetObject("bbtniRefresh.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.bbtniRefresh.Name = "bbtniRefresh"
|
||||
'
|
||||
'bbtniRefreshSearches
|
||||
@ -651,10 +537,7 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.bbtniRefreshSearches, "bbtniRefreshSearches")
|
||||
Me.bbtniRefreshSearches.Id = 8
|
||||
Me.bbtniRefreshSearches.ImageOptions.Image = CType(resources.GetObject("bbtniRefreshSearches.ImageOptions.Image"), System.Drawing.Image)
|
||||
Me.bbtniRefreshSearches.ImageOptions.ImageIndex = CType(resources.GetObject("bbtniRefreshSearches.ImageOptions.ImageIndex"), Integer)
|
||||
Me.bbtniRefreshSearches.ImageOptions.LargeImage = CType(resources.GetObject("bbtniRefreshSearches.ImageOptions.LargeImage"), System.Drawing.Image)
|
||||
Me.bbtniRefreshSearches.ImageOptions.LargeImageIndex = CType(resources.GetObject("bbtniRefreshSearches.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.bbtniRefreshSearches.ImageOptions.SvgImage = CType(resources.GetObject("bbtniRefreshSearches.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.bbtniRefreshSearches.Name = "bbtniRefreshSearches"
|
||||
Me.bbtniRefreshSearches.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
|
||||
'
|
||||
@ -663,10 +546,7 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.bbtniNext, "bbtniNext")
|
||||
Me.bbtniNext.Id = 9
|
||||
Me.bbtniNext.ImageOptions.Image = CType(resources.GetObject("bbtniNext.ImageOptions.Image"), System.Drawing.Image)
|
||||
Me.bbtniNext.ImageOptions.ImageIndex = CType(resources.GetObject("bbtniNext.ImageOptions.ImageIndex"), Integer)
|
||||
Me.bbtniNext.ImageOptions.LargeImage = CType(resources.GetObject("bbtniNext.ImageOptions.LargeImage"), System.Drawing.Image)
|
||||
Me.bbtniNext.ImageOptions.LargeImageIndex = CType(resources.GetObject("bbtniNext.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.bbtniNext.ImageOptions.SvgImage = CType(resources.GetObject("bbtniNext.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.bbtniNext.Name = "bbtniNext"
|
||||
'
|
||||
'bbtniDelete
|
||||
@ -674,10 +554,7 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.bbtniDelete, "bbtniDelete")
|
||||
Me.bbtniDelete.Id = 10
|
||||
Me.bbtniDelete.ImageOptions.Image = CType(resources.GetObject("bbtniDelete.ImageOptions.Image"), System.Drawing.Image)
|
||||
Me.bbtniDelete.ImageOptions.ImageIndex = CType(resources.GetObject("bbtniDelete.ImageOptions.ImageIndex"), Integer)
|
||||
Me.bbtniDelete.ImageOptions.LargeImage = CType(resources.GetObject("bbtniDelete.ImageOptions.LargeImage"), System.Drawing.Image)
|
||||
Me.bbtniDelete.ImageOptions.LargeImageIndex = CType(resources.GetObject("bbtniDelete.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.bbtniDelete.ImageOptions.SvgImage = CType(resources.GetObject("bbtniDelete.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.bbtniDelete.Name = "bbtniDelete"
|
||||
Me.bbtniDelete.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
|
||||
'
|
||||
@ -686,10 +563,7 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.bbtniAnnotation, "bbtniAnnotation")
|
||||
Me.bbtniAnnotation.Id = 11
|
||||
Me.bbtniAnnotation.ImageOptions.Image = CType(resources.GetObject("bbtniAnnotation.ImageOptions.Image"), System.Drawing.Image)
|
||||
Me.bbtniAnnotation.ImageOptions.ImageIndex = CType(resources.GetObject("bbtniAnnotation.ImageOptions.ImageIndex"), Integer)
|
||||
Me.bbtniAnnotation.ImageOptions.LargeImage = CType(resources.GetObject("bbtniAnnotation.ImageOptions.LargeImage"), System.Drawing.Image)
|
||||
Me.bbtniAnnotation.ImageOptions.LargeImageIndex = CType(resources.GetObject("bbtniAnnotation.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.bbtniAnnotation.ImageOptions.SvgImage = CType(resources.GetObject("bbtniAnnotation.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.bbtniAnnotation.Name = "bbtniAnnotation"
|
||||
Me.bbtniAnnotation.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
|
||||
'
|
||||
@ -698,10 +572,7 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.bsiInfo1, "bsiInfo1")
|
||||
Me.bsiInfo1.Id = 14
|
||||
Me.bsiInfo1.ImageOptions.Image = CType(resources.GetObject("bsiInfo1.ImageOptions.Image"), System.Drawing.Image)
|
||||
Me.bsiInfo1.ImageOptions.ImageIndex = CType(resources.GetObject("bsiInfo1.ImageOptions.ImageIndex"), Integer)
|
||||
Me.bsiInfo1.ImageOptions.LargeImage = CType(resources.GetObject("bsiInfo1.ImageOptions.LargeImage"), System.Drawing.Image)
|
||||
Me.bsiInfo1.ImageOptions.LargeImageIndex = CType(resources.GetObject("bsiInfo1.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.bsiInfo1.ImageOptions.SvgImage = CType(resources.GetObject("bsiInfo1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.bsiInfo1.ItemAppearance.Normal.Font = CType(resources.GetObject("bsiInfo1.ItemAppearance.Normal.Font"), System.Drawing.Font)
|
||||
Me.bsiInfo1.ItemAppearance.Normal.ForeColor = System.Drawing.Color.Red
|
||||
Me.bsiInfo1.ItemAppearance.Normal.Options.UseFont = True
|
||||
@ -714,10 +585,7 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.bsiInfo2, "bsiInfo2")
|
||||
Me.bsiInfo2.Id = 15
|
||||
Me.bsiInfo2.ImageOptions.Image = CType(resources.GetObject("bsiInfo2.ImageOptions.Image"), System.Drawing.Image)
|
||||
Me.bsiInfo2.ImageOptions.ImageIndex = CType(resources.GetObject("bsiInfo2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.bsiInfo2.ImageOptions.LargeImage = CType(resources.GetObject("bsiInfo2.ImageOptions.LargeImage"), System.Drawing.Image)
|
||||
Me.bsiInfo2.ImageOptions.LargeImageIndex = CType(resources.GetObject("bsiInfo2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.bsiInfo2.ImageOptions.SvgImage = CType(resources.GetObject("bsiInfo2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.bsiInfo2.ItemAppearance.Normal.Font = CType(resources.GetObject("bsiInfo2.ItemAppearance.Normal.Font"), System.Drawing.Font)
|
||||
Me.bsiInfo2.ItemAppearance.Normal.Options.UseFont = True
|
||||
Me.bsiInfo2.Name = "bsiInfo2"
|
||||
@ -728,36 +596,25 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.BbtnitmSave, "BbtnitmSave")
|
||||
Me.BbtnitmSave.Id = 16
|
||||
Me.BbtnitmSave.ImageOptions.Image = CType(resources.GetObject("BbtnitmSave.ImageOptions.Image"), System.Drawing.Image)
|
||||
Me.BbtnitmSave.ImageOptions.ImageIndex = CType(resources.GetObject("BbtnitmSave.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BbtnitmSave.ImageOptions.LargeImage = CType(resources.GetObject("BbtnitmSave.ImageOptions.LargeImage"), System.Drawing.Image)
|
||||
Me.BbtnitmSave.ImageOptions.LargeImageIndex = CType(resources.GetObject("BbtnitmSave.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BbtnitmSave.ImageOptions.SvgImage = CType(resources.GetObject("BbtnitmSave.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BbtnitmSave.Name = "BbtnitmSave"
|
||||
'
|
||||
'BarButtonItem2
|
||||
'
|
||||
resources.ApplyResources(Me.BarButtonItem2, "BarButtonItem2")
|
||||
Me.BarButtonItem2.Id = 17
|
||||
Me.BarButtonItem2.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarButtonItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarButtonItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarButtonItem2.Name = "BarButtonItem2"
|
||||
'
|
||||
'BarLinkContainerItem1
|
||||
'
|
||||
resources.ApplyResources(Me.BarLinkContainerItem1, "BarLinkContainerItem1")
|
||||
Me.BarLinkContainerItem1.Id = 18
|
||||
Me.BarLinkContainerItem1.ImageOptions.ImageIndex = CType(resources.GetObject("BarLinkContainerItem1.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarLinkContainerItem1.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarLinkContainerItem1.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarLinkContainerItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarLinkContainerItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarLinkContainerItem1.Name = "BarLinkContainerItem1"
|
||||
'
|
||||
'btnitemConversationEnd
|
||||
'
|
||||
resources.ApplyResources(Me.btnitemConversationEnd, "btnitemConversationEnd")
|
||||
Me.btnitemConversationEnd.Id = 19
|
||||
Me.btnitemConversationEnd.ImageOptions.ImageIndex = CType(resources.GetObject("btnitemConversationEnd.ImageOptions.ImageIndex"), Integer)
|
||||
Me.btnitemConversationEnd.ImageOptions.LargeImageIndex = CType(resources.GetObject("btnitemConversationEnd.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.btnitemConversationEnd.ImageOptions.SvgImage = CType(resources.GetObject("btnitemConversationEnd.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.btnitemConversationEnd.Name = "btnitemConversationEnd"
|
||||
'
|
||||
@ -765,8 +622,6 @@ Partial Class frmValidator
|
||||
'
|
||||
resources.ApplyResources(Me.bbtnitem_ConversationNew, "bbtnitem_ConversationNew")
|
||||
Me.bbtnitem_ConversationNew.Id = 20
|
||||
Me.bbtnitem_ConversationNew.ImageOptions.ImageIndex = CType(resources.GetObject("bbtnitem_ConversationNew.ImageOptions.ImageIndex"), Integer)
|
||||
Me.bbtnitem_ConversationNew.ImageOptions.LargeImageIndex = CType(resources.GetObject("bbtnitem_ConversationNew.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.bbtnitem_ConversationNew.ImageOptions.SvgImage = CType(resources.GetObject("bbtnitem_ConversationNew.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.bbtnitem_ConversationNew.Name = "bbtnitem_ConversationNew"
|
||||
'
|
||||
@ -774,9 +629,6 @@ Partial Class frmValidator
|
||||
'
|
||||
resources.ApplyResources(Me.BarLinkContainerItem2, "BarLinkContainerItem2")
|
||||
Me.BarLinkContainerItem2.Id = 21
|
||||
Me.BarLinkContainerItem2.ImageOptions.ImageIndex = CType(resources.GetObject("BarLinkContainerItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarLinkContainerItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarLinkContainerItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarLinkContainerItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarLinkContainerItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarLinkContainerItem2.Name = "BarLinkContainerItem2"
|
||||
'
|
||||
'BarEditItem1
|
||||
@ -784,9 +636,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.BarEditItem1, "BarEditItem1")
|
||||
Me.BarEditItem1.Edit = Me.RepositoryItemComboBox1
|
||||
Me.BarEditItem1.Id = 22
|
||||
Me.BarEditItem1.ImageOptions.ImageIndex = CType(resources.GetObject("BarEditItem1.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarEditItem1.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarEditItem1.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarEditItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarEditItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarEditItem1.Name = "BarEditItem1"
|
||||
'
|
||||
'RepositoryItemComboBox1
|
||||
@ -800,9 +649,6 @@ Partial Class frmValidator
|
||||
resources.ApplyResources(Me.BarEditItem2, "BarEditItem2")
|
||||
Me.BarEditItem2.Edit = Me.RepositoryItemComboBox2
|
||||
Me.BarEditItem2.Id = 23
|
||||
Me.BarEditItem2.ImageOptions.ImageIndex = CType(resources.GetObject("BarEditItem2.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarEditItem2.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarEditItem2.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarEditItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarEditItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarEditItem2.Name = "BarEditItem2"
|
||||
'
|
||||
'RepositoryItemComboBox2
|
||||
@ -813,12 +659,9 @@ Partial Class frmValidator
|
||||
'
|
||||
'BarEditItem3
|
||||
'
|
||||
resources.ApplyResources(Me.BarEditItem3, "BarEditItem3")
|
||||
Me.BarEditItem3.Edit = Me.RepositoryItemComboBox3
|
||||
resources.ApplyResources(Me.BarEditItem3, "BarEditItem3")
|
||||
Me.BarEditItem3.Id = 24
|
||||
Me.BarEditItem3.ImageOptions.ImageIndex = CType(resources.GetObject("BarEditItem3.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarEditItem3.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarEditItem3.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarEditItem3.ImageOptions.SvgImage = CType(resources.GetObject("BarEditItem3.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarEditItem3.Name = "BarEditItem3"
|
||||
Me.BarEditItem3.RibbonStyle = DevExpress.XtraBars.Ribbon.RibbonItemStyles.Large
|
||||
'
|
||||
@ -832,17 +675,12 @@ Partial Class frmValidator
|
||||
'
|
||||
resources.ApplyResources(Me.btnitemConversation_reload, "btnitemConversation_reload")
|
||||
Me.btnitemConversation_reload.Id = 25
|
||||
Me.btnitemConversation_reload.ImageOptions.ImageIndex = CType(resources.GetObject("btnitemConversation_reload.ImageOptions.ImageIndex"), Integer)
|
||||
Me.btnitemConversation_reload.ImageOptions.LargeImageIndex = CType(resources.GetObject("btnitemConversation_reload.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.btnitemConversation_reload.ImageOptions.SvgImage = CType(resources.GetObject("btnitemConversation_reload.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.btnitemConversation_reload.Name = "btnitemConversation_reload"
|
||||
'
|
||||
'BarButtonItem5
|
||||
'
|
||||
resources.ApplyResources(Me.BarButtonItem5, "BarButtonItem5")
|
||||
Me.BarButtonItem5.Id = 26
|
||||
Me.BarButtonItem5.ImageOptions.ImageIndex = CType(resources.GetObject("BarButtonItem5.ImageOptions.ImageIndex"), Integer)
|
||||
Me.BarButtonItem5.ImageOptions.LargeImageIndex = CType(resources.GetObject("BarButtonItem5.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.BarButtonItem5.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem5.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarButtonItem5.Name = "BarButtonItem5"
|
||||
'
|
||||
@ -850,8 +688,6 @@ Partial Class frmValidator
|
||||
'
|
||||
resources.ApplyResources(Me.Attmt_bbtnitmShow, "Attmt_bbtnitmShow")
|
||||
Me.Attmt_bbtnitmShow.Id = 27
|
||||
Me.Attmt_bbtnitmShow.ImageOptions.ImageIndex = CType(resources.GetObject("Attmt_bbtnitmShow.ImageOptions.ImageIndex"), Integer)
|
||||
Me.Attmt_bbtnitmShow.ImageOptions.LargeImageIndex = CType(resources.GetObject("Attmt_bbtnitmShow.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.Attmt_bbtnitmShow.ImageOptions.SvgImage = CType(resources.GetObject("Attmt_bbtnitmShow.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.Attmt_bbtnitmShow.Name = "Attmt_bbtnitmShow"
|
||||
Me.Attmt_bbtnitmShow.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
|
||||
@ -860,8 +696,6 @@ Partial Class frmValidator
|
||||
'
|
||||
resources.ApplyResources(Me.barbtnitmExport, "barbtnitmExport")
|
||||
Me.barbtnitmExport.Id = 28
|
||||
Me.barbtnitmExport.ImageOptions.ImageIndex = CType(resources.GetObject("barbtnitmExport.ImageOptions.ImageIndex"), Integer)
|
||||
Me.barbtnitmExport.ImageOptions.LargeImageIndex = CType(resources.GetObject("barbtnitmExport.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.barbtnitmExport.ImageOptions.SvgImage = CType(resources.GetObject("barbtnitmExport.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.barbtnitmExport.Name = "barbtnitmExport"
|
||||
Me.barbtnitmExport.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
|
||||
@ -870,8 +704,6 @@ Partial Class frmValidator
|
||||
'
|
||||
resources.ApplyResources(Me.ToggleSwitchItemLoadonClick, "ToggleSwitchItemLoadonClick")
|
||||
Me.ToggleSwitchItemLoadonClick.Id = 30
|
||||
Me.ToggleSwitchItemLoadonClick.ImageOptions.ImageIndex = CType(resources.GetObject("ToggleSwitchItemLoadonClick.ImageOptions.ImageIndex"), Integer)
|
||||
Me.ToggleSwitchItemLoadonClick.ImageOptions.LargeImageIndex = CType(resources.GetObject("ToggleSwitchItemLoadonClick.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.ToggleSwitchItemLoadonClick.ImageOptions.SvgImage = CType(resources.GetObject("ToggleSwitchItemLoadonClick.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.ToggleSwitchItemLoadonClick.Name = "ToggleSwitchItemLoadonClick"
|
||||
'
|
||||
@ -879,8 +711,6 @@ Partial Class frmValidator
|
||||
'
|
||||
resources.ApplyResources(Me.Attmnt_bbtnitm_LoadonClick, "Attmnt_bbtnitm_LoadonClick")
|
||||
Me.Attmnt_bbtnitm_LoadonClick.Id = 31
|
||||
Me.Attmnt_bbtnitm_LoadonClick.ImageOptions.ImageIndex = CType(resources.GetObject("Attmnt_bbtnitm_LoadonClick.ImageOptions.ImageIndex"), Integer)
|
||||
Me.Attmnt_bbtnitm_LoadonClick.ImageOptions.LargeImageIndex = CType(resources.GetObject("Attmnt_bbtnitm_LoadonClick.ImageOptions.LargeImageIndex"), Integer)
|
||||
Me.Attmnt_bbtnitm_LoadonClick.ImageOptions.SvgImage = CType(resources.GetObject("Attmnt_bbtnitm_LoadonClick.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.Attmnt_bbtnitm_LoadonClick.ItemAppearance.Pressed.Font = CType(resources.GetObject("Attmnt_bbtnitm_LoadonClick.ItemAppearance.Pressed.Font"), System.Drawing.Font)
|
||||
Me.Attmnt_bbtnitm_LoadonClick.ItemAppearance.Pressed.ForeColor = DevExpress.LookAndFeel.DXSkinColors.ForeColors.Information
|
||||
@ -965,27 +795,22 @@ Partial Class frmValidator
|
||||
'
|
||||
'RibbonStatusBar1
|
||||
'
|
||||
resources.ApplyResources(Me.RibbonStatusBar1, "RibbonStatusBar1")
|
||||
Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiError)
|
||||
Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiInformation)
|
||||
Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiDocID)
|
||||
resources.ApplyResources(Me.RibbonStatusBar1, "RibbonStatusBar1")
|
||||
Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
|
||||
Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
|
||||
Me.ToolTip1.SetToolTip(Me.RibbonStatusBar1, resources.GetString("RibbonStatusBar1.ToolTip"))
|
||||
'
|
||||
'RibbonPage2
|
||||
'
|
||||
Me.RibbonPage2.Name = "RibbonPage2"
|
||||
resources.ApplyResources(Me.RibbonPage2, "RibbonPage2")
|
||||
'
|
||||
'FolderBrowserDialog1
|
||||
'
|
||||
resources.ApplyResources(Me.FolderBrowserDialog1, "FolderBrowserDialog1")
|
||||
'
|
||||
'frmValidator
|
||||
'
|
||||
resources.ApplyResources(Me, "$this")
|
||||
Me.Appearance.Options.UseFont = True
|
||||
resources.ApplyResources(Me, "$this")
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.Controls.Add(Me.SplitContainer2_DV_Chat)
|
||||
Me.Controls.Add(Me.RibbonControl1)
|
||||
@ -1000,7 +825,6 @@ Partial Class frmValidator
|
||||
Me.Name = "frmValidator"
|
||||
Me.Ribbon = Me.RibbonControl1
|
||||
Me.StatusBar = Me.RibbonStatusBar1
|
||||
Me.ToolTip1.SetToolTip(Me, resources.GetString("$this.ToolTip"))
|
||||
CType(Me.SplitContainer2_DV_Chat.Panel1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.SplitContainer2_DV_Chat.Panel1.ResumeLayout(False)
|
||||
CType(Me.SplitContainer2_DV_Chat.Panel2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
@ -841,7 +841,8 @@ Public Class frmValidator
|
||||
.SortByColumn = "Y_LOC, X_LOC"
|
||||
})
|
||||
|
||||
oSQL = $"SELECT T.* from TBPM_CONTROL_TABLE T, TBPM_PROFILE_CONTROLS T1 WHERE T1.CONTROL_ACTIVE = 1 AND T.CONTROL_ID = T1.GUID AND T1.PROFIL_ID = {CURRENT_ProfilGUID} ORDER BY T.SEQUENCE"
|
||||
oSQL = $"SELECT IIF(LANG.CAPTION IS NULL,T.SPALTEN_HEADER,LANG.CAPTION) SPALTEN_HEADER_LANG, T.* from TBPM_CONTROL_TABLE T INNER JOIN TBPM_PROFILE_CONTROLS T1 ON T.CONTROL_ID = T1.GUID
|
||||
LEFT JOIN (SELECT * FROM TBPM_CONTOL_TABLE_LANG WHERE LANG_CODE = '{USER_LANGUAGE}') LANG ON T.GUID = LANG.COL_ID WHERE T1.CONTROL_ACTIVE = 1 AND T.CONTROL_ID = T1.GUID AND T1.PROFIL_ID = {CURRENT_ProfilGUID} ORDER BY T.SEQUENCE"
|
||||
DT_COLUMNS_GRID = DatabaseFallback.GetDatatable("TBPM_CONTROL_TABLE", New GetDatatableOptions(oSQL, DatabaseType.ECM) With {
|
||||
.FilterExpression = $"PROFIL_ID = {CURRENT_ProfilGUID}",
|
||||
.SortByColumn = "SEQUENCE"
|
||||
@ -2507,11 +2508,17 @@ Public Class frmValidator
|
||||
|
||||
Private Function CreateWMObject() As String
|
||||
LOGGER.Debug($"in GetWMDocFileString...'")
|
||||
Dim oWMRELPATH As String = BASEDATA_DT_CONFIG.Rows.Item(0).Item("WM_REL_PATH")
|
||||
If oWMRELPATH.EndsWith("\") = False Then
|
||||
oWMRELPATH = oWMRELPATH & "\"
|
||||
If WMSUFFIX.EndsWith("\") = False Then
|
||||
WMSUFFIX = WMSUFFIX & "\"
|
||||
End If
|
||||
Dim oWMOwnPath = WMDocPathWindows.Replace(oWMRELPATH, "")
|
||||
Dim oWMOwnPath As String
|
||||
If WM_AHWF_docPath <> String.Empty Then
|
||||
oWMOwnPath = WM_AHWF_docPath
|
||||
WMDocPathWindows = oWMOwnPath
|
||||
Else
|
||||
oWMOwnPath = WMDocPathWindows.Replace(WMSUFFIX, "")
|
||||
End If
|
||||
|
||||
LOGGER.Debug($"oWMOwnPath: {oWMOwnPath}")
|
||||
Try
|
||||
Dim oNormalizedPath = WINDREAM.NormalizePath(oWMOwnPath)
|
||||
@ -2535,6 +2542,11 @@ Public Class frmValidator
|
||||
End Function
|
||||
Private Function GetDocPathWindows(_CheckStandard As Integer)
|
||||
Try
|
||||
If ActiveWorkflowType = ConstAHWorkflow_BlindFile Then
|
||||
WMDocPathWindows = WM_AHWF_docPath
|
||||
CURRENT_DOC_PATH = WM_AHWF_docPath
|
||||
Return True
|
||||
End If
|
||||
Dim oResult As String
|
||||
|
||||
Dim oSQL = $"SELECT dbo.FNPM_GET_FILEPATH ({CURRENT_DOC_GUID},{_CheckStandard})"
|
||||
@ -2752,6 +2764,9 @@ Public Class frmValidator
|
||||
' DocumentViewerValidator.LoadFile(WMDocPathWindows)
|
||||
|
||||
Try
|
||||
If DocumentViewerValidator.Visible = False Then
|
||||
DocumentViewerValidator.Visible = True
|
||||
End If
|
||||
Dim oDocument As DocumentResultList.Document = Nothing
|
||||
' Load DocumentInfo
|
||||
oDocument = Documentloader.Load(CURRENT_DOC_ID, WMDocPathWindows)
|
||||
@ -2763,7 +2778,12 @@ Public Class frmValidator
|
||||
LOGGER.Error(ex)
|
||||
Exit Sub
|
||||
End Try
|
||||
|
||||
If ActiveWorkflowType = ConstAHWorkflow_BlindFile Then
|
||||
SplitContainer1.Panel2Collapsed = True
|
||||
DocumentViewerValidator.Visible = False
|
||||
RibbonPageFile.Visible = False
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
' Load Document in Document Viewer
|
||||
Dim oFileName = $"{CURRENT_DOC_ID}.{Current_Document.Extension}"
|
||||
@ -3785,7 +3805,7 @@ Public Class frmValidator
|
||||
Click_Additional_Searches()
|
||||
End If
|
||||
Else
|
||||
MsgBox("Für dieses Profil wurde noch keine Eingabemaske definiert!" & vbNewLine & "Informieren Sie Ihren PM-Administrator!" & vbNewLine & "Das Fenster wird geschlossen!", MsgBoxStyle.Exclamation, "Achtung:")
|
||||
MsgBox("No Form-Mask defined for this profile!" & vbNewLine & "Please inform Your admin!" & vbNewLine & "The validator will be closed!", MsgBoxStyle.Exclamation, "Attention:")
|
||||
Me.Close()
|
||||
End If
|
||||
|
||||
@ -3833,7 +3853,7 @@ Public Class frmValidator
|
||||
Else
|
||||
RibbonPageGroupCustom.Visible = False
|
||||
End If
|
||||
If Not IsNothing(WMDocPathWindows) Then
|
||||
If Not IsNothing(WMDocPathWindows) And ActiveWorkflowType = ConstAHWorkflow_BlindFile Then
|
||||
If ButtonExport2Folder_Caption <> "" And WMDocPathWindows <> "" Then
|
||||
If File.Exists(WMDocPathWindows) Then
|
||||
barbtnitmExport.Caption = ButtonExport2Folder_Caption
|
||||
@ -5287,7 +5307,7 @@ Public Class frmValidator
|
||||
oView.FocusedColumn = oView.Columns.Item(oColumn.ColumnName)
|
||||
|
||||
pMissing = True
|
||||
pMissingMessage = $"Fehlende Eingabe in Tabelle '{pGrid.Name}' in Spalte '{oDefinition.Item("SPALTEN_HEADER")}', Zeile '{oRowHandle + 1}'"
|
||||
pMissingMessage = $"Fehlende Eingabe in Tabelle '{pGrid.Name}' in Spalte '{oDefinition.Item("SPALTEN_HEADER_LANG")}', Zeile '{oRowHandle + 1}'"
|
||||
Return False
|
||||
End If
|
||||
End If
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user