First Version with Template Config from Database

This commit is contained in:
Jonathan Jenne 2021-11-16 15:00:58 +01:00
parent 510a08c1ed
commit 964f2ee60c
26 changed files with 6234 additions and 444 deletions

View File

@ -1,5 +1,12 @@
<?xml version="1.0" encoding="utf-8" ?>
<configuration>
<configSections>
</configSections>
<connectionStrings>
<add name="MultiTool.Form.My.MySettings.DD_ECMConnectionString"
connectionString="Data Source=SDD-VMP04-SQL17\SCHAUM;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd"
providerName="System.Data.SqlClient" />
</connectionStrings>
<startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.1" />
</startup>

View File

@ -84,6 +84,7 @@ CREATE TABLE [dbo].[TBEDI_XML_ITEMS](
[XML_TYPE_ID] [int] NOT NULL,
[IS_READ_ONLY] [bit] NOT NULL,
[IS_VISIBLE] [bit] NOT NULL,
[ORDER] [int] NOT NULL,
[FUNCTION_ID] [int] NULL
) ON [PRIMARY]
GO
@ -100,6 +101,10 @@ ALTER TABLE [dbo].[TBEDI_XML_ITEMS]
ADD CONSTRAINT DF_TBEDI_XML_ITEMS_IS_READ_ONLY
DEFAULT 0 FOR IS_READ_ONLY
ALTER TABLE [dbo].[TBEDI_XML_ITEMS]
ADD CONSTRAINT DF_TBEDI_XML_ITEMS_ORDER
DEFAULT 0 FOR ORDER
DROP VIEW [dbo].[VWEDI_XML_ITEMS]
GO

5056
MultiTool.Form/DS_DD_ECM.Designer.vb generated Normal file

File diff suppressed because it is too large Load Diff

View File

@ -0,0 +1,9 @@
<?xml version="1.0" encoding="utf-8"?>
<!--<autogenerated>
This code was generated by a tool.
Changes to this file may cause incorrect behavior and will be lost if
the code is regenerated.
</autogenerated>-->
<DataSetUISetting Version="1.00" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TableUISettings />
</DataSetUISetting>

View File

