jj_13_01_16_update_1.1.0.0

This commit is contained in:
JenneJ
2016-01-13 11:57:24 +01:00
parent 579ea3cb8c
commit 2a3384b1da
59 changed files with 12191 additions and 9203 deletions

View File

@@ -0,0 +1,44 @@
Imports System.Configuration
Imports System
Public Class AppConfig
Public Shared Function GetConfiguration() As ConfigValues
Dim appfile As String = My.Application.Info.DirectoryPath & "\" & My.Application.Info.Title & ".exe"
Dim appconfig As Configuration = ConfigurationManager.OpenExeConfiguration(appfile)
Dim appsettings As AppSettingsSection = appconfig.AppSettings
Dim settings As KeyValueConfigurationCollection = appsettings.Settings
Dim values As New ConfigValues()
values.username = settings.Item("dpma_username").Value
values.password = settings.Item("dpma_password").Value
values.query = settings.Item("dpma_query").Value
values.queryIgnore = settings.Item("dpma_query_ignore").Value
values.connstring = settings.Item("sql_connstring").Value
values.database = settings.Item("sql_database").Value
Return values
End Function
Public Shared Function GetVersion()
Dim assembly As System.Reflection.Assembly = System.Reflection.Assembly.GetExecutingAssembly()
Dim fvi As FileVersionInfo = FileVersionInfo.GetVersionInfo(assembly.Location)
Dim version As String = fvi.FileVersion
Return version
End Function
End Class
Public Class ConfigValues
Public username As String
Public password As String
Public query As String
Public queryIgnore As String
Public connstring As String
Public database As String
Public Sub New()
End Sub
End Class

174
app/DpmaXmlParser/DB.vb Normal file
View File

@@ -0,0 +1,174 @@
Imports System.Data.SqlClient
Imports NLog
Public Class DB
Private _connstring
Private _db
Private _logger As Logger
Public FormId
Public ControlId
Public RecordId
Public Username As String = "BrainpoolImporter"
Public Sub New(connectionString As String, dbname As String)
_logger = LogManager.GetLogger("DB")
_connstring = connectionString
_db = dbname
End Sub
#Region "=== HELPERS ==="
Public Function formatTable(table As String) As String
Return String.Format("[{0}].[dbo].[{1}]", _db, table)
End Function
Public Function GetFormId() As Integer
Dim sql = String.Format("SELECT GUID FROM {0} WHERE NAME = '{1}'", Me.formatTable("TBPMO_FORM"), "Marken")
Return Me.Scalar(sql)
End Function
Public Function GetControlId(formId As Integer, Optional name As String = "ApplicationNumber") As Integer
Dim sql = String.Format("SELECT GUID FROM {0} WHERE NAME = '{1}' AND FORM_ID = {2}", Me.formatTable("TBPMO_CONTROL"), name, formId)
Return Me.Scalar(sql)
End Function
Public Function GetProperty(m As Mark, propertyName As String) As Object
_logger.Debug("Reading property: {0}, Mark? {1}", propertyName, IsNothing(m))
Dim value = CallByName(m, propertyName, CallType.Get)
If (value = Nothing) Then
value = DBNull.Value
End If
Return value
End Function
Public Function IsEqual(controlId As Integer, recordId As Integer, valueToCompare As Object)
Dim table = Me.formatTable("TBPMO_CONTROL_VALUE")
Dim sql = String.Format("SELECT VALUE FROM {0} WHERE CONTROL_ID = {1} AND RECORD_ID = {2}", table, controlId, recordId)
Dim value = Me.Scalar(sql)
If (IsDBNull(valueToCompare) Xor IsDBNull(value)) Then
Return False
End If
Return value = valueToCompare
End Function
#End Region
#Region "=== RECORD ID ==="
Public Function GetRecordId(controlId As Integer, applicationNumber As String) As Integer
Dim sql = String.Format("SELECT RECORD_ID FROM {0} WHERE CONTROL_ID = {1} AND VALUE = '{2}'", Me.formatTable("TBPMO_CONTROL_VALUE"), controlId, applicationNumber)
Return Me.Scalar(sql)
End Function
Public Function InsertRecord(formId As Integer)
Dim sql = String.Format("INSERT INTO {0} (FORM_ID, ADDED_WHO) VALUES ({1}, '{2}')", Me.formatTable("TBPMO_RECORD"), formId, Username)
Me.NonQuery(sql)
Return Me.Scalar("SELECT MAX(GUID) FROM TBPMO_RECORD")
End Function
#End Region
#Region "=== VALUES ==="
Public Function InsertValue(controlId As Integer, recordId As Integer, value As Object)
Dim table = Me.formatTable("TBPMO_CONTROL_VALUE")
Dim sql = String.Format("INSERT INTO {0} (CONTROL_ID, RECORD_ID, VALUE) VALUES ({1}, {2}, '{3}')", table, controlId, recordId, value)
Me.NonQuery(sql)
Return Me.Scalar(String.Format("SELECT MAX(GUID) FROM {0} WHERE CONTROL_ID = {1}", table, controlId))
End Function
Public Sub UpdateValue(controlId As Integer, recordId As Integer, value As Object)
Dim table = Me.formatTable("TBPMO_CONTROL_VALUE")
Dim sql = String.Format("UPDATE {0} SET VALUE = '{1}' WHERE CONTROL_ID = {2} AND RECORD_ID = {3}", table, value, controlId, recordId)
Me.NonQuery(sql)
End Sub
#End Region
#Region "=== DATABASE ==="
Public Function Scalar(queryString As String)
Dim conn As New SqlConnection(_connstring)
Dim cmd As New SqlCommand(queryString, conn)
Dim result
Try
conn.Open()
result = cmd.ExecuteScalar()
conn.Dispose()
conn.Close()
Return result
Catch ex As Exception
Throw New Exception(String.Format("Error while executing SQL Scalar-Query ({0}): {1}", queryString, ex.Message))
End Try
End Function
Public Function NonQuery(queryString As String)
Dim conn As New SqlConnection(_connstring)
Dim cmd As New SqlCommand(queryString, conn)
Try
conn.Open()
cmd.ExecuteNonQuery()
conn.Dispose()
conn.Close()
Return True
Catch ex As Exception
Throw New Exception(String.Format("Error while executing SQL Non-Query ({0}): {1}", queryString, ex.Message))
End Try
End Function
Public Function QueryTable(queryString As String) As DataTable
Try
Dim conn As New SqlConnection(_connstring)
Dim cmd As New SqlCommand(queryString, conn)
Dim adapter As New SqlDataAdapter(cmd)
Dim dt As New DataTable()
conn.Open()
adapter.Fill(dt)
conn.Dispose()
conn.Close()
Return dt
Catch ex As Exception
Throw New Exception(String.Format("Error while executing SQL Query ({0}): {1}", queryString, ex.Message))
End Try
End Function
#End Region
#Region "=== IMAGES ==="
Public Sub InsertImage(bimage As Byte(), ControlId As Integer, RecordId As Integer)
Dim table = Me.formatTable("TBPMO_CONTROL_IMAGE")
Dim sql = String.Format("INSERT INTO {0} (CONTROL_ID, RECORD_ID, IMG) VALUES (@CONTROL_ID, @RECORD_ID, @IMG)", table)
Dim conn As New SqlClient.SqlConnection(_connstring)
Dim cmd As New SqlClient.SqlCommand(sql, conn)
cmd.Parameters.Add("@IMG", SqlDbType.Binary).Value = bimage
cmd.Parameters.Add("@CONTROL_ID", SqlDbType.Int).Value = ControlId
cmd.Parameters.Add("@RECORD_ID", SqlDbType.Int).Value = RecordId
conn.Open()
cmd.ExecuteNonQuery()
conn.Close()
End Sub
Public Sub UpdateImage(bimage As Byte(), ControlId As Integer, RecordId As Integer)
Dim table = Me.formatTable("TBPMO_CONTROL_IMAGE")
Dim sql = String.Format("UPDATE {0} SET IMG = @IMG WHERE CONTROL_ID = @CONTROL_ID AND RECORD_ID = @RECORD_ID", table)
Dim conn As New SqlClient.SqlConnection(_connstring)
Dim cmd As New SqlClient.SqlCommand(sql, conn)
cmd.Parameters.Add("@IMG", SqlDbType.Binary).Value = bimage
cmd.Parameters.Add("@CONTROL_ID", SqlDbType.Int).Value = ControlId
cmd.Parameters.Add("@RECORD_ID", SqlDbType.Int).Value = RecordId
conn.Open()
cmd.ExecuteNonQuery()
conn.Close()
End Sub
#End Region
End Class

View File

@@ -0,0 +1,51 @@
Imports DpmaXmlParser.DPMA.Marke
Imports System.Xml
Public Class DPMAConnect
Private _service As DPMAregisterClient
Private _user As String
Private _pass As String
Public Sub New(username As String, password As String)
_user = username
_pass = password
_service = New DPMAregisterClient()
_service.Open()
End Sub
Public Function Search(query As String) As XmlDocument
Dim doc As New XmlDocument()
Dim xmlstring As String
Try
xmlstring = _service.search(_user, _pass, query)
doc.LoadXml(xmlstring)
Dim ErrorMessage = doc.SelectSingleNode("Hitlist/ErrorMessage")
If Not IsNothing(ErrorMessage) Then
Throw New Exception(ErrorMessage.InnerText)
End If
Catch ex As Exception
Throw ex
End Try
Return doc
End Function
Public Function GetRegisterInfo(aktenzeichen As String) As XmlDocument
Dim doc As New XmlDocument()
Dim xmlstring As String
Try
xmlstring = _service.getRegisterInfo(_user, _pass, aktenzeichen)
'xmlstring = _service.getRegisterInfoBySt13Akz(_user, _pass, aktenzeichen)
doc.LoadXml(xmlstring)
Catch ex As Exception
Throw ex
End Try
Return doc
End Function
End Class

View File

@@ -0,0 +1,31 @@
<?xml version="1.0" encoding="utf-8" ?>
<configuration>
<startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.5" />
</startup>
<system.serviceModel>
<bindings>
<basicHttpBinding>
<binding name="DPMAregisterSoapBinding" maxReceivedMessageSize="2147483647" />
</basicHttpBinding>
</bindings>
<client>
<endpoint address="http://dpmaconnect.dpma.de/dpmaws/services/DPMAregisterMarkeService"
binding="basicHttpBinding" bindingConfiguration="DPMAregisterSoapBinding"
contract="DPMA.Marke.DPMAregister" name="DPMAregister" />
</client>
</system.serviceModel>
<appSettings>
<!-- Die Zugangangsdaten, die für den Zugriff auf die DPMA Datenbank benötigt werden -->
<add key="dpma_username" value="BRAINPOOL"/>
<add key="dpma_password" value="brainPOOL1"/>
<!-- query erwartet entweder eine mit Kommagetrennte List oder einen SQL Befehl, der ein einspaltiges Ergebnis liefert -->
<!--<add key="dpma_query" value="SELECT [Unternehmen] FROM [DD_ECM].[dbo].[VWTEMP_PMO_FORM19] WHERE ProdUnternehmen = 1 ORDER BY Unternehmen"/>-->
<add key="dpma_query" value="BRAINPOOL Artist und Content Services GmbH;BRAINPOOL TV GmbH;BRAINPOOL TV GmbH / Stein TV;Elton TV Produktions GmbH;Köln Comedy Festival GmbH;Kuttner TV GmbH;Ladykracher TV GmbH;MARIO BARTH TV Produktionsgesellschaft mbH;mea culpa TV Production GmbH;Millionärswahl Formatentwicklungs- und -verwertungsgesellschaft mbH;Minestrone TV Produktions GbR;Pocher TV GmbH;Princess TV GmbH;Punani Enterprises GmbH;Raab TV-Produktion GmbH;Stein TV-Produktion GmbH;Ulmen Television GmbH"/>
<add key="dpma_query_ignore" value="Moodboard GmbH Brainpool für creatives Markenmanagement und Werbung, 40237 Düsseldorf, DE;BACS GmbH, 86165 Augsburg, DE"/>
<!-- Die Verbindung, in die das Ergebnis des Imports eingelesen wird, damit werden auch dpma_searchvalues ausgelesen! -->
<add key="sql_connstring" value="Data Source=172.24.12.41\tests;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd"/>
<!-- Die Datenbank, in die das Ergebnis eingelesen wird und die Datenbank, die Record-Organizer/ADDI benutzt -->
<add key="sql_database" value="DD_ECM" />
</appSettings>
</configuration>

View File

