69 lines
2.6 KiB
VB.net
69 lines
2.6 KiB
VB.net
Public Class Mark
|
|
' Aus Search
|
|
Public Property RegistrationOfficeCode As String 'Datenbestand
|
|
Public Property RegistrationDate As String 'Tag der Eintragung im Register
|
|
Public Property RegistrationNumber As String 'Registernummer
|
|
Public Property MarkCurrentStatusCode As String 'Aktenzustand
|
|
Public Property MarkVerbalElementText As String 'Wiedergabe der Marke
|
|
Public Property MarkFeature As String 'Markenform
|
|
Public Property ApplicationDate As String 'Anmeldetag
|
|
Public Property ApplicationNumber As String 'Aktenzeichen
|
|
Public Property Applicant As String 'Inhaber
|
|
Public Property Representative As String 'Vertreter
|
|
' Aus GetRegisterInfo
|
|
Public Property PublicationDate As String ' Tag der Veröffentlichung
|
|
Public Property ExpiryDate As String 'Schutzendedatum
|
|
Public Property TerminationDate As String 'Wirkungsdatum Löschung
|
|
Public Property OppositionPeriodStartDate As String 'Beginn Widerspruchsfrist
|
|
Public Property OppositionPeriodEndDate As String 'Ablauf Widerspruchsfrist
|
|
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("{0} (Klasse {1});", c.GoodsServicesDescription, c.ClassNumber)
|
|
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 ClassificationDetail
|
|
Public ClassNumber As String
|
|
Public GoodsServicesDescription
|
|
|
|
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 String
|
|
Public RecordProcedureIncomplete As Boolean = False
|
|
|
|
Public Sub New()
|
|
End Sub
|
|
End Class
|