@ -0,0 +1,425 @@
<?xml version="1.0" encoding="utf-8"?>
<xs:schema id="DS_DD_ECM" targetNamespace="http://tempuri.org/DS_DD_ECM.xsd" xmlns:mstns="http://tempuri.org/DS_DD_ECM.xsd" xmlns="http://tempuri.org/DS_DD_ECM.xsd" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata" xmlns:msprop="urn:schemas-microsoft-com:xml-msprop" attributeFormDefault="qualified" elementFormDefault="qualified">
<xs:annotation>
<xs:appinfo source="urn:schemas-microsoft-com:xml-msdatasource">
<DataSource DefaultConnectionIndex="0" FunctionsComponentName="QueriesTableAdapter" Modifier="AutoLayout, AnsiClass, Class, Public" SchemaSerializationMode="IncludeSchema" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<Connections>
<Connection AppSettingsObjectName="MySettings" AppSettingsPropertyName="DD_ECMConnectionString" ConnectionStringObject="" IsAppSettingsProperty="true" Modifier="Assembly" Name="DD_ECMConnectionString (MySettings)" ParameterPrefix="@" PropertyReference="ApplicationSettings.MultiTool.Form.My.MySettings.GlobalReference.Default.DD_ECMConnectionString" Provider="System.Data.SqlClient" />
</Connections>
<Tables>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBEDI_XML_ITEMSTableAdapter" GeneratorDataComponentClassName="TBEDI_XML_ITEMSTableAdapter" Name="TBEDI_XML_ITEMS" UserDataComponentName="TBEDI_XML_ITEMSTableAdapter">
<MainSource>
<DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="DD_ECM.dbo.TBEDI_XML_ITEMS" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<DeleteCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>DELETE FROM TBEDI_XML_ITEMS
WHERE (GUID = @Original_GUID)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM.dbo.TBEDI_XML_ITEMS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</DeleteCommand>
<InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>INSERT INTO [TBEDI_XML_ITEMS] ([XML_NAME], [XML_NODE_ID], [XML_TYPE_ID], [IS_READ_ONLY], [IS_VISIBLE], [ORDER_KEY], [FUNCTION_ID], [IS_REQUIRED]) VALUES (@XML_NAME, @XML_NODE_ID, @XML_TYPE_ID, @IS_READ_ONLY, @IS_VISIBLE, @ORDER_KEY, @FUNCTION_ID, @IS_REQUIRED);
SELECT GUID, XML_NAME, XML_NODE_ID, XML_TYPE_ID, IS_READ_ONLY, IS_VISIBLE, ORDER_KEY, FUNCTION_ID, IS_REQUIRED FROM TBEDI_XML_ITEMS WHERE (GUID = SCOPE_IDENTITY())</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@XML_NAME" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="XML_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@XML_NODE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="XML_NODE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@XML_TYPE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="XML_TYPE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@IS_READ_ONLY" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="IS_READ_ONLY" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@IS_VISIBLE" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="IS_VISIBLE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@ORDER_KEY" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="ORDER_KEY" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@FUNCTION_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="FUNCTION_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@IS_REQUIRED" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="IS_REQUIRED" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</InsertCommand>
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT GUID, XML_NAME, XML_NODE_ID, XML_TYPE_ID, IS_READ_ONLY, IS_VISIBLE, ORDER_KEY, FUNCTION_ID, IS_REQUIRED
FROM TBEDI_XML_ITEMS</CommandText>
<Parameters />
</DbCommand>
</SelectCommand>
<UpdateCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>UPDATE TBEDI_XML_ITEMS
SET XML_NAME = @XML_NAME, XML_NODE_ID = @XML_NODE_ID, XML_TYPE_ID = @XML_TYPE_ID, IS_READ_ONLY = @IS_READ_ONLY, IS_VISIBLE = @IS_VISIBLE, ORDER_KEY = @ORDER_KEY,
FUNCTION_ID = @FUNCTION_ID, IS_REQUIRED = @IS_REQUIRED
WHERE (GUID = @Original_GUID);
SELECT GUID, XML_NAME, XML_NODE_ID, XML_TYPE_ID, IS_READ_ONLY, IS_VISIBLE, ORDER_KEY, FUNCTION_ID, IS_REQUIRED FROM TBEDI_XML_ITEMS WHERE (GUID = @GUID)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="XML_NAME" ColumnName="XML_NAME" DataSourceName="DD_ECM.dbo.TBEDI_XML_ITEMS" DataTypeServer="nvarchar(50)" DbType="String" Direction="Input" ParameterName="@XML_NAME" Precision="0" ProviderType="NVarChar" Scale="0" Size="50" SourceColumn="XML_NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="XML_NODE_ID" ColumnName="XML_NODE_ID" DataSourceName="DD_ECM.dbo.TBEDI_XML_ITEMS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@XML_NODE_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="XML_NODE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="XML_TYPE_ID" ColumnName="XML_TYPE_ID" DataSourceName="DD_ECM.dbo.TBEDI_XML_ITEMS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@XML_TYPE_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="XML_TYPE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="IS_READ_ONLY" ColumnName="IS_READ_ONLY" DataSourceName="DD_ECM.dbo.TBEDI_XML_ITEMS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@IS_READ_ONLY" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="IS_READ_ONLY" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="IS_VISIBLE" ColumnName="IS_VISIBLE" DataSourceName="DD_ECM.dbo.TBEDI_XML_ITEMS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@IS_VISIBLE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="IS_VISIBLE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="ORDER_KEY" ColumnName="ORDER_KEY" DataSourceName="DD_ECM.dbo.TBEDI_XML_ITEMS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@ORDER_KEY" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="ORDER_KEY" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="FUNCTION_ID" ColumnName="FUNCTION_ID" DataSourceName="DD_ECM.dbo.TBEDI_XML_ITEMS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@FUNCTION_ID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="FUNCTION_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="IS_REQUIRED" ColumnName="IS_REQUIRED" DataSourceName="DD_ECM.dbo.TBEDI_XML_ITEMS" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@IS_REQUIRED" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="IS_REQUIRED" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM.dbo.TBEDI_XML_ITEMS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM.dbo.TBEDI_XML_ITEMS" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</UpdateCommand>
</DbSource>
</MainSource>
<Mappings>
<Mapping SourceColumn="GUID" DataSetColumn="GUID" />
<Mapping SourceColumn="XML_NAME" DataSetColumn="XML_NAME" />
<Mapping SourceColumn="XML_NODE_ID" DataSetColumn="XML_NODE_ID" />
<Mapping SourceColumn="XML_TYPE_ID" DataSetColumn="XML_TYPE_ID" />
<Mapping SourceColumn="IS_READ_ONLY" DataSetColumn="IS_READ_ONLY" />
<Mapping SourceColumn="IS_VISIBLE" DataSetColumn="IS_VISIBLE" />
<Mapping SourceColumn="ORDER_KEY" DataSetColumn="ORDER_KEY" />
<Mapping SourceColumn="FUNCTION_ID" DataSetColumn="FUNCTION_ID" />
<Mapping SourceColumn="IS_REQUIRED" DataSetColumn="IS_REQUIRED" />
</Mappings>
<Sources />
</TableAdapter>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBEDI_XML_TYPESTableAdapter" GeneratorDataComponentClassName="TBEDI_XML_TYPESTableAdapter" Name="TBEDI_XML_TYPES" UserDataComponentName="TBEDI_XML_TYPESTableAdapter">
<MainSource>
<DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="DD_ECM.dbo.TBEDI_XML_TYPES" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<DeleteCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>DELETE FROM [dbo].[TBEDI_XML_TYPES] WHERE (([GUID] = @Original_GUID) AND ([NAME] = @Original_NAME))</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@Original_NAME" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</DeleteCommand>
<InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>INSERT INTO [dbo].[TBEDI_XML_TYPES] ([NAME]) VALUES (@NAME);
SELECT GUID, NAME FROM TBEDI_XML_TYPES WHERE (GUID = SCOPE_IDENTITY())</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</InsertCommand>
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT GUID, NAME FROM dbo.TBEDI_XML_TYPES</CommandText>
<Parameters />
</DbCommand>
</SelectCommand>
<UpdateCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>UPDATE [dbo].[TBEDI_XML_TYPES] SET [NAME] = @NAME WHERE (([GUID] = @Original_GUID) AND ([NAME] = @Original_NAME));
SELECT GUID, NAME FROM TBEDI_XML_TYPES WHERE (GUID = @GUID)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@Original_NAME" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</UpdateCommand>
</DbSource>
</MainSource>
<Mappings>
<Mapping SourceColumn="GUID" DataSetColumn="GUID" />
<Mapping SourceColumn="NAME" DataSetColumn="NAME" />
</Mappings>
<Sources />
</TableAdapter>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBEDI_XML_TEMPLATESTableAdapter" GeneratorDataComponentClassName="TBEDI_XML_TEMPLATESTableAdapter" Name="TBEDI_XML_TEMPLATES" UserDataComponentName="TBEDI_XML_TEMPLATESTableAdapter">
<MainSource>
<DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="DD_ECM.dbo.TBEDI_XML_TEMPLATES" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<DeleteCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>DELETE FROM [dbo].[TBEDI_XML_TEMPLATES] WHERE (([GUID] = @Original_GUID) AND ([NAME] = @Original_NAME))</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@Original_NAME" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</DeleteCommand>
<InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>INSERT INTO [dbo].[TBEDI_XML_TEMPLATES] ([NAME], [DESCRIPTION]) VALUES (@NAME, @DESCRIPTION);
SELECT GUID, NAME, DESCRIPTION FROM TBEDI_XML_TEMPLATES WHERE (GUID = SCOPE_IDENTITY())</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@DESCRIPTION" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</InsertCommand>
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT GUID, NAME, DESCRIPTION FROM dbo.TBEDI_XML_TEMPLATES</CommandText>
<Parameters />
</DbCommand>
</SelectCommand>
<UpdateCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>UPDATE [dbo].[TBEDI_XML_TEMPLATES] SET [NAME] = @NAME, [DESCRIPTION] = @DESCRIPTION WHERE (([GUID] = @Original_GUID) AND ([NAME] = @Original_NAME));
SELECT GUID, NAME, DESCRIPTION FROM TBEDI_XML_TEMPLATES WHERE (GUID = @GUID)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@DESCRIPTION" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@Original_NAME" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</UpdateCommand>
</DbSource>
</MainSource>
<Mappings>
<Mapping SourceColumn="GUID" DataSetColumn="GUID" />
<Mapping SourceColumn="NAME" DataSetColumn="NAME" />
<Mapping SourceColumn="DESCRIPTION" DataSetColumn="DESCRIPTION" />
</Mappings>
<Sources />
</TableAdapter>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBEDI_XML_NODESTableAdapter" GeneratorDataComponentClassName="TBEDI_XML_NODESTableAdapter" Name="TBEDI_XML_NODES" UserDataComponentName="TBEDI_XML_NODESTableAdapter">
<MainSource>
<DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="DD_ECM.dbo.TBEDI_XML_NODES" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<DeleteCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>DELETE FROM [dbo].[TBEDI_XML_NODES] WHERE (([GUID] = @Original_GUID) AND ([TEMPLATE_ID] = @Original_TEMPLATE_ID) AND ([IS_HEAD] = @Original_IS_HEAD))</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_TEMPLATE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="TEMPLATE_ID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_IS_HEAD" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="IS_HEAD" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</DeleteCommand>
<InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>INSERT INTO [dbo].[TBEDI_XML_NODES] ([NAME], [TEMPLATE_ID], [IS_HEAD]) VALUES (@NAME, @TEMPLATE_ID, @IS_HEAD);
SELECT GUID, NAME, TEMPLATE_ID, IS_HEAD FROM TBEDI_XML_NODES WHERE (GUID = SCOPE_IDENTITY())</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@TEMPLATE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="TEMPLATE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@IS_HEAD" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="IS_HEAD" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</InsertCommand>
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT GUID, NAME, TEMPLATE_ID, IS_HEAD FROM dbo.TBEDI_XML_NODES</CommandText>
<Parameters />
</DbCommand>
</SelectCommand>
<UpdateCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>UPDATE [dbo].[TBEDI_XML_NODES] SET [NAME] = @NAME, [TEMPLATE_ID] = @TEMPLATE_ID, [IS_HEAD] = @IS_HEAD WHERE (([GUID] = @Original_GUID) AND ([TEMPLATE_ID] = @Original_TEMPLATE_ID) AND ([IS_HEAD] = @Original_IS_HEAD));
SELECT GUID, NAME, TEMPLATE_ID, IS_HEAD FROM TBEDI_XML_NODES WHERE (GUID = @GUID)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@TEMPLATE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="TEMPLATE_ID" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@IS_HEAD" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="IS_HEAD" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_TEMPLATE_ID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="TEMPLATE_ID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Original_IS_HEAD" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="IS_HEAD" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</UpdateCommand>
</DbSource>
</MainSource>
<Mappings>
<Mapping SourceColumn="GUID" DataSetColumn="GUID" />
<Mapping SourceColumn="NAME" DataSetColumn="NAME" />
<Mapping SourceColumn="TEMPLATE_ID" DataSetColumn="TEMPLATE_ID" />
<Mapping SourceColumn="IS_HEAD" DataSetColumn="IS_HEAD" />
</Mappings>
<Sources />
</TableAdapter>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="TBEDI_XML_FUNCTIONSTableAdapter" GeneratorDataComponentClassName="TBEDI_XML_FUNCTIONSTableAdapter" Name="TBEDI_XML_FUNCTIONS" UserDataComponentName="TBEDI_XML_FUNCTIONSTableAdapter">
<MainSource>
<DbSource ConnectionRef="DD_ECMConnectionString (MySettings)" DbObjectName="DD_ECM.dbo.TBEDI_XML_FUNCTIONS" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<DeleteCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>DELETE FROM [dbo].[TBEDI_XML_FUNCTIONS] WHERE (([GUID] = @Original_GUID))</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</DeleteCommand>
<InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>INSERT INTO [dbo].[TBEDI_XML_FUNCTIONS] ([NAME], [DESCRIPTION], [PARAMETERS]) VALUES (@NAME, @DESCRIPTION, @PARAMETERS);
SELECT GUID, NAME, DESCRIPTION, PARAMETERS FROM TBEDI_XML_FUNCTIONS WHERE (GUID = SCOPE_IDENTITY())</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@DESCRIPTION" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@PARAMETERS" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="PARAMETERS" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</InsertCommand>
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT GUID, NAME, DESCRIPTION, PARAMETERS FROM dbo.TBEDI_XML_FUNCTIONS</CommandText>
<Parameters />
</DbCommand>
</SelectCommand>
<UpdateCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>UPDATE [dbo].[TBEDI_XML_FUNCTIONS] SET [NAME] = @NAME, [DESCRIPTION] = @DESCRIPTION, [PARAMETERS] = @PARAMETERS WHERE (([GUID] = @Original_GUID));
SELECT GUID, NAME, DESCRIPTION, PARAMETERS FROM TBEDI_XML_FUNCTIONS WHERE (GUID = @GUID)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@DESCRIPTION" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="DESCRIPTION" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@PARAMETERS" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="PARAMETERS" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</UpdateCommand>
</DbSource>
</MainSource>
<Mappings>
<Mapping SourceColumn="GUID" DataSetColumn="GUID" />
<Mapping SourceColumn="NAME" DataSetColumn="NAME" />
<Mapping SourceColumn="DESCRIPTION" DataSetColumn="DESCRIPTION" />
<Mapping SourceColumn="PARAMETERS" DataSetColumn="PARAMETERS" />
</Mappings>
<Sources />
</TableAdapter>
</Tables>
<Sources />
</DataSource>
</xs:appinfo>
</xs:annotation>
<xs:element name="DS_DD_ECM" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="true" msprop:Generator_DataSetName="DS_DD_ECM" msprop:Generator_UserDSName="DS_DD_ECM">
<xs:complexType>
<xs:choice minOccurs="0" maxOccurs="unbounded">
<xs:element name="TBEDI_XML_ITEMS" msprop:Generator_TableClassName="TBEDI_XML_ITEMSDataTable" msprop:Generator_TableVarName="tableTBEDI_XML_ITEMS" msprop:Generator_RowChangedName="TBEDI_XML_ITEMSRowChanged" msprop:Generator_TablePropName="TBEDI_XML_ITEMS" msprop:Generator_RowDeletingName="TBEDI_XML_ITEMSRowDeleting" msprop:Generator_RowChangingName="TBEDI_XML_ITEMSRowChanging" msprop:Generator_RowEvHandlerName="TBEDI_XML_ITEMSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBEDI_XML_ITEMSRowDeleted" msprop:Generator_RowClassName="TBEDI_XML_ITEMSRow" msprop:Generator_UserTableName="TBEDI_XML_ITEMS" msprop:Generator_RowEvArgName="TBEDI_XML_ITEMSRowChangeEvent">
<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" />
<xs:element name="XML_NAME" msprop:Generator_ColumnVarNameInTable="columnXML_NAME" msprop:Generator_ColumnPropNameInRow="XML_NAME" msprop:Generator_ColumnPropNameInTable="XML_NAMEColumn" msprop:Generator_UserColumnName="XML_NAME">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="50" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="XML_NODE_ID" msprop:Generator_ColumnVarNameInTable="columnXML_NODE_ID" msprop:Generator_ColumnPropNameInRow="XML_NODE_ID" msprop:Generator_ColumnPropNameInTable="XML_NODE_IDColumn" msprop:Generator_UserColumnName="XML_NODE_ID" type="xs:int" />
<xs:element name="XML_TYPE_ID" msprop:Generator_ColumnVarNameInTable="columnXML_TYPE_ID" msprop:Generator_ColumnPropNameInRow="XML_TYPE_ID" msprop:Generator_ColumnPropNameInTable="XML_TYPE_IDColumn" msprop:Generator_UserColumnName="XML_TYPE_ID" type="xs:int" />
<xs:element name="IS_READ_ONLY" msprop:Generator_ColumnVarNameInTable="columnIS_READ_ONLY" msprop:Generator_ColumnPropNameInRow="IS_READ_ONLY" msprop:Generator_ColumnPropNameInTable="IS_READ_ONLYColumn" msprop:Generator_UserColumnName="IS_READ_ONLY" type="xs:boolean" />
<xs:element name="IS_VISIBLE" msprop:Generator_ColumnVarNameInTable="columnIS_VISIBLE" msprop:Generator_ColumnPropNameInRow="IS_VISIBLE" msprop:Generator_ColumnPropNameInTable="IS_VISIBLEColumn" msprop:Generator_UserColumnName="IS_VISIBLE" type="xs:boolean" />
<xs:element name="ORDER_KEY" msprop:Generator_ColumnVarNameInTable="columnORDER_KEY" msprop:Generator_ColumnPropNameInRow="ORDER_KEY" msprop:Generator_ColumnPropNameInTable="ORDER_KEYColumn" msprop:Generator_UserColumnName="ORDER_KEY" type="xs:int" />
<xs:element name="FUNCTION_ID" msprop:Generator_ColumnVarNameInTable="columnFUNCTION_ID" msprop:Generator_ColumnPropNameInRow="FUNCTION_ID" msprop:Generator_ColumnPropNameInTable="FUNCTION_IDColumn" msprop:Generator_UserColumnName="FUNCTION_ID" type="xs:int" minOccurs="0" />
<xs:element name="IS_REQUIRED" msprop:Generator_ColumnVarNameInTable="columnIS_REQUIRED" msprop:Generator_ColumnPropNameInRow="IS_REQUIRED" msprop:Generator_ColumnPropNameInTable="IS_REQUIREDColumn" msprop:Generator_UserColumnName="IS_REQUIRED" type="xs:boolean" />
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBEDI_XML_TYPES" msprop:Generator_TableClassName="TBEDI_XML_TYPESDataTable" msprop:Generator_TableVarName="tableTBEDI_XML_TYPES" msprop:Generator_RowChangedName="TBEDI_XML_TYPESRowChanged" msprop:Generator_TablePropName="TBEDI_XML_TYPES" msprop:Generator_RowDeletingName="TBEDI_XML_TYPESRowDeleting" msprop:Generator_RowChangingName="TBEDI_XML_TYPESRowChanging" msprop:Generator_RowEvHandlerName="TBEDI_XML_TYPESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBEDI_XML_TYPESRowDeleted" msprop:Generator_RowClassName="TBEDI_XML_TYPESRow" msprop:Generator_UserTableName="TBEDI_XML_TYPES" msprop:Generator_RowEvArgName="TBEDI_XML_TYPESRowChangeEvent">
<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" />
<xs:element name="NAME" msprop:Generator_ColumnVarNameInTable="columnNAME" msprop:Generator_ColumnPropNameInRow="NAME" msprop:Generator_ColumnPropNameInTable="NAMEColumn" msprop:Generator_UserColumnName="NAME">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="20" />
</xs:restriction>
</xs:simpleType>
</xs:element>
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBEDI_XML_TEMPLATES" msprop:Generator_TableClassName="TBEDI_XML_TEMPLATESDataTable" msprop:Generator_TableVarName="tableTBEDI_XML_TEMPLATES" msprop:Generator_RowChangedName="TBEDI_XML_TEMPLATESRowChanged" msprop:Generator_TablePropName="TBEDI_XML_TEMPLATES" msprop:Generator_RowDeletingName="TBEDI_XML_TEMPLATESRowDeleting" msprop:Generator_RowChangingName="TBEDI_XML_TEMPLATESRowChanging" msprop:Generator_RowEvHandlerName="TBEDI_XML_TEMPLATESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBEDI_XML_TEMPLATESRowDeleted" msprop:Generator_RowClassName="TBEDI_XML_TEMPLATESRow" msprop:Generator_UserTableName="TBEDI_XML_TEMPLATES" msprop:Generator_RowEvArgName="TBEDI_XML_TEMPLATESRowChangeEvent">
<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" />
<xs:element name="NAME" msprop:Generator_ColumnVarNameInTable="columnNAME" msprop:Generator_ColumnPropNameInRow="NAME" msprop:Generator_ColumnPropNameInTable="NAMEColumn" msprop:Generator_UserColumnName="NAME">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="20" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="DESCRIPTION" msprop:Generator_ColumnVarNameInTable="columnDESCRIPTION" msprop:Generator_ColumnPropNameInRow="DESCRIPTION" msprop:Generator_ColumnPropNameInTable="DESCRIPTIONColumn" msprop:Generator_UserColumnName="DESCRIPTION" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBEDI_XML_NODES" msprop:Generator_TableClassName="TBEDI_XML_NODESDataTable" msprop:Generator_TableVarName="tableTBEDI_XML_NODES" msprop:Generator_RowChangedName="TBEDI_XML_NODESRowChanged" msprop:Generator_TablePropName="TBEDI_XML_NODES" msprop:Generator_RowDeletingName="TBEDI_XML_NODESRowDeleting" msprop:Generator_RowChangingName="TBEDI_XML_NODESRowChanging" msprop:Generator_RowEvHandlerName="TBEDI_XML_NODESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBEDI_XML_NODESRowDeleted" msprop:Generator_RowClassName="TBEDI_XML_NODESRow" msprop:Generator_UserTableName="TBEDI_XML_NODES" msprop:Generator_RowEvArgName="TBEDI_XML_NODESRowChangeEvent">
<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" />
<xs:element name="NAME" msprop:Generator_ColumnVarNameInTable="columnNAME" msprop:Generator_ColumnPropNameInRow="NAME" msprop:Generator_ColumnPropNameInTable="NAMEColumn" msprop:Generator_UserColumnName="NAME">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="TEMPLATE_ID" msprop:Generator_ColumnVarNameInTable="columnTEMPLATE_ID" msprop:Generator_ColumnPropNameInRow="TEMPLATE_ID" msprop:Generator_ColumnPropNameInTable="TEMPLATE_IDColumn" msprop:Generator_UserColumnName="TEMPLATE_ID" type="xs:int" />
<xs:element name="IS_HEAD" msprop:Generator_ColumnVarNameInTable="columnIS_HEAD" msprop:Generator_ColumnPropNameInRow="IS_HEAD" msprop:Generator_ColumnPropNameInTable="IS_HEADColumn" msprop:Generator_UserColumnName="IS_HEAD" type="xs:boolean" />
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBEDI_XML_FUNCTIONS" msprop:Generator_TableClassName="TBEDI_XML_FUNCTIONSDataTable" msprop:Generator_TableVarName="tableTBEDI_XML_FUNCTIONS" msprop:Generator_RowChangedName="TBEDI_XML_FUNCTIONSRowChanged" msprop:Generator_TablePropName="TBEDI_XML_FUNCTIONS" msprop:Generator_RowDeletingName="TBEDI_XML_FUNCTIONSRowDeleting" msprop:Generator_RowChangingName="TBEDI_XML_FUNCTIONSRowChanging" msprop:Generator_RowEvHandlerName="TBEDI_XML_FUNCTIONSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBEDI_XML_FUNCTIONSRowDeleted" msprop:Generator_RowClassName="TBEDI_XML_FUNCTIONSRow" msprop:Generator_UserTableName="TBEDI_XML_FUNCTIONS" msprop:Generator_RowEvArgName="TBEDI_XML_FUNCTIONSRowChangeEvent">
<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" />
<xs:element name="NAME" msprop:Generator_ColumnVarNameInTable="columnNAME" msprop:Generator_ColumnPropNameInRow="NAME" msprop:Generator_ColumnPropNameInTable="NAMEColumn" msprop:Generator_UserColumnName="NAME">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="DESCRIPTION" msprop:Generator_ColumnVarNameInTable="columnDESCRIPTION" msprop:Generator_ColumnPropNameInRow="DESCRIPTION" msprop:Generator_ColumnPropNameInTable="DESCRIPTIONColumn" msprop:Generator_UserColumnName="DESCRIPTION">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="PARAMETERS" msprop:Generator_ColumnVarNameInTable="columnPARAMETERS" msprop:Generator_ColumnPropNameInRow="PARAMETERS" msprop:Generator_ColumnPropNameInTable="PARAMETERSColumn" msprop:Generator_UserColumnName="PARAMETERS" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
</xs:sequence>
</xs:complexType>
</xs:element>
</xs:choice>
</xs:complexType>
<xs:unique name="Constraint1" msdata:PrimaryKey="true">
<xs:selector xpath=".//mstns:TBEDI_XML_ITEMS" />
<xs:field xpath="mstns:GUID" />
</xs:unique>
<xs:unique name="TBEDI_XML_TYPES_Constraint1" msdata:ConstraintName="Constraint1" msdata:PrimaryKey="true">
<xs:selector xpath=".//mstns:TBEDI_XML_TYPES" />
<xs:field xpath="mstns:GUID" />
</xs:unique>
<xs:unique name="TBEDI_XML_TEMPLATES_Constraint1" msdata:ConstraintName="Constraint1" msdata:PrimaryKey="true">
<xs:selector xpath=".//mstns:TBEDI_XML_TEMPLATES" />
<xs:field xpath="mstns:GUID" />
</xs:unique>
<xs:unique name="TBEDI_XML_NODES_Constraint1" msdata:ConstraintName="Constraint1" msdata:PrimaryKey="true">
<xs:selector xpath=".//mstns:TBEDI_XML_NODES" />
<xs:field xpath="mstns:GUID" />
</xs:unique>
<xs:unique name="TBEDI_XML_FUNCTIONS_Constraint1" msdata:ConstraintName="Constraint1" msdata:PrimaryKey="true">
<xs:selector xpath=".//mstns:TBEDI_XML_FUNCTIONS" />
<xs:field xpath="mstns:GUID" />
</xs:unique>
</xs:element>
<xs:annotation>
<xs:appinfo>
<msdata:Relationship name="TBEDI_XML_ITEMS_TBEDI_XML_FUNCTIONS" msdata:parent="TBEDI_XML_ITEMS" msdata:child="TBEDI_XML_FUNCTIONS" msdata:parentkey="FUNCTION_ID" msdata:childkey="GUID" msprop:Generator_UserChildTable="TBEDI_XML_FUNCTIONS" msprop:Generator_ChildPropName="GetTBEDI_XML_FUNCTIONSRows" msprop:Generator_UserRelationName="TBEDI_XML_ITEMS_TBEDI_XML_FUNCTIONS" msprop:Generator_RelationVarName="relationTBEDI_XML_ITEMS_TBEDI_XML_FUNCTIONS" msprop:Generator_UserParentTable="TBEDI_XML_ITEMS" msprop:Generator_ParentPropName="TBEDI_XML_ITEMSRow" />
<msdata:Relationship name="TBEDI_XML_ITEMS_TBEDI_XML_NODES" msdata:parent="TBEDI_XML_ITEMS" msdata:child="TBEDI_XML_NODES" msdata:parentkey="XML_NODE_ID" msdata:childkey="GUID" msprop:Generator_UserChildTable="TBEDI_XML_NODES" msprop:Generator_ChildPropName="GetTBEDI_XML_NODESRows" msprop:Generator_UserRelationName="TBEDI_XML_ITEMS_TBEDI_XML_NODES" msprop:Generator_RelationVarName="relationTBEDI_XML_ITEMS_TBEDI_XML_NODES" msprop:Generator_UserParentTable="TBEDI_XML_ITEMS" msprop:Generator_ParentPropName="TBEDI_XML_ITEMSRow" />
<msdata:Relationship name="TBEDI_XML_ITEMS_TBEDI_XML_TYPES" msdata:parent="TBEDI_XML_ITEMS" msdata:child="TBEDI_XML_TYPES" msdata:parentkey="XML_TYPE_ID" msdata:childkey="GUID" msprop:Generator_UserChildTable="TBEDI_XML_TYPES" msprop:Generator_ChildPropName="GetTBEDI_XML_TYPESRows" msprop:Generator_UserRelationName="TBEDI_XML_ITEMS_TBEDI_XML_TYPES" msprop:Generator_RelationVarName="relationTBEDI_XML_ITEMS_TBEDI_XML_TYPES" msprop:Generator_UserParentTable="TBEDI_XML_ITEMS" msprop:Generator_ParentPropName="TBEDI_XML_ITEMSRow" />
<msdata:Relationship name="TBEDI_XML_NODES_TBEDI_XML_TEMPLATES" msdata:parent="TBEDI_XML_NODES" msdata:child="TBEDI_XML_TEMPLATES" msdata:parentkey="TEMPLATE_ID" msdata:childkey="GUID" msprop:Generator_UserChildTable="TBEDI_XML_TEMPLATES" msprop:Generator_ChildPropName="GetTBEDI_XML_TEMPLATESRows" msprop:Generator_UserRelationName="TBEDI_XML_NODES_TBEDI_XML_TEMPLATES" msprop:Generator_ParentPropName="TBEDI_XML_NODESRow" msprop:Generator_RelationVarName="relationTBEDI_XML_NODES_TBEDI_XML_TEMPLATES" msprop:Generator_UserParentTable="TBEDI_XML_NODES" />
<msdata:Relationship name="FK_TBEDI_XML_NODES" msdata:parent="TBEDI_XML_ITEMS" msdata:child="TBEDI_XML_ITEMS" msdata:parentkey="GUID" msdata:childkey="XML_NODE_ID" msprop:Generator_UserChildTable="TBEDI_XML_ITEMS" msprop:Generator_ChildPropName="GetTBEDI_XML_ITEMSRowsByFK_TBEDI_XML_NODES" msprop:Generator_UserRelationName="FK_TBEDI_XML_NODES" msprop:Generator_RelationVarName="relationFK_TBEDI_XML_NODES" msprop:Generator_UserParentTable="TBEDI_XML_ITEMS" msprop:Generator_ParentPropName="TBEDI_XML_ITEMSRowParentByFK_TBEDI_XML_NODES" />
<msdata:Relationship name="FK_TBEDI_XML_TYPES" msdata:parent="TBEDI_XML_ITEMS" msdata:child="TBEDI_XML_ITEMS" msdata:parentkey="GUID" msdata:childkey="XML_TYPE_ID" msprop:Generator_UserChildTable="TBEDI_XML_ITEMS" msprop:Generator_ChildPropName="GetTBEDI_XML_ITEMSRowsByFK_TBEDI_XML_TYPES" msprop:Generator_UserRelationName="FK_TBEDI_XML_TYPES" msprop:Generator_RelationVarName="relationFK_TBEDI_XML_TYPES" msprop:Generator_UserParentTable="TBEDI_XML_ITEMS" msprop:Generator_ParentPropName="TBEDI_XML_ITEMSRowParentByFK_TBEDI_XML_TYPES" />
</xs:appinfo>
</xs:annotation>
</xs:schema>

View File

@ -0,0 +1,117 @@
<?xml version="1.0" encoding="utf-8"?>
<!--<autogenerated>
This code was generated by a tool to store the dataset designer's layout information.
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="-52" ViewPortY="-47" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
<Shapes>
<Shape ID="DesignTable:TBEDI_XML_ITEMS" ZOrder="1" X="5" Y="8" Height="248" Width="252" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" />
<Shape ID="DesignTable:TBEDI_XML_TYPES" ZOrder="11" X="525" Y="204" Height="115" Width="251" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="64" />
<Shape ID="DesignTable:TBEDI_XML_TEMPLATES" ZOrder="9" X="1069" Y="27" Height="134" Width="285" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="83" />
<Shape ID="DesignTable:TBEDI_XML_NODES" ZOrder="6" X="513" Y="22" Height="153" Width="257" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" />
<Shape ID="DesignTable:TBEDI_XML_FUNCTIONS" ZOrder="10" X="472" Y="347" Height="153" Width="286" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="102" />
</Shapes>
<Connectors>
<Connector ID="DesignRelation:TBEDI_XML_ITEMS_TBEDI_XML_FUNCTIONS" ZOrder="8" LineWidth="11">
<RoutePoints>
<Point>
<X>240</X>
<Y>256</Y>
</Point>
<Point>
<X>240</X>
<Y>364</Y>
</Point>
<Point>
<X>472</X>
<Y>364</Y>
</Point>
</RoutePoints>
</Connector>
<Connector ID="DesignRelation:TBEDI_XML_ITEMS_TBEDI_XML_NODES" ZOrder="7" LineWidth="11">
<RoutePoints>
<Point>
<X>257</X>
<Y>85</Y>
</Point>
<Point>
<X>513</X>
<Y>85</Y>
</Point>
</RoutePoints>
</Connector>
<Connector ID="DesignRelation:TBEDI_XML_ITEMS_TBEDI_XML_TYPES" ZOrder="4" LineWidth="11">
<RoutePoints>
<Point>
<X>257</X>
<Y>237</Y>
</Point>
<Point>
<X>525</X>
<Y>237</Y>
</Point>
</RoutePoints>
</Connector>
<Connector ID="DesignRelation:TBEDI_XML_NODES_TBEDI_XML_TEMPLATES" ZOrder="5" LineWidth="11">
<RoutePoints>
<Point>
<X>770</X>
<Y>94</Y>
</Point>
<Point>
<X>1069</X>
<Y>94</Y>
</Point>
</RoutePoints>
</Connector>
<Connector ID="DesignRelation:FK_TBEDI_XML_NODES" ZOrder="3" LineWidth="11">
<RoutePoints>
<Point>
<X>5</X>
<Y>25</Y>
</Point>
<Point>
<X>-25</X>
<Y>25</Y>
</Point>
<Point>
<X>-25</X>
<Y>-22</Y>
</Point>
<Point>
<X>22</X>
<Y>-22</Y>
</Point>
<Point>
<X>22</X>
<Y>8</Y>
</Point>
</RoutePoints>
</Connector>
<Connector ID="DesignRelation:FK_TBEDI_XML_TYPES" ZOrder="2" LineWidth="11">
<RoutePoints>
<Point>
<X>5</X>
<Y>33</Y>
</Point>
<Point>
<X>-33</X>
<Y>33</Y>
</Point>
<Point>
<X>-33</X>
<Y>-30</Y>
</Point>
<Point>
<X>30</X>
<Y>-30</Y>
</Point>
<Point>
<X>30</X>
<Y>8</Y>
</Point>
</RoutePoints>
</Connector>
</Connectors>
</DiagramLayout>