@@ -0,0 +1,227 @@
<?xml version="1.0" encoding="utf-8"?>
<Project ToolsVersion="12.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
<PropertyGroup>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
<ProjectGuid>{4CE2A124-9683-4949-BEF5-8594D022BE8F}</ProjectGuid>
<OutputType>Exe</OutputType>
<StartupObject>DpmaXmlParser.Main</StartupObject>
<RootNamespace>DpmaXmlParser</RootNamespace>
<AssemblyName>DpmaXmlParser</AssemblyName>
<FileAlignment>512</FileAlignment>
<MyType>Console</MyType>
<TargetFrameworkVersion>v4.5</TargetFrameworkVersion>
<PublishUrl>publish\</PublishUrl>
<Install>true</Install>
<InstallFrom>Disk</InstallFrom>
<UpdateEnabled>false</UpdateEnabled>
<UpdateMode>Foreground</UpdateMode>
<UpdateInterval>7</UpdateInterval>
<UpdateIntervalUnits>Days</UpdateIntervalUnits>
<UpdatePeriodically>false</UpdatePeriodically>
<UpdateRequired>false</UpdateRequired>
<MapFileExtensions>true</MapFileExtensions>
<ApplicationRevision>0</ApplicationRevision>
<ApplicationVersion>1.0.0.%2a</ApplicationVersion>
<IsWebBootstrapper>false</IsWebBootstrapper>
<UseApplicationTrust>false</UseApplicationTrust>
<BootstrapperEnabled>true</BootstrapperEnabled>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<PlatformTarget>AnyCPU</PlatformTarget>
<DebugSymbols>true</DebugSymbols>
<DebugType>full</DebugType>
<DefineDebug>true</DefineDebug>
<DefineTrace>true</DefineTrace>
<OutputPath>bin\Debug\</OutputPath>
<DocumentationFile>DpmaXmlParser.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
<PlatformTarget>AnyCPU</PlatformTarget>
<DebugType>pdbonly</DebugType>
<DefineDebug>false</DefineDebug>
<DefineTrace>true</DefineTrace>
<Optimize>true</Optimize>
<OutputPath>bin\Release\</OutputPath>
<DocumentationFile>DpmaXmlParser.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
</PropertyGroup>
<PropertyGroup>
<OptionExplicit>On</OptionExplicit>
</PropertyGroup>
<PropertyGroup>
<OptionCompare>Binary</OptionCompare>
</PropertyGroup>
<PropertyGroup>
<OptionStrict>Off</OptionStrict>
</PropertyGroup>
<PropertyGroup>
<OptionInfer>On</OptionInfer>
</PropertyGroup>
<PropertyGroup>
<ApplicationIcon>ExtendedStoredProcedure_8284.ico</ApplicationIcon>
</PropertyGroup>
<ItemGroup>
<Reference Include="NLog, Version=4.0.0.0, Culture=neutral, PublicKeyToken=5120e14c03d0593c, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\packages\NLog.4.2.3\lib\net45\NLog.dll</HintPath>
</Reference>
<Reference Include="System" />
<Reference Include="System.Configuration" />
<Reference Include="System.Data" />
<Reference Include="System.Deployment" />
<Reference Include="System.Runtime.Serialization" />
<Reference Include="System.ServiceModel" />
<Reference Include="System.Xml" />
<Reference Include="System.Core" />
<Reference Include="System.Xml.Linq" />
<Reference Include="System.Data.DataSetExtensions" />
</ItemGroup>
<ItemGroup>
<Import Include="Microsoft.VisualBasic" />
<Import Include="System" />
<Import Include="System.Collections" />
<Import Include="System.Collections.Generic" />
<Import Include="System.Data" />
<Import Include="System.Diagnostics" />
<Import Include="System.Linq" />
<Import Include="System.Xml.Linq" />
<Import Include="System.Threading.Tasks" />
</ItemGroup>
<ItemGroup>
<Compile Include="Config.vb" />
<Compile Include="DB.vb" />
<Compile Include="DPMAConnect.vb" />
<Compile Include="Mark.vb" />
<Compile Include="Main.vb" />
<Compile Include="My Project\AssemblyInfo.vb" />
<Compile Include="My Project\Application.Designer.vb">
<AutoGen>True</AutoGen>
<DependentUpon>Application.myapp</DependentUpon>
</Compile>
<Compile Include="My Project\Resources.Designer.vb">
<AutoGen>True</AutoGen>
<DesignTime>True</DesignTime>
<DependentUpon>Resources.resx</DependentUpon>
</Compile>
<Compile Include="My Project\Settings.Designer.vb">
<AutoGen>True</AutoGen>
<DependentUpon>Settings.settings</DependentUpon>
<DesignTimeSharedInput>True</DesignTimeSharedInput>
</Compile>
<Compile Include="Parser.vb" />
<Compile Include="Querybuilder.vb" />
<Compile Include="Service References\DPMA.Marke\Reference.vb">
<AutoGen>True</AutoGen>
<DesignTime>True</DesignTime>
<DependentUpon>Reference.svcmap</DependentUpon>
</Compile>
</ItemGroup>
<ItemGroup>
<EmbeddedResource Include="My Project\Resources.resx">
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
<LastGenOutput>Resources.Designer.vb</LastGenOutput>
<CustomToolNamespace>My.Resources</CustomToolNamespace>
<SubType>Designer</SubType>
</EmbeddedResource>
</ItemGroup>
<ItemGroup>
<None Include="DpmaXmlParser.exe.config.example">
<SubType>Designer</SubType>
<CopyToOutputDirectory>Always</CopyToOutputDirectory>
</None>
<None Include="My Project\Application.myapp">
<Generator>MyApplicationCodeGenerator</Generator>
<LastGenOutput>Application.Designer.vb</LastGenOutput>
</None>
<None Include="My Project\Settings.settings">
<Generator>SettingsSingleFileGenerator</Generator>
<CustomToolNamespace>My</CustomToolNamespace>
<LastGenOutput>Settings.Designer.vb</LastGenOutput>
</None>
<None Include="DpmaXmlParser.exe.config">
<CopyToOutputDirectory>Always</CopyToOutputDirectory>
<SubType>Designer</SubType>
</None>
<Content Include="ExtendedStoredProcedure_8284.ico" />
<Content Include="NLog.config">
<CopyToOutputDirectory>Always</CopyToOutputDirectory>
</Content>
<None Include="NLog.xsd">
<SubType>Designer</SubType>
</None>
<None Include="packages.config">
<SubType>Designer</SubType>
</None>
<None Include="Service References\DPMA.Marke\DPMAregisterMarkeService.wsdl" />
</ItemGroup>
<ItemGroup>
<WCFMetadata Include="Service References\" />
</ItemGroup>
<ItemGroup>
<WCFMetadataStorage Include="Service References\DPMA.Marke\" />
</ItemGroup>
<ItemGroup>
<None Include="Service References\DPMA.Marke\configuration91.svcinfo" />
</ItemGroup>
<ItemGroup>
<None Include="Service References\DPMA.Marke\configuration.svcinfo" />
</ItemGroup>
<ItemGroup>
<None Include="Service References\DPMA.Marke\DpmaXmlParser.DPMA.Marke.getRegisterFullImageBySt13AkzResponse.datasource">
<DependentUpon>Reference.svcmap</DependentUpon>
</None>
<None Include="Service References\DPMA.Marke\DpmaXmlParser.DPMA.Marke.getRegisterFullImageResponse.datasource">
<DependentUpon>Reference.svcmap</DependentUpon>
</None>
<None Include="Service References\DPMA.Marke\DpmaXmlParser.DPMA.Marke.getRegisterInfoBySt13AkzResponse.datasource">
<DependentUpon>Reference.svcmap</DependentUpon>
</None>
<None Include="Service References\DPMA.Marke\DpmaXmlParser.DPMA.Marke.getRegisterInfoResponse.datasource">
<DependentUpon>Reference.svcmap</DependentUpon>
</None>
<None Include="Service References\DPMA.Marke\DpmaXmlParser.DPMA.Marke.getRegisterThumbnailImageBySt13AkzResponse.datasource">
<DependentUpon>Reference.svcmap</DependentUpon>
</None>
<None Include="Service References\DPMA.Marke\DpmaXmlParser.DPMA.Marke.getRegisterThumbnailImageResponse.datasource">
<DependentUpon>Reference.svcmap</DependentUpon>
</None>
<None Include="Service References\DPMA.Marke\DpmaXmlParser.DPMA.Marke.searchResponse.datasource">
<DependentUpon>Reference.svcmap</DependentUpon>
</None>
<None Include="Service References\DPMA.Marke\DpmaXmlParser.DPMA.Marke.versionResponse.datasource">
<DependentUpon>Reference.svcmap</DependentUpon>
</None>
<None Include="Service References\DPMA.Marke\Reference.svcmap">
<Generator>WCF Proxy Generator</Generator>
<LastGenOutput>Reference.vb</LastGenOutput>
</None>
</ItemGroup>
<ItemGroup>
<BootstrapperPackage Include=".NETFramework,Version=v4.5">
<Visible>False</Visible>
<ProductName>Microsoft .NET Framework 4.5 %28x86 and x64%29</ProductName>
<Install>true</Install>
</BootstrapperPackage>
<BootstrapperPackage Include="Microsoft.Net.Client.3.5">
<Visible>False</Visible>
<ProductName>.NET Framework 3.5 SP1 Client Profile</ProductName>
<Install>false</Install>
</BootstrapperPackage>
<BootstrapperPackage Include="Microsoft.Net.Framework.3.5.SP1">
<Visible>False</Visible>
<ProductName>.NET Framework 3.5 SP1</ProductName>
<Install>false</Install>
</BootstrapperPackage>
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
Other similar extension points exist, see Microsoft.Common.targets.
<Target Name="BeforeBuild">
</Target>
<Target Name="AfterBuild">
</Target>
-->
</Project>

214
app/DpmaXmlParser/Main.vb Normal file
View File

@@ -0,0 +1,214 @@
Imports System.Console
Imports System.IO
Imports System.Xml
Imports NLog
Module Main
Private logger As Logger
Private mainDoc As XmlDocument
Private markDoc As XmlDocument
Private DataDir As String = "Data"
Private LogDir As String = "Log"
Private MainFile As String = "Importer-SearchData.xml"
Private MainPath As String = Path.Combine(DataDir, MainFile)
Private p As New Parser()
Private dpma As DPMAConnect
Private db As DB
Private query As String
Private config As ConfigValues
Private version As String
Private marks As New List(Of Mark)
Private props = New List(Of String) From {
"RegistrationOfficeCode",
"RegistrationDate",
"RegistrationNumber",
"MarkCurrentStatusCode",
"MarkVerbalElementText",
"MarkFeature",
"ApplicationDate",
"Applicant",
"Representative",
"PublicationDate",
"ExpiryDate",
"TerminationDate",
"OppositionPeriodStartDate",
"OppositionPeriodEndDate",
"Classification",
"ClassificationLong"
}
Sub Main()
Try
logger = LogManager.GetLogger("Main")
config = AppConfig.GetConfiguration()
db = New DB(config.connstring, "DD_ECM")
version = AppConfig.GetVersion()
logger.Info("{0} (Version {1}) started", My.Application.Info.Title, version)
If Not Directory.Exists(DataDir) Then
Directory.CreateDirectory(DataDir)
End If
If Not Directory.Exists(LogDir) Then
Directory.CreateDirectory(LogDir)
End If
query = Querybuilder.Build(config, db)
' Abfrage starten
logger.Info("Sending request with query: {0}", query)
dpma = New DPMAConnect(config.username, config.password)
mainDoc = dpma.Search(query)
mainDoc.Save(MainPath)
' Ergebnis auslesen und Marken-Klassen erstellen
marks = p.ReadMarkXMLFile(MainPath)
logger.Info("Importing Marks..")
For Each mark As Mark In marks
Dim akz As String = mark.ApplicationNumber
Dim file As String = Path.Combine(DataDir, String.Format("Importer-RegisterData-{0}.xml", akz))
logger.Debug("Getting Register Info for {0}", akz)
markDoc = dpma.GetRegisterInfo(akz)
markDoc.Save(file)
p.ReadMarkRegisterInfoXMLFile(file, mark)
Next
logger.Info("{0} Marks imported", marks.Count)
' =========================================================================================
Dim formId As Integer = db.GetFormId()
Dim updatedMarks As Integer = 0
Dim addedMarks As Integer = 0
For Each m As Mark In marks
Console.WriteLine("Mark Verbal Element: {1}", m.MarkVerbalElementText)
Dim mainControlId As Integer
' Das eindeutige Control suchen
mainControlId = db.GetControlId(formId)
' Über mainControlId überprüfen, ob marke vorhanden
Dim markExists As Integer = db.GetRecordId(mainControlId, m.ApplicationNumber)
logger.Debug("Mark {0} exists: {1}", markExists, CBool(markExists))
' Wenn noch nicht vorhanden
If (markExists = 0) Then
' Einen Record erstellen
Dim recordId = db.InsertRecord(formId)
logger.Info("New record created with GUID: " & recordId)
' Den Leit-Wert einfügen für mainControlId
Dim valueId = db.InsertValue(mainControlId, recordId, m.ApplicationNumber)
addedMarks = addedMarks + 1
logger.Debug("Value inserted - Property: {0}, Value: {1}, ControlId: {2}", "ApplicationNumber", m.ApplicationNumber, mainControlId)
' alle anderen properties zu dieser marke einfügen einfügen
For Each prop As String In props
' ControlID für die aktuelle property holen
Dim controlId = db.GetControlId(formId, prop)
' Wert für die aktuelle property holen
Dim value = db.GetProperty(m, prop)
If controlId = 0 Then
logger.Warn("Value NOT inserted - ControlId for Property {0} could not be found.")
Continue For
End If
' Wert einfügen
db.InsertValue(controlId, recordId, value)
' Wenn Bildmarke oder Wort- und Bildmarke, Bild einfügen
If prop = "MarkFeature" Then
If value = "wort-bildmarke" Or value = "bildmarke" Then
Dim imageControlId = db.GetControlId(formId, "MarkImage")
Dim bimage() As Byte = Convert.FromBase64String(m.Image.BinaryImage)
logger.Debug("Image inserted, RecordId: {0}")
db.InsertImage(bimage, imageControlId, recordId)
End If
End If
logger.Debug("Value inserted - Property: {0}, Value: {1}, ControlId: {2}", prop, value, controlId)
Next
addedMarks += 1
Else
' Marke aktualisieren
Dim recordId As Integer = markExists
Dim propsChanged = False
logger.Info("Existing Record updated with GUID: {0}", recordId)
For Each prop As String In props
' ControlID für die aktuelle property holen
Dim controlId = db.GetControlId(formId, prop)
' Wert für die aktuelle property holen
Dim value = db.GetProperty(m, prop)
' Wert aktualisieren
db.UpdateValue(controlId, recordId, value)
' Wenn Bildmarke oder Wort- und Bildmarke, Bild aktualisieren
If prop = "MarkFeature" Then
If value = "wort-bildmarke" Or value = "bildmarke" Then
Dim imageControlId = db.GetControlId(formId, "MarkImage")
Dim bimage() As Byte = Convert.FromBase64String(m.Image.BinaryImage)
db.UpdateImage(bimage, imageControlId, recordId)
End If
End If
logger.Debug("Value updated - Property: {0}, ControlId: {1}", prop, controlId)
'Dim hasChanged As Boolean = Not db.IsEqual(controlId, recordId, value)
'logger.Debug("Value for {0} has changed", recordId)
'If hasChanged Then
' propsChanged = True
' ' Wert aktualisieren
' db.UpdateValue(controlId, recordId, value)
' logger.Debug("Value updated - Property: {0}, ControlId: {1}", prop, controlId)
'End If
Next
updatedMarks += 1
End If
Next
logger.Info("{0} Marks added, {1} updated", addedMarks, updatedMarks)
logger.Debug("=================== IMPORT END ===================")
Catch ex As Exception
logger.Error("==================================================")
logger.Error("=================== ERROR ========================")
logger.Error("==================================================")
logger.Error("An Error occurred: {0}", GetExceptionInfo(ex))
Environment.Exit(1)
End Try
End Sub
Public Function GetExceptionInfo(ex As Exception) As String
Dim Result As String
Dim hr As Integer = Runtime.InteropServices.Marshal.GetHRForException(ex)
Result = ex.GetType.ToString & "(0x" & hr.ToString("X8") & "): " & ex.Message & Environment.NewLine & ex.StackTrace & Environment.NewLine
Dim st As StackTrace = New StackTrace(ex, True)
For Each sf As StackFrame In st.GetFrames
If sf.GetFileLineNumber() > 0 Then
Result &= "Line:" & sf.GetFileLineNumber() & " Filename: " & IO.Path.GetFileName(sf.GetFileName) & Environment.NewLine
End If
Next
Return Result
End Function
End Module

