MS
This commit is contained in:
@@ -14,9 +14,6 @@
|
||||
</startup>
|
||||
<userSettings>
|
||||
<DD_PM_WINDREAM.My.MySettings>
|
||||
<setting name="errormessage" serializeAs="String">
|
||||
<value />
|
||||
</setting>
|
||||
<setting name="frmTableColumns_Position" serializeAs="String">
|
||||
<value>0, 0</value>
|
||||
</setting>
|
||||
|
||||
@@ -133,7 +133,7 @@ Public Class ClassInit
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
Public Sub InitBasics()
|
||||
Public Shared Sub InitBasics()
|
||||
Try
|
||||
Dim sql = String.Format("select * from TBPM_KONFIGURATION WHERE GUID = 1")
|
||||
CURRENT_DT_CONFIG = ClassDatabase.Return_Datatable(sql)
|
||||
|
||||
3412
app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb
generated
3412
app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb
generated
File diff suppressed because it is too large
Load Diff
@@ -1448,18 +1448,6 @@ WHERE (FINAL_PROFILE = 1) AND (UPPER(NAME) = UPPER(@name))</CommandText>
|
||||
</DbCommand>
|
||||
</SelectCommand>
|
||||
</DbSource>
|
||||
<DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="DD_DMSLite.dbo.TBPM_PROFILE" DbObjectType="Table" GenerateShortCommands="true" GeneratorSourceName="cmdFinalText" Modifier="Public" Name="cmdFinalText" QueryType="Scalar" ScalarCallRetval="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy3" UserSourceName="cmdFinalText">
|
||||
<SelectCommand>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="true">
|
||||
<CommandText>SELECT FINAL_TEXT
|
||||
FROM TBPM_PROFILE
|
||||
WHERE (GUID = @GUID)</CommandText>
|
||||
<Parameters>
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_DMSLite.dbo.TBPM_PROFILE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
</Parameters>
|
||||
</DbCommand>
|
||||
</SelectCommand>
|
||||
</DbSource>
|
||||
<DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="DD_DMS.dbo.TBPM_PROFILE" DbObjectType="Table" GenerateShortCommands="true" GeneratorSourceName="cmdInsert_Copy" Modifier="Public" Name="cmdInsert_Copy" QueryType="NoData" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy4" UserSourceName="cmdInsert_Copy">
|
||||
<InsertCommand>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="true">
|
||||
@@ -1499,18 +1487,6 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
</DbCommand>
|
||||
</SelectCommand>
|
||||
</DbSource>
|
||||
<DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="DD_DMSLite.dbo.TBPM_PROFILE" DbObjectType="Table" GenerateShortCommands="true" GeneratorSourceName="cmdSortMode" Modifier="Public" Name="cmdSortMode" QueryType="Scalar" ScalarCallRetval="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy6" UserSourceName="cmdSortMode">
|
||||
<SelectCommand>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="true">
|
||||
<CommandText>SELECT SORT_BY_LATEST
|
||||
FROM TBPM_PROFILE
|
||||
WHERE (GUID = @Profil_id)</CommandText>
|
||||
<Parameters>
|
||||
<Parameter AllowDbNull="false" AutogeneratedName="Profil_id" ColumnName="GUID" DataSourceName="DD_DMSLite.dbo.TBPM_PROFILE" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Profil_id" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Current" />
|
||||
</Parameters>
|
||||
</DbCommand>
|
||||
</SelectCommand>
|
||||
</DbSource>
|
||||
<DbSource ConnectionRef="ConnectionString (MySettings)" DbObjectName="" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="cmdUpdatelogIndex" Modifier="Public" Name="cmdUpdatelogIndex" QueryType="NoData" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy7" UserSourceName="cmdUpdatelogIndex">
|
||||
<UpdateCommand>
|
||||
<DbCommand CommandType="Text" ModifiedByUser="true">
|
||||
@@ -2031,7 +2007,7 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
<xs:element name="DD_DMSLiteDataSet" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="True" msprop:Generator_DataSetName="DD_DMSLiteDataSet" msprop:Generator_UserDSName="DD_DMSLiteDataSet">
|
||||
<xs:complexType>
|
||||
<xs:choice minOccurs="0" maxOccurs="unbounded">
|
||||
<xs:element name="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_TableClassName="TBPM_PROFILE_FINAL_INDEXINGDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_FINAL_INDEXING" msprop:Generator_TablePropName="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowDeletingName="TBPM_PROFILE_FINAL_INDEXINGRowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILE_FINAL_INDEXINGRowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_FINAL_INDEXINGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_FINAL_INDEXINGRowDeleted" msprop:Generator_UserTableName="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowChangedName="TBPM_PROFILE_FINAL_INDEXINGRowChanged" msprop:Generator_RowEvArgName="TBPM_PROFILE_FINAL_INDEXINGRowChangeEvent" msprop:Generator_RowClassName="TBPM_PROFILE_FINAL_INDEXINGRow">
|
||||
<xs:element name="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_TableClassName="TBPM_PROFILE_FINAL_INDEXINGDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowChangedName="TBPM_PROFILE_FINAL_INDEXINGRowChanged" msprop:Generator_TablePropName="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowDeletingName="TBPM_PROFILE_FINAL_INDEXINGRowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILE_FINAL_INDEXINGRowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_FINAL_INDEXINGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_FINAL_INDEXINGRowDeleted" msprop:Generator_RowClassName="TBPM_PROFILE_FINAL_INDEXINGRow" msprop:Generator_UserTableName="TBPM_PROFILE_FINAL_INDEXING" msprop:Generator_RowEvArgName="TBPM_PROFILE_FINAL_INDEXINGRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="INDEXNAME" msprop:Generator_ColumnVarNameInTable="columnINDEXNAME" msprop:Generator_ColumnPropNameInRow="INDEXNAME" msprop:Generator_ColumnPropNameInTable="INDEXNAMEColumn" msprop:Generator_UserColumnName="INDEXNAME">
|
||||
@@ -2076,7 +2052,7 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="VWPM_PROFILE_USER" msprop:Generator_TableClassName="VWPM_PROFILE_USERDataTable" msprop:Generator_TableVarName="tableVWPM_PROFILE_USER" msprop:Generator_TablePropName="VWPM_PROFILE_USER" msprop:Generator_RowDeletingName="VWPM_PROFILE_USERRowDeleting" msprop:Generator_RowChangingName="VWPM_PROFILE_USERRowChanging" msprop:Generator_RowEvHandlerName="VWPM_PROFILE_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPM_PROFILE_USERRowDeleted" msprop:Generator_UserTableName="VWPM_PROFILE_USER" msprop:Generator_RowChangedName="VWPM_PROFILE_USERRowChanged" msprop:Generator_RowEvArgName="VWPM_PROFILE_USERRowChangeEvent" msprop:Generator_RowClassName="VWPM_PROFILE_USERRow">
|
||||
<xs:element name="VWPM_PROFILE_USER" msprop:Generator_TableClassName="VWPM_PROFILE_USERDataTable" msprop:Generator_TableVarName="tableVWPM_PROFILE_USER" msprop:Generator_RowChangedName="VWPM_PROFILE_USERRowChanged" msprop:Generator_TablePropName="VWPM_PROFILE_USER" msprop:Generator_RowDeletingName="VWPM_PROFILE_USERRowDeleting" msprop:Generator_RowChangingName="VWPM_PROFILE_USERRowChanging" msprop:Generator_RowEvHandlerName="VWPM_PROFILE_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPM_PROFILE_USERRowDeleted" msprop:Generator_RowClassName="VWPM_PROFILE_USERRow" msprop:Generator_UserTableName="VWPM_PROFILE_USER" msprop:Generator_RowEvArgName="VWPM_PROFILE_USERRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="PROFIL_ID" msprop:Generator_ColumnVarNameInTable="columnPROFIL_ID" msprop:Generator_ColumnPropNameInRow="PROFIL_ID" msprop:Generator_ColumnPropNameInTable="PROFIL_IDColumn" msprop:Generator_UserColumnName="PROFIL_ID" type="xs:int" />
|
||||
@@ -2179,7 +2155,7 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPM_KONFIGURATION" msprop:Generator_TableClassName="TBPM_KONFIGURATIONDataTable" msprop:Generator_TableVarName="tableTBPM_KONFIGURATION" msprop:Generator_TablePropName="TBPM_KONFIGURATION" msprop:Generator_RowDeletingName="TBPM_KONFIGURATIONRowDeleting" msprop:Generator_RowChangingName="TBPM_KONFIGURATIONRowChanging" msprop:Generator_RowEvHandlerName="TBPM_KONFIGURATIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_KONFIGURATIONRowDeleted" msprop:Generator_UserTableName="TBPM_KONFIGURATION" msprop:Generator_RowChangedName="TBPM_KONFIGURATIONRowChanged" msprop:Generator_RowEvArgName="TBPM_KONFIGURATIONRowChangeEvent" msprop:Generator_RowClassName="TBPM_KONFIGURATIONRow">
|
||||
<xs:element name="TBPM_KONFIGURATION" msprop:Generator_TableClassName="TBPM_KONFIGURATIONDataTable" msprop:Generator_TableVarName="tableTBPM_KONFIGURATION" msprop:Generator_RowChangedName="TBPM_KONFIGURATIONRowChanged" msprop:Generator_TablePropName="TBPM_KONFIGURATION" msprop:Generator_RowDeletingName="TBPM_KONFIGURATIONRowDeleting" msprop:Generator_RowChangingName="TBPM_KONFIGURATIONRowChanging" msprop:Generator_RowEvHandlerName="TBPM_KONFIGURATIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_KONFIGURATIONRowDeleted" msprop:Generator_RowClassName="TBPM_KONFIGURATIONRow" msprop:Generator_UserTableName="TBPM_KONFIGURATION" msprop:Generator_RowEvArgName="TBPM_KONFIGURATIONRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:unsignedByte" />
|
||||
@@ -2275,7 +2251,7 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPM_USER" msprop:Generator_TableClassName="TBPM_USERDataTable" msprop:Generator_TableVarName="tableTBPM_USER" msprop:Generator_TablePropName="TBPM_USER" msprop:Generator_RowDeletingName="TBPM_USERRowDeleting" msprop:Generator_RowChangingName="TBPM_USERRowChanging" msprop:Generator_RowEvHandlerName="TBPM_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_USERRowDeleted" msprop:Generator_UserTableName="TBPM_USER" msprop:Generator_RowChangedName="TBPM_USERRowChanged" msprop:Generator_RowEvArgName="TBPM_USERRowChangeEvent" msprop:Generator_RowClassName="TBPM_USERRow">
|
||||
<xs:element name="TBPM_USER" msprop:Generator_TableClassName="TBPM_USERDataTable" msprop:Generator_TableVarName="tableTBPM_USER" msprop:Generator_RowChangedName="TBPM_USERRowChanged" msprop:Generator_TablePropName="TBPM_USER" msprop:Generator_RowDeletingName="TBPM_USERRowDeleting" msprop:Generator_RowChangingName="TBPM_USERRowChanging" msprop:Generator_RowEvHandlerName="TBPM_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_USERRowDeleted" msprop:Generator_RowClassName="TBPM_USERRow" msprop:Generator_UserTableName="TBPM_USER" msprop:Generator_RowEvArgName="TBPM_USERRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@@ -2346,7 +2322,7 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPM_TYPE" msprop:Generator_TableClassName="TBPM_TYPEDataTable" msprop:Generator_TableVarName="tableTBPM_TYPE" msprop:Generator_TablePropName="TBPM_TYPE" msprop:Generator_RowDeletingName="TBPM_TYPERowDeleting" msprop:Generator_RowChangingName="TBPM_TYPERowChanging" msprop:Generator_RowEvHandlerName="TBPM_TYPERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_TYPERowDeleted" msprop:Generator_UserTableName="TBPM_TYPE" msprop:Generator_RowChangedName="TBPM_TYPERowChanged" msprop:Generator_RowEvArgName="TBPM_TYPERowChangeEvent" msprop:Generator_RowClassName="TBPM_TYPERow">
|
||||
<xs:element name="TBPM_TYPE" msprop:Generator_TableClassName="TBPM_TYPEDataTable" msprop:Generator_TableVarName="tableTBPM_TYPE" msprop:Generator_RowChangedName="TBPM_TYPERowChanged" msprop:Generator_TablePropName="TBPM_TYPE" msprop:Generator_RowDeletingName="TBPM_TYPERowDeleting" msprop:Generator_RowChangingName="TBPM_TYPERowChanging" msprop:Generator_RowEvHandlerName="TBPM_TYPERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_TYPERowDeleted" msprop:Generator_RowClassName="TBPM_TYPERow" msprop:Generator_UserTableName="TBPM_TYPE" msprop:Generator_RowEvArgName="TBPM_TYPERowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:short" />
|
||||
@@ -2376,7 +2352,7 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPM_ERROR_LOG" msprop:Generator_TableClassName="TBPM_ERROR_LOGDataTable" msprop:Generator_TableVarName="tableTBPM_ERROR_LOG" msprop:Generator_TablePropName="TBPM_ERROR_LOG" msprop:Generator_RowDeletingName="TBPM_ERROR_LOGRowDeleting" msprop:Generator_RowChangingName="TBPM_ERROR_LOGRowChanging" msprop:Generator_RowEvHandlerName="TBPM_ERROR_LOGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_ERROR_LOGRowDeleted" msprop:Generator_UserTableName="TBPM_ERROR_LOG" msprop:Generator_RowChangedName="TBPM_ERROR_LOGRowChanged" msprop:Generator_RowEvArgName="TBPM_ERROR_LOGRowChangeEvent" msprop:Generator_RowClassName="TBPM_ERROR_LOGRow">
|
||||
<xs:element name="TBPM_ERROR_LOG" msprop:Generator_TableClassName="TBPM_ERROR_LOGDataTable" msprop:Generator_TableVarName="tableTBPM_ERROR_LOG" msprop:Generator_RowChangedName="TBPM_ERROR_LOGRowChanged" msprop:Generator_TablePropName="TBPM_ERROR_LOG" msprop:Generator_RowDeletingName="TBPM_ERROR_LOGRowDeleting" msprop:Generator_RowChangingName="TBPM_ERROR_LOGRowChanging" msprop:Generator_RowEvHandlerName="TBPM_ERROR_LOGRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_ERROR_LOGRowDeleted" msprop:Generator_RowClassName="TBPM_ERROR_LOGRow" msprop:Generator_UserTableName="TBPM_ERROR_LOG" msprop:Generator_RowEvArgName="TBPM_ERROR_LOGRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@@ -2399,7 +2375,7 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="VWPM_CONTROL_INDEX" msprop:Generator_TableClassName="VWPM_CONTROL_INDEXDataTable" msprop:Generator_TableVarName="tableVWPM_CONTROL_INDEX" msprop:Generator_TablePropName="VWPM_CONTROL_INDEX" msprop:Generator_RowDeletingName="VWPM_CONTROL_INDEXRowDeleting" msprop:Generator_RowChangingName="VWPM_CONTROL_INDEXRowChanging" msprop:Generator_RowEvHandlerName="VWPM_CONTROL_INDEXRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPM_CONTROL_INDEXRowDeleted" msprop:Generator_UserTableName="VWPM_CONTROL_INDEX" msprop:Generator_RowChangedName="VWPM_CONTROL_INDEXRowChanged" msprop:Generator_RowEvArgName="VWPM_CONTROL_INDEXRowChangeEvent" msprop:Generator_RowClassName="VWPM_CONTROL_INDEXRow">
|
||||
<xs:element name="VWPM_CONTROL_INDEX" msprop:Generator_TableClassName="VWPM_CONTROL_INDEXDataTable" msprop:Generator_TableVarName="tableVWPM_CONTROL_INDEX" msprop:Generator_RowChangedName="VWPM_CONTROL_INDEXRowChanged" msprop:Generator_TablePropName="VWPM_CONTROL_INDEX" msprop:Generator_RowDeletingName="VWPM_CONTROL_INDEXRowDeleting" msprop:Generator_RowChangingName="VWPM_CONTROL_INDEXRowChanging" msprop:Generator_RowEvHandlerName="VWPM_CONTROL_INDEXRowChangeEventHandler" msprop:Generator_RowDeletedName="VWPM_CONTROL_INDEXRowDeleted" msprop:Generator_RowClassName="VWPM_CONTROL_INDEXRow" msprop:Generator_UserTableName="VWPM_CONTROL_INDEX" msprop:Generator_RowEvArgName="VWPM_CONTROL_INDEXRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@@ -2488,7 +2464,7 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPM_CONNECTION" msprop:Generator_TableClassName="TBPM_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBPM_CONNECTION" msprop:Generator_TablePropName="TBPM_CONNECTION" msprop:Generator_RowDeletingName="TBPM_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBPM_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBPM_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_CONNECTIONRowDeleted" msprop:Generator_UserTableName="TBPM_CONNECTION" msprop:Generator_RowChangedName="TBPM_CONNECTIONRowChanged" msprop:Generator_RowEvArgName="TBPM_CONNECTIONRowChangeEvent" msprop:Generator_RowClassName="TBPM_CONNECTIONRow">
|
||||
<xs:element name="TBPM_CONNECTION" msprop:Generator_TableClassName="TBPM_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBPM_CONNECTION" msprop:Generator_RowChangedName="TBPM_CONNECTIONRowChanged" msprop:Generator_TablePropName="TBPM_CONNECTION" msprop:Generator_RowDeletingName="TBPM_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBPM_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBPM_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_CONNECTIONRowDeleted" msprop:Generator_RowClassName="TBPM_CONNECTIONRow" msprop:Generator_UserTableName="TBPM_CONNECTION" msprop:Generator_RowEvArgName="TBPM_CONNECTIONRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:short" />
|
||||
@@ -2561,7 +2537,7 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPROFILE_USER" msprop:Generator_TableClassName="TBPROFILE_USERDataTable" msprop:Generator_TableVarName="tableTBPROFILE_USER" msprop:Generator_TablePropName="TBPROFILE_USER" msprop:Generator_RowDeletingName="TBPROFILE_USERRowDeleting" msprop:Generator_RowChangingName="TBPROFILE_USERRowChanging" msprop:Generator_RowEvHandlerName="TBPROFILE_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPROFILE_USERRowDeleted" msprop:Generator_UserTableName="TBPROFILE_USER" msprop:Generator_RowChangedName="TBPROFILE_USERRowChanged" msprop:Generator_RowEvArgName="TBPROFILE_USERRowChangeEvent" msprop:Generator_RowClassName="TBPROFILE_USERRow">
|
||||
<xs:element name="TBPROFILE_USER" msprop:Generator_TableClassName="TBPROFILE_USERDataTable" msprop:Generator_TableVarName="tableTBPROFILE_USER" msprop:Generator_RowChangedName="TBPROFILE_USERRowChanged" msprop:Generator_TablePropName="TBPROFILE_USER" msprop:Generator_RowDeletingName="TBPROFILE_USERRowDeleting" msprop:Generator_RowChangingName="TBPROFILE_USERRowChanging" msprop:Generator_RowEvHandlerName="TBPROFILE_USERRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPROFILE_USERRowDeleted" msprop:Generator_RowClassName="TBPROFILE_USERRow" msprop:Generator_UserTableName="TBPROFILE_USER" msprop:Generator_RowEvArgName="TBPROFILE_USERRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@@ -2597,7 +2573,7 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPM_PROFILE_FILES" msprop:Generator_TableClassName="TBPM_PROFILE_FILESDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_FILES" msprop:Generator_TablePropName="TBPM_PROFILE_FILES" msprop:Generator_RowDeletingName="TBPM_PROFILE_FILESRowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILE_FILESRowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_FILESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_FILESRowDeleted" msprop:Generator_UserTableName="TBPM_PROFILE_FILES" msprop:Generator_RowChangedName="TBPM_PROFILE_FILESRowChanged" msprop:Generator_RowEvArgName="TBPM_PROFILE_FILESRowChangeEvent" msprop:Generator_RowClassName="TBPM_PROFILE_FILESRow">
|
||||
<xs:element name="TBPM_PROFILE_FILES" msprop:Generator_TableClassName="TBPM_PROFILE_FILESDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_FILES" msprop:Generator_RowChangedName="TBPM_PROFILE_FILESRowChanged" msprop:Generator_TablePropName="TBPM_PROFILE_FILES" msprop:Generator_RowDeletingName="TBPM_PROFILE_FILESRowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILE_FILESRowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_FILESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_FILESRowDeleted" msprop:Generator_RowClassName="TBPM_PROFILE_FILESRow" msprop:Generator_UserTableName="TBPM_PROFILE_FILES" msprop:Generator_RowEvArgName="TBPM_PROFILE_FILESRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@@ -2612,7 +2588,7 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPM_FILES_USER_NOT_INDEXED" msprop:Generator_TableClassName="TBPM_FILES_USER_NOT_INDEXEDDataTable" msprop:Generator_TableVarName="tableTBPM_FILES_USER_NOT_INDEXED" msprop:Generator_TablePropName="TBPM_FILES_USER_NOT_INDEXED" msprop:Generator_RowDeletingName="TBPM_FILES_USER_NOT_INDEXEDRowDeleting" msprop:Generator_RowChangingName="TBPM_FILES_USER_NOT_INDEXEDRowChanging" msprop:Generator_RowEvHandlerName="TBPM_FILES_USER_NOT_INDEXEDRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_FILES_USER_NOT_INDEXEDRowDeleted" msprop:Generator_UserTableName="TBPM_FILES_USER_NOT_INDEXED" msprop:Generator_RowChangedName="TBPM_FILES_USER_NOT_INDEXEDRowChanged" msprop:Generator_RowEvArgName="TBPM_FILES_USER_NOT_INDEXEDRowChangeEvent" msprop:Generator_RowClassName="TBPM_FILES_USER_NOT_INDEXEDRow">
|
||||
<xs:element name="TBPM_FILES_USER_NOT_INDEXED" msprop:Generator_TableClassName="TBPM_FILES_USER_NOT_INDEXEDDataTable" msprop:Generator_TableVarName="tableTBPM_FILES_USER_NOT_INDEXED" msprop:Generator_RowChangedName="TBPM_FILES_USER_NOT_INDEXEDRowChanged" msprop:Generator_TablePropName="TBPM_FILES_USER_NOT_INDEXED" msprop:Generator_RowDeletingName="TBPM_FILES_USER_NOT_INDEXEDRowDeleting" msprop:Generator_RowChangingName="TBPM_FILES_USER_NOT_INDEXEDRowChanging" msprop:Generator_RowEvHandlerName="TBPM_FILES_USER_NOT_INDEXEDRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_FILES_USER_NOT_INDEXEDRowDeleted" msprop:Generator_RowClassName="TBPM_FILES_USER_NOT_INDEXEDRow" msprop:Generator_UserTableName="TBPM_FILES_USER_NOT_INDEXED" msprop:Generator_RowEvArgName="TBPM_FILES_USER_NOT_INDEXEDRowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="USR_NAME" msprop:Generator_ColumnVarNameInTable="columnUSR_NAME" msprop:Generator_ColumnPropNameInRow="USR_NAME" msprop:Generator_ColumnPropNameInTable="USR_NAMEColumn" msprop:Generator_UserColumnName="USR_NAME" minOccurs="0">
|
||||
@@ -2633,7 +2609,7 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPM_PROFILE" msprop:Generator_TableClassName="TBPM_PROFILEDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE" msprop:Generator_TablePropName="TBPM_PROFILE" msprop:Generator_RowDeletingName="TBPM_PROFILERowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILERowDeleted" msprop:Generator_UserTableName="TBPM_PROFILE" msprop:Generator_RowChangedName="TBPM_PROFILERowChanged" msprop:Generator_RowEvArgName="TBPM_PROFILERowChangeEvent" msprop:Generator_RowClassName="TBPM_PROFILERow">
|
||||
<xs:element name="TBPM_PROFILE" msprop:Generator_TableClassName="TBPM_PROFILEDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE" msprop:Generator_RowChangedName="TBPM_PROFILERowChanged" msprop:Generator_TablePropName="TBPM_PROFILE" msprop:Generator_RowDeletingName="TBPM_PROFILERowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILERowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILERowDeleted" msprop:Generator_RowClassName="TBPM_PROFILERow" msprop:Generator_UserTableName="TBPM_PROFILE" msprop:Generator_RowEvArgName="TBPM_PROFILERowChangeEvent">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@@ -2725,7 +2701,7 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBWH_CONNECTION" msprop:Generator_TableClassName="TBWH_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBWH_CONNECTION" msprop:Generator_RowChangedName="TBWH_CONNECTIONRowChanged" msprop:Generator_TablePropName="TBWH_CONNECTION" msprop:Generator_RowDeletingName="TBWH_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBWH_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBWH_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_CONNECTIONRowDeleted" msprop:Generator_RowClassName="TBWH_CONNECTIONRow" msprop:Generator_UserTableName="TBWH_CONNECTION" msprop:Generator_RowEvArgName="TBWH_CONNECTIONRowChangeEvent">
|
||||
<xs:element name="TBWH_CONNECTION" msprop:Generator_TableClassName="TBWH_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBWH_CONNECTION" msprop:Generator_TablePropName="TBWH_CONNECTION" msprop:Generator_RowDeletingName="TBWH_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBWH_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBWH_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_CONNECTIONRowDeleted" msprop:Generator_UserTableName="TBWH_CONNECTION" msprop:Generator_RowChangedName="TBWH_CONNECTIONRowChanged" msprop:Generator_RowEvArgName="TBWH_CONNECTIONRowChangeEvent" msprop:Generator_RowClassName="TBWH_CONNECTIONRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:short" />
|
||||
@@ -2798,7 +2774,7 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_TableClassName="TBWH_CHECK_PROFILE_CONTROLSDataTable" msprop:Generator_TableVarName="tableTBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_RowChangedName="TBWH_CHECK_PROFILE_CONTROLSRowChanged" msprop:Generator_TablePropName="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_RowDeletingName="TBWH_CHECK_PROFILE_CONTROLSRowDeleting" msprop:Generator_RowChangingName="TBWH_CHECK_PROFILE_CONTROLSRowChanging" msprop:Generator_RowEvHandlerName="TBWH_CHECK_PROFILE_CONTROLSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_CHECK_PROFILE_CONTROLSRowDeleted" msprop:Generator_RowClassName="TBWH_CHECK_PROFILE_CONTROLSRow" msprop:Generator_UserTableName="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_RowEvArgName="TBWH_CHECK_PROFILE_CONTROLSRowChangeEvent">
|
||||
<xs:element name="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_TableClassName="TBWH_CHECK_PROFILE_CONTROLSDataTable" msprop:Generator_TableVarName="tableTBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_TablePropName="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_RowDeletingName="TBWH_CHECK_PROFILE_CONTROLSRowDeleting" msprop:Generator_RowChangingName="TBWH_CHECK_PROFILE_CONTROLSRowChanging" msprop:Generator_RowEvHandlerName="TBWH_CHECK_PROFILE_CONTROLSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_CHECK_PROFILE_CONTROLSRowDeleted" msprop:Generator_UserTableName="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_RowChangedName="TBWH_CHECK_PROFILE_CONTROLSRowChanged" msprop:Generator_RowEvArgName="TBWH_CHECK_PROFILE_CONTROLSRowChangeEvent" msprop:Generator_RowClassName="TBWH_CHECK_PROFILE_CONTROLSRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@@ -2849,7 +2825,7 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPM_PROFILE_CONTROLS" msprop:Generator_TableClassName="TBPM_PROFILE_CONTROLSDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_CONTROLS" msprop:Generator_RowChangedName="TBPM_PROFILE_CONTROLSRowChanged" msprop:Generator_TablePropName="TBPM_PROFILE_CONTROLS" msprop:Generator_RowDeletingName="TBPM_PROFILE_CONTROLSRowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILE_CONTROLSRowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_CONTROLSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_CONTROLSRowDeleted" msprop:Generator_RowClassName="TBPM_PROFILE_CONTROLSRow" msprop:Generator_UserTableName="TBPM_PROFILE_CONTROLS" msprop:Generator_RowEvArgName="TBPM_PROFILE_CONTROLSRowChangeEvent">
|
||||
<xs:element name="TBPM_PROFILE_CONTROLS" msprop:Generator_TableClassName="TBPM_PROFILE_CONTROLSDataTable" msprop:Generator_TableVarName="tableTBPM_PROFILE_CONTROLS" msprop:Generator_TablePropName="TBPM_PROFILE_CONTROLS" msprop:Generator_RowDeletingName="TBPM_PROFILE_CONTROLSRowDeleting" msprop:Generator_RowChangingName="TBPM_PROFILE_CONTROLSRowChanging" msprop:Generator_RowEvHandlerName="TBPM_PROFILE_CONTROLSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_PROFILE_CONTROLSRowDeleted" msprop:Generator_UserTableName="TBPM_PROFILE_CONTROLS" msprop:Generator_RowChangedName="TBPM_PROFILE_CONTROLSRowChanged" msprop:Generator_RowEvArgName="TBPM_PROFILE_CONTROLSRowChangeEvent" msprop:Generator_RowClassName="TBPM_PROFILE_CONTROLSRow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@@ -2940,7 +2916,7 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
</xs:sequence>
|
||||
</xs:complexType>
|
||||
</xs:element>
|
||||
<xs:element name="TBPM_CONTROL_TABLE" msprop:Generator_TableClassName="TBPM_CONTROL_TABLEDataTable" msprop:Generator_TableVarName="tableTBPM_CONTROL_TABLE" msprop:Generator_RowChangedName="TBPM_CONTROL_TABLERowChanged" msprop:Generator_TablePropName="TBPM_CONTROL_TABLE" msprop:Generator_RowDeletingName="TBPM_CONTROL_TABLERowDeleting" msprop:Generator_RowChangingName="TBPM_CONTROL_TABLERowChanging" msprop:Generator_RowEvHandlerName="TBPM_CONTROL_TABLERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_CONTROL_TABLERowDeleted" msprop:Generator_RowClassName="TBPM_CONTROL_TABLERow" msprop:Generator_UserTableName="TBPM_CONTROL_TABLE" msprop:Generator_RowEvArgName="TBPM_CONTROL_TABLERowChangeEvent">
|
||||
<xs:element name="TBPM_CONTROL_TABLE" msprop:Generator_TableClassName="TBPM_CONTROL_TABLEDataTable" msprop:Generator_TableVarName="tableTBPM_CONTROL_TABLE" msprop:Generator_TablePropName="TBPM_CONTROL_TABLE" msprop:Generator_RowDeletingName="TBPM_CONTROL_TABLERowDeleting" msprop:Generator_RowChangingName="TBPM_CONTROL_TABLERowChanging" msprop:Generator_RowEvHandlerName="TBPM_CONTROL_TABLERowChangeEventHandler" msprop:Generator_RowDeletedName="TBPM_CONTROL_TABLERowDeleted" msprop:Generator_UserTableName="TBPM_CONTROL_TABLE" msprop:Generator_RowChangedName="TBPM_CONTROL_TABLERowChanged" msprop:Generator_RowEvArgName="TBPM_CONTROL_TABLERowChangeEvent" msprop:Generator_RowClassName="TBPM_CONTROL_TABLERow">
|
||||
<xs:complexType>
|
||||
<xs:sequence>
|
||||
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
|
||||
@@ -3071,11 +3047,11 @@ WHERE (GUID = @GUID)</CommandText>
|
||||
</xs:element>
|
||||
<xs:annotation>
|
||||
<xs:appinfo>
|
||||
<msdata:Relationship name="FK_TBPM_ERROR_LOG_PROFILE1" msdata:parent="TBPM_PROFILE" msdata:child="TBPM_ERROR_LOG" msdata:parentkey="GUID" msdata:childkey="PROFIL_ID" msprop:Generator_UserChildTable="TBPM_ERROR_LOG" msprop:Generator_ChildPropName="GetTBPM_ERROR_LOGRows" msprop:Generator_UserRelationName="FK_TBPM_ERROR_LOG_PROFILE1" msprop:Generator_RelationVarName="relationFK_TBPM_ERROR_LOG_PROFILE1" msprop:Generator_UserParentTable="TBPM_PROFILE" msprop:Generator_ParentPropName="TBPM_PROFILERow" />
|
||||
<msdata:Relationship name="FK_TBPM_PROFILE_TYPE1" msdata:parent="TBPM_TYPE" msdata:child="TBPM_PROFILE" msdata:parentkey="GUID" msdata:childkey="TYPE" msprop:Generator_UserChildTable="TBPM_PROFILE" msprop:Generator_ChildPropName="GetTBPM_PROFILERows" msprop:Generator_UserRelationName="FK_TBPM_PROFILE_TYPE1" msprop:Generator_ParentPropName="TBPM_TYPERow" msprop:Generator_RelationVarName="relationFK_TBPM_PROFILE_TYPE1" msprop:Generator_UserParentTable="TBPM_TYPE" />
|
||||
<msdata:Relationship name="FK_TBPM_PROFILE_CONTROLS_PROFILE1" msdata:parent="TBPM_PROFILE" msdata:child="TBPM_PROFILE_CONTROLS" msdata:parentkey="GUID" msdata:childkey="PROFIL_ID" msprop:Generator_UserChildTable="TBPM_PROFILE_CONTROLS" msprop:Generator_ChildPropName="GetTBPM_PROFILE_CONTROLSRows" msprop:Generator_UserRelationName="FK_TBPM_PROFILE_CONTROLS_PROFILE1" msprop:Generator_RelationVarName="relationFK_TBPM_PROFILE_CONTROLS_PROFILE1" msprop:Generator_UserParentTable="TBPM_PROFILE" msprop:Generator_ParentPropName="TBPM_PROFILERow" />
|
||||
<msdata:Relationship name="FK_TBPM_CONTROL_TABLE_CONTROL1" msdata:parent="TBPM_PROFILE_CONTROLS" msdata:child="TBPM_CONTROL_TABLE" msdata:parentkey="GUID" msdata:childkey="CONTROL_ID" msprop:Generator_UserChildTable="TBPM_CONTROL_TABLE" msprop:Generator_ChildPropName="GetTBPM_CONTROL_TABLERows" msprop:Generator_UserRelationName="FK_TBPM_CONTROL_TABLE_CONTROL1" msprop:Generator_RelationVarName="relationFK_TBPM_CONTROL_TABLE_CONTROL1" msprop:Generator_UserParentTable="TBPM_PROFILE_CONTROLS" msprop:Generator_ParentPropName="TBPM_PROFILE_CONTROLSRow" />
|
||||
<msdata:Relationship name="FK_TBPM_CONTROL_TABLE_CONTROL" msdata:parent="TBWH_CHECK_PROFILE_CONTROLS" msdata:child="TBPM_CONTROL_TABLE" msdata:parentkey="GUID" msdata:childkey="CONTROL_ID" msprop:Generator_UserChildTable="TBPM_CONTROL_TABLE" msprop:Generator_ChildPropName="GetTBPM_CONTROL_TABLERows" msprop:Generator_UserRelationName="FK_TBPM_CONTROL_TABLE_CONTROL" msprop:Generator_ParentPropName="TBWH_CHECK_PROFILE_CONTROLSRow" msprop:Generator_RelationVarName="relationFK_TBPM_CONTROL_TABLE_CONTROL" msprop:Generator_UserParentTable="TBWH_CHECK_PROFILE_CONTROLS" />
|
||||
<msdata:Relationship name="FK_TBPM_ERROR_LOG_PROFILE1" msdata:parent="TBPM_PROFILE" msdata:child="TBPM_ERROR_LOG" msdata:parentkey="GUID" msdata:childkey="PROFIL_ID" msprop:Generator_UserChildTable="TBPM_ERROR_LOG" msprop:Generator_ChildPropName="GetTBPM_ERROR_LOGRows" msprop:Generator_UserRelationName="FK_TBPM_ERROR_LOG_PROFILE1" msprop:Generator_ParentPropName="TBPM_PROFILERow" msprop:Generator_RelationVarName="relationFK_TBPM_ERROR_LOG_PROFILE1" msprop:Generator_UserParentTable="TBPM_PROFILE" />
|
||||
<msdata:Relationship name="FK_TBPM_PROFILE_TYPE1" msdata:parent="TBPM_TYPE" msdata:child="TBPM_PROFILE" msdata:parentkey="GUID" msdata:childkey="TYPE" msprop:Generator_UserChildTable="TBPM_PROFILE" msprop:Generator_ChildPropName="GetTBPM_PROFILERows" msprop:Generator_UserRelationName="FK_TBPM_PROFILE_TYPE1" msprop:Generator_RelationVarName="relationFK_TBPM_PROFILE_TYPE1" msprop:Generator_UserParentTable="TBPM_TYPE" msprop:Generator_ParentPropName="TBPM_TYPERow" />
|
||||
<msdata:Relationship name="FK_TBPM_PROFILE_CONTROLS_PROFILE1" msdata:parent="TBPM_PROFILE" msdata:child="TBPM_PROFILE_CONTROLS" msdata:parentkey="GUID" msdata:childkey="PROFIL_ID" msprop:Generator_UserChildTable="TBPM_PROFILE_CONTROLS" msprop:Generator_ChildPropName="GetTBPM_PROFILE_CONTROLSRows" msprop:Generator_UserRelationName="FK_TBPM_PROFILE_CONTROLS_PROFILE1" msprop:Generator_ParentPropName="TBPM_PROFILERow" msprop:Generator_RelationVarName="relationFK_TBPM_PROFILE_CONTROLS_PROFILE1" msprop:Generator_UserParentTable="TBPM_PROFILE" />
|
||||
<msdata:Relationship name="FK_TBPM_CONTROL_TABLE_CONTROL1" msdata:parent="TBPM_PROFILE_CONTROLS" msdata:child="TBPM_CONTROL_TABLE" msdata:parentkey="GUID" msdata:childkey="CONTROL_ID" msprop:Generator_UserChildTable="TBPM_CONTROL_TABLE" msprop:Generator_ChildPropName="GetTBPM_CONTROL_TABLERows" msprop:Generator_UserRelationName="FK_TBPM_CONTROL_TABLE_CONTROL1" msprop:Generator_ParentPropName="TBPM_PROFILE_CONTROLSRow" msprop:Generator_RelationVarName="relationFK_TBPM_CONTROL_TABLE_CONTROL1" msprop:Generator_UserParentTable="TBPM_PROFILE_CONTROLS" />
|
||||
<msdata:Relationship name="FK_TBPM_CONTROL_TABLE_CONTROL" msdata:parent="TBWH_CHECK_PROFILE_CONTROLS" msdata:child="TBPM_CONTROL_TABLE" msdata:parentkey="GUID" msdata:childkey="CONTROL_ID" msprop:Generator_UserChildTable="TBPM_CONTROL_TABLE" msprop:Generator_ChildPropName="GetTBPM_CONTROL_TABLERows" msprop:Generator_UserRelationName="FK_TBPM_CONTROL_TABLE_CONTROL" msprop:Generator_RelationVarName="relationFK_TBPM_CONTROL_TABLE_CONTROL" msprop:Generator_UserParentTable="TBWH_CHECK_PROFILE_CONTROLS" msprop:Generator_ParentPropName="TBWH_CHECK_PROFILE_CONTROLSRow" />
|
||||
</xs:appinfo>
|
||||
</xs:annotation>
|
||||
</xs:schema>
|
||||
@@ -4,7 +4,7 @@
|
||||
Changes to this file may cause incorrect behavior and will be lost if
|
||||
the code is regenerated.
|
||||
</autogenerated>-->
|
||||
<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="393" ViewPortY="-104" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
|
||||
<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="-27" ViewPortY="239" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
|
||||
<Shapes>
|
||||
<Shape ID="DesignTable:TBPM_PROFILE_FINAL_INDEXING" ZOrder="1" X="1578" Y="-67" Height="383" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" />
|
||||
<Shape ID="DesignTable:VWPM_PROFILE_USER" ZOrder="17" X="1467" Y="331" Height="325" Width="254" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
|
||||
@@ -17,7 +17,7 @@
|
||||
<Shape ID="DesignTable:TBPROFILE_USER" ZOrder="19" X="530" Y="-3" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
|
||||
<Shape ID="DesignTable:TBPM_PROFILE_FILES" ZOrder="4" X="1212" Y="-64" Height="324" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="83" />
|
||||
<Shape ID="DesignTable:TBPM_FILES_USER_NOT_INDEXED" ZOrder="16" X="851" Y="-3" Height="153" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="64" />
|
||||
<Shape ID="DesignTable:TBPM_PROFILE" ZOrder="15" X="256" Y="387" Height="381" Width="283" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBPM_PROFILE" ZOrder="15" X="256" Y="387" Height="381" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBWH_CHECK_PROFILE_CONTROLS" ZOrder="10" X="0" Y="-72" Height="168" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="78" />
|
||||
<Shape ID="DesignTable:TBPM_PROFILE_CONTROLS" ZOrder="8" X="595" Y="421" Height="476" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
<Shape ID="DesignTable:TBPM_CONTROL_TABLE" ZOrder="2" X="940" Y="517" Height="324" Width="284" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
|
||||
@@ -51,7 +51,7 @@
|
||||
<Connector ID="DesignRelation:FK_TBPM_PROFILE_CONTROLS_PROFILE1" ZOrder="9" LineWidth="11">
|
||||
<RoutePoints>
|
||||
<Point>
|
||||
<X>539</X>
|
||||
<X>556</X>
|
||||
<Y>413</Y>
|
||||
</Point>
|
||||
<Point>
|
||||
|
||||
@@ -59,6 +59,10 @@
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.Data.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.Images.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.Images.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.Pdf.v15.2.Drawing, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.Pdf.v15.2.Drawing.dll</HintPath>
|
||||
@@ -87,6 +91,7 @@
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.XtraLayout.v15.2.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="DevExpress.XtraNavBar.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL" />
|
||||
<Reference Include="DevExpress.XtraPdfViewer.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.XtraPdfViewer.v15.2.dll</HintPath>
|
||||
|
||||
@@ -4,7 +4,11 @@
|
||||
Public CURRENT_ProfilGUID As Integer
|
||||
Public CURRENT_ProfilName As String
|
||||
Public CURRENT_HTML_DOC As String
|
||||
|
||||
Public CURRENT_DOC_GUID As Integer
|
||||
Public CURRENT_DOC_ID As Integer
|
||||
Public CURRENT_JUMP_DOC_GUID As Integer
|
||||
|
||||
Public CURRENT_DOC_PATH As String
|
||||
Public ERROR_STATE = ""
|
||||
Public USER_IS_ADMIN As Boolean = False
|
||||
@@ -20,7 +24,10 @@
|
||||
Public CURRENT_SQL_COMAMND As String
|
||||
Public CURRENT_DT_SQL_CONFIG_TABLE As DataTable
|
||||
Public CURRENT_DT_CONFIG As DataTable
|
||||
Public CURRENT_CLICKED_PROFILE_ID As Integer = 0
|
||||
Public CURRENT_CLICKED_PROFILE_TITLE As String
|
||||
|
||||
Public CURRENT_CONTROL_ID As Integer
|
||||
|
||||
Public errormessage As String
|
||||
End Module
|
||||
|
||||
@@ -11,8 +11,8 @@ Imports System.Runtime.InteropServices
|
||||
<Assembly: AssemblyTitle("Process Manager")>
|
||||
<Assembly: AssemblyDescription("")>
|
||||
<Assembly: AssemblyCompany("Digital Data")>
|
||||
<Assembly: AssemblyProduct("Process Manager")>
|
||||
<Assembly: AssemblyCopyright("Copyright © Digital Data 2016")>
|
||||
<Assembly: AssemblyProduct("Process Manager")>
|
||||
<Assembly: AssemblyCopyright("Copyright © Digital Data")>
|
||||
<Assembly: AssemblyTrademark("")>
|
||||
|
||||
<Assembly: ComVisible(False)>
|
||||
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
|
||||
' übernehmen, indem Sie "*" eingeben:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("1.9.3.5")>
|
||||
<Assembly: AssemblyVersion("1.9.3.9")>
|
||||
<Assembly: AssemblyFileVersion("1.0.0.0")>
|
||||
|
||||
33
app/DD_PM_WINDREAM/My Project/Settings.Designer.vb
generated
33
app/DD_PM_WINDREAM/My Project/Settings.Designer.vb
generated
@@ -1,7 +1,7 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' Dieser Code wurde von einem Tool generiert.
|
||||
' Laufzeitversion:4.0.30319.34209
|
||||
' Laufzeitversion:4.0.30319.42000
|
||||
'
|
||||
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
|
||||
' der Code erneut generiert wird.
|
||||
@@ -15,21 +15,21 @@ Option Explicit On
|
||||
Namespace My
|
||||
|
||||
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "12.0.0.0"), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "15.5.0.0"), _
|
||||
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Partial Friend NotInheritable Class MySettings
|
||||
Inherits Global.System.Configuration.ApplicationSettingsBase
|
||||
|
||||
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
|
||||
|
||||
#Region "Funktion zum automatischen Speichern von My.Settings"
|
||||
#Region "Automatische My.Settings-Speicherfunktion"
|
||||
#If _MyType = "WindowsForms" Then
|
||||
Private Shared addedHandler As Boolean
|
||||
|
||||
Private Shared addedHandlerLockObject As New Object
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
||||
Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
|
||||
Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
|
||||
If My.Application.SaveMySettingsOnExit Then
|
||||
My.Settings.Save()
|
||||
End If
|
||||
@@ -54,19 +54,6 @@ Namespace My
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute(""), _
|
||||
Global.System.Configuration.SettingsManageabilityAttribute(Global.System.Configuration.SettingsManageability.Roaming)> _
|
||||
Public Property errormessage() As String
|
||||
Get
|
||||
Return CType(Me("errormessage"),String)
|
||||
End Get
|
||||
Set
|
||||
Me("errormessage") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.SpecialSettingAttribute(Global.System.Configuration.SpecialSetting.ConnectionString), _
|
||||
@@ -181,15 +168,15 @@ Namespace My
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("0, 0"), _
|
||||
Global.System.Configuration.SettingsManageabilityAttribute(Global.System.Configuration.SettingsManageability.Roaming)> _
|
||||
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
||||
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.Configuration.DefaultSettingValueAttribute("0, 0"), _
|
||||
Global.System.Configuration.SettingsManageabilityAttribute(Global.System.Configuration.SettingsManageability.Roaming)> _
|
||||
Public Property frmValidatorPosition() As Global.System.Drawing.Point
|
||||
Get
|
||||
Return CType(Me("frmValidatorPosition"), Global.System.Drawing.Point)
|
||||
Return CType(Me("frmValidatorPosition"),Global.System.Drawing.Point)
|
||||
End Get
|
||||
Set(value As Global.System.Drawing.Point)
|
||||
Set
|
||||
Me("frmValidatorPosition") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
@@ -2,9 +2,6 @@
|
||||
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" GeneratedClassNamespace="My" GeneratedClassName="MySettings" UseMySettingsClassName="true">
|
||||
<Profiles />
|
||||
<Settings>
|
||||
<Setting Name="errormessage" Roaming="true" Type="System.String" Scope="User">
|
||||
<Value Profile="(Default)" />
|
||||
</Setting>
|
||||
<Setting Name="ConnectionString" Type="(Connection string)" Scope="Application">
|
||||
<DesignTimeValue Profile="(Default)"><?xml version="1.0" encoding="utf-16"?>
|
||||
<SerializableConnectionString xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
|
||||
|
||||
@@ -1,4 +1,6 @@
|
||||
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraBars.Navigation.OfficeNavigationBar, DevExpress.XtraBars.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraNavBar.NavBarControl, DevExpress.XtraNavBar.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraPdfViewer.PdfViewer, DevExpress.XtraPdfViewer.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v15.2, Version=15.2.16.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
|
||||
@@ -7,7 +7,7 @@ Public Class frmError
|
||||
End Sub
|
||||
|
||||
Private Sub frmError_Load(sender As Object, e As System.EventArgs) Handles Me.Load
|
||||
Me.txterror.Text = My.Settings.errormessage
|
||||
Me.txterror.Text =errormessage
|
||||
Me.Label1.Focus()
|
||||
Me.Timer1.Start()
|
||||
End Sub
|
||||
|
||||
26
app/DD_PM_WINDREAM/frmKonfig.Designer.vb
generated
26
app/DD_PM_WINDREAM/frmKonfig.Designer.vb
generated
@@ -58,6 +58,7 @@ Partial Class frmKonfig
|
||||
Me.txtServer = New System.Windows.Forms.TextBox()
|
||||
Me.TabPage3 = New System.Windows.Forms.TabPage()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.txtIntervall = New System.Windows.Forms.TextBox()
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.btnopenlog = New System.Windows.Forms.Button()
|
||||
Me.chkLogErrorsOnly = New System.Windows.Forms.CheckBox()
|
||||
@@ -70,7 +71,6 @@ Partial Class frmKonfig
|
||||
Me.TBPM_KONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.TBPM_KONFIGURATIONTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TBPM_KONFIGURATIONTableAdapter()
|
||||
Me.TableAdapterManager = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager()
|
||||
Me.txtIntervall = New System.Windows.Forms.TextBox()
|
||||
Me.TabControl1.SuspendLayout()
|
||||
Me.TabPage1.SuspendLayout()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
@@ -449,14 +449,24 @@ Partial Class frmKonfig
|
||||
Me.Label7.TabIndex = 45
|
||||
Me.Label7.Text = "Minuten"
|
||||
'
|
||||
'txtIntervall
|
||||
'
|
||||
Me.txtIntervall.DataBindings.Add(New System.Windows.Forms.Binding("Text", Global.DD_PM_WINDREAM.My.MySettings.Default, "IntervallReminder", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged))
|
||||
Me.txtIntervall.Location = New System.Drawing.Point(8, 162)
|
||||
Me.txtIntervall.Name = "txtIntervall"
|
||||
Me.txtIntervall.Size = New System.Drawing.Size(38, 25)
|
||||
Me.txtIntervall.TabIndex = 44
|
||||
Me.txtIntervall.Text = Global.DD_PM_WINDREAM.My.MySettings.Default.IntervallReminder
|
||||
Me.txtIntervall.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.AutoSize = True
|
||||
Me.Label6.Location = New System.Drawing.Point(5, 142)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(164, 17)
|
||||
Me.Label6.Size = New System.Drawing.Size(159, 17)
|
||||
Me.Label6.TabIndex = 43
|
||||
Me.Label6.Text = "Hinweis Intervall Taskleiste:"
|
||||
Me.Label6.Text = "Intervall Popup-Reminder:"
|
||||
'
|
||||
'btnopenlog
|
||||
'
|
||||
@@ -557,16 +567,6 @@ Partial Class frmKonfig
|
||||
Me.TableAdapterManager.TBPM_USERTableAdapter = Nothing
|
||||
Me.TableAdapterManager.UpdateOrder = DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
|
||||
'
|
||||
'txtIntervall
|
||||
'
|
||||
Me.txtIntervall.DataBindings.Add(New System.Windows.Forms.Binding("Text", Global.DD_PM_WINDREAM.My.MySettings.Default, "IntervallReminder", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged))
|
||||
Me.txtIntervall.Location = New System.Drawing.Point(8, 162)
|
||||
Me.txtIntervall.Name = "txtIntervall"
|
||||
Me.txtIntervall.Size = New System.Drawing.Size(38, 25)
|
||||
Me.txtIntervall.TabIndex = 44
|
||||
Me.txtIntervall.Text = Global.DD_PM_WINDREAM.My.MySettings.Default.IntervallReminder
|
||||
Me.txtIntervall.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
|
||||
'
|
||||
'frmKonfig
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 17.0!)
|
||||
|
||||
202
app/DD_PM_WINDREAM/frmMain.Designer.vb
generated
202
app/DD_PM_WINDREAM/frmMain.Designer.vb
generated
@@ -1,9 +1,9 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class frmMain
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
@@ -20,7 +20,7 @@ Partial Class frmMain
|
||||
'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()> _
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMain))
|
||||
@@ -34,23 +34,32 @@ Partial Class frmMain
|
||||
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
|
||||
Me.ToolStripLabel1 = New System.Windows.Forms.ToolStripLabel()
|
||||
Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.tsbtnStartValidation = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.tstrpbtn_Config = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.tsbtnrefresh = New System.Windows.Forms.ToolStripButton()
|
||||
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
|
||||
Me.tsstlblUser = New System.Windows.Forms.ToolStripStatusLabel()
|
||||
Me.tslblLicenses = New System.Windows.Forms.ToolStripStatusLabel()
|
||||
Me.tslblUserLoggedin = New System.Windows.Forms.ToolStripStatusLabel()
|
||||
Me.tslblVersion = New System.Windows.Forms.ToolStripStatusLabel()
|
||||
Me.tsslblLastSysnc = New System.Windows.Forms.ToolStripStatusLabel()
|
||||
Me.Panel1 = New System.Windows.Forms.Panel()
|
||||
Me.lblViewType = New System.Windows.Forms.Label()
|
||||
Me.NavBarControl1 = New DevExpress.XtraNavBar.NavBarControl()
|
||||
Me.NavBarGroupProfiles = New DevExpress.XtraNavBar.NavBarGroup()
|
||||
Me.NavBarGroupMore = New DevExpress.XtraNavBar.NavBarGroup()
|
||||
Me.NavBarItemOverview = New DevExpress.XtraNavBar.NavBarItem()
|
||||
Me.NavBarItemDashboard = New DevExpress.XtraNavBar.NavBarItem()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.GridControlProfile = New DevExpress.XtraGrid.GridControl()
|
||||
Me.ContextMenuGrid = New System.Windows.Forms.ContextMenuStrip(Me.components)
|
||||
Me.CMGroupStart = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.CMFileStart = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.GridViewProfile = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon(Me.components)
|
||||
Me.Timer = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.TimerRefresh = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.VWPM_PROFILE_USERBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
Me.VWPM_PROFILE_USERTableAdapter = New DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.VWPM_PROFILE_USERTableAdapter()
|
||||
Me.TBPM_USERBindingSource = New System.Windows.Forms.BindingSource(Me.components)
|
||||
@@ -65,7 +74,9 @@ Partial Class frmMain
|
||||
Me.ToolStrip1.SuspendLayout()
|
||||
Me.StatusStrip1.SuspendLayout()
|
||||
Me.Panel1.SuspendLayout()
|
||||
CType(Me.NavBarControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridControlProfile, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.ContextMenuGrid.SuspendLayout()
|
||||
CType(Me.GridViewProfile, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.VWPM_PROFILE_USERBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.TBPM_USERBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
@@ -113,10 +124,11 @@ Partial Class frmMain
|
||||
'
|
||||
'ToolStrip1
|
||||
'
|
||||
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripLabel1, Me.ToolStripSeparator2, Me.tsbtnStartValidation, Me.ToolStripButton2, Me.ToolStripButton1, Me.ToolStripSeparator1, Me.tstrpbtn_Config, Me.ToolStripSeparator3, Me.tsbtnrefresh})
|
||||
Me.ToolStrip1.Font = New System.Drawing.Font("Tahoma", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripLabel1, Me.ToolStripSeparator2, Me.ToolStripButton2, Me.ToolStripButton1, Me.ToolStripSeparator1, Me.tstrpbtn_Config, Me.tsbtnrefresh})
|
||||
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.ToolStrip1.Name = "ToolStrip1"
|
||||
Me.ToolStrip1.Size = New System.Drawing.Size(889, 25)
|
||||
Me.ToolStrip1.Size = New System.Drawing.Size(915, 25)
|
||||
Me.ToolStrip1.TabIndex = 2
|
||||
Me.ToolStrip1.Text = "ToolStrip1"
|
||||
'
|
||||
@@ -132,15 +144,6 @@ Partial Class frmMain
|
||||
Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
|
||||
Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'tsbtnStartValidation
|
||||
'
|
||||
Me.tsbtnStartValidation.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.GoToDeclaration_5576
|
||||
Me.tsbtnStartValidation.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.tsbtnStartValidation.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.tsbtnStartValidation.Name = "tsbtnStartValidation"
|
||||
Me.tsbtnStartValidation.Size = New System.Drawing.Size(179, 22)
|
||||
Me.tsbtnStartValidation.Text = "Bearbeitungsvorgang starten"
|
||||
'
|
||||
'ToolStripButton2
|
||||
'
|
||||
Me.ToolStripButton2.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
|
||||
@@ -158,7 +161,7 @@ Partial Class frmMain
|
||||
Me.ToolStripButton1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
|
||||
Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.ToolStripButton1.Name = "ToolStripButton1"
|
||||
Me.ToolStripButton1.Size = New System.Drawing.Size(131, 22)
|
||||
Me.ToolStripButton1.Size = New System.Drawing.Size(132, 22)
|
||||
Me.ToolStripButton1.Text = "Grundeinstellungen"
|
||||
'
|
||||
'ToolStripSeparator1
|
||||
@@ -173,15 +176,10 @@ Partial Class frmMain
|
||||
Me.tstrpbtn_Config.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.puzzle2
|
||||
Me.tstrpbtn_Config.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.tstrpbtn_Config.Name = "tstrpbtn_Config"
|
||||
Me.tstrpbtn_Config.Size = New System.Drawing.Size(138, 22)
|
||||
Me.tstrpbtn_Config.Size = New System.Drawing.Size(141, 22)
|
||||
Me.tstrpbtn_Config.Text = "Verwaltungs-Konsole"
|
||||
Me.tstrpbtn_Config.Visible = False
|
||||
'
|
||||
'ToolStripSeparator3
|
||||
'
|
||||
Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
|
||||
Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 25)
|
||||
'
|
||||
'tsbtnrefresh
|
||||
'
|
||||
Me.tsbtnrefresh.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.refresh_16xLG
|
||||
@@ -192,10 +190,11 @@ Partial Class frmMain
|
||||
'
|
||||
'StatusStrip1
|
||||
'
|
||||
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsstlblUser, Me.tslblLicenses, Me.tslblUserLoggedin, Me.tslblVersion})
|
||||
Me.StatusStrip1.Location = New System.Drawing.Point(0, 351)
|
||||
Me.StatusStrip1.Font = New System.Drawing.Font("Tahoma", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsstlblUser, Me.tslblLicenses, Me.tslblUserLoggedin, Me.tslblVersion, Me.tsslblLastSysnc})
|
||||
Me.StatusStrip1.Location = New System.Drawing.Point(0, 323)
|
||||
Me.StatusStrip1.Name = "StatusStrip1"
|
||||
Me.StatusStrip1.Size = New System.Drawing.Size(889, 25)
|
||||
Me.StatusStrip1.Size = New System.Drawing.Size(915, 25)
|
||||
Me.StatusStrip1.TabIndex = 3
|
||||
Me.StatusStrip1.Text = "StatusStrip1"
|
||||
'
|
||||
@@ -206,7 +205,7 @@ Partial Class frmMain
|
||||
Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
|
||||
Me.tsstlblUser.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.user
|
||||
Me.tsstlblUser.Name = "tsstlblUser"
|
||||
Me.tsstlblUser.Size = New System.Drawing.Size(140, 20)
|
||||
Me.tsstlblUser.Size = New System.Drawing.Size(146, 20)
|
||||
Me.tsstlblUser.Text = "ToolStripStatusLabel1"
|
||||
'
|
||||
'tslblLicenses
|
||||
@@ -216,7 +215,7 @@ Partial Class frmMain
|
||||
Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
|
||||
Me.tslblLicenses.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.key
|
||||
Me.tslblLicenses.Name = "tslblLicenses"
|
||||
Me.tslblLicenses.Size = New System.Drawing.Size(114, 20)
|
||||
Me.tslblLicenses.Size = New System.Drawing.Size(116, 20)
|
||||
Me.tslblLicenses.Text = "Anzahl Lizenzen:"
|
||||
'
|
||||
'tslblUserLoggedin
|
||||
@@ -226,7 +225,7 @@ Partial Class frmMain
|
||||
Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
|
||||
Me.tslblUserLoggedin.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.group_key
|
||||
Me.tslblUserLoggedin.Name = "tslblUserLoggedin"
|
||||
Me.tslblUserLoggedin.Size = New System.Drawing.Size(127, 20)
|
||||
Me.tslblUserLoggedin.Size = New System.Drawing.Size(133, 20)
|
||||
Me.tslblUserLoggedin.Text = "Angemeldete User:"
|
||||
'
|
||||
'tslblVersion
|
||||
@@ -235,36 +234,142 @@ Partial Class frmMain
|
||||
Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _
|
||||
Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
|
||||
Me.tslblVersion.Name = "tslblVersion"
|
||||
Me.tslblVersion.Size = New System.Drawing.Size(124, 20)
|
||||
Me.tslblVersion.Size = New System.Drawing.Size(130, 20)
|
||||
Me.tslblVersion.Text = "ToolStripStatusLabel1"
|
||||
'
|
||||
'tsslblLastSysnc
|
||||
'
|
||||
Me.tsslblLastSysnc.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _
|
||||
Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _
|
||||
Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
|
||||
Me.tsslblLastSysnc.Image = CType(resources.GetObject("tsslblLastSysnc.Image"), System.Drawing.Image)
|
||||
Me.tsslblLastSysnc.Name = "tsslblLastSysnc"
|
||||
Me.tsslblLastSysnc.Size = New System.Drawing.Size(159, 20)
|
||||
Me.tsslblLastSysnc.Text = "Letzte Synchronisation: "
|
||||
'
|
||||
'Panel1
|
||||
'
|
||||
Me.Panel1.Controls.Add(Me.lblViewType)
|
||||
Me.Panel1.Controls.Add(Me.NavBarControl1)
|
||||
Me.Panel1.Controls.Add(Me.Label1)
|
||||
Me.Panel1.Controls.Add(Me.GridControlProfile)
|
||||
Me.Panel1.Controls.Add(Me.ToolStrip1)
|
||||
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.Panel1.Font = New System.Drawing.Font("Tahoma", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Panel1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.Panel1.Name = "Panel1"
|
||||
Me.Panel1.Size = New System.Drawing.Size(889, 351)
|
||||
Me.Panel1.Size = New System.Drawing.Size(915, 323)
|
||||
Me.Panel1.TabIndex = 4
|
||||
'
|
||||
'lblViewType
|
||||
'
|
||||
Me.lblViewType.AutoSize = True
|
||||
Me.lblViewType.BackColor = System.Drawing.SystemColors.GradientActiveCaption
|
||||
Me.lblViewType.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblViewType.Location = New System.Drawing.Point(242, 37)
|
||||
Me.lblViewType.Name = "lblViewType"
|
||||
Me.lblViewType.Size = New System.Drawing.Size(75, 16)
|
||||
Me.lblViewType.TabIndex = 6
|
||||
Me.lblViewType.Text = "Ansicht-Typ"
|
||||
'
|
||||
'NavBarControl1
|
||||
'
|
||||
Me.NavBarControl1.ActiveGroup = Me.NavBarGroupProfiles
|
||||
Me.NavBarControl1.Dock = System.Windows.Forms.DockStyle.Left
|
||||
Me.NavBarControl1.Groups.AddRange(New DevExpress.XtraNavBar.NavBarGroup() {Me.NavBarGroupProfiles, Me.NavBarGroupMore})
|
||||
Me.NavBarControl1.Items.AddRange(New DevExpress.XtraNavBar.NavBarItem() {Me.NavBarItemOverview, Me.NavBarItemDashboard})
|
||||
Me.NavBarControl1.Location = New System.Drawing.Point(0, 25)
|
||||
Me.NavBarControl1.Name = "NavBarControl1"
|
||||
Me.NavBarControl1.OptionsNavPane.ExpandedWidth = 236
|
||||
Me.NavBarControl1.Size = New System.Drawing.Size(236, 298)
|
||||
Me.NavBarControl1.TabIndex = 5
|
||||
Me.NavBarControl1.Text = "NavBarControl1"
|
||||
'
|
||||
'NavBarGroupProfiles
|
||||
'
|
||||
Me.NavBarGroupProfiles.Caption = "Profilübersicht"
|
||||
Me.NavBarGroupProfiles.Expanded = True
|
||||
Me.NavBarGroupProfiles.GroupStyle = DevExpress.XtraNavBar.NavBarGroupStyle.LargeIconsText
|
||||
Me.NavBarGroupProfiles.LargeImage = CType(resources.GetObject("NavBarGroupProfiles.LargeImage"), System.Drawing.Image)
|
||||
Me.NavBarGroupProfiles.Name = "NavBarGroupProfiles"
|
||||
'
|
||||
'NavBarGroupMore
|
||||
'
|
||||
Me.NavBarGroupMore.Caption = "Weitere Ansichten"
|
||||
Me.NavBarGroupMore.Expanded = True
|
||||
Me.NavBarGroupMore.GroupStyle = DevExpress.XtraNavBar.NavBarGroupStyle.LargeIconsText
|
||||
Me.NavBarGroupMore.ItemLinks.AddRange(New DevExpress.XtraNavBar.NavBarItemLink() {New DevExpress.XtraNavBar.NavBarItemLink(Me.NavBarItemOverview), New DevExpress.XtraNavBar.NavBarItemLink(Me.NavBarItemDashboard)})
|
||||
Me.NavBarGroupMore.LargeImage = CType(resources.GetObject("NavBarGroupMore.LargeImage"), System.Drawing.Image)
|
||||
Me.NavBarGroupMore.Name = "NavBarGroupMore"
|
||||
'
|
||||
'NavBarItemOverview
|
||||
'
|
||||
Me.NavBarItemOverview.Caption = "Gesamtübersicht"
|
||||
Me.NavBarItemOverview.LargeImage = CType(resources.GetObject("NavBarItemOverview.LargeImage"), System.Drawing.Image)
|
||||
Me.NavBarItemOverview.Name = "NavBarItemOverview"
|
||||
'
|
||||
'NavBarItemDashboard
|
||||
'
|
||||
Me.NavBarItemDashboard.Caption = "Dashboard"
|
||||
Me.NavBarItemDashboard.LargeImage = CType(resources.GetObject("NavBarItemDashboard.LargeImage"), System.Drawing.Image)
|
||||
Me.NavBarItemDashboard.Name = "NavBarItemDashboard"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Font = New System.Drawing.Font("Tahoma", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label1.ImageAlign = System.Drawing.ContentAlignment.TopLeft
|
||||
Me.Label1.Location = New System.Drawing.Point(507, 25)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(405, 28)
|
||||
Me.Label1.TabIndex = 4
|
||||
Me.Label1.Text = "Doppelklicken Sie auf eine Datei um nur diese zu validieren." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Doppelklicken Sie a" &
|
||||
"uf ein Profil um alle enthaltenen Dateien zu validieren." & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10)
|
||||
Me.Label1.TextAlign = System.Drawing.ContentAlignment.TopRight
|
||||
'
|
||||
'GridControlProfile
|
||||
'
|
||||
Me.GridControlProfile.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.GridControlProfile.ContextMenuStrip = Me.ContextMenuGrid
|
||||
Me.GridControlProfile.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GridControlProfile.Location = New System.Drawing.Point(12, 28)
|
||||
Me.GridControlProfile.Location = New System.Drawing.Point(242, 56)
|
||||
Me.GridControlProfile.MainView = Me.GridViewProfile
|
||||
Me.GridControlProfile.Name = "GridControlProfile"
|
||||
Me.GridControlProfile.Size = New System.Drawing.Size(865, 311)
|
||||
Me.GridControlProfile.Size = New System.Drawing.Size(670, 264)
|
||||
Me.GridControlProfile.TabIndex = 3
|
||||
Me.GridControlProfile.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewProfile})
|
||||
'
|
||||
'ContextMenuGrid
|
||||
'
|
||||
Me.ContextMenuGrid.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.CMGroupStart, Me.CMFileStart})
|
||||
Me.ContextMenuGrid.Name = "ContextMenuStrip1"
|
||||
Me.ContextMenuGrid.Size = New System.Drawing.Size(254, 48)
|
||||
'
|
||||
'CMGroupStart
|
||||
'
|
||||
Me.CMGroupStart.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.database_go
|
||||
Me.CMGroupStart.Name = "CMGroupStart"
|
||||
Me.CMGroupStart.Size = New System.Drawing.Size(253, 22)
|
||||
Me.CMGroupStart.Text = "Validierungung für Gruppe starten"
|
||||
'
|
||||
'CMFileStart
|
||||
'
|
||||
Me.CMFileStart.Image = Global.DD_PM_WINDREAM.My.Resources.Resources.email_go
|
||||
Me.CMFileStart.Name = "CMFileStart"
|
||||
Me.CMFileStart.Size = New System.Drawing.Size(253, 22)
|
||||
Me.CMFileStart.Text = "Validierung für Datei starten"
|
||||
'
|
||||
'GridViewProfile
|
||||
'
|
||||
Me.GridViewProfile.Appearance.GroupPanel.BackColor = System.Drawing.SystemColors.Control
|
||||
Me.GridViewProfile.Appearance.GroupPanel.Font = New System.Drawing.Font("Tahoma", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GridViewProfile.Appearance.GroupPanel.Options.UseBackColor = True
|
||||
Me.GridViewProfile.Appearance.GroupPanel.Options.UseFont = True
|
||||
Me.GridViewProfile.Appearance.GroupRow.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GridViewProfile.Appearance.GroupRow.Options.UseFont = True
|
||||
Me.GridViewProfile.Appearance.Row.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.GridViewProfile.Appearance.Row.Options.UseFont = True
|
||||
GridFormatRule1.Name = "Format0"
|
||||
@@ -283,10 +388,10 @@ Partial Class frmMain
|
||||
Me.GridViewProfile.OptionsSelection.EnableAppearanceFocusedRow = False
|
||||
Me.GridViewProfile.OptionsSelection.EnableAppearanceHideSelection = False
|
||||
Me.GridViewProfile.OptionsSelection.MultiSelect = True
|
||||
Me.GridViewProfile.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect
|
||||
Me.GridViewProfile.OptionsView.ColumnAutoWidth = False
|
||||
Me.GridViewProfile.OptionsView.EnableAppearanceEvenRow = True
|
||||
Me.GridViewProfile.OptionsView.ShowAutoFilterRow = True
|
||||
Me.GridViewProfile.OptionsView.ShowGroupPanel = False
|
||||
Me.GridViewProfile.OptionsView.ShowHorizontalLines = DevExpress.Utils.DefaultBoolean.[True]
|
||||
'
|
||||
'NotifyIcon1
|
||||
@@ -296,9 +401,9 @@ Partial Class frmMain
|
||||
Me.NotifyIcon1.Text = "Process Manager"
|
||||
Me.NotifyIcon1.Visible = True
|
||||
'
|
||||
'Timer
|
||||
'TimerRefresh
|
||||
'
|
||||
Me.Timer.Interval = 60000
|
||||
Me.TimerRefresh.Interval = 60000
|
||||
'
|
||||
'VWPM_PROFILE_USERBindingSource
|
||||
'
|
||||
@@ -341,12 +446,12 @@ Partial Class frmMain
|
||||
'
|
||||
'frmMain
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(9.0!, 21.0!)
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(9.0!, 19.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(889, 376)
|
||||
Me.ClientSize = New System.Drawing.Size(915, 348)
|
||||
Me.Controls.Add(Me.Panel1)
|
||||
Me.Controls.Add(Me.StatusStrip1)
|
||||
Me.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Font = New System.Drawing.Font("Tahoma", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.KeyPreview = True
|
||||
Me.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
|
||||
@@ -360,7 +465,9 @@ Partial Class frmMain
|
||||
Me.StatusStrip1.PerformLayout()
|
||||
Me.Panel1.ResumeLayout(False)
|
||||
Me.Panel1.PerformLayout()
|
||||
CType(Me.NavBarControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridControlProfile, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ContextMenuGrid.ResumeLayout(False)
|
||||
CType(Me.GridViewProfile, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.VWPM_PROFILE_USERBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.TBPM_USERBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
@@ -377,13 +484,12 @@ Partial Class frmMain
|
||||
Friend WithEvents ImageListProfile As System.Windows.Forms.ImageList
|
||||
Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip
|
||||
Friend WithEvents ToolStripLabel1 As System.Windows.Forms.ToolStripLabel
|
||||
Friend WithEvents tsbtnStartValidation As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip
|
||||
Friend WithEvents tsstlblUser As System.Windows.Forms.ToolStripStatusLabel
|
||||
Friend WithEvents Panel1 As System.Windows.Forms.Panel
|
||||
Friend WithEvents ToolStripButton1 As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents NotifyIcon1 As System.Windows.Forms.NotifyIcon
|
||||
Friend WithEvents Timer As System.Windows.Forms.Timer
|
||||
Friend WithEvents TimerRefresh As System.Windows.Forms.Timer
|
||||
Friend WithEvents VWPM_PROFILE_USERBindingSource As System.Windows.Forms.BindingSource
|
||||
Friend WithEvents VWPM_PROFILE_USERTableAdapter As DD_PM_WINDREAM.DD_DMSLiteDataSetTableAdapters.VWPM_PROFILE_USERTableAdapter
|
||||
Friend WithEvents tstrpbtn_Config As System.Windows.Forms.ToolStripButton
|
||||
@@ -398,10 +504,20 @@ Partial Class frmMain
|
||||
Friend WithEvents tslblLicenses As System.Windows.Forms.ToolStripStatusLabel
|
||||
Friend WithEvents tslblUserLoggedin As System.Windows.Forms.ToolStripStatusLabel
|
||||
Friend WithEvents tsbtnrefresh As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator3 As System.Windows.Forms.ToolStripSeparator
|
||||
Friend WithEvents ToolStripButton2 As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents tslblVersion As System.Windows.Forms.ToolStripStatusLabel
|
||||
Friend WithEvents TimerReminder As System.Windows.Forms.Timer
|
||||
Friend WithEvents GridControlProfile As DevExpress.XtraGrid.GridControl
|
||||
Friend WithEvents GridViewProfile As DevExpress.XtraGrid.Views.Grid.GridView
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents ContextMenuGrid As ContextMenuStrip
|
||||
Friend WithEvents CMGroupStart As ToolStripMenuItem
|
||||
Friend WithEvents CMFileStart As ToolStripMenuItem
|
||||
Friend WithEvents NavBarControl1 As DevExpress.XtraNavBar.NavBarControl
|
||||
Friend WithEvents NavBarGroupProfiles As DevExpress.XtraNavBar.NavBarGroup
|
||||
Friend WithEvents NavBarGroupMore As DevExpress.XtraNavBar.NavBarGroup
|
||||
Friend WithEvents NavBarItemOverview As DevExpress.XtraNavBar.NavBarItem
|
||||
Friend WithEvents NavBarItemDashboard As DevExpress.XtraNavBar.NavBarItem
|
||||
Friend WithEvents lblViewType As Label
|
||||
Friend WithEvents tsslblLastSysnc As ToolStripStatusLabel
|
||||
End Class
|
||||
|
||||
@@ -125,7 +125,7 @@
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
|
||||
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
|
||||
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAADw
|
||||
CAAAAk1TRnQBSQFMAgEBAgEAAVABAgFQAQIBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
|
||||
CAAAAk1TRnQBSQFMAgEBAgEAAZABAgGQAQIBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
|
||||
AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
|
||||
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
|
||||
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
|
||||
@@ -184,10 +184,192 @@
|
||||
<metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>1015, 17</value>
|
||||
</metadata>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="tsslblLastSysnc.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
|
||||
xAAADsQBlSsOGwAAAMhJREFUOE+lksENwyAMRTMKI2SG3LkzQMZCyjLNMnCgvXB1/ZHd0sZpmybSk4xj
|
||||
P0PCQESnMJNHeAby1FodszCFIQExck7KbAEXjCmlEmMk7z1N09RAjJyIRlMAOwrmeX5pDCE81ngnEmcJ
|
||||
FkzRxvWy0rXcGoh1R7KTxRIULdJmxL1E5ajdCHLOrQBb1qZeAHQAC7hlR4CiXqBgrd/DFFhH6Pl6BE6e
|
||||
/oib3/jOx9+oFwkFmKITAWKZvH+R9IGdOX6V/8VM/g4Nd1V+xlTSTXpaAAAAAElFTkSuQmCC
|
||||
</value>
|
||||
</data>
|
||||
<data name="NavBarGroupProfiles.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
|
||||
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAALdEVYdFRpdGxlAFNhbGU76FnfrwAACeVJREFUWEfF
|
||||
lwdUlFcWx8e2bmJBKQISFVEEEhVRseCCJipSRDEYCyJqbPQZLBBHBAUETMQ2CLFgS+EIIlgCioigwFBk
|
||||
AJUuRZEuShMbOf+975uRDB6yuzm75+w75zIz3zfzfv//vfe998ED8H+N/9Xo00v829FDgORHM15OmCnv
|
||||
/vEFvOyQr3hZx+bxMo/M5YmD/8FL+8GIdy9oFi9l/0xekq8hz3GiQh/RKi2lCCc9fpSLXk602+eVkc56
|
||||
IT9v0bY+YDNGkabrR9FXFt2i/E3V6OWP0UNATtgiXvuzhH8ZBO57edukmdGCiecTAue+eRDjjMfJh1ER
|
||||
8zWa79nj8WVrXBca4LTd2Lsh32j6Bi757EuaeoAsPojqzk4PAfdDTXuFtj2N4131mKIQv3uq01VP/dzc
|
||||
X9egMmknarL8UZHiC0lsIMRHTVAeZYFnv1mj4dZyNCSuQEXsMtw7ZALRqrEd+75STdxlrLLH2VBRh1BM
|
||||
CCeipwBKvTyYpfn23pnTE/ZOP303eMGrsnhn1Gb4oDE3EJUpe5DxiwOST21FQqgbrvrMQ+aZlcg++w3y
|
||||
I1ahMMoWhZEr8Dh2NSqurELVtbWo+c0GPvPUGHEgBctETwHZIfM5cLz3DIXkgNkOib4zJPkRdqi8sx2N
|
||||
OX5oygtAgyQA1eJAgrujs/43dFRHob38NFqKDuJF7l40ifloSNmCukR71N5YiZp4G9Rcs0L1tZUQ79GC
|
||||
cI4KI35KwbLQQ0Cf1ENzp6YFm5zIOm7e/iTFCw15oWitikUbRXt1HFqq4tFYFIOy1HAkntpG8Et4+cgP
|
||||
zTk70Ji+BfXJBL21gqDLUHPdCs+uWaI23hYFwbqQCEcgyUUFnrOUGHEwRQ8BrB59qePRUHAez8viUJNx
|
||||
CE9ue6DiBh9lV9ejJGYdHlywQuYxY9zcY4D475ejrfIsmiUeaMp0JPg6gjPHUnhd4gaUhBkgb58acner
|
||||
ImenCm47kIAZiow4hKI/A8sL6J9BAl7VBqH1aTg6mvLR0ViIjuJQdGSuQ1v6KjQn2qA62gLZx4wgPrMJ
|
||||
LcVHCO5EKV/fDW9IdkD5BSM8OvAZ8v3UkbtXDTm7RiBrhzISScD26cOw20L3vpeF7kX3BeNZKbhmZH8G
|
||||
ZBw2wbvGA3hXv5/Cn96H4vfOh8D7FnTVRqM9YzPq45YgN8wYBVe240XePoJvQB3BG1P5eBpjiYIjo/Eo
|
||||
aBQeBozk3EuEqsgm95nuJGCrEgRTh2GnqXaw56IJjkILnXOMywSwjhxIGw7eNQRx8Le1+/CmZi9eP92N
|
||||
19X78b7tHtDVhrc1t1AatRZVd32p4QRoSN2Bmlu2KD45DkWiMSg4NIoEyNx7k3uhCuc+Q6CEW5uV4Gag
|
||||
gLWzRn9pPlFtzB5L3ZfEZf3ACfgk/aAR3tX5402tXze8s2oXXpXvoFK4o71kB940xOJlfQka804QnPrj
|
||||
vA5KT41HUZgmwaXu8wM05NwrI0tAAlwVcXODIlz0FTDk7/015oxX0vSy0Gsj7nAmgHXkoLTvjcg5wWsZ
|
||||
3FsG34mOEoIX89Fa6IzW/K1425yO8ktf4PGvuig9NwHFP45DYQhzTwICNXq4zyb3mW5KEDtJBThNVmBd
|
||||
p0FZWOZhpiORFzAkNWg2CSB4NYMLpfAyATnno00Gb8n+Fm8bkwj+Oee+5CP3D0kA5373CM49qz1zn7Z1
|
||||
OOLXKcJhEidAWzB//KVNxpo+9H4QE8CWhMK9wJlS+BMhOis8CL4N7UUCKfwhwe9T52etx+vaeDy+QO7D
|
||||
taXuj/ZSe0/qfEr9MSdTzN4QAkN7EabaHoK+TSAMjBaLhBa6DcqDB2oTl9sPmIDhKfsN8ZrgryplcHLe
|
||||
+shF6lxC8Pvr0JxuRwKjUSrvXtb5+YHU+T4Ep3XP3IucTWH1XSzczpSDf7YCruEl2HhYjC3Ll2LpXKN4
|
||||
YiozOBtsKSjd8Z2OzkpPdJSypmPOCf7AQQrPXo8XGWvw/N5qdDz+CaVn5Gp/8A/3Em/adMi9PPzbsDLM
|
||||
c7+Cacv9YLV6G/h2K6A11wVD1CeNIi63D/yNQjVp7zSanLbYUgE1nKs07bkyuNgOz1NXo/HOChJ2Quo+
|
||||
dKy09mzT8Ze6Z51/zNUUiz1j4XKqBPZHH8HS7z4MVh6E+yJ9eK61hoVrOLTmuWOw+sTx8gLUE70NqONl
|
||||
zhlcspnSvoGc23POmwjekGBDJTkicz9a6j7gQ+1VIeIv4uAOYQVwFGXA+0wW3ENSscwjCvpLvWG5ORhr
|
||||
/OKhacLHIBVddjRzAtjxqJHgNQVtBcy5E1pzt3Dwl2KCp9riefJKgi9H3Q1rvMgOQNFxuc4n9xJyLxIs
|
||||
4tLufLIEDkczkF9Wjyd1L9HV9TuEoXexxCsB9oFJsNp1HaONnPGp8oRuAVwGbu7WRzXt6y255DxHCm9O
|
||||
s0VTCm21t2xQH2+NWjpam9P2oJA1XrBs2fmoQ7TNjJzHYGvYI6wIFOPALzl4WteCaWtPorXjNc5dz4Ox
|
||||
WyzFZehZ+UFJ1+owMYd+EMCtgsBVY11jPSY/zwk3RVOaHT1irZY6p0OIweuuWKE2xhxNyTu63T/wGwnR
|
||||
djPOueOPhQiKyENRVTMWCi7j7bsuOH4fh8t3imDkEAFjl0scXFnX8hjxVCj6yZ+GrAzKUzUHG4bYa8XG
|
||||
CaegNNISjYnLUX/za9ReWUJwS9RELqLPzty6Z+4ldNpZbtqPraEPYXc4Dz/dKOCcG64/i9ziGogiM2Hk
|
||||
dBHGrgRfTHAdCxFxRlD0U/5idY8HEnYesFIMo9DcaDJi85l1WjW3/WfgySV6sIhejGcXzVAdsZDEbOqu
|
||||
fZaXGn510sHCTYdg4ZMOr1NivHvfxdW+/Fkz7H2vYY5LlDTtOuYhNLcqRb+1+67yPhbABssEKwc7p1WV
|
||||
B/c38DJX//n8Ru2u7CNz8PQnU1Sdn49n0fZ03GogQ6iGu9tUEbFGGRtnju2cvvJAp63/bfCPJGFXaDIW
|
||||
8iMxx/GiFD7B4jibk4KD9yrgspsue2Ei5LOhZao71NbffGRJpLMuCo8b0wPHN0gXjkSiuxqOLib4ZIWs
|
||||
MUMHWCqONbLRX+b3cp7gCkz41HAu0QT3Zc5DaR72D0E3vFcBUc46vJLIxbziCAv2UT4b7MeTvzUcHvaD
|
||||
1ci3cd/NRvRmVXgZK3ZYjhsURPcmUTB3w5TGmyzQM9vVYkx117Pyh5K2eRhdV6foAe9VQKTjBN4vm8bx
|
||||
zq/X4oXbabJLH2dj3CTVgdaCmcPFztOGibWGDTCna1qye2w7Z98dpDB6hpmG4cZmpQnmLO0cnMF6i497
|
||||
4M8GE8JOLZYNtnzGyIIdJuwayxT7Dhvs9RMK1ulMGLv3p+M/FcAGm5gFm5AtWRYfwB/gf3n8FQHy47+C
|
||||
yg8AvH8CqUB0J/cNlPoAAAAASUVORK5CYII=
|
||||
</value>
|
||||
</data>
|
||||
<data name="NavBarItemOverview.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
|
||||
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAWdEVYdFRpdGxlAE1lcmdlQ2VsbHM7R3JpZDtXCQuc
|
||||
AAAGmklEQVRYR8WX91MUZxjHL4kxxhJr6v9gd8SGJUZE0Rgz+SlOflNRFFsYVCQIDor0chztODh6UQF7
|
||||
lyq9qBlnMiYmGaMRURQF6TNPnu/z7u4dJKP5IWNu5uPz7i7u5/u8797unomI/ldMyVe/MfHnLY233xC6
|
||||
Tz4YvMOMZN5jRr2C91/D6H8BzvMuowcxjQgt9HCzXFjfmHDpa7JcXE88pvjzX5H53DqKY2LPfEkxp9dS
|
||||
9Kk1FFniQRHFqym8aDWFHXenpJxaSsyupQQNS1Y1WTIZrcZnVJM547oQZ6+i6NSypsDwY+5aCAkw8lDm
|
||||
stbS26H0458Zwi0Du3ATPEgXbjxIoxv306jlvo3SLmyk/v5Bgz6nWlpzV6ozvczde08p2lb+iL2YMcyC
|
||||
adShzKUiPHFzPRW0rKX8Zo2mNUJukwflNXpQbuNqymkAq4SgzMXU+XKAOrv7ueoM0AuuhWdv0Yuufh6r
|
||||
bZ2evkGKSq3gq880lsHSm0YH2REgnQo0YR5oRHWSNippVoM7ZdUrAu2u1NmlBJCLUKT9VHD6pmNb4zmD
|
||||
AJEp5QgwzghwMH2xTK102bRaSTWy61dpsLRuJWXWuTMrKaPOjQLSFg3pDgK95p26IVXRp9FP3X0DFJZc
|
||||
igAf6AHGBNhceV1TlZS7zTY65aoJdWlGrRvZa9wonfFPXSAnle46dZkS5pxs4X191MGgYh/G3b2DFJp4
|
||||
TQ8wQgL4W12p+b5VOlXTqwuZ2pVkZ6mIhRUsX0Fp1cvJzzqfO22hXJaBnJPNlFPCtaSZsosdZBU1UWZR
|
||||
I2WeaKTzZT9RiOUqAozXA4z1S15ETfeSZXp1qS6ETPEFSxU2lqdeX077kudRT++AgM5UVWQXN9FLjHsG
|
||||
6GXPIKONed9h8+WhAfYlLKTGe0lklynWhbp0uSG1VX/OYqYKLCPfRBeZVvAMvOhn1DiDu5XxMLo4RHDc
|
||||
JQSYoAcY52uZT/X3Eh3SGkhZyF2KUFhGVpZaq5ZSioaPZa4SGwEUT3lsP9bA41569py3AfZz7erpp0Mx
|
||||
FxFgohHAxzyf6n63OKaXO7VpnVpZnMLilEqWMsmgYgmzmPaY5xhSETuRVlhvSNul9hoBAqPODwnwwfcx
|
||||
86juN7N0ahVUtymVgGWaNKlyMSWWL2G4VrjS7tjZSixdsoA7boeQSc2vU3LeD3AcFUsQEHkOASYxuB2b
|
||||
xu+KdqGaX+OUlKc2WaTokqXcKUhkEspdWe5KCWWuZGF2Rs+STm0ssxXUi9SaX6vIU6Tk1VBKLpNTQ8kM
|
||||
xv7hZ4cG2BExl6rvxqqpFbGzlGFZQtkikVpKF1F86ULBO3KW0SF44jSGqL2D9znxmHnBt22/0DMIMFkP
|
||||
MME7bA5V/RIlwiRMr9apRaQKCM061xZQHLMtfMbfJDpJ2dUs7BEpth8/U+BOuf/oaQSYYgTwOjqHKn6O
|
||||
MKZWpOi0jDu9prrVpcLV+RR7dR5tDZ0+RAqZLk3gx7GMRdxDbai8jQB7Q04NCTBxy5HZVH4ngkWO6YXQ
|
||||
IYVQSVFjuEZfcSHPo9Pl5CJG1WQQWTKrRNomchxT4Lbte7gEAT7UA0zaHDyLyu6EsxBTrHe5gGJFPI+F
|
||||
LL3ClaUg+rILRTGbQ6YaJ2+TbrUxY7FXGnLwSGq3zIBPcPHQABuDZtCBBDe5qr2Z7ZEzaXvETF7jmeTF
|
||||
67w1bDptCZ1GniHTWDqNNh2ZKmwMniqdWjIqhXiWmtMryMw1Lh1UOEgrp1hbuRzfE1SEAB8xeA00Tcb3
|
||||
Ei8V+oUC9OSJWdeNroCMn3bLGMK2p9wd4G3nGptWobbbFa0y7qYOXoLdgScQ4GMjAL6XKsAwESNrif/M
|
||||
DK/oTCQG3UrINdZWxlLeZqRKEBVg18GhAab4hZ2RACLXTob1QqfoUk48TISTGl3qx1nQyqDyy6eM8Xeo
|
||||
D7VjCLAj4BgCfGIEwPcSFwfkEDtO2i1rqYQ8jXwCHNNrTGq5EuBvIcBYE0VZS40xePhE0dHZS94/SABj
|
||||
Bib4Bhe3ttx+IG8t+hsNkqLiolH7sc+xHxUXldrnTK/UaA4gj2p+VujgudFw6w/y8svHW7FxJxy9wTPs
|
||||
250BhY938cWB9dkJAo7zVB2XtN7+oJC2M9sOFDjwK8DJyGt/Pm0V8oQt+0AueXL13MsV+ObSZmaTT9bj
|
||||
dRsCv2Ov8VaMR+IYBg8HfDUwNcPBer2KT1/DZxoY4w4IObqXHyb4Bz8QsANgXf5L8HNPB9twoHN4JQA+
|
||||
+sabRH3+6Sfzm4NMfwGEtsDMLfHtDQAAAABJRU5ErkJggg==
|
||||
</value>
|
||||
</data>
|
||||
<data name="NavBarItemDashboard.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
|
||||
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAPdEVYdFRpdGxlAEJhck9mUGllO7hVPVUAAAf4SURB
|
||||
VFhHvZdZUFTZGcfJOJuzZalJHvOQhzwklap5sSqjJpWlMknGiZPggqIzUUZFZBPBEQFZZbMBAUFFEGVr
|
||||
oIVmaWj2RRRkRxih2USWQaCh6WZv1n/Od+69dI/LVMxDqPrV953z3f7+/3PvuQsW4t9rjC2vwOv/I2+I
|
||||
UE59fsCweC1Z2VKVmtuG7yOFyHkBSoqtSCaULycpW6KFk6horBZNWGxJvNOM//dfnLweTJvOhsXrNxWC
|
||||
gZWVdSyvrIlIOUVzhLrR7BjKjSw3Los1Fr+PjY0NXEt9QAbe5AbiM5uwwQyYC7wILsKjAJ9/pvnSC+LS
|
||||
8qo4priKdWbgqrmBG+mNzBXEprQSYTUcEjOPrIFUE5qLGAURLmYUx3xOjDQn1shAbHIdGXiLDLwRJ28Q
|
||||
DDzT3JQL85vNxfqiGElgkc3TeFEUXJTmNnOBBTKwvoErSbUmA9fT6rkB+qGRIQkIKxFy+rGwEtGE1JzX
|
||||
nheSWCCWhLhIkUEGom7fMxmg60EGyL3QUBDSj46jW3EH9f7+qLC1RcXxY6j380Nnmhy6oRGTACGKUFRU
|
||||
+SJCsQ/hmXsRlmEJWbol0sq8WG0F84srWGMGIhNryMDbZODN2JQ6vjPNXT8uKUWjjze646/jaZEKhqY6
|
||||
DuWauGt44OGB7uwczLGGXJyaiyv0TfgrhqdLMKQrxqCuiKGGa+ROVl/hx3MDN++aDMQk1/KNwRvNLaFZ
|
||||
Fob2cBkmilXQV5VgqigX2jwFR8dyfXUxxovy0RIaAu8btdDPLbOVrfLVER7X/oyO0QSUadwYrnj4bRwc
|
||||
Ln3Ma2RgdW0DEfHVZGArGXgrml0Pui60ikcpqWiXhWKqVAVtbgbGM5MxoUjCuCKZ51J8cicdTZ0jCM9o
|
||||
Q1RmK28s4Rb1ezQNRaPwG3sUdJxC4+Bl2AZuw9zCCma5gXWE3TAzEJUoGNA+HsR9V1d8q0jDuDwRT1Pj
|
||||
McZ4mpqAsRQhJ3oTb0DdNISafgNym5/CIbwS7b1aLj7LRJxk21HbHwJlqw2yW47iXl8gbHw/4jWCDMiu
|
||||
V5oMRN6s4delIykFHWEhGEtLwOitWIwmMm5dFaKIJi4GeQ8GUN6jh6JlAjntWsgy2xApb+bNZxgng7ah
|
||||
UuON9AZryBsOolzjiS+8fsNrxMrqOkKvVZCBd8jA2xEJd7mBShdX9EZdwkjcZYxcf57OKxHIuteHoi4d
|
||||
UhrHNrla0gdrj3zMzAsCVRc+g3FYjYXu2xzjUCFKv/4EBlYnlpmBkNhyk4Fwdj3W2MYoOGCNPt+zGAhw
|
||||
x1BUMIajQzbpC/ZCas1jqB5NIrFulHOTEVU1jPDSAXxiJ4dWvwTD3AoT+wsWOhMw2xCA2Xp/LDyKh9rl
|
||||
D7zGDbCnbXBMGRl4lwxsDYur4jszf58VNG4n0eN6Aj0s9l9wwUDgeTy55INen7PIfqjF1bvDiK4cwqWy
|
||||
QQSoB+Cn7odvXi/+dDwFkzNL0M8vc7H5jljM1F7gzD+MQb79dna3rHDIQGB0qclAcGwZvy5Fx0+i1f4o
|
||||
epy/Qjdx2oZBuQ0eHt3Lxb3z++CtMoONXW63YLdzBqZnlzE9s8zEdmCuOQKG6nOcuaYwKI9v47XpWSN/
|
||||
svpeLiYD73EDgVdKuav6yBjc/+pLaByPPEfbl5aIqRqCZ27vcxyVVeJ8VMWmgPLENszUBUFf6oLp0tOY
|
||||
uR+AzCMfQTdjZMcY2cNuDT7h6k0D71xkp4MMDHd0Q221H23HrKE59QU09gJdjLbDnyOqchDuOd1wV/aw
|
||||
yGDRMakNf3fMRDW7LXXMAImQmKHaC7pCO+hUdjBUekB+6Ne8RtAD70IYN/A+N+AfWcxet+v8FNYEy1B+
|
||||
YC++sbVGl90hdJ0krNF68DNcLn+Cs1ndcMvSMLrhkv4I//RQwTFIvdlcZzAijYnpS9wwlWODSaUNpovO
|
||||
IGX/LzFlWGIIBrzCCjcNvOtHBtg3AJ0e7eQs1PbOKLH8HC1H9qHT9iA6TxxAi9UuvtvPKLo4tvFN2PV1
|
||||
DvY4ZWB4bJY3lgRITKdywKTiMLSZhzGVZ4dblr/AJLtLJtkx9Nj2DFWZDPhEFPGNQe5pFRPMRJVfEJSf
|
||||
foqKPbvRcMgSjXv/hou53fh3dC12exZgp00STvmpMDI+hylqrBcMTLIet0lMeQxauRUm0vZjMtsGCbt/
|
||||
zm9TOm6ODIRwAx+Qgfe82YagjWG+Cor9je2o9AtG5j/+heTf/RG/2hWF31rFwSlQjYr6J0zYyAX5yjYx
|
||||
ItV5P4J3/gwhO36K4B0fImj7h0h22MMNEPTIPh+cbzLgJSvkr2ESlk6TsCqhoXlzQvudOaHpy1nkcUIc
|
||||
U6RHtnsQN/BDMvC+p6yAbwyp2X/fXGJRFJCiKZ/gUcqFMT2uzwXmmhkILeAfE1JDqYn0o2fnTWPz5t/N
|
||||
x4npJSGyOYoTNJ4WDJy9yA38iBvwCMnnXysvEjM1fVlOkcTMEMeSoPkcoWfvA7eAnE0DH9D1oJ1pai42
|
||||
FpvwKDWlKNaEhmYiZnNjYj6mY5jVKKf3hZu/0nQGzgXl8S8V6YOBw8bS+1vCwOMyi8vs1StgEKGm9GnG
|
||||
ozk0xzFyplk+zeIZP5OBrU5e8ruu/jlwZa4EstkB2XBhB7n4ZcHFl+GThdM+d+BMeDMuKODkrYAji4SD
|
||||
V6aAZwbsPYh02LP8FIuc8+mwI9zlHJvTCfeYNn8b0r/m9GlE9yTtSoKcvQo/fgV+wqDfMHGLLf8BKVH4
|
||||
p8+ug0MAAAAASUVORK5CYII=
|
||||
</value>
|
||||
</data>
|
||||
<data name="NavBarGroupMore.LargeImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
iVBORw0KGgoAAAANSUhEUgAAACAAAAAgCAYAAABzenr0AAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
|
||||
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAAXdEVYdFRpdGxlAFByb2R1Y3Q7UHJvZHVjdHM7c0vM
|
||||
pAAACNJJREFUWEfFV3lcT+kePsLYyoSmaeEqtO9psRUjkmUywhQyolSKaRCNFkmWiKGUTK4xKbkVVwta
|
||||
SXW1WiptSpvSooWiLHe6z3zfU5mRX/+Mz2fu9/N5Tuf3vud9n+/2PufEAfi/QuDgYCAbQhBifwXN/xXw
|
||||
l1z/eVzOSUMu6ycDLvPobC7jyAwu7ZA+l7pfl0vxnN5PPJwg7LtmymJV6dESdD+mb2xIsKUsF2Q+mfNf
|
||||
OYk7YSrNHV0i+RHRYOAvOX5zufZHIR+BjEX72WSxkeMDN8ltSzlmUled7oPQzfLdp9bKxjkbS1nTvDhB
|
||||
hD1HGNL1+DjnYyLxEdFg4C/ZJwz/TMqiHUoYaWc8UT7sB03/jMAV3VW39qD5/iHQM8gJt0NFvB0yTi7E
|
||||
aQuZ9r2LpaIsp49fS2ukCGMJvDMDyQSBv2T/NIee54mHEcb42SguinbVS8wLseypy/REfeY+lEY7ofBf
|
||||
W1ASvRfRHibIPmuF/Ev2KL1ij+wAU0Q4qMN7vni7o974SybThL+mfUYPJBMEZnx95aTGiIZu13BK9Dao
|
||||
LKBNG3K9+YgZGHnn4yh0lJ7H84eBaLt/FK25nmjJ3I3mjO/RdNsWjTet0Ji8DnXxFjhno8R2niiIcCCY
|
||||
fRbjruOTFWjaWZ3hw6d4IFjUHWUX8DR+xaBoSFyFtpztqI22gIfBF2znaYIIB4KZcPrhGXjVdA2tldGo
|
||||
e/AzavL8UZ5+FPmxrrgT4oAol0V4URQkkJihJXMbGpJsUBSgjQJfFbjOFmM7ywkiHAhmoumH9fGmwRvv
|
||||
2sLQ87oAPa/u4PWzy2h7FIzqTB+kBWxAe/6xj4gbU23QlL4DZb/MQpG/OgqPqyLfRwkuMyewnRUEEQ4E
|
||||
s/G3D+ridb0nup+4o6t2H962RZMjpehujkdzgR/yLzuhNc/rD+KUDWjOdMPjcCOU/qyN4kANPDyhhoKj
|
||||
yrh3UAG79MeznVUITCfYiRr0RDATS92vg64aN3RV78HLyt3orHDGy8d7yZEkvHv5CC3FIWjJ+hENyZZo
|
||||
yduPmmgzVJzXQ9nZ6Sg5rYkiPyI/poK7BxVxx10OBxdJIMRW9kGo7ZQsT1NJU+J4rxMBq6Q5v+VS3LGl
|
||||
vVrBTPzmPm0i3sUTdz7ajs4yJ3QUb6WOd6Tf3uh58wyt9w6hIcUaVRdnoCJEH4/+qYPSM1pEroF8qnu2
|
||||
lxKSXeQRu0OejqcDuhrTUB1vjQy/JQiwmHTf3kBsDXGJEUYShHyX/OGARIqnFk/cUfo9XjDiQgc8L7BH
|
||||
+/3NaL1rjTetWaiOmo3KS7PwOFQf5ed1UEKpL/TXQJ6PCm65KSLeRRGFkY5EnE6On8azO84oj5yPtw0X
|
||||
0F5wAClHjHFomUSRhaYoU08mWKMJTGk5qSQPTTwvciTiLdRstmi7R8R5m9Cas4FSvx7djcmojpiFyrAZ
|
||||
KP9Vj6KfTuSaSPNWQZK7MkqubP2AmOHpTSfk+umgKtkDVYnuqEpwRVG4DSIcdeA6U7TWVFHEnriZanIT
|
||||
49000P6AiCna1txNaMnegGeZ60lk1lCXm+NV7VVUhs9ExQVK/bne1Of5quGmlyraS3zxpu0u6m87oSrm
|
||||
G1ReXYqKy8ZErjuoeJVHrUeA2WQojOI0mAP/uOGiRpNWFO135L1lL3GaORpvraKON0Nn+YW+1OuiLJga
|
||||
L1AT2YdVkOKpiu7avdS81LCt1/Fb10O8a72Cd00XKXLPj8SrIXE1BTKPAtDG/vm8WLGTwslc26WK5v8Q
|
||||
cboFyeq3RLySOp4WJS1H/Y1lfATlIbp86kuCqPHozGcfUEaShwpeVbriZYUL9RA1cZk73rak4beObN6B
|
||||
fvGqv2GGmiuL+fXs2JYEacJrHu+AGnNgcuxOFTSlUrQ3+4gTiPj6MtTFLUFdjAn1w2GU86mnMx/Qe+az
|
||||
qOsT3ZTxsmwXOkp2kpNOeJ6/lfqHGvihJ57kxKHtgS+exC4n5/VRdo7Ig3vJ2R775vJqqc4cmHDSckpC
|
||||
0l4tVEQtIuKlqI9dzBPX/nsBai4bUUlc35/5hyfV+TOfuU8BCa5KeNFH3H7fgcpoS2W0oTJuxKsn11AV
|
||||
YURNS2Vjzp9l5JQ9JlqUQU9D3gFN5gBTK6l1M8V+CLaa2pJ+RJeOHBFHGaEm4itUU80ak7ehtC/1/XKb
|
||||
6jIN1+notVPEPHG2NZVxI/XOd1TCteisjOwt2y865Lw237hMMYtOqVMQanCfw8u1Vr8YsPMoIiY8TMt5
|
||||
oURMuJ1cz4MAfVSFGaAy1AD1cVaUNoq+T27jtsnCSW/c22u7FPiIe4nXE/E6PE02R338KjwvPtdLzvqG
|
||||
1Z0at5+cBeE2m3dAk3cgYos8VxP5FXOEz8Y8ORFrLxPJuugdiuS9PmVjJSmeOnIPKeHMamlYqYwtkxwz
|
||||
dG3MDgU8TVmLBor4abIF6hNWoe76CjyJMSXlPNmrlsFafOn43qE9Co+rINJeBnban9cQlyzvQLjtNK76
|
||||
oiFH0TInWDbYB6eypZZo+PHlkv9NPzwTCbvl4DH3izcLZccE0ZwiYcKB1RN/vOqs1F0cZoK6aytQG2uK
|
||||
GtKB6ssmaLrjhTL2oqKmKyJy9r5gkZ/5VhrmyiLpw4WGsK/dUbwDYZumcuc3yHJn18nQ1+0k7pSZNM3x
|
||||
n2cSyuIjzB10xxXZTRctkvl8+Dc0xj5C2RxftmUaokaBlpNLbh3UQWWkCTWeMUm2EWVmO990LPIifzWS
|
||||
bGUcWfzl/xbIjg6kdVMJI/jys8tgIGOfa0yzJxKYV+z+/auV3RNGEGR2LhAPCbeX68kPmoWKUEPUxm2i
|
||||
ujNydSTvkYeroVi3ktiIzfTsl4Rhu/XG9e7Rv9mngIy988WNFUWsfZZLPkt0V0VV5EoUE/lFGxk46o2r
|
||||
EP5MiDUZ036hD9b++cengIxlQ1hy7DC9LbMmpP66cSr8VkjCTFkkYqgQp0pzIwWuEzT4V8E+Nsj4knyt
|
||||
JOI8Y9Io9r8CGxzuNmeCwDUCBz8VZKwkowjMmQ9SPhACB/9OCBz8+wDud0IUucB3M2m1AAAAAElFTkSu
|
||||
QmCC
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="ContextMenuGrid.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>392, 95</value>
|
||||
</metadata>
|
||||
<metadata name="NotifyIcon1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>1132, 17</value>
|
||||
</metadata>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="NotifyIcon1.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAwAMDAQAAEABABoBgAAxgAAACAgEAABAAQA6AIAAC4HAAAYGBAAAQAEAOgBAAAWCgAAEBAQAAEA
|
||||
@@ -691,8 +873,8 @@
|
||||
AAAAAAAAAAAAAAADAAAAAQAAwAEAAMADAADAAwAAwAMAAMADAADgAwAA/gMAAA==
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="Timer.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>1247, 17</value>
|
||||
<metadata name="TimerRefresh.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>1219, 17</value>
|
||||
</metadata>
|
||||
<metadata name="VWPM_PROFILE_USERBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>1329, 17</value>
|
||||
|
||||
@@ -5,17 +5,26 @@ Imports System.Globalization
|
||||
Imports DevExpress.Utils
|
||||
Imports DevExpress.XtraGrid.Views.Grid.ViewInfo
|
||||
Imports DevExpress.XtraGrid.Views.Grid
|
||||
Imports DevExpress.XtraGrid
|
||||
Imports System.Collections.ObjectModel
|
||||
Imports DevExpress.XtraNavBar
|
||||
Imports DevExpress.XtraGrid.Columns
|
||||
Imports DevExpress.Images
|
||||
|
||||
Public Class frmMain
|
||||
Private _windreamPM As ClassPMWindream
|
||||
Private UserLoggedin As Integer = 0
|
||||
Private PROFILE_COUNT As Integer = 0
|
||||
Private DTPROFIL As DataTable
|
||||
Private DT_VWPM_PROFILE_ACTIVE As DataTable
|
||||
Private CURR_DT_VWPM_PROFILE_ACTIVE As DataTable
|
||||
Private CURR_DT_PROFILEGRID As DataTable
|
||||
|
||||
|
||||
Private RedDocuments As Integer = 0
|
||||
Private YellowDocuments As Integer = 0
|
||||
Private GreenDocuments As Integer = 0
|
||||
Private GridViewItem_Clicked = Nothing
|
||||
Private GridCursorLocation As Point
|
||||
Private GRID_LOAD_TYPE As String = "OVERVIEW"
|
||||
|
||||
Private Sub frmProfiles_FormClosing(sender As Object, e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
|
||||
Try
|
||||
@@ -97,7 +106,7 @@ Public Class frmMain
|
||||
|
||||
Try
|
||||
tsstlblUser.Text = Environment.UserName
|
||||
LoadProfile_PM()
|
||||
Decide_Load()
|
||||
Catch ex As System.Exception
|
||||
MsgBox("Fehler bei Laden des Formulars: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:")
|
||||
End Try
|
||||
@@ -105,7 +114,10 @@ Public Class frmMain
|
||||
MsgBox("Definieren Sie wo UniversalViewer abgelegt wurde!", MsgBoxStyle.Critical, "Fehlende Konfiguration")
|
||||
frmKonfig.ShowDialog()
|
||||
End If
|
||||
Timer.Start()
|
||||
If TimerRefresh.Enabled = False Then
|
||||
TimerRefresh.Start()
|
||||
End If
|
||||
Load_Profile_items()
|
||||
|
||||
Check_Timer_Notification()
|
||||
Restore_Form_Position()
|
||||
@@ -155,79 +167,249 @@ Public Class frmMain
|
||||
End Try
|
||||
End Function
|
||||
Private Function GetXML_LayoutName()
|
||||
Dim Filename As String = String.Format("GridViewProfiles_UserLayout.xml")
|
||||
Dim Filename As String = String.Format("GridViewProfiles_UserLayout_{0}.xml", GRID_LOAD_TYPE)
|
||||
Return System.IO.Path.Combine(Application.UserAppDataPath(), Filename)
|
||||
End Function
|
||||
Sub Load_Profile_items()
|
||||
Cursor = Cursors.WaitCursor
|
||||
Try
|
||||
Dim CurrGroup As NavBarGroup = NavBarControl1.Groups(0)
|
||||
Try
|
||||
|
||||
CurrGroup.ItemLinks.Clear()
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("CurrGroupClear - Error: " & ex.Message)
|
||||
|
||||
End Try
|
||||
Load_Profiles_for_User()
|
||||
|
||||
For Each profile As DataRow In CURR_DT_VWPM_PROFILE_ACTIVE.Rows
|
||||
Dim item1 As NavBarItem = NavBarControl1.Items.Add()
|
||||
item1.Caption = profile.Item("TITLE")
|
||||
item1.Tag = "itmProfile#" & profile.Item("GUID").ToString
|
||||
|
||||
Dim _image As Image = Nothing
|
||||
_image = DevExpress.Images.ImageResourceCache.Default.GetImage("images/actions/add_16x16.png")
|
||||
item1.LargeImage = _image
|
||||
|
||||
NavBarControl1.Groups(0).ItemLinks.Add(item1)
|
||||
|
||||
AddHandler NavBarControl1.LinkClicked, AddressOf navBar_LinkClicked
|
||||
Next
|
||||
If GRID_LOAD_TYPE = "OVERVIEW" Then
|
||||
CurrGroup.Expanded = False
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Load_Profile_items - Error: " & ex.Message)
|
||||
MsgBox("Unexpected Error in Load_Profile_items - Error: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
Cursor = Cursors.Default
|
||||
End Sub
|
||||
Private Sub navBar_LinkClicked(ByVal sender As Object, ByVal e As NavBarLinkEventArgs)
|
||||
Dim _tag = e.Link.Item.Tag
|
||||
If Not IsNothing(_tag) Then
|
||||
If _tag.ToString.Contains("itmProfile#") Then
|
||||
_tag = _tag.ToString.Replace("itmProfile#", "")
|
||||
If IsNumeric(_tag) Then
|
||||
If CURRENT_CLICKED_PROFILE_ID <> _tag Then
|
||||
CURRENT_CLICKED_PROFILE_ID = _tag
|
||||
CURRENT_CLICKED_PROFILE_TITLE = e.Link.Item.Caption
|
||||
GRID_LOAD_TYPE = "PROFILE#" & CURRENT_CLICKED_PROFILE_ID.ToString
|
||||
Load_single_Profile()
|
||||
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
Sub Item_LinkClicked(sender As Object, e As NavBarLinkEventArgs)
|
||||
Try
|
||||
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Item_LinkClicked - Error: " & ex.Message)
|
||||
MsgBox("Unexpected Error in Item_LinkClicked - Error: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
Sub Load_Profiles_for_User()
|
||||
Try
|
||||
Dim sql = String.Format("SELECT T.* FROM VWPM_PROFILE_ACTIVE T, TBPM_PROFILE_USER T1, TBPM_USER T2 WHERE T.GUID = T1.PROFIL_ID AND T1.USER_ID = T2.GUID AND UPPER(T2.USERNAME) = UPPER('{0}')", Environment.UserName)
|
||||
CURR_DT_VWPM_PROFILE_ACTIVE = ClassDatabase.Return_Datatable(sql)
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Load_Profiles_for_User - Error: " & ex.Message)
|
||||
End Try
|
||||
End Sub
|
||||
Sub Load_single_Profile()
|
||||
|
||||
Try
|
||||
Load_Profiles_for_User()
|
||||
|
||||
Dim expression As String
|
||||
expression = "GUID = " & CURRENT_CLICKED_PROFILE_ID
|
||||
Dim TEMP_TABLE = CURR_DT_VWPM_PROFILE_ACTIVE
|
||||
Dim foundRows() As DataRow
|
||||
foundRows = TEMP_TABLE.Select(expression)
|
||||
Dim result = 0
|
||||
For i = 0 To foundRows.GetUpperBound(0)
|
||||
result += 1
|
||||
Next
|
||||
|
||||
If result = 1 Then
|
||||
lblViewType.Text = "Detailansicht Profil: " & CURRENT_CLICKED_PROFILE_TITLE
|
||||
Dim sql = foundRows(0)("SQL_VIEW")
|
||||
sql = sql.Replace("@USER", Environment.UserName)
|
||||
sql = sql.Replace("@MACHINE_NAME", Environment.MachineName)
|
||||
sql = sql.Replace("@DATE", Now.ToShortDateString)
|
||||
CURR_DT_PROFILEGRID = ClassDatabase.Return_Datatable(sql, True)
|
||||
|
||||
Create_Basic_View()
|
||||
GridViewProfile.RestoreLayoutFromXml(GetXML_LayoutName())
|
||||
GridView_CheckInvalidColumns()
|
||||
GridViewProfile.SaveLayoutToXml(GetXML_LayoutName())
|
||||
|
||||
End If
|
||||
|
||||
|
||||
|
||||
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Load_single_Profile - Error: " & ex.Message)
|
||||
End Try
|
||||
End Sub
|
||||
Sub Create_Basic_View()
|
||||
|
||||
GridControlProfile.DataSource = Nothing
|
||||
Try
|
||||
GridViewProfile.Columns.Clear()
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
' Spalte für Status Icon erstellen
|
||||
Dim columnStateIcon As New DataColumn()
|
||||
columnStateIcon.DataType = GetType(Image)
|
||||
columnStateIcon.ColumnName = "ICON"
|
||||
columnStateIcon.Caption = ""
|
||||
CURR_DT_PROFILEGRID.Columns.Add(columnStateIcon)
|
||||
|
||||
RedDocuments = 0
|
||||
YellowDocuments = 0
|
||||
GreenDocuments = 0
|
||||
|
||||
For Each row As DataRow In CURR_DT_PROFILEGRID.Rows
|
||||
Dim State As Integer = row.Item("TL_STATE")
|
||||
Select Case State
|
||||
Case 1
|
||||
RedDocuments += 1
|
||||
row.Item("ICON") = My.Resources.ampel_rot
|
||||
Case 2
|
||||
YellowDocuments += 1
|
||||
row.Item("ICON") = My.Resources.ampel_gelb
|
||||
Case 3
|
||||
GreenDocuments += 1
|
||||
row.Item("ICON") = My.Resources.ampel_gruen
|
||||
End Select
|
||||
Next
|
||||
|
||||
GridControlProfile.DataSource = CURR_DT_PROFILEGRID
|
||||
'GridControlProfile.ForceInitialize()
|
||||
|
||||
Try
|
||||
Dim XMLPath = GetXML_LayoutName()
|
||||
GridViewProfile.RestoreLayoutFromXml(XMLPath)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
GridViewProfile.Columns.Item("PROFILE_ID").Visible = False
|
||||
GridViewProfile.Columns.Item("GUID").Visible = False
|
||||
GridViewProfile.Columns.Item("FULL_FILE_PATH").Visible = False
|
||||
GridViewProfile.Columns.Item("DOC_ID").Visible = False
|
||||
GridViewProfile.Columns.Item("TL_STATE").Visible = False
|
||||
GridViewProfile.Columns.Item("ICON").MaxWidth = 24
|
||||
GridViewProfile.Columns.Item("ICON").MinWidth = 24
|
||||
GridViewProfile.Columns.Item("ICON").AppearanceCell.BackColor = Color.White
|
||||
GridViewProfile.Columns.Item("ICON").Fixed = DevExpress.XtraGrid.Columns.FixedStyle.Left
|
||||
GridViewProfile.Columns("Last edited").DisplayFormat.FormatType = FormatType.DateTime
|
||||
GridViewProfile.Columns("Last edited").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss"
|
||||
|
||||
End Sub
|
||||
Private Sub GridView_CheckInvalidColumns()
|
||||
Try
|
||||
For Each grid_column As GridColumn In GridViewProfile.Columns
|
||||
Dim GridDXCaption = grid_column.Caption
|
||||
Dim GridDXTextCaption = grid_column.GetTextCaption
|
||||
Dim GridDXColumnEditName = grid_column.ColumnEditName
|
||||
Dim GridDXFieldName = grid_column.FieldName
|
||||
|
||||
Dim exists As Boolean = False
|
||||
For Each col As DataColumn In CURR_DT_PROFILEGRID.Columns
|
||||
|
||||
If col.Caption = GridDXTextCaption Then
|
||||
exists = True
|
||||
Exit For
|
||||
End If
|
||||
Next
|
||||
If exists = False Then
|
||||
If grid_column.Visible = True Then
|
||||
Try
|
||||
grid_column.Dispose()
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End If
|
||||
|
||||
|
||||
End If
|
||||
Next
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Unexpected Error in GridView_CheckInvalidColumns: " & ex.Message)
|
||||
End Try
|
||||
End Sub
|
||||
Sub LoadProfile_PM()
|
||||
If TimerRefresh.Enabled = True Then
|
||||
TimerRefresh.Stop()
|
||||
End If
|
||||
|
||||
Try
|
||||
If Me.Visible = True And frmProfileDesigner.Visible = False Then
|
||||
DTPROFIL = ClassDatabase.Return_Datatable("SELECT * FROM TBPM_PROFILE WHERE GUID = " & CURRENT_ProfilGUID)
|
||||
DT_VWPM_PROFILE_ACTIVE = ClassDatabase.Return_Datatable("SELECT * FROM VWPM_PROFILE_ACTIVE")
|
||||
Load_Profiles_for_User()
|
||||
|
||||
PROFILE_COUNT = 0
|
||||
ClassInit.InitBasics()
|
||||
Dim sql = CURRENT_DT_CONFIG.Rows(0).Item("SQL_PROFILE_MAIN_VIEW")
|
||||
sql = sql.replace("@USER", Environment.UserName)
|
||||
sql = sql.replace("@MACHINE_NAME", Environment.MachineName)
|
||||
sql = sql.replace("@DATE", Now.ToShortDateString)
|
||||
sql = sql.Replace("@USER", Environment.UserName)
|
||||
sql = sql.Replace("@MACHINE_NAME", Environment.MachineName)
|
||||
sql = sql.Replace("@DATE", Now.ToShortDateString)
|
||||
'String.Format("SELECT '1' TL_STATE,T.PROFIL_ID,T1.TITLE, T.DOC_ID, T.FILE_PATH, T.DMS_ERSTELLT_DATE,[dbo].[FNPM_LAST_WORKUSER_DOC] (T.PROFIL_ID,T.DOC_ID) AS 'Last User',[dbo].[FNPM_LAST_EDITED_DOC] (T.PROFIL_ID,T.DOC_ID) as 'Last edited' FROM TBPM_PROFILE_FILES T, VWPM_PROFILE_USER T1 " &
|
||||
' "WHERE T.PROFIL_ID = T1.PROFIL_ID " &
|
||||
' "AND T1.ACTIVE = 1 And (UPPER(T1.USERNAME) = UPPER('{0}')) Order By T1.PRIORITY", Environment.UserName)
|
||||
Dim DTGRID As DataTable = ClassDatabase.Return_Datatable(sql, True)
|
||||
CURR_DT_PROFILEGRID = ClassDatabase.Return_Datatable(sql, True)
|
||||
|
||||
If Not IsNothing(DTGRID) Then
|
||||
' Spalte für Status Icon erstellen
|
||||
Dim columnStateIcon As New DataColumn()
|
||||
columnStateIcon.DataType = GetType(Image)
|
||||
columnStateIcon.ColumnName = "ICON"
|
||||
columnStateIcon.Caption = ""
|
||||
DTGRID.Columns.Add(columnStateIcon)
|
||||
If Not IsNothing(CURR_DT_PROFILEGRID) Then
|
||||
|
||||
RedDocuments = 0
|
||||
YellowDocuments = 0
|
||||
GreenDocuments = 0
|
||||
|
||||
For Each row As DataRow In DTGRID.Rows
|
||||
Dim State As Integer = row.Item("TL_STATE")
|
||||
Select Case State
|
||||
Case 1
|
||||
RedDocuments += 1
|
||||
row.Item("ICON") = My.Resources.ampel_rot
|
||||
Case 2
|
||||
YellowDocuments += 1
|
||||
row.Item("ICON") = My.Resources.ampel_gelb
|
||||
Case 3
|
||||
GreenDocuments += 1
|
||||
row.Item("ICON") = My.Resources.ampel_gruen
|
||||
End Select
|
||||
Next
|
||||
|
||||
GridControlProfile.DataSource = DTGRID
|
||||
'GridControlProfile.ForceInitialize()
|
||||
|
||||
Try
|
||||
Dim XMLPath = GetXML_LayoutName()
|
||||
GridViewProfile.RestoreLayoutFromXml(XMLPath)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
Create_Basic_View()
|
||||
|
||||
Try
|
||||
GridViewProfile.Columns.Item("PROFILE_GROUP_TEXT").GroupIndex = 0
|
||||
GridViewProfile.Columns.Item("PROFILE_GROUP_TEXT").Visible = False
|
||||
GridViewProfile.Columns.Item("PROFILE_ID").Visible = False
|
||||
GridViewProfile.Columns.Item("FULL_FILE_PATH").Visible = False
|
||||
GridViewProfile.Columns.Item("DOC_ID").Visible = False
|
||||
GridViewProfile.Columns.Item("ICON").MaxWidth = 24
|
||||
GridViewProfile.Columns.Item("ICON").MinWidth = 24
|
||||
GridViewProfile.Columns.Item("ICON").AppearanceCell.BackColor = Color.White
|
||||
GridViewProfile.Columns.Item("PROFILE_GROUP_COLOR").Visible = False
|
||||
For I = 0 To GridViewProfile.GroupCount - 1
|
||||
Dim v = GridViewProfile.GroupedColumns(I).ToString
|
||||
Dim ii = Nothing
|
||||
GridViewProfile.GroupedColumns(I).Tag = GridViewProfile.Columns.Item("PROFILE_ID")
|
||||
Next
|
||||
|
||||
|
||||
GridViewProfile.Columns("Last edited").DisplayFormat.FormatType = FormatType.DateTime
|
||||
GridViewProfile.Columns("Last edited").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss"
|
||||
|
||||
GridViewProfile.OptionsBehavior.AutoExpandAllGroups = True
|
||||
GridViewProfile.OptionsView.ShowGroupedColumns = False
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Unexpected Error in Formatting Grid: " & ex.Message)
|
||||
End Try
|
||||
GridView_CheckInvalidColumns()
|
||||
|
||||
GridViewProfile.SaveLayoutToXml(GetXML_LayoutName())
|
||||
|
||||
@@ -242,38 +424,18 @@ Public Class frmMain
|
||||
|
||||
|
||||
|
||||
Me.VWPM_PROFILE_USERTableAdapter.FillByActive(Me.DD_DMSLiteDataSet.VWPM_PROFILE_USER, Environment.UserName)
|
||||
Dim DT As DataTable = DD_DMSLiteDataSet.Tables("VWPM_PROFILE_USER")
|
||||
If LogErrorsOnly = False Then ClassLogger.Add("", False)
|
||||
|
||||
If DT.Rows.Count > 0 Then
|
||||
|
||||
For Each row As DataRow In DT.Rows
|
||||
' If LogErrorsOnly = False Then ClassLogger.Add("## Profil zugeordnet: " & row.Item("PROFIL_NAME"), False)
|
||||
Dim anz As Integer = TBPM_PROFILE_FILESTableAdapter.cmdGet_Anzahl(row.Item("PROFIL_ID"))
|
||||
If anz > 0 Then
|
||||
Dim img As Integer
|
||||
If CBool(row.Item("Active")) = True Then
|
||||
img = 0
|
||||
Else
|
||||
img = 1
|
||||
End If
|
||||
|
||||
PROFILE_COUNT += 1
|
||||
Else
|
||||
ClassLogger.Add(">> Keine Dateien für Profil '" & row.Item("TITLE").ToString & "' vorhanden!!", False)
|
||||
End If
|
||||
Next
|
||||
Else
|
||||
ClassLogger.Add(" >> KEINE PROFILE FÜR USER: '" & Environment.UserName & "' hinterlegt?!", False)
|
||||
MsgBox("KEINE PROFILE FÜR USER: '" & Environment.UserName & "' hinterlegt", MsgBoxStyle.Exclamation, "Achtung:")
|
||||
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("LoadProfile_PM - Fehler: " & ex.Message)
|
||||
MsgBox("Fehler LoadProfile_PM - Fehler: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:")
|
||||
End Try
|
||||
If TimerRefresh.Enabled = False Then
|
||||
TimerRefresh.Start()
|
||||
End If
|
||||
End Sub
|
||||
Private Function file_exists(ByVal _file As String)
|
||||
Try
|
||||
@@ -291,9 +453,6 @@ Public Class frmMain
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub tsbtnStartValidation_Click(sender As System.Object, e As System.EventArgs) Handles tsbtnStartValidation.Click
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub ToolStripButton1_Click(sender As System.Object, e As System.EventArgs) Handles ToolStripButton1.Click
|
||||
Try
|
||||
@@ -312,15 +471,28 @@ Public Class frmMain
|
||||
Me.Visible = True
|
||||
End Sub
|
||||
|
||||
Private Sub Timer_Tick(sender As System.Object, e As System.EventArgs) Handles Timer.Tick
|
||||
LoadProfile_PM()
|
||||
Private Sub Timer_Tick(sender As System.Object, e As System.EventArgs) Handles TimerRefresh.Tick
|
||||
Load_Profile_items()
|
||||
Decide_Load()
|
||||
tsslblLastSysnc.Text = "Letzte Synchronisation: " & Now.ToLongTimeString
|
||||
End Sub
|
||||
|
||||
Private Sub NotifyIcon1_Click(sender As System.Object, e As System.EventArgs) Handles NotifyIcon1.Click
|
||||
Me.BringToFront()
|
||||
Me.Visible = True
|
||||
End Sub
|
||||
Private Sub Decide_Load()
|
||||
Try
|
||||
If GRID_LOAD_TYPE = "OVERVIEW" Then
|
||||
Load_Grid_Overview()
|
||||
ElseIf GRID_LOAD_TYPE.StartsWith("PROFILE#") Then
|
||||
Load_single_Profile()
|
||||
End If
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
Private Sub ToolStripButton2_Click(sender As System.Object, e As System.EventArgs) Handles tstrpbtn_Config.Click
|
||||
Dim AdminSecurity As Boolean = False
|
||||
AdminSecurity = TBPM_KONFIGURATIONTableAdapter.cmdGetAdminSecurity()
|
||||
@@ -329,11 +501,14 @@ Public Class frmMain
|
||||
Else
|
||||
frmProfileDesigner.ShowDialog()
|
||||
End If
|
||||
LoadProfile_PM()
|
||||
Decide_Load()
|
||||
End Sub
|
||||
|
||||
Private Sub ToolStripButton2_Click_1(sender As Object, e As EventArgs) Handles tsbtnrefresh.Click
|
||||
LoadProfile_PM()
|
||||
Load_Profile_items()
|
||||
|
||||
Decide_Load()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub ToolStripButton2_Click_2(sender As Object, e As EventArgs)
|
||||
@@ -353,24 +528,14 @@ Public Class frmMain
|
||||
End Sub
|
||||
|
||||
Private Sub TimerReminder_Tick(sender As Object, e As EventArgs) Handles TimerReminder.Tick
|
||||
If PROFILE_COUNT > 0 Then NotifyIcon1.ShowBalloonTip(30000, "Validation-Reminder", "Sie haben unerledigte Dokumente in Ihrem Verantwortungsbereich.", ToolTipIcon.Info)
|
||||
If PROFILE_COUNT > 0 Then NotifyIcon1.ShowBalloonTip(30000, "ProcessManager-Reminder", "Sie haben unerledigte Dokumente in Ihrem Verantwortungsbereich.", ToolTipIcon.Info)
|
||||
End Sub
|
||||
|
||||
Private Sub frmMain_Shown(sender As Object, e As EventArgs) Handles Me.Shown
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Private Sub GridViewProfile_DoubleClick(sender As Object, e As EventArgs) Handles GridViewProfile.DoubleClick
|
||||
Try
|
||||
Dim PROFIL_ID = GridViewProfile.GetFocusedRowCellValue(GridViewProfile.Columns("PROFIL_ID"))
|
||||
If IsNumeric(PROFIL_ID) Then
|
||||
Load_Profil_from_Grid(PROFIL_ID)
|
||||
End If
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
Item_Scope()
|
||||
End Sub
|
||||
Sub Load_Profil_from_Grid(ID As Integer)
|
||||
Try
|
||||
@@ -378,26 +543,31 @@ Public Class frmMain
|
||||
CURRENT_ProfilGUID = ID
|
||||
CURRENT_ProfilName = ClassDatabase.Execute_Scalar("SELECT NAME FROM TBPM_PROFILE WHERE GUID = " & CURRENT_ProfilGUID, MyConnectionString)
|
||||
My.Settings.Save()
|
||||
If TimerRefresh.Enabled Then
|
||||
TimerRefresh.Stop()
|
||||
End If
|
||||
|
||||
frmValidator.ShowDialog()
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
Me.Visible = True
|
||||
LoadProfile_PM()
|
||||
Decide_Load()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub GridViewProfile_CustomDrawGroupRow(sender As Object, e As DevExpress.XtraGrid.Views.Base.RowObjectCustomDrawEventArgs) Handles GridViewProfile.CustomDrawGroupRow
|
||||
Dim info As GridGroupRowInfo = TryCast(e.Info, GridGroupRowInfo)
|
||||
Dim view As GridView = sender
|
||||
|
||||
Dim item As GridGroupSummaryItem = CType(view.GroupSummary(Tag), GridGroupSummaryItem)
|
||||
' Dim value As Object = view.GetGroupSummaryValue(e.RowHandle, item)
|
||||
|
||||
If info.Column.FieldName = "PROFILE_GROUP_TEXT" Then
|
||||
info.GroupText = info.GroupValueText
|
||||
|
||||
Dim _color As String
|
||||
|
||||
For Each row As DataRow In DT_VWPM_PROFILE_ACTIVE.Rows
|
||||
For Each row As DataRow In CURR_DT_VWPM_PROFILE_ACTIVE.Rows
|
||||
If row.Item("PROFILE_GROUP_TEXT") = info.GroupValueText Then
|
||||
_color = row.Item("PROFILE_GROUP_COLOR")
|
||||
End If
|
||||
@@ -409,7 +579,7 @@ Public Class frmMain
|
||||
Case "Green"
|
||||
info.Appearance.BackColor = Color.LightGreen
|
||||
Case "Yellow"
|
||||
info.Appearance.BackColor = Color.LightGoldenrodYellow
|
||||
info.Appearance.BackColor = Color.LightYellow
|
||||
Case Else
|
||||
info.Appearance.BackColor = Color.LightGray
|
||||
End Select
|
||||
@@ -450,19 +620,278 @@ Public Class frmMain
|
||||
End Sub
|
||||
|
||||
Private Sub GridViewProfile_MouseDown(sender As Object, e As MouseEventArgs) Handles GridViewProfile.MouseDown
|
||||
' Wir brauchen nur einen Doppelklick
|
||||
If e.Button <> MouseButtons.Left Or e.Clicks < 2 Then
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
Dim view As GridView = sender
|
||||
Dim hi As GridHitInfo = view.CalcHitInfo(e.Location)
|
||||
|
||||
GridCursorLocation = e.Location
|
||||
' wenn in eine Group Row Doppelt geklickt wurde..
|
||||
If hi.InGroupRow Then
|
||||
|
||||
' Ein/Ausklappen verhindern
|
||||
DXMouseEventArgs.GetMouseArgs(e).Handled = True
|
||||
GridViewItem_Clicked = "GROUP"
|
||||
|
||||
'Dim info = hi.Column.FieldName
|
||||
'Dim info1 = hi.ToString
|
||||
Dim msg = ""
|
||||
ElseIf hi.InDataRow Then
|
||||
GridViewItem_Clicked = "ROW"
|
||||
Else
|
||||
GridViewItem_Clicked = Nothing
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub ContextMenuGrid_Opening(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles ContextMenuGrid.Opening
|
||||
CMFileStart.Enabled = False
|
||||
CMGroupStart.Enabled = False
|
||||
Select Case GridViewItem_Clicked
|
||||
Case "GROUP"
|
||||
CMGroupStart.Enabled = True
|
||||
Case "ROW"
|
||||
CMFileStart.Enabled = True
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
Private Sub CMFileStart_Click(sender As Object, e As EventArgs) Handles CMFileStart.Click
|
||||
Item_Scope()
|
||||
End Sub
|
||||
Private Sub Item_Scope()
|
||||
Try
|
||||
CURRENT_JUMP_DOC_GUID = 0
|
||||
Dim hitInfo As GridHitInfo = GridViewProfile.CalcHitInfo(GridCursorLocation)
|
||||
Dim groupRowText
|
||||
Dim PROFIL_ID
|
||||
If hitInfo.InGroupRow Then
|
||||
GridViewItem_Clicked = "GROUP"
|
||||
groupRowText = GridViewProfile.GetGroupRowDisplayText(hitInfo.RowHandle)
|
||||
PROFIL_ID = GridViewProfile.GetRowCellValue(GridViewProfile.GetDataRowHandleByGroupRowHandle(hitInfo.RowHandle), GridViewProfile.Columns("PROFILE_ID"))
|
||||
ElseIf hitInfo.InDataRow Then
|
||||
GridViewItem_Clicked = "ROW"
|
||||
If GRID_LOAD_TYPE = "OVERVIEW" Then
|
||||
groupRowText = GridViewProfile.GetGroupRowDisplayText(GridViewProfile.GetParentRowHandle(hitInfo.RowHandle))
|
||||
PROFIL_ID = GridViewProfile.GetRowCellValue(GridViewProfile.GetDataRowHandleByGroupRowHandle(GridViewProfile.GetParentRowHandle(hitInfo.RowHandle)), GridViewProfile.Columns("PROFILE_ID"))
|
||||
Else
|
||||
PROFIL_ID = CURRENT_CLICKED_PROFILE_ID
|
||||
End If
|
||||
|
||||
Else
|
||||
Exit Sub
|
||||
End If
|
||||
Dim PROFIL_TITLE
|
||||
If GRID_LOAD_TYPE = "OVERVIEW" Then
|
||||
groupRowText = LTrim(RTrim(groupRowText.ToString.Replace("PROFILE_GROUP_TEXT: ", "")))
|
||||
Dim _SPLIT As String()
|
||||
_SPLIT = groupRowText.Split("|")
|
||||
PROFIL_TITLE = LTrim(RTrim(_SPLIT(0).ToString))
|
||||
Else
|
||||
|
||||
End If
|
||||
|
||||
|
||||
If Not IsNothing(PROFIL_ID) And IsNumeric(PROFIL_ID) Then
|
||||
|
||||
Dim expression As String
|
||||
expression = "PROFILE_ID = " & PROFIL_ID
|
||||
If hitInfo.InGroupRow Then
|
||||
CURRENT_JUMP_DOC_GUID = 0
|
||||
CURRENT_DOC_GUID = 0
|
||||
CURRENT_ProfilGUID = PROFIL_ID
|
||||
|
||||
|
||||
Load_Profil_from_Grid(PROFIL_ID)
|
||||
|
||||
ElseIf hitInfo.InDataRow Then
|
||||
Dim DOC_GUID = GridViewProfile.GetFocusedRowCellValue(GridViewProfile.Columns("GUID"))
|
||||
Dim DOC_ID = GridViewProfile.GetFocusedRowCellValue(GridViewProfile.Columns("DOC_ID"))
|
||||
If IsNothing(DOC_ID) Then Exit Sub
|
||||
Dim DOC_PATH = GridViewProfile.GetFocusedRowCellValue(GridViewProfile.Columns("FULL_FILE_PATH"))
|
||||
'Checking if table really contains one record with profile-id and docid
|
||||
expression = expression & " AND DOC_ID = " & DOC_ID
|
||||
Dim TEMP_TABLE = CURR_DT_PROFILEGRID
|
||||
Dim foundRows() As DataRow
|
||||
foundRows = TEMP_TABLE.Select(expression)
|
||||
Dim result = 0
|
||||
For i = 0 To foundRows.GetUpperBound(0)
|
||||
result += 1
|
||||
Next
|
||||
If result = 1 Then
|
||||
CURRENT_DOC_ID = DOC_ID
|
||||
CURRENT_JUMP_DOC_GUID = DOC_GUID
|
||||
CURRENT_DOC_GUID = CURRENT_JUMP_DOC_GUID
|
||||
CURRENT_DOC_PATH = DOC_PATH
|
||||
Load_Profil_from_Grid(PROFIL_ID)
|
||||
Else
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
|
||||
End If
|
||||
Catch ex As Exception
|
||||
MsgBox("Unexpected error in Item_Scope: " & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Sub
|
||||
Private Sub CMGroupStart_Click(sender As Object, e As EventArgs) Handles CMGroupStart.Click
|
||||
Item_Scope()
|
||||
End Sub
|
||||
|
||||
Private Sub NavBarItemOverview_LinkClicked(sender As Object, e As NavBarLinkEventArgs) Handles NavBarItemOverview.LinkClicked
|
||||
Load_Grid_Overview()
|
||||
End Sub
|
||||
Sub Load_Grid_Overview()
|
||||
GRID_LOAD_TYPE = "OVERVIEW"
|
||||
CURRENT_CLICKED_PROFILE_ID = 0
|
||||
lblViewType.Text = "Gesamtübersicht"
|
||||
Cursor = Cursors.WaitCursor
|
||||
Try
|
||||
Me.VWPM_PROFILE_USERTableAdapter.FillByActive(Me.DD_DMSLiteDataSet.VWPM_PROFILE_USER, Environment.UserName)
|
||||
Dim DT As DataTable = DD_DMSLiteDataSet.Tables("VWPM_PROFILE_USER")
|
||||
|
||||
If DT.Rows.Count = 0 Then
|
||||
ClassLogger.Add(" >> KEINE PROFILE FÜR USER: '" & Environment.UserName & "' hinterlegt?!", False)
|
||||
MsgBox("Keine Profile für Ihren User: '" & Environment.UserName & "' hinterlegt", MsgBoxStyle.Exclamation, "Achtung:")
|
||||
Cursor = Cursors.Default
|
||||
Exit Sub
|
||||
End If
|
||||
Load_Profiles_for_User()
|
||||
PROFILE_COUNT = 0
|
||||
ClassInit.InitBasics()
|
||||
Dim sql = CURRENT_DT_CONFIG.Rows(0).Item("SQL_PROFILE_MAIN_VIEW")
|
||||
sql = sql.Replace("@USER", Environment.UserName)
|
||||
sql = sql.Replace("@MACHINE_NAME", Environment.MachineName)
|
||||
sql = sql.Replace("@DATE", Now.ToShortDateString)
|
||||
'String.Format("SELECT '1' TL_STATE,T.PROFIL_ID,T1.TITLE, T.DOC_ID, T.FILE_PATH, T.DMS_ERSTELLT_DATE,[dbo].[FNPM_LAST_WORKUSER_DOC] (T.PROFIL_ID,T.DOC_ID) AS 'Last User',[dbo].[FNPM_LAST_EDITED_DOC] (T.PROFIL_ID,T.DOC_ID) as 'Last edited' FROM TBPM_PROFILE_FILES T, VWPM_PROFILE_USER T1 " &
|
||||
' "WHERE T.PROFIL_ID = T1.PROFIL_ID " &
|
||||
' "AND T1.ACTIVE = 1 And (UPPER(T1.USERNAME) = UPPER('{0}')) Order By T1.PRIORITY", Environment.UserName)
|
||||
CURR_DT_PROFILEGRID = ClassDatabase.Return_Datatable(sql, True)
|
||||
|
||||
If Not IsNothing(CURR_DT_PROFILEGRID) Then
|
||||
If CURR_DT_PROFILEGRID.Rows.Count = 0 Then
|
||||
MsgBox("Aktuell keine Workflowdaten vorhanden!", MsgBoxStyle.Information)
|
||||
GridControlProfile.DataSource = Nothing
|
||||
Try
|
||||
GridViewProfile.Columns.Clear()
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
Exit Sub
|
||||
End If
|
||||
' Spalte für Status Icon erstellen
|
||||
Dim columnStateIcon As New DataColumn()
|
||||
columnStateIcon.DataType = GetType(Image)
|
||||
columnStateIcon.ColumnName = "ICON"
|
||||
columnStateIcon.Caption = ""
|
||||
CURR_DT_PROFILEGRID.Columns.Add(columnStateIcon)
|
||||
|
||||
RedDocuments = 0
|
||||
YellowDocuments = 0
|
||||
GreenDocuments = 0
|
||||
|
||||
For Each row As DataRow In CURR_DT_PROFILEGRID.Rows
|
||||
Dim State As Integer = row.Item("TL_STATE")
|
||||
Select Case State
|
||||
Case 1
|
||||
RedDocuments += 1
|
||||
row.Item("ICON") = My.Resources.ampel_rot
|
||||
Case 2
|
||||
YellowDocuments += 1
|
||||
row.Item("ICON") = My.Resources.ampel_gelb
|
||||
Case 3
|
||||
GreenDocuments += 1
|
||||
row.Item("ICON") = My.Resources.ampel_gruen
|
||||
End Select
|
||||
Next
|
||||
|
||||
GridControlProfile.DataSource = CURR_DT_PROFILEGRID
|
||||
'GridControlProfile.ForceInitialize()
|
||||
|
||||
Try
|
||||
Dim XMLPath = GetXML_LayoutName()
|
||||
GridViewProfile.RestoreLayoutFromXml(XMLPath)
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
Try
|
||||
GridViewProfile.Columns.Item("PROFILE_GROUP_TEXT").GroupIndex = 0
|
||||
GridViewProfile.Columns.Item("PROFILE_GROUP_TEXT").Visible = False
|
||||
GridViewProfile.Columns.Item("PROFILE_GROUP_COLOR").Visible = False
|
||||
For I = 0 To GridViewProfile.GroupCount - 1
|
||||
Dim v = GridViewProfile.GroupedColumns(I).ToString
|
||||
Dim ii = Nothing
|
||||
GridViewProfile.GroupedColumns(I).Tag = GridViewProfile.Columns.Item("PROFILE_ID")
|
||||
Next
|
||||
|
||||
GridViewProfile.Columns.Item("PROFILE_ID").Visible = False
|
||||
GridViewProfile.Columns.Item("GUID").Visible = False
|
||||
GridViewProfile.Columns.Item("FULL_FILE_PATH").Visible = False
|
||||
GridViewProfile.Columns.Item("DOC_ID").Visible = False
|
||||
GridViewProfile.Columns.Item("TL_STATE").Visible = False
|
||||
GridViewProfile.Columns.Item("ICON").MaxWidth = 24
|
||||
GridViewProfile.Columns.Item("ICON").MinWidth = 24
|
||||
GridViewProfile.Columns.Item("ICON").AppearanceCell.BackColor = Color.White
|
||||
GridViewProfile.Columns.Item("ICON").Fixed = DevExpress.XtraGrid.Columns.FixedStyle.Left
|
||||
GridViewProfile.Columns("Last edited").DisplayFormat.FormatType = FormatType.DateTime
|
||||
GridViewProfile.Columns("Last edited").DisplayFormat.FormatString = "dd.MM.yyyy HH:MM:ss"
|
||||
|
||||
GridViewProfile.OptionsBehavior.AutoExpandAllGroups = True
|
||||
GridViewProfile.OptionsView.ShowGroupedColumns = False
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Unexpected Error in Formatting Grid: " & ex.Message)
|
||||
End Try
|
||||
Try
|
||||
For Each grid_column As GridColumn In GridViewProfile.Columns
|
||||
Dim GridDXCaption = grid_column.Caption
|
||||
Dim GridDXTextCaption = grid_column.GetTextCaption
|
||||
Dim GridDXColumnEditName = grid_column.ColumnEditName
|
||||
Dim GridDXFieldName = grid_column.FieldName
|
||||
|
||||
Dim exists As Boolean = False
|
||||
For Each col As DataColumn In CURR_DT_PROFILEGRID.Columns
|
||||
|
||||
If col.Caption = GridDXTextCaption Then
|
||||
exists = True
|
||||
Exit For
|
||||
End If
|
||||
Next
|
||||
If exists = False Then
|
||||
If grid_column.Visible = True Then
|
||||
Try
|
||||
grid_column.Dispose()
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End If
|
||||
|
||||
|
||||
End If
|
||||
Next
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Unexpected Error in Checking ColumnsGrid: " & ex.Message)
|
||||
End Try
|
||||
|
||||
|
||||
|
||||
GridViewProfile.SaveLayoutToXml(GetXML_LayoutName())
|
||||
|
||||
Else
|
||||
GridControlProfile.DataSource = Nothing
|
||||
Try
|
||||
GridViewProfile.Columns.Clear()
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
End If
|
||||
|
||||
|
||||
|
||||
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Load_Grid_Overview - Fehler: " & ex.Message)
|
||||
MsgBox("Fehler Load_Grid_Overview - Fehler: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Achtung:")
|
||||
End Try
|
||||
Cursor = Cursors.Default
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
@@ -50,7 +50,6 @@ Public Class frmValidator
|
||||
Dim viewer_string As String
|
||||
Dim pdfxchange As Boolean = False
|
||||
Dim sumatra As Boolean = False
|
||||
|
||||
<DllImport("user32.dll", CharSet:=CharSet.Ansi, SetLastError:=True, ExactSpelling:=True)>
|
||||
Public Shared Function SetForegroundWindow(ByVal hwnd As IntPtr) As <MarshalAs(UnmanagedType.Bool)> Boolean
|
||||
End Function
|
||||
@@ -113,11 +112,11 @@ Public Class frmValidator
|
||||
MsgBox("Fehler bei Übersprungene Files löschen:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
If CURRENT_DOC_ID <> 0 Then
|
||||
If CURRENT_DOC_GUID <> 0 Then
|
||||
Try
|
||||
TBPM_PROFILE_FILESTableAdapter.CmdSETWORK(False, "", CURRENT_DOC_ID)
|
||||
TBPM_PROFILE_FILESTableAdapter.CmdSETWORK(False, "", CURRENT_DOC_GUID)
|
||||
Catch ex As Exception
|
||||
allgFunk.Insert_LogEntry(CURRENT_ProfilGUID, "Fehler bei Freigabe der Dok-ID: " & CURRENT_DOC_ID & " - ERROR: " & ex.Message, Environment.UserName)
|
||||
allgFunk.Insert_LogEntry(CURRENT_ProfilGUID, "Fehler bei Freigabe der Dok-ID: " & CURRENT_DOC_GUID & " - ERROR: " & ex.Message, Environment.UserName)
|
||||
End Try
|
||||
End If
|
||||
|
||||
@@ -309,8 +308,8 @@ Public Class frmValidator
|
||||
VWPM_CONTROL_INDEXTableAdapter.Connection.ConnectionString = MyConnectionString
|
||||
VWPM_PROFILE_USERTableAdapter.Connection.ConnectionString = MyConnectionString
|
||||
Me.TBPM_CONTROL_TABLETableAdapter.Connection.ConnectionString = MyConnectionString
|
||||
|
||||
Me.VWPM_PROFILE_USERTableAdapter.FillByName(Me.DD_DMSLiteDataSet.VWPM_PROFILE_USER, CURRENT_ProfilName, Environment.UserName)
|
||||
|
||||
Me.VWPM_CONTROL_INDEXTableAdapter.Fill(Me.DD_DMSLiteDataSet.VWPM_CONTROL_INDEX, CURRENT_ProfilName)
|
||||
Me.TBPM_CONNECTIONTableAdapter.Fill(Me.DD_DMSLiteDataSet.TBPM_CONNECTION)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Profile Data geladen", False)
|
||||
@@ -350,7 +349,12 @@ Public Class frmValidator
|
||||
finalProfile = dr.Item("FINAL_PROFILE")
|
||||
Move2Folder = dr.Item("MOVE2Folder")
|
||||
Right_Delete = dr.Item("RIGHT_FILE_DELETE")
|
||||
Anzahl_ValDoks = TBPM_PROFILE_FILESTableAdapter.cmdGet_Anzahl(CURRENT_ProfilGUID)
|
||||
If CURRENT_JUMP_DOC_GUID <> 0 Then
|
||||
Anzahl_ValDoks = 1
|
||||
Else
|
||||
Anzahl_ValDoks = TBPM_PROFILE_FILESTableAdapter.cmdGet_Anzahl(CURRENT_ProfilGUID)
|
||||
End If
|
||||
|
||||
Next
|
||||
If LogErrorsOnly = False Then
|
||||
ClassLogger.Add(" >> Profildaten gespeichert", False)
|
||||
@@ -360,7 +364,7 @@ Public Class frmValidator
|
||||
ClassLogger.Add(" >> Right_Delete: " & Right_Delete, False)
|
||||
End If
|
||||
|
||||
PROFIL_sortbynewest = TBPM_PROFILETableAdapter.cmdSortMode(CURRENT_ProfilGUID)
|
||||
PROFIL_sortbynewest = DTPROFIL.Rows(0).Item("SORT_BY_LATEST")
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> PROFIL_sortbynewest: " & PROFIL_sortbynewest.ToString, False)
|
||||
'Delete Button anzeigen ja/nein
|
||||
If Right_Delete = True Then
|
||||
@@ -382,7 +386,8 @@ Public Class frmValidator
|
||||
'Me.lblerror.Visible = False
|
||||
Try
|
||||
If finalProfile = True Then
|
||||
Dim text As String = TBPM_PROFILETableAdapter.cmdFinalText(CURRENT_ProfilGUID)
|
||||
|
||||
Dim text As String = DTPROFIL.Rows(0).Item("FINAL_TEXT")
|
||||
If text <> "" Then
|
||||
btnSave.Text = text & " (F1)"
|
||||
Else
|
||||
@@ -969,7 +974,7 @@ Public Class frmValidator
|
||||
If allgFunk.checkValue_Exists(dr.Item("SQL_UEBERPRUEFUNG"), "@Eingabe", control.Text, dr.Item("TYP"), cs, CURRENT_ProfilGUID) = True Then
|
||||
Return True
|
||||
Else
|
||||
My.Settings.errormessage = "Der eingegebene Wert '" & control.Text & "' existiert nicht in der Datenbank!"
|
||||
errormessage = "Der eingegebene Wert '" & control.Text & "' existiert nicht in der Datenbank!"
|
||||
My.Settings.Save()
|
||||
Return False
|
||||
End If
|
||||
@@ -1119,13 +1124,18 @@ Public Class frmValidator
|
||||
Else
|
||||
TBPM_PROFILE_FILESTableAdapter.Fill(DD_DMSLiteDataSet.TBPM_PROFILE_FILES, CURRENT_ProfilGUID)
|
||||
End If
|
||||
If CURRENT_DOC_GUID = 0 Then
|
||||
Dim DT As DataTable = DD_DMSLiteDataSet.TBPM_PROFILE_FILES
|
||||
CURRENT_DOC_GUID = DT.Rows(0).Item("GUID")
|
||||
AnzDoks = DT.Rows.Count
|
||||
Else
|
||||
AnzDoks = 1
|
||||
Document_Path = CURRENT_DOC_PATH
|
||||
End If
|
||||
|
||||
Dim DT As DataTable = DD_DMSLiteDataSet.TBPM_PROFILE_FILES
|
||||
tsslblDocID.Text = "Document-ID: " & CURRENT_DOC_ID & " - GUID: " & CURRENT_DOC_GUID
|
||||
|
||||
CURRENT_DOC_ID = DT.Rows(0).Item("GUID")
|
||||
tsslblDocID.Text = "Document-ID: " & CURRENT_DOC_ID
|
||||
|
||||
AnzDoks = DT.Rows.Count
|
||||
|
||||
End Sub
|
||||
Sub Close_document_viewer()
|
||||
@@ -1183,16 +1193,21 @@ Public Class frmValidator
|
||||
' Case "first"
|
||||
' Case "last"
|
||||
'End Select
|
||||
CURRENT_DOC_ID = Get_Next_GUID()
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Dokument-GUID: '" & CURRENT_DOC_ID.ToString & "'", False)
|
||||
If CURRENT_DOC_ID > 0 Then
|
||||
If CURRENT_JUMP_DOC_GUID = 0 Then
|
||||
CURRENT_DOC_GUID = Get_Next_GUID()
|
||||
Else
|
||||
Document_Path = CURRENT_DOC_PATH
|
||||
End If
|
||||
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Dokument-GUID: '" & CURRENT_DOC_GUID.ToString & "'", False)
|
||||
If CURRENT_DOC_GUID > 0 Then
|
||||
'Beschriftung des Navigators
|
||||
'lblNavigator_anzDok.Text = position & " of " & Anzahl_ValDoks & " files"
|
||||
If Document_Path <> String.Empty Then
|
||||
' >> >> >> >> >> >>##### Das Dokument in Bearbeitung nehmen ###########################
|
||||
TBPM_PROFILE_FILESTableAdapter.CmdSETWORK(True, Environment.UserName, CURRENT_DOC_ID)
|
||||
TBPM_PROFILE_FILESTableAdapter.CmdSETWORK(True, Environment.UserName, CURRENT_DOC_GUID)
|
||||
' ############ Infos eintragen #################
|
||||
tsslblDocID.Text = "Document-ID: " & CURRENT_DOC_ID
|
||||
tsslblDocID.Text = "Document-ID: " & CURRENT_DOC_ID & " - DocGUID: " & CURRENT_DOC_GUID
|
||||
txtDateipfad.Text = Document_Path
|
||||
tstrlbl_Info.Text = "Datei " & docCounter.ToString & " von " & Anzahl_ValDoks.ToString
|
||||
ClassLogger.Add(">> Validierung für Dokument '" & Document_Path & "' gestartet", False)
|
||||
@@ -1200,7 +1215,7 @@ Public Class frmValidator
|
||||
Try
|
||||
aktivesDokument = _windream.oSession.GetWMObjectByPath(WINDREAMLib.WMEntity.WMEntityDocument, Document_Path.Substring(2))
|
||||
Catch ex As Exception
|
||||
allgFunk.Insert_LogEntry(CURRENT_ProfilGUID, "Fehler bei Erzeugen windream-Objekt - DokID: " & CURRENT_DOC_ID & " - ERROR: " & ex.Message, Environment.UserName)
|
||||
allgFunk.Insert_LogEntry(CURRENT_ProfilGUID, "Fehler bei Erzeugen windream-Objekt - DocGUID: " & CURRENT_DOC_GUID & " - ERROR: " & ex.Message, Environment.UserName)
|
||||
ClassLogger.Add("Fehler bei Erzeugen windream-Objekt in (LoadNextDokument): " & ex.Message)
|
||||
ClassLogger.Add("Error Number: " & Err.Number.ToString)
|
||||
Dim _err1 As Boolean = False
|
||||
@@ -1231,7 +1246,8 @@ Public Class frmValidator
|
||||
Me.grpbxMailBody.Visible = False
|
||||
Me.grpBetreff.Visible = False
|
||||
|
||||
load_Viewer
|
||||
load_viewer()
|
||||
|
||||
If Document_Path.ToLower.EndsWith(".pdf") Then
|
||||
ToolStripButtonAnnotation.Visible = True
|
||||
Else
|
||||
@@ -1250,7 +1266,7 @@ Public Class frmValidator
|
||||
' If Indexiere_VektorfeldPM(Profilstring, PROFIL_VEKTORINDEX) = False Then
|
||||
' If LogErrorsOnly = False Then ClassLogger.Add(" >> Profilname erfolgreich in Vektorfeld PM geschrieben", False)
|
||||
' 'Else
|
||||
' ' My.Settings.errormessage = "Fehler beim finalen Indexieren:" & vbNewLine & idxerr_message
|
||||
' ' errormessage = "Fehler beim finalen Indexieren:" & vbNewLine & idxerr_message
|
||||
' ' My.Settings.Save()
|
||||
' ' frmError.ShowDialog()
|
||||
' ' _error = True
|
||||
@@ -1262,7 +1278,7 @@ Public Class frmValidator
|
||||
If Indexiere_VektorfeldPM(Profilstring, PROFIL_LOGINDEX) = False Then
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Profilname erfolgreich in Vektorfeld LOG geschrieben", False)
|
||||
'Else
|
||||
' My.Settings.errormessage = "Fehler beim finalen Indexieren:" & vbNewLine & idxerr_message
|
||||
' errormessage = "Fehler beim finalen Indexieren:" & vbNewLine & idxerr_message
|
||||
' My.Settings.Save()
|
||||
' frmError.ShowDialog()
|
||||
' _error = True
|
||||
@@ -1270,16 +1286,16 @@ Public Class frmValidator
|
||||
End If
|
||||
activate_controls(True)
|
||||
Else
|
||||
My.Settings.errormessage = errmessage
|
||||
errormessage = errmessage
|
||||
frmError.ShowDialog()
|
||||
End If
|
||||
Else
|
||||
My.Settings.errormessage = errmessage
|
||||
errormessage = errmessage
|
||||
frmError.ShowDialog()
|
||||
End If
|
||||
Else
|
||||
If errmessage <> "" Then
|
||||
My.Settings.errormessage = errmessage
|
||||
errormessage = errmessage
|
||||
frmError.ShowDialog()
|
||||
Else
|
||||
ClassLogger.Add(" >> Ende des Profils - Kein weiteres Dokument!", False)
|
||||
@@ -1291,8 +1307,8 @@ Public Class frmValidator
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
allgFunk.Insert_LogEntry(CURRENT_ProfilGUID, "Unvorhergesehener Fehler bei Load_Next_Document - DokID: " & CURRENT_DOC_ID & " - ERROR: " & ex.Message, Environment.UserName)
|
||||
My.Settings.errormessage = "Unvorhergesehener Fehler bei Load_Next_Document:" & ex.Message
|
||||
allgFunk.Insert_LogEntry(CURRENT_ProfilGUID, "Unvorhergesehener Fehler bei Load_Next_Document - DocGUID: " & CURRENT_DOC_GUID & " - ERROR: " & ex.Message, Environment.UserName)
|
||||
errormessage = "Unvorhergesehener Fehler bei Load_Next_Document:" & ex.Message
|
||||
My.Settings.Save()
|
||||
ClassLogger.Add("Unvorhergesehener Fehler in Load_Next_Document: " & ex.Message)
|
||||
frmError.ShowDialog()
|
||||
@@ -1402,7 +1418,7 @@ Public Class frmValidator
|
||||
Me.grpbxMailBody.Visible = True
|
||||
Me.grpBetreff.Visible = True
|
||||
Catch ex As Exception
|
||||
My.Settings.errormessage = "Unvorhergesehener Fehler bei Show_Email:" & ex.Message
|
||||
errormessage = "Unvorhergesehener Fehler bei Show_Email:" & ex.Message
|
||||
ClassLogger.Add("Unvorhergesehener Fehler in Show_Email: " & ex.Message)
|
||||
My.Settings.Save()
|
||||
frmError.ShowDialog()
|
||||
@@ -1596,7 +1612,7 @@ Public Class frmValidator
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
My.Settings.errormessage = "Unvorhergesehener Fehler bei FillIndexValues TextBox:" & vbNewLine & ex.Message & vbNewLine & "Check Logfile"
|
||||
errormessage = "Unvorhergesehener Fehler bei FillIndexValues TextBox:" & vbNewLine & ex.Message & vbNewLine & "Check Logfile"
|
||||
My.Settings.Save()
|
||||
frmError.ShowDialog()
|
||||
ClassLogger.Add(">> Unvorhergesehener Fehler bei FillIndexValuesTextBox: " & ex.Message, True)
|
||||
@@ -1797,7 +1813,7 @@ Public Class frmValidator
|
||||
|
||||
|
||||
Catch ex As Exception
|
||||
My.Settings.errormessage = "Unvorhergesehener Fehler bei DTP: " & vbNewLine & ex.Message
|
||||
errormessage = "Unvorhergesehener Fehler bei DTP: " & vbNewLine & ex.Message
|
||||
|
||||
ClassLogger.Add(">> Unvorhergesehener Fehler bei FillIndex DTP: " & ex.Message & vbNewLine & "Wert WD: " & wertWD.ToString & vbNewLine & "Indexname: " & idxname, True)
|
||||
frmError.ShowDialog()
|
||||
@@ -1822,7 +1838,7 @@ Public Class frmValidator
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
My.Settings.errormessage = "Unvorhergesehener Fehler bei FillIndexValues:" & vbNewLine & ex.Message & vbNewLine & "Check Logfile"
|
||||
errormessage = "Unvorhergesehener Fehler bei FillIndexValues:" & vbNewLine & ex.Message & vbNewLine & "Check Logfile"
|
||||
My.Settings.Save()
|
||||
frmError.ShowDialog()
|
||||
ClassLogger.Add(">> Unvorhergesehener Fehler bei FillIndexValues: " & ex.Message, True)
|
||||
@@ -1929,7 +1945,7 @@ Public Class frmValidator
|
||||
If Indexiere_VektorfeldPM(PM_String, PROFIL_VEKTORINDEX) = False Then
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> FINALER INDEX '" & dr.Item("INDEXNAME").ToString.Replace("[%VKT", "") & "' WURDE ERFOLGREICH GESETZT", False)
|
||||
Else
|
||||
My.Settings.errormessage = "Fehler beim finalen Indexieren:" & vbNewLine & idxerr_message
|
||||
errormessage = "Fehler beim finalen Indexieren:" & vbNewLine & idxerr_message
|
||||
My.Settings.Save()
|
||||
frmError.ShowDialog()
|
||||
_error = True
|
||||
@@ -1946,7 +1962,7 @@ Public Class frmValidator
|
||||
End If
|
||||
|
||||
Else
|
||||
My.Settings.errormessage = "Fehler beim finalen Indexieren:" & vbNewLine & idxerr_message
|
||||
errormessage = "Fehler beim finalen Indexieren:" & vbNewLine & idxerr_message
|
||||
My.Settings.Save()
|
||||
frmError.ShowDialog()
|
||||
_error = True
|
||||
@@ -1961,7 +1977,7 @@ Public Class frmValidator
|
||||
If _error = False Then
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Tabelle updaten und co", False)
|
||||
'Das Dokument freigeben und als editiert markieren
|
||||
Dim sql = String.Format("UPDATE TBPM_PROFILE_FILES SET IN_WORK = 0, WORK_USER = '{0}', EDIT = 1 WHERE GUID = {1}", Environment.UserName, CURRENT_DOC_ID)
|
||||
Dim sql = String.Format("UPDATE TBPM_PROFILE_FILES SET IN_WORK = 0, WORK_USER = '{0}', EDIT = 1 WHERE GUID = {1}", Environment.UserName, CURRENT_DOC_GUID)
|
||||
ClassDatabase.Execute_non_Query(sql)
|
||||
'TBPM_PROFILE_FILESTableAdapter.CmdSETWORK(False, "", Document_ID)
|
||||
''Das Dokument
|
||||
@@ -2051,26 +2067,28 @@ Public Class frmValidator
|
||||
Close_document_viewer()
|
||||
|
||||
|
||||
'wenn Move2Folder aktiviert wurde
|
||||
If Move2Folder <> "" Then
|
||||
idxerr_message = allgFunk.Move2Folder(Document_Path, Move2Folder, CURRENT_ProfilGUID)
|
||||
If idxerr_message <> "" Then
|
||||
My.Settings.errormessage = "Fehler bei Move2Folder:" & vbNewLine & idxerr_message
|
||||
My.Settings.Save()
|
||||
frmError.ShowDialog()
|
||||
_error = True
|
||||
End If
|
||||
'wenn Move2Folder aktiviert wurde
|
||||
If Move2Folder <> "" Then
|
||||
idxerr_message = allgFunk.Move2Folder(Document_Path, Move2Folder, CURRENT_ProfilGUID)
|
||||
If idxerr_message <> "" Then
|
||||
errormessage = "Fehler bei Move2Folder:" & vbNewLine & idxerr_message
|
||||
My.Settings.Save()
|
||||
frmError.ShowDialog()
|
||||
_error = True
|
||||
End If
|
||||
'Validierungsfile löschen wenn vorhanden
|
||||
allgFunk.Delete_xffres(Document_Path)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Delete_xffres ausgeführt", False)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> All Input clear", False)
|
||||
Anzahl_validierte_Dok += 1
|
||||
'tstrlbl_Info.Text = "Anzahl Dateien: " & TBPM_PROFILE_FILESTableAdapter.cmdGet_Anzahl(PROFIL_ID)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Anzahl hochgesetzt", False)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Validierung erfolgreich abgeschlossen", False)
|
||||
ClassLogger.Add("", False)
|
||||
|
||||
End If
|
||||
'Validierungsfile löschen wenn vorhanden
|
||||
allgFunk.Delete_xffres(Document_Path)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Delete_xffres ausgeführt", False)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> All Input clear", False)
|
||||
Anzahl_validierte_Dok += 1
|
||||
'tstrlbl_Info.Text = "Anzahl Dateien: " & TBPM_PROFILE_FILESTableAdapter.cmdGet_Anzahl(PROFIL_ID)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Anzahl hochgesetzt", False)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Validierung erfolgreich abgeschlossen", False)
|
||||
ClassLogger.Add("", False)
|
||||
If CURRENT_JUMP_DOC_GUID <> 0 Then
|
||||
Me.Close()
|
||||
Else
|
||||
'Das nächste Dokument laden
|
||||
Load_Next_Document(False)
|
||||
|
||||
@@ -2078,8 +2096,10 @@ Public Class frmValidator
|
||||
If first_control Is Nothing = False Then first_control.Focus()
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
My.Settings.errormessage = "Unvorhergesehener Fehler bei Abschluss:" & ex.Message
|
||||
errormessage = "Unvorhergesehener Fehler bei Abschluss:" & ex.Message
|
||||
My.Settings.Save()
|
||||
frmError.ShowDialog()
|
||||
ClassLogger.Add(">> Unvorhergesehener Fehler bei Abschluss: " & ex.Message, True)
|
||||
@@ -2087,7 +2107,7 @@ Public Class frmValidator
|
||||
Else
|
||||
'lblerror.Visible = True
|
||||
'lblerror.Text = errmessage
|
||||
My.Settings.errormessage = errmessage
|
||||
errormessage = errmessage
|
||||
frmError.ShowDialog()
|
||||
End If
|
||||
btnSave.Enabled = True
|
||||
@@ -2648,7 +2668,7 @@ Public Class frmValidator
|
||||
Close_document_viewer()
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Doc Viewer geschlossen", False)
|
||||
'Das Dokument freigeben
|
||||
TBPM_PROFILE_FILESTableAdapter.CmdSETWORK(False, "", CURRENT_DOC_ID)
|
||||
TBPM_PROFILE_FILESTableAdapter.CmdSETWORK(False, "", CURRENT_DOC_GUID)
|
||||
TBPM_FILES_USER_NOT_INDEXEDTableAdapter.cmdInsert(Environment.UserName, CURRENT_ProfilGUID, Document_Path)
|
||||
If LogErrorsOnly = False Then ClassLogger.Add(" >> Dokument freigegeben", False)
|
||||
ClassLogger.Add("", False)
|
||||
@@ -2665,7 +2685,7 @@ Public Class frmValidator
|
||||
If result = MsgBoxResult.Yes Then
|
||||
Close_document_viewer()
|
||||
'Aus der Tabelle löschen
|
||||
TBPM_PROFILE_FILESTableAdapter.CmdDelete(CURRENT_DOC_ID)
|
||||
TBPM_PROFILE_FILESTableAdapter.CmdDelete(CURRENT_DOC_GUID)
|
||||
Dim resul = allgFunk.Delete_xffres(Document_Path)
|
||||
If resul = Nothing Or resul = True Then
|
||||
If Delete_File() = True Then
|
||||
|
||||
@@ -92,12 +92,12 @@
|
||||
<File Id="DevExpress.Pdf.v15.2.Core" Name="DevExpress.Pdf.v15.2.Core.dll" Source="D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.Pdf.v15.2.Core.dll"/>
|
||||
<File Id="DevExpress.Pdf.v15.2.Drawing" Name="DevExpress.Pdf.v15.2.Drawing.dll" Source="D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.Pdf.v15.2.Drawing.dll" />
|
||||
<File Id="DevExpress.Printing.v15.2.Core" Name="DevExpress.Printing.v15.2.Core.dll" Source="D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.Printing.v15.2.Core.dll"/>
|
||||
<File Id="DevExpress.RichEdit.v15.2.Core" Name="DevExpress.RichEdit.v15.2.Core.dll" Source="D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.RichEdit.v15.2.Core.dll"/>
|
||||
<File Id="DevExpress.Utils.v15.2" Name="DevExpress.Utils.v15.2.dll" Source="D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.Utils.v15.2.dll"/>
|
||||
<File Id="DevExpress.XtraBars.v15.2" Name="DevExpress.XtraBars.v15.2.dll" Source="D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.XtraBars.v15.2.dll"/>
|
||||
<File Id="DevExpress.XtraEditors.v15.2" Name="DevExpress.XtraEditors.v15.2.dll" Source="D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.XtraEditors.v15.2.dll"/>
|
||||
<File Id="DevExpress.XtraGrid.v15.2" Name="DevExpress.XtraGrid.v15.2.dll" Source="D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.XtraGrid.v15.2.dll"/>
|
||||
<File Id="DevExpress.XtraLayout.v15.2" Name="DevExpress.XtraLayout.v15.2.dll" Source="D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.XtraLayout.v15.2.dll"/>
|
||||
<File Id="DevExpress.XtraNavBar.v15.2" Name="DevExpress.XtraNavBar.v15.2.dll" Source="D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.XtraNavBar.v15.2.dll"/>
|
||||
<File Id="DevExpress.XtraPdfViewer.v15.2" Name="DevExpress.XtraPdfViewer.v15.2.dll" Source="D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.XtraPdfViewer.v15.2.dll"/>
|
||||
<File Id="DevExpress.XtraPrinting.v15.2" Name="DevExpress.XtraPrinting.v15.2.dll" Source="D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.XtraPrinting.v15.2.dll"/>
|
||||
<File Id="DevExpress.XtraTreeList.v15.2" Name="DevExpress.XtraTreeList.v15.2.dll" Source="D:\ProgramFiles\DevExpress 15.2\Bin\Framework\DevExpress.XtraTreeList.v15.2.dll"/>
|
||||
|
||||
Reference in New Issue
Block a user