View File

@ -3,26 +3,19 @@ Imports DevExpress.XtraGrid.Views.Grid
Imports DigitalData.GUIs.Common
Imports DigitalData.Modules.Logging
Imports MultiTool.Shared
Imports MultiTool.Shared.Constants
Public Class GridLoader
Inherits BaseClass
Public Sub New(pLogConfig As LogConfig)
Private ReadOnly TemplateConfig As Winline.Configuration
Public Sub New(pLogConfig As LogConfig, pTemplateConfig As Winline.Configuration)
MyBase.New(pLogConfig, pLogConfig.GetLogger())
TemplateConfig = pTemplateConfig
End Sub
Public Function GetGridFromElement(pGrid As GridControl, pTable As Schemas.Schema.Table) As GridControl
Dim oInvisibleColumns As New List(Of String) From {
"BELEGKEY",
"Zeilennummer",
"Belegart",
"Infotext",
"Leistungsdatum",
"Projektnummer",
"Auftragsreferenz",
"Laufnummer"
}
pGrid.Name = pTable.Name
pGrid.ForceInitialize()
pGrid.MainView.PopulateColumns()
@ -32,11 +25,16 @@ Public Class GridLoader
oView.OptionsBehavior.Editable = False
For Each oCol In pTable.Columns
Dim oVisibleIndex As Integer = 0
Dim oVisibleIndex As Integer
' Hide certain columns
If oInvisibleColumns.Contains(oCol.Name) Then
oVisibleIndex = -1
If oCol.Config IsNot Nothing Then
If oCol.Config.IsVisible = False Then
oVisibleIndex = -1
Else
oVisibleIndex = oCol.Config.OrderKey
End If
Else
oVisibleIndex = 0
End If
Dim oColumn = New Columns.GridColumn With {
@ -48,7 +46,6 @@ Public Class GridLoader
}
oView.Columns.Add(oColumn)
Next
oView.BestFitColumns()
@ -64,20 +61,21 @@ Public Class GridLoader
Private Function GetColumnType(pColumn As Schemas.Schema.Column)
Select Case pColumn.DataType
Case MultiTool.Shared.Constants.ColumnType.Boolean
Case ColumnType.Boolean
Return DevExpress.Data.UnboundColumnType.Boolean
Case MultiTool.Shared.Constants.ColumnType.Date
Case ColumnType.Date
Return DevExpress.Data.UnboundColumnType.DateTime
Case MultiTool.Shared.Constants.ColumnType.Integer
Case ColumnType.Integer
Return DevExpress.Data.UnboundColumnType.Integer
Case MultiTool.Shared.Constants.ColumnType.Decimal
Case ColumnType.Decimal
Return DevExpress.Data.UnboundColumnType.Decimal
Case Else
Return DevExpress.Data.UnboundColumnType.String
End Select
End Function

View File

@ -135,6 +135,7 @@
<Reference Include="System.Runtime.Serialization" />
<Reference Include="System.ServiceModel" />
<Reference Include="System.Transactions" />
<Reference Include="System.Web.Services" />
<Reference Include="System.Windows.Forms" />
<Reference Include="System.Xml" />
<Reference Include="System.Core" />
@ -156,6 +157,11 @@
<Import Include="System.Threading.Tasks" />
</ItemGroup>
<ItemGroup>
<Compile Include="DS_DD_ECM.Designer.vb">
<AutoGen>True</AutoGen>
<DesignTime>True</DesignTime>
<DependentUpon>DS_DD_ECM.xsd</DependentUpon>
</Compile>
<Compile Include="FormHelpers.vb" />
<Compile Include="frmImportMain.Designer.vb">
<DependentUpon>frmImportMain.vb</DependentUpon>
@ -169,12 +175,6 @@
<Compile Include="frmMain.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmMapper.Designer.vb">
<DependentUpon>frmMapper.vb</DependentUpon>
</Compile>
<Compile Include="frmMapper.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmRowEditor.Designer.vb">
<DependentUpon>frmRowEditor.vb</DependentUpon>
</Compile>
@ -248,9 +248,6 @@
<EmbeddedResource Include="frmMain.resx">
<DependentUpon>frmMain.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmMapper.resx">
<DependentUpon>frmMapper.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmRowEditor.resx">
<DependentUpon>frmRowEditor.vb</DependentUpon>
</EmbeddedResource>
@ -290,6 +287,17 @@
</EmbeddedResource>
</ItemGroup>
<ItemGroup>
<None Include="DS_DD_ECM.xsc">
<DependentUpon>DS_DD_ECM.xsd</DependentUpon>
</None>
<None Include="DS_DD_ECM.xsd">
<SubType>Designer</SubType>
<Generator>MSDataSetGenerator</Generator>
<LastGenOutput>DS_DD_ECM.Designer.vb</LastGenOutput>
</None>
<None Include="DS_DD_ECM.xss">
<DependentUpon>DS_DD_ECM.xsd</DependentUpon>
</None>
<None Include="My Project\app.manifest" />
<None Include="My Project\Application.myapp">
<Generator>MyApplicationCodeGenerator</Generator>

View File

@ -53,6 +53,17 @@ Namespace My
Return defaultInstance
End Get
End Property
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.SpecialSettingAttribute(Global.System.Configuration.SpecialSetting.ConnectionString), _
Global.System.Configuration.DefaultSettingValueAttribute("Data Source=SDD-VMP04-SQL17\SCHAUM;Initial Catalog=DD_ECM;Persist Security Info=T"& _
"rue;User ID=sa;Password=dd")> _
Public ReadOnly Property DD_ECMConnectionString() As String
Get
Return CType(Me("DD_ECMConnectionString"),String)
End Get
End Property
End Class
End Namespace

View File

@ -1,7 +1,14 @@
<?xml version='1.0' encoding='utf-8'?>
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" UseMySettingsClassName="true">
<Profiles>
<Profile Name="(Default)" />
</Profiles>
<Settings />
</SettingsFile>
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" GeneratedClassNamespace="My" GeneratedClassName="MySettings" UseMySettingsClassName="true">
<Profiles />
<Settings>
<Setting Name="DD_ECMConnectionString" Type="(Connection string)" Scope="Application">
<DesignTimeValue Profile="(Default)">&lt;?xml version="1.0" encoding="utf-16"?&gt;
&lt;SerializableConnectionString xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema"&gt;
&lt;ConnectionString&gt;Data Source=SDD-VMP04-SQL17\SCHAUM;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd&lt;/ConnectionString&gt;
&lt;ProviderName&gt;System.Data.SqlClient&lt;/ProviderName&gt;
&lt;/SerializableConnectionString&gt;</DesignTimeValue>
<Value Profile="(Default)">Data Source=SDD-VMP04-SQL17\SCHAUM;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd</Value>
</Setting>
</Settings>
</SettingsFile>

View File

@ -31,30 +31,53 @@ Partial Class frmConfig
Me.barDockControlLeft = New DevExpress.XtraBars.BarDockControl()
Me.barDockControlRight = New DevExpress.XtraBars.BarDockControl()
Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl()
Me.XtraTabPage1 = New DevExpress.XtraTab.XtraTabPage()
Me.tabPageBasic = New DevExpress.XtraTab.XtraTabPage()
Me.LayoutControl1 = New DevExpress.XtraLayout.LayoutControl()
Me.txtBaseURL = New DevExpress.XtraEditors.TextEdit()
Me.txtUsername = New DevExpress.XtraEditors.TextEdit()
Me.txtPassword = New DevExpress.XtraEditors.TextEdit()
Me.txtImportBasePath = New DevExpress.XtraEditors.TextEdit()
Me.txtImportRelativePath = New DevExpress.XtraEditors.TextEdit()
Me.txtInputDir = New DevExpress.XtraEditors.TextEdit()
Me.txtOutputDir = New DevExpress.XtraEditors.TextEdit()
Me.txtSchemaDir = New DevExpress.XtraEditors.TextEdit()
Me.Root = New DevExpress.XtraLayout.LayoutControlGroup()
Me.TabbedControlGroup1 = New DevExpress.XtraLayout.TabbedControlGroup()
Me.LayoutControlGroup2 = New DevExpress.XtraLayout.LayoutControlGroup()
Me.LayoutControlItem4 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem7 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem8 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlGroup1 = New DevExpress.XtraLayout.LayoutControlGroup()
Me.LayoutControlItem6 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem5 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem1 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem3 = New DevExpress.XtraLayout.LayoutControlItem()
Me.tabPageSchema = New DevExpress.XtraTab.XtraTabPage()
Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
Me.TBEDIXMLITEMSBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.DS_DD_ECM = New MultiTool.Form.DS_DD_ECM()
Me.GridView1 = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.colGUID = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colXML_NAME = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colXML_NODE_ID = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colXML_TYPE_ID = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colORDER_KEY = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colFUNCTION_ID = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colIS_VISIBLE = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colIS_READ_ONLY = New DevExpress.XtraGrid.Columns.GridColumn()
Me.colIS_REQUIRED = New DevExpress.XtraGrid.Columns.GridColumn()
Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.TBEDI_XML_ITEMSTableAdapter = New MultiTool.Form.DS_DD_ECMTableAdapters.TBEDI_XML_ITEMSTableAdapter()
CType(Me.ToolbarFormManager1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.XtraTabControl1.SuspendLayout()
Me.XtraTabPage1.SuspendLayout()
Me.tabPageBasic.SuspendLayout()
CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.LayoutControl1.SuspendLayout()
CType(Me.txtBaseURL.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
@ -62,13 +85,26 @@ Partial Class frmConfig
CType(Me.txtPassword.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtImportBasePath.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtImportRelativePath.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtInputDir.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtOutputDir.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtSchemaDir.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.Root, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TabbedControlGroup1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlGroup2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem8, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlGroup1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).BeginInit()
Me.tabPageSchema.SuspendLayout()
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBEDIXMLITEMSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DS_DD_ECM, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
@ -117,17 +153,17 @@ Partial Class frmConfig
Me.XtraTabControl1.Dock = System.Windows.Forms.DockStyle.Fill
Me.XtraTabControl1.Location = New System.Drawing.Point(0, 63)
Me.XtraTabControl1.Name = "XtraTabControl1"
Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPage1
Me.XtraTabControl1.SelectedTabPage = Me.tabPageBasic
Me.XtraTabControl1.Size = New System.Drawing.Size(832, 422)
Me.XtraTabControl1.TabIndex = 1
Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPage1})
Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.tabPageBasic, Me.tabPageSchema})
'
'XtraTabPage1
'tabPageBasic
'
Me.XtraTabPage1.Controls.Add(Me.LayoutControl1)
Me.XtraTabPage1.Name = "XtraTabPage1"
Me.XtraTabPage1.Size = New System.Drawing.Size(830, 397)
Me.XtraTabPage1.Text = "Basis"
Me.tabPageBasic.Controls.Add(Me.LayoutControl1)
Me.tabPageBasic.Name = "tabPageBasic"
Me.tabPageBasic.Size = New System.Drawing.Size(830, 397)
Me.tabPageBasic.Text = "Basis"
'
'LayoutControl1
'
@ -136,6 +172,9 @@ Partial Class frmConfig
Me.LayoutControl1.Controls.Add(Me.txtPassword)
Me.LayoutControl1.Controls.Add(Me.txtImportBasePath)
Me.LayoutControl1.Controls.Add(Me.txtImportRelativePath)
Me.LayoutControl1.Controls.Add(Me.txtInputDir)
Me.LayoutControl1.Controls.Add(Me.txtOutputDir)
Me.LayoutControl1.Controls.Add(Me.txtSchemaDir)
Me.LayoutControl1.Dock = System.Windows.Forms.DockStyle.Fill
Me.LayoutControl1.Location = New System.Drawing.Point(0, 0)
Me.LayoutControl1.Name = "LayoutControl1"
@ -146,7 +185,7 @@ Partial Class frmConfig
'
'txtBaseURL
'
Me.txtBaseURL.Location = New System.Drawing.Point(133, 48)
Me.txtBaseURL.Location = New System.Drawing.Point(133, 50)
Me.txtBaseURL.MenuManager = Me.ToolbarFormManager1
Me.txtBaseURL.Name = "txtBaseURL"
Me.txtBaseURL.Size = New System.Drawing.Size(670, 20)
@ -155,7 +194,7 @@ Partial Class frmConfig
'
'txtUsername
'
Me.txtUsername.Location = New System.Drawing.Point(133, 78)
Me.txtUsername.Location = New System.Drawing.Point(133, 80)
Me.txtUsername.MenuManager = Me.ToolbarFormManager1
Me.txtUsername.Name = "txtUsername"
Me.txtUsername.Size = New System.Drawing.Size(277, 20)
@ -164,7 +203,7 @@ Partial Class frmConfig
'
'txtPassword
'
Me.txtPassword.Location = New System.Drawing.Point(526, 78)
Me.txtPassword.Location = New System.Drawing.Point(526, 80)
Me.txtPassword.MenuManager = Me.ToolbarFormManager1
Me.txtPassword.Name = "txtPassword"
Me.txtPassword.Size = New System.Drawing.Size(277, 20)
@ -173,7 +212,7 @@ Partial Class frmConfig
'
'txtImportBasePath
'
Me.txtImportBasePath.Location = New System.Drawing.Point(133, 108)
Me.txtImportBasePath.Location = New System.Drawing.Point(133, 110)
Me.txtImportBasePath.MenuManager = Me.ToolbarFormManager1
Me.txtImportBasePath.Name = "txtImportBasePath"
Me.txtImportBasePath.Size = New System.Drawing.Size(670, 20)
@ -182,28 +221,101 @@ Partial Class frmConfig
'
'txtImportRelativePath
'
Me.txtImportRelativePath.Location = New System.Drawing.Point(133, 138)
Me.txtImportRelativePath.Location = New System.Drawing.Point(133, 140)
Me.txtImportRelativePath.MenuManager = Me.ToolbarFormManager1
Me.txtImportRelativePath.Name = "txtImportRelativePath"
Me.txtImportRelativePath.Size = New System.Drawing.Size(670, 20)
Me.txtImportRelativePath.StyleController = Me.LayoutControl1
Me.txtImportRelativePath.TabIndex = 8
'
'txtInputDir
'
Me.txtInputDir.Location = New System.Drawing.Point(133, 50)
Me.txtInputDir.MenuManager = Me.ToolbarFormManager1
Me.txtInputDir.Name = "txtInputDir"
Me.txtInputDir.Size = New System.Drawing.Size(670, 20)
Me.txtInputDir.StyleController = Me.LayoutControl1
Me.txtInputDir.TabIndex = 9
'
'txtOutputDir
'
Me.txtOutputDir.Location = New System.Drawing.Point(133, 80)
Me.txtOutputDir.MenuManager = Me.ToolbarFormManager1
Me.txtOutputDir.Name = "txtOutputDir"
Me.txtOutputDir.Size = New System.Drawing.Size(670, 20)
Me.txtOutputDir.StyleController = Me.LayoutControl1
Me.txtOutputDir.TabIndex = 10
'
'txtSchemaDir
'
Me.txtSchemaDir.Location = New System.Drawing.Point(133, 110)
Me.txtSchemaDir.MenuManager = Me.ToolbarFormManager1
Me.txtSchemaDir.Name = "txtSchemaDir"
Me.txtSchemaDir.Size = New System.Drawing.Size(670, 20)
Me.txtSchemaDir.StyleController = Me.LayoutControl1
Me.txtSchemaDir.TabIndex = 11
'
'Root
'
Me.Root.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
Me.Root.GroupBordersVisible = False
Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlGroup1})
Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.TabbedControlGroup1})
Me.Root.Name = "Root"
Me.Root.Size = New System.Drawing.Size(830, 397)
Me.Root.TextVisible = False
'
'TabbedControlGroup1
'
Me.TabbedControlGroup1.Location = New System.Drawing.Point(0, 0)
Me.TabbedControlGroup1.Name = "TabbedControlGroup1"
Me.TabbedControlGroup1.SelectedTabPage = Me.LayoutControlGroup2
Me.TabbedControlGroup1.Size = New System.Drawing.Size(810, 377)
Me.TabbedControlGroup1.TabPages.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlGroup2, Me.LayoutControlGroup1})
'
'LayoutControlGroup2
'
Me.LayoutControlGroup2.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem4, Me.LayoutControlItem7, Me.LayoutControlItem8})
Me.LayoutControlGroup2.Location = New System.Drawing.Point(0, 0)
Me.LayoutControlGroup2.Name = "LayoutControlGroup2"
Me.LayoutControlGroup2.Size = New System.Drawing.Size(786, 330)
Me.LayoutControlGroup2.Text = "Verzeichnisse"
'
'LayoutControlItem4
'
Me.LayoutControlItem4.Control = Me.txtInputDir
Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 0)
Me.LayoutControlItem4.Name = "LayoutControlItem4"
Me.LayoutControlItem4.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem4.Size = New System.Drawing.Size(786, 30)
Me.LayoutControlItem4.Text = "Eingangsverzeichnis"
Me.LayoutControlItem4.TextSize = New System.Drawing.Size(103, 13)
'
'LayoutControlItem7
'
Me.LayoutControlItem7.Control = Me.txtOutputDir
Me.LayoutControlItem7.Location = New System.Drawing.Point(0, 30)
Me.LayoutControlItem7.Name = "LayoutControlItem7"
Me.LayoutControlItem7.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem7.Size = New System.Drawing.Size(786, 30)
Me.LayoutControlItem7.Text = "Ausgangsverzeichnis"
Me.LayoutControlItem7.TextSize = New System.Drawing.Size(103, 13)
'
'LayoutControlItem8
'
Me.LayoutControlItem8.Control = Me.txtSchemaDir
Me.LayoutControlItem8.Location = New System.Drawing.Point(0, 60)
Me.LayoutControlItem8.Name = "LayoutControlItem8"
Me.LayoutControlItem8.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem8.Size = New System.Drawing.Size(786, 270)
Me.LayoutControlItem8.Text = "Vorlagenverzeichnis"
Me.LayoutControlItem8.TextSize = New System.Drawing.Size(103, 13)
'
'LayoutControlGroup1
'
Me.LayoutControlGroup1.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem6, Me.LayoutControlItem5, Me.LayoutControlItem2, Me.LayoutControlItem1, Me.LayoutControlItem3})
Me.LayoutControlGroup1.Location = New System.Drawing.Point(0, 0)
Me.LayoutControlGroup1.Name = "LayoutControlGroup1"
Me.LayoutControlGroup1.Size = New System.Drawing.Size(810, 377)
Me.LayoutControlGroup1.Size = New System.Drawing.Size(786, 330)
Me.LayoutControlGroup1.Text = "WebService"
'
'LayoutControlItem6
@ -212,7 +324,7 @@ Partial Class frmConfig
Me.LayoutControlItem6.Location = New System.Drawing.Point(0, 90)
Me.LayoutControlItem6.Name = "LayoutControlItem6"
Me.LayoutControlItem6.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem6.Size = New System.Drawing.Size(786, 242)
Me.LayoutControlItem6.Size = New System.Drawing.Size(786, 240)
Me.LayoutControlItem6.Text = "Import Relativer Pfad"
Me.LayoutControlItem6.TextSize = New System.Drawing.Size(103, 13)
'
@ -256,6 +368,110 @@ Partial Class frmConfig
Me.LayoutControlItem3.Text = "Password"
Me.LayoutControlItem3.TextSize = New System.Drawing.Size(103, 13)
'
'tabPageSchema
'
Me.tabPageSchema.Controls.Add(Me.GridControl1)
Me.tabPageSchema.Name = "tabPageSchema"
Me.tabPageSchema.Size = New System.Drawing.Size(830, 397)
Me.tabPageSchema.Text = "Schema"
'
'GridControl1
'
Me.GridControl1.DataSource = Me.TBEDIXMLITEMSBindingSource
Me.GridControl1.Dock = System.Windows.Forms.DockStyle.Fill
Me.GridControl1.Location = New System.Drawing.Point(0, 0)
Me.GridControl1.MainView = Me.GridView1
Me.GridControl1.MenuManager = Me.ToolbarFormManager1
Me.GridControl1.Name = "GridControl1"
Me.GridControl1.Size = New System.Drawing.Size(830, 397)
Me.GridControl1.TabIndex = 0
Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView1})
'
'TBEDIXMLITEMSBindingSource
'
Me.TBEDIXMLITEMSBindingSource.DataMember = "TBEDI_XML_ITEMS"
Me.TBEDIXMLITEMSBindingSource.DataSource = Me.DS_DD_ECM
'
'DS_DD_ECM
'
Me.DS_DD_ECM.DataSetName = "DS_DD_ECM"
Me.DS_DD_ECM.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
'
'GridView1
'
Me.GridView1.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colGUID, Me.colXML_NAME, Me.colXML_NODE_ID, Me.colXML_TYPE_ID, Me.colORDER_KEY, Me.colFUNCTION_ID, Me.colIS_VISIBLE, Me.colIS_READ_ONLY, Me.colIS_REQUIRED})
Me.GridView1.GridControl = Me.GridControl1
Me.GridView1.GroupCount = 1
Me.GridView1.Name = "GridView1"
Me.GridView1.SortInfo.AddRange(New DevExpress.XtraGrid.Columns.GridColumnSortInfo() {New DevExpress.XtraGrid.Columns.GridColumnSortInfo(Me.colXML_NODE_ID, DevExpress.Data.ColumnSortOrder.Ascending)})
'
'colGUID
'
Me.colGUID.FieldName = "GUID"
Me.colGUID.Name = "colGUID"
Me.colGUID.Visible = True
Me.colGUID.VisibleIndex = 0
'
'colXML_NAME
'
Me.colXML_NAME.FieldName = "XML_NAME"
Me.colXML_NAME.Name = "colXML_NAME"
Me.colXML_NAME.Visible = True
Me.colXML_NAME.VisibleIndex = 1
'
'colXML_NODE_ID
'
Me.colXML_NODE_ID.Caption = "Tabelle"
Me.colXML_NODE_ID.FieldName = "XML_NODE_ID"
Me.colXML_NODE_ID.Name = "colXML_NODE_ID"
Me.colXML_NODE_ID.Visible = True
Me.colXML_NODE_ID.VisibleIndex = 2
'
'colXML_TYPE_ID
'
Me.colXML_TYPE_ID.FieldName = "XML_TYPE_ID"
Me.colXML_TYPE_ID.Name = "colXML_TYPE_ID"
Me.colXML_TYPE_ID.Visible = True
Me.colXML_TYPE_ID.VisibleIndex = 2
'
'colORDER_KEY
'
Me.colORDER_KEY.FieldName = "ORDER_KEY"
Me.colORDER_KEY.Name = "colORDER_KEY"
Me.colORDER_KEY.Visible = True
Me.colORDER_KEY.VisibleIndex = 3
'
'colFUNCTION_ID
'
Me.colFUNCTION_ID.FieldName = "FUNCTION_ID"
Me.colFUNCTION_ID.Name = "colFUNCTION_ID"
Me.colFUNCTION_ID.Visible = True
Me.colFUNCTION_ID.VisibleIndex = 4
'
'colIS_VISIBLE
'
Me.colIS_VISIBLE.Caption = "Visible?"
Me.colIS_VISIBLE.FieldName = "IS_VISIBLE"
Me.colIS_VISIBLE.Name = "colIS_VISIBLE"
Me.colIS_VISIBLE.Visible = True
Me.colIS_VISIBLE.VisibleIndex = 6
'
'colIS_READ_ONLY
'
Me.colIS_READ_ONLY.Caption = "ReadOnly?"
Me.colIS_READ_ONLY.FieldName = "IS_READ_ONLY"
Me.colIS_READ_ONLY.Name = "colIS_READ_ONLY"
Me.colIS_READ_ONLY.Visible = True
Me.colIS_READ_ONLY.VisibleIndex = 5
'
'colIS_REQUIRED
'
Me.colIS_REQUIRED.Caption = "Required?"
Me.colIS_REQUIRED.FieldName = "IS_REQUIRED"
Me.colIS_REQUIRED.Name = "colIS_REQUIRED"
Me.colIS_REQUIRED.Visible = True
Me.colIS_REQUIRED.VisibleIndex = 7
'
'RibbonControl1
'
Me.RibbonControl1.CommandLayout = DevExpress.XtraBars.Ribbon.CommandLayout.Simplified
@ -301,6 +517,10 @@ Partial Class frmConfig
Me.RibbonPage2.Name = "RibbonPage2"
Me.RibbonPage2.Text = "RibbonPage2"
'
'TBEDI_XML_ITEMSTableAdapter
'
Me.TBEDI_XML_ITEMSTableAdapter.ClearBeforeFill = True
'
'frmConfig
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@ -321,7 +541,7 @@ Partial Class frmConfig
CType(Me.ToolbarFormManager1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.XtraTabControl1.ResumeLayout(False)
Me.XtraTabPage1.ResumeLayout(False)
Me.tabPageBasic.ResumeLayout(False)
CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.LayoutControl1.ResumeLayout(False)
CType(Me.txtBaseURL.Properties, System.ComponentModel.ISupportInitialize).EndInit()
@ -329,13 +549,26 @@ Partial Class frmConfig
CType(Me.txtPassword.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtImportBasePath.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtImportRelativePath.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtInputDir.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtOutputDir.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtSchemaDir.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.Root, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TabbedControlGroup1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlGroup2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem8, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlGroup1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).EndInit()
Me.tabPageSchema.ResumeLayout(False)
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBEDIXMLITEMSBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DS_DD_ECM, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridView1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
@ -347,7 +580,7 @@ Partial Class frmConfig
Friend WithEvents barDockControlLeft As DevExpress.XtraBars.BarDockControl
Friend WithEvents barDockControlRight As DevExpress.XtraBars.BarDockControl
Friend WithEvents XtraTabControl1 As XtraTabControl
Friend WithEvents XtraTabPage1 As XtraTabPage
Friend WithEvents tabPageBasic As XtraTabPage
Friend WithEvents LayoutControl1 As LayoutControl
Friend WithEvents Root As LayoutControlGroup
Friend WithEvents txtBaseURL As TextEdit
@ -355,16 +588,39 @@ Partial Class frmConfig
Friend WithEvents txtPassword As TextEdit
Friend WithEvents txtImportBasePath As TextEdit
Friend WithEvents txtImportRelativePath As TextEdit
Friend WithEvents LayoutControlGroup1 As LayoutControlGroup
Friend WithEvents LayoutControlItem6 As LayoutControlItem
Friend WithEvents LayoutControlItem5 As LayoutControlItem
Friend WithEvents LayoutControlItem2 As LayoutControlItem
Friend WithEvents LayoutControlItem1 As LayoutControlItem
Friend WithEvents LayoutControlItem3 As LayoutControlItem
Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents tabPageSchema As XtraTabPage
Friend WithEvents GridControl1 As DevExpress.XtraGrid.GridControl
Friend WithEvents GridView1 As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents DS_DD_ECM As DS_DD_ECM
Friend WithEvents TBEDIXMLITEMSBindingSource As BindingSource
Friend WithEvents TBEDI_XML_ITEMSTableAdapter As DS_DD_ECMTableAdapters.TBEDI_XML_ITEMSTableAdapter
Friend WithEvents TabbedControlGroup1 As TabbedControlGroup
Friend WithEvents LayoutControlGroup1 As LayoutControlGroup
Friend WithEvents LayoutControlItem6 As LayoutControlItem
Friend WithEvents LayoutControlItem5 As LayoutControlItem
Friend WithEvents LayoutControlItem2 As LayoutControlItem
Friend WithEvents LayoutControlItem1 As LayoutControlItem
Friend WithEvents LayoutControlItem3 As LayoutControlItem
Friend WithEvents txtInputDir As TextEdit
Friend WithEvents txtOutputDir As TextEdit
Friend WithEvents txtSchemaDir As TextEdit
Friend WithEvents LayoutControlGroup2 As LayoutControlGroup
Friend WithEvents LayoutControlItem4 As LayoutControlItem
Friend WithEvents LayoutControlItem7 As LayoutControlItem
Friend WithEvents LayoutControlItem8 As LayoutControlItem
Friend WithEvents colGUID As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colXML_NAME As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colXML_NODE_ID As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colXML_TYPE_ID As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colORDER_KEY As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colFUNCTION_ID As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colIS_VISIBLE As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colIS_READ_ONLY As DevExpress.XtraGrid.Columns.GridColumn
Friend WithEvents colIS_REQUIRED As DevExpress.XtraGrid.Columns.GridColumn
End Class

View File

@ -120,6 +120,12 @@
<metadata name="ToolbarFormManager1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<metadata name="TBEDIXMLITEMSBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>313, 17</value>
</metadata>
<metadata name="DS_DD_ECM.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>194, 17</value>
</metadata>
<assembly alias="DevExpress.Data.v19.2" name="DevExpress.Data.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<data name="BarButtonItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v19.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
@ -137,4 +143,10 @@
IC8+DQo8L3N2Zz4L
</value>
</data>
<metadata name="DS_DD_ECM.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>194, 17</value>
</metadata>
<metadata name="TBEDI_XML_ITEMSTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>533, 17</value>
</metadata>
</root>

View File

@ -1,7 +1,12 @@
Imports DigitalData.Modules.Config
Imports System.Data.SqlClient
Imports DigitalData.Modules.Config
Imports DigitalData.Modules.Database
Imports DigitalData.Modules.Logging
Public Class frmConfig
Public Property ConfigManager As ConfigManager(Of MultiTool.Shared.Config)
Private LogConfig As LogConfig
Private FormHelper As FormHelper
Private ReadOnly Property Config As MultiTool.Shared.Config
Get
@ -9,7 +14,27 @@ Public Class frmConfig
End Get
End Property
Public Sub New(pLogConfig As LogConfig)
' Dieser Aufruf ist für den Designer erforderlich.
InitializeComponent()
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
LogConfig = pLogConfig
FormHelper = New FormHelper(pLogConfig)
End Sub
Private Sub frmConfig_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim oConnectionString = MSSQLServer.DecryptConnectionString(Config.ConnectionString)
Dim oBuilder As New SqlConnectionStringBuilder(oConnectionString)
oBuilder.InitialCatalog = "DD_ECM"
TBEDI_XML_ITEMSTableAdapter.Connection.ConnectionString = oBuilder.ToString()
TBEDI_XML_ITEMSTableAdapter.Fill(Me.DS_DD_ECM.TBEDI_XML_ITEMS)
txtInputDir.EditValue = Config.InputDirectory
txtOutputDir.EditValue = Config.OutputDirectory
txtSchemaDir.EditValue = Config.SchemaDirectory
txtBaseURL.EditValue = Config.Webservice.BaseUrl
txtUsername.EditValue = Config.Webservice.Username
txtPassword.EditValue = Config.Webservice.Password
@ -23,6 +48,19 @@ Public Class frmConfig
Config.Webservice.Password = txtPassword.EditValue
Config.Webservice.ImportBasePath = txtImportBasePath.EditValue
Config.Webservice.ImportRelativePath = txtImportRelativePath.EditValue
Config.InputDirectory = txtInputDir.EditValue
Config.OutputDirectory = txtOutputDir.EditValue
Config.SchemaDirectory = txtSchemaDir.EditValue
ConfigManager.Save()
Try
TBEDIXMLITEMSBindingSource.EndEdit()
TBEDI_XML_ITEMSTableAdapter.Update(DS_DD_ECM.TBEDI_XML_ITEMS)
Catch ex As Exception
FormHelper.ShowError(ex, "Speichern der Konfiguration")
End Try
End Sub
End Class

View File

@ -112,12 +112,17 @@ Public Class frmImportMain
' Load WinLine Data
Try
SplashScreenManager.SetWaitFormDescription("Lade Basisdaten")
Winline.Mandators.Clear()
Winline.LoadEconomicYears()
Await Winline.LoadMandators()
' TODO: Comment in when we finally use the database for additional configuration
'Winline.LoadTemplateConfiguration()
SplashScreenManager.SetWaitFormDescription("Lade Schema Informationen")
If Await Winline.LoadTemplateConfiguration() = False Then
Logger.Warn("Template Configuration was not loaded!")
Winline.TemplateConfiguration = Nothing
End If
For Each oMandator As Mandator In Winline.Mandators
SplashScreenManager.SetWaitFormDescription(String.Format(My.Resources.frmImportMainExtra.Lade__0__Konten, oMandator.Id))
@ -136,13 +141,15 @@ Public Class frmImportMain
DocumentLoader = New DocumentLoader(LogConfig, Winline)
SchemaLoader = New SchemaLoader(LogConfig)
GridLoader = New GridLoader(LogConfig)
GridLoader = New GridLoader(LogConfig, Winline.TemplateConfiguration)
SplashScreenManager.SetWaitFormDescription(My.Resources.frmImportMainExtra.Lade_Vorlagen)
SchemaLoader.LoadFiles(ConfigManager.Config.SchemaDirectory)
CurrentSchemaName = SchemaLoader.SchemaList.First().FullName
CurrentSchema = SchemaLoader.GetSchemaFromFile(CurrentSchemaName)
CurrentSchema = SchemaLoader.UpdateSchemaWithDatabaseConfiguration(CurrentSchema, Winline.TemplateConfiguration)
Grids = CreateGridsAndColumns(CurrentSchema)
@ -223,8 +230,18 @@ Public Class frmImportMain
Dim oDocumentRow = CurrentDocument.Rows.
Where(Function(r) r.Id.ToString = oRow.Item(COLUMN_GUID)).
SingleOrDefault()
Dim oSchemaTable = CurrentSchema.Tables.
Where(Function(t) t.Name = oGrid.Name).
SingleOrDefault()
Dim oForm As New frmRowEditor(LogConfig, oColumns, oDocumentRow, CurrentDocument.Mandator, Winline)
Dim oForm As New frmRowEditor(
LogConfig,
oColumns,
oDocumentRow,
CurrentDocument.Mandator,
Winline,
oSchemaTable
)
If oForm.ShowDialog() = DialogResult.OK Then
Dim oModifiedRow = oForm.DocumentRow
Dim oIndex = CurrentDocument.Rows.IndexOf(oModifiedRow)
@ -479,7 +496,7 @@ Public Class frmImportMain
End Sub
Private Sub btnConfig_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles btnConfig.ItemClick
Dim oForm As New frmConfig With {
Dim oForm As New frmConfig(LogConfig) With {
.ConfigManager = ConfigManager
}

View File

@ -1,50 +0,0 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmMapper
Inherits System.Windows.Forms.Form
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Wird vom Windows Form-Designer benötigt.
Private components As System.ComponentModel.IContainer
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.Button1 = New System.Windows.Forms.Button()
Me.SuspendLayout()
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(422, 242)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(75, 23)
Me.Button1.TabIndex = 0
Me.Button1.Text = "Button1"
Me.Button1.UseVisualStyleBackColor = True
'
'frmMapper
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(800, 450)
Me.Controls.Add(Me.Button1)
Me.Name = "frmMapper"
Me.Text = "frmMapper"
Me.ResumeLayout(False)
End Sub
Friend WithEvents Button1 As Button
End Class

View File

@ -1,120 +0,0 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
</root>

View File

@ -1,36 +0,0 @@
Imports AutoMapper
Imports MultiTool.Shared
Public Class frmMapper
Public ExampleDict As New Dictionary(Of String, Object) From {
{"Laufnummer", "1"},
{"Rechnungsnummer", "4711"}
}
Public ExampleMapping As New Dictionary(Of String, String) From {
{"Laufnummer", "Text1"},
{"Rechnungsnummer", "Text2"}
}
Public Class ExampleObj
Public Property Text1 As String
Public Property Text2 As String
End Class
Private Sub frmMapper_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'Dim oConfig As New MapperConfiguration(AddressOf GetConfig)
'Dim oMapper = oConfig.CreateMapper()
'Dim oObj = oMapper.Map(Of ExampleObj)(ExampleDict)
End Sub
'Private Sub GetConfig(c As IMapperConfigurationExpression)
' c.CreateMap(Of Dictionary(Of String, Object), ExampleObj)()
' c.AddProfile(New BlaProfile(ExampleMapping))
'End Sub
End Class

View File

@ -1,9 +1,6 @@
Imports DevExpress.XtraGrid.Columns
Imports DevExpress.XtraGrid.Views.Grid
Imports DevExpress.XtraVerticalGrid.Rows
Imports DevExpress.XtraGrid.Views.Grid
Imports MultiTool.Shared.Documents
Imports MultiTool.Shared.Documents.DocumentRow
Imports MultiTool.Shared
Imports DevExpress.XtraEditors.Repository
Imports MultiTool.Shared.Winline
Imports DigitalData.Modules.Language
@ -11,13 +8,14 @@ Imports DevExpress.XtraEditors.Controls
Imports System.Globalization
Imports DevExpress.XtraEditors
Imports DigitalData.Modules.Logging
Imports DevExpress.XtraGrid.Views.Grid.ViewInfo
Imports MultiTool.Shared.Schemas
Public Class frmRowEditor
Private ReadOnly LogConfig As LogConfig
Private ReadOnly Logger As Logger
Private ReadOnly FormHelper As FormHelper
Private ReadOnly _Table As Schema.Table
Private ReadOnly _Columns As List(Of String)
Private ReadOnly _DataTable As New DataTable
Private ReadOnly _Accounts As List(Of Account)
@ -46,7 +44,7 @@ Public Class frmRowEditor
End Get
End Property
Public Sub New(pLogConfig As LogConfig, pColumns As List(Of String), pDocumentRow As DocumentRow, pMandator As Mandator, pWinline As WinlineData)
Public Sub New(pLogConfig As LogConfig, pColumns As List(Of String), pDocumentRow As DocumentRow, pMandator As Mandator, pWinline As WinlineData, pTable As Schema.Table)
' Dieser Aufruf ist für den Designer erforderlich.
InitializeComponent()
@ -59,6 +57,7 @@ Public Class frmRowEditor
_Articles = pWinline.Articles.Where(Function(a) a.Mandator.Id = pMandator.Id).ToList()
_DocumentKinds = pWinline.DocumentKinds.Where(Function(k) k.Mandator.Id = pMandator.Id).ToList()
_DocumentRow = pDocumentRow
_Table = pTable
AccountPicker.DataSource = _Accounts
AccountPicker.DisplayMember = "Name"
@ -102,15 +101,23 @@ Public Class frmRowEditor
Private Sub frmRowEditor_Load(sender As Object, e As EventArgs) Handles Me.Load
Dim oDict = New Dictionary(Of String, FieldValue)
For Each oColumn As String In _Columns
For Each oColumnName As String In _Columns
Dim oField = _DocumentRow.Fields.
Where(Function(f) f.Key = oColumn).
Where(Function(f) f.Key = oColumnName).
SingleOrDefault()
Dim oColumn = _Table.Columns.
Where(Function(c) c.Name = oColumnName).
SingleOrDefault()
' Only Show Columns that are set to visible true
If oColumn?.Config?.IsVisible = False Then
Continue For
End If
If oField.Value Is Nothing Then
oDict.Add(oColumn, New FieldValue())
oDict.Add(oColumnName, New FieldValue())
Else
oDict.Add(oColumn, oField.Value)
oDict.Add(oColumnName, oField.Value)
End If
Next
@ -202,6 +209,7 @@ Public Class frmRowEditor
Private Sub GridView1_CustomRowCellEdit(sender As Object, e As CustomRowCellEditEventArgs) Handles GridView1.CustomRowCellEdit
Dim oDataRow As DataRow = GridView1.GetDataRow(e.RowHandle)
Dim oKey As String = oDataRow.Item(COL_KEY)
If e.Column.FieldName = COL_VALUE_ORIGINAL Or e.Column.FieldName = COL_VALUE_FINAL Then
If e.CellValue.ToString.Length > 100 Then
@ -210,46 +218,52 @@ Public Class frmRowEditor
End If
If e.Column.FieldName = COL_VALUE_FINAL Then
Dim oReadOnlyFields As New List(Of String) From {
"BELEGKEY"
}
Dim oColumn = _Table.Columns.
Where(Function(c) c.Name = oKey).
SingleOrDefault()
If oReadOnlyFields.Contains(oDataRow.Item(COL_KEY)) Then
e.RepositoryItem = ReadOnlyEditor
If oColumn Is Nothing Then
Exit Sub
End If
ElseIf oDataRow.Item(COL_KEY) = "Datum_Auftrag-Bestellung" Then
'e.RepositoryItem = DatePicker
'e.RepositoryItem = MaskDateEditor
ElseIf e.CellValue.ToString.Length > 30 Then
e.RepositoryItem = MultilineEditor
ElseIf oDataRow.Item(COL_KEY) = "Fakt_Kontonummer" Or oDataRow.Item(COL_KEY) = "Lief_Kontonummer" Then
If oColumn.Config?.Function.Name = "GLN" Then
e.RepositoryItem = AccountPicker
ElseIf oDataRow.Item(COL_KEY) = "Artikelnummer" Then
End If
If oColumn.Config?.Function.Name = "EAN" Then
e.RepositoryItem = ArticlePicker
ElseIf oDataRow.Item(COL_KEY) = "Belegart" Then
e.RepositoryItem = DocumentKindPicker
End If
If e.CellValue.ToString.Length > 30 Then
e.RepositoryItem = MultilineEditor
End If
If oColumn.Config?.IsReadOnly Then
e.RepositoryItem = ReadOnlyEditor
End If
End If
End Sub
Private Sub GridView1_CustomDrawCell(sender As Object, e As DevExpress.XtraGrid.Views.Base.RowCellCustomDrawEventArgs) Handles GridView1.CustomDrawCell
Dim oDataRow As DataRow = GridView1.GetDataRow(e.RowHandle)
Dim oKey As String = oDataRow.Item(COL_KEY)
If e.Column.FieldName = COL_VALUE_FINAL Then
Dim oReadOnlyFields As New List(Of String) From {
"BELEGKEY"
}
Dim oColumn = _Table.Columns.
Where(Function(c) c.Name = oKey).
SingleOrDefault()
If oReadOnlyFields.Contains(oDataRow.Item(COL_KEY)) Then
If oColumn Is Nothing Then
Exit Sub
End If
If oColumn.Config?.IsReadOnly Then
e.Appearance.BackColor = Color.LightGray
End If
End If
If oDataRow.Item(COL_VALUE_FINAL) = "" Then
e.Appearance.BackColor = Color.LightCoral
If (oColumn.IsRequired Or oColumn.Config?.IsRequired) AndAlso e.CellValue.ToString.Length = 0 Then
e.Appearance.BackColor = Color.LightCoral
End If
End If
End Sub
End Class

View File

@ -2,10 +2,21 @@
Public Const COLUMN_GUID = "GUID"
Public Enum XmlFunction
None = 0
GLN = 1
EAN = 2
End Enum
Public Const SCHEMA_TYPE_DATE = "xs:date"
Public Const SCHEMA_TYPE_INTEGER = "xs:integer"
Public Const SCHEMA_TYPE_DECIMAL = "xs:decimal"
Public Const SCHEMA_TYPE_BOOLEAN = "xs:boolean"
Public Const DB_TYPE_DATE = "DATE"
Public Const DB_TYPE_INTEGER = "INTEGER"
Public Const DB_TYPE_DECIMAL = "DECIMAL"
Public Const DB_TYPE_BOOLEAN = "BOOLEAN"
Public Enum ColumnType As Integer
[String]
[Integer]

View File

@ -141,7 +141,7 @@
<Compile Include="Winline\Entities\Contact.vb" />
<Compile Include="Winline\Entities\DocumentKind.vb" />
<Compile Include="Winline\Entities\Mandator.vb" />
<Compile Include="Winline\Entities\TemplateColumn.vb" />
<Compile Include="Winline\Entities\ColumnConfig.vb" />
<Compile Include="Winline\WebService.vb" />
<Compile Include="XmlData.vb" />
</ItemGroup>

View File

@ -1,4 +1,6 @@
Namespace Schemas
Imports MultiTool.Shared.Winline
Namespace Schemas
Public Class Schema
Public Property Tables As New List(Of Table)
Public Property Name As String
@ -10,8 +12,9 @@
Class Column
Public Property Name As String
Public Property Required As String
Public Property DataType As Constants.ColumnType
Public Property IsRequired As Boolean
Public Property Config As ColumnConfig
End Class
End Class
End Namespace

View File

@ -63,8 +63,8 @@ Namespace Schemas
Dim oSchemaColumn As New Schema.Column With {
.Name = oName,
.Required = oRequired,
.DataType = oType
.DataType = oType,
.IsRequired = oRequired
}
oSchemaColumns.Add(oSchemaColumn)
Next
@ -79,6 +79,21 @@ Namespace Schemas
Return oSchema
End Function
Public Function UpdateSchemaWithDatabaseConfiguration(pSchema As Schema, pTemplateConfig As Winline.Configuration) As Schema
If pTemplateConfig Is Nothing Then
Return pSchema
End If
For Each oTable In pSchema.Tables
For Each oColumn As Schema.Column In oTable.Columns
Dim oConfig = pTemplateConfig.GetColumn(oColumn.Name)
oColumn.Config = oConfig
Next
Next
Return pSchema
End Function
Public Function GetElementType(pElement As XElement) As Constants.ColumnType
Dim oTypeString = XmlData.GetElementAttribute(pElement, "type")
@ -91,13 +106,13 @@ Namespace Schemas
End If
Select Case oTypeString
Case "xs:date"
Case Constants.SCHEMA_TYPE_DATE
Return Constants.ColumnType.Date
Case "xs:integer"
Case Constants.SCHEMA_TYPE_INTEGER
Return Constants.ColumnType.Integer
Case "xs:decimal"
Case Constants.SCHEMA_TYPE_DECIMAL
Return Constants.ColumnType.Decimal
Case "xs:boolean"
Case Constants.SCHEMA_TYPE_BOOLEAN
Return Constants.ColumnType.Boolean
Case Else
Return Constants.ColumnType.String

View File

@ -1,7 +1,15 @@

''' <summary>
''' Class for loading column/field config from database
''' </summary>
Public Class Configuration
Namespace Winline
''' <summary>
''' Class for loading column/field config from database
''' </summary>
Public Class Configuration
Public Columns As List(Of Winline.ColumnConfig)
End Class
Public Function GetColumn(pName As String) As ColumnConfig
Return Columns.
Where(Function(c) c.Name = pName).
FirstOrDefault()
End Function
End Class
End Namespace

View File

@ -0,0 +1,45 @@
Imports MultiTool.Shared.Constants
Namespace Winline
Public Class ColumnConfig
Public Name As String
Public Root As String
Public Type As ColumnType
Public Template As String
Public OrderKey As Integer
Public IsHead As Boolean
Public IsReadOnly As Boolean
Public IsVisible As Boolean
Public IsRequired As Boolean
Public [Function] As ColumnFunction
Public Class ColumnFunction
Public Id As XmlFunction
Public Name As String
Public Params As String
End Class
Public Shared Function ConvertType(pType As String) As ColumnType
Select Case pType
Case DB_TYPE_DATE
Return ColumnType.Date
Case DB_TYPE_DECIMAL
Return ColumnType.Date
Case DB_TYPE_BOOLEAN
Return ColumnType.Boolean
Case DB_TYPE_INTEGER
Return ColumnType.Integer
Case Else
Return ColumnType.String
End Select
End Function
End Class
End Namespace

View File

@ -1,13 +0,0 @@
Namespace Winline
Public Class TemplateColumn
Public Name As String
Public Root As String
Public Type As String
Public IsHead As Boolean
Public Template As String
Public [ReadOnly] As Boolean
Public Visible As Boolean
Public [Function] As Constants.XmlFunction
End Class
End Namespace

View File

@ -18,13 +18,15 @@ Namespace Winline
Public DocumentKinds As New List(Of DocumentKind)
Public Years As List(Of Integer)
Public TemplateConfiguration As New List(Of TemplateColumn)
Public TemplateConfiguration As New Configuration
'Public XmlConfigHead As List(Of TemplateColumn)
'Public XmlConfigPositions As List(Of TemplateColumn)
Public Const ALL_MESOCOMP = "mesocomp"
Public Const VWEDI_XML_ITEMS = "VWEDI_XML_ITEMS"
Public Const V21_ARTICLENUMBER = "c002"
Public Const V21_ARTICLEDESCRIPTION = "c003"
Public Const V21_MAINARTICLENUMBER = "c011"
@ -87,9 +89,9 @@ Namespace Winline
Dim oArticles As New List(Of Article)
For Each oRow As DataRow In oTable.Rows
Dim oArticleId As String = Utils.NotNull(oRow.Item(V21_ARTICLENUMBER), String.Empty)
Dim oArticleDescription As String = Utils.NotNull(oRow.Item(V21_ARTICLEDESCRIPTION), String.Empty)
Dim oEAN As String = Utils.NotNull(oRow.Item(V21_EAN), String.Empty)
Dim oArticleId As String = GetRowItem(oRow, V21_ARTICLENUMBER, String.Empty)
Dim oArticleDescription As String = GetRowItem(oRow, V21_ARTICLEDESCRIPTION, String.Empty)
Dim oEAN As String = GetRowItem(oRow, V21_EAN, String.Empty)
oArticles.Add(New Article With {
.Id = oArticleId,
@ -129,12 +131,12 @@ Namespace Winline
Dim oAccounts As New List(Of Account)
For Each oRow As DataRow In oTable.Rows
Dim oAccountNumber As String = Utils.NotNull(oRow.Item(V50_ACCOUNTNUMBER), String.Empty)
Dim oAccountName As String = Utils.NotNull(oRow.Item(V50_ACCOUNTNAME), String.Empty)
Dim oStreetName As String = Utils.NotNull(oRow.Item(V50_STREETNAME), String.Empty)
Dim oZipCode As String = Utils.NotNull(oRow.Item(V50_ZIPCODE), String.Empty)
Dim oCityName As String = Utils.NotNull(oRow.Item(V50_CITYNAME), String.Empty)
Dim oGLN As String = Utils.NotNull(oRow.Item(V50_GLN), String.Empty)
Dim oAccountNumber As String = GetRowItem(oRow, V50_ACCOUNTNUMBER, String.Empty)
Dim oAccountName As String = GetRowItem(oRow, V50_ACCOUNTNAME, String.Empty)
Dim oStreetName As String = GetRowItem(oRow, V50_STREETNAME, String.Empty)
Dim oZipCode As String = GetRowItem(oRow, V50_ZIPCODE, String.Empty)
Dim oCityName As String = GetRowItem(oRow, V50_CITYNAME, String.Empty)
Dim oGLN As String = GetRowItem(oRow, V50_GLN, String.Empty)
oAccounts.Add(New Account With {
.Id = oAccountNumber,
@ -164,8 +166,8 @@ Namespace Winline
For Each oRow As DataRow In oTable.Rows
Dim oDbInfo = SplitConnectionInfo(oRow)
Dim oMandator = New Mandator With {
.Id = oRow.Item(T01_MANDATORID),
.Name = oRow.Item(T01_MANDATORNAME),
.Id = GetRowItem(oRow, T01_MANDATORID, String.Empty),
.Name = GetRowItem(oRow, T01_MANDATORNAME, String.Empty),
.Database = oDbInfo.Item1,
.Server = oDbInfo.Item2
}
@ -218,8 +220,8 @@ Namespace Winline
For Each oRow As DataRow In oTable.Rows
oKinds.Add(New DocumentKind With {
.Id = oRow.Item(T357_KINDID),
.Name = oRow.Item(T357_KINDNAME),
.Id = GetRowItem(oRow, T357_KINDID, String.Empty),
.Name = GetRowItem(oRow, T357_KINDNAME, String.Empty),
.Mandator = pMandator
})
Next
@ -268,11 +270,11 @@ Namespace Winline
End If
Dim oRow As DataRow = oTable.Rows.Item(0)
Dim oAccountNumber As String = Utils.NotNull(oRow.Item(V50_ACCOUNTNUMBER), String.Empty)
Dim oAccountName As String = Utils.NotNull(oRow.Item(V50_ACCOUNTNAME), String.Empty)
Dim oStreetName As String = Utils.NotNull(oRow.Item(V50_STREETNAME), String.Empty)
Dim oZipCode As String = Utils.NotNull(oRow.Item(V50_ZIPCODE), String.Empty)
Dim oCityName As String = Utils.NotNull(oRow.Item(V50_CITYNAME), String.Empty)
Dim oAccountNumber As String = GetRowItem(oRow, V50_ACCOUNTNUMBER, String.Empty)
Dim oAccountName As String = GetRowItem(oRow, V50_ACCOUNTNAME, String.Empty)
Dim oStreetName As String = GetRowItem(oRow, V50_STREETNAME, String.Empty)
Dim oZipCode As String = GetRowItem(oRow, V50_ZIPCODE, String.Empty)
Dim oCityName As String = GetRowItem(oRow, V50_CITYNAME, String.Empty)
Return New Account With {
.Id = oAccountNumber,
@ -318,7 +320,7 @@ Namespace Winline
End If
Dim oRow As DataRow = oTable.Rows.Item(0)
Dim oArticleNumber As String = Utils.NotNull(oRow.Item(V21_MAINARTICLENUMBER), String.Empty)
Dim oArticleNumber As String = GetRowItem(oRow, V21_MAINARTICLENUMBER, String.Empty)
Return oArticleNumber
Catch ex As Exception
@ -351,9 +353,9 @@ Namespace Winline
For Each oRow In oTable.Rows
oContacts.Add(New Contact With {
.Id = Utils.NotNull(oRow.Item(T45_KEY), Nothing),
.Name = Utils.NotNull(oRow.Item(T45_NAME), Nothing),
.Number = Utils.NotNull(oRow.Item(T45_CONTACTNUMBER), Nothing)
.Id = GetRowItem(Of String)(oRow, T45_KEY, Nothing),
.Name = GetRowItem(Of String)(oRow, T45_NAME, Nothing),
.Number = GetRowItem(Of String)(oRow, T45_CONTACTNUMBER, Nothing)
})
Next
@ -393,7 +395,7 @@ Namespace Winline
End If
Dim oRow As DataRow = oTable.Rows.Item(0)
Dim oReplacementArticleNumber = Utils.NotNull(oRow.Item(V21_REPLACEMENTARTICLENUMBER), Nothing)
Dim oReplacementArticleNumber = GetRowItem(Of String)(oRow, V21_REPLACEMENTARTICLENUMBER, Nothing)
If oReplacementArticleNumber Is Nothing Then
Return pArticleNumber
@ -454,7 +456,7 @@ Namespace Winline
End If
Dim oRow As DataRow = oTable.Rows.Item(0)
Dim oArticleNumber As String = Utils.NotNull(oRow.Item(V21_MAINARTICLENUMBER), String.Empty)
Dim oArticleNumber As String = GetRowItem(oRow, V21_MAINARTICLENUMBER, String.Empty)
' EAN was found, now we need to check it against the Regex of the current Mandantor, if one exists
If oMandator.Regex <> String.Empty Then
@ -490,100 +492,38 @@ Namespace Winline
End If
End Function
'Public Function FindMatchingMandatorFromOrder(pData As Schemas.Orders.Input.MESOWebService) As Mandator
' Dim oPositions As List(Of Schemas.Orders.Input.MESOWebServiceEXIMVRG_ordersT026) = pData.Items.
' Where(Function(i) TypeOf i Is Schemas.Orders.Input.MESOWebServiceEXIMVRG_ordersT026).
' Select(Of Schemas.Orders.Input.MESOWebServiceEXIMVRG_ordersT026)(Function(i) i).
' ToList()
' Dim oYear = GetWinLineYear()
' Dim oMandatorId As String = String.Empty
' Dim oWhitelistedMandators = Mandators.
' Where(Function(m) m.IsWhitelisted = True).
' ToList()
' For Each oPos In oPositions
' For Each oMandator In oWhitelistedMandators
' Dim oSQL As String = $"
' SELECT
' [c011], -- Artikelnummer
' [c003], -- Artikelbezeichnung
' [c075], -- EAN-Nummer
' [c123] -- Ersatzartikelnummer
' FROM [{oMandator.Database}].[dbo].[v021]
' WHERE [c075] = '{oPos.Artikelnummer}'
' AND [mesocomp] = '{oMandator.Id}' AND [mesoyear] = {oYear}"
' Dim oTable As DataTable = Database.GetDatatable(oSQL)
' ' EAN not found in this Mandator, continue to next one
' If oTable.Rows.Count = 0 Then
' Logger.Debug("EAN [{0}] was not found in Mandator: [{1}]", oPos.Artikelnummer, oMandator.Id)
' Continue For
' End If
' ' Duplicate EAN, exit and do nothing about this manda
' If oTable.Rows.Count > 1 Then
' Logger.Warn("EAN [{0}] was found more than once. Skipping Mandator [{1}]", oPos.Artikelnummer, oMandator.Id)
' Exit For
' End If
' Dim oRow As DataRow = oTable.Rows.Item(0)
' Dim oArticleNumber As String = Utils.NotNull(oRow.Item(V21_ARTICLENUMBER), String.Empty)
' ' EAN was found, now we need to check it against the Regex of the current Mandantor, if one exists
' If oMandator.Regex <> String.Empty Then
' Try
' Dim oRegex As New Regex(oMandator.Regex)
' Dim oMatch = oRegex.Match(oArticleNumber)
' ' If ArticleNumber matches the regex, we assign it and exit
' If oMatch.Success Then
' oMandatorId = oMandator.Id
' Exit For
' Else
' ' If it does not match, continue to the next mandator
' End If
' Catch ex As Exception
' Logger.Error(ex)
' Logger.Warn("Regex [{0}] could not be parsed. Skipping.", oMandator.Regex)
' End Try
' Else
' ' If no regex was found, we assume the number matches
' oMandatorId = oMandator.Id
' End If
' Next
' Next
' If oMandatorId = String.Empty Then
' Return Nothing
' Else
' Return oWhitelistedMandators.
' Where(Function(m) m.Id = oMandatorId).
' Take(1).
' SingleOrDefault()
' End If
'End Function
Public Function LoadTemplateConfiguration() As Boolean
Public Async Function LoadTemplateConfiguration() As Task(Of Boolean)
Try
Dim oSql = $"SELECT * FROM [DD_ECM].[dbo].[VWEDI_XML_ITEMS]"
Dim oTable As DataTable = Database.GetDatatable(oSql)
Dim oItems As New List(Of TemplateColumn)
Dim oSql = $"SELECT * FROM [DD_ECM].[dbo].[{VWEDI_XML_ITEMS}]"
Dim oTable As DataTable = Await Database.GetDatatableAsync(oSql)
Dim oItems As New List(Of ColumnConfig)
For Each oRow As DataRow In oTable.Rows
Dim oColumn As New TemplateColumn With {
.Name = oRow.Item("XML_NAME"),
.Root = oRow.Item("XML_ROOT"),
.Type = oRow.Item("XML_TYPE"),
.Template = oRow.Item("TEMPLATE_NAME"),
.[Function] = oRow.Item("FUNCTION_ID"),
.[ReadOnly] = oRow.Item("IS_READ_ONLY"),
.[Visible] = oRow.Item("IS_VISIBLE")
Dim oColumn As New ColumnConfig With {
.Name = GetRowItem(oRow, "XML_NAME", String.Empty),
.Root = GetRowItem(oRow, "XML_ROOT", String.Empty),
.Type = ColumnConfig.ConvertType(GetRowItem(oRow, "DATA_TYPE", String.Empty)),
.Template = GetRowItem(oRow, "TEMPLATE_NAME", String.Empty),
.[Function] = New ColumnConfig.ColumnFunction With {
.Id = GetRowItem(oRow, "FUNCTION_ID", 0),
.Name = GetRowItem(oRow, "FUNCTION_NAME", String.Empty),
.Params = GetRowItem(oRow, "FUNCTION_PARAMETERS", String.Empty)
},
.OrderKey = GetRowItem(oRow, "ORDER_KEY", 0),
.IsReadOnly = GetRowItem(oRow, "IS_READ_ONLY", False),
.IsVisible = GetRowItem(oRow, "IS_VISIBLE", True),
.IsRequired = GetRowItem(oRow, "IS_REQUIRED", False),
.IsHead = GetRowItem(oRow, "IS_HEAD", True)
}
oItems.Add(oColumn)
Next
TemplateConfiguration = oItems
Dim oColumns = oItems
TemplateConfiguration = New Winline.Configuration With {
.Columns = oColumns
}
Return True
Catch ex As Exception
@ -619,5 +559,12 @@ Namespace Winline
End Function
Private Function GetRowItem(Of T)(pRow As DataRow, pFieldName As String, Optional pDefaultValue As T = Nothing) As T
Try
Return Utils.NotNull(pRow.Item(pFieldName), pDefaultValue)
Catch ex As Exception
Return Nothing
End Try
End Function
End Class
End Namespace