260
app/DpmaXmlParser/Mark.vb Normal file
View File

@@ -0,0 +1,260 @@
Imports System.Net
Imports System.Text.RegularExpressions
Public Class Mark
' Aus Search
Private _RegistrationOfficeCode As String 'Datenbestand
Private _RegistrationDate As String 'Tag der Eintragung im Register
Private _RegistrationNumber As String 'Registernummer
Private _MarkCurrentStatusCode As String 'Aktenzustand
Private _MarkVerbalElementText As String 'Wiedergabe der Marke
Private _MarkFeature As String 'Markenform
Private _ApplicationDate As String 'Anmeldetag
Private _ApplicationNumber As String 'Aktenzeichen
Private _Applicant As String 'Inhaber
Private _Representative As String 'Vertreter
'Aus GetRegisterInfo
Private _PublicationDate As Date ' Tag der Veröffentlichung
Private _ExpiryDate As Date 'Schutzendedatum
Private _TerminationDate As Date 'Wirkungsdatum Löschung
Private _OppositionPeriodStartDate As Date 'Beginn Widerspruchsfrist
Private _OppositionPeriodEndDate As Date 'Ablauf Widerspruchsfrist
Private _Image As ImageDetail
Private Function ReplaceSingleQuote(value As String)
Return value.Replace("'", "''")
End Function
Private Function ReplaceUmlauts(value As String)
Dim result = value.Replace("ae", "ä")
result = result.Replace("oe", "ö")
result = result.Replace("ue", "ü")
Return result
End Function
Private Function DecodeHTML(value As String)
Return WebUtility.HtmlDecode(value)
End Function
Private Function ParseShortDate(value As String)
Return DateTime.Parse(value).ToShortDateString()
End Function
#Region "SearchProperties"
Public Property RegistrationOfficeCode As String
Get
Return _RegistrationOfficeCode
End Get
Set(value As String)
_RegistrationOfficeCode = value
End Set
End Property
Public Property RegistrationDate As String
Get
Return _RegistrationDate
End Get
Set(value As String)
_RegistrationDate = ParseShortDate(value)
End Set
End Property
Public Property RegistrationNumber As String
Get
Return _RegistrationNumber
End Get
Set(value As String)
_RegistrationNumber = value
End Set
End Property
Public Property MarkCurrentStatusCode As String
Get
Return _MarkCurrentStatusCode
End Get
Set(value As String)
value = ReplaceUmlauts(value)
_MarkCurrentStatusCode = value
End Set
End Property
Public Property MarkVerbalElementText As String
Get
Return _MarkVerbalElementText
End Get
Set(value As String)
value = DecodeHTML(value)
value = ReplaceSingleQuote(value)
_MarkVerbalElementText = value
End Set
End Property
Public Property MarkFeature As String
Get
Return _MarkFeature
End Get
Set(value As String)
_MarkFeature = value
End Set
End Property
Public Property ApplicationDate As String
Get
Return _ApplicationDate
End Get
Set(value As String)
_ApplicationDate = ParseShortDate(value)
End Set
End Property
Public Property ApplicationNumber As String
Get
Return _ApplicationNumber
End Get
Set(value As String)
_ApplicationNumber = value
End Set
End Property
Public Property Applicant As String
Get
Return _Applicant
End Get
Set(value As String)
value = DecodeHTML(value)
value = ReplaceSingleQuote(value)
_Applicant = value
End Set
End Property
Public Property Representative As String
Get
Return _Representative
End Get
Set(value As String)
value = DecodeHTML(value)
value = ReplaceSingleQuote(value)
_Representative = value
End Set
End Property
#End Region
Public Property PublicationDate As String
Get
Return _PublicationDate
End Get
Set(value As String)
_PublicationDate = ParseShortDate(value)
End Set
End Property
Public Property ExpiryDate As String
Get
Return _ExpiryDate
End Get
Set(value As String)
_ExpiryDate = ParseShortDate(value)
End Set
End Property
Public Property TerminationDate As String
Get
Return _TerminationDate
End Get
Set(value As String)
_TerminationDate = ParseShortDate(value)
End Set
End Property
Public Property OppositionPeriodStartDate As String
Get
Return _OppositionPeriodStartDate
End Get
Set(value As String)
_OppositionPeriodStartDate = ParseShortDate(value)
End Set
End Property
Public Property OppositionPeriodEndDate As String
Get
Return _OppositionPeriodEndDate
End Get
Set(value As String)
_OppositionPeriodEndDate = ParseShortDate(value)
End Set
End Property
Public Property Image As ImageDetail
Get
Return _Image
End Get
Set(value As ImageDetail)
_Image = value
End Set
End Property
Public Property MarkRecordDetails As New List(Of MarkRecordDetail)
Public Property ClassificationKindCode As String
Public Property ClassificationVersion As String
Public Property GoodsServicesNotClassified As String
Public Property ProposedLeadingClassNumber As String
Public Property ClassificationDetail As New List(Of ClassificationDetail)
Public Property Classification As String 'Klasse(n) Nizza
Public ReadOnly Property ClassificationLong As String
Get
Dim result As String = ""
If Not Me.GoodsServicesNotClassified Is Nothing Then
Return Me.GoodsServicesNotClassified
Else
For Each c In Me.ClassificationDetail
result += String.Format("Klasse {0}: {1}{2}{1}", c.ClassNumber, vbNewLine, c.GoodsServicesDescription)
Next
End If
If (result.EndsWith(";")) Then
result = result.Substring(0, result.Length - 1)
End If
Return result
End Get
End Property
Public Sub New()
End Sub
End Class
Public Class ImageDetail
Public BinaryImage As String
Public Height As Integer
Public Width As Integer
Public Format As String
Public Sub New()
End Sub
End Class
Public Class ClassificationDetail
Public ClassNumber As String
Public GoodsServicesDescription As String
Public Sub New()
End Sub
End Class
Public Class MarkRecordDetail
Public RecordIdentifier As String
Public BasicRecordKind As String
Public RecordCurrentStatusCode As String
Public RecordCurrentStatusDate As Date
Public RecordProcedureIncomplete As Boolean = False
Public Sub New()
End Sub
End Class

View File

@@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8"?>
<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
<MySubMain>false</MySubMain>
<SingleInstance>false</SingleInstance>
<ShutdownMode>0</ShutdownMode>
<EnableVisualStyles>true</EnableVisualStyles>
<AuthenticationMode>0</AuthenticationMode>
<ApplicationType>2</ApplicationType>
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
</MyApplicationData>

View File

@@ -0,0 +1,35 @@
Imports System
Imports System.Reflection
Imports System.Runtime.InteropServices
' Allgemeine Informationen über eine Assembly werden über die folgenden
' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
' die mit einer Assembly verknüpft sind.
' Die Werte der Assemblyattribute überprüfen
<Assembly: AssemblyTitle("DPMA Xml Parser")>
<Assembly: AssemblyDescription("")>
<Assembly: AssemblyCompany("Digital Data")>
<Assembly: AssemblyProduct("DpmaXmlParser")>
<Assembly: AssemblyCopyright("Copyright © 2015")>
<Assembly: AssemblyTrademark("")>
<Assembly: ComVisible(False)>
'Die folgende GUID bestimmt die ID der Typbibliothek, wenn dieses Projekt für COM verfügbar gemacht wird
<Assembly: Guid("bc946756-8302-4952-8a94-537330f5f5c1")>
' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
'
' Hauptversion
' Nebenversion
' Buildnummer
' Revision
'
' Sie können alle Werte angeben oder die standardmäßigen Build- und Revisionsnummern
' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.1.0.0")>
<Assembly: AssemblyFileVersion("1.1.0.0")>

View File

@@ -0,0 +1,117 @@
<?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.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: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" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
</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" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
</root>

View File

@@ -0,0 +1,73 @@
'------------------------------------------------------------------------------
' <auto-generated>
' Dieser Code wurde von einem Tool generiert.
' Laufzeitversion:4.0.30319.34209
'
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Namespace My
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "12.0.0.0"), _
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Partial Friend NotInheritable Class MySettings
Inherits Global.System.Configuration.ApplicationSettingsBase
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
#Region "Funktion zum automatischen Speichern von My.Settings"
#If _MyType = "WindowsForms" Then
Private Shared addedHandler As Boolean
Private Shared addedHandlerLockObject As New Object
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
If My.Application.SaveMySettingsOnExit Then
My.Settings.Save()
End If
End Sub
#End If
#End Region
Public Shared ReadOnly Property [Default]() As MySettings
Get
#If _MyType = "WindowsForms" Then
If Not addedHandler Then
SyncLock addedHandlerLockObject
If Not addedHandler Then
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
addedHandler = True
End If
End SyncLock
End If
#End If
Return defaultInstance
End Get
End Property
End Class
End Namespace
Namespace My
<Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
Friend Module MySettingsProperty
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
Friend ReadOnly Property Settings() As Global.DpmaXmlParser.My.MySettings
Get
Return Global.DpmaXmlParser.My.MySettings.Default
End Get
End Property
End Module
End Namespace

View File

@@ -0,0 +1,7 @@
<?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>

View File

@@ -0,0 +1,42 @@
<?xml version="1.0" encoding="utf-8" ?>
<nlog xmlns="http://www.nlog-project.org/schemas/NLog.xsd"
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
xsi:schemaLocation="http://www.nlog-project.org/schemas/NLog.xsd NLog.xsd"
autoReload="true"
throwExceptions="false"
internalLogLevel="Off" internalLogFile="c:\temp\nlog-internal.log" >
<!--
See https://github.com/nlog/nlog/wiki/Configuration-file
for information on customizing logging rules and outputs.
-->
<targets>
<!--
add your targets here
See https://github.com/nlog/NLog/wiki/Targets for possible targets.
See https://github.com/nlog/NLog/wiki/Layout-Renderers for the possible layout renderers.
-->
<target name="logfile" xsi:type="File" fileName="${basedir}/Log/BrainpoolXmlParser-${shortdate}.log" />
<target name="console" xsi:type="Console"/>
<!--
Writing events to the a file with the date in the filename.
<target xsi:type="File" name="f" fileName="${basedir}/logs/${shortdate}.log"
layout="${longdate} ${uppercase:${level}} ${message}" />
-->
</targets>
<rules>
<!-- add your logging rules here -->
<!--
Write all events with minimal level of Debug (So Debug, Info, Warn, Error and Fatal, but not Trace) to "f"
<logger name="*" minlevel="Debug" writeTo="f" />
-->
<logger name="*" levels="Info,Debug,Error" writeTo="logfile" />
<logger name="*" levels="Info,Error" writeTo="console" />
</rules>
</nlog>

2571
app/DpmaXmlParser/NLog.xsd Normal file

File diff suppressed because it is too large Load Diff

239
app/DpmaXmlParser/Parser.vb Normal file
View File

@@ -0,0 +1,239 @@
Imports System.Xml
Imports System.IO
Public Class Parser
Private _path As String
Private _marks As New List(Of Mark)
Public Sub New()
End Sub
#Region "Parse Results of Search"
Public Function ReadMarkXML(doc As XmlDocument) As List(Of Mark)
Using reader As XmlTextReader = New XmlTextReader(New StringReader(doc.OuterXml))
While reader.Read()
If reader.IsStartElement() Then
If reader.Name = "Entries" Then
Dim mark As Mark = CreateMark(reader.ReadSubtree())
_marks.Add(mark)
End If
End If
End While
End Using
Return _marks
End Function
Public Function ReadMarkXMLFile(path As String) As List(Of Mark)
Using reader As XmlReader = XmlReader.Create(path)
While reader.Read()
If reader.IsStartElement() Then
If reader.Name = "Entries" Then
Dim mark As Mark = CreateMark(reader.ReadSubtree())
_marks.Add(mark)
End If
End If
End While
End Using
Return _marks
End Function
Private Function CreateMark(r As XmlReader) As Mark
Dim mark As New Mark()
While r.Read()
If r.IsStartElement() Then
If r.NodeType = XmlNodeType.Element Then
'Console.WriteLine("Name: {0} - Value: {1} - HasValue: {2}", r.Name, r.Value, r.HasValue)
Select Case r.Name
Case "Applicant"
mark.Applicant = r.ReadInnerXml()
Case "ApplicationNumber"
mark.ApplicationNumber = r.ReadInnerXml()
Case "ApplicationDate"
mark.ApplicationDate = r.ReadInnerXml()
Case "MarkFeature"
mark.MarkFeature = r.ReadInnerXml()
Case "MarkVerbalElementText"
mark.MarkVerbalElementText = r.ReadInnerXml()
Case "RegistrationOfficeCode"
mark.RegistrationOfficeCode = r.ReadInnerXml()
Case "RegistrationDate"
mark.RegistrationDate = r.ReadInnerXml()
Case "Representative"
mark.Representative = r.ReadInnerXml()
Case "Classification"
mark.Classification = r.ReadInnerXml()
End Select
End If
End If
End While
Return mark
End Function
#End Region
#Region "Parse Results of GetRegisterInfo"
Public Sub ReadMarkRegisterInfoXMLFile(path As String, ByRef mark As Mark)
Using reader As XmlReader = XmlReader.Create(path)
While reader.Read()
If reader.IsStartElement() Then
If reader.Name = "TradeMark" Then
ReadTradeMark(reader.ReadSubtree(), mark)
End If
End If
End While
End Using
End Sub
Public Sub ReadMarkRegisterInfoXML(doc As XmlDocument, ByRef mark As Mark)
Using reader As XmlReader = New XmlNodeReader(doc)
While reader.Read()
If reader.IsStartElement() Then
If reader.Name = "TradeMark" Then
ReadTradeMark(reader.ReadSubtree(), mark)
End If
End If
End While
End Using
End Sub
Private Sub ReadTradeMark(r As XmlReader, ByRef mark As Mark)
While r.Read()
If r.IsStartElement() Then
If r.NodeType = XmlNodeType.Element Then
Select Case r.Name
Case "ExpiryDate"
mark.ExpiryDate = r.ReadInnerXml()
Case "RegistrationNumber"
mark.RegistrationNumber = r.ReadInnerXml()
Case "MarkRecordDetails"
ReadMarkRecordDetails(r.ReadSubtree(), mark)
Case "GoodsServicesDetails"
ReadGoodsDetails(r.ReadSubtree(), mark)
Case "PublicationDetails"
r.ReadToFollowing("PublicationDate")
mark.PublicationDate = r.ReadInnerXml()
Case "OppositionPeriodStartDate"
mark.OppositionPeriodStartDate = r.ReadInnerXml()
Case "OppositionPeriodEndDate"
mark.OppositionPeriodEndDate = r.ReadInnerXml()
Case "MarkImage"
ReadImageDetails(r.ReadSubtree(), mark)
Case "MarkCurrentStatusCode"
mark.MarkCurrentStatusCode = r.ReadInnerXml()
End Select
End If
End If
End While
End Sub
Private Sub ReadImageDetails(r As XmlReader, ByRef mark As Mark)
Dim image As New ImageDetail()
While r.Read()
If r.IsStartElement() Then
If r.NodeType = XmlNodeType.Element Then
Select Case r.Name
Case "MarkImageBinary"
image.BinaryImage = r.ReadInnerXml()
Case "Height"
image.Height = r.ReadInnerXml()
Case "Width"
image.Width = r.ReadInnerXml()
Case "MarkImageFileFormat"
image.Format = r.ReadInnerXml()
End Select
End If
End If
End While
mark.Image = image
End Sub
Private Sub ReadGoodsDetails(r As XmlReader, ByRef mark As Mark)
While r.Read()
If r.IsStartElement() Then
If r.NodeType = XmlNodeType.Element Then
Select Case r.Name
Case "ClassificationKindCode"
mark.ClassificationKindCode = r.ReadInnerXml()
Case "ClassificationVersion"
mark.ClassificationVersion = r.ReadInnerXml()
Case "ProposedLeadingClassNumber"
mark.ProposedLeadingClassNumber = r.ReadInnerXml()
Case "ClassDescription"
ReadClassDescription(r.ReadSubtree(), mark)
Case "de:GoodsServicesNotClassifiedDescription"
mark.GoodsServicesNotClassified = r.ReadInnerXml()
End Select
End If
End If
End While
End Sub
Private Sub ReadClassDescription(r As XmlReader, ByRef mark As Mark)
Dim detail As New ClassificationDetail()
While r.Read()
If r.IsStartElement() Then
If r.NodeType = XmlNodeType.Element Then
Select Case r.Name
Case "ClassNumber"
detail.ClassNumber = r.ReadInnerXml()
Case "GoodsServicesDescription"
detail.GoodsServicesDescription = r.ReadInnerXml()
End Select
End If
End If
End While
mark.ClassificationDetail.Add(detail)
End Sub
Private Sub ReadMarkRecordDetails(r As XmlReader, ByRef mark As Mark)
While r.Read()
If r.IsStartElement() Then
If r.NodeType = XmlNodeType.Element Then
If r.Name = "BasicRecord" Then
ReadMarkRecord(r.ReadSubtree(), mark)
End If
End If
End If
End While
End Sub
Private Sub ReadMarkRecord(r As XmlReader, ByRef mark As Mark)
Dim detail As New MarkRecordDetail()
While r.Read()
If r.IsStartElement() Then
If r.NodeType = XmlNodeType.Element Then
Select Case r.Name
Case "RecordIdentifier"
detail.RecordIdentifier = r.ReadInnerXml()
Case "BasicRecordKind"
detail.BasicRecordKind = r.ReadInnerXml()
Case "RecordCurrentStatusCode"
detail.RecordCurrentStatusCode = r.ReadInnerXml()
Case "RecordCurrentStatusDate"
detail.RecordCurrentStatusDate = r.ReadInnerXml()
Case "de:RecordProcedureIncomplete"
detail.RecordProcedureIncomplete = True
End Select
End If
End If
End While
mark.MarkRecordDetails.Add(detail)
End Sub
#End Region
End Class

View File

@@ -0,0 +1,71 @@
Public Class Querybuilder
Public Shared Function Build(config As ConfigValues, db As DB)
Dim mainQuery As String
Dim companies As List(Of String)
Dim stringsToIgnore As New List(Of String)
' searchvalues ist entweder eine SQL Abfrage oder eine Kommagetrennte Liste
If config.query.ToUpper.StartsWith("SELECT") Then
companies = GetLiveQueryResult(config.query, db)
Else
companies = New List(Of String)(config.query.Split(";"))
End If
If config.queryIgnore.Count > 0 And config.queryIgnore.Contains(";") Then
stringsToIgnore = New List(Of String)(config.queryIgnore.Split(";"))
End If
mainQuery = BuildMainQuery(companies)
mainQuery &= BuildIgnoreQuery(stringsToIgnore)
Return mainQuery
End Function
Public Shared Function BuildMainQuery(companies As List(Of String)) As String
Dim query As String = String.Empty
For Each company As String In companies
Dim querypart As String = String.Format("(INH=""{0}"" OR ANM=""{0}"")", company.Trim())
query &= querypart
' Bei allen bis auf das letzte Unternehmen einen OR Operator einfügen
If (companies.IndexOf(company) + 1) < companies.Count Then
query &= " OR "
End If
Next
Return query
End Function
Public Shared Function BuildIgnoreQuery(stringsToIgnore As List(Of String))
Dim query As String = String.Empty
For Each stringToIgnore In stringsToIgnore
Dim querypart As String = String.Format(" NOT (INH=""{0}"" OR ANM=""{0}"")", stringToIgnore)
query &= querypart
Next
Return query
End Function
Public Shared Function GetLiveQueryResult(query As String, db As DB) As List(Of String)
Dim result As New List(Of String)
Dim SQL As String = query
Dim DT As DataTable = db.QueryTable(SQL)
If DT.Rows.Count = 0 Then
Throw New Exception("SQL Abfrage lieferte ein leeres Ergebnis zurück: " & query)
End If
For Each row As DataRow In DT.Rows
Dim item As String = CStr(row.Item(0)).Trim()
result.Add(row.Item(0))
Next
Return result
End Function
End Class

View File

@@ -0,0 +1,291 @@
<?xml version="1.0" encoding="utf-8"?>
<wsdl:definitions xmlns:intf="http://ws.marke.register.dpma.de" xmlns:apachesoap="http://xml.apache.org/xml-soap" xmlns:wsdlsoap="http://schemas.xmlsoap.org/wsdl/soap/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:impl="http://ws.marke.register.dpma.de" targetNamespace="http://ws.marke.register.dpma.de" xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/">
<wsdl:types>
<xsd:schema xmlns="http://www.w3.org/2001/XMLSchema" elementFormDefault="qualified" targetNamespace="http://ws.marke.register.dpma.de">
<xsd:element name="search">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="user" type="xsd:string" />
<xsd:element name="pwd" type="xsd:string" />
<xsd:element name="query" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="searchResponse">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="searchReturn" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="version">
<xsd:complexType />
</xsd:element>
<xsd:element name="versionResponse">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="versionReturn" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="getRegisterInfo">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="user" type="xsd:string" />
<xsd:element name="pwd" type="xsd:string" />
<xsd:element name="akz" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="getRegisterInfoResponse">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="getRegisterInfoReturn" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="getRegisterInfoBySt13Akz">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="user" type="xsd:string" />
<xsd:element name="pwd" type="xsd:string" />
<xsd:element name="akz" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="getRegisterInfoBySt13AkzResponse">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="getRegisterInfoBySt13AkzReturn" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="getRegisterFullImage">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="user" type="xsd:string" />
<xsd:element name="pwd" type="xsd:string" />
<xsd:element name="akz" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="getRegisterFullImageResponse">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="getRegisterFullImageReturn" type="xsd:base64Binary" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="getRegisterFullImageBySt13Akz">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="user" type="xsd:string" />
<xsd:element name="pwd" type="xsd:string" />
<xsd:element name="akz" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="getRegisterFullImageBySt13AkzResponse">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="getRegisterFullImageBySt13AkzReturn" type="xsd:base64Binary" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="getRegisterThumbnailImage">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="user" type="xsd:string" />
<xsd:element name="pwd" type="xsd:string" />
<xsd:element name="akz" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="getRegisterThumbnailImageResponse">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="getRegisterThumbnailImageReturn" type="xsd:base64Binary" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="getRegisterThumbnailImageBySt13Akz">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="user" type="xsd:string" />
<xsd:element name="pwd" type="xsd:string" />
<xsd:element name="akz" type="xsd:string" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
<xsd:element name="getRegisterThumbnailImageBySt13AkzResponse">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="getRegisterThumbnailImageBySt13AkzReturn" type="xsd:base64Binary" />
</xsd:sequence>
</xsd:complexType>
</xsd:element>
</xsd:schema>
</wsdl:types>
<wsdl:message name="searchResponse">
<wsdl:part name="parameters" element="impl:searchResponse" />
</wsdl:message>
<wsdl:message name="searchRequest">
<wsdl:part name="parameters" element="impl:search" />
</wsdl:message>
<wsdl:message name="versionResponse">
<wsdl:part name="parameters" element="impl:versionResponse" />
</wsdl:message>
<wsdl:message name="getRegisterInfoBySt13AkzResponse">
<wsdl:part name="parameters" element="impl:getRegisterInfoBySt13AkzResponse" />
</wsdl:message>
<wsdl:message name="getRegisterFullImageResponse">
<wsdl:part name="parameters" element="impl:getRegisterFullImageResponse" />
</wsdl:message>
<wsdl:message name="getRegisterFullImageBySt13AkzRequest">
<wsdl:part name="parameters" element="impl:getRegisterFullImageBySt13Akz" />
</wsdl:message>
<wsdl:message name="getRegisterThumbnailImageResponse">
<wsdl:part name="parameters" element="impl:getRegisterThumbnailImageResponse" />
</wsdl:message>
<wsdl:message name="versionRequest">
<wsdl:part name="parameters" element="impl:version" />
</wsdl:message>
<wsdl:message name="getRegisterInfoBySt13AkzRequest">
<wsdl:part name="parameters" element="impl:getRegisterInfoBySt13Akz" />
</wsdl:message>
<wsdl:message name="getRegisterInfoResponse">
<wsdl:part name="parameters" element="impl:getRegisterInfoResponse" />
</wsdl:message>
<wsdl:message name="getRegisterThumbnailImageRequest">
<wsdl:part name="parameters" element="impl:getRegisterThumbnailImage" />
</wsdl:message>
<wsdl:message name="getRegisterFullImageBySt13AkzResponse">
<wsdl:part name="parameters" element="impl:getRegisterFullImageBySt13AkzResponse" />
</wsdl:message>
<wsdl:message name="getRegisterFullImageRequest">
<wsdl:part name="parameters" element="impl:getRegisterFullImage" />
</wsdl:message>
<wsdl:message name="getRegisterThumbnailImageBySt13AkzResponse">
<wsdl:part name="parameters" element="impl:getRegisterThumbnailImageBySt13AkzResponse" />
</wsdl:message>
<wsdl:message name="getRegisterThumbnailImageBySt13AkzRequest">
<wsdl:part name="parameters" element="impl:getRegisterThumbnailImageBySt13Akz" />
</wsdl:message>
<wsdl:message name="getRegisterInfoRequest">
<wsdl:part name="parameters" element="impl:getRegisterInfo" />
</wsdl:message>
<wsdl:portType name="DPMAregister">
<wsdl:operation name="search">
<wsdl:input name="searchRequest" message="impl:searchRequest" />
<wsdl:output name="searchResponse" message="impl:searchResponse" />
</wsdl:operation>
<wsdl:operation name="version">
<wsdl:input name="versionRequest" message="impl:versionRequest" />
<wsdl:output name="versionResponse" message="impl:versionResponse" />
</wsdl:operation>
<wsdl:operation name="getRegisterInfo">
<wsdl:input name="getRegisterInfoRequest" message="impl:getRegisterInfoRequest" />
<wsdl:output name="getRegisterInfoResponse" message="impl:getRegisterInfoResponse" />
</wsdl:operation>
<wsdl:operation name="getRegisterInfoBySt13Akz">
<wsdl:input name="getRegisterInfoBySt13AkzRequest" message="impl:getRegisterInfoBySt13AkzRequest" />
<wsdl:output name="getRegisterInfoBySt13AkzResponse" message="impl:getRegisterInfoBySt13AkzResponse" />
</wsdl:operation>
<wsdl:operation name="getRegisterFullImage">
<wsdl:input name="getRegisterFullImageRequest" message="impl:getRegisterFullImageRequest" />
<wsdl:output name="getRegisterFullImageResponse" message="impl:getRegisterFullImageResponse" />
</wsdl:operation>
<wsdl:operation name="getRegisterFullImageBySt13Akz">
<wsdl:input name="getRegisterFullImageBySt13AkzRequest" message="impl:getRegisterFullImageBySt13AkzRequest" />
<wsdl:output name="getRegisterFullImageBySt13AkzResponse" message="impl:getRegisterFullImageBySt13AkzResponse" />
</wsdl:operation>
<wsdl:operation name="getRegisterThumbnailImage">
<wsdl:input name="getRegisterThumbnailImageRequest" message="impl:getRegisterThumbnailImageRequest" />
<wsdl:output name="getRegisterThumbnailImageResponse" message="impl:getRegisterThumbnailImageResponse" />
</wsdl:operation>
<wsdl:operation name="getRegisterThumbnailImageBySt13Akz">
<wsdl:input name="getRegisterThumbnailImageBySt13AkzRequest" message="impl:getRegisterThumbnailImageBySt13AkzRequest" />
<wsdl:output name="getRegisterThumbnailImageBySt13AkzResponse" message="impl:getRegisterThumbnailImageBySt13AkzResponse" />
</wsdl:operation>
</wsdl:portType>
<wsdl:binding name="DPMAregisterSoapBinding" type="impl:DPMAregister">
<wsdlsoap:binding transport="http://schemas.xmlsoap.org/soap/http" />
<wsdl:operation name="search">
<wsdlsoap:operation soapAction="" />
<wsdl:input name="searchRequest">
<wsdlsoap:body use="literal" />
</wsdl:input>
<wsdl:output name="searchResponse">
<wsdlsoap:body use="literal" />
</wsdl:output>
</wsdl:operation>
<wsdl:operation name="version">
<wsdlsoap:operation soapAction="" />
<wsdl:input name="versionRequest">
<wsdlsoap:body use="literal" />
</wsdl:input>
<wsdl:output name="versionResponse">
<wsdlsoap:body use="literal" />
</wsdl:output>
</wsdl:operation>
<wsdl:operation name="getRegisterInfo">
<wsdlsoap:operation soapAction="" />
<wsdl:input name="getRegisterInfoRequest">
<wsdlsoap:body use="literal" />
</wsdl:input>
<wsdl:output name="getRegisterInfoResponse">
<wsdlsoap:body use="literal" />
</wsdl:output>
</wsdl:operation>
<wsdl:operation name="getRegisterInfoBySt13Akz">
<wsdlsoap:operation soapAction="" />
<wsdl:input name="getRegisterInfoBySt13AkzRequest">
<wsdlsoap:body use="literal" />
</wsdl:input>
<wsdl:output name="getRegisterInfoBySt13AkzResponse">
<wsdlsoap:body use="literal" />
</wsdl:output>
</wsdl:operation>
<wsdl:operation name="getRegisterFullImage">
<wsdlsoap:operation soapAction="" />
<wsdl:input name="getRegisterFullImageRequest">
<wsdlsoap:body use="literal" />
</wsdl:input>
<wsdl:output name="getRegisterFullImageResponse">
<wsdlsoap:body use="literal" />
</wsdl:output>
</wsdl:operation>
<wsdl:operation name="getRegisterFullImageBySt13Akz">
<wsdlsoap:operation soapAction="" />
<wsdl:input name="getRegisterFullImageBySt13AkzRequest">
<wsdlsoap:body use="literal" />
</wsdl:input>
<wsdl:output name="getRegisterFullImageBySt13AkzResponse">
<wsdlsoap:body use="literal" />
</wsdl:output>
</wsdl:operation>
<wsdl:operation name="getRegisterThumbnailImage">
<wsdlsoap:operation soapAction="" />
<wsdl:input name="getRegisterThumbnailImageRequest">
<wsdlsoap:body use="literal" />
</wsdl:input>
<wsdl:output name="getRegisterThumbnailImageResponse">
<wsdlsoap:body use="literal" />
</wsdl:output>
</wsdl:operation>
<wsdl:operation name="getRegisterThumbnailImageBySt13Akz">
<wsdlsoap:operation soapAction="" />
<wsdl:input name="getRegisterThumbnailImageBySt13AkzRequest">
<wsdlsoap:body use="literal" />
</wsdl:input>
<wsdl:output name="getRegisterThumbnailImageBySt13AkzResponse">
<wsdlsoap:body use="literal" />
</wsdl:output>
</wsdl:operation>
</wsdl:binding>
<wsdl:service name="DPMAregisterMarkeService">
<wsdl:port name="DPMAregister" binding="impl:DPMAregisterSoapBinding">
<wsdlsoap:address location="http://dpmaconnect.dpma.de/dpmaws/services/DPMAregisterMarkeService" />
</wsdl:port>
</wsdl:service>
</wsdl:definitions>

View File

@@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
This file is automatically generated by Visual Studio .Net. It is
used to store generic object data source configuration information.
Renaming the file extension or editing the content of this file may
cause the file to be unrecognizable by the program.
-->
<GenericObjectDataSource DisplayName="getRegisterFullImageBySt13AkzResponse" Version="1.0" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TypeInfo>DpmaXmlParser.DPMA.Marke.getRegisterFullImageBySt13AkzResponse, Service References.DPMA.Marke.Reference.vb, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</TypeInfo>
</GenericObjectDataSource>

View File

@@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
This file is automatically generated by Visual Studio .Net. It is
used to store generic object data source configuration information.
Renaming the file extension or editing the content of this file may
cause the file to be unrecognizable by the program.
-->
<GenericObjectDataSource DisplayName="getRegisterFullImageResponse" Version="1.0" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TypeInfo>DpmaXmlParser.DPMA.Marke.getRegisterFullImageResponse, Service References.DPMA.Marke.Reference.vb, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</TypeInfo>
</GenericObjectDataSource>

View File

@@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
This file is automatically generated by Visual Studio .Net. It is
used to store generic object data source configuration information.
Renaming the file extension or editing the content of this file may
cause the file to be unrecognizable by the program.
-->
<GenericObjectDataSource DisplayName="getRegisterInfoBySt13AkzResponse" Version="1.0" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TypeInfo>DpmaXmlParser.DPMA.Marke.getRegisterInfoBySt13AkzResponse, Service References.DPMA.Marke.Reference.vb, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</TypeInfo>
</GenericObjectDataSource>

View File

@@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
This file is automatically generated by Visual Studio .Net. It is
used to store generic object data source configuration information.
Renaming the file extension or editing the content of this file may
cause the file to be unrecognizable by the program.
-->
<GenericObjectDataSource DisplayName="getRegisterInfoResponse" Version="1.0" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TypeInfo>DpmaXmlParser.DPMA.Marke.getRegisterInfoResponse, Service References.DPMA.Marke.Reference.vb, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</TypeInfo>
</GenericObjectDataSource>

View File

@@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
This file is automatically generated by Visual Studio .Net. It is
used to store generic object data source configuration information.
Renaming the file extension or editing the content of this file may
cause the file to be unrecognizable by the program.
-->
<GenericObjectDataSource DisplayName="getRegisterThumbnailImageBySt13AkzResponse" Version="1.0" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TypeInfo>DpmaXmlParser.DPMA.Marke.getRegisterThumbnailImageBySt13AkzResponse, Service References.DPMA.Marke.Reference.vb, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</TypeInfo>
</GenericObjectDataSource>

View File

@@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
This file is automatically generated by Visual Studio .Net. It is
used to store generic object data source configuration information.
Renaming the file extension or editing the content of this file may
cause the file to be unrecognizable by the program.
-->
<GenericObjectDataSource DisplayName="getRegisterThumbnailImageResponse" Version="1.0" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TypeInfo>DpmaXmlParser.DPMA.Marke.getRegisterThumbnailImageResponse, Service References.DPMA.Marke.Reference.vb, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</TypeInfo>
</GenericObjectDataSource>

View File

@@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
This file is automatically generated by Visual Studio .Net. It is
used to store generic object data source configuration information.
Renaming the file extension or editing the content of this file may
cause the file to be unrecognizable by the program.
-->
<GenericObjectDataSource DisplayName="searchResponse" Version="1.0" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TypeInfo>DpmaXmlParser.DPMA.Marke.searchResponse, Service References.DPMA.Marke.Reference.vb, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</TypeInfo>
</GenericObjectDataSource>

View File

@@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
This file is automatically generated by Visual Studio .Net. It is
used to store generic object data source configuration information.
Renaming the file extension or editing the content of this file may
cause the file to be unrecognizable by the program.
-->
<GenericObjectDataSource DisplayName="versionResponse" Version="1.0" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TypeInfo>DpmaXmlParser.DPMA.Marke.versionResponse, Service References.DPMA.Marke.Reference.vb, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</TypeInfo>
</GenericObjectDataSource>

View File

@@ -0,0 +1,31 @@
<?xml version="1.0" encoding="utf-8"?>
<ReferenceGroup xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ID="5c24b4c2-654d-40f8-a2ca-f6c45a214704" xmlns="urn:schemas-microsoft-com:xml-wcfservicemap">
<ClientOptions>
<GenerateAsynchronousMethods>false</GenerateAsynchronousMethods>
<GenerateTaskBasedAsynchronousMethod>true</GenerateTaskBasedAsynchronousMethod>
<EnableDataBinding>true</EnableDataBinding>
<ExcludedTypes />
<ImportXmlTypes>false</ImportXmlTypes>
<GenerateInternalTypes>false</GenerateInternalTypes>
<GenerateMessageContracts>false</GenerateMessageContracts>
<NamespaceMappings />
<CollectionMappings />
<GenerateSerializableTypes>true</GenerateSerializableTypes>
<Serializer>Auto</Serializer>
<UseSerializerForFaults>true</UseSerializerForFaults>
<ReferenceAllAssemblies>true</ReferenceAllAssemblies>
<ReferencedAssemblies />
<ReferencedDataContractTypes />
<ServiceContractMappings />
</ClientOptions>
<MetadataSources>
<MetadataSource Address="https://dpmaconnect.dpma.de/dpmaws/services/DPMAregisterMarkeService?wsdl" Protocol="http" SourceId="1" />
</MetadataSources>
<Metadata>
<MetadataFile FileName="DPMAregisterMarkeService.wsdl" MetadataType="Wsdl" ID="c9e21c8d-4200-4468-abc2-c3abb0571d33" SourceId="1" SourceUrl="https://dpmaconnect.dpma.de/dpmaws/services/DPMAregisterMarkeService?wsdl" />
</Metadata>
<Extensions>
<ExtensionFile FileName="configuration91.svcinfo" Name="configuration91.svcinfo" />
<ExtensionFile FileName="configuration.svcinfo" Name="configuration.svcinfo" />
</Extensions>
</ReferenceGroup>

View File

@@ -0,0 +1,991 @@
'------------------------------------------------------------------------------
' <auto-generated>
' Dieser Code wurde von einem Tool generiert.
' Laufzeitversion:4.0.30319.34209
'
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Namespace DPMA.Marke
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ServiceModel.ServiceContractAttribute([Namespace]:="http://ws.marke.register.dpma.de", ConfigurationName:="DPMA.Marke.DPMAregister")> _
Public Interface DPMAregister
'CODEGEN: Es wird ein Nachrichtenvertrag generiert, da Elementname user aus Namespace http://ws.marke.register.dpma.de nicht als "nillable" (nullwertfähig) gekennzeichnet ist.
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function search(ByVal request As DPMA.Marke.searchRequest) As DPMA.Marke.searchResponse
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function searchAsync(ByVal request As DPMA.Marke.searchRequest) As System.Threading.Tasks.Task(Of DPMA.Marke.searchResponse)
'CODEGEN: Es wird ein Nachrichtenvertrag generiert, da Elementname versionReturn aus Namespace http://ws.marke.register.dpma.de nicht als "nillable" (nullwertfähig) gekennzeichnet ist.
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function version(ByVal request As DPMA.Marke.versionRequest) As DPMA.Marke.versionResponse
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function versionAsync(ByVal request As DPMA.Marke.versionRequest) As System.Threading.Tasks.Task(Of DPMA.Marke.versionResponse)
'CODEGEN: Es wird ein Nachrichtenvertrag generiert, da Elementname user aus Namespace http://ws.marke.register.dpma.de nicht als "nillable" (nullwertfähig) gekennzeichnet ist.
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function getRegisterInfo(ByVal request As DPMA.Marke.getRegisterInfoRequest) As DPMA.Marke.getRegisterInfoResponse
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function getRegisterInfoAsync(ByVal request As DPMA.Marke.getRegisterInfoRequest) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterInfoResponse)
'CODEGEN: Es wird ein Nachrichtenvertrag generiert, da Elementname user aus Namespace http://ws.marke.register.dpma.de nicht als "nillable" (nullwertfähig) gekennzeichnet ist.
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function getRegisterInfoBySt13Akz(ByVal request As DPMA.Marke.getRegisterInfoBySt13AkzRequest) As DPMA.Marke.getRegisterInfoBySt13AkzResponse
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function getRegisterInfoBySt13AkzAsync(ByVal request As DPMA.Marke.getRegisterInfoBySt13AkzRequest) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterInfoBySt13AkzResponse)
'CODEGEN: Es wird ein Nachrichtenvertrag generiert, da Elementname user aus Namespace http://ws.marke.register.dpma.de nicht als "nillable" (nullwertfähig) gekennzeichnet ist.
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function getRegisterFullImage(ByVal request As DPMA.Marke.getRegisterFullImageRequest) As DPMA.Marke.getRegisterFullImageResponse
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function getRegisterFullImageAsync(ByVal request As DPMA.Marke.getRegisterFullImageRequest) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterFullImageResponse)
'CODEGEN: Es wird ein Nachrichtenvertrag generiert, da Elementname user aus Namespace http://ws.marke.register.dpma.de nicht als "nillable" (nullwertfähig) gekennzeichnet ist.
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function getRegisterFullImageBySt13Akz(ByVal request As DPMA.Marke.getRegisterFullImageBySt13AkzRequest) As DPMA.Marke.getRegisterFullImageBySt13AkzResponse
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function getRegisterFullImageBySt13AkzAsync(ByVal request As DPMA.Marke.getRegisterFullImageBySt13AkzRequest) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterFullImageBySt13AkzResponse)
'CODEGEN: Es wird ein Nachrichtenvertrag generiert, da Elementname user aus Namespace http://ws.marke.register.dpma.de nicht als "nillable" (nullwertfähig) gekennzeichnet ist.
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function getRegisterThumbnailImage(ByVal request As DPMA.Marke.getRegisterThumbnailImageRequest) As DPMA.Marke.getRegisterThumbnailImageResponse
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function getRegisterThumbnailImageAsync(ByVal request As DPMA.Marke.getRegisterThumbnailImageRequest) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterThumbnailImageResponse)
'CODEGEN: Es wird ein Nachrichtenvertrag generiert, da Elementname user aus Namespace http://ws.marke.register.dpma.de nicht als "nillable" (nullwertfähig) gekennzeichnet ist.
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function getRegisterThumbnailImageBySt13Akz(ByVal request As DPMA.Marke.getRegisterThumbnailImageBySt13AkzRequest) As DPMA.Marke.getRegisterThumbnailImageBySt13AkzResponse
<System.ServiceModel.OperationContractAttribute(Action:="", ReplyAction:="*")> _
Function getRegisterThumbnailImageBySt13AkzAsync(ByVal request As DPMA.Marke.getRegisterThumbnailImageBySt13AkzRequest) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterThumbnailImageBySt13AkzResponse)
End Interface
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.ServiceModel.MessageContractAttribute(IsWrapped:=false)> _
Partial Public Class searchRequest
<System.ServiceModel.MessageBodyMemberAttribute(Name:="search", [Namespace]:="http://ws.marke.register.dpma.de", Order:=0)> _
Public Body As DPMA.Marke.searchRequestBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Marke.searchRequestBody)
MyBase.New
Me.Body = Body
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.marke.register.dpma.de")> _
Partial Public Class searchRequestBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public user As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=1)> _
Public pwd As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=2)> _
Public query As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal user As String, ByVal pwd As String, ByVal query As String)
MyBase.New
Me.user = user
Me.pwd = pwd
Me.query = query
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.ServiceModel.MessageContractAttribute(IsWrapped:=false)> _
Partial Public Class searchResponse
<System.ServiceModel.MessageBodyMemberAttribute(Name:="searchResponse", [Namespace]:="http://ws.marke.register.dpma.de", Order:=0)> _
Public Body As DPMA.Marke.searchResponseBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Marke.searchResponseBody)
MyBase.New
Me.Body = Body
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.marke.register.dpma.de")> _
Partial Public Class searchResponseBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public searchReturn As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal searchReturn As String)
MyBase.New
Me.searchReturn = searchReturn
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.ServiceModel.MessageContractAttribute(IsWrapped:=false)> _
Partial Public Class versionRequest
<System.ServiceModel.MessageBodyMemberAttribute(Name:="version", [Namespace]:="http://ws.marke.register.dpma.de", Order:=0)> _
Public Body As DPMA.Marke.versionRequestBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Marke.versionRequestBody)
MyBase.New
Me.Body = Body
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.Runtime.Serialization.DataContractAttribute()> _
Partial Public Class versionRequestBody
Public Sub New()
MyBase.New
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.ServiceModel.MessageContractAttribute(IsWrapped:=false)> _
Partial Public Class versionResponse
<System.ServiceModel.MessageBodyMemberAttribute(Name:="versionResponse", [Namespace]:="http://ws.marke.register.dpma.de", Order:=0)> _
Public Body As DPMA.Marke.versionResponseBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Marke.versionResponseBody)
MyBase.New
Me.Body = Body
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.marke.register.dpma.de")> _
Partial Public Class versionResponseBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public versionReturn As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal versionReturn As String)
MyBase.New
Me.versionReturn = versionReturn
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.ServiceModel.MessageContractAttribute(IsWrapped:=false)> _
Partial Public Class getRegisterInfoRequest
<System.ServiceModel.MessageBodyMemberAttribute(Name:="getRegisterInfo", [Namespace]:="http://ws.marke.register.dpma.de", Order:=0)> _
Public Body As DPMA.Marke.getRegisterInfoRequestBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Marke.getRegisterInfoRequestBody)
MyBase.New
Me.Body = Body
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.marke.register.dpma.de")> _
Partial Public Class getRegisterInfoRequestBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public user As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=1)> _
Public pwd As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=2)> _
Public akz As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal user As String, ByVal pwd As String, ByVal akz As String)
MyBase.New
Me.user = user
Me.pwd = pwd
Me.akz = akz
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.ServiceModel.MessageContractAttribute(IsWrapped:=false)> _
Partial Public Class getRegisterInfoResponse
<System.ServiceModel.MessageBodyMemberAttribute(Name:="getRegisterInfoResponse", [Namespace]:="http://ws.marke.register.dpma.de", Order:=0)> _
Public Body As DPMA.Marke.getRegisterInfoResponseBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Marke.getRegisterInfoResponseBody)
MyBase.New
Me.Body = Body
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.marke.register.dpma.de")> _
Partial Public Class getRegisterInfoResponseBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public getRegisterInfoReturn As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal getRegisterInfoReturn As String)
MyBase.New
Me.getRegisterInfoReturn = getRegisterInfoReturn
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.ServiceModel.MessageContractAttribute(IsWrapped:=false)> _
Partial Public Class getRegisterInfoBySt13AkzRequest
<System.ServiceModel.MessageBodyMemberAttribute(Name:="getRegisterInfoBySt13Akz", [Namespace]:="http://ws.marke.register.dpma.de", Order:=0)> _
Public Body As DPMA.Marke.getRegisterInfoBySt13AkzRequestBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Marke.getRegisterInfoBySt13AkzRequestBody)
MyBase.New
Me.Body = Body
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.marke.register.dpma.de")> _
Partial Public Class getRegisterInfoBySt13AkzRequestBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public user As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=1)> _
Public pwd As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=2)> _
Public akz As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal user As String, ByVal pwd As String, ByVal akz As String)
MyBase.New
Me.user = user
Me.pwd = pwd
Me.akz = akz
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.ServiceModel.MessageContractAttribute(IsWrapped:=false)> _
Partial Public Class getRegisterInfoBySt13AkzResponse
<System.ServiceModel.MessageBodyMemberAttribute(Name:="getRegisterInfoBySt13AkzResponse", [Namespace]:="http://ws.marke.register.dpma.de", Order:=0)> _
Public Body As DPMA.Marke.getRegisterInfoBySt13AkzResponseBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Marke.getRegisterInfoBySt13AkzResponseBody)
MyBase.New
Me.Body = Body
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.marke.register.dpma.de")> _
Partial Public Class getRegisterInfoBySt13AkzResponseBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public getRegisterInfoBySt13AkzReturn As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal getRegisterInfoBySt13AkzReturn As String)
MyBase.New
Me.getRegisterInfoBySt13AkzReturn = getRegisterInfoBySt13AkzReturn
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.ServiceModel.MessageContractAttribute(IsWrapped:=false)> _
Partial Public Class getRegisterFullImageRequest
<System.ServiceModel.MessageBodyMemberAttribute(Name:="getRegisterFullImage", [Namespace]:="http://ws.marke.register.dpma.de", Order:=0)> _
Public Body As DPMA.Marke.getRegisterFullImageRequestBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Marke.getRegisterFullImageRequestBody)
MyBase.New
Me.Body = Body
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.marke.register.dpma.de")> _
Partial Public Class getRegisterFullImageRequestBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public user As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=1)> _
Public pwd As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=2)> _
Public akz As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal user As String, ByVal pwd As String, ByVal akz As String)
MyBase.New
Me.user = user
Me.pwd = pwd
Me.akz = akz
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.ServiceModel.MessageContractAttribute(IsWrapped:=false)> _
Partial Public Class getRegisterFullImageResponse
<System.ServiceModel.MessageBodyMemberAttribute(Name:="getRegisterFullImageResponse", [Namespace]:="http://ws.marke.register.dpma.de", Order:=0)> _
Public Body As DPMA.Marke.getRegisterFullImageResponseBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Marke.getRegisterFullImageResponseBody)
MyBase.New
Me.Body = Body
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.marke.register.dpma.de")> _
Partial Public Class getRegisterFullImageResponseBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public getRegisterFullImageReturn() As Byte
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal getRegisterFullImageReturn() As Byte)
MyBase.New
Me.getRegisterFullImageReturn = getRegisterFullImageReturn
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.ServiceModel.MessageContractAttribute(IsWrapped:=false)> _
Partial Public Class getRegisterFullImageBySt13AkzRequest
<System.ServiceModel.MessageBodyMemberAttribute(Name:="getRegisterFullImageBySt13Akz", [Namespace]:="http://ws.marke.register.dpma.de", Order:=0)> _
Public Body As DPMA.Marke.getRegisterFullImageBySt13AkzRequestBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Marke.getRegisterFullImageBySt13AkzRequestBody)
MyBase.New
Me.Body = Body
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.marke.register.dpma.de")> _
Partial Public Class getRegisterFullImageBySt13AkzRequestBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public user As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=1)> _
Public pwd As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=2)> _
Public akz As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal user As String, ByVal pwd As String, ByVal akz As String)
MyBase.New
Me.user = user
Me.pwd = pwd
Me.akz = akz
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.ServiceModel.MessageContractAttribute(IsWrapped:=false)> _
Partial Public Class getRegisterFullImageBySt13AkzResponse
<System.ServiceModel.MessageBodyMemberAttribute(Name:="getRegisterFullImageBySt13AkzResponse", [Namespace]:="http://ws.marke.register.dpma.de", Order:=0)> _
Public Body As DPMA.Marke.getRegisterFullImageBySt13AkzResponseBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Marke.getRegisterFullImageBySt13AkzResponseBody)
MyBase.New
Me.Body = Body
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.marke.register.dpma.de")> _
Partial Public Class getRegisterFullImageBySt13AkzResponseBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public getRegisterFullImageBySt13AkzReturn() As Byte
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal getRegisterFullImageBySt13AkzReturn() As Byte)
MyBase.New
Me.getRegisterFullImageBySt13AkzReturn = getRegisterFullImageBySt13AkzReturn
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.ServiceModel.MessageContractAttribute(IsWrapped:=false)> _
Partial Public Class getRegisterThumbnailImageRequest
<System.ServiceModel.MessageBodyMemberAttribute(Name:="getRegisterThumbnailImage", [Namespace]:="http://ws.marke.register.dpma.de", Order:=0)> _
Public Body As DPMA.Marke.getRegisterThumbnailImageRequestBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Marke.getRegisterThumbnailImageRequestBody)
MyBase.New
Me.Body = Body
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.marke.register.dpma.de")> _
Partial Public Class getRegisterThumbnailImageRequestBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public user As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=1)> _
Public pwd As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=2)> _
Public akz As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal user As String, ByVal pwd As String, ByVal akz As String)
MyBase.New
Me.user = user
Me.pwd = pwd
Me.akz = akz
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.ServiceModel.MessageContractAttribute(IsWrapped:=false)> _
Partial Public Class getRegisterThumbnailImageResponse
<System.ServiceModel.MessageBodyMemberAttribute(Name:="getRegisterThumbnailImageResponse", [Namespace]:="http://ws.marke.register.dpma.de", Order:=0)> _
Public Body As DPMA.Marke.getRegisterThumbnailImageResponseBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Marke.getRegisterThumbnailImageResponseBody)
MyBase.New
Me.Body = Body
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.marke.register.dpma.de")> _
Partial Public Class getRegisterThumbnailImageResponseBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public getRegisterThumbnailImageReturn() As Byte
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal getRegisterThumbnailImageReturn() As Byte)
MyBase.New
Me.getRegisterThumbnailImageReturn = getRegisterThumbnailImageReturn
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.ServiceModel.MessageContractAttribute(IsWrapped:=false)> _
Partial Public Class getRegisterThumbnailImageBySt13AkzRequest
<System.ServiceModel.MessageBodyMemberAttribute(Name:="getRegisterThumbnailImageBySt13Akz", [Namespace]:="http://ws.marke.register.dpma.de", Order:=0)> _
Public Body As DPMA.Marke.getRegisterThumbnailImageBySt13AkzRequestBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Marke.getRegisterThumbnailImageBySt13AkzRequestBody)
MyBase.New
Me.Body = Body
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.marke.register.dpma.de")> _
Partial Public Class getRegisterThumbnailImageBySt13AkzRequestBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public user As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=1)> _
Public pwd As String
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=2)> _
Public akz As String
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal user As String, ByVal pwd As String, ByVal akz As String)
MyBase.New
Me.user = user
Me.pwd = pwd
Me.akz = akz
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.ServiceModel.MessageContractAttribute(IsWrapped:=false)> _
Partial Public Class getRegisterThumbnailImageBySt13AkzResponse
<System.ServiceModel.MessageBodyMemberAttribute(Name:="getRegisterThumbnailImageBySt13AkzResponse", [Namespace]:="http://ws.marke.register.dpma.de", Order:=0)> _
Public Body As DPMA.Marke.getRegisterThumbnailImageBySt13AkzResponseBody
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal Body As DPMA.Marke.getRegisterThumbnailImageBySt13AkzResponseBody)
MyBase.New
Me.Body = Body
End Sub
End Class
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0"), _
System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced), _
System.Runtime.Serialization.DataContractAttribute([Namespace]:="http://ws.marke.register.dpma.de")> _
Partial Public Class getRegisterThumbnailImageBySt13AkzResponseBody
<System.Runtime.Serialization.DataMemberAttribute(EmitDefaultValue:=false, Order:=0)> _
Public getRegisterThumbnailImageBySt13AkzReturn() As Byte
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal getRegisterThumbnailImageBySt13AkzReturn() As Byte)
MyBase.New
Me.getRegisterThumbnailImageBySt13AkzReturn = getRegisterThumbnailImageBySt13AkzReturn
End Sub
End Class
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0")> _
Public Interface DPMAregisterChannel
Inherits DPMA.Marke.DPMAregister, System.ServiceModel.IClientChannel
End Interface
<System.Diagnostics.DebuggerStepThroughAttribute(), _
System.CodeDom.Compiler.GeneratedCodeAttribute("System.ServiceModel", "4.0.0.0")> _
Partial Public Class DPMAregisterClient
Inherits System.ServiceModel.ClientBase(Of DPMA.Marke.DPMAregister)
Implements DPMA.Marke.DPMAregister
Public Sub New()
MyBase.New
End Sub
Public Sub New(ByVal endpointConfigurationName As String)
MyBase.New(endpointConfigurationName)
End Sub
Public Sub New(ByVal endpointConfigurationName As String, ByVal remoteAddress As String)
MyBase.New(endpointConfigurationName, remoteAddress)
End Sub
Public Sub New(ByVal endpointConfigurationName As String, ByVal remoteAddress As System.ServiceModel.EndpointAddress)
MyBase.New(endpointConfigurationName, remoteAddress)
End Sub
Public Sub New(ByVal binding As System.ServiceModel.Channels.Binding, ByVal remoteAddress As System.ServiceModel.EndpointAddress)
MyBase.New(binding, remoteAddress)
End Sub
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Marke_DPMAregister_search(ByVal request As DPMA.Marke.searchRequest) As DPMA.Marke.searchResponse Implements DPMA.Marke.DPMAregister.search
Return MyBase.Channel.search(request)
End Function
Public Function search(ByVal user As String, ByVal pwd As String, ByVal query As String) As String
Dim inValue As DPMA.Marke.searchRequest = New DPMA.Marke.searchRequest()
inValue.Body = New DPMA.Marke.searchRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.query = query
Dim retVal As DPMA.Marke.searchResponse = CType(Me,DPMA.Marke.DPMAregister).search(inValue)
Return retVal.Body.searchReturn
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Marke_DPMAregister_searchAsync(ByVal request As DPMA.Marke.searchRequest) As System.Threading.Tasks.Task(Of DPMA.Marke.searchResponse) Implements DPMA.Marke.DPMAregister.searchAsync
Return MyBase.Channel.searchAsync(request)
End Function
Public Function searchAsync(ByVal user As String, ByVal pwd As String, ByVal query As String) As System.Threading.Tasks.Task(Of DPMA.Marke.searchResponse)
Dim inValue As DPMA.Marke.searchRequest = New DPMA.Marke.searchRequest()
inValue.Body = New DPMA.Marke.searchRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.query = query
Return CType(Me,DPMA.Marke.DPMAregister).searchAsync(inValue)
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Marke_DPMAregister_version(ByVal request As DPMA.Marke.versionRequest) As DPMA.Marke.versionResponse Implements DPMA.Marke.DPMAregister.version
Return MyBase.Channel.version(request)
End Function
Public Function version() As String
Dim inValue As DPMA.Marke.versionRequest = New DPMA.Marke.versionRequest()
inValue.Body = New DPMA.Marke.versionRequestBody()
Dim retVal As DPMA.Marke.versionResponse = CType(Me,DPMA.Marke.DPMAregister).version(inValue)
Return retVal.Body.versionReturn
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Marke_DPMAregister_versionAsync(ByVal request As DPMA.Marke.versionRequest) As System.Threading.Tasks.Task(Of DPMA.Marke.versionResponse) Implements DPMA.Marke.DPMAregister.versionAsync
Return MyBase.Channel.versionAsync(request)
End Function
Public Function versionAsync() As System.Threading.Tasks.Task(Of DPMA.Marke.versionResponse)
Dim inValue As DPMA.Marke.versionRequest = New DPMA.Marke.versionRequest()
inValue.Body = New DPMA.Marke.versionRequestBody()
Return CType(Me,DPMA.Marke.DPMAregister).versionAsync(inValue)
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Marke_DPMAregister_getRegisterInfo(ByVal request As DPMA.Marke.getRegisterInfoRequest) As DPMA.Marke.getRegisterInfoResponse Implements DPMA.Marke.DPMAregister.getRegisterInfo
Return MyBase.Channel.getRegisterInfo(request)
End Function
Public Function getRegisterInfo(ByVal user As String, ByVal pwd As String, ByVal akz As String) As String
Dim inValue As DPMA.Marke.getRegisterInfoRequest = New DPMA.Marke.getRegisterInfoRequest()
inValue.Body = New DPMA.Marke.getRegisterInfoRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.akz = akz
Dim retVal As DPMA.Marke.getRegisterInfoResponse = CType(Me,DPMA.Marke.DPMAregister).getRegisterInfo(inValue)
Return retVal.Body.getRegisterInfoReturn
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Marke_DPMAregister_getRegisterInfoAsync(ByVal request As DPMA.Marke.getRegisterInfoRequest) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterInfoResponse) Implements DPMA.Marke.DPMAregister.getRegisterInfoAsync
Return MyBase.Channel.getRegisterInfoAsync(request)
End Function
Public Function getRegisterInfoAsync(ByVal user As String, ByVal pwd As String, ByVal akz As String) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterInfoResponse)
Dim inValue As DPMA.Marke.getRegisterInfoRequest = New DPMA.Marke.getRegisterInfoRequest()
inValue.Body = New DPMA.Marke.getRegisterInfoRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.akz = akz
Return CType(Me,DPMA.Marke.DPMAregister).getRegisterInfoAsync(inValue)
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Marke_DPMAregister_getRegisterInfoBySt13Akz(ByVal request As DPMA.Marke.getRegisterInfoBySt13AkzRequest) As DPMA.Marke.getRegisterInfoBySt13AkzResponse Implements DPMA.Marke.DPMAregister.getRegisterInfoBySt13Akz
Return MyBase.Channel.getRegisterInfoBySt13Akz(request)
End Function
Public Function getRegisterInfoBySt13Akz(ByVal user As String, ByVal pwd As String, ByVal akz As String) As String
Dim inValue As DPMA.Marke.getRegisterInfoBySt13AkzRequest = New DPMA.Marke.getRegisterInfoBySt13AkzRequest()
inValue.Body = New DPMA.Marke.getRegisterInfoBySt13AkzRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.akz = akz
Dim retVal As DPMA.Marke.getRegisterInfoBySt13AkzResponse = CType(Me,DPMA.Marke.DPMAregister).getRegisterInfoBySt13Akz(inValue)
Return retVal.Body.getRegisterInfoBySt13AkzReturn
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Marke_DPMAregister_getRegisterInfoBySt13AkzAsync(ByVal request As DPMA.Marke.getRegisterInfoBySt13AkzRequest) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterInfoBySt13AkzResponse) Implements DPMA.Marke.DPMAregister.getRegisterInfoBySt13AkzAsync
Return MyBase.Channel.getRegisterInfoBySt13AkzAsync(request)
End Function
Public Function getRegisterInfoBySt13AkzAsync(ByVal user As String, ByVal pwd As String, ByVal akz As String) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterInfoBySt13AkzResponse)
Dim inValue As DPMA.Marke.getRegisterInfoBySt13AkzRequest = New DPMA.Marke.getRegisterInfoBySt13AkzRequest()
inValue.Body = New DPMA.Marke.getRegisterInfoBySt13AkzRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.akz = akz
Return CType(Me,DPMA.Marke.DPMAregister).getRegisterInfoBySt13AkzAsync(inValue)
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Marke_DPMAregister_getRegisterFullImage(ByVal request As DPMA.Marke.getRegisterFullImageRequest) As DPMA.Marke.getRegisterFullImageResponse Implements DPMA.Marke.DPMAregister.getRegisterFullImage
Return MyBase.Channel.getRegisterFullImage(request)
End Function
Public Function getRegisterFullImage(ByVal user As String, ByVal pwd As String, ByVal akz As String) As Byte()
Dim inValue As DPMA.Marke.getRegisterFullImageRequest = New DPMA.Marke.getRegisterFullImageRequest()
inValue.Body = New DPMA.Marke.getRegisterFullImageRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.akz = akz
Dim retVal As DPMA.Marke.getRegisterFullImageResponse = CType(Me,DPMA.Marke.DPMAregister).getRegisterFullImage(inValue)
Return retVal.Body.getRegisterFullImageReturn
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Marke_DPMAregister_getRegisterFullImageAsync(ByVal request As DPMA.Marke.getRegisterFullImageRequest) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterFullImageResponse) Implements DPMA.Marke.DPMAregister.getRegisterFullImageAsync
Return MyBase.Channel.getRegisterFullImageAsync(request)
End Function
Public Function getRegisterFullImageAsync(ByVal user As String, ByVal pwd As String, ByVal akz As String) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterFullImageResponse)
Dim inValue As DPMA.Marke.getRegisterFullImageRequest = New DPMA.Marke.getRegisterFullImageRequest()
inValue.Body = New DPMA.Marke.getRegisterFullImageRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.akz = akz
Return CType(Me,DPMA.Marke.DPMAregister).getRegisterFullImageAsync(inValue)
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Marke_DPMAregister_getRegisterFullImageBySt13Akz(ByVal request As DPMA.Marke.getRegisterFullImageBySt13AkzRequest) As DPMA.Marke.getRegisterFullImageBySt13AkzResponse Implements DPMA.Marke.DPMAregister.getRegisterFullImageBySt13Akz
Return MyBase.Channel.getRegisterFullImageBySt13Akz(request)
End Function
Public Function getRegisterFullImageBySt13Akz(ByVal user As String, ByVal pwd As String, ByVal akz As String) As Byte()
Dim inValue As DPMA.Marke.getRegisterFullImageBySt13AkzRequest = New DPMA.Marke.getRegisterFullImageBySt13AkzRequest()
inValue.Body = New DPMA.Marke.getRegisterFullImageBySt13AkzRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.akz = akz
Dim retVal As DPMA.Marke.getRegisterFullImageBySt13AkzResponse = CType(Me,DPMA.Marke.DPMAregister).getRegisterFullImageBySt13Akz(inValue)
Return retVal.Body.getRegisterFullImageBySt13AkzReturn
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Marke_DPMAregister_getRegisterFullImageBySt13AkzAsync(ByVal request As DPMA.Marke.getRegisterFullImageBySt13AkzRequest) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterFullImageBySt13AkzResponse) Implements DPMA.Marke.DPMAregister.getRegisterFullImageBySt13AkzAsync
Return MyBase.Channel.getRegisterFullImageBySt13AkzAsync(request)
End Function
Public Function getRegisterFullImageBySt13AkzAsync(ByVal user As String, ByVal pwd As String, ByVal akz As String) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterFullImageBySt13AkzResponse)
Dim inValue As DPMA.Marke.getRegisterFullImageBySt13AkzRequest = New DPMA.Marke.getRegisterFullImageBySt13AkzRequest()
inValue.Body = New DPMA.Marke.getRegisterFullImageBySt13AkzRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.akz = akz
Return CType(Me,DPMA.Marke.DPMAregister).getRegisterFullImageBySt13AkzAsync(inValue)
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Marke_DPMAregister_getRegisterThumbnailImage(ByVal request As DPMA.Marke.getRegisterThumbnailImageRequest) As DPMA.Marke.getRegisterThumbnailImageResponse Implements DPMA.Marke.DPMAregister.getRegisterThumbnailImage
Return MyBase.Channel.getRegisterThumbnailImage(request)
End Function
Public Function getRegisterThumbnailImage(ByVal user As String, ByVal pwd As String, ByVal akz As String) As Byte()
Dim inValue As DPMA.Marke.getRegisterThumbnailImageRequest = New DPMA.Marke.getRegisterThumbnailImageRequest()
inValue.Body = New DPMA.Marke.getRegisterThumbnailImageRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.akz = akz
Dim retVal As DPMA.Marke.getRegisterThumbnailImageResponse = CType(Me,DPMA.Marke.DPMAregister).getRegisterThumbnailImage(inValue)
Return retVal.Body.getRegisterThumbnailImageReturn
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Marke_DPMAregister_getRegisterThumbnailImageAsync(ByVal request As DPMA.Marke.getRegisterThumbnailImageRequest) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterThumbnailImageResponse) Implements DPMA.Marke.DPMAregister.getRegisterThumbnailImageAsync
Return MyBase.Channel.getRegisterThumbnailImageAsync(request)
End Function
Public Function getRegisterThumbnailImageAsync(ByVal user As String, ByVal pwd As String, ByVal akz As String) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterThumbnailImageResponse)
Dim inValue As DPMA.Marke.getRegisterThumbnailImageRequest = New DPMA.Marke.getRegisterThumbnailImageRequest()
inValue.Body = New DPMA.Marke.getRegisterThumbnailImageRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.akz = akz
Return CType(Me,DPMA.Marke.DPMAregister).getRegisterThumbnailImageAsync(inValue)
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Marke_DPMAregister_getRegisterThumbnailImageBySt13Akz(ByVal request As DPMA.Marke.getRegisterThumbnailImageBySt13AkzRequest) As DPMA.Marke.getRegisterThumbnailImageBySt13AkzResponse Implements DPMA.Marke.DPMAregister.getRegisterThumbnailImageBySt13Akz
Return MyBase.Channel.getRegisterThumbnailImageBySt13Akz(request)
End Function
Public Function getRegisterThumbnailImageBySt13Akz(ByVal user As String, ByVal pwd As String, ByVal akz As String) As Byte()
Dim inValue As DPMA.Marke.getRegisterThumbnailImageBySt13AkzRequest = New DPMA.Marke.getRegisterThumbnailImageBySt13AkzRequest()
inValue.Body = New DPMA.Marke.getRegisterThumbnailImageBySt13AkzRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.akz = akz
Dim retVal As DPMA.Marke.getRegisterThumbnailImageBySt13AkzResponse = CType(Me,DPMA.Marke.DPMAregister).getRegisterThumbnailImageBySt13Akz(inValue)
Return retVal.Body.getRegisterThumbnailImageBySt13AkzReturn
End Function
<System.ComponentModel.EditorBrowsableAttribute(System.ComponentModel.EditorBrowsableState.Advanced)> _
Function DPMA_Marke_DPMAregister_getRegisterThumbnailImageBySt13AkzAsync(ByVal request As DPMA.Marke.getRegisterThumbnailImageBySt13AkzRequest) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterThumbnailImageBySt13AkzResponse) Implements DPMA.Marke.DPMAregister.getRegisterThumbnailImageBySt13AkzAsync
Return MyBase.Channel.getRegisterThumbnailImageBySt13AkzAsync(request)
End Function
Public Function getRegisterThumbnailImageBySt13AkzAsync(ByVal user As String, ByVal pwd As String, ByVal akz As String) As System.Threading.Tasks.Task(Of DPMA.Marke.getRegisterThumbnailImageBySt13AkzResponse)
Dim inValue As DPMA.Marke.getRegisterThumbnailImageBySt13AkzRequest = New DPMA.Marke.getRegisterThumbnailImageBySt13AkzRequest()
inValue.Body = New DPMA.Marke.getRegisterThumbnailImageBySt13AkzRequestBody()
inValue.Body.user = user
inValue.Body.pwd = pwd
inValue.Body.akz = akz
Return CType(Me,DPMA.Marke.DPMAregister).getRegisterThumbnailImageBySt13AkzAsync(inValue)
End Function
End Class
End Namespace

View File

@@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8"?>
<configurationSnapshot xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns="urn:schemas-microsoft-com:xml-wcfconfigurationsnapshot">
<behaviors />
<bindings>
<binding digest="System.ServiceModel.Configuration.BasicHttpBindingElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089:&lt;?xml version=&quot;1.0&quot; encoding=&quot;utf-16&quot;?&gt;&lt;Data name=&quot;DPMAregisterSoapBinding&quot; /&gt;" bindingType="basicHttpBinding" name="DPMAregisterSoapBinding" />
</bindings>
<endpoints>
<endpoint normalizedDigest="&lt;?xml version=&quot;1.0&quot; encoding=&quot;utf-16&quot;?&gt;&lt;Data address=&quot;http://dpmaconnect.dpma.de/dpmaws/services/DPMAregisterMarkeService&quot; binding=&quot;basicHttpBinding&quot; bindingConfiguration=&quot;DPMAregisterSoapBinding&quot; contract=&quot;DPMA.Marke.DPMAregister&quot; name=&quot;DPMAregister&quot; /&gt;" digest="&lt;?xml version=&quot;1.0&quot; encoding=&quot;utf-16&quot;?&gt;&lt;Data address=&quot;http://dpmaconnect.dpma.de/dpmaws/services/DPMAregisterMarkeService&quot; binding=&quot;basicHttpBinding&quot; bindingConfiguration=&quot;DPMAregisterSoapBinding&quot; contract=&quot;DPMA.Marke.DPMAregister&quot; name=&quot;DPMAregister&quot; /&gt;" contractName="DPMA.Marke.DPMAregister" name="DPMAregister" />
</endpoints>
</configurationSnapshot>

View File

@@ -0,0 +1,201 @@
<?xml version="1.0" encoding="utf-8"?>
<SavedWcfConfigurationInformation xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" Version="9.1" CheckSum="khDw+w6O1uTGL6+Uz65KVJRZwMM=">
<bindingConfigurations>
<bindingConfiguration bindingType="basicHttpBinding" name="DPMAregisterSoapBinding">
<properties>
<property path="/name" isComplexType="false" isExplicitlyDefined="true" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>DPMAregisterSoapBinding</serializedValue>
</property>
<property path="/closeTimeout" isComplexType="false" isExplicitlyDefined="true" clrType="System.TimeSpan, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/openTimeout" isComplexType="false" isExplicitlyDefined="true" clrType="System.TimeSpan, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/receiveTimeout" isComplexType="false" isExplicitlyDefined="true" clrType="System.TimeSpan, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/sendTimeout" isComplexType="false" isExplicitlyDefined="true" clrType="System.TimeSpan, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/allowCookies" isComplexType="false" isExplicitlyDefined="true" clrType="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/bypassProxyOnLocal" isComplexType="false" isExplicitlyDefined="true" clrType="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/hostNameComparisonMode" isComplexType="false" isExplicitlyDefined="false" clrType="System.ServiceModel.HostNameComparisonMode, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>StrongWildcard</serializedValue>
</property>
<property path="/maxBufferPoolSize" isComplexType="false" isExplicitlyDefined="true" clrType="System.Int64, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/maxBufferSize" isComplexType="false" isExplicitlyDefined="false" clrType="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>65536</serializedValue>
</property>
<property path="/maxReceivedMessageSize" isComplexType="false" isExplicitlyDefined="true" clrType="System.Int64, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/proxyAddress" isComplexType="false" isExplicitlyDefined="false" clrType="System.Uri, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/readerQuotas" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.XmlDictionaryReaderQuotasElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.XmlDictionaryReaderQuotasElement</serializedValue>
</property>
<property path="/readerQuotas/maxDepth" isComplexType="false" isExplicitlyDefined="false" clrType="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>0</serializedValue>
</property>
<property path="/readerQuotas/maxStringContentLength" isComplexType="false" isExplicitlyDefined="false" clrType="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>0</serializedValue>
</property>
<property path="/readerQuotas/maxArrayLength" isComplexType="false" isExplicitlyDefined="false" clrType="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>0</serializedValue>
</property>
<property path="/readerQuotas/maxBytesPerRead" isComplexType="false" isExplicitlyDefined="false" clrType="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>0</serializedValue>
</property>
<property path="/readerQuotas/maxNameTableCharCount" isComplexType="false" isExplicitlyDefined="false" clrType="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>0</serializedValue>
</property>
<property path="/textEncoding" isComplexType="false" isExplicitlyDefined="false" clrType="System.Text.Encoding, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.Text.UTF8Encoding</serializedValue>
</property>
<property path="/transferMode" isComplexType="false" isExplicitlyDefined="false" clrType="System.ServiceModel.TransferMode, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>Buffered</serializedValue>
</property>
<property path="/useDefaultWebProxy" isComplexType="false" isExplicitlyDefined="true" clrType="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/messageEncoding" isComplexType="false" isExplicitlyDefined="false" clrType="System.ServiceModel.WSMessageEncoding, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>Text</serializedValue>
</property>
<property path="/security" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.BasicHttpSecurityElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.BasicHttpSecurityElement</serializedValue>
</property>
<property path="/security/mode" isComplexType="false" isExplicitlyDefined="false" clrType="System.ServiceModel.BasicHttpSecurityMode, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>None</serializedValue>
</property>
<property path="/security/transport" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.HttpTransportSecurityElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.HttpTransportSecurityElement</serializedValue>
</property>
<property path="/security/transport/clientCredentialType" isComplexType="false" isExplicitlyDefined="false" clrType="System.ServiceModel.HttpClientCredentialType, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>None</serializedValue>
</property>
<property path="/security/transport/proxyCredentialType" isComplexType="false" isExplicitlyDefined="false" clrType="System.ServiceModel.HttpProxyCredentialType, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>None</serializedValue>
</property>
<property path="/security/transport/extendedProtectionPolicy" isComplexType="true" isExplicitlyDefined="false" clrType="System.Security.Authentication.ExtendedProtection.Configuration.ExtendedProtectionPolicyElement, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.Security.Authentication.ExtendedProtection.Configuration.ExtendedProtectionPolicyElement</serializedValue>
</property>
<property path="/security/transport/extendedProtectionPolicy/policyEnforcement" isComplexType="false" isExplicitlyDefined="false" clrType="System.Security.Authentication.ExtendedProtection.PolicyEnforcement, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>Never</serializedValue>
</property>
<property path="/security/transport/extendedProtectionPolicy/protectionScenario" isComplexType="false" isExplicitlyDefined="false" clrType="System.Security.Authentication.ExtendedProtection.ProtectionScenario, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>TransportSelected</serializedValue>
</property>
<property path="/security/transport/extendedProtectionPolicy/customServiceNames" isComplexType="true" isExplicitlyDefined="false" clrType="System.Security.Authentication.ExtendedProtection.Configuration.ServiceNameElementCollection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>(Auflistung)</serializedValue>
</property>
<property path="/security/transport/realm" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/security/message" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.BasicHttpMessageSecurityElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.BasicHttpMessageSecurityElement</serializedValue>
</property>
<property path="/security/message/clientCredentialType" isComplexType="false" isExplicitlyDefined="false" clrType="System.ServiceModel.BasicHttpMessageCredentialType, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>UserName</serializedValue>
</property>
<property path="/security/message/algorithmSuite" isComplexType="false" isExplicitlyDefined="false" clrType="System.ServiceModel.Security.SecurityAlgorithmSuite, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>Default</serializedValue>
</property>
</properties>
</bindingConfiguration>
</bindingConfigurations>
<endpoints>
<endpoint name="DPMAregister" contract="DPMA.Marke.DPMAregister" bindingType="basicHttpBinding" address="http://dpmaconnect.dpma.de/dpmaws/services/DPMAregisterMarkeService" bindingConfiguration="DPMAregisterSoapBinding">
<properties>
<property path="/address" isComplexType="false" isExplicitlyDefined="true" clrType="System.Uri, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>http://dpmaconnect.dpma.de/dpmaws/services/DPMAregisterMarkeService</serializedValue>
</property>
<property path="/behaviorConfiguration" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/binding" isComplexType="false" isExplicitlyDefined="true" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>basicHttpBinding</serializedValue>
</property>
<property path="/bindingConfiguration" isComplexType="false" isExplicitlyDefined="true" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>DPMAregisterSoapBinding</serializedValue>
</property>
<property path="/contract" isComplexType="false" isExplicitlyDefined="true" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>DPMA.Marke.DPMAregister</serializedValue>
</property>
<property path="/headers" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.AddressHeaderCollectionElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.AddressHeaderCollectionElement</serializedValue>
</property>
<property path="/headers/headers" isComplexType="false" isExplicitlyDefined="true" clrType="System.ServiceModel.Channels.AddressHeaderCollection, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>&lt;Header /&gt;</serializedValue>
</property>
<property path="/identity" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.IdentityElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.IdentityElement</serializedValue>
</property>
<property path="/identity/userPrincipalName" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.UserPrincipalNameElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.UserPrincipalNameElement</serializedValue>
</property>
<property path="/identity/userPrincipalName/value" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/identity/servicePrincipalName" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.ServicePrincipalNameElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.ServicePrincipalNameElement</serializedValue>
</property>
<property path="/identity/servicePrincipalName/value" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/identity/dns" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.DnsElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.DnsElement</serializedValue>
</property>
<property path="/identity/dns/value" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/identity/rsa" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.RsaElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.RsaElement</serializedValue>
</property>
<property path="/identity/rsa/value" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/identity/certificate" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.CertificateElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.CertificateElement</serializedValue>
</property>
<property path="/identity/certificate/encodedValue" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/identity/certificateReference" isComplexType="true" isExplicitlyDefined="false" clrType="System.ServiceModel.Configuration.CertificateReferenceElement, System.ServiceModel, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>System.ServiceModel.Configuration.CertificateReferenceElement</serializedValue>
</property>
<property path="/identity/certificateReference/storeName" isComplexType="false" isExplicitlyDefined="false" clrType="System.Security.Cryptography.X509Certificates.StoreName, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>My</serializedValue>
</property>
<property path="/identity/certificateReference/storeLocation" isComplexType="false" isExplicitlyDefined="false" clrType="System.Security.Cryptography.X509Certificates.StoreLocation, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>LocalMachine</serializedValue>
</property>
<property path="/identity/certificateReference/x509FindType" isComplexType="false" isExplicitlyDefined="false" clrType="System.Security.Cryptography.X509Certificates.X509FindType, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>FindBySubjectDistinguishedName</serializedValue>
</property>
<property path="/identity/certificateReference/findValue" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/identity/certificateReference/isChainIncluded" isComplexType="false" isExplicitlyDefined="false" clrType="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>False</serializedValue>
</property>
<property path="/name" isComplexType="false" isExplicitlyDefined="true" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue>DPMAregister</serializedValue>
</property>
<property path="/kind" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
<property path="/endpointConfiguration" isComplexType="false" isExplicitlyDefined="false" clrType="System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<serializedValue />
</property>
</properties>
</endpoint>
</endpoints>
</SavedWcfConfigurationInformation>

View File

@@ -0,0 +1,6 @@
<?xml version="1.0" encoding="utf-8"?>
<packages>
<package id="NLog" version="4.2.3" targetFramework="net45" />
<package id="NLog.Config" version="4.2.3" targetFramework="net45" />
<package id="NLog.Schema" version="4.2.3" targetFramework="net45" />
</